From 4d7ce99c2f1b855e3ea9f7f828ac1d7ceaaa46b4 Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Sun, 15 Feb 1998 00:30:24 +0000
Subject: [PATCH] (sh-font-lock-keywords): Fontify sh-style function names in
 declarations.

---
 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 bc106f82b30..32273e66d1c 100644
--- a/lisp/progmodes/sh-script.el
+++ b/lisp/progmodes/sh-script.el
@@ -609,8 +609,13 @@ See `sh-feature'.")
     (rc eval identity es)
 
     (sh eval sh-append shell
+	;; Variable names.
 	'("\\$\\({#?\\)?\\([A-Za-z_][A-Za-z0-9_]*\\|[-#?@!]\\)" 2
-	  font-lock-variable-name-face))
+	  font-lock-variable-name-face)
+	;; Function names.
+	'("^\\(\\sw+\\)[ \t]*(" 1 font-lock-function-name-face)
+	'("\\<\\(function\\)\\>[ \t]*\\(\\sw+\\)?"
+	  (1 font-lock-keyword-face) (2 font-lock-function-name-face nil t)))
 
     ;; The next entry is only used for defining the others
     (shell eval sh-append executable-font-lock-keywords
-- 
2.39.5