disabling a signal handler isn't done by using undef

This commit is contained in:
ian%hixie.ch 2003-03-15 15:07:34 +00:00
Родитель a7bb820a34
Коммит 6f34ba8bd5
1 изменённых файлов: 1 добавлений и 1 удалений

Просмотреть файл

@ -190,7 +190,7 @@ sub report {
my($exception, @data) = @_;
syntaxError "Syntax error in \"report\": \"$exception\" is not a PLIF::Exception class", 1 unless UNIVERSAL::isa($exception, __PACKAGE__);
$exception = $exception->init(@data);
local $SIG{__WARN__} = undef; # don't want this warning going through our processor
local $SIG{__WARN__} = 'DEFAULT'; # don't want this warning going through our processor
warn $exception;
return $exception;
}