X-Git-Url: https://thelambdalab.xyz/gitweb/index.cgi?a=blobdiff_plain;f=elpher.el;h=6abd470085feade0299c6fa1cf5d9f258e51edca;hb=40ec805063c480dfdc01c8328be12f7c8f823c9c;hp=ea95aee605c5311b01ae99d9bd02631a7037a1ac;hpb=986d88c39d06c58fb23a7dfad037fec8235164b0;p=elpher.git diff --git a/elpher.el b/elpher.el index ea95aee..6abd470 100644 --- a/elpher.el +++ b/elpher.el @@ -4,7 +4,7 @@ ;; Author: Tim Vaughan ;; Created: 11 April 2019 -;; Version: 1.4.6 +;; Version: 1.4.7 ;; Keywords: comm gopher ;; Homepage: https://github.com/tgvaughan/elpher ;; Package-Requires: ((emacs "26")) @@ -63,7 +63,7 @@ ;;; Global constants ;; -(defconst elpher-version "1.4.6" +(defconst elpher-version "1.4.7" "Current version of elpher.") (defconst elpher-margin-width 6 @@ -306,7 +306,7 @@ unless PRESERVE-PARENT is non-nil." (let* ((address (elpher-node-address node)) (type (elpher-address-type address)) (type-record (alist-get type elpher-type-map))) - (if (listp type-record) + (if type-record (funcall (car type-record)) (elpher-visit-parent-node) (error "Unsupported gopher selector type '%c'" type)))))