rat/lonpage.pm - diff

Return to lonpage.pm CVS log

Up to [LON-CAPA] / rat

version 1.142, 2022/10/04 20:39:57	version 1.143, 2023/09/10 18:12:55
Line 268 sub handler {	Line 268 sub handler {
my $nforms=0;	my $nforms=0;
my $nuploads=0;	my $nuploads=0;
my $ntimers=0;	my $ntimers=0;
	my $hasnumresp;
my %turninpaths;	my %turninpaths;
my %multiresps;	my %multiresps;
my $turninparent;	my $turninparent;
Line 512 ENDEXT	Line 513 ENDEXT
$ntimers++;	$ntimers++;
$hastimer = 1;	$hastimer = 1;
}	}
	unless ($hasnumresp) {
	if ($output=~/\<input[^\>]+class\s=\s[\'\"]*([^\'\"\>]+\|)LC_numresponse_text/) {
	$hasnumresp = 1;
	}
	}
$output=~	$output=~
s/\<((?:input\|select\|button\|textarea)[^\>]+)name\s\=\s[\'\"]([^\'\"]+)[\'\"]([^\>]*)\>/\<$1 name="$prefix$2" $3\>/gsi;	s/\<((?:input\|select\|button\|textarea)[^\>]+)name\s\=\s[\'\"]([^\'\"]+)[\'\"]([^\>]*)\>/\<$1 name="$prefix$2" $3\>/gsi;
$output=~	$output=~
Line 953 ENDEXT	Line 959 ENDEXT
&mt('Processing your submission ...').'</div></form>');	&mt('Processing your submission ...').'</div></form>');
}	}
unless (($target eq 'tex') \|\| ($target eq 'tex_answer')) {	unless (($target eq 'tex') \|\| ($target eq 'tex_answer')) {
$r->print(&Apache::loncommon::end_page({'discussion'	my $args = {'discussion' => 1};
=> 1,}));	if ($hasnumresp) {
	$args->{'dashjs'} = 1;
	}
	$r->print(&Apache::loncommon::end_page($args));
} else {	} else {
$r->print('\end{document}'.$number_of_columns);	$r->print('\end{document}'.$number_of_columns);
}	}