From: Stefan Monnier Date: Wed, 21 Nov 2007 20:23:26 +0000 (+0000) Subject: (sh-mode): Set defun-prompt-regexp. X-Git-Tag: emacs-pretest-23.0.90~9591 X-Git-Url: https://code.delx.au/gnu-emacs/commitdiff_plain/b6ddf8d7735083c582d9c354c96ff15b670dd02f (sh-mode): Set defun-prompt-regexp. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 581dfd8423..234d71a68b 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2007-11-21 Stefan Monnier + + * progmodes/sh-script.el (sh-mode): Set defun-prompt-regexp. + 2007-11-21 Vinicius Jose Latorre * ps-print.el (ps-lpr-switches): Docstring fix. @@ -33,8 +37,8 @@ 2007-11-21 Eli Zaretskii - * international/mule-cmds.el (set-locale-environment): Set - default-file-name-coding-system _after_ keyboard and terminal + * international/mule-cmds.el (set-locale-environment): + Set default-file-name-coding-system _after_ keyboard and terminal coding systems. This fixes last change. * mail/rmail.el (rmail-current-subject-regexp): Allow more than @@ -345,8 +349,7 @@ 2007-11-16 Jay Belanger * calc/calc-aent.el (calc-last-user-lang-parse-table): New variable. - (math-build-parse-table): Get parse information from - `math-parse-table'. + (math-build-parse-table): Get parse information from math-parse-table. 2007-11-16 Stefan Monnier diff --git a/lisp/progmodes/sh-script.el b/lisp/progmodes/sh-script.el index 5314bb3b74..1b0bbc14b6 100644 --- a/lisp/progmodes/sh-script.el +++ b/lisp/progmodes/sh-script.el @@ -1524,6 +1524,8 @@ with your script for an edit-interpret-debug cycle." skeleton-filter-function 'sh-feature skeleton-newline-indent-rigidly t sh-indent-supported-here nil) + (set (make-local-variable 'defun-prompt-regexp) + (concat "^\\(function[ \t]\\|[[:alnum:]]+[ \t]+()[ \t]+\\)")) (set (make-local-variable 'parse-sexp-ignore-comments) t) ;; Parse or insert magic number for exec, and set all variables depending ;; on the shell thus determined.