X-Git-Url: https://thelambdalab.xyz/gitweb/index.cgi?p=elpher.git;a=blobdiff_plain;f=elpher.el;h=449874d4ad2b7ab25675aee7bf677e1ee7ad55ea;hp=8f194a4f49ad8d786031cbd745dc4d96f688b77e;hb=221911ec7ce50468fbf6c0889321adf85cd753f5;hpb=b9b8476b81a05dceb4ca04676b40873eebb654d4 diff --git a/elpher.el b/elpher.el index 8f194a4..449874d 100644 --- a/elpher.el +++ b/elpher.el @@ -136,14 +136,14 @@ ;; ;; 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://"))