Mercurial > emacs
comparison lisp/add-log.el @ 6309:9217f29851c2
Don't use triple-hyphen in a character class.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Sat, 12 Mar 1994 00:23:12 +0000 |
| parents | 4507b4972c4a |
| children | 0541a368505c |
comparison
equal
deleted
inserted
replaced
| 6308:f34deea7dc2c | 6309:9217f29851c2 |
|---|---|
| 282 (let ((paragraph-separate (concat paragraph-separate "\\|^\\s *\\s(")) | 282 (let ((paragraph-separate (concat paragraph-separate "\\|^\\s *\\s(")) |
| 283 (paragraph-start (concat paragraph-start "\\|^\\s *\\s("))) | 283 (paragraph-start (concat paragraph-start "\\|^\\s *\\s("))) |
| 284 (fill-paragraph justify))) | 284 (fill-paragraph justify))) |
| 285 | 285 |
| 286 (defvar add-log-current-defun-header-regexp | 286 (defvar add-log-current-defun-header-regexp |
| 287 "^\\([A-Z][A-Z_ ]*[A-Z_]\\|[a-z_---A-Z]+\\)[ \t]*[:=]" | 287 "^\\([A-Z][A-Z_ ]*[A-Z_]\\|[-_a-zA-Z]+\\)[ \t]*[:=]" |
| 288 "*Heuristic regexp used by `add-log-current-defun' for unknown major modes.") | 288 "*Heuristic regexp used by `add-log-current-defun' for unknown major modes.") |
| 289 | 289 |
| 290 (defun add-log-current-defun () | 290 (defun add-log-current-defun () |
| 291 "Return name of function definition point is in, or nil. | 291 "Return name of function definition point is in, or nil. |
| 292 | 292 |