loncom/interface/loncommon.pm - diff

Return to loncommon.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.1034, 2011/12/09 01:04:27	version 1.1036, 2011/12/12 00:13:43
Line 7056 sub modal_adhoc_script {	Line 7056 sub modal_adhoc_script {
ENDADHOC	ENDADHOC
}	}

	sub modal_adhoc_window {
	my ($funcname,$width,$height,$content,$linktext)=@_;
	my $innerwidth=$width-20;
	$content=&js_ready(
	&start_page('Dialog',undef,{'only_body'=>1,'bgcolor'=>'#FFFFFF'}).
	&start_scrollbox($width.'px',$innerwidth.'px',$height.'px').
	$content.
	&end_scrollbox().
	&end_page()
	);
	return &modal_adhoc_script($funcname,$width,$height,$content).
	"<a href=\"javascript:$funcname();void(0);\">".$linktext."</a>";
	}

sub html_encode {	sub html_encode {
my ($result) = @_;	my ($result) = @_;

Line 7114 sub start_scrollbox {	Line 7128 sub start_scrollbox {
}	}

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

sub simple_error_page {	sub simple_error_page {