(gnus-thread-latest-date): Move condition-case to

the right place.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d7b7ad9..658885e 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2003-07-17  Jesper Harder  <harder@ifa.au.dk>
+
+       * gnus-sum.el (gnus-thread-latest-date): Move condition-case to
+       the right place.
+
 2003-07-14  Simon Josefsson  <jas@extundo.com>
 
        * mail-source.el (mail-source-fetch-imap): Don't assume

diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index 3aec0ee..7374fa2 100644 (file)
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -4525,10 +4525,10 @@ Unscored articles will be counted as having a score of zero."
           (mapcar
            (lambda (header)
              (setq previous-time
-                   (time-to-seconds
-                    (condition-case ()
-                        (mail-header-parse-date (mail-header-date header))
-                      (error previous-time)))))
+                   (condition-case ()
+                       (time-to-seconds (mail-header-parse-date
+                                         (mail-header-date header)))
+                     (error previous-time))))
            (sort
             (message-flatten-list thread)
             (lambda (h1 h2)