loncom/publisher/lonpubdir.pm - diff

Return to lonpubdir.pm CVS log

Up to [LON-CAPA] / loncom / publisher

version 1.95, 2006/09/13 21:43:26	version 1.96, 2006/11/22 20:16:16
Line 309 parent.lastknownpriv='/~$uname$thisdisfn	Line 309 parent.lastknownpriv='/~$uname$thisdisfn
return	return
}	}
function changename(theform,activity) {	function changename(theform,activity) {
var newname=prompt('New Name');	var oldname=theform.dispfilename.value;
	var newname=prompt('New Name',oldname);
if (newname == "" \|\| !newname) {	if (newname == "" \|\| !newname) {
return	return
}	}
Line 712 sub create_pubselect {	Line 713 sub create_pubselect {
'<option value="print">'.&mt('Print').'</option>'.	'<option value="print">'.&mt('Print').'</option>'.
'</select>	'</select>
<input type="hidden" name="filename" value="/~'.	<input type="hidden" name="filename" value="/~'.
&HTML::Entities::encode($uname.$thisdisfn.'/'.$filename,'<>&"').'" /></form>';	&HTML::Entities::encode($uname.$thisdisfn.'/'.$filename,'<>&"').'" />
	<input type="hidden" name="dispfilename" value="'.
	&HTML::Entities::encode($filename).'"</form>';
$$numres ++;	$$numres ++;
}	}