Группа :: Разработка/Perl
Пакет: perl-File-Pid
Главная Изменения Спек Патчи Sources Загрузить Gear Bugs and FR Repocop
Патч: File-Pid-1.01-RT-18960-Fixed-using-of-uninitialized-value.patch
Скачать
Скачать
--- File-Pid-1.01/lib/File/Pid.pm.orig 2005-01-11 14:09:54.000000000 +0100
+++ File-Pid-1.01/lib/File/Pid.pm 2011-02-04 18:28:50.000000000 +0100
@@ -119,7 +119,7 @@
sub running {
my $self = shift;
- my $pid = $self->_get_pid_from_file;
+ my $pid = $self->_get_pid_from_file or return undef;
return kill(0, $pid)
? $pid