From 717f9a4c0e2c15cd45025199f533322157c0cf76 Mon Sep 17 00:00:00 2001 From: teranisi Date: Sat, 23 Aug 2003 10:57:10 +0000 Subject: [PATCH] * wl-summary.el (wl-summary-update-persistent-mark): Highlight the line even when the mark string is not changed. --- wl/ChangeLog | 3 +++ wl/wl-summary.el | 12 ++++++------ 2 files changed, 9 insertions(+), 6 deletions(-) diff --git a/wl/ChangeLog b/wl/ChangeLog index de476ea..1cd0478 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,5 +1,8 @@ 2003-08-23 Yuuichi Teranishi + * wl-summary.el (wl-summary-update-persistent-mark): Highlight the + line even when the mark string is not changed. + * wl-thread.el (wl-thread-update-line-on-buffer-sub): Follow the argument change in the wl-summary-create-line. (wl-thread-insert-entity-sub): Ditto. diff --git a/wl/wl-summary.el b/wl/wl-summary.el index cf93d3c..13fb445 100644 --- a/wl/wl-summary.el +++ b/wl/wl-summary.el @@ -2811,11 +2811,11 @@ Return non-nil if the mark is updated" (new-mark (wl-summary-persistent-mark))) (unless (string= new-mark mark) (delete-backward-char 1) - (insert new-mark) - (when wl-summary-highlight - (wl-highlight-summary-current-line)) - (set-buffer-modified-p nil) - t))) + (insert new-mark)) + (when wl-summary-highlight + (wl-highlight-summary-current-line)) + (set-buffer-modified-p nil) + t)) (when wl-summary-highlight (wl-highlight-summary-current-line)) (set-buffer-modified-p nil))) @@ -3148,7 +3148,7 @@ Return non-nil if the mark is updated" (setq line (concat line "\r" (number-to-string - (elmo-msgdb-overview-entity-get-number + (elmo-msgdb-overview-entity-get-number wl-message-entity)))) (if wl-summary-highlight (wl-highlight-summary-line-string line -- 1.7.10.4