From f0d7faabb9d516a7c0a1c86ae693bf3001e07516 Mon Sep 17 00:00:00 2001 From: hmurata Date: Thu, 20 Nov 2003 11:23:22 +0000 Subject: [PATCH] * wl-summary.el (wl-summary-detect-mark-position): Set `wl-summary-buffer-weekday-name-lang'. * modb-standard.el (elmo-msgdb-delete-messages): Dose not process if the message dose not exist. --- elmo/ChangeLog | 5 +++++ elmo/modb-standard.el | 29 +++++++++++++++-------------- wl/ChangeLog | 5 +++++ wl/wl-summary.el | 4 +++- 4 files changed, 28 insertions(+), 15 deletions(-) diff --git a/elmo/ChangeLog b/elmo/ChangeLog index 438dbde..a86990d 100644 --- a/elmo/ChangeLog +++ b/elmo/ChangeLog @@ -1,3 +1,8 @@ +2003-11-20 Hiroya Murata + + * modb-standard.el (elmo-msgdb-delete-messages): Dose not process + if the message dose not exist. + 2003-11-18 Tetsurou Okazaki * elmo-version.el (elmo-version): Up to 2.11.21. diff --git a/elmo/modb-standard.el b/elmo/modb-standard.el index 3b0db5a..412bad6 100644 --- a/elmo/modb-standard.el +++ b/elmo/modb-standard.el @@ -448,20 +448,21 @@ (dolist (number numbers) (setq key (modb-standard-key number) entity (elmo-get-hash-val key entity-map)) - ;; number-list - (setq number-list (delq number number-list)) - ;; entity-map - (elmo-clear-hash-val key entity-map) - (elmo-clear-hash-val (modb-standard-entity-id entity) entity-map) - ;; flag-count (must be BEFORE flag-map) - (modb-standard-countup-flags - msgdb - (modb-standard-message-flags msgdb number) - -1) - ;; flag-map - (elmo-clear-hash-val key flag-map) - (modb-standard-set-message-modified msgdb number) - (modb-standard-set-flag-modified msgdb number)) + (when entity + ;; number-list + (setq number-list (delq number number-list)) + ;; entity-map + (elmo-clear-hash-val key entity-map) + (elmo-clear-hash-val (modb-standard-entity-id entity) entity-map) + ;; flag-count (must be BEFORE flag-map) + (modb-standard-countup-flags + msgdb + (modb-standard-message-flags msgdb number) + -1) + ;; flag-map + (elmo-clear-hash-val key flag-map) + (modb-standard-set-message-modified msgdb number) + (modb-standard-set-flag-modified msgdb number))) (modb-standard-set-number-list-internal msgdb number-list) (modb-standard-set-entity-map-internal msgdb entity-map) (modb-standard-set-flag-map-internal msgdb flag-map))) diff --git a/wl/ChangeLog b/wl/ChangeLog index e0be364..6a299fc 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,3 +1,8 @@ +2003-11-20 Hiroya Murata + + * wl-summary.el (wl-summary-detect-mark-position): Set + `wl-summary-buffer-weekday-name-lang'. + 2003-11-19 Tetsurou Okazaki * wl-summary.el (wl-summary-prefetch-msg): Undo the last change. diff --git a/wl/wl-summary.el b/wl/wl-summary.el index f89ff08..249640c 100644 --- a/wl/wl-summary.el +++ b/wl/wl-summary.el @@ -706,11 +706,13 @@ you." ;; bind only for the check. (wl-summary-new-uncached-mark (char-to-string 201)) (wl-summary-flag-priority-list '(new)) ; ditto. + (lang wl-summary-buffer-weekday-name-lang) wl-summary-highlight temp persistent) (with-temp-buffer (setq wl-summary-buffer-number-column column - wl-summary-buffer-line-formatter formatter) + wl-summary-buffer-line-formatter formatter + wl-summary-buffer-weekday-name-lang lang) (insert (wl-summary-create-line (elmo-msgdb-make-message-entity -- 1.7.10.4