loncom/interface/lonhtmlcommon.pm - diff

Return to lonhtmlcommon.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.72, 2004/06/03 14:28:39	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 899 ENDSCRIPT	Line 896 ENDSCRIPT
# ----------------------------------------- Script to activate only some fields	# ----------------------------------------- Script to activate only some fields

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