loncom/interface/londocs.pm - diff

Return to londocs.pm CVS log

Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/londocs.pm between versions 1.213 and 1.223

version 1.213, 2005/11/17 19:37:30	version 1.223, 2006/03/06 17:15:29
Line 1190 sub editor {	Line 1190 sub editor {
}	}
}	}
# Loading a complete map	# Loading a complete map
if (($env{'form.importmap'}) && ($env{'form.loadmap'})) {	if ($env{'form.loadmap'}) {
foreach (&Apache::lonsequence::attemptread(&Apache::lonnet::filelocation('',$env{'form.importmap'}))) {	if ($env{'form.importmap'}=~/\w/) {
my ($title,$url,$ext,$type)=split(/\:/,$_);	foreach (&Apache::lonsequence::attemptread(&Apache::lonnet::filelocation('',$env{'form.importmap'}))) {
my $idx=&Apache::lonratedt::getresidx($url);	my ($title,$url,$ext,$type)=split(/\:/,$_);
$Apache::lonratedt::resources[$idx]=$_;	my $idx=&Apache::lonratedt::getresidx($url);
$Apache::lonratedt::order	$Apache::lonratedt::resources[$idx]=$_;
[$#Apache::lonratedt::order+1]=$idx;	$Apache::lonratedt::order
}	[$#Apache::lonratedt::order+1]=$idx;
	}
# Store the changed version	# Store the changed version
($errtext,$fatal)=&storemap($coursenum,$coursedom,	($errtext,$fatal)=&storemap($coursenum,$coursedom,
$folder.'.'.$container);	$folder.'.'.$container);
if ($fatal) {	if ($fatal) {
$r->print('<p><font color="red">'.$errtext.'</font></p>');	$r->print('<p><font color="red">'.$errtext.'</font></p>');
return;	return;
}	}
	} else {
	$r->print('<p><font color="red">'.&mt('No map selected.').'</font></p>');
	}
}	}
}	}
# ---------------------------------------------------------------- End commands	# ---------------------------------------------------------------- End commands
Line 1373 sub process_secondary_uploads {	Line 1376 sub process_secondary_uploads {
if (($folder eq 'default') \|\| ($folder eq 'supplemental')) {	if (($folder eq 'default') \|\| ($folder eq 'supplemental')) {
$destination .= 'default/';	$destination .= 'default/';
} elsif ($folder =~ /^(default\|supplemental)_(\d+)$/) {	} elsif ($folder =~ /^(default\|supplemental)_(\d+)$/) {
$destination .= $1.'/';	$destination .= $2.'/';
}	}
$destination .= $newidx;	$destination .= $newidx;
my ($url,$filename);	my ($url,$filename);
Line 1400 sub entryline {	Line 1403 sub entryline {
&Apache::loncommon::plainname($2,$3).': <br />'.	&Apache::loncommon::plainname($2,$3).': <br />'.
$foldertitle;	$foldertitle;
}	}
	$renametitle=~s/\\/\\\\/g;
$renametitle=~s/\&quot\;/\\\"/g;	$renametitle=~s/\&quot\;/\\\"/g;
my $line='<tr>';	my $line='<tr>';
# Edit commands	# Edit commands
Line 1555 END	Line 1559 END
&Apache::lonnet::allowuploaded('/adm/coursedoc',$url);	&Apache::lonnet::allowuploaded('/adm/coursedoc',$url);
}	}
}	}
$url=~s/^http\&colon\;\/\//\/adm\/wrapper\/ext\//;	$url=~s-^http(\&colon\;\|:)//-/adm/wrapper/ext/-;
if ((!$isfolder) && ($residx) && ($folder!~/supplemental/) && (!$ispage)) {	if ((!$isfolder) && ($residx) && ($folder!~/supplemental/) && (!$ispage)) {
my $symb=&Apache::lonnet::symbclean(	my $symb=&Apache::lonnet::symbclean(
&Apache::lonnet::declutter('uploaded/'.	&Apache::lonnet::declutter('uploaded/'.
Line 1588 END	Line 1592 END
}	}
}	}
my $parameterset=' ';	my $parameterset=' ';
if ($isfolder) {	if ($isfolder \|\| $extension eq 'sequence') {
my $foldername=&Apache::lonnet::escape($foldertitle);	my $foldername=&Apache::lonnet::escape($foldertitle);
my $folderpath=$env{'form.folderpath'};	my $folderpath=$env{'form.folderpath'};
if ($folderpath) { $folderpath.='&' };	if ($folderpath) { $folderpath.='&' };
Line 1666 sub tiehash {	Line 1670 sub tiehash {
sub untiehash {	sub untiehash {
if ($hashtied) { untie %hash; }	if ($hashtied) { untie %hash; }
$hashtied=0;	$hashtied=0;
	return OK;
}	}

# --------------------------------------------------------------- check on this	# --------------------------------------------------------------- check on this
Line 2263 function makesmpproblem() {	Line 2268 function makesmpproblem() {
}	}
}	}

	function makedropbox() {
	var title=prompt('Listed Title for the Drop Box');
	if (title) {
	this.document.forms.newdropbox.importdetail.value=
	title+'=/res/lib/templates/DropBox.problem';
	this.document.forms.newdropbox.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 2478 ENDNEWSCRIPT	Line 2492 ENDNEWSCRIPT
'navc' => 'Navigate Contents',	'navc' => 'Navigate Contents',
'sipa' => 'Simple Page',	'sipa' => 'Simple Page',
'sipr' => 'Simple Problem',	'sipr' => 'Simple Problem',
	'drbx' => 'Drop Box',
'scuf' => 'Score Upload Form',	'scuf' => 'Score Upload Form',
'bull' => 'Bulletin Board',	'bull' => 'Bulletin Board',
'mypi' => 'My Personal Info',	'mypi' => 'My Personal Info',
Line 2530 $uploadtag	Line 2545 $uploadtag
<input type="submit" name="versions" value="$lt{'cv'}" />$help{'Check_Resource_Versions'}	<input type="submit" name="versions" value="$lt{'cv'}" />$help{'Check_Resource_Versions'}
$dumpbut	$dumpbut
$exportbut	$exportbut
</td><!-- <td bgcolor="#DDDDCC">	</td><td bgcolor="#DDDDCC">
<input type="submit" name="listsymbs" value="$lt{'ls'}" />	<input type="submit" name="listsymbs" value="$lt{'ls'}" />
</td>--></tr></table>	</td></tr></table>
</form>	</form>
ENDCOURSEVERIFY	ENDCOURSEVERIFY
$r->print(&Apache::loncommon::help_open_topic('Docs_Adding_Course_Doc',	$r->print(&Apache::loncommon::help_open_topic('Docs_Adding_Course_Doc',
Line 2634 $uploadtag	Line 2649 $uploadtag
value="$lt{'extr'}" /> $help{'Adding_External_Resource'}	value="$lt{'extr'}" /> $help{'Adding_External_Resource'}
</nobr>	</nobr>
</form>	</form>
<form action="/adm/imsimportdocs" method="post" name="ims">	<br /><form action="/adm/imsimportdocs" method="post" name="ims">
<input type="hidden" name="folder" value="$folder" />	<input type="hidden" name="folder" value="$folder" />
<input name="imsimport" type="button" value="$lt{'imsf'}" onClick="javascript:makeims();" />	<input name="imsimport" type="button" value="$lt{'imsf'}" onClick="javascript:makeims();" />
</nobr>	</nobr>
Line 2644 ENDFORM	Line 2659 ENDFORM
$r->print('</td><td bgcolor="#DDDDDD">');	$r->print('</td><td bgcolor="#DDDDDD">');
unless ($env{'form.pagepath'}) {	unless ($env{'form.pagepath'}) {
$r->print(<<ENDFORM);	$r->print(<<ENDFORM);
<form action="/adm/coursedocs" method="post" name="newfolder">	<br /><form action="/adm/coursedocs" method="post" name="newfolder">
<input type="hidden" name="folderpath" value="$env{'form.folderpath'}" />	<input type="hidden" name="folderpath" value="$env{'form.folderpath'}" />
<input type=hidden name="importdetail" value="">	<input type=hidden name="importdetail" value="">
<nobr>	<nobr>
Line 2653 onClick="javascript:makenewfolder(this.f	Line 2668 onClick="javascript:makenewfolder(this.f
value="$lt{'newf'}" />$help{'Adding_Folders'}	value="$lt{'newf'}" />$help{'Adding_Folders'}
</nobr>	</nobr>
</form>	</form>
<form action="/adm/coursedocs" method="post" name="newpage">	<br /><form action="/adm/coursedocs" method="post" name="newpage">
<input type="hidden" name="folderpath" value="$env{'form.folderpath'}" />	<input type="hidden" name="folderpath" value="$env{'form.folderpath'}" />
<input type=hidden name="importdetail" value="">	<input type=hidden name="importdetail" value="">
<nobr>	<nobr>
Line 2662 onClick="javascript:makenewpage(this.for	Line 2677 onClick="javascript:makenewpage(this.for
value="$lt{'newp'}" />$help{'Adding_Pages'}	value="$lt{'newp'}" />$help{'Adding_Pages'}
</nobr>	</nobr>
</form>	</form>
<form action="/adm/coursedocs" method="post" name="newsyl">	<br /><form action="/adm/coursedocs" method="post" name="newsyl">
$uploadtag	$uploadtag
<input type=hidden name="importdetail"	<input type=hidden name="importdetail"
value="Syllabus=/public/$coursedom/$coursenum/syllabus">	value="Syllabus=/public/$coursedom/$coursenum/syllabus">
Line 2671 value="Syllabus=/public/$coursedom/$cour	Line 2686 value="Syllabus=/public/$coursedom/$cour
$help{'Syllabus'}	$help{'Syllabus'}
</nobr>	</nobr>
</form>	</form>
<form action="/adm/coursedocs" method="post" name="newnav">	<br /><form action="/adm/coursedocs" method="post" name="newnav">
$uploadtag	$uploadtag
<input type=hidden name="importdetail"	<input type=hidden name="importdetail"
value="Navigate Content=/adm/navmaps">	value="Navigate Content=/adm/navmaps">
Line 2680 value="Navigate Content=/adm/navmaps">	Line 2695 value="Navigate Content=/adm/navmaps">
$help{'Navigate_Content'}	$help{'Navigate_Content'}
</nobr>	</nobr>
</form>	</form>
<form action="/adm/coursedocs" method="post" name="newsmppg">	<br /><form action="/adm/coursedocs" method="post" name="newsmppg">
$uploadtag	$uploadtag
<input type=hidden name="importdetail" value="">	<input type=hidden name="importdetail" value="">
<nobr>	<nobr>
Line 2688 $uploadtag	Line 2703 $uploadtag
onClick="javascript:makesmppage();" /> $help{'Simple Page'}	onClick="javascript:makesmppage();" /> $help{'Simple Page'}
</nobr>	</nobr>
</form>	</form>
<form action="/adm/coursedocs" method="post" name="newsmpproblem">	<br /><form action="/adm/coursedocs" method="post" name="newsmpproblem">
$uploadtag	$uploadtag
<input type=hidden name="importdetail" value="">	<input type=hidden name="importdetail" value="">
<nobr>	<nobr>
Line 2696 $uploadtag	Line 2711 $uploadtag
onClick="javascript:makesmpproblem();" />$help{'Simple Problem'}	onClick="javascript:makesmpproblem();" />$help{'Simple Problem'}
</nobr>	</nobr>
</form>	</form>
<form action="/adm/coursedocs" method="post" name="newexamupload">	<br /><form action="/adm/coursedocs" method="post" name="newdropbox">
	$uploadtag
	<input type=hidden name="importdetail" value="">
	<nobr>
	<input name="newdropbox" type="button" value="$lt{'drbx'}"
	onClick="javascript:makedropbox();" />
	</nobr>
	</form>
	<br /><form action="/adm/coursedocs" method="post" name="newexamupload">
$uploadtag	$uploadtag
<input type=hidden name="importdetail" value="">	<input type=hidden name="importdetail" value="">
<nobr>	<nobr>
Line 2705 onClick="javascript:makeexamupload();" /	Line 2728 onClick="javascript:makeexamupload();" /
$help{'Score_Upload_Form'}	$help{'Score_Upload_Form'}
</nobr>	</nobr>
</form>	</form>
<form action="/adm/coursedocs" method="post" name="newbul">	<br /><form action="/adm/coursedocs" method="post" name="newbul">
$uploadtag	$uploadtag
<input type=hidden name="importdetail" value="">	<input type=hidden name="importdetail" value="">
<nobr>	<nobr>
Line 2714 onClick="javascript:makebulboard();" />	Line 2737 onClick="javascript:makebulboard();" />
$help{'Bulletin Board'}	$help{'Bulletin Board'}
</nobr>	</nobr>
</form>	</form>
<form action="/adm/coursedocs" method="post" name="newaboutme">	<br /><form action="/adm/coursedocs" method="post" name="newaboutme">
$uploadtag	$uploadtag
<input type=hidden name="importdetail"	<input type=hidden name="importdetail"
value="$plainname=/adm/$udom/$uname/aboutme">	value="$plainname=/adm/$udom/$uname/aboutme">
Line 2723 value="$plainname=/adm/$udom/$uname/abou	Line 2746 value="$plainname=/adm/$udom/$uname/abou
$help{'My Personal Info'}	$help{'My Personal Info'}
</nobr>	</nobr>
</form>	</form>
<form action="/adm/coursedocs" method="post" name="newaboutsomeone">	<br /><form action="/adm/coursedocs" method="post" name="newaboutsomeone">
$uploadtag	$uploadtag
<input type=hidden name="importdetail" value="">	<input type=hidden name="importdetail" value="">
<nobr>	<nobr>
Line 2743 $uploadtag	Line 2766 $uploadtag
onClick="javascript:makesmpproblem();" />$help{'Simple Problem'}	onClick="javascript:makesmpproblem();" />$help{'Simple Problem'}
</nobr>	</nobr>
</form>	</form>
<form action="/adm/coursedocs" method="post" name="newexamupload">	<br /><form action="/adm/coursedocs" method="post" name="newexamupload">
$uploadtag	$uploadtag
<input type=hidden name="importdetail" value="">	<input type=hidden name="importdetail" value="">
<nobr>	<nobr>
Line 2816 onClick="javascript:makenewfolder(this.f	Line 2839 onClick="javascript:makenewfolder(this.f
value="$lt{'newf'}" /> $help{'Adding_Folders'}	value="$lt{'newf'}" /> $help{'Adding_Folders'}
</nobr>	</nobr>
</form>	</form>
<form action="/adm/coursedocs" method="post" name="supnewext">	<br /><form action="/adm/coursedocs" method="post" name="supnewext">
<input type="hidden" name="folderpath" value="$env{'form.folderpath'}" />	<input type="hidden" name="folderpath" value="$env{'form.folderpath'}" />
<input type=hidden name="importdetail" value="">	<input type=hidden name="importdetail" value="">
<nobr>	<nobr>
Line 2825 onClick="javascript:makenewext('supnewex	Line 2848 onClick="javascript:makenewext('supnewex
value="$lt{'extr'}" /> $help{'Adding_External_Resource'}	value="$lt{'extr'}" /> $help{'Adding_External_Resource'}
</nobr>	</nobr>
</form>	</form>
<form action="/adm/coursedocs" method="post" name="supnewsyl">	<br /><form action="/adm/coursedocs" method="post" name="supnewsyl">
<input type="hidden" name="folderpath" value="$env{'form.folderpath'}" />	<input type="hidden" name="folderpath" value="$env{'form.folderpath'}" />
<input type=hidden name="importdetail"	<input type=hidden name="importdetail"
value="Syllabus=/public/$coursedom/$coursenum/syllabus">	value="Syllabus=/public/$coursedom/$coursenum/syllabus">
Line 2834 value="Syllabus=/public/$coursedom/$cour	Line 2857 value="Syllabus=/public/$coursedom/$cour
$help{'Syllabus'}	$help{'Syllabus'}
</nobr>	</nobr>
</form>	</form>
<form action="/adm/coursedocs" method="post" name="subnewaboutme">	<br /><form action="/adm/coursedocs" method="post" name="subnewaboutme">
<input type="hidden" name="folderpath" value="$env{'form.folderpath'}" />	<input type="hidden" name="folderpath" value="$env{'form.folderpath'}" />
<input type=hidden name="importdetail"	<input type=hidden name="importdetail"
value="$plainname=/adm/$udom/$uname/aboutme">	value="$plainname=/adm/$udom/$uname/aboutme">

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>

Removed from v.1.213
changed lines
	Added in v.1.223