diff options
| -rw-r--r-- | wl | 8 |
1 files changed, 5 insertions, 3 deletions
@@ -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)) |