From: teranisi Date: Wed, 26 Dec 2001 02:26:59 +0000 (+0000) Subject: Fixed last change. X-Git-Tag: wl-2_9_5~58 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=e687a3482091c29ada55e68bf6b05d0faaf24a0d;p=elisp%2Fwanderlust.git Fixed last change. --- diff --git a/elmo/elmo-msgdb.el b/elmo/elmo-msgdb.el index a7d2ffc..a1068dc 100644 --- a/elmo/elmo-msgdb.el +++ b/elmo/elmo-msgdb.el @@ -309,7 +309,7 @@ header separator." (elmo-msgdb-overview-entity-get-cc entity)))) ((or (string= key "since") (string= key "before")) - (let ((field-date (timezone-make-date-sortable + (let ((field-date (elmo-date-make-sortable-string (timezone-fix-time (elmo-msgdb-overview-entity-get-date entity) (current-time-zone) nil))) diff --git a/elmo/elmo-util.el b/elmo/elmo-util.el index 4e50f19..d84d544 100644 --- a/elmo/elmo-util.el +++ b/elmo/elmo-util.el @@ -817,7 +817,7 @@ Return value is a cons cell of (STRUCTURE . REST)" (string-to-int (elmo-filter-value condition))))) ((string= (elmo-filter-key condition) "since") (let* ((date (elmo-date-get-datevec (elmo-filter-value condition))) - (field-date (timezone-make-date-sortable + (field-date (elmo-date-make-sortable-string (timezone-fix-time (std11-field-body "date") (current-time-zone) nil)))