loncom/interface/loncommon.pm - diff

Return to loncommon.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.996, 2011/01/15 16:21:41	version 1.998, 2011/01/16 03:50:12
Line 6885 sub validate_page {	Line 6885 sub validate_page {


sub start_scrollbox {	sub start_scrollbox {
return '<table style="width: 600px;"><tr><td style="width: 500px;"><div style="overflow:auto; width:500px; height: 200px;">';	my ($outerwidth,$width,$height)=@_;
	unless ($outerwidth) { $outerwidth='520px'; }
	unless ($width) { $width='500px'; }
	unless ($height) { $height='200px'; }
	return "<table style='width: $outerwidth; border: 1px solid black;'><tr><td style='width: $width;' bgcolor='#FFFFFF'><div style='overflow:auto; width:$width; height: $height;'>";
}	}

sub end_scrollbox {	sub end_scrollbox {
return '</td></tr></table>';	return '</td></tr></table>';
}	}

sub simple_error_page {	sub simple_error_page {