summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMatthias Schiffer <mschiffer@universe-factory.net>2013-07-21 01:35:38 +0200
committerMatthias Schiffer <mschiffer@universe-factory.net>2013-07-21 01:35:38 +0200
commit7df06421357a9b5acb7169ed77827c9303ba98d5 (patch)
tree50f1fb40b38786adf5d86579c8475d2269e48c11
parent67028f21be4c382e263f96d4a8c24702fd27c061 (diff)
downloadconf-misc-7df06421357a9b5acb7169ed77827c9303ba98d5.zip
conf-misc-7df06421357a9b5acb7169ed77827c9303ba98d5.tar
wl: more minor improvements
-rw-r--r--wl8
1 files changed, 5 insertions, 3 deletions
diff --git a/wl b/wl
index fc66dfe..23b2ff5 100644
--- a/wl
+++ b/wl
@@ -29,7 +29,8 @@
new
unread
answered
- forwarded))
+ forwarded)
+ wl-message-window-size '(1 . 2))
(setq elmo-folder-update-threshold nil)
@@ -62,7 +63,7 @@ Return non-nil if the mark is updated"
(let ((status (wl-summary-message-status number)))
(prog1
(save-excursion
- (move-to-column 9)
+ (move-to-column (+ wl-summary-buffer-number-column 4))
(let ((inhibit-read-only t)
(buffer-read-only nil)
(mark (buffer-substring (- (point) 3) (point)))
@@ -80,7 +81,8 @@ Return non-nil if the mark is updated"
(set-buffer-modified-p nil))))
(add-to-list 'wl-summary-line-format-spec-alist '(?X (extended-persistent-mark)))
-(setq wl-summary-line-format "%n%T%X %Y/%M/%D (%W) %h:%m %t%[%25(%c %f%) %] %s")
+(setq wl-summary-line-format "%n%T%X %Y/%M/%D (%W) %h:%m %t%[%25(%c %f%) %] %s"
+ wl-summary-default-number-column 6)
(defadvice wl-message-buffer-display (before wl-message-buffer-display-unread activate)
(setq unread t))