Mercurial > emacs

changeset 53283:019243f7a304

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(vc-dired-purge): Avoid error from `kill-line'.
author Markus Rost <rost@math.uni-bielefeld.de>
date Wed, 24 Dec 2003 23:18:10 +0000
parents f800e307fc39
children a67847ca63dd
files lisp/vc.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/vc.el	Wed Dec 24 16:46:28 2003 +0000
+++ b/lisp/vc.el	Wed Dec 24 23:18:10 2003 +0000
@@ -7,7 +7,7 @@
 ;; Maintainer: Andre Spiegel <spiegel@gnu.org>
 ;; Keywords: tools
 
-;; $Id: vc.el,v 1.359 2003/07/06 19:08:13 jpw Exp $
+;; $Id: vc.el,v 1.360 2003/09/01 15:45:17 miles Exp $
 
 ;; This file is part of GNU Emacs.
 
@@ -2144,7 +2144,7 @@
 	;; We cannot remove the top level directory.
 	;; Just make it look a little nicer.
 	(forward-line 1)
-	(kill-line)
+	(or (eobp) (kill-line))
 	(if (not (dired-next-subdir 1 t))
 	    (goto-char (point-max))))))
   (goto-char (point-min)))