From fa3af359df8754423a197682d31245ad88c02033 Mon Sep 17 00:00:00 2001 From: Ola Nilsson Date: Sun, 23 Jun 2019 23:00:25 +0200 Subject: [PATCH] Allow underscore in defun-prompt-regex names for sh-script * lisp/progmodes/sh-script.el (defun-prompt-regexp): Allow underscore in function names. --- lisp/progmodes/sh-script.el | 4 ++-- 1 file 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." (setq-local defun-prompt-regexp (concat "^\\(" - "\\(function[ \t]\\)?[ \t]*[[:alnum:]]+[ \t]*([ \t]*)" + "\\(function[ \t]\\)?[ \t]*[[:alnum:]_]+[ \t]*([ \t]*)" "\\|" - "function[ \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 -- 2.39.2