version 1.69.2.1, 2003/07/24 22:06:07
|
version 1.69.2.1.2.3, 2003/09/02 18:31:08
|
Line 265 END
|
Line 265 END
|
} |
} |
} |
} |
$url=~s/^http\&colon\;\/\//\/adm\/wrapper\/ext\//; |
$url=~s/^http\&colon\;\/\//\/adm\/wrapper\/ext\//; |
if ($residx) { |
if (($residx) && ($folder!~/supplemental/)) { |
$url.=(($url=~/\?/)?'&':'?').'symb='. |
$url.=(($url=~/\?/)?'&':'?').'symb='. |
&Apache::lonnet::escape(&Apache::lonnet::symbclean( |
&Apache::lonnet::escape(&Apache::lonnet::symbclean( |
&Apache::lonnet::declutter('uploaded/'. |
&Apache::lonnet::declutter('uploaded/'. |
Line 411 sub handler {
|
Line 411 sub handler {
|
} |
} |
} |
} |
&untiehash(); |
&untiehash(); |
|
$r->print('<h1>Done.</h1>'); |
} elsif ($ENV{'form.versions'}) { |
} elsif ($ENV{'form.versions'}) { |
$r->print('<html><head><title>Check Versions</title></head>'. |
$r->print('<html><head><title>Check Versions</title></head>'. |
&Apache::loncommon::bodytag('Check Course Document Versions')); |
&Apache::loncommon::bodytag('Check Course Document Versions')); |
Line 498 ENDHEADERS
|
Line 499 ENDHEADERS
|
} |
} |
} |
} |
$r->print('</table>'); |
$r->print('</table>'); |
|
$r->print('<h1>Done.</h1>'); |
} else { |
} else { |
$r->print('<p>No content modifications yet.</p>'); |
$r->print('<p>No content modifications yet.</p>'); |
} |
} |
Line 511 ENDHEADERS
|
Line 513 ENDHEADERS
|
my $script=''; |
my $script=''; |
my $allowed; |
my $allowed; |
my $events=''; |
my $events=''; |
my $buttons=''; |
|
my $showdoc=0; |
my $showdoc=0; |
&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'}, |
&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'}, |
['folder','foldername']); |
['folder','foldername']); |
Line 533 ENDHEADERS
|
Line 534 ENDHEADERS
|
$script='</script>'.&Apache::lonmenu::registerurl(1,undef).'<script>'; |
$script='</script>'.&Apache::lonmenu::registerurl(1,undef).'<script>'; |
$events='onLoad="'.&Apache::lonmenu::loadevents. |
$events='onLoad="'.&Apache::lonmenu::loadevents. |
'" onUnload="'.&Apache::lonmenu::unloadevents.'"'; |
'" onUnload="'.&Apache::lonmenu::unloadevents.'"'; |
$buttons=&Apache::lonmenu::menubuttons(1,undef); |
|
} |
} |
|
|
# get course data |
# get course data |
Line 646 ENDNEWSCRIPT
|
Line 646 ENDNEWSCRIPT
|
} |
} |
# -------------------------------------------------------------------- Body tag |
# -------------------------------------------------------------------- Body tag |
$r->print('</head>'. |
$r->print('</head>'. |
&Apache::loncommon::bodytag('Course Documents','',$events). |
&Apache::loncommon::bodytag('Course Documents','',$events, |
$buttons); |
'','',$showdoc)); |
unless ($showdoc) { |
unless ($showdoc) { |
if ($allowed) { |
if ($allowed) { |
$r->print(&Apache::loncommon::help_open_topic('Docs_Adding_Course_Doc', |
$r->print(&Apache::loncommon::help_open_topic('Docs_Adding_Course_Doc', |