diff options
| author | Nick Roberts | 2005-08-01 08:29:11 +0000 |
|---|---|---|
| committer | Nick Roberts | 2005-08-01 08:29:11 +0000 |
| commit | bfa93501f0713fedd6648d6e41131cdd8abb1393 (patch) | |
| tree | a79c1dafff14354e60df70adb857d09530ab92d1 | |
| parent | e37a0f2dba81fe8fa4bedbf5e78b6134e7ce9d63 (diff) | |
| download | emacs-bfa93501f0713fedd6648d6e41131cdd8abb1393.tar.gz emacs-bfa93501f0713fedd6648d6e41131cdd8abb1393.zip | |
* progmodes/gdb-ui.el (gdb-enable-debug-log): Add autoload cookie.
* progmodes/gud.el (gud-tooltip-mode): Add autoload cookie.
(gud-tooltip-mode): Don't barf if the GUD buffer has been killed.
| -rw-r--r-- | lisp/progmodes/gdb-ui.el | 1 | ||||
| -rw-r--r-- | lisp/progmodes/gud.el | 10 |
2 files changed, 9 insertions, 2 deletions
diff --git a/lisp/progmodes/gdb-ui.el b/lisp/progmodes/gdb-ui.el index 8e574e912c6..7f1d2ad2092 100644 --- a/lisp/progmodes/gdb-ui.el +++ b/lisp/progmodes/gdb-ui.el | |||
| @@ -201,6 +201,7 @@ detailed description of this mode. | |||
| 201 | 201 | ||
| 202 | (defvar gdb-debug-log nil) | 202 | (defvar gdb-debug-log nil) |
| 203 | 203 | ||
| 204 | ;;;###autoload | ||
| 204 | (defcustom gdb-enable-debug-log nil | 205 | (defcustom gdb-enable-debug-log nil |
| 205 | "Non-nil means record the process input and output in `gdb-debug-log'." | 206 | "Non-nil means record the process input and output in `gdb-debug-log'." |
| 206 | :type 'boolean | 207 | :type 'boolean |
diff --git a/lisp/progmodes/gud.el b/lisp/progmodes/gud.el index f93ff3d7e02..22b0b7b36d6 100644 --- a/lisp/progmodes/gud.el +++ b/lisp/progmodes/gud.el | |||
| @@ -4,7 +4,8 @@ | |||
| 4 | ;; Maintainer: FSF | 4 | ;; Maintainer: FSF |
| 5 | ;; Keywords: unix, tools | 5 | ;; Keywords: unix, tools |
| 6 | 6 | ||
| 7 | ;; Copyright (C) 1992,93,94,95,96,1998,2000,02,03,04,05 Free Software Foundation, Inc. | 7 | ;; Copyright (C) 1992, 1993, 1994, 1995, 1996, 1998, 2000, 2001, 2002, 2003, |
| 8 | ;; 2004, 2005 Free Software Foundation, Inc. | ||
| 8 | 9 | ||
| 9 | ;; This file is part of GNU Emacs. | 10 | ;; This file is part of GNU Emacs. |
| 10 | 11 | ||
| @@ -3209,6 +3210,7 @@ This event can be examined by forms in GUD-TOOLTIP-DISPLAY.") | |||
| 3209 | (define-obsolete-function-alias 'tooltip-gud-toggle-dereference | 3210 | (define-obsolete-function-alias 'tooltip-gud-toggle-dereference |
| 3210 | 'toggle-gud-tooltip-dereference "22.1") | 3211 | 'toggle-gud-tooltip-dereference "22.1") |
| 3211 | 3212 | ||
| 3213 | ;;;###autoload | ||
| 3212 | (define-minor-mode gud-tooltip-mode | 3214 | (define-minor-mode gud-tooltip-mode |
| 3213 | "Toggle the display of GUD tooltips." | 3215 | "Toggle the display of GUD tooltips." |
| 3214 | :global t | 3216 | :global t |
| @@ -3225,7 +3227,11 @@ This event can be examined by forms in GUD-TOOLTIP-DISPLAY.") | |||
| 3225 | (remove-hook 'tooltip-hook 'gud-tooltip-tips) | 3227 | (remove-hook 'tooltip-hook 'gud-tooltip-tips) |
| 3226 | (define-key global-map [mouse-movement] 'ignore))) | 3228 | (define-key global-map [mouse-movement] 'ignore))) |
| 3227 | (gud-tooltip-activate-mouse-motions-if-enabled) | 3229 | (gud-tooltip-activate-mouse-motions-if-enabled) |
| 3228 | (if (with-current-buffer gud-comint-buffer (eq gud-minor-mode 'gdba)) | 3230 | (if (and |
| 3231 | gud-comint-buffer | ||
| 3232 | (buffer-name gud-comint-buffer); gud-comint-buffer might be kille | ||
| 3233 | (with-current-buffer gud-comint-buffer | ||
| 3234 | (memq gud-minor-mode '(gdbmi gdba)))) | ||
| 3229 | (if gud-tooltip-mode | 3235 | (if gud-tooltip-mode |
| 3230 | (progn | 3236 | (progn |
| 3231 | (dolist (buffer (buffer-list)) | 3237 | (dolist (buffer (buffer-list)) |