diff lisp/vm/vm-delete.el @ 100:4be1180a9e89 r20-1b2

Import from CVS: tag r20-1b2
author cvs
date Mon, 13 Aug 2007 09:15:11 +0200
parents 0d2f883870bc
children a145efe76779
line wrap: on
line diff
--- a/lisp/vm/vm-delete.el	Mon Aug 13 09:13:58 2007 +0200
+++ b/lisp/vm/vm-delete.el	Mon Aug 13 09:15:11 2007 +0200
@@ -147,7 +147,7 @@
 	(t (setq arg 0)))
   (if vm-move-after-killing
       (let ((vm-circular-folders (and vm-circular-folders
-				      (eq vm-move-after-deleting t))))
+				      (eq vm-move-after-killing t))))
 	(vm-next-message arg t executing-kbd-macro))))
 
 (defun vm-expunge-folder (&optional shaddap)