Mercurial > emacs
comparison lisp/log-edit.el @ 107482:1161bde4ebd6
* log-edit.el (log-edit-before-checkin-process): Doc fix.
author | Glenn Morris <rgm@gnu.org> |
---|---|
date | Tue, 23 Mar 2010 20:27:24 -0700 |
parents | 1918e70c8b37 |
children | 17d3324f96dd |
comparison
equal
deleted
inserted
replaced
107481:2630a1cf07ac | 107482:1161bde4ebd6 |
---|---|
189 (defvar log-edit-diff-function nil) | 189 (defvar log-edit-diff-function nil) |
190 (defvar log-edit-listfun nil) | 190 (defvar log-edit-listfun nil) |
191 (defvar log-edit-extra-flags nil | 191 (defvar log-edit-extra-flags nil |
192 "List of extra flags to pass to the check in command.") | 192 "List of extra flags to pass to the check in command.") |
193 (defvar log-edit-before-checkin-process nil | 193 (defvar log-edit-before-checkin-process nil |
194 "Alist that contains instructions for processing the commit message before check in. | 194 "Alist with instructions for processing the commit message before check in. |
195 | |
196 The format is: (REGEXP . INSTRUCTIONS). | 195 The format is: (REGEXP . INSTRUCTIONS). |
197 | 196 All lines matching REGEXP are removed. For example: |
198 All lines matching REGEXP are removed. | 197 |
199 | 198 \(\"^#.*\" . nil) |
200 For example: | 199 |
201 | |
202 (\"^#.*\" . nil) | |
203 means: just remove all lines starting with #. This can be used | 200 means: just remove all lines starting with #. This can be used |
204 to insert lines in the commit buffer that contain, for example, the | 201 to insert lines in the commit buffer that contain, for example, the |
205 list of files to be committed. | 202 list of files to be committed. |
206 | 203 |
207 (\"Author: \\(.*\\)\" . (list \"--author\" (match-string 1))) | 204 \(\"Author: \\\\(.*\\\\)\" . (list \"--author\" (match-string 1))) |
208 means: append (list \"--author\" (match-string 1)) to | 205 |
209 `log-edit-extra-flags'.") | 206 means: append (list \"--author\" (match-string 1)) to `log-edit-extra-flags'.") |
207 | |
210 (defvar log-edit-parent-buffer nil) | 208 (defvar log-edit-parent-buffer nil) |
211 | 209 |
212 ;;; Originally taken from VC-Log mode | 210 ;;; Originally taken from VC-Log mode |
213 | 211 |
214 (defconst log-edit-maximum-comment-ring-size 32 | 212 (defconst log-edit-maximum-comment-ring-size 32 |