Mercurial > hg > xemacs-beta

diff lisp/vm/vm-save.el @ 24:4103f0995bd7 r19-15b95

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b95
author cvs
date Mon, 13 Aug 2007 08:51:03 +0200
parents 859a2309aef8
children 441bb1e64a06
line wrap: on
line diff
--- a/lisp/vm/vm-save.el	Mon Aug 13 08:50:31 2007 +0200
+++ b/lisp/vm/vm-save.el	Mon Aug 13 08:51:03 2007 +0200
@@ -35,7 +35,8 @@
 	(let (header alist tuple-list)
 	  (setq alist auto-folder-alist)
 	  (while alist
-	    (setq header (vm-get-header-contents (car mp) (car (car alist))))
+	    (setq header (vm-get-header-contents (car mp) (car (car alist))
+						 ", "))
 	    (if (null header)
 		()
 	      (setq tuple-list (cdr (car alist)))