diff options
| author | Chong Yidong <cyd@stupidchicken.com> | 2006-12-18 05:16:48 +0000 |
|---|---|---|
| committer | Chong Yidong <cyd@stupidchicken.com> | 2006-12-18 05:16:48 +0000 |
| commit | 746c9f1493536e60be1965ef669620908a553227 (patch) | |
| tree | 9034586e8aa227fe8d2e9b6736d7b6d928907ef8 | |
| parent | 3294bb68869adfbe4f8fbe7eaf1b206a2ec7b859 (diff) | |
| download | emacs-746c9f1493536e60be1965ef669620908a553227.tar.gz | |
(Info-build-node-completions): Signal error if tag-table marker is not
found.
| -rw-r--r-- | lisp/info.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/info.el b/lisp/info.el index 2318f3240dd..b2a67265dca 100644 --- a/lisp/info.el +++ b/lisp/info.el @@ -1551,6 +1551,8 @@ PATH-AND-SUFFIXES is a pair of lists, (DIRECTORIES . SUFFIXES)." (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)) |