diff lisp/vm/vm-summary.el @ 30:ec9a17fef872 r19-15b98

Import from CVS: tag r19-15b98
author cvs
date Mon, 13 Aug 2007 08:52:29 +0200
parents 441bb1e64a06
children 05472e90ae02
line wrap: on
line diff
--- a/lisp/vm/vm-summary.el	Mon Aug 13 08:51:58 2007 +0200
+++ b/lisp/vm/vm-summary.el	Mon Aug 13 08:52:29 2007 +0200
@@ -201,10 +201,10 @@
 		  ;; what we want.
 		  ;;
 		  ;; 1. We need to avoid having the su-start-of
-		  ;;    and su-end-of market clumping together at
+		  ;;    and su-end-of markers clumping together at
 		  ;;    the start position.
 		  ;;
-		  ;; 2. We want the window point market (w->pointm
+		  ;; 2. We want the window point marker (w->pointm
 		  ;;    in the Emacs display code) to move to the
 		  ;;    start of the summary entry if it is
 		  ;;    anywhere within the su-start-of to
@@ -735,7 +735,8 @@
       (vm-set-year-of m (substring date (match-beginning 5) (match-end 5)))
       (if (match-beginning 6)
 	  (vm-set-zone-of m (substring date (match-beginning 6)
-				       (match-end 6)))))
+				       (match-end 6)))
+	(vm-set-zone-of m "")))
      (t
       (setq vector (vm-parse-date date))
       (vm-set-weekday-of m (elt vector 0))