diff options
| author | Stefan Monnier | 2007-06-22 18:37:46 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2007-06-22 18:37:46 +0000 |
| commit | 2ef3b3fe29833531e057ffc74fb586f0e50c1ca5 (patch) | |
| tree | a9124d416deaae36a281f9e98c219322109973da | |
| parent | 11a4edc2288a6edb94d3d5ea0f7bae2c9d492df6 (diff) | |
| download | emacs-2ef3b3fe29833531e057ffc74fb586f0e50c1ca5.tar.gz emacs-2ef3b3fe29833531e057ffc74fb586f0e50c1ca5.zip | |
Add docstrings.
| -rw-r--r-- | lisp/log-view.el | 8 |
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. | ||
| 137 | The 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. | ||
| 154 | The 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 |