summaryrefslogtreecommitdiff
path: root/lisp/log-view.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2007-06-22 18:37:46 +0000
committerStefan Monnier <monnier@iro.umontreal.ca>2007-06-22 18:37:46 +0000
commit8d0488df935ed0c9c801249356faa52eb320065b (patch)
tree0ea160f39e93acea3900e0c7889d8cfc8b9a5e58 /lisp/log-view.el
parent5440421e8980bfb9ccc12f4d3f67a08b700aad60 (diff)
downloademacs-8d0488df935ed0c9c801249356faa52eb320065b.tar.gz
Add docstrings.
Diffstat (limited to 'lisp/log-view.el')
-rw-r--r--lisp/log-view.el8
1 files changed, 6 insertions, 2 deletions
diff --git a/lisp/log-view.el b/lisp/log-view.el
index 5962c216624..eff24771dd5 100644
--- a/lisp/log-view.el
+++ b/lisp/log-view.el
@@ -132,7 +132,9 @@
(concat "^\\(?:Working file: \\(?1:.+\\)" ;RCS and CVS.
;; Subversion has no such thing??
"\\|\\(?:SCCS/s\\.\\|Changes to \\)\\(?1:.+\\):" ;SCCS and Darcs.
- "\\)\n")) ;Include the \n for font-lock reasons.
+ "\\)\n") ;Include the \n for font-lock reasons.
+ "Regexp matching the text identifying the file.
+The match group number 1 should match the file name itself.")
(defvar log-view-message-re
(concat "^\\(?:revision \\(?1:[.0-9]+\\)\\(?:\t.*\\)?" ; RCS and CVS.
@@ -147,7 +149,9 @@
(concat "\\|[^ \n].*[^0-9\n][0-9][0-9]:[0-9][0-9][^0-9\n].*[^ \n]"
;;Email of user and finally Msg, used as revision name.
" .*@.*\n\\(?: \\* \\(?1:.*\\)\\)?")
- "\\)$"))
+ "\\)$")
+ "Regexp matching the text identifying a revision.
+The match group number 1 should match the revision number itself.")
(defvar log-view-font-lock-keywords
;; We use `eval' so as to use the buffer-local value of log-view-file-re