From c817549b520ce3b10a949f00fcabf8a3a62697ae Mon Sep 17 00:00:00 2001 From: Carlos Pita Date: Tue, 23 Feb 2016 22:15:00 +1100 Subject: [PATCH] Allow more shell script defun forms * lisp/progmodes/sh-script.el (sh-mode): Allow more shell script defun forms, like function name () {...} (bug#19754). --- lisp/progmodes/sh-script.el | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/progmodes/sh-script.el b/lisp/progmodes/sh-script.el index 7f89ab2762c..5f29bb64f05 100644 --- a/lisp/progmodes/sh-script.el +++ b/lisp/progmodes/sh-script.el @@ -1661,7 +1661,12 @@ with your script for an edit-interpret-debug cycle." (setq-local skeleton-filter-function 'sh-feature) (setq-local skeleton-newline-indent-rigidly t) (setq-local defun-prompt-regexp - (concat "^\\(function[ \t]\\|[[:alnum:]]+[ \t]+()[ \t]+\\)")) + (concat + "^\\(" + "\\(function[ \t]\\)?[ \t]*[[:alnum:]]+[ \t]*([ \t]*)" + "\\|" + "function[ \t]+[[:alnum:]]+[ \t]*\\(([ \t]*)\\)?" + "\\)[ \t]*")) (setq-local add-log-current-defun-function #'sh-current-defun-name) (add-hook 'completion-at-point-functions #'sh-completion-at-point-function nil t) -- 2.39.5