[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.97

version 1.94, 2002/10/08 20:35:19 version 1.97, 2002/11/06 16:50:11
Line 845  EDITBUTTON Line 845  EDITBUTTON
        $currentstring .= $token->[4];         $currentstring .= $token->[4];
     } elsif ($target eq 'tex') {      } elsif ($target eq 'tex') {
  if ($$tagstack[-2] ne 'sub' && $$tagstack[-2] ne 'sup') {   if ($$tagstack[-2] ne 'sub' && $$tagstack[-2] ne 'sup') {
     $currentstring .= '\vskip 0 mm';      $currentstring .= '\vskip 0.2 mm';
  }   }
     } elsif ($target eq 'latexsource') {      } elsif ($target eq 'latexsource') {
  $currentstring .= '\\';   $currentstring .= '\\';
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;      my $shorthand = ($NumberEmptyLength+1)*4;
       $output =~ s/\$SpacePerColumn/$SpacePerColumn - $shorthand 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 1592  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.'}} ';
       }        }
   } 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 1601  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.'}} ';
   }    }
       } 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 1609  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.'}} ';
       }        }
   }    }
       } else {        } else {
Removed from v.1.94  
changed lines
  Added in v.1.97

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