version 1.45, 2016/08/20 14:28:52
|
version 1.46, 2017/04/01 13:55:32
|
Line 278 sub handler {
|
Line 278 sub handler {
|
$filenames =~ s/:/,/g; |
$filenames =~ s/:/,/g; |
my @files = split(/,/, $filenames); |
my @files = split(/,/, $filenames); |
$firstfile = '/adm/help/'.$files[0].'.hlp'; |
$firstfile = '/adm/help/'.$files[0].'.hlp'; |
|
my $count = 0; |
|
|
for my $filename (@files) { |
for my $filename (@files) { |
if (-e $docroot.'/adm/help/tex/'. |
if (-e $docroot.'/adm/help/tex/'. |
Line 289 sub handler {
|
Line 290 sub handler {
|
. '/adm/help/tex/'.$filename.'.tex')) |
. '/adm/help/tex/'.$filename.'.tex')) |
or return HTTP_NOT_FOUND; |
or return HTTP_NOT_FOUND; |
$tex .= join('', <$file>); |
$tex .= join('', <$file>); |
|
$count ++; |
|
if (scalar(@files) > $count) { |
|
$tex .= '\hrulefill'; |
|
} |
} |
} |
|
|
$text = &render($tex, $docroot); |
$text = &render($tex, $docroot); |