| … | |
… | |
| 517 | $out .= '\fbox{' if ($colcount == $opts{'box'}->[1] and $opts{'cnt'} == $opts{'box'}->[0]); |
517 | $out .= '\fbox{' if ($colcount == $opts{'box'}->[1] and $opts{'cnt'} == $opts{'box'}->[0]); |
| 518 | $element= shift(@elements); |
518 | $element= shift(@elements); |
| 519 | if(ref($element) eq 'Fraction') { |
519 | if(ref($element) eq 'Fraction') { |
| 520 | $element= $element->print_inline(); |
520 | $element= $element->print_inline(); |
| 521 | } |
521 | } |
|
|
522 | if($opts{'force_tex'}) { |
|
|
523 | $out .= "$element"; |
|
|
524 | } else { |
| 522 | $out .= '\\mbox{'."$element".'}'; |
525 | $out .= '\\mbox{'."$element".'}'; |
|
|
526 | } |
| 523 | $out .= '}' if ($colcount == $opts{'box'}->[1] and $opts{'cnt'} == $opts{'box'}->[0]); |
527 | $out .= '}' if ($colcount == $opts{'box'}->[1] and $opts{'cnt'} == $opts{'box'}->[0]); |
| 524 | $out .= " &"; |
528 | $out .= " &"; |
| 525 | } |
529 | } |
| 526 | chop($out); # remove last & |
530 | chop($out); # remove last & |
| 527 | $out .= "\\cr \n"; |
531 | $out .= "\\cr \n"; |
| 528 | # carriage returns must be added manually for tex |
532 | # carriage returns must be added manually for tex |