diff options
| author | Diancheng Wang | 2024-12-05 15:34:44 +0800 |
|---|---|---|
| committer | Eli Zaretskii | 2024-12-12 12:44:55 +0200 |
| commit | a4548739b8ed3ba20223d1043390f71afcdd8a2f (patch) | |
| tree | 54117925b2787dc35774412643897f1da80c9734 | |
| parent | a3610381ff65490da33cd1870dd3dfd491bff06f (diff) | |
| download | emacs-a4548739b8ed3ba20223d1043390f71afcdd8a2f.tar.gz emacs-a4548739b8ed3ba20223d1043390f71afcdd8a2f.zip | |
Turn off current source line indicator when gdb buffer is killed
* lisp/progmodes/gud.el (gud-hide-current-line-indicator):
Turn off current-line indicator. (Bug#74642)
| -rw-r--r-- | lisp/progmodes/gud.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/progmodes/gud.el b/lisp/progmodes/gud.el index a4e611277e4..70daa087c2b 100644 --- a/lisp/progmodes/gud.el +++ b/lisp/progmodes/gud.el | |||
| @@ -2962,6 +2962,8 @@ It is nil if not yet present.") | |||
| 2962 | (defun gud-sentinel (proc msg) | 2962 | (defun gud-sentinel (proc msg) |
| 2963 | (cond ((null (buffer-name (process-buffer proc))) | 2963 | (cond ((null (buffer-name (process-buffer proc))) |
| 2964 | ;; buffer killed | 2964 | ;; buffer killed |
| 2965 | ;; Stop displaying an arrow and highlight overlay in a source file. | ||
| 2966 | (gud-hide-current-line-indicator t) | ||
| 2965 | (set-process-buffer proc nil) | 2967 | (set-process-buffer proc nil) |
| 2966 | (if (and (boundp 'speedbar-initial-expansion-list-name) | 2968 | (if (and (boundp 'speedbar-initial-expansion-list-name) |
| 2967 | (string-equal speedbar-initial-expansion-list-name "GUD")) | 2969 | (string-equal speedbar-initial-expansion-list-name "GUD")) |