mirror of
https://git.FreeBSD.org/ports.git
synced 2024-11-18 00:10:04 +00:00
5c06167de9
- support a4 and letter papersizes after a repository copy from html2ps to html2ps-a4 and html2ps-letter. - use ${PERL} for substituting not ${PERL5}. Requested by: Andreas Klemm <andreas@FreeBSD.org> (mantainer)
27 lines
841 B
Plaintext
27 lines
841 B
Plaintext
--- html2ps.orig Sat Aug 9 20:59:05 1997
|
|
+++ html2ps Fri Sep 10 00:00:25 1999
|
|
@@ -1,5 +1,5 @@
|
|
: # Use perl
|
|
-eval 'exec perl -S $0 "$@"'
|
|
+eval 'exec !!PERL5!! -S $0 "$@"'
|
|
if $running_under_some_shell;
|
|
|
|
# This is html2ps version 1.0 beta1, an HTML-to-PostScript converter.
|
|
@@ -26,7 +26,7 @@
|
|
# Set the name of the global configuration file. See the installation notes
|
|
# and manual page for more details on configuration files.
|
|
|
|
-$globrc='/opt/tdb/lib/html2ps/html2psrc';
|
|
+$globrc='!!PREFIX!!/lib/html2ps/html2psrc';
|
|
|
|
$conf=<<'EOR';
|
|
@html2ps {
|
|
@@ -4072,6 +4072,7 @@
|
|
$URL=$url;
|
|
unless($url=~m|://|) {
|
|
if($url=~m|^http:(.*)|) {$url=$1}
|
|
+ if($url=~m|^file:(.*)|) {$url=$1}
|
|
if($url=~m|^/|) {$URL=$b1.$url} else {$URL=$b2.$url}
|
|
}
|
|
while($URL!~m|^\.\./| && $URL=~m|[^/]*/\.\./|) {$URL=$`.$'};
|