loncom/interface/londocs.pm - diff

Return to londocs.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.55, 2003/05/13 15:41:20	version 1.57, 2003/05/29 01:26:33
Line 539 ENDHEADERS	Line 539 ENDHEADERS
$iconpath = $r->dir_config('lonIconsURL') . "/";	$iconpath = $r->dir_config('lonIconsURL') . "/";

my $now=time;	my $now=time;
	#
	# FIXME: hack to disable new problem
	#
	my $noeggforyou='';
	unless ($ENV{'user.debug'}) {
	$noeggforyou='alert("Sorry, not implemented yet."); return 0;';
	}
# print screen	# print screen
$r->print(<<ENDDOCUMENT);	$r->print(<<ENDDOCUMENT);
<html>	<html>
Line 575 function makesmppage() {	Line 581 function makesmppage() {
}	}

function makesmpproblem() {	function makesmpproblem() {
	$noeggforyou
var title=prompt('Listed Title for the Problem');	var title=prompt('Listed Title for the Problem');
if (title) {	if (title) {
this.document.forms.newsmpproblem.importdetail.value=	this.document.forms.newsmpproblem.importdetail.value=
Line 612 function changename(folder,index,oldtitl	Line 619 function changename(folder,index,oldtitl
}	}

function removeres(folder,index,oldtitle) {	function removeres(folder,index,oldtitle) {
if (confirm('Remove "'+oldtitle+'"?')) {	if ((oldtitle=='NO RESOURCE') \|\| (confirm('Remove "'+oldtitle+'"?'))) {
this.document.forms.renameform.cmd.value='del_'+index;	this.document.forms.renameform.cmd.value='del_'+index;
this.document.forms.renameform.folder.value=folder;	this.document.forms.renameform.folder.value=folder;
this.document.forms.renameform.submit();	this.document.forms.renameform.submit();