1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
|
--- code2html
+++ code2html
@@ -1,4 +1,4 @@
-#!/usr/bin/perl -w
+#!@GENTOO_PORTAGE_EPREFIX@/usr/bin/perl -w
use locale;
my $vernr = "0.9.1";
my $monthshort = "Jan";
@@ -45,9 +45,9 @@
# PP: A hash would be nicer but then it would not possible to get the keys in this very order (AFAIK)
# PP: If names contain meta characters, then those must be metaquoted (if you don't want the meta chars to be meta chars of course)
my @CGI_ENCODING = (
- ['bzip2' , '/usr/bin/bzip2' , '--stdout' ],
- ['gzip' , '/bin/gzip' , '--stdout' ],
- ['compress' , '/usr/bin/compress' , '-c' ]
+ ['bzip2' , '@GENTOO_PORTAGE_EPREFIX@/usr/bin/bzip2' , '--stdout' ],
+ ['gzip' , '@GENTOO_PORTAGE_EPREFIX@/bin/gzip' , '--stdout' ],
+ ['compress' , '@GENTOO_PORTAGE_EPREFIX@/usr/bin/compress' , '-c' ]
);
@@ -147,7 +147,7 @@
# building up the database
# newer entries overwrite old ones
my @CONFIG_FILES;
- push @CONFIG_FILES, "/etc/code2html.config";
+ push @CONFIG_FILES, "@GENTOO_PORTAGE_EPREFIX@/etc/code2html.config";
push @CONFIG_FILES, $ENV{'HOME'}."/.code2html.config" if (defined($ENV{'HOME'}));
push @CONFIG_FILES, split(/:/,$ENV{'CODE2HTML_CONFIG'}) if ($ENV{'CODE2HTML_CONFIG'});
push @CONFIG_FILES, split(/:/,$params{'langfile'}) if defined($params{'langfile'});
|
GitWeb
