On Wed Jul 16 13:02:26 2008, tye.mcqueen@gmail.com wrote: > This is a bug report for perl from tyemq@cpan.org, > generated with the help of perlbug 1.35 running under perl v5.8.7. > > > ----------------------------------------------------------------- > [Please enter your report here] > > In the Perl debugger, the command "o warn=0 die=0" does nothing > useful. > > This bug also applies to the latest 5.010 Perl I could conveniently > find > on http://search.cpan.org/. > > Here is a fix: > > --- 5.8.7/perl5db.pl 2005-09-27 10:45:51 -0700 > +++ tye/perl5db.pl 2008-07-16 12:52:18 -0700 > @@ -7703,6 +7703,8 @@ > } > elsif ($prevwarn) { > $SIG{__WARN__} = $prevwarn; > + } else { > + undef $SIG{__WARN__}; > } > } ## end if (@_) > $warnLevel; > @@ -7744,6 +7746,9 @@ > elsif ($prevdie) { > $SIG{__DIE__} = $prevdie; > print $OUT "Default die handler restored.\n"; > + } else { > + undef $SIG{__DIE__}; > + print $OUT "Die handler removed.\n"; > } > } ## end if (@_) > $dieLevel; > > [Please do not change anything below this line] > ----------------------------------------------------------------- Thanks for the bug report/patch. Can you also provide an example of where it doesn't behave as you expected? Kind regards, BramThread Previous