diff options
Diffstat (limited to 'lisp/add-log.el')
| -rw-r--r-- | lisp/add-log.el | 13 |
1 files changed, 11 insertions, 2 deletions
diff --git a/lisp/add-log.el b/lisp/add-log.el index 4b6b3452a9e..546f87b4e4d 100644 --- a/lisp/add-log.el +++ b/lisp/add-log.el @@ -27,6 +27,15 @@ ;; This facility is documented in the Emacs Manual. +;; Todo: + +;; - Find/use/create _MTN/log if there's a _MTN directory. +;; - Find/use/create ++log.* if there's an {arch} directory. +;; - Use an open *VC-Log* or *cvs-commit* buffer if it's related to the +;; source file. +;; - Don't add TAB indents (and username?) if inserting entries in those +;; special places. + ;;; Code: (eval-when-compile @@ -41,7 +50,7 @@ (defcustom change-log-default-name nil - "*Name of a change log file for \\[add-change-log-entry]." + "Name of a change log file for \\[add-change-log-entry]." :type '(choice (const :tag "default" nil) string) :group 'change-log) @@ -1007,7 +1016,7 @@ Has a preference of looking backwards." ((derived-mode-p 'texinfo-mode) (if (re-search-backward "^@node[ \t]+\\([^,\n]+\\)" nil t) (match-string-no-properties 1))) - ((derived-mode-p '(perl-mode cperl-mode)) + ((derived-mode-p 'perl-mode 'cperl-mode) (if (re-search-backward "^sub[ \t]+\\([^({ \t\n]+\\)" nil t) (match-string-no-properties 1))) ;; Emacs's autoconf-mode installs its own |