Re: [PATCH 5.005_60] fix @DB::typeahead

To: Mailing list Perl5 <perl5-porters@perl.org>
Message-ID: <19990825161958.A4658@monk.mps.ohio-state.edu>

p4raw-id: //depot/cfgperl@4049

diff --git a/lib/perl5db.pl b/lib/perl5db.pl
index 18d52dc..0eac573 100644 (file)
--- a/lib/perl5db.pl
+++ b/lib/perl5db.pl
@@ -2,7 +2,7 @@ package DB;
 
 # Debugger for Perl 5.00x; perl5db.pl patch level:
 
-$VERSION = 1.0402;
+$VERSION = 1.0403;
 $header = "perl5db.pl version $VERSION";
 
 # Enhanced by ilya@math.ohio-state.edu (Ilya Zakharevich)
@@ -478,7 +478,7 @@ EOP
          if $single & 4;
        $start = $line;
        $incr = -1;             # for backward motion.
-       @typeahead = @$pretype, @typeahead;
+       @typeahead = (@$pretype, @typeahead);
       CMD:
        while (($term || &setterm),
               ($term_pid == $$ or &resetterm),