Mercurial > emacs
changeset 23038:10ad03c5d326
(Info-follow-reference): Nice error msg if there was no arg.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sun, 16 Aug 1998 02:10:25 +0000 |
| parents | 88fadff500be |
| children | f4262c9a21dd |
| files | lisp/info.el |
| diffstat | 1 files changed, 4 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- 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))