aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/ChangeLog2
-rw-r--r--lisp/log-edit.el16
2 files changed, 9 insertions, 9 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0b845dd1205..b09b479b76d 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
12010-03-24 Glenn Morris <rgm@gnu.org> 12010-03-24 Glenn Morris <rgm@gnu.org>
2 2
3 * log-edit.el (log-edit-before-checkin-process): Doc fix.
4
3 * cedet/semantic/bovine/c.el (semantic-c-describe-environment): 5 * cedet/semantic/bovine/c.el (semantic-c-describe-environment):
4 Consistently check ede-object is bound throughout. 6 Consistently check ede-object is bound throughout.
5 7
diff --git a/lisp/log-edit.el b/lisp/log-edit.el
index 57f79bd4b13..09dce0eb859 100644
--- a/lisp/log-edit.el
+++ b/lisp/log-edit.el
@@ -191,22 +191,20 @@ when this variable is set to 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
196The format is: (REGEXP . INSTRUCTIONS). 195The format is: (REGEXP . INSTRUCTIONS).
196All lines matching REGEXP are removed. For example:
197 197
198All lines matching REGEXP are removed. 198\(\"^#.*\" . nil)
199
200For example:
201 199
202(\"^#.*\" . nil)
203means: just remove all lines starting with #. This can be used 200means: just remove all lines starting with #. This can be used
204to insert lines in the commit buffer that contain, for example, the 201to insert lines in the commit buffer that contain, for example, the
205list of files to be committed. 202list of files to be committed.
206 203
207(\"Author: \\(.*\\)\" . (list \"--author\" (match-string 1))) 204\(\"Author: \\\\(.*\\\\)\" . (list \"--author\" (match-string 1)))
208means: append (list \"--author\" (match-string 1)) to 205
209`log-edit-extra-flags'.") 206means: 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