diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2003-05-18 21:51:01 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2003-05-18 21:51:01 +0000 |
| commit | b5ed9def806edaac3c7865ed5d07190a5b67d1bb (patch) | |
| tree | b21955935437af3090892f3c3cca38ef46f6cdbf | |
| parent | 1d88c1b3cd3ec303029eb5353b6d304b6b96b5a7 (diff) | |
| download | emacs-b5ed9def806edaac3c7865ed5d07190a5b67d1bb.tar.gz | |
(beginning-of-defun-raw): Use shy-group.
| -rw-r--r-- | lisp/emacs-lisp/lisp.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/lisp.el b/lisp/emacs-lisp/lisp.el index ad553e508e9..c6ec7cf5b9e 100644 --- a/lisp/emacs-lisp/lisp.el +++ b/lisp/emacs-lisp/lisp.el @@ -192,7 +192,7 @@ is called as a function to find the defun's beginning." (and (re-search-backward (if defun-prompt-regexp (concat (if open-paren-in-column-0-is-defun-start "^\\s(\\|" "") - "\\(" defun-prompt-regexp "\\)\\s(") + "\\(?:" defun-prompt-regexp "\\)\\s(") "^\\s(") nil 'move (or arg 1)) (progn (goto-char (1- (match-end 0)))) t))) |