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)