Commit 0b358e64 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(gud-mode, gud-sentinel):

Remove space after `:' in mode-line-process.
parent 6657eedf
......@@ -870,7 +870,7 @@ comint mode, which see."
(comint-mode)
(setq major-mode 'gud-mode)
(setq mode-name "Debugger")
(setq mode-line-process '(": %s"))
(setq mode-line-process '(":%s"))
(use-local-map (copy-keymap comint-mode-map))
(define-key (current-local-map) "\C-c\C-l" 'gud-refresh)
(make-local-variable 'gud-last-frame)
......@@ -968,7 +968,7 @@ comint mode, which see."
(setq overlay-arrow-position nil)
;; Fix the mode line.
(setq mode-line-process
(concat ": "
(concat ":"
(symbol-name (process-status proc))))
(let* ((obuf (current-buffer)))
;; save-excursion isn't the right thing if
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment