diff options
| -rw-r--r-- | lisp/progmodes/sh-script.el | 7 |
1 files changed, 6 insertions, 1 deletions
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." | |||
| 1661 | (setq-local skeleton-filter-function 'sh-feature) | 1661 | (setq-local skeleton-filter-function 'sh-feature) |
| 1662 | (setq-local skeleton-newline-indent-rigidly t) | 1662 | (setq-local skeleton-newline-indent-rigidly t) |
| 1663 | (setq-local defun-prompt-regexp | 1663 | (setq-local defun-prompt-regexp |
| 1664 | (concat "^\\(function[ \t]\\|[[:alnum:]]+[ \t]+()[ \t]+\\)")) | 1664 | (concat |
| 1665 | "^\\(" | ||
| 1666 | "\\(function[ \t]\\)?[ \t]*[[:alnum:]]+[ \t]*([ \t]*)" | ||
| 1667 | "\\|" | ||
| 1668 | "function[ \t]+[[:alnum:]]+[ \t]*\\(([ \t]*)\\)?" | ||
| 1669 | "\\)[ \t]*")) | ||
| 1665 | (setq-local add-log-current-defun-function #'sh-current-defun-name) | 1670 | (setq-local add-log-current-defun-function #'sh-current-defun-name) |
| 1666 | (add-hook 'completion-at-point-functions | 1671 | (add-hook 'completion-at-point-functions |
| 1667 | #'sh-completion-at-point-function nil t) | 1672 | #'sh-completion-at-point-function nil t) |