length($') isn't

"foo" =~ /^./; print length $';
     __END__
     i

An ev0l typo that crept in via the 317th subversion. :-)

p5p-msgid: 199704070730.DAA07310@aatma.engin.umich.edu

1 files changed, 1 insertions, 1 deletions

diff --git a/mg.c b/mg.c
index f1dc828029..b6d5afbb1f 100644
--- a/mg.c
+++ b/mg.c
@@ -307,7 +307,7 @@ MAGIC *mg;
 	    if (rx->subend && (s = rx->endp[0])) {
 		i = rx->subend - s;
 		if (i >= 0)
-		    return 0;
+		    return i;
 	    }
 	}
 	return 0;