version 1.52, 2003/04/30 21:09:12
|
version 1.78, 2003/09/15 15:24:18
|
Line 35 use Apache::loncommon;
|
Line 35 use Apache::loncommon;
|
use Apache::lonratedt; |
use Apache::lonratedt; |
use Apache::lonratsrv; |
use Apache::lonratsrv; |
use Apache::lonxml; |
use Apache::lonxml; |
|
use Apache::loncreatecourse; |
use HTML::Entities; |
use HTML::Entities; |
use GDBM_File; |
use GDBM_File; |
|
|
Line 72 sub storemap {
|
Line 73 sub storemap {
|
$map,1); |
$map,1); |
} |
} |
|
|
|
# ----------------------------------------- Return hash with valid author names |
|
|
|
sub authorhosts { |
|
my %outhash=(); |
|
my $home=0; |
|
my $other=0; |
|
foreach (keys %ENV) { |
|
if ($_=~/^user\.role\.(au|ca)\.(.+)$/) { |
|
my $role=$1; |
|
my $realm=$2; |
|
my ($start,$end)=split(/\./,$ENV{$_}); |
|
if (($start) && ($start>time)) { next; } |
|
if (($end) && (time>$end)) { next; } |
|
my $ca; my $cd; |
|
if ($1 eq 'au') { |
|
$ca=$ENV{'user.name'}; |
|
$cd=$ENV{'user.domain'}; |
|
} else { |
|
($cd,$ca)=($realm=~/^\/(\w+)\/(\w+)$/); |
|
} |
|
if (&Apache::lonnet::homeserver($ca,$cd) eq |
|
$Apache::lonnet::perlvar{'lonHostID'}) { |
|
$home++; |
|
$outhash{'home_'.$ca.'@'.$cd}=1; |
|
} else { |
|
$outhash{'otherhome_'.$ca.'@'.$cd}= |
|
&Apache::lonnet::homeserver($ca,$cd); |
|
$other++; |
|
} |
|
} |
|
} |
|
return ($home,$other,%outhash); |
|
} |
|
# ------------------------------------------------------ Generate "dump" button |
|
|
|
sub dumpbutton { |
|
my ($home,$other,%outhash)=&authorhosts(); |
|
if ($home+$other==0) { return ''; } |
|
my $output='</td><td bgcolor="#DDDDCC">'; |
|
if ($home) { |
|
return '</td><td bgcolor="#DDDDCC">'. |
|
'<input type="submit" name="dumpcourse" value="Dump Course DOCS to Construction Space" />'; |
|
} else { |
|
return'</td><td bgcolor="#DDDDCC">'. |
|
'Dump Course DOCS to Construction Space: available on other servers'; |
|
} |
|
} |
|
|
|
# -------------------------------------------------------- Actually dump course |
|
|
|
sub dumpcourse { |
|
my $r=shift; |
|
$r->print('<html><head><title>Dump DOCS</title></head>'. |
|
&Apache::loncommon::bodytag('Dump Course DOCS to Construction Space'). |
|
'<form name="dumpdoc" method="post">'); |
|
my ($home,$other,%outhash)=&authorhosts(); |
|
unless ($home) { return ''; } |
|
my $origcrsid=$ENV{'request.course.id'}; |
|
my %origcrsdata=&Apache::lonnet::coursedescription($origcrsid); |
|
if (($ENV{'form.authorspace'}) && ($ENV{'form.authorfolder'}=~/\w/)) { |
|
# Do the dumping |
|
unless ($outhash{'home_'.$ENV{'form.authorspace'}}) { return ''; } |
|
my ($ca,$cd)=split(/\@/,$ENV{'form.authorspace'}); |
|
my $title=$ENV{'form.authorfolder'}; |
|
|
|
} else { |
|
# Input form |
|
unless ($home==1) { |
|
$r->print( |
|
'<h3>Select the Construction Space</h3><select name="authorspace">'); |
|
} |
|
foreach (sort keys %outhash) { |
|
if ($_=~/^home_(.+)$/) { |
|
if ($home==1) { |
|
$r->print( |
|
'<input type="hidden" name="authorspace" value="'.$1.'" />'); |
|
} else { |
|
$r->print('<option value="'.$1.'">'.$_.'</option>'); |
|
} |
|
} |
|
} |
|
unless ($home==1) { |
|
$r->print('</select>'); |
|
} |
|
my $title=$origcrsdata{'description'}; |
|
$title=~s/\s+/\_/gs; |
|
$title=~s/\W//gs; |
|
$r->print('<h3>Folder in Construction Space</h3><input type="text" size="50" name="authorfolder" value="'.$title.'" /><br />'); |
|
&tiehash(); |
|
$r->print('<h3>Filenames in Construction Space</h3><table border="2"><tr><th>Internal Filename</th><th>Title</th><th>Save as ...</th></tr>'); |
|
foreach (&Apache::loncreatecourse::crsdirlist($origcrsid,'userfiles')) { |
|
$r->print('<tr><td>'.$_.'</td>'); |
|
my ($ext)=($_=~/\.(\w+)$/); |
|
my $title=$hash{'title_'.$hash{ |
|
'ids_/uploaded/'.$origcrsdata{'domain'}.'/'.$origcrsdata{'num'}.'/'.$_}}; |
|
$r->print('<td>'.($title?$title:' ').'</td>'); |
|
unless ($title) { |
|
$title=$_; |
|
} |
|
$title=~s/\.(\w+)$//; |
|
$title=~s/\W+/\_/gs; |
|
$title.='.'.$ext; |
|
$r->print("\n<td><input type='text' size='60' name='".$_."' value='".$title."' /></td></tr>\n"); |
|
} |
|
$r->print("</table>\n"); |
|
&untiehash(); |
|
$r->print( |
|
'<p><input type="submit" name="dumpcourse" value="Dump Course DOCS" /></p></form>'); |
|
} |
|
} |
|
|
|
|
|
# Imports the given (name, url) resources into the course |
|
# coursenum, coursedom, and folder must precede the list |
|
sub group_import { |
|
my $coursenum = shift; |
|
my $coursedom = shift; |
|
my $folder = shift; |
|
while (@_) { |
|
my $name = shift; |
|
my $url = shift; |
|
if ($url) { |
|
my $idx = $#Apache::lonratedt::resources + 1; |
|
$Apache::lonratedt::order[$#Apache::lonratedt::order+1]=$idx; |
|
my $ext = 'false'; |
|
if ($url=~/^http:\/\//) { $ext = 'true'; } |
|
$url =~ s/:/\:/g; |
|
$name =~ s/:/\:/g; |
|
$Apache::lonratedt::resources[$idx] = |
|
join ':', ($name, $url, $ext, 'normal', 'res'); |
|
} |
|
} |
|
&storemap($coursenum, $coursedom, $folder); |
|
} |
|
|
sub editor { |
sub editor { |
my ($r,$coursenum,$coursedom,$folder,$allowed)=@_; |
my ($r,$coursenum,$coursedom,$folder,$allowed)=@_; |
if ($ENV{'form.foldername'}) { |
if ($ENV{'form.foldername'}) { |
Line 158 sub editor {
|
Line 294 sub editor {
|
} |
} |
# Group import/search |
# Group import/search |
if ($ENV{'form.importdetail'}) { |
if ($ENV{'form.importdetail'}) { |
foreach (split(/\&/,$ENV{'form.importdetail'})) { |
my @imports; |
if (defined($_)) { |
foreach (split(/\&/,$ENV{'form.importdetail'})) { |
my ($name,$url)=split(/\=/,$_); |
if (defined($_)) { |
$name=&Apache::lonnet::unescape($name); |
my ($name,$url)=split(/\=/,$_); |
$url=&Apache::lonnet::unescape($url); |
$name=&Apache::lonnet::unescape($name); |
if ($url) { |
$url=&Apache::lonnet::unescape($url); |
my $idx=$#Apache::lonratedt::resources+1; |
push @imports, $name, $url; |
$Apache::lonratedt::order |
} |
[$#Apache::lonratedt::order+1]=$idx; |
} |
my $ext='false'; |
|
if ($url=~/^http\:\/\//) { $ext='true'; } |
|
$url=~s/\:/\:/g; |
|
$name=~s/\:/\:/g; |
|
$Apache::lonratedt::resources[$idx]= |
|
$name.':'.$url.':'.$ext.':normal:res'; |
|
} |
|
} |
|
} |
|
# Store the changed version |
# Store the changed version |
&storemap($coursenum,$coursedom,$folder.'.sequence'); |
group_import($coursenum, $coursedom, $folder, @imports); |
} |
} |
|
# Loading a complete map |
|
if (($ENV{'form.importmap'}) && ($ENV{'form.loadmap'})) { |
|
foreach |
|
(&Apache::lonsequence::attemptread(&Apache::lonnet::filelocation('',$ENV{'form.importmap'}))) { |
|
my $idx=$#Apache::lonratedt::resources; |
|
$idx++; |
|
$Apache::lonratedt::resources[$idx]=$_; |
|
$Apache::lonratedt::order |
|
[$#Apache::lonratedt::order+1]=$idx; |
|
} |
|
|
|
# Store the changed version |
|
&storemap($coursenum,$coursedom,$folder.'.sequence'); |
|
} |
} |
} |
# ---------------------------------------------------------------- End commands |
# ---------------------------------------------------------------- End commands |
# ---------------------------------------------------------------- Print screen |
# ---------------------------------------------------------------- Print screen |
Line 218 sub entryline {
|
Line 359 sub entryline {
|
# Edit commands |
# Edit commands |
if ($allowed) { |
if ($allowed) { |
$line.=(<<END); |
$line.=(<<END); |
<td><table border='0' cellspacing='0' cellpadding='0'> |
<td><table border='0' cellspacing='2' cellpadding='0'> |
<tr><td><a href='/adm/coursedocs?folder=$folder&cmd=up_$index'> |
<tr><td bgcolor="#DDDDDD"> |
|
<a href='/adm/coursedocs?folder=$folder&cmd=up_$index'> |
<img src="${iconpath}move_up.gif" alt='UP' border='0' /></a></td></tr> |
<img src="${iconpath}move_up.gif" alt='UP' border='0' /></a></td></tr> |
<tr><td><a href='/adm/coursedocs?folder=$folder&cmd=down_$index'> |
<tr><td bgcolor="#DDDDDD"> |
|
<a href='/adm/coursedocs?folder=$folder&cmd=down_$index'> |
<img src="${iconpath}move_down.gif" alt='DOWN' border='0' /></a></td></tr> |
<img src="${iconpath}move_down.gif" alt='DOWN' border='0' /></a></td></tr> |
</table></td><td> |
</table></td><td bgcolor="#DDDDDD"> |
<a href='/adm/coursedocs?folder=$folder&cmd=del_$index'> |
<a href='javascript:removeres("$folder","$index","$renametitle");'> |
<font size="-2">Remove</font></a> |
<font size="-2" color="#990000">Remove</font></a> |
<a href='javascript:changename("$folder","$index","$renametitle");'> |
<a href='javascript:changename("$folder","$index","$renametitle");'> |
<font size="-2">Rename</font></a></td> |
<font size="-2" color="#009900">Rename</font></a></td> |
END |
END |
} |
} |
# Figure out what kind of a resource this is |
# Figure out what kind of a resource this is |
Line 249 END
|
Line 392 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 313 sub checkonthis {
|
Line 456 sub checkonthis {
|
$r->print(' '); |
$r->print(' '); |
} |
} |
$r->print('- Rendering: '); |
$r->print('- Rendering: '); |
|
my $oldpath=$ENV{'request.filename'}; |
|
$ENV{'request.filename'}=&Apache::lonnet::filelocation('',$url); |
&Apache::lonxml::xmlparse($r,'web', |
&Apache::lonxml::xmlparse($r,'web', |
&Apache::lonnet::getfile( |
&Apache::lonnet::getfile( |
&Apache::lonnet::filelocation('',$url))); |
&Apache::lonnet::filelocation('',$url))); |
|
$ENV{'request.filename'}=$oldpath; |
if (($Apache::lonxml::errorcount) || |
if (($Apache::lonxml::errorcount) || |
($Apache::lonxml::warningcount)) { |
($Apache::lonxml::warningcount)) { |
if ($Apache::lonxml::errorcount) { |
if ($Apache::lonxml::errorcount) { |
Line 349 sub checkonthis {
|
Line 495 sub checkonthis {
|
} |
} |
} |
} |
|
|
# ================================================================ Main Handler |
|
sub handler { |
|
my $r = shift; |
|
$r->content_type('text/html'); |
|
$r->send_http_header; |
|
return OK if $r->header_only; |
|
|
|
# --------------------------------------------- Initialize help topics for this |
|
foreach ('Adding_Course_Doc','Main_Course_Documents', |
|
'Adding_External_Resource','Navigate_Content', |
|
'Adding_Folders','Docs_Overview', |
|
'Creating_From_Template','Supplemental', |
|
'Importing_LON-CAPA_Resource','Uploading_From_Harddrive') { |
|
$help{$_}=&Apache::loncommon::help_open_topic('Docs_'.$_); |
|
} |
|
|
|
if ($ENV{'form.verify'}) { |
# |
|
# -------------------------------------------------------------- Verify Content |
|
# |
|
sub verifycontent { |
|
my $r=shift; |
my $loaderror=&Apache::lonnet::overloaderror($r); |
my $loaderror=&Apache::lonnet::overloaderror($r); |
if ($loaderror) { return $loaderror; } |
if ($loaderror) { return $loaderror; } |
|
|
Line 382 sub handler {
|
Line 516 sub handler {
|
} |
} |
} |
} |
&untiehash(); |
&untiehash(); |
} elsif ($ENV{'form.versions'}) { |
$r->print('<h1>Done.</h1>'); |
$r->print('<html><head><title>Check Versions</title></head>'. |
} |
|
|
|
# -------------------------------------------------------------- Check Versions |
|
|
|
sub checkversions { |
|
my $r=shift; |
|
$r->print('<html><head><title>Check Versions</title></head>'. |
&Apache::loncommon::bodytag('Check Course Document Versions')); |
&Apache::loncommon::bodytag('Check Course Document Versions')); |
$hashtied=0; |
$hashtied=0; |
&tiehash(); |
&tiehash(); |
Line 416 sub handler {
|
Line 556 sub handler {
|
$seltext='since yesterday ('.localtime($starttime).')'; |
$seltext='since yesterday ('.localtime($starttime).')'; |
$daysel='selected'; |
$daysel='selected'; |
} |
} |
|
|
$r->print(<<ENDHEADERS); |
$r->print(<<ENDHEADERS); |
<form action="/adm/coursedocs" method="post"> |
<form action="/adm/coursedocs" method="post"> |
<select name="timerange"> |
<select name="timerange"> |
Line 469 ENDHEADERS
|
Line 609 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>'); |
} |
} |
&untiehash(); |
&untiehash(); |
|
} |
|
|
|
# ================================================================ Main Handler |
|
sub handler { |
|
my $r = shift; |
|
$r->content_type('text/html'); |
|
$r->send_http_header; |
|
return OK if $r->header_only; |
|
|
|
# --------------------------------------------- Initialize help topics for this |
|
foreach ('Adding_Course_Doc','Main_Course_Documents', |
|
'Adding_External_Resource','Navigate_Content', |
|
'Adding_Folders','Docs_Overview', 'Load_Map', |
|
'Supplemental', 'Score_Upload_Form', |
|
'Importing_LON-CAPA_Resource','Uploading_From_Harddrive') { |
|
$help{$_}=&Apache::loncommon::help_open_topic('Docs_'.$_); |
|
} |
|
# Composite help files |
|
$help{'Syllabus'} = &Apache::loncommon::help_open_topic( |
|
'Docs_About_Syllabus,Docs_Editing_Templated_Pages'); |
|
$help{'Simple Page'} = &Apache::loncommon::help_open_topic( |
|
'Docs_About_Simple_Page,Docs_Editing_Templated_Pages'); |
|
$help{'Bulletin Board'} = &Apache::loncommon::help_open_topic( |
|
'Docs_About_Bulletin_Board,Docs_Editing_Templated_Pages'); |
|
$help{'My Personal Info'} = &Apache::loncommon::help_open_topic( |
|
'Docs_About_My_Personal_Info,Docs_Editing_Templated_Pages'); |
|
$help{'Caching'} = &Apache::loncommon::help_open_topic('Caching'); |
|
|
|
if ($ENV{'form.verify'}) { |
|
&verifycontent($r); |
|
} elsif ($ENV{'form.versions'}) { |
|
&checkversions($r); |
|
} elsif ($ENV{'form.dumpcourse'}) { |
|
&dumpcourse($r); |
} else { |
} else { |
# is this a standard course? |
# is this a standard course? |
|
|
Line 482 ENDHEADERS
|
Line 657 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 494 ENDHEADERS
|
Line 668 ENDHEADERS
|
$forcesupplement=($ENV{'form.folder'}=~/^supplemental_/); |
$forcesupplement=($ENV{'form.folder'}=~/^supplemental_/); |
|
|
# does this user have privileges to post, etc? |
# does this user have privileges to post, etc? |
$allowed=&Apache::lonnet::allowed('srm',$ENV{'request.course.id'}); |
$allowed=&Apache::lonnet::allowed('mdc',$ENV{'request.course.id'}); |
if ($allowed) { |
if ($allowed) { |
&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'); |
Line 504 ENDHEADERS
|
Line 678 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 549 function makenewext(targetname) {
|
Line 722 function makenewext(targetname) {
|
window.open('/adm/rat/extpickframe.html'); |
window.open('/adm/rat/extpickframe.html'); |
} |
} |
|
|
|
function makeexamupload() { |
|
var title=prompt('Listed Title for the Uploaded Score'); |
|
if (title) { |
|
this.document.forms.newexamupload.importdetail.value= |
|
title+'=/res/lib/templates/examupload.problem'; |
|
this.document.forms.newexamupload.submit(); |
|
} |
|
} |
|
|
function makesmppage() { |
function makesmppage() { |
var title=prompt('Listed Title for the Page'); |
var title=prompt('Listed Title for the Page'); |
if (title) { |
if (title) { |
Line 558 function makesmppage() {
|
Line 740 function makesmppage() {
|
} |
} |
} |
} |
|
|
|
function makesmpproblem() { |
|
var title=prompt('Listed Title for the Problem'); |
|
if (title) { |
|
this.document.forms.newsmpproblem.importdetail.value= |
|
title+'=/res/lib/templates/simpleproblem.problem'; |
|
this.document.forms.newsmpproblem.submit(); |
|
} |
|
} |
|
|
function makebulboard() { |
function makebulboard() { |
var title=prompt('Listed Title for the Bulletin Board'); |
var title=prompt('Listed Title for the Bulletin Board'); |
if (title) { |
if (title) { |
Line 585 function changename(folder,index,oldtitl
|
Line 776 function changename(folder,index,oldtitl
|
this.document.forms.renameform.submit(); |
this.document.forms.renameform.submit(); |
} |
} |
} |
} |
|
|
|
function removeres(folder,index,oldtitle) { |
|
if ((oldtitle=='NO RESOURCE') || (confirm('Remove "'+oldtitle+'"?'))) { |
|
this.document.forms.renameform.cmd.value='del_'+index; |
|
this.document.forms.renameform.folder.value=folder; |
|
this.document.forms.renameform.submit(); |
|
} |
|
} |
</script> |
</script> |
|
|
ENDNEWSCRIPT |
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', |
my $dumpbut=&dumpbutton(); |
'Editing the Table of Contents for your Course')); |
|
$r->print(<<ENDCOURSEVERIFY); |
$r->print(<<ENDCOURSEVERIFY); |
<form name="renameform" method="post" action="/adm/coursedocs"> |
<form name="renameform" method="post" action="/adm/coursedocs"> |
<input type="hidden" name="title" /> |
<input type="hidden" name="title" /> |
Line 608 ENDNEWSCRIPT
|
Line 806 ENDNEWSCRIPT
|
<input type="hidden" name="folder" /> |
<input type="hidden" name="folder" /> |
</form> |
</form> |
<form action="/adm/coursedocs" method="post" name="courseverify"> |
<form action="/adm/coursedocs" method="post" name="courseverify"> |
|
<table bgcolor="#AAAAAA" width="100%" cellspacing="4" cellpadding="4"> |
|
<tr><td bgcolor="#DDDDCC"> |
<input type="submit" name="verify" value="Verify Content" /> |
<input type="submit" name="verify" value="Verify Content" /> |
|
</td><td bgcolor="#DDDDCC"> |
<input type="submit" name="versions" value="Check Resource Versions" /> |
<input type="submit" name="versions" value="Check Resource Versions" /> |
|
$dumpbut |
|
</td></tr></table> |
</form> |
</form> |
ENDCOURSEVERIFY |
ENDCOURSEVERIFY |
|
$r->print(&Apache::loncommon::help_open_topic('Docs_Adding_Course_Doc', |
|
'Editing the Table of Contents for your Course')); |
} |
} |
# --------------------------------------------------------- Standard documents |
# --------------------------------------------------------- Standard documents |
$r->print('<table border=2 cellspacing=4 cellpadding=4>'); |
$r->print('<table border=2 cellspacing=4 cellpadding=4>'); |
Line 633 ENDCOURSEVERIFY
|
Line 838 ENDCOURSEVERIFY
|
'<script>function reinit(tf) { tf.submit();'.$postexec.' }</script>'. |
'<script>function reinit(tf) { tf.submit();'.$postexec.' }</script>'. |
'<form method="post" action="/adm/roles" target="loncapaclient">'. |
'<form method="post" action="/adm/roles" target="loncapaclient">'. |
'<input type="hidden" name="orgurl" value="/adm/coursedocs" /><input type="hidden" name="selectrole" value="1" /><h3><font color="red">Changes will become active for your current session after <input type="hidden" name="'. |
'<input type="hidden" name="orgurl" value="/adm/coursedocs" /><input type="hidden" name="selectrole" value="1" /><h3><font color="red">Changes will become active for your current session after <input type="hidden" name="'. |
$ENV{'request.role'}.'" value="1" /><input type="button" value="re-initializing course" onClick="reinit(this.form)"/>, or the next time you log in.</font></h3></form>'); |
$ENV{'request.role'}.'" value="1" /><input type="button" value="re-initializing course" onClick="reinit(this.form)"/>, or the next time you log in.'. |
|
$help{'Caching'}.'</font></h3></form>'); |
} |
} |
my $folderseq='/uploaded/'.$coursedom.'/'.$coursenum.'/default_'.time. |
my $folderseq='/uploaded/'.$coursedom.'/'.$coursenum.'/default_'.time. |
'.sequence'; |
'.sequence'; |
Line 647 $ENV{'request.role'}.'" value="1" /><inp
|
Line 853 $ENV{'request.role'}.'" value="1" /><inp
|
<tr><td bgcolor="#DDDDDD"> |
<tr><td bgcolor="#DDDDDD"> |
File:<br /> |
File:<br /> |
<form action="/adm/coursedocs" method="post" enctype="multipart/form-data"> |
<form action="/adm/coursedocs" method="post" enctype="multipart/form-data"> |
<input type="file" name="uploaddoc" size="50"> |
<input type="file" name="uploaddoc" size="40"> |
<br /> |
<br /> |
Title:<br /> |
Title:<br /> |
<input type="text" size="50" name="comment"> |
<input type="text" size="50" name="comment"> |
<input type="hidden" name="folder" value="$folder"> |
<input type="hidden" name="folder" value="$folder"> |
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
<input type="hidden" name="cmd" value="upload_default"> |
<input type="hidden" name="cmd" value="upload_default"> |
<input type="submit" value="Upload Document"> |
<input type="submit" value="Upload Document"> |
$help{'Uploading_From_Harddrive'}</form> |
<nobr> |
|
$help{'Uploading_From_Harddrive'} |
|
</nobr> |
|
</form> |
</td> |
</td> |
<td bgcolor="#DDDDDD"> |
<td bgcolor="#DDDDDD"> |
<form action="/adm/coursedocs" method="post" name="simpleeditdefault"> |
<form action="/adm/coursedocs" method="post" name="simpleeditdefault"> |
|
<input type="hidden" name="folder" value="$folder"> |
|
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
<input type=button onClick= |
<input type=button onClick= |
"javascript:document.forms.simpleedit.folder.value='$folder';groupsearch()" value="Search"> |
"javascript:document.forms.simpleedit.folder.value='$folder';groupsearch()" value="Search"> |
|
<nobr> |
<input type=button onClick= |
<input type=button onClick= |
"javascript:document.forms.simpleedit.folder.value='$folder';groupimport();" value="Import"> |
"javascript:document.forms.simpleedit.folder.value='$folder';groupimport();" value="Import"> |
$help{'Importing_LON-CAPA_Resource'}<br /> |
$help{'Importing_LON-CAPA_Resource'} |
<input type="text" size="20" name="importmap"> |
</nobr> |
<input type=button |
<p> |
|
<hr /> |
|
<input type="text" size="20" name="importmap"><br /> |
|
<nobr><input type=button |
onClick="javascript:openbrowser('simpleeditdefault','importmap','sequence,page','')" |
onClick="javascript:openbrowser('simpleeditdefault','importmap','sequence,page','')" |
value="Browse"><input type="submit" name="loadmap" value="Load Map"> |
value="Select Map"> <input type="submit" name="loadmap" value="Load Map"> |
|
$help{'Load_Map'}</nobr> |
|
</p> |
</form> |
</form> |
</td><td bgcolor="#DDDDDD"> |
</td><td bgcolor="#DDDDDD"> |
<form action="/adm/coursedocs" method="post" name="newfolder"> |
<form action="/adm/coursedocs" method="post" name="newfolder"> |
<input type="hidden" name="folder" value="$folder"> |
<input type="hidden" name="folder" value="$folder"> |
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
<input type=hidden name="importdetail" value=""> |
<input type=hidden name="importdetail" value=""> |
|
<nobr> |
<input name="newfolder" type="button" |
<input name="newfolder" type="button" |
onClick="javascript:makenewfolder(this.form,'$folderseq');" |
onClick="javascript:makenewfolder(this.form,'$folderseq');" |
value="New Folder" /> $help{'Adding_Folders'} |
value="New Folder" />$help{'Adding_Folders'} |
|
</nobr> |
</form> |
</form> |
<form action="/adm/coursedocs" method="post" name="newext"> |
<form action="/adm/coursedocs" method="post" name="newext"> |
<input type="hidden" name="folder" value="$folder"> |
<input type="hidden" name="folder" value="$folder"> |
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
<input type=hidden name="importdetail" value=""> |
<input type=hidden name="importdetail" value=""> |
|
<nobr> |
<input name="newext" type="button" onClick="javascript:makenewext('newext');" |
<input name="newext" type="button" onClick="javascript:makenewext('newext');" |
value="External Resource" /> $help{'Adding_External_Resource'} |
value="External Resource" /> $help{'Adding_External_Resource'} |
|
</nobr> |
</form> |
</form> |
<form action="/adm/coursedocs" method="post" name="newsyl"> |
<form action="/adm/coursedocs" method="post" name="newsyl"> |
<input type="hidden" name="folder" value="$folder"> |
<input type="hidden" name="folder" value="$folder"> |
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
<input type=hidden name="importdetail" |
<input type=hidden name="importdetail" |
value="Syllabus=/public/$coursedom/$coursenum/syllabus"> |
value="Syllabus=/public/$coursedom/$coursenum/syllabus"> |
|
<nobr> |
<input name="newsyl" type="submit" value="Syllabus" /> |
<input name="newsyl" type="submit" value="Syllabus" /> |
$help{'Creating_From_Template'}</form> |
$help{'Syllabus'} |
|
</nobr> |
|
</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="folder" value="$folder"> |
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
<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"> |
|
<nobr> |
<input name="newnav" type="submit" value="Navigate Content" /> |
<input name="newnav" type="submit" value="Navigate Content" /> |
$help{'Navigate_Content'} |
$help{'Navigate_Content'} |
|
</nobr> |
</form> |
</form> |
<form action="/adm/coursedocs" method="post" name="newsmppg"> |
<form action="/adm/coursedocs" method="post" name="newsmppg"> |
<input type="hidden" name="folder" value="$folder"> |
<input type="hidden" name="folder" value="$folder"> |
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
<input type=hidden name="importdetail" value=""> |
<input type=hidden name="importdetail" value=""> |
|
<nobr> |
<input name="newsmppg" type="button" value="Simple Page" |
<input name="newsmppg" type="button" value="Simple Page" |
onClick="javascript:makesmppage();" /> $help{'Creating_From_Template'} |
onClick="javascript:makesmppage();" /> $help{'Simple Page'} |
|
</nobr> |
|
</form> |
|
<form action="/adm/coursedocs" method="post" name="newsmpproblem"> |
|
<input type="hidden" name="folder" value="$folder"> |
|
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
|
<input type=hidden name="importdetail" value=""> |
|
<nobr> |
|
<input name="newsmpproblem" type="button" value="Simple Problem" |
|
onClick="javascript:makesmpproblem();" />$help{'Simple Problem'} |
|
</nobr> |
|
</form> |
|
<form action="/adm/coursedocs" method="post" name="newexamupload"> |
|
<input type="hidden" name="folder" value="$folder"> |
|
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
|
<input type=hidden name="importdetail" value=""> |
|
<nobr> |
|
<input name="newexamupload" type="button" value="Score Upload Form" |
|
onClick="javascript:makeexamupload();" /> |
|
$help{'Score_Upload_Form'} |
|
</nobr> |
</form> |
</form> |
<form action="/adm/coursedocs" method="post" name="newbul"> |
<form action="/adm/coursedocs" method="post" name="newbul"> |
<input type="hidden" name="folder" value="$folder"> |
<input type="hidden" name="folder" value="$folder"> |
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
<input type=hidden name="importdetail" value=""> |
<input type=hidden name="importdetail" value=""> |
|
<nobr> |
<input name="newbulletin" type="button" value="Bulletin Board" |
<input name="newbulletin" type="button" value="Bulletin Board" |
onClick="javascript:makebulboard();" /> |
onClick="javascript:makebulboard();" /> |
$help{'Creating_From_Template'}</form> |
$help{'Bulletin Board'} |
|
</nobr> |
|
</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"> |
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
<input type=hidden name="importdetail" |
<input type=hidden name="importdetail" |
value="$plainname=/adm/$udom/$uname/aboutme"> |
value="$plainname=/adm/$udom/$uname/aboutme"> |
|
<nobr> |
<input name="newaboutme" type="submit" value="My Personal Info" /> |
<input name="newaboutme" type="submit" value="My Personal Info" /> |
$help{'Creating_From_Template'}</form> |
$help{'My Personal Info'} |
|
</nobr> |
|
</form> |
</td></tr> |
</td></tr> |
</table> |
</table> |
ENDFORM |
ENDFORM |
Line 747 ENDFORM
|
Line 1000 ENDFORM
|
</tr> |
</tr> |
<tr><td bgcolor="#DDDDDD"> |
<tr><td bgcolor="#DDDDDD"> |
<form action="/adm/coursedocs" method="post" enctype="multipart/form-data"> |
<form action="/adm/coursedocs" method="post" enctype="multipart/form-data"> |
<input type="file" name="uploaddoc" size="50"> |
<input type="file" name="uploaddoc" size="40"> |
<br />Comment:<br /> |
<br />Comment:<br /> |
<textarea cols=50 rows=4 name='comment'> |
<textarea cols=50 rows=4 name='comment'> |
</textarea> |
</textarea> |
<input type="hidden" name="folder" value="$folder"> |
<input type="hidden" name="folder" value="$folder"> |
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
<input type="hidden" name="cmd" value="upload_supplemental"> |
<input type="hidden" name="cmd" value="upload_supplemental"> |
|
<nobr> |
<input type="submit" value="Upload Document"> |
<input type="submit" value="Upload Document"> |
$help{'Uploading_From_Harddrive'}</form> |
$help{'Uploading_From_Harddrive'} |
|
</nobr> |
|
</form> |
</td> |
</td> |
<td bgcolor="#DDDDDD"> |
<td bgcolor="#DDDDDD"> |
<form action="/adm/coursedocs" method="post" name="simpleeditsupplement"> |
<form action="/adm/coursedocs" method="post" name="simpleeditsupplement"> |
|
<input type="hidden" name="folder" value="$folder"> |
|
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
<input type=hidden name="importdetail" value=""> |
<input type=hidden name="importdetail" value=""> |
<input type=button onClick= |
<input type=button onClick= |
"javascript:document.forms.simpleedit.folder.value='$folder';groupsearch()" value="Search"> |
"javascript:document.forms.simpleedit.folder.value='$folder';groupsearch()" value="Search"> |
<input type=button onClick= |
<input type=button onClick= |
"javascript:document.forms.simpleedit.folder.value='$folder';groupimport();" value="Import">$help{'Importing_LON-CAPA_Resource'} |
"javascript:document.forms.simpleedit.folder.value='$folder';groupimport();" value="Import">$help{'Importing_LON-CAPA_Resource'} |
|
<p> |
|
<hr /> |
|
<input type="text" size="20" name="importmap"> |
|
<input type=button |
|
onClick="javascript:openbrowser('simpleeditsupplement','importmap','sequence,page','')" |
|
value="Select Map"><input type="submit" name="loadmap" value="Load Map"> |
|
</p> |
</form> |
</form> |
</td><td bgcolor="#DDDDDD"> |
</td><td bgcolor="#DDDDDD"> |
<form action="/adm/coursedocs" method="post" name="supnewfolder"> |
<form action="/adm/coursedocs" method="post" name="supnewfolder"> |
<input type="hidden" name="folder" value="$folder"> |
<input type="hidden" name="folder" value="$folder"> |
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
<input type=hidden name="importdetail" value=""> |
<input type=hidden name="importdetail" value=""> |
|
<nobr> |
<input name="newfolder" type="button" |
<input name="newfolder" type="button" |
onClick="javascript:makenewfolder(this.form,'$folderseq');" |
onClick="javascript:makenewfolder(this.form,'$folderseq');" |
value="New Folder" /> $help{'Adding_Folders'} |
value="New Folder" /> $help{'Adding_Folders'} |
|
</nobr> |
</form> |
</form> |
<form action="/adm/coursedocs" method="post" name="supnewext"> |
<form action="/adm/coursedocs" method="post" name="supnewext"> |
<input type="hidden" name="folder" value="$folder"> |
<input type="hidden" name="folder" value="$folder"> |
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
<input type=hidden name="importdetail" value=""> |
<input type=hidden name="importdetail" value=""> |
|
<nobr> |
<input name="newext" type="button" |
<input name="newext" type="button" |
onClick="javascript:makenewext('supnewext');" |
onClick="javascript:makenewext('supnewext');" |
value="External Resource" /> $help{'Adding_External_Resource'} |
value="External Resource" /> $help{'Adding_External_Resource'} |
|
</nobr> |
</form> |
</form> |
<form action="/adm/coursedocs" method="post" name="supnewsyl"> |
<form action="/adm/coursedocs" method="post" name="supnewsyl"> |
<input type="hidden" name="folder" value="$folder"> |
<input type="hidden" name="folder" value="$folder"> |
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
<input type=hidden name="importdetail" |
<input type=hidden name="importdetail" |
value="Syllabus=/public/$coursedom/$coursenum/syllabus"> |
value="Syllabus=/public/$coursedom/$coursenum/syllabus"> |
|
<nobr> |
<input name="newsyl" type="submit" value="Syllabus" /> |
<input name="newsyl" type="submit" value="Syllabus" /> |
$help{'Creating_From_Template'}</form> |
$help{'Syllabus'} |
|
</nobr> |
|
</form> |
<form action="/adm/coursedocs" method="post" name="subnewaboutme"> |
<form action="/adm/coursedocs" method="post" name="subnewaboutme"> |
<input type="hidden" name="folder" value="$folder"> |
<input type="hidden" name="folder" value="$folder"> |
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
<input type="hidden" name="foldername" value="$ENV{'form.foldername'}"> |
<input type=hidden name="importdetail" |
<input type=hidden name="importdetail" |
value="$plainname=/adm/$udom/$uname/aboutme"> |
value="$plainname=/adm/$udom/$uname/aboutme"> |
|
<nobr> |
<input name="newaboutme" type="submit" value="My Personal Info" /> |
<input name="newaboutme" type="submit" value="My Personal Info" /> |
$help{'Creating_From_Template'}</form> |
$help{'My Personal Info'} |
|
</nobr> |
|
</form> |
</td></tr> |
</td></tr> |
</table></td></tr> |
</table></td></tr> |
ENDSUPFORM |
ENDSUPFORM |