# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 903233425 0
# Node ID 10ad03c5d326e3ffada6396a543003a5266a7c04
# Parent  88fadff500be08117018bac89c09c631050ca8dd
(Info-follow-reference): Nice error msg if there was no arg.

diff -r 88fadff500be -r 10ad03c5d326 lisp/info.el
--- a/lisp/info.el	Sat Aug 15 23:00:07 1998 +0000
+++ b/lisp/info.el	Sun Aug 16 02:10:25 1998 +0000
@@ -1063,6 +1063,10 @@
 	   (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))