From d202f3c0d5b211b5d43a7ec3eed0f5feb82e2d7f Mon Sep 17 00:00:00 2001 From: =?utf8?q?=C3=89tienne=20Deparis?= Date: Mon, 28 Jun 2021 18:20:46 +0200 Subject: [PATCH] Avoid anoying error message on homepage when using elpher-go-current --- elpher.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/elpher.el b/elpher.el index 9fffce8..e16c52d 100644 --- a/elpher.el +++ b/elpher.el @@ -1854,10 +1854,10 @@ When run interactively HOST-OR-URL is read from the minibuffer." "Go to a particular site read from the minibuffer, initialized with the current URL." (interactive) (let ((address (elpher-page-address elpher-current-page))) - (if (elpher-address-special-p address) - (error "Command invalid for this page") - (let ((url (read-string "Gopher or Gemini URL: " (elpher-address-to-url address)))) - (elpher-visit-page (elpher-make-page url (elpher-address-from-url url))))))) + (let ((url (read-string "Gopher or Gemini URL: " + (unless (elpher-address-special-p address) + (elpher-address-to-url address))))) + (elpher-visit-page (elpher-make-page url (elpher-address-from-url url)))))) (defun elpher-visit-gemini-numbered-link (n) "Visit link designated by a number." -- 2.20.1