loncom/homework/randomlabel.pm - diff

Return to randomlabel.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.90, 2007/10/17 22:11:55	version 1.92, 2008/11/18 19:14:28
Line 53	Line 53
# (32,65) : $GroupTwo[1] = "TEXT-1"	# (32,65) : $GroupTwo[1] = "TEXT-1"
# (21,54) : $GroupTwo[2] = "TEXT-2"	# (21,54) : $GroupTwo[2] = "TEXT-2"
# ===========================================	# ===========================================

package Apache::randomlabel;	package Apache::randomlabel;
use Apache::lonnet;	use Apache::lonnet;
use strict;	use strict;
Line 178 sub end_randomlabel {	Line 179 sub end_randomlabel {
$count = $Apache::randomlabel::obj_cnt;	$count = $Apache::randomlabel::obj_cnt;
if( $count != 0) { $args{"cgi.$cgi_id.OBJCOUNT"}=$count; }	if( $count != 0) { $args{"cgi.$cgi_id.OBJCOUNT"}=$count; }
$result.='<img src="/adm/randomlabel.png?token='.$cgi_id.'" /><br />'."\n";	$result.='<img src="/adm/randomlabel.png?token='.$cgi_id.'" /><br />'."\n";
&Apache::lonnet::appenv(%args);	&Apache::lonnet::appenv(\%args);
} elsif ($target eq 'tex') {	} elsif ($target eq 'tex') {
$result='\end{picture}\\\\';	$result='\end{picture}\\\\';
$result.= ' \vskip -'.$height_param.' mm } \\\\ ';	$result.= ' \vskip -'.$height_param.' mm } \\\\ ';