loncom/xml/lonxml.pm - diff

Return to lonxml.pm CVS log

Up to [LON-CAPA] / loncom / xml

version 1.70, 2001/05/04 17:33:35	version 1.71, 2001/05/04 19:18:43
Line 16 use Safe;	Line 16 use Safe;
use Safe::Hole;	use Safe::Hole;
use Opcode;	use Opcode;
use Apache::Constants qw(:common);	use Apache::Constants qw(:common);
	use Apache::lontexconvert;


sub xmlbegin {	sub xmlbegin {
Line 49 sub fontsettings() {	Line 50 sub fontsettings() {
sub registerurl {	sub registerurl {
return (<<ENDSCRIPT);	return (<<ENDSCRIPT);
<script language="JavaScript">	<script language="JavaScript">
	// BEGIN LON-CAPA Internal
function LONCAPAreg() {	function LONCAPAreg() {
if (window.location.pathname!="/res/adm/pages/menu.html") {	if (window.location.pathname!="/res/adm/pages/menu.html") {
menu=window.open("","LONCAPAmenu");	menu=window.open("","LONCAPAmenu");
Line 63 sub registerurl {	Line 65 sub registerurl {
menu.currentStale=1;	menu.currentStale=1;
}	}
}	}
	// END LON-CAPA Internal
</script>	</script>
ENDSCRIPT	ENDSCRIPT
}	}