loncom/publisher/lonpubdir.pm - diff

Return to lonpubdir.pm CVS log

Up to [LON-CAPA] / loncom / publisher

version 1.108, 2008/01/17 04:50:57	version 1.109, 2008/07/29 10:06:27
Line 218 sub startpage {	Line 218 sub startpage {

my $esc_thisdisfn = &Apache::loncommon::escape_single($thisdisfn);	my $esc_thisdisfn = &Apache::loncommon::escape_single($thisdisfn);
my $doctitle = 'LON-CAPA '.&mt('Construction Space');	my $doctitle = 'LON-CAPA '.&mt('Construction Space');
	my $newname = &mt('New Name');
my $pubdirscript=(<<ENDPUBDIRSCRIPT);	my $pubdirscript=(<<ENDPUBDIRSCRIPT);
<script type="text/javascript">	<script type="text/javascript">
top.document.title = '$esc_thisdisfn/ - $doctitle';	top.document.title = '$esc_thisdisfn/ - $doctitle';
Line 314 parent.lastknownpriv='/~$uname$esc_thisd	Line 315 parent.lastknownpriv='/~$uname$esc_thisd
}	}
function changename(theform,activity) {	function changename(theform,activity) {
var oldname=theform.dispfilename.value;	var oldname=theform.dispfilename.value;
var newname=prompt('New Name',oldname);	var newname=prompt('$newname',oldname);
if (newname == "" \|\| !newname \|\| newname == oldname) {	if (newname == "" \|\| !newname \|\| newname == oldname) {
return	return
}	}
Line 540 sub putdirectory {	Line 541 sub putdirectory {
));	));
my $actionitem = '';	my $actionitem = '';
if ($dirname eq '..') {	if ($dirname eq '..') {
$actionitem = 'Go to ...';	$actionitem = &mt('Go to ...');
} else {	} else {
$actionitem =	$actionitem =
'<form name="dirselect_'.$$numdir.	'<form name="dirselect_'.$$numdir.