* wl-summary.el (wl-summary-create-line): Ignore errors while

timezone-fix-time.

diff --git a/wl/ChangeLog b/wl/ChangeLog
index d3d1d3e..5cbdf90 100644 (file)
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,5 +1,8 @@
 2002-05-02  Yuuichi Teranishi  <teranisi@gohome.org>
 
+       * wl-summary.el (wl-summary-create-line): Ignore errors while
+       timezone-fix-time.
+
        * wl-acap.el (wl-acap-create-folder-entity): Bind unbound variable.
 
        * wl-summary.el (wl-summary-sync-update): Ditto.

diff --git a/wl/wl-summary.el b/wl/wl-summary.el
index 1ec0f57..8f8832e 100644 (file)
--- a/wl/wl-summary.el
+++ b/wl/wl-summary.el
@@ -4108,11 +4108,12 @@ If ARG, exit virtual folder."
   (let ((wl-mime-charset wl-summary-buffer-mime-charset)
        (elmo-mime-charset wl-summary-buffer-mime-charset)
        (elmo-lang wl-summary-buffer-weekday-name-lang)
-       (wl-datevec (timezone-fix-time
-                    (elmo-msgdb-overview-entity-get-date 
-                     wl-message-entity)
-                    nil
-                    wl-summary-fix-timezone))
+       (wl-datevec (or (ignore-errors (timezone-fix-time
+                                       (elmo-msgdb-overview-entity-get-date 
+                                        wl-message-entity)
+                                       nil
+                                       wl-summary-fix-timezone))
+                       (make-vector 5 0)))
        line mark)
     (if (and wl-thr-indent-string
             wl-summary-indent-length-limit