loncom/homework/randomlabel.pm - diff

Return to randomlabel.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.67, 2005/04/07 06:56:22	version 1.68, 2005/04/12 09:35:22
Line 173 sub make_eps_image {	Line 173 sub make_eps_image {
&Apache::londefdef::image_size($bgimg,0.3,$parstack,$safeeval,	&Apache::londefdef::image_size($bgimg,0.3,$parstack,$safeeval,
$depth,1);	$depth,1);
my $dirtywidth=$width_param+5;	my $dirtywidth=$width_param+5;
my $result.='\vspace*{2mm}\noindent \parbox{'.$dirtywidth.	my $result ="\n".'\vspace*{2mm}\noindent'."\n".
	'\parbox{'.$dirtywidth.
' mm}{ \noindent \epsfxsize='.$width_param.	' mm}{ \noindent \epsfxsize='.$width_param.
' mm \epsffile{'.$path.$file.	' mm \epsffile{'.$path.$file.
'}\setlength{\unitlength}{1mm} \begin{picture}('.	'}\setlength{\unitlength}{1mm}'."\n".' \begin{picture}('.
$width_param.','.$height_param.')(0,-'.$height_param.')';	$width_param.','.$height_param.')(0,-'.$height_param.')'."\n";
return $result;	return $result;
}	}

Line 198 sub start_labelgroup {	Line 199 sub start_labelgroup {
@Apache::randomlabel::ycoord = ();	@Apache::randomlabel::ycoord = ();
@Apache::randomlabel::value = ();	@Apache::randomlabel::value = ();
@Apache::randomlabel::label_arr = ();	@Apache::randomlabel::label_arr = ();
@Apache::randomlabel::decription = ();	@Apache::randomlabel::description = ();
} elsif ($target eq 'edit') {	} elsif ($target eq 'edit') {
$result.=&Apache::edit::tag_start($target,$token);	$result.=&Apache::edit::tag_start($target,$token);
$result.=&Apache::edit::text_arg('Name:','name',$token).	$result.=&Apache::edit::text_arg('Name:','name',$token).