mirror of https://github.com/moparisthebest/curl
Fix warning "Use of uninitialized value in ...".
If the list has only one item avoid sort subroutine.
This commit is contained in:
parent
74ddbd8a3b
commit
2e17a97474
|
@ -55,6 +55,7 @@ sub pidfromfile {
|
|||
if(open(PIDF, "<$pidfile")) {
|
||||
my $pidline = <PIDF>;
|
||||
close(PIDF);
|
||||
if($pidline) {
|
||||
chomp $pidline;
|
||||
$pidline =~ s/^\s+//;
|
||||
$pidline =~ s/\s+$//;
|
||||
|
@ -64,6 +65,7 @@ sub pidfromfile {
|
|||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
return $pid;
|
||||
}
|
||||
|
||||
|
@ -150,6 +152,13 @@ sub signalpids {
|
|||
if((not defined $signal) || (not defined $pids)) {
|
||||
return;
|
||||
}
|
||||
if($pids !~ /\s+/) {
|
||||
# avoid sorting if only one pid
|
||||
if(checkalivepid($pids) > 0) {
|
||||
kill($signal, $pids);
|
||||
}
|
||||
return;
|
||||
}
|
||||
my $prev = 0;
|
||||
for(sort({$a <=> $b} split(" ", $pids))) {
|
||||
if($_ =~ $pidpattern) {
|
||||
|
|
Loading…
Reference in New Issue