[BACK]Return to londefdef.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / xml

Diff for /loncom/xml/londefdef.pm between versions 1.94 and 1.95

version 1.94, 2002/10/08 20:35:19 version 1.95, 2002/10/28 18:20:08
Line 1412  sub start_table { Line 1412  sub start_table {
  if ($signature) {   if ($signature) {
     my $NumberEmptyLength = $how_many_columns - $filled_columns;      my $NumberEmptyLength = $how_many_columns - $filled_columns;
     my $SpacePerColumn = '(\textwidth '.$available_space.')/'.$NumberEmptyLength;      my $SpacePerColumn = '(\textwidth '.$available_space.')/'.$NumberEmptyLength;
     $output =~ s/\$SpacePerColumn/$SpacePerColumn/g;      $output =~ s/\$SpacePerColumn/$SpacePerColumn - 4 mm/g;
  }   }
  $Apache::londefdef::table[-1]{'output'} .= $header_of_table.$output.$Apache::londefdef::table[-1]{'hinc'}.'\end{tabular}\vskip 0 mm ';   $Apache::londefdef::table[-1]{'output'} .= $header_of_table.$output.$Apache::londefdef::table[-1]{'hinc'}.'\end{tabular}\vskip 0 mm ';
  if ($#Apache::londefdef::table > 0) {   if ($#Apache::londefdef::table > 0) {
Line 1591  sub start_table { Line 1591  sub start_table {
   if (-e $newsrc) {    if (-e $newsrc) {
                       #eps counterpart for image exist                         #eps counterpart for image exist 
       if ($path) {        if ($path) {
   $currentstring .= '\noindent\graphicspath{{'.$path.'}}\fbox{\includegraphics[width='.$width_param.' mm]{'.$file.'}} ';    $currentstring .= '\vskip 1 mm \noindent\graphicspath{{'.$path.'}}\fbox{\includegraphics[width='.$width_param.' mm]{'.$file.'}}\vskip 1 mm ';
       }        }
   } else {    } else {
                       #there is no eps counterpart for image - check for ps one                        #there is no eps counterpart for image - check for ps one
Line 1600  sub start_table { Line 1600  sub start_table {
   #ps counterpart for image exist     #ps counterpart for image exist 
   $file =~ s/\.eps$/\.ps/;    $file =~ s/\.eps$/\.ps/;
   if ($path) {    if ($path) {
       $currentstring .= '\noindent\graphicspath{{'.$path.'}}\fbox{\includegraphics[width='.$width_param.' mm]{'.$file.'}} ';        $currentstring .= '\vskip 1 mm \noindent\graphicspath{{'.$path.'}}\fbox{\includegraphics[width='.$width_param.' mm]{'.$file.'}}\vskip 1 mm ';
   }    }
       } else {        } else {
   #there aren't eps or ps - so create eps     #there aren't eps or ps - so create eps 
Line 1608  sub start_table { Line 1608  sub start_table {
   my $filename = "/home/httpd/prtspool/$ENV{'user.name'}_$ENV{'user.domain'}_printout.dat";    my $filename = "/home/httpd/prtspool/$ENV{'user.name'}_$ENV{'user.domain'}_printout.dat";
   $temp_file = Apache::File->new('>>'.$filename);     $temp_file = Apache::File->new('>>'.$filename); 
   print $temp_file "$src\n";    print $temp_file "$src\n";
   $currentstring .= '\graphicspath{{/home/httpd/prtspool/}}\fbox{\includegraphics[width='.$width_param.' mm]{'.$file.'}} ';    $currentstring .= '\vskip 1 mm \graphicspath{{/home/httpd/prtspool/}}\fbox{\includegraphics[width='.$width_param.' mm]{'.$file.'}}\vskip 1 mm ';
       }        }
   }    }
       } else {        } else {
Removed from v.1.94  
changed lines
  Added in v.1.95

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>