changeset 44778:40bcb11d5ff3

(menu-bar-goto-menu): Fix bindings for next-tag and next-tag-otherw.
author Andreas Schwab <schwab@suse.de>
date Tue, 23 Apr 2002 15:16:00 +0000
parents cc6875caaed1
children 5ce5dc5a11f3
files lisp/menu-bar.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/menu-bar.el	Tue Apr 23 14:33:02 2002 +0000
+++ b/lisp/menu-bar.el	Tue Apr 23 15:16:00 2002 +0000
@@ -352,13 +352,13 @@
 	      :help "Find function/variables whose names match regexp"))
 (define-key menu-bar-goto-menu [next-tag-otherw]
   '(menu-item "Next Tag in Other Window"
-	      (function (lambda () (find-tag-other-window nil t)))
+	      (lambda () (interactive)  (find-tag-other-window nil t))
 	      :enable (and (boundp 'tags-location-ring)
 			   (not (ring-empty-p tags-location-ring)))
 	      :help "Find next function/variable matching last tag name in another window"))
 (define-key menu-bar-goto-menu [next-tag]
   '(menu-item "Find Next Tag"
-	      (function (lambda () (find-tag nil t)))
+	      (lambda () (interactive) (find-tag nil t))
 	      :enable (and (boundp 'tags-location-ring)
 			   (not (ring-empty-p tags-location-ring)))
 	      :help "Find next function/variable matching last tag name"))