diff --git a/comp/src/gb.eval.highlight/.src/TextHighlighter_Sh.class b/comp/src/gb.eval.highlight/.src/TextHighlighter_Sh.class
index 8aaa617f4..4e67b5836 100644
--- a/comp/src/gb.eval.highlight/.src/TextHighlighter_Sh.class
+++ b/comp/src/gb.eval.highlight/.src/TextHighlighter_Sh.class
@@ -102,7 +102,7 @@ Public Sub RunWith(sText As String, cKeyword As Collection, cOperator As Collect
         Else If InStr(Trim(sText), "function") = 1 Then
           
           TextHighlighter.Add(State.Keyword, 9)
-          TextHighlighter.Add(State.Function, RInStr(sText, "(") - 10)
+          If InStr(sText,"(") Then TextHighlighter.Add(State.Function, RInStr(sText, "(") - 10)
           Break
 
         Else If sCar = "#" Then