Mercurial > emacs
changeset 64345:1009f071639a
(etags, sdb): Only require etags when needed.
(gud-speedbar-menu-items): Correct logic for enabling items.
| author | Nick Roberts <nickrob@snap.net.nz> |
|---|---|
| date | Fri, 15 Jul 2005 14:44:33 +0000 |
| parents | d248066aa841 |
| children | ef82d5d73c0d |
| files | lisp/progmodes/gud.el |
| diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/gud.el Fri Jul 15 14:42:10 2005 +0000 +++ b/lisp/progmodes/gud.el Fri Jul 15 14:44:33 2005 +0000 @@ -42,7 +42,6 @@ (eval-when-compile (require 'cl)) ; for case macro (require 'comint) -(require 'etags) (require 'font-lock) ;; ====================================================================== @@ -352,10 +351,10 @@ (not (memq gud-minor-mode '(gdbmi gdba))))] ["Edit value" speedbar-edit-line (with-current-buffer gud-comint-buffer - (not (memq gud-minor-mode '(gdbmi gdba))))] + (memq gud-minor-mode '(gdbmi gdba)))] ["Delete expression" gdb-var-delete (with-current-buffer gud-comint-buffer - (not (memq gud-minor-mode '(gdbmi gdba))))]) + (memq gud-minor-mode '(gdbmi gdba)))]) "Additional menu items to add to the speedbar frame.") ;; Make sure our special speedbar mode is loaded @@ -833,6 +832,7 @@ and source-file directory for your debugger." (interactive (list (gud-query-cmdline 'sdb))) + (if gud-sdb-needs-tags (require 'etags)) (if (and gud-sdb-needs-tags (not (and (boundp 'tags-file-name) (stringp tags-file-name)