Commit 418d645c authored by Gerd Moellmann's avatar Gerd Moellmann
Browse files

(beginning-of-defun-raw): Add regexp

matching open parenthesis in column 0 to defun-prompt-regexp
only if open-paren-in-column-0-is-defun-start is set.
parent 7973e637
......@@ -173,7 +173,8 @@ is called as a function to find the defun's beginning."
(funcall beginning-of-defun-function)
(and arg (< arg 0) (not (eobp)) (forward-char 1))
(and (re-search-backward (if defun-prompt-regexp
(concat "^\\s(\\|"
(concat (if open-paren-in-column-0-is-defun-start
"^\\s(\\|" "")
"\\(" defun-prompt-regexp "\\)\\s(")
"^\\s(")
nil 'move (or arg 1))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment