[LON-CAPA-cvs] cvs: loncom /xml lonplot.pm

albertel lon-capa-cvs-allow@mail.lon-capa.org
Fri, 03 Aug 2007 05:56:04 -0000


albertel		Fri Aug  3 01:56:04 2007 EDT

  Modified files:              
    /loncom/xml	lonplot.pm 
  Log:
  - BUG#5339, tex printing with classic mode needs no pfb file
  
  
Index: loncom/xml/lonplot.pm
diff -u loncom/xml/lonplot.pm:1.120 loncom/xml/lonplot.pm:1.121
--- loncom/xml/lonplot.pm:1.120	Mon Jul 30 17:50:29 2007
+++ loncom/xml/lonplot.pm	Fri Aug  3 01:56:00 2007
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Dynamic plot
 #
-# $Id: lonplot.pm,v 1.120 2007/07/30 21:50:29 albertel Exp $
+# $Id: lonplot.pm,v 1.121 2007/08/03 05:56:00 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -687,6 +687,7 @@
 	 face       => 'classic',
 	 file       => 'DejaVuSansMono-Bold',
 	 printname  => 'Helvetica',
+	 tex_no_file => 1,
      },
      'sans-serif' => {
 	 face       => 'sans-serif',
@@ -1159,9 +1160,11 @@
 	$gnuplot_input .= "set output\n";
     } elsif ($target eq 'tex') {
 	$gnuplot_input .= "set term postscript eps enhanced $Apache::lonplot::plot{'plotcolor'} solid ";
-	$gnuplot_input .=
-	    'fontfile "'.$Apache::lonnet::perlvar{'lonFontsDir'}.
-	    '/'.$font_properties->{'file'}.'.pfb" ';
+	if (!$font_properties->{'tex_no_file'}) {
+	    $gnuplot_input .=
+		'fontfile "'.$Apache::lonnet::perlvar{'lonFontsDir'}.
+		'/'.$font_properties->{'file'}.'.pfb" ';
+	}
 	$gnuplot_input .= ' "'.$font_properties->{'printname'}.'" ';
 	$gnuplot_input .= $fontsize;
 	$gnuplot_input .= "\nset output \"/home/httpd/perl/tmp/".