Subject: Re: p5-Tk broken for me
To: Perry E. Metzger <perry@piermont.com>
From: Hiramatsu Yoshifumi <hiramatu@boreas.dti.ne.jp>
List: tech-pkg
Date: 01/23/2004 01:36:40
It seems that pod2man command line syntax is changed from former
perl distributions, and this patch follows the difference.

diff -bur p5-Tk.orig/distinfo p5-Tk/distinfo
--- p5-Tk.orig/distinfo	Fri Jan 23 01:19:11 2004
+++ p5-Tk/distinfo	Fri Jan 23 01:21:23 2004
@@ -2,5 +2,5 @@
 
 SHA1 (Tk-800.024.tar.gz) = 65f0fef0d2ca66b257cde40d7edc63b30e33ef65
 Size (Tk-800.024.tar.gz) = 3489636 bytes
-SHA1 (patch-aa) = ad5b7a96006aa2c09a68c202a2e132b2c796dd8e
+SHA1 (patch-aa) = 1e9ddaf2ffb7c92e032f41253b5703d14cecf5a4
 SHA1 (patch-ab) = 9b01440c4035b71620e5a1e835e290f01b210f53
diff -bur p5-Tk.orig/patches/patch-aa p5-Tk/patches/patch-aa
--- p5-Tk.orig/patches/patch-aa	Fri Jan 23 01:19:11 2004
+++ p5-Tk/patches/patch-aa	Fri Jan 23 01:21:23 2004
@@ -1,8 +1,6 @@
-$NetBSD$
-
---- Tk/MMutil.pm.orig	Thu Mar 30 15:37:15 2000
-+++ Tk/MMutil.pm
-@@ -248,7 +248,7 @@
+--- Tk/MMutil.pm.orig	Tue Mar  5 23:27:40 2002
++++ Tk/MMutil.pm	Fri Jan 23 00:40:59 2004
+@@ -272,7 +272,7 @@
     $self->{'LDFLAGS'} =~ s/-(debug|pdb:\w+)\s+//g;
     $self->{'LDDLFLAGS'} =~ s/-(debug|pdb:\w+)\s+//g;
    }
@@ -11,3 +9,16 @@
    {
     # -Bforcearchive is bad news for Tk - we don't want all of libpTk.a in all .so-s.
     $self->{'LDDLFLAGS'} =~ s/-Bforcearchive\s*//g;
+@@ -330,7 +330,11 @@
+  my $self = shift;
+  # Maybe always call UNIX version - we HTMLize them later
+  local $_ = $self->MM::manifypods;
+- if ($] >= 5.00565)
++ if ($] >= 5.008000)
++ {
++ s/(POD2MAN_EXE.*pod2man)/$1 -c "perl\/Tk Documentation" --release "Tk\\$(VERSION)"/;
++ }
++ elsif ($] >= 5.00565)
+   {
+    s/(POD2MAN_EXE.*pod2man)/$1 --center "perl\/Tk Documentation" --release "Tk\$(VERSION)"/;
+   }