blob: 44e30b44c5ac7e329a15fc2f942830c643fca654 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
package LaTeXML::Package::Pool;
use strict;
use warnings;
use LaTeXML::Package;
RequirePackage('xparse');
DefPrimitive('\csname stex_kpsewhich:Nn\endcsname Token {}',sub {
my ($stomach, $target, $value) = @_;
$value = ToString(Expand($value));
my $out = ToString(`kpsewhich $value`);
$out =~ s/^\s+//;
$out =~ s/\s+$//;
Note("Here: $value => $out");
my @ret = Explode($out);
DefMacroI($target, undef, Tokens(@ret));
},locked=>1);
\DefMacroI('\stex@backend',undef,Explode("latexml"));
InputDefinitions('stex', type => 'sty', noltxml => 1);
1;
|