(vc-dir-kill-query): Fix thinko.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0205b66ec948703dcb2d70318768269eca0f8216..b07bc8f955f45fc240b827f213cace9d03cd2107 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2008-04-16  Dan Nicolaescu  <dann@ics.uci.edu>
+
+       * vc.el (vc-dir-kill-query): Fix thinko.
+
 2008-04-16  Glenn Morris  <rgm@gnu.org>
 
        * calendar/diary-lib.el (diary-remind): Don't clobber `date' passed

diff --git a/lisp/vc.el b/lisp/vc.el
index cf92102c4c5e646ba280ee31ef734cc6fa1a59bc..9f60590610fbae8e82e24466915ad2fd01bb5b20 100644 (file)
--- a/lisp/vc.el
+++ b/lisp/vc.el
@@ -3160,10 +3160,11 @@ Throw an error if another update process is in progress."
 (defun vc-dir-kill-query ()
   ;; Make sure that when the VC status buffer is killed the update
   ;; process running in background is also killed.
-  (when (vc-dir-busy)
+  (if (vc-dir-busy)
     (when (y-or-n-p "Status update process running, really kill status buffer?")
       (vc-dir-kill-dir-status-process)
-      t)))
+      t)
+    t))
 
 (defun vc-dir-next-line (arg)
   "Go to the next line.