17 lines
610 B
Plaintext
17 lines
610 B
Plaintext
|
$OpenBSD: patch-Tk_MMutil_pm,v 1.1 2003/12/08 14:26:26 naddy Exp $
|
||
|
|
--- Tk/MMutil.pm.orig 2003-12-08 06:52:08.000000000 -0700
|
||
|
|
+++ Tk/MMutil.pm 2003-12-08 06:54:14.000000000 -0700
|
||
|
|
@@ -330,7 +330,11 @@ sub manifypods
|
||
|
|
my $self = shift;
|
||
|
|
# Maybe always call UNIX version - we HTMLize them later
|
||
|
|
local $_ = $self->MM::manifypods;
|
||
|
|
- if ($] >= 5.00565)
|
||
|
|
+ if ($] >= 5.008002)
|
||
|
|
+ {
|
||
|
|
+ s/(POD2MAN_EXE.*pod2man.*"--")/$1 --center "perl\/Tk Documentation" --release "Tk\$(VERSION)"/;
|
||
|
|
+ }
|
||
|
|
+ elsif ($] >= 5.00565)
|
||
|
|
{
|
||
|
|
s/(POD2MAN_EXE.*pod2man)/$1 --center "perl\/Tk Documentation" --release "Tk\$(VERSION)"/;
|
||
|
|
}
|