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

---
 ChangeLog                   | 5 +++++
 Functions/Misc/zmathfuncdef | 2 +-
 2 files changed, 6 insertions(+), 1 deletion(-)

diff --git a/ChangeLog b/ChangeLog
index 6167880da..d3080ca32 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2006-04-23  Peter Stephenson  <p.w.stephenson@ntlworld.com>
+
+	* unposted: Functions/Misc/zmathfuncdef: improve recognition
+	of parameter expansions.
+
 2006-04-23  Clint Adams  <clint@zsh.org>
 
 	* Francisco Borges: users/10162: updated _aptitude.
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