Return to lonnavmaps.pm CVS log | Up to [LON-CAPA] / loncom / interface |
version 1.488, 2012/10/04 15:28:51 | version 1.489, 2012/10/12 13:48:50 |
---|---|
Line 4413 sub resprintable { | Line 4413 sub resprintable { |
my $partsref = $self->parts(); | my $partsref = $self->parts(); |
my @parts = @$partsref; | my @parts = @$partsref; |
if ((!defined(@parts)) || (scalar(@parts) == 0)) { | if (!@parts) { |
return $self->printable(0); | return $self->printable(0); |
} else { | } else { |
foreach my $part (@parts) { | foreach my $part (@parts) { |