diff options
| author | Ola Nilsson | 2019-06-23 23:00:25 +0200 |
|---|---|---|
| committer | Noam Postavsky | 2019-06-27 20:02:54 -0400 |
| commit | fa3af359df8754423a197682d31245ad88c02033 (patch) | |
| tree | 5ffd0dcde08c9709a88d21809eb13de06d86d1ba | |
| parent | bdbb390ffef9f8b4eab263055723b27edad7b91c (diff) | |
| download | emacs-fa3af359df8754423a197682d31245ad88c02033.tar.gz emacs-fa3af359df8754423a197682d31245ad88c02033.zip | |
Allow underscore in defun-prompt-regex names for sh-script
* lisp/progmodes/sh-script.el (defun-prompt-regexp):
Allow underscore in function names.
| -rw-r--r-- | lisp/progmodes/sh-script.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/progmodes/sh-script.el b/lisp/progmodes/sh-script.el index aa6ada96cd4..ae90531a7fe 100644 --- a/lisp/progmodes/sh-script.el +++ b/lisp/progmodes/sh-script.el | |||
| @@ -1625,9 +1625,9 @@ with your script for an edit-interpret-debug cycle." | |||
| 1625 | (setq-local defun-prompt-regexp | 1625 | (setq-local defun-prompt-regexp |
| 1626 | (concat | 1626 | (concat |
| 1627 | "^\\(" | 1627 | "^\\(" |
| 1628 | "\\(function[ \t]\\)?[ \t]*[[:alnum:]]+[ \t]*([ \t]*)" | 1628 | "\\(function[ \t]\\)?[ \t]*[[:alnum:]_]+[ \t]*([ \t]*)" |
| 1629 | "\\|" | 1629 | "\\|" |
| 1630 | "function[ \t]+[[:alnum:]]+[ \t]*\\(([ \t]*)\\)?" | 1630 | "function[ \t]+[[:alnum:]_]+[ \t]*\\(([ \t]*)\\)?" |
| 1631 | "\\)[ \t]*")) | 1631 | "\\)[ \t]*")) |
| 1632 | (setq-local add-log-current-defun-function #'sh-current-defun-name) | 1632 | (setq-local add-log-current-defun-function #'sh-current-defun-name) |
| 1633 | (add-hook 'completion-at-point-functions | 1633 | (add-hook 'completion-at-point-functions |