Mercurial > emacs

diff lisp/gnus/message.el @ 105078:40ab4c53d7a6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix typos in condition-case handlers.
author Glenn Morris <rgm@gnu.org>
date Fri, 18 Sep 2009 07:39:56 +0000
parents aa91debbb2f2
children e14dfafc8256
line wrap: on
line diff
--- a/lisp/gnus/message.el	Fri Sep 18 07:25:14 2009 +0000
+++ b/lisp/gnus/message.el	Fri Sep 18 07:39:56 2009 +0000
@@ -3822,9 +3822,8 @@
 			       (>= i ?a)))
 		  (push i lst)
 		  (push (condition-case nil
-			    (progn (format-time-string (format "%%%c" i)
-						       replydate))
-			  (format ">%c<" i))
+			    (format-time-string (format "%%%c" i) replydate)
+			  (error (format ">%c<" i)))
 			lst))
 		(setq i (1+ i)))
 	      (reverse lst)))