loncom/interface/lonhtmlcommon.pm - diff

Return to lonhtmlcommon.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.71, 2004/06/02 16:41:46	version 1.73, 2004/06/03 16:42:02
Line 875 sub htmlareaheaders {	Line 875 sub htmlareaheaders {
}	}
return (<<ENDHEADERS);	return (<<ENDHEADERS);
<script type="text/javascript">	<script type="text/javascript">
_editor_url="/htmlarea/";
</script>
<script type="text/javascript" src="/htmlarea/htmlarea.js"></script>
<style type="text/javascript">
_editor_url='/htmlarea/';	_editor_url='/htmlarea/';
_editor_lang='$lang';	_editor_lang='$lang';
</style>	</script>
	<script type="text/javascript" src="/htmlarea/htmlarea.js"></script>
ENDHEADERS	ENDHEADERS
}	}

Line 896 sub htmlareaactive {	Line 893 sub htmlareaactive {
ENDSCRIPT	ENDSCRIPT
}	}

	# ----------------------------------------- Script to activate only some fields

	sub htmlareaselectactive {
	my @fields=@_;
	if (&htmlareablocked()) { return ''; }
	my $output='<script type="text/javascript" defer="1">';
	foreach(@fields) {
	$output.="\nHTMLArea.replace('$_');";
	}
	$output.="\nwindow.status='Activated Editfields';\n</script>";
	return $output;
	}

# --------------------------------------------------------------------- Blocked	# --------------------------------------------------------------------- Blocked

sub htmlareablocked {	sub htmlareablocked {