loncom/interface/lonprintout.pm - diff

Return to lonprintout.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.157, 2003/05/07 19:09:10	version 1.161, 2003/05/12 18:14:01
Line 1886 CHOOSE_FROM_SUBDIR	Line 1886 CHOOSE_FROM_SUBDIR
$paramHash = Apache::lonhelper::getParamHash();	$paramHash = Apache::lonhelper::getParamHash();
$paramHash->{MESSAGE_TEXT} = "";	$paramHash->{MESSAGE_TEXT} = "";
Apache::lonhelper::message->new();	Apache::lonhelper::message->new();

$paramHash = Apache::lonhelper::getParamHash();	$paramHash = Apache::lonhelper::getParamHash();
$paramHash->{'variable'} = 'PRINT_TYPE';	$paramHash->{'variable'} = 'PRINT_TYPE';
$helper->declareVar('PRINT_TYPE');	$helper->declareVar('PRINT_TYPE');
$paramHash->{CHOICES} = $printChoices;	$paramHash->{CHOICES} = $printChoices;
Apache::lonhelper::choices->new();	Apache::lonhelper::choices->new();

	if (1) {
	$paramHash = Apache::lonhelper::getParamHash();
	$paramHash->{MESSAGE_TEXT} = "<hr>";
	Apache::lonhelper::message->new();

	$paramHash = Apache::lonhelper::getParamHash();
	$paramHash->{CHOICES} = [
	['Print with answer', '1'],
	['Print without answers', '0'] ];
	$paramHash->{'variable'} = 'PRINT_WITH_ANSWERS';
	Apache::lonhelper::choices->new();
	}

Apache::lonprintout::page_format_state->new("FORMAT");	Apache::lonprintout::page_format_state->new("FORMAT");

# Generate the PAGESIZE state which will offer the user the margin	# Generate the PAGESIZE state which will offer the user the margin