diff options
| author | Richard M. Stallman | 1998-05-10 05:53:16 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1998-05-10 05:53:16 +0000 |
| commit | f731e2ff424e6ef4870b8c417a225b906bf5509a (patch) | |
| tree | 336c72d1fd055c35a056471a7b5135038a3e57fc | |
| parent | 1cdb6e7c67365a04db3e8da50b7b3d8e91dbb477 (diff) | |
| download | emacs-f731e2ff424e6ef4870b8c417a225b906bf5509a.tar.gz emacs-f731e2ff424e6ef4870b8c417a225b906bf5509a.zip | |
(add-log-current-defun): Fix previous change--skip
tab and newline also.
| -rw-r--r-- | lisp/add-log.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/add-log.el b/lisp/add-log.el index 6d762cec01c..bde35a63b43 100644 --- a/lisp/add-log.el +++ b/lisp/add-log.el | |||
| @@ -503,7 +503,7 @@ Has a preference of looking backwards." | |||
| 503 | (forward-sexp 1) | 503 | (forward-sexp 1) |
| 504 | ;; The second element is usually a symbol being defined. | 504 | ;; The second element is usually a symbol being defined. |
| 505 | ;; If it is not, use the first symbol in it. | 505 | ;; If it is not, use the first symbol in it. |
| 506 | (skip-chars-forward " '(") | 506 | (skip-chars-forward " \tx\n'(") |
| 507 | (buffer-substring (point) | 507 | (buffer-substring (point) |
| 508 | (progn (forward-sexp 1) | 508 | (progn (forward-sexp 1) |
| 509 | (point))))) | 509 | (point))))) |