diff options
| author | Nick Roberts <nickrob@snap.net.nz> | 2005-07-15 14:44:33 +0000 |
|---|---|---|
| committer | Nick Roberts <nickrob@snap.net.nz> | 2005-07-15 14:44:33 +0000 |
| commit | fd9a7f35a18ec7d6ab0bdb5359d817641840184a (patch) | |
| tree | dbb3a55ca32e1f0204682d6d152afae67e826b1a /lisp/progmodes | |
| parent | bb7e5329872af5f1edd05546af18f14be5747070 (diff) | |
| download | emacs-fd9a7f35a18ec7d6ab0bdb5359d817641840184a.tar.gz | |
(etags, sdb): Only require etags when needed.
(gud-speedbar-menu-items): Correct logic for enabling items.
Diffstat (limited to 'lisp/progmodes')
| -rw-r--r-- | lisp/progmodes/gud.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/progmodes/gud.el b/lisp/progmodes/gud.el index 50644383667..f93ff3d7e02 100644 --- a/lisp/progmodes/gud.el +++ b/lisp/progmodes/gud.el @@ -42,7 +42,6 @@ (eval-when-compile (require 'cl)) ; for case macro (require 'comint) -(require 'etags) (require 'font-lock) ;; ====================================================================== @@ -352,10 +351,10 @@ t means that there is no stack, and we are in display-file mode.") (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 @@ The directory containing FILE becomes the initial working directory 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) |