From e687a3482091c29ada55e68bf6b05d0faaf24a0d Mon Sep 17 00:00:00 2001 From: teranisi Date: Wed, 26 Dec 2001 02:26:59 +0000 Subject: [PATCH] Fixed last change. --- elmo/elmo-msgdb.el | 2 +- elmo/elmo-util.el | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) 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))) -- 1.7.10.4