diff options
| author | Markus Rost | 2003-12-24 23:18:10 +0000 |
|---|---|---|
| committer | Markus Rost | 2003-12-24 23:18:10 +0000 |
| commit | 3c85843f331a4b773ab32e4a05739b589863bcd0 (patch) | |
| tree | 25f894355f115287a1f7dacedd96c3c7a975c942 | |
| parent | 7862d3a8e94744c913d4ece779c6e76e8f6d31db (diff) | |
| download | emacs-3c85843f331a4b773ab32e4a05739b589863bcd0.tar.gz emacs-3c85843f331a4b773ab32e4a05739b589863bcd0.zip | |
(vc-dired-purge): Avoid error from `kill-line'.
| -rw-r--r-- | lisp/vc.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/vc.el b/lisp/vc.el index 4ee27391003..b015d56c87f 100644 --- a/lisp/vc.el +++ b/lisp/vc.el | |||
| @@ -7,7 +7,7 @@ | |||
| 7 | ;; Maintainer: Andre Spiegel <spiegel@gnu.org> | 7 | ;; Maintainer: Andre Spiegel <spiegel@gnu.org> |
| 8 | ;; Keywords: tools | 8 | ;; Keywords: tools |
| 9 | 9 | ||
| 10 | ;; $Id: vc.el,v 1.359 2003/07/06 19:08:13 jpw Exp $ | 10 | ;; $Id: vc.el,v 1.360 2003/09/01 15:45:17 miles Exp $ |
| 11 | 11 | ||
| 12 | ;; This file is part of GNU Emacs. | 12 | ;; This file is part of GNU Emacs. |
| 13 | 13 | ||
| @@ -2144,7 +2144,7 @@ Called by dired after any portion of a vc-dired buffer has been read in." | |||
| 2144 | ;; We cannot remove the top level directory. | 2144 | ;; We cannot remove the top level directory. |
| 2145 | ;; Just make it look a little nicer. | 2145 | ;; Just make it look a little nicer. |
| 2146 | (forward-line 1) | 2146 | (forward-line 1) |
| 2147 | (kill-line) | 2147 | (or (eobp) (kill-line)) |
| 2148 | (if (not (dired-next-subdir 1 t)) | 2148 | (if (not (dired-next-subdir 1 t)) |
| 2149 | (goto-char (point-max)))))) | 2149 | (goto-char (point-max)))))) |
| 2150 | (goto-char (point-min))) | 2150 | (goto-char (point-min))) |