(cvs-mode-add-change-log-entry-other-window): Fix minor bug.
This commit is contained in:
parent
74ce1b11e9
commit
cd07ee9028
1 changed files with 2 additions and 2 deletions
|
@ -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)))))
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue