1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-23 18:47:57 +00:00

(vc-rcs-status): Removing any trailing "-".

This commit is contained in:
Paul Eggert 1993-07-27 19:28:46 +00:00
parent 01567351cf
commit b6ff872167

View File

@ -216,7 +216,7 @@ visiting FILE."
(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 ""))