[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Dashes in mode-line
From: |
Julien Danjou |
Subject: |
Dashes in mode-line |
Date: |
Mon, 18 Oct 2010 15:36:20 +0200 |
User-agent: |
Gnus/5.110011 (No Gnus v0.11) Emacs/24.0.50 (gnu/linux) |
Hi,
What's the current status and rational about keeping the dashes in
mode-line?
Reading the mail archives, I've seen Miles claiming it was only needed
for vt52 which we hope are not used anymore nowadays.
It seems rather useless now, so I propose to remove them. Attached is a
first version of a patch implementing this removal. It really makes the
mode-line easier to read IMHO.
>From c33afb4c39717145a604951068a1e2824ec1138c Mon Sep 17 00:00:00 2001
From: Julien Danjou <address@hidden>
Date: Mon, 18 Oct 2010 15:33:31 +0200
Subject: [PATCH] bindings: remove dashes in mode-line
Signed-off-by: Julien Danjou <address@hidden>
---
etc/tutorials/TUTORIAL | 12 ++++++------
lisp/ChangeLog | 4 ++++
lisp/bindings.el | 9 ++++-----
3 files changed, 14 insertions(+), 11 deletions(-)
diff --git a/etc/tutorials/TUTORIAL b/etc/tutorials/TUTORIAL
index 1d80f4e..f566df9 100644
--- a/etc/tutorials/TUTORIAL
+++ b/etc/tutorials/TUTORIAL
@@ -498,12 +498,12 @@ you save, Emacs leaves the original file under a changed
name in case
you later decide that your changes were a mistake.
If you look near the bottom of the screen you will see a line that
-begins and ends with dashes, and starts with "--:--- TUTORIAL" or
-something like that. This part of the screen normally shows the name
-of the file that you are visiting. Right now, you are visiting a file
-called "TUTORIAL" which is your personal scratch copy of the Emacs
-tutorial. When you find a file with Emacs, that file's name will
-appear in that precise spot.
+begins with dashes, and starts with "--:--- TUTORIAL" or something
+like that. This part of the screen normally shows the name of the
+file that you are visiting. Right now, you are visiting a file called
+"TUTORIAL" which is your personal scratch copy of the Emacs tutorial.
+When you find a file with Emacs, that file's name will appear in that
+precise spot.
One special thing about the command for finding a file is that you
have to say what file name you want. We say the command "reads an
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 1195fe8..be65819 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2010-10-18 Julien Danjou <address@hidden>
+
+ * bindings.el: Replaces dashes by spaces in default `mode-line-format'.
+
2010-10-16 Chong Yidong <address@hidden>
* cus-theme.el (custom-theme--migrate-settings): New var.
diff --git a/lisp/bindings.el b/lisp/bindings.el
index d19db2c..2f8c8aa 100644
--- a/lisp/bindings.el
+++ b/lisp/bindings.el
@@ -318,7 +318,7 @@ Keymap to display on column and line numbers.")
mouse-2: Make current window occupy the whole frame\n\
mouse-3: Remove current window from display")
(recursive-edit-help-echo "Recursive edit, type C-M-c to get out")
- (dashes (propertize "--" 'help-echo help-echo))
+ (spaces (propertize " " 'help-echo help-echo))
(standard-mode-line-format
(list
"%e"
@@ -334,9 +334,8 @@ mouse-3: Remove current window from display")
'(vc-mode vc-mode)
(propertize " " 'help-echo help-echo)
'mode-line-modes
- `(which-func-mode ("" which-func-format ,dashes))
- `(global-mode-string ("" global-mode-string ,dashes))
- (propertize "-%-" 'help-echo help-echo)))
+ `(which-func-mode ("" which-func-format ,spaces))
+ `(global-mode-string ("" global-mode-string ,spaces))))
(standard-mode-line-modes
(list
(propertize "%[" 'help-echo recursive-edit-help-echo)
@@ -362,7 +361,7 @@ mouse-3: Toggle minor modes"
'mouse-2 #'mode-line-widen))
(propertize ")" 'help-echo help-echo)
(propertize "%]" 'help-echo recursive-edit-help-echo)
- (propertize "--" 'help-echo help-echo)))
+ spaces))
(standard-mode-line-position
`((-3 ,(propertize
--
1.7.1
--
Julien Danjou
// ᐰ <address@hidden> http://julien.danjou.info
- Dashes in mode-line,
Julien Danjou <=