version 1.67, 2003/07/16 19:36:02
|
version 1.71, 2003/08/05 12:47:21
|
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 329 sub checkonthis {
|
Line 329 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 375 sub handler {
|
Line 378 sub handler {
|
# --------------------------------------------- Initialize help topics for this |
# --------------------------------------------- Initialize help topics for this |
foreach ('Adding_Course_Doc','Main_Course_Documents', |
foreach ('Adding_Course_Doc','Main_Course_Documents', |
'Adding_External_Resource','Navigate_Content', |
'Adding_External_Resource','Navigate_Content', |
'Adding_Folders','Docs_Overview', |
'Adding_Folders','Docs_Overview', 'Load_Map', |
'Supplemental', 'Score_Upload_Form', |
'Supplemental', 'Score_Upload_Form', |
'Importing_LON-CAPA_Resource','Uploading_From_Harddrive') { |
'Importing_LON-CAPA_Resource','Uploading_From_Harddrive') { |
$help{$_}=&Apache::loncommon::help_open_topic('Docs_'.$_); |
$help{$_}=&Apache::loncommon::help_open_topic('Docs_'.$_); |
Line 408 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 495 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 726 $help{'Importing_LON-CAPA_Resource'}
|
Line 731 $help{'Importing_LON-CAPA_Resource'}
|
</nobr> |
</nobr> |
<p> |
<p> |
<hr /> |
<hr /> |
<input type="text" size="20" name="importmap"> |
<input type="text" size="20" name="importmap"><br /> |
<input type=button |
<nobr><input type=button |
onClick="javascript:openbrowser('simpleeditdefault','importmap','sequence,page','')" |
onClick="javascript:openbrowser('simpleeditdefault','importmap','sequence,page','')" |
value="Select Map"><input type="submit" name="loadmap" value="Load Map"> |
value="Select Map"> <input type="submit" name="loadmap" value="Load Map"> |
|
$help{'Load_Map'}</nobr> |
</p> |
</p> |
</form> |
</form> |
</td><td bgcolor="#DDDDDD"> |
</td><td bgcolor="#DDDDDD"> |