version 1.352, 2005/12/02 23:06:02
|
version 1.353, 2005/12/05 19:30:22
|
Line 2640 sub getResourceByUrl {
|
Line 2640 sub getResourceByUrl {
|
if (ref($resUrl)) { return $resUrl; } |
if (ref($resUrl)) { return $resUrl; } |
|
|
$resUrl = &Apache::lonnet::clutter($resUrl); |
$resUrl = &Apache::lonnet::clutter($resUrl); |
if (defined($multiple)) { |
|
if ($multiple) { |
|
my @resIds = $self->{NAV_HASH}->{'ids_' . $resUrl}; |
|
} |
|
} |
|
my $resId = $self->{NAV_HASH}->{'ids_' . $resUrl}; |
my $resId = $self->{NAV_HASH}->{'ids_' . $resUrl}; |
if (!$resId) { return ''; } |
if (!$resId) { return ''; } |
if ($multiple) { |
if ($multiple) { |
my @resources = (); |
my @resources = (); |
my @resIds = split (/,/, $resId); |
my @resIds = split (/,/, $resId); |
foreach my $id (@resIds) { |
foreach my $id (@resIds) { |
if ($id) { |
my $resourceId = $self->getById($id); |
push(@resources,$self->getById($id)); |
if ($resourceId) { |
|
push(@resources,$resourceId); |
} |
} |
} |
} |
return @resources; |
return @resources; |