mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-25 10:47:00 +00:00
Code Issues Releases Activity

(vc-dired-purge): Avoid error from `kill-line'.

Browse Source
This commit is contained in:
Markus Rost 2003-12-24 23:18:10 +00:00
parent 7862d3a8e9
commit 3c85843f33
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/vc.el
View File

@ -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 @@ Called by dired after any portion of a vc-dired buffer has been read in."
;; 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)))