|
version 1.67, 2005/04/22 14:03:56
|
version 1.68, 2005/05/10 11:24:01
|
|
Line 467 sub end_image {
|
Line 467 sub end_image {
|
| $result=&Apache::edit::end_table(); |
$result=&Apache::edit::end_table(); |
| } elsif ($target eq 'tex') { |
} elsif ($target eq 'tex') { |
| my $src = &Apache::lonxml::endredirection(); |
my $src = &Apache::lonxml::endredirection(); |
| my ($path,$file) = &Apache::londefdef::get_eps_image($src); |
|
| my ($height_param,$width_param)= |
# There may be all sorts of whitespace on fore and aft: |
| &Apache::londefdef::image_size($src,0.3,$parstack,$safeeval); |
|
| $Apache::response::foilgroup{"$name.image"} ='\vskip 0 mm \noindent\graphicspath{{'.$path.'}}\includegraphics[width='.$width_param.' mm]{'.$file.'} '; |
$src =~ s/\s+$//; |
| |
$src =~ s/^\s+//; |
| |
|
| |
# |
| |
# Gnuplot e.g. just generates the latex to put inplace. |
| |
# |
| |
my $graphinclude; |
| |
if ($src =~ /^\\graphicspath/) { |
| |
$graphinclude = $src; |
| |
} else { |
| |
my ($path,$file) = &Apache::londefdef::get_eps_image($src); |
| |
my ($height_param,$width_param)= |
| |
&Apache::londefdef::image_size($src,0.3,$parstack,$safeeval); |
| |
$graphinclude = '\graphicspath{{'.$path.'}}\includegraphics[width='.$width_param.' mm]{'.$file.'}'; |
| |
} |
| |
$Apache::response::foilgroup{"$name.image"} ='\vskip 0 mm \noindent '.$graphinclude; |
| } |
} |
| return $result; |
return $result; |
| } |
} |
![[BACK]](/icons/back.gif){kind=icon}
Return to imageresponse.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / homework