diff options
| author | Ilya Zakharevich <ilya@math.berkeley.edu> | 2001-07-02 02:27:22 -0400 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-07-02 13:21:39 +0000 |
| commit | 1b4321cf375cab8a864370e54ed0c8585d054efc (patch) | |
| tree | 64699dff1aaba6a1a6fd50a8dd06578e6422680a | |
| parent | f5f423e4590905c45492eda1312cb2f76a6ef9a7 (diff) | |
| download | perl-1b4321cf375cab8a864370e54ed0c8585d054efc.tar.gz | |
debugger goof
Message-ID: <20010702062722.A1746@math.ohio-state.edu>
p4raw-id: //depot/perl@11085
| -rw-r--r-- | lib/perl5db.pl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lib/perl5db.pl b/lib/perl5db.pl index 2257e713fa..579bf69835 100644 --- a/lib/perl5db.pl +++ b/lib/perl5db.pl @@ -889,6 +889,7 @@ EOP $i = $end; } else { for (; $i <= $end; $i++) { + my ($stop,$action); ($stop,$action) = split(/\0/, $dbline{$i}) if $dbline{$i}; $arrow = ($i==$line |