diff options
| author | Richard M. Stallman <rms@gnu.org> | 2004-03-12 10:12:14 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 2004-03-12 10:12:14 +0000 |
| commit | cd07ee902842e21c1d37aaf1e31cf45fbe65e143 (patch) | |
| tree | b061921780bf11b35b49ebe8a278163c65ae9f21 /lisp/pcvs.el | |
| parent | 74ce1b11e972aa2e8b7fa7ffc2f5761ea32c65d8 (diff) | |
| download | emacs-cd07ee902842e21c1d37aaf1e31cf45fbe65e143.tar.gz | |
(cvs-mode-add-change-log-entry-other-window): Fix minor bug.
Diffstat (limited to 'lisp/pcvs.el')
| -rw-r--r-- | lisp/pcvs.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/pcvs.el b/lisp/pcvs.el index eea0e541043..a7683ce371e 100644 --- a/lisp/pcvs.el +++ b/lisp/pcvs.el @@ -2115,8 +2115,8 @@ With prefix argument, prompt for cvs flags." "Add a ChangeLog entry in the ChangeLog of the current directory." (interactive) (dolist (fi (cvs-mode-marked nil nil)) - (let ((default-directory (cvs-expand-dir-name (cvs-fileinfo->dir fi))) - (buffer-file-name (expand-file-name (cvs-fileinfo->file fi)))) + (let* ((default-directory (cvs-expand-dir-name (cvs-fileinfo->dir fi))) + (buffer-file-name (expand-file-name (cvs-fileinfo->file fi)))) (kill-local-variable 'change-log-default-name) (save-excursion (add-change-log-entry-other-window))))) |