diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2009-08-19 19:55:58 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2009-08-19 19:55:58 +0000 |
| commit | 31764e153f533f25e36586e0606395cfe77fac39 (patch) | |
| tree | ad1745ef07a753f1da330399356721a3a09672f9 /lisp/log-edit.el | |
| parent | 4fd15622e64cceb41dab27e0ffcfdcb8c4090861 (diff) | |
| download | emacs-31764e153f533f25e36586e0606395cfe77fac39.tar.gz | |
* log-edit.el (log-edit-strip-single-file-name): New var.
(log-edit-insert-changelog): Use it.
Diffstat (limited to 'lisp/log-edit.el')
| -rw-r--r-- | lisp/log-edit.el | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/log-edit.el b/lisp/log-edit.el index 4ca13726c07..a9816ea6649 100644 --- a/lisp/log-edit.el +++ b/lisp/log-edit.el @@ -148,6 +148,10 @@ can be obtained from `log-edit-files'." :type '(hook :options (log-edit-set-common-indentation log-edit-add-to-changelog))) +(defcustom log-edit-strip-single-file-name t + "If non-nil, remove file name from single-file log entries." + :type 'boolean) + (defvar cvs-changelog-full-paragraphs t) (make-obsolete-variable 'cvs-changelog-full-paragraphs 'log-edit-changelog-full-paragraphs @@ -521,7 +525,7 @@ regardless of user name or time." (log-edit-insert-changelog-entries (log-edit-files))) (log-edit-set-common-indentation) (goto-char (point-min)) - (when (looking-at "\\*\\s-+") + (when (and log-edit-strip-single-file-name (looking-at "\\*\\s-+")) (forward-line 1) (when (not (re-search-forward "^\\*\\s-+" nil t)) (goto-char (point-min)) |