loncom/interface/lonprintout.pm - diff

Return to lonprintout.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.199, 2003/06/25 19:37:04	version 1.200, 2003/06/30 20:24:58
Line 623 ENDPART	Line 623 ENDPART
$moreenv{'request.filename'}=$currentURL;	$moreenv{'request.filename'}=$currentURL;
my %form;	my %form;
$form{'grade_target'}='tex';	$form{'grade_target'}='tex';
$form{'textwidth'}=$LaTeXwidth;	$form{'textwidth'}=$LaTeXwidth;
	$form{'problem_split'}=$parmhash{'problem_stream_switch'};
my $rndseed=time;	my $rndseed=time;
$form{'rndseed'}=$rndseed;	$form{'rndseed'}=$rndseed;
&Apache::lonnet::appenv(%moreenv);	&Apache::lonnet::appenv(%moreenv);
Line 886 sub handler {	Line 887 sub handler {

my %parmhash=&Apache::lonnet::coursedescription($ENV{'request.course.id'});	my %parmhash=&Apache::lonnet::coursedescription($ENV{'request.course.id'});

	# my $key;
	# foreach $key (keys %parmhash) {
	# $r->print(' '.$key.'->'.$parmhash{$key}.'<-<br />');
	# }
	# return OK;

&output_data($r,$helper,\%parmhash);	&output_data($r,$helper,\%parmhash);
return OK;	return OK;