Mercurial > emacs
changeset 4310:52d82c1a3948
(vc-rcs-status): Removing any trailing "-".
| author | Paul Eggert <eggert@twinsun.com> |
|---|---|
| date | Tue, 27 Jul 1993 19:28:46 +0000 |
| parents | c79a44360ed9 |
| children | aa8690059ff5 |
| files | lisp/vc-hooks.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/vc-hooks.el Tue Jul 27 17:00:08 1993 +0000 +++ b/lisp/vc-hooks.el Tue Jul 27 19:28:46 1993 +0000 @@ -216,7 +216,7 @@ (narrow-to-region (match-beginning 1) (match-end 1)) (goto-char (point-min)) (while (re-search-forward lock-pattern nil t) - (replace-match "-" t t)) + (replace-match (if (eobp) "" "-") t t)) (buffer-string))) (status (if (not (string-equal locks ""))