From e22b53e34866a45002bb3b6bf36f0cbb54520ece Mon Sep 17 00:00:00 2001 From: cage Date: Fri, 21 Jul 2023 15:10:58 +0200 Subject: [PATCH] - [TITAN] fixed paremeter: 'size'. --- src/gui/client/titan-window.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/gui/client/titan-window.lisp b/src/gui/client/titan-window.lisp index 729c477..63c2018 100644 --- a/src/gui/client/titan-window.lisp +++ b/src/gui/client/titan-window.lisp @@ -73,8 +73,8 @@ (setf has-error-p t) (gui-goodies:notify-request-error (_ "Neither a file to upload has been specified nor text data has been typed"))) (setf mime constants:+mime-type-text+ - size (length (gui:text data-text)) - titan-data (trim-blanks (gui:text data-text))))) + size (length trimmed-data-text) + titan-data trimmed-data-text))) (when (not has-error-p) (let ((query (gemini-client:make-titan-query mime size (gui:text token-entry)))) (setf (uri:query url) query)