[LON-CAPA-cvs] cvs: loncom /interface printout.pl

albertel lon-capa-cvs@mail.lon-capa.org
Thu, 15 Dec 2005 18:41:21 -0000


albertel		Thu Dec 15 13:41:21 2005 EDT

  Modified files:              
    /loncom/interface	printout.pl 
  Log:
  - some small look and feel improvements to the print results screen
  
  
Index: loncom/interface/printout.pl
diff -u loncom/interface/printout.pl:1.93 loncom/interface/printout.pl:1.94
--- loncom/interface/printout.pl:1.93	Tue Nov 15 15:53:06 2005
+++ loncom/interface/printout.pl	Thu Dec 15 13:41:21 2005
@@ -186,6 +186,8 @@
       @names_pack=split(/_ENDPERSON_/,$student_names);
   }
 
+print "<a href=\"$backref\"><b>Return</b></a> to last resource.<br /><br />";
+
   my $figfile = $texfile;
   $figfile =~ s/^([^\.]+printout)[^t]+\.tex/$1\.dat/;
   my $duefile = $texfile;
@@ -201,6 +203,7 @@
       my $noteps;
       my %prog_state;
       if ($advanced_role) { %prog_state=&Apache::lonhtmlcommon::Create_PrgWin('','Coverting Images to EPS','Picture Conversion Status',$#content_of_file,'inline','80');  }
+      print('<br />');
       foreach my $not_eps (@content_of_file) {
 	  chomp($not_eps);
 	  if ($not_eps ne '') {
@@ -269,7 +272,6 @@
 
 my $ind=-1;
 my %prog_state;
-print "<a href=\"$backref\"><b>Return</b></a> to last resource.<br /><br />";
 if ($advanced_role) { %prog_state=&Apache::lonhtmlcommon::Create_PrgWin('','Print Status','Class Print Status',$number_of_files,'inline','80'); }
 print "<br />";
 my $num_files = @texfile;