# HG changeset patch # User Richard M. Stallman # Date 894779596 0 # Node ID 307fdd89bb4229286c6832a6069e0bd5fbecc314 # Parent 3ace0ce90a3ff24f540e24bfb933c49fff3b7cee (add-log-current-defun): Fix previous change--skip tab and newline also. diff -r 3ace0ce90a3f -r 307fdd89bb42 lisp/add-log.el --- a/lisp/add-log.el Sun May 10 03:50:03 1998 +0000 +++ b/lisp/add-log.el Sun May 10 05:53:16 1998 +0000 @@ -503,7 +503,7 @@ (forward-sexp 1) ;; The second element is usually a symbol being defined. ;; If it is not, use the first symbol in it. - (skip-chars-forward " '(") + (skip-chars-forward " \tx\n'(") (buffer-substring (point) (progn (forward-sexp 1) (point)))))