diff --git a/lisp/gud.el b/lisp/gud.el index 45ffeddf68d..7df9155ca01 100644 --- a/lisp/gud.el +++ b/lisp/gud.el @@ -2434,6 +2434,8 @@ It is saved for when this flag is not set.") (if gud-filter-pending-text (gud-filter proc "")))))) +(defvar gud-minor-mode-type nil) + (defun gud-sentinel (proc msg) (cond ((null (buffer-name (process-buffer proc))) ;; buffer killed @@ -2475,8 +2477,6 @@ It is saved for when this flag is not set.") ;; if obuf is the gud buffer. (set-buffer obuf)))))) -(defvar gud-minor-mode-type nil) - (defun gud-kill-buffer-hook () (if gud-minor-mode (setq gud-minor-mode-type gud-minor-mode)))