version 1.18, 2002/09/04 19:24:46
|
version 1.22, 2002/09/10 19:01:09
|
Line 232 sub handler {
|
Line 232 sub handler {
|
my $script=''; |
my $script=''; |
my $allowed; |
my $allowed; |
my $events=''; |
my $events=''; |
|
my $showdoc=0; |
&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'}, |
&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'}, |
['folder','foldername','showdoc']); |
['folder','foldername']); |
unless ($ENV{'form.showdoc'}) { # got called from remote |
if ($r->uri=~/^\/adm\/coursedocs\/showdoc\/(.*)$/) { |
|
$showdoc=$1; |
|
} |
|
unless ($showdoc) { # got called from remote |
$forcestandard=($ENV{'form.folder'}=~/^default_/); |
$forcestandard=($ENV{'form.folder'}=~/^default_/); |
$forcesupplement=($ENV{'form.folder'}=~/^supplemental_/); |
$forcesupplement=($ENV{'form.folder'}=~/^supplemental_/); |
|
|
Line 246 sub handler {
|
Line 250 sub handler {
|
} |
} |
} else { # got called in sequence from course |
} else { # got called in sequence from course |
$allowed=0; |
$allowed=0; |
$forcestandard=1; |
$script='</script>'.&Apache::lonxml::registerurl(1,undef).'<script>'; |
$forcesupplement=0; |
|
$script=&Apache::lonxml::registerurl(1,undef); |
|
$events='onLoad="'.&Apache::lonxml::loadevents. |
$events='onLoad="'.&Apache::lonxml::loadevents. |
'" onUnload="'.&Apache::lonxml::unloadevents.'"'; |
'" onUnload="'.&Apache::lonxml::unloadevents.'"'; |
} |
} |
Line 268 sub handler {
|
Line 270 sub handler {
|
|
|
$iconpath = $r->dir_config('lonIconsURL') . "/"; |
$iconpath = $r->dir_config('lonIconsURL') . "/"; |
|
|
|
my $now=time; |
|
|
# print screen |
# print screen |
$r->print(<<ENDDOCUMENT); |
$r->print(<<ENDDOCUMENT); |
<html> |
<html> |
Line 275 sub handler {
|
Line 279 sub handler {
|
<title>The LearningOnline Network with CAPA</title> |
<title>The LearningOnline Network with CAPA</title> |
<script> |
<script> |
$script |
$script |
|
</script> |
|
ENDDOCUMENT |
|
if ($allowed) { |
|
$r->print(<<ENDNEWSCRIPT); |
|
<script> |
function makenewfolder(targetform,folderseq) { |
function makenewfolder(targetform,folderseq) { |
var foldername=prompt('Name of New Folder','New Folder'); |
var foldername=prompt('Name of New Folder','New Folder'); |
if (foldername) { |
if (foldername) { |
Line 289 function makenewext(targetname) {
|
Line 297 function makenewext(targetname) {
|
window.open('/adm/rat/extpickframe.html'); |
window.open('/adm/rat/extpickframe.html'); |
} |
} |
|
|
|
function makesmppage() { |
|
var title=prompt('Listed Title for the Page'); |
|
this.document.forms.newsmppg.importdetail.value= |
|
title+'=/adm/$udom/$uname/$now/smppg'; |
|
this.document.forms.newsmppg.submit(); |
|
} |
|
|
|
function makebulboard() { |
|
var title=prompt('Listed Title for the Bulletin Board'); |
|
this.document.forms.newbul.importdetail.value= |
|
title+'=/adm/$udom/$uname/$now/bulletinboard'; |
|
this.document.forms.newbul.submit(); |
|
} |
|
|
function finishpick() { |
function finishpick() { |
var title=this.document.forms.extimport.title.value; |
var title=this.document.forms.extimport.title.value; |
var url=this.document.forms.extimport.url.value; |
var url=this.document.forms.extimport.url.value; |
Line 298 function finishpick() {
|
Line 320 function finishpick() {
|
'";this.document.forms.'+form+'.submit();'); |
'";this.document.forms.'+form+'.submit();'); |
} |
} |
</script> |
</script> |
</head> |
ENDNEWSCRIPT |
ENDDOCUMENT |
} |
$r->print(&Apache::loncommon::bodytag('Course Documents','',$events)); |
# -------------------------------------------------------------------- Body tag |
|
$r->print('</head>'. |
|
&Apache::loncommon::bodytag('Course Documents','',$events)); |
|
unless ($showdoc) { |
# --------------------------------------------------------- Standard documents |
# --------------------------------------------------------- Standard documents |
if (($standard) && ($allowed) && (!$forcesupplement)) { |
if (($standard) && ($allowed) && (!$forcesupplement)) { |
$r->print('<h2>Main Course Documents</h2>'); |
$r->print('<h2>Main Course Documents</h2>'); |
Line 361 value="Syllabus=/public/$coursedom/$cour
|
Line 386 value="Syllabus=/public/$coursedom/$cour
|
<input name="newsyl" type="submit" value="Syllabus" /> |
<input name="newsyl" type="submit" value="Syllabus" /> |
</form> |
</form> |
<form action="/adm/coursedocs" method="post" name="newnav"> |
<form action="/adm/coursedocs" method="post" name="newnav"> |
|
<input type="hidden" name="folder" value="$folder"> |
|
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
<input type=hidden name="importdetail" |
<input type=hidden name="importdetail" |
value="Navigate Content=/adm/navmaps"> |
value="Navigate Content=/adm/navmaps"> |
<input name="newsyl" type="submit" value="Navigate Content" /> |
<input name="newnav" type="submit" value="Navigate Content" /> |
|
</form> |
|
<form action="/adm/coursedocs" method="post" name="newsmppg"> |
|
<input type="hidden" name="folder" value="$folder"> |
|
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
|
<input type=hidden name="importdetail" value=""> |
|
<input name="newsmppg" type="button" value="Simple Page" |
|
onClick="javascript:makesmppage();" /> |
|
</form> |
|
<form action="/adm/coursedocs" method="post" name="newbul"> |
|
<input type="hidden" name="folder" value="$folder"> |
|
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
|
<input type=hidden name="importdetail" value=""> |
|
<input name="newbulletin" type="button" value="Bulletin Board" |
|
onClick="javascript:makebulboard();" /> |
</form> |
</form> |
<form action="/adm/coursedocs" method="post" name="newaboutme"> |
<form action="/adm/coursedocs" method="post" name="newaboutme"> |
<input type="hidden" name="folder" value="$folder"> |
<input type="hidden" name="folder" value="$folder"> |
Line 454 ENDSUPFORM
|
Line 495 ENDSUPFORM
|
if ($allowed) { |
if ($allowed) { |
$r->print('<form name="extimport"><input type="hidden" name="title"><input type="hidden" name="url"><input type="hidden" name="useform"></form>'); |
$r->print('<form name="extimport"><input type="hidden" name="title"><input type="hidden" name="url"><input type="hidden" name="useform"></form>'); |
} |
} |
$r->print('</body></html>'); |
} else { |
return OK; |
# -------------------------------------------------------- This is showdoc mode |
|
$r->print("<h1>Uploaded Document</h1><p>It is recommended that you use an up-to-date virus scanner before handling this file.</p><p><table>". |
|
&entryline(0,"Click to download or use your browser's Save Link function",$showdoc).'</table></p>'); |
|
} |
|
$r->print('</body></html>'); |
|
return OK; |
} |
} |
|
|
1; |
1; |