Mercurial > emacs
changeset 74719:8782777c2f1a
(Info-build-node-completions): Signal error if tag-table marker is not
found.
| author | Chong Yidong <cyd@stupidchicken.com> |
|---|---|
| date | Mon, 18 Dec 2006 05:16:48 +0000 |
| parents | 0b1ce0b9c2a4 |
| children | cdf24e3ef426 |
| files | lisp/info.el |
| diffstat | 1 files changed, 2 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/info.el Mon Dec 18 05:16:39 2006 +0000 +++ b/lisp/info.el Mon Dec 18 05:16:48 2006 +0000 @@ -1551,6 +1551,8 @@ (node-regexp "Node: *\\([^,\n]*\\) *[,\n\t]")) (save-excursion (save-restriction + (or Info-tag-table-marker + (error "No Info tags found")) (if (marker-buffer Info-tag-table-marker) (let ((marker Info-tag-table-marker)) (set-buffer (marker-buffer marker))