changeset 12004:b28537b10443

(gud-perldb-find-file): Use gud-make-debug-menu.
author Karl Heuer <kwzh@gnu.org>
date Mon, 29 May 1995 20:16:10 +0000
parents 58854589c7f7
children 4a722a97c8d3
files lisp/gud.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/gud.el	Mon May 29 20:13:06 1995 +0000
+++ b/lisp/gud.el	Mon May 29 20:16:10 1995 +0000
@@ -939,7 +939,7 @@
   (save-excursion
     (let ((buf (find-file-noselect f)))
       (set-buffer buf)
-      (define-key (current-local-map) [menu-bar debug] (cons "Gud" (copy-keymap gud-menu-map)))
+      (gud-make-debug-menu)
       buf)))
 
 ;;;###autoload