X-Git-Url: https://thelambdalab.xyz/gitweb/index.cgi?p=elpher.git;a=blobdiff_plain;f=elpher.el;h=7cceacb552bca3b16fb706be4059b2f537e33f94;hp=d4eba0277c2bf73027be26fd2b0c69c9802a6cc8;hb=62d7db8d11e53ec95620929aac65637968930d11;hpb=fdb5b418b140a821d93bb82ab0038b1da8cf2401 diff --git a/elpher.el b/elpher.el index d4eba02..7cceacb 100644 --- a/elpher.el +++ b/elpher.el @@ -4,7 +4,7 @@ ;; Author: Tim Vaughan ;; Created: 11 April 2019 -;; Version: 1.4.0 +;; Version: 1.4.1 ;; Keywords: comm gopher ;; Homepage: https://github.com/tgvaughan/elpher ;; Package-Requires: ((emacs "25")) @@ -55,7 +55,7 @@ ;;; Global constants ;; -(defconst elpher-version "1.4.0" +(defconst elpher-version "1.4.1" "Current version of elpher.") (defconst elpher-margin-width 6 @@ -1073,7 +1073,9 @@ host, selector and port." (if (and (equal type ?h) (string-prefix-p "URL:" selector)) (elt (split-string selector "URL:") 1) - (concat "gopher://" + (concat "gopher" + (if (elpher-address-use-tls-p address) "s" "") + "://" host (if (equal port 70) ""