Mercurial > emacs

changeset 7074:b9d86b8e3ca1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(gud-mode, gud-sentinel): Remove space after `:' in mode-line-process.
author Richard M. Stallman <rms@gnu.org>
date Sun, 24 Apr 1994 08:16:18 +0000
parents c662b47cda3f
children 7c7b98107b4c
files lisp/gud.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/gud.el	Sun Apr 24 08:15:55 1994 +0000
+++ b/lisp/gud.el	Sun Apr 24 08:16:18 1994 +0000
@@ -870,7 +870,7 @@
   (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 @@
 	 (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