From: Richard M. Stallman <rms@gnu.org>
Date: Sun, 16 Aug 1998 02:10:25 +0000 (+0000)
Subject: (Info-follow-reference): Nice error msg if there was no arg.
X-Git-Tag: emacs-20.3~41
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ebf8f7e14ac86abf7b946d755238045e8b136c36;p=emacs.git

(Info-follow-reference): Nice error msg if there was no arg.
---

diff --git a/lisp/info.el b/lisp/info.el
index 928625093c3..c96844a88fc 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -1063,6 +1063,10 @@ NAME may be an abbreviation of the reference name."
 	   (list (if (equal input "")
 		     default input)))
        (error "No cross-references in this node"))))
+
+  (unless footnotename
+    (error "No reference was specified"))
+
   (let (target beg i (str (concat "\\*note " (regexp-quote footnotename)))
 	       (case-fold-search t))
     (while (setq i (string-match " " str i))