From 92da657e8503e884e22e1a60e674679d72c92da4 Mon Sep 17 00:00:00 2001
From: Bart Schaefer <barts@users.sourceforge.net>
Date: Tue, 26 Apr 2005 16:23:57 +0000
Subject: 21195 fix for 21170

---
 Src/pattern.c | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'Src')

diff --git a/Src/pattern.c b/Src/pattern.c
index 1033c776f..ed88bb7ce 100644
--- a/Src/pattern.c
+++ b/Src/pattern.c
@@ -1552,8 +1552,10 @@ pattryrefs(Patprog prog, char *string, int stringlen, int unmetalen,
 	*nump = 0;
     }
     /* inherited from domatch, but why, exactly? */
-    if (*string == Nularg)
+    if (*string == Nularg) {
 	string++;
+	unmetalen--;
+    }
 
     if (stringlen < 0)
 	stringlen = strlen(string);
-- 
cgit 1.4.1