Bug fix: typo in elpher-go-current

[elpher.git] / elpher.el

diff --git a/elpher.el b/elpher.el
index 19eb04a..fc7ed8f 100644 (file)
--- a/elpher.el
+++ b/elpher.el
@@ -1519,8 +1519,8 @@ treatment that a separate function is warranted."
              (address (elpher-address-from-gemini-url url))
              (type (if address (elpher-address-type address) nil))
              (type-map-entry (cdr (assoc type elpher-type-map)))
-             (fill-prefix (make-string (+ 1 (length elpher-gemini-link-string)) ?\s))
-             (insert elpher-gemini-link-string))
+             (fill-prefix (make-string (+ 1 (length elpher-gemini-link-string)) ?\s)))
+        (insert elpher-gemini-link-string)
         (if type-map-entry
             (let* ((face (elt type-map-entry 3))
                    (display-string (or given-display-string
@@ -2170,7 +2170,7 @@ When run interactively HOST-OR-URL is read from the minibuffer."
          (url (read-string (format "Visit URL (default scheme %s): " (elpher-get-default-url-scheme))
                            (elpher-address-to-url address))))
     (unless (string-empty-p (string-trim url))
-      (elpher-visit-page (elpher-page-from-url url) (elpher-get-default-url-scheme)))))
+      (elpher-visit-page (elpher-page-from-url url)))))
 
 (defun elpher-redraw ()
   "Redraw current page."