From: Mark A. Hershberger Date: Sun, 12 Jun 2005 23:04:41 +0000 (+0000) Subject: Remove stray paren in defun-prompt-regexp for cperl-mode X-Git-Tag: emacs-pretest-22.0.90~9019 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=defa8e19a1824a1dda823acbe67d1bba972d31c0;p=emacs.git Remove stray paren in defun-prompt-regexp for cperl-mode --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 089682cb588..4f2cf271fe2 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2005-06-12 Mark A. Hershberger + + * progmodes/cperl-mode.el (cperl-mode): Remove stray paren in + defun-prompt-regexp. + 2005-06-12 Eli Zaretskii * loadup.el: Don't say we are dumping under 2 names on windows-nt diff --git a/lisp/progmodes/cperl-mode.el b/lisp/progmodes/cperl-mode.el index 85c86bfb6f3..355b9694189 100644 --- a/lisp/progmodes/cperl-mode.el +++ b/lisp/progmodes/cperl-mode.el @@ -1481,7 +1481,7 @@ or as help on variables `cperl-tips', `cperl-problems', (make-local-variable 'comment-start-skip) (setq comment-start-skip "#+ *") (make-local-variable 'defun-prompt-regexp) - (setq defun-prompt-regexp "^[ \t]*sub[ \t\n]+\\([^ \t\n{(;]+\\)\\([ \t\n]*([^()]*)[ \t\n]*\\)?[ \t\n]*)") + (setq defun-prompt-regexp "^[ \t]*sub[ \t\n]+\\([^ \t\n{(;]+\\)\\([ \t\n]*([^()]*)[ \t\n]*\\)?[ \t\n]*") (make-local-variable 'comment-indent-function) (setq comment-indent-function 'cperl-comment-indent) (make-local-variable 'parse-sexp-ignore-comments)