Fix thing-at-point-uri-schemes error
[elpher.git] / elpher.el
index 8f194a4..449874d 100644 (file)
--- a/elpher.el
+++ b/elpher.el
 ;;
 
 ;; buffer-local
-(defvar elpher--gemini-page-headings '()
-  "Interval variable containing list of headings on page.")
+(defvar elpher--gemini-page-headings nil
+  "List of headings on the page.")
 
-(defvar elpher--gemini-page-links '()
-  "Internal variable containing list of links on page.")
+(defvar elpher--gemini-page-links nil
+  "List of links on the page.")
 
 (defvar elpher--gemini-page-links-cache (make-hash-table :test 'equal)
-  "Internal variable containing hash of addresses and page links.")
+  "Hash of addresses and page links.")
 
 ;;; Customization group
 ;;
@@ -190,7 +190,7 @@ These certificates may be used for establishing authenticated TLS connections."
   :type '(file))
 
 (defcustom elpher-default-url-type "gopher"
-  "Default URL type (i.e. schema) to assume if not explicitly given."
+  "Default URL type (i.e. scheme) to assume if not explicitly given."
   :type '(choice (const "gopher")
                  (const "gemini")))
 
@@ -1816,7 +1816,9 @@ If ADDRESS is already bookmarked, update the label only."
   ;; Use elpher to open gopher, finger and gemini links
   (when (boundp 'browse-url-default-handlers)
     (add-to-list 'browse-url-default-handlers
-                '("^\\(gopher\\|finger\\|gemini\\)://" . browse-url-elpher)))
+                '("^\\(gopher\\|finger\\|gemini\\)://" . browse-url-elpher))))
+
+(with-eval-after-load "thingatpt"
   ;; Register "gemini://" as a URI scheme so `browse-url' does the right thing
   (add-to-list 'thing-at-point-uri-schemes "gemini://"))