--- loncom/homework/randomlabel.pm 2006/05/30 12:45:37 1.82 +++ loncom/homework/randomlabel.pm 2006/08/29 10:42:59 1.83 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # random labelling tool # -# $Id: randomlabel.pm,v 1.82 2006/05/30 12:45:37 www Exp $ +# $Id: randomlabel.pm,v 1.83 2006/08/29 10:42:59 foxr Exp $ # # Copyright Michigan State University Board of Trustees # @@ -296,10 +296,20 @@ sub make_eps_image { &Apache::lonxml::debug("Image size: $height_param x $width_param"); my $dirtywidth=$width_param+5; + # + # Note that lonprintout/prinout will conspire to replace + # spaces in paths and names with _'s since spacess cause problems + # for latex included filenames. Therefore: + # + my $safe_path = $path; + $safe_path =~ s/ /\_/g; + my $safe_file = $file; + $safe_file =~ s/ /\_/g; + my $result ="\n".'\vspace*{2mm}\noindent'."\n". '\parbox{'.$dirtywidth. ' mm}{ \noindent \epsfxsize='.$width_param. - ' mm \epsffile{'.$path.$file. + ' mm \epsffile{'.$safe_path.$safe_file. '}\setlength{\unitlength}{1mm}'."\n".' \begin{picture}('. $width_param.','.$height_param.')(0,-'.$height_param.')'."\n"; my $magick = Image::Magick->new; @@ -482,6 +492,11 @@ sub end_labelgroup { } elsif ( $type eq 'image') { my ($path,$file) = &Apache::londefdef::get_eps_image($label); my $image_name = $path.$file; + # + # Note that spaces in e.. \includegraphics cause problems for Latex + # so they get replaced by _'s by lonprintout/printout and us: + # + $image_name =~ s/ /\_/g; my $label_width = &get_label_width($label); $result .= '\includegraphics[width='.$label_width.'mm]{'