- starting preparation for Th.

[packages/perl-Tk.git] / perl-Tk-man_section.patch

diff -Nru Tk-804.027.vanilla/Tk/MMutil.pm Tk-804.027/Tk/MMutil.pm
--- Tk-804.027.vanilla/Tk/MMutil.pm	2004-03-27 15:55:55.000000000 +0100
+++ Tk-804.027/Tk/MMutil.pm	2005-03-11 20:44:29.614912584 +0100
@@ -366,7 +366,7 @@
  local $_ = $self->MM::manifypods;
  if ($] >= 5.00565)
   {
-   s/(POD2MAN_EXE.*pod2man.*)/$1 --center "perl\/Tk Documentation" --release "Tk\$(VERSION)"/;
+   s/(POD2MAN_EXE.*pod2man.*)/$1 --section=3pm --center "perl\/Tk Documentation" --release "Tk\$(VERSION)"/;
   }
  elsif ($] >= 5.003)
   {