|
version 1.401, 2009/10/22 22:25:36
|
version 1.403, 2009/10/23 17:21:03
|
|
Line 2698 sub handler {
|
Line 2698 sub handler {
|
| if ($r->uri=~/^\/adm\/coursedocs\/showdoc\/(.*)$/) { |
if ($r->uri=~/^\/adm\/coursedocs\/showdoc\/(.*)$/) { |
| $showdoc='/'.$1; |
$showdoc='/'.$1; |
| } |
} |
| unless ($showdoc) { # got called from remote |
if ($showdoc) { # got called in sequence from course |
| |
$allowed=0; |
| |
} else { |
| if (($env{'form.folder'}=~/^(?:group|default)_/) || |
if (($env{'form.folder'}=~/^(?:group|default)_/) || |
| ($env{'form.folder'} =~ m:^\d+/(pages|sequences)/:)) { |
($env{'form.folder'} =~ m:^\d+/(pages|sequences)/:)) { |
| $forcestandard = 1; |
$forcestandard = 1; |
|
Line 2709 sub handler {
|
Line 2711 sub handler {
|
| &Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},['cmd']); |
&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},['cmd']); |
| $script=&Apache::lonratedt::editscript('simple'); |
$script=&Apache::lonratedt::editscript('simple'); |
| } |
} |
| } else { # got called in sequence from course |
|
| $allowed=0; |
|
| } |
} |
| |
|
| # subroutine to list form elements |
# subroutine to list form elements |
|
Line 2769 sub create_form_ul {
|
Line 2769 sub create_form_ul {
|
| 'Editing the Table of Contents for your '.$type, |
'Editing the Table of Contents for your '.$type, |
| 'Docs_Adding_Course_Doc') |
'Docs_Adding_Course_Doc') |
| ); |
); |
| |
} elsif ($showdoc) { |
| |
$r->print(&Apache::loncommon::start_page("$type documents",undef, |
| |
{'force_register' => $showdoc,})); |
| } else { |
} else { |
| my $folder=$env{'form.folder'}; |
my $folder=$env{'form.folder'}; |
| if ($folder eq '' || $folder eq 'supplemental') { |
if ($folder eq '' || $folder eq 'supplemental') { |
![[BACK]](/icons/back.gif){kind=icon}
Return to londocs.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface