loncom/interface/lonmodifycourse.pm - diff

Return to lonmodifycourse.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.22, 2006/02/10 23:38:15	version 1.23, 2006/03/16 21:39:26
Line 674 sub print_header {	Line 674 sub print_header {
}	}
}	}
my $html=&Apache::lonxml::xmlbegin();	my $html=&Apache::lonxml::xmlbegin();
$r->print("	my $js;
$html
<head>
");
if ($action eq 'display') {	if ($action eq 'display') {
$r->print("	$js = '<script type="text/javascript">
<script language=\"JavaScript\" type=\"text/javascript\">	'.$$javascriptref.'
$$javascriptref	</script>';
</script>");
}	}
	$r->print(&Apache::loncommon::start_page('View/Modify Course Settings',
	$js));
$r->print(<<ENDTHIS);	$r->print(<<ENDTHIS);
<title>The LearningOnline Network with CAPA</title>
</head>
$bodytag
<table width="100%" border="0" cellpadding="0" cellspacing="0">	<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>	<tr>
<td bgcolor="#CCCC99">	<td bgcolor="#CCCC99">
Line 703 ENDTHIS	Line 698 ENDTHIS
}	}

sub print_footer {	sub print_footer {
my $r = shift;	my ($r) = @_;
$r->print(<<ENDBASE);	$r->print('<br />'.&Apache::loncommon::end_page());
<br/>
</body>
</html>
ENDBASE
return;	return;
}	}