|
version 1.224, 2009/01/15 18:31:11
|
version 1.225, 2009/01/27 15:59:30
|
|
Line 762 sub handler {
|
Line 762 sub handler {
|
| } elsif ($uri=~m|^/editupload/[^/]+/[^/]+/portfolio/|) { |
} elsif ($uri=~m|^/editupload/[^/]+/[^/]+/portfolio/|) { |
| ($resdomain,$resuser)= |
($resdomain,$resuser)= |
| (&Apache::lonnet::declutter($uri)=~m|^($match_domain)/($match_name)/portfolio|); |
(&Apache::lonnet::declutter($uri)=~m|^($match_domain)/($match_name)/portfolio|); |
| $r->print(&Apache::loncommon::start_page('Edit Portfolio File Catalog Information', |
$r->print(&Apache::loncommon::start_page('Edit Portfolio File Metadata', |
| undef, |
undef, |
| {'domain' => $resdomain,})); |
{'domain' => $resdomain,})); |
| if ($env{'form.store'}) { |
if ($env{'form.store'}) { |
|
Line 781 sub handler {
|
Line 781 sub handler {
|
| } |
} |
| } |
} |
| } 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 Metadata', |
| undef, |
undef, |
| {'domain' => $resdomain,})); |
{'domain' => $resdomain,})); |
| &present_editable_metadata($r,$uri,'groups'); |
&present_editable_metadata($r,$uri,'groups'); |
| } elsif ($uri=~m|^/~|) { |
} elsif ($uri=~m|^/~|) { |
| # Construction space |
# Construction space |
| $r->print(&Apache::loncommon::start_page('Edit Catalog Information', |
$r->print(&Apache::loncommon::start_page('Edit Metadata', |
| "\n".'<script type="text/javascript">'."\n". |
"\n".'<script type="text/javascript">'."\n". |
| &Apache::loncommon::browser_and_searcher_javascript(). |
&Apache::loncommon::browser_and_searcher_javascript(). |
| "\n".'</script>', |
"\n".'</script>', |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonmeta.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface