version 1.29, 2003/05/03 21:09:03
|
version 1.30, 2003/07/01 21:10:43
|
Line 144 sub start_displayweight {
|
Line 144 sub start_displayweight {
|
} else { |
} else { |
my @parts=&multipart($ENV{'request.uri'}); |
my @parts=&multipart($ENV{'request.uri'}); |
my $weight; |
my $weight; |
foreach my $part (@parts) { |
if (@parts) { |
my $pweight=&Apache::lonnet::EXT("resource.$part.weight"); |
foreach my $part (@parts) { |
if (!defined($pweight) || ($pweight eq '')) { $pweight=1; } |
my $pweight=&Apache::lonnet::EXT("resource.$part.weight"); |
$weight+=$pweight; |
if (!defined($pweight) || ($pweight eq '')) { $pweight=1; } |
|
$weight+=$pweight; |
|
} |
|
} else { |
|
$weight = &Apache::lonnet::EXT("resource.$id.weight"); |
|
if (!defined($weight) || ($weight eq '')) { $weight=1; } |
} |
} |
$result=$weight; |
$result=$weight; |
} |
} |