diff options
Diffstat (limited to 'lisp/vc/vc-src.el')
| -rw-r--r-- | lisp/vc/vc-src.el | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/lisp/vc/vc-src.el b/lisp/vc/vc-src.el index faba5bce2b7..b408b7de760 100644 --- a/lisp/vc/vc-src.el +++ b/lisp/vc/vc-src.el @@ -238,7 +238,7 @@ This function differs from vc-do-command in that it invokes `vc-src-program'." (autoload 'vc-switches "vc") (defun vc-src-register (files &optional _comment) - "Register FILES under src. COMMENT is ignored." + "Register FILES under src. COMMENT is ignored." (vc-src-command nil files "add")) (defun vc-src-responsible-p (file) @@ -268,15 +268,16 @@ REV is the revision to check out into WORKFILE." (vc-src-command nil file "co"))) (defun vc-src-revert (file &optional _contents-done) - "Revert FILE to the version it was based on. If FILE is a directory, -revert all registered files beneath it." + "Revert FILE to the version it was based on. +If FILE is a directory, revert all registered files beneath it." (if (file-directory-p file) (mapc #'vc-src-revert (vc-expand-dirs (list file) 'SRC)) (vc-src-command nil file "co"))) (defun vc-src-modify-change-comment (files rev comment) - "Modify the change comments change on FILES on a specified REV. If FILE is a -directory the operation is applied to all registered files beneath it." + "Modify the change comments change on FILES on a specified REV. +If FILE is a directory the operation is applied to all registered +files beneath it." (dolist (file (vc-expand-dirs files 'SRC)) (vc-src-command nil file "amend" "-m" comment rev))) |