diff options
| author | Richard M. Stallman | 1994-07-02 04:49:30 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1994-07-02 04:49:30 +0000 |
| commit | ce37bf2068ca109a3e4dc25c3597de06d9532e21 (patch) | |
| tree | 695fd15f932abfd23d8858a9f2dc8ff8c69e83a1 | |
| parent | 90e6242c9aada0331e329d1ca6e52f9bb4379f39 (diff) | |
| download | emacs-ce37bf2068ca109a3e4dc25c3597de06d9532e21.tar.gz emacs-ce37bf2068ca109a3e4dc25c3597de06d9532e21.zip | |
(vc-update-change-log): Pass a -n option to rcs2log.
| -rw-r--r-- | lisp/vc.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/vc.el b/lisp/vc.el index 1ad1c9a7099..20b660b39b4 100644 --- a/lisp/vc.el +++ b/lisp/vc.el | |||
| @@ -1262,6 +1262,10 @@ From a program, any arguments are passed to the `rcs2log' script." | |||
| 1262 | (message "Computing change log entries... %s" | 1262 | (message "Computing change log entries... %s" |
| 1263 | (if (or (null args) | 1263 | (if (or (null args) |
| 1264 | (eq 0 (apply 'call-process "rcs2log" nil t nil | 1264 | (eq 0 (apply 'call-process "rcs2log" nil t nil |
| 1265 | "-n" | ||
| 1266 | (user-login-name) | ||
| 1267 | (user-full-name) | ||
| 1268 | user-mail-address | ||
| 1265 | (mapcar (function | 1269 | (mapcar (function |
| 1266 | (lambda (f) | 1270 | (lambda (f) |
| 1267 | (file-relative-name | 1271 | (file-relative-name |