From 62417cc93fa623269d060d8b3800f5a56316638d Mon Sep 17 00:00:00 2001
From: Steve Peters <steve@fisharerojo.org>
Date: Mon, 8 May 2006 18:46:16 +0000
Subject: Version bump and typo fix from change #28125. p4raw-link: @28125 on
 //depot/perl: eb67bf7e7c7791f145451e273b36c197fb24fcb9

p4raw-id: //depot/perl@28126
---
 lib/Text/Balanced.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lib/Text/Balanced.pm b/lib/Text/Balanced.pm
index 383ecf6b55..9688de7957 100644
--- a/lib/Text/Balanced.pm
+++ b/lib/Text/Balanced.pm
@@ -9,7 +9,7 @@ package Text::Balanced;
 use Exporter;
 use vars qw { $VERSION @ISA %EXPORT_TAGS };
 
-$VERSION = '1.97';
+$VERSION = '1.98_01';
 @ISA		= qw ( Exporter );
 		     
 %EXPORT_TAGS	= ( ALL => [ qw(
@@ -64,7 +64,7 @@ sub _succeed
 	$@ = undef;
 	my ($wantarray,$textref) = splice @_, 0, 2;
 	my ($extrapos, $extralen) = @_>18 ? splice(@_, -2, 2) : (0,0);
-	my ($startlen, $oppos) = $_[5];
+	my ($startlen) = $_[5];
         my $oppos = $_[6];
 	my $remainderpos = $_[2];
 	if ($wantarray)
-- 
cgit v1.2.1