version 1.2, 2002/07/17 15:47:15
|
version 1.3, 2002/07/31 14:55:11
|
Line 70 while (my $token = $p->get_token())
|
Line 70 while (my $token = $p->get_token())
|
my $file = $attr->{'name'}; |
my $file = $attr->{'name'}; |
open (LATEX_FILE, $dirprefix . $file); |
open (LATEX_FILE, $dirprefix . $file); |
print <LATEX_FILE>; |
print <LATEX_FILE>; |
|
print "\n\n"; |
} |
} |
|
|
if ($tag eq 'tex') |
if ($tag eq 'tex') |
{ |
{ |
print "\n"; |
print "\n\n"; |
print $attr->{'content'}; |
print $attr->{'content'}; |
print "\n"; |
print "\n\n"; |
} |
} |
} |
} |
} |
} |