From 4fc14e5ad026d7feabece376627a3060b2d2226a Mon Sep 17 00:00:00 2001 From: Markus Rost Date: Fri, 4 Dec 1998 23:05:46 +0000 Subject: [PATCH] (Info-menu): Don't return error if point is between menu header and first menu item. --- lisp/info.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/lisp/info.el b/lisp/info.el index 0164dedd293..1febb4d1195 100644 --- a/lisp/info.el +++ b/lisp/info.el @@ -1212,10 +1212,10 @@ Completion is allowed, and the menu item point is on is the default." (save-excursion (goto-char p) (end-of-line) - (re-search-backward "\n\\* +\\([^:\t\n]*\\):" beg t) - (setq default (format "%s" (buffer-substring - (match-beginning 1) - (match-end 1))))))) + (if (re-search-backward "\n\\* +\\([^:\t\n]*\\):" beg t) + (setq default (format "%s" (buffer-substring + (match-beginning 1) + (match-end 1)))))))) (let ((item nil)) (while (null item) (setq item (let ((completion-ignore-case t) -- 2.39.2