aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorStefan Monnier2007-06-22 18:37:46 +0000
committerStefan Monnier2007-06-22 18:37:46 +0000
commit2ef3b3fe29833531e057ffc74fb586f0e50c1ca5 (patch)
treea9124d416deaae36a281f9e98c219322109973da
parent11a4edc2288a6edb94d3d5ea0f7bae2c9d492df6 (diff)
downloademacs-2ef3b3fe29833531e057ffc74fb586f0e50c1ca5.tar.gz
emacs-2ef3b3fe29833531e057ffc74fb586f0e50c1ca5.zip
Add docstrings.
-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 @@
132 (concat "^\\(?:Working file: \\(?1:.+\\)" ;RCS and CVS. 132 (concat "^\\(?:Working file: \\(?1:.+\\)" ;RCS and CVS.
133 ;; Subversion has no such thing?? 133 ;; Subversion has no such thing??
134 "\\|\\(?:SCCS/s\\.\\|Changes to \\)\\(?1:.+\\):" ;SCCS and Darcs. 134 "\\|\\(?:SCCS/s\\.\\|Changes to \\)\\(?1:.+\\):" ;SCCS and Darcs.
135 "\\)\n")) ;Include the \n for font-lock reasons. 135 "\\)\n") ;Include the \n for font-lock reasons.
136 "Regexp matching the text identifying the file.
137The match group number 1 should match the file name itself.")
136 138
137(defvar log-view-message-re 139(defvar log-view-message-re
138 (concat "^\\(?:revision \\(?1:[.0-9]+\\)\\(?:\t.*\\)?" ; RCS and CVS. 140 (concat "^\\(?:revision \\(?1:[.0-9]+\\)\\(?:\t.*\\)?" ; RCS and CVS.
@@ -147,7 +149,9 @@
147 (concat "\\|[^ \n].*[^0-9\n][0-9][0-9]:[0-9][0-9][^0-9\n].*[^ \n]" 149 (concat "\\|[^ \n].*[^0-9\n][0-9][0-9]:[0-9][0-9][^0-9\n].*[^ \n]"
148 ;;Email of user and finally Msg, used as revision name. 150 ;;Email of user and finally Msg, used as revision name.
149 " .*@.*\n\\(?: \\* \\(?1:.*\\)\\)?") 151 " .*@.*\n\\(?: \\* \\(?1:.*\\)\\)?")
150 "\\)$")) 152 "\\)$")
153 "Regexp matching the text identifying a revision.
154The match group number 1 should match the revision number itself.")
151 155
152(defvar log-view-font-lock-keywords 156(defvar log-view-font-lock-keywords
153 ;; We use `eval' so as to use the buffer-local value of log-view-file-re 157 ;; We use `eval' so as to use the buffer-local value of log-view-file-re