version 1.185, 2006/10/23 21:09:21
|
version 1.186, 2006/11/04 01:50:31
|
Line 746 sub handler {
|
Line 746 sub handler {
|
if ($env{'form.store'}) { |
if ($env{'form.store'}) { |
&present_editable_metadata($r,$uri,'portfolio'); |
&present_editable_metadata($r,$uri,'portfolio'); |
} else { |
} else { |
&pre_select_course($r,$uri); |
my $fn=&Apache::lonnet::filelocation('',$uri); |
|
%Apache::lonpublisher::metadatafields=(); |
|
%Apache::lonpublisher::metadatakeys=(); |
|
my $result=&Apache::lonnet::getfile($fn); |
|
&Apache::lonpublisher::metaeval($result); |
|
&Apache::lonnet::logthis("restricted is: ".$Apache::lonpublisher::metadatafields{'courserestricted'}); |
|
if (!$Apache::lonpublisher::metadatafields{'courserestricted'}) { |
|
&pre_select_course($r,$uri); |
|
} else { |
|
&present_editable_metadata($r,$uri,'portfolio'); |
|
} |
} |
} |
} elsif ($uri=~m|^/editupload/[^/]+/[^/]+/groups/|) { |
} elsif ($uri=~m|^/editupload/[^/]+/[^/]+/groups/|) { |
$r->print(&Apache::loncommon::start_page('Edit Group Portfolio File Catalog Information', |
$r->print(&Apache::loncommon::start_page('Edit Group Portfolio File Catalog Information', |