[LON-CAPA-cvs] cvs: loncom /homework randomlabel.pm

foxr lon-capa-cvs@mail.lon-capa.org
Tue, 12 Apr 2005 21:41:29 -0000


foxr		Tue Apr 12 17:41:29 2005 EDT

  Modified files:              
    /loncom/homework	randomlabel.pm 
  Log:
  Got image labels to paste on printouts.  Need to still figure out scaling.
  
  
  
Index: loncom/homework/randomlabel.pm
diff -u loncom/homework/randomlabel.pm:1.70 loncom/homework/randomlabel.pm:1.71
--- loncom/homework/randomlabel.pm:1.70	Tue Apr 12 07:03:08 2005
+++ loncom/homework/randomlabel.pm	Tue Apr 12 17:41:28 2005
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # random labelling tool
 #
-# $Id: randomlabel.pm,v 1.70 2005/04/12 11:03:08 foxr Exp $
+# $Id: randomlabel.pm,v 1.71 2005/04/12 21:41:28 foxr Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -307,7 +307,10 @@
 		$result.= $TeXsize.' \bf '.$label."}\n";
 		&add_vars($gname,$i,$label,$idx_arr[$i],$value,'',$safeeval);
 	    } elsif ( $type eq 'image') {
-		$result .=  '\includegraphics{'.$label."}}\n";
+		my ($path,$file) = &Apache::londefdef::get_eps_image($label);
+		my $image_name = $path.$file;
+		$result .=  '\includegraphics{'
+		            .$image_name."}}\n";
 		&add_vars($gname,$i,
 			  $Apache::randomlabel::description[$idx_arr[$i]],
 			  $idx_arr[$i],$value,$label,$safeeval);