From 9b844cfe738ba9dad19d9df3e6ca63e4dba78e61 Mon Sep 17 00:00:00 2001
From: Peter Stephenson <pws@users.sourceforge.net>
Date: Sun, 23 Apr 2006 22:47:01 +0000
Subject: unposted: improve recognition of parameter arguments in zmathfuncdef

---
 Functions/Misc/zmathfuncdef | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'Functions')

diff --git a/Functions/Misc/zmathfuncdef b/Functions/Misc/zmathfuncdef
index 9ecfcdd82..0a099300f 100644
--- a/Functions/Misc/zmathfuncdef
+++ b/Functions/Misc/zmathfuncdef
@@ -23,7 +23,7 @@ integer iarg=0 ioptarg
 local body=$2
 
 # count compulsory arguments
-while [[ $body = *'$'$((iarg+1))(|[^[:digit:]]*) ]]; do
+while [[ $body = *'$'(\{|)$((iarg+1))(|[^:[:digit:]]*) ]]; do
   (( iarg++ ))
 done
 
-- 
cgit 1.4.1