pkg/42794: [devel/p5-Inline]Update to 0.46

[wenheping%gmail.com@localhost]

>Number:         42794
>Category:       pkg
>Synopsis:       [devel/p5-Inline]Update to 0.46
>Confidential:   no
>Severity:       non-critical
>Priority:       low
>Responsible:    pkg-manager
>State:          open
>Class:          sw-bug
>Submitter-Id:   net
>Arrival-Date:   Fri Feb 12 10:15:00 +0000 2010
>Originator:     Wen Heping
>Release:        NetBSD-5.0.1
>Organization:
private
>Environment:
NetBSD NB501 5.0.1 NetBSD 5.0.1 (GENERIC) #0: Thu Jul 30 01:39:11 UTC 2009  
builds%b8.netbsd.org@localhost:/home/builds/ab/netbsd-5-0-1-RELEASE/i386/200907292356Z-obj/home/builds/ab/netbsd-5-0-1-RELEASE/src/sys/arch/i386/compile/GENERIC
 i386
>Description:
version: 0.46
date:    Fri Feb 12 2010
 Same as 0.45_02 (plus some minor doc alterations in Inline.pod).

version: 0.45_02
date:    Fri Feb 5 2010
 Changes to Inline.pm, denter.pm, and Inline.pod relating to "fixing" untainting
 (to the extent that untainting of -T inline scripts works as documented).
 Many thanks to Patrick LeBoutillier.
 Also added C/t/08core.t (which contains -T on the shebang line) as a basic test
 of untainting. (RT ticket 13084)

version: 0.45_01
date:    Thurs Jan 28 2010
C/C.pod - document that *fully qualified* paths for LIBS, INC, TYPEMAPS and 
MYEXTLIB are needed. (RT ticket 5207)
Inline.pm - remove "defined" from "defined %main::Inline::Config::" as that 
usage causes a deprecation warning with perl-5.11 and later. (RT ticket 53227)
Inline.pm - fix sub push_overrides (RT ticket 49669)
            This change responsible for "Subroutine Inline::C::get_parser 
redefined"
            warnings that can occur during build stage under certain 
circumstances.
denter.pm - local()ise $_ (in four places) (RT ticket 16801)
Inline.pod - doc correction (thanks Alejandro Ochoa).
C/Makefile.PL - accommodate 'ccache cc' (RT ticket 40140)
              - accommodate ActivePerl-5.10.1 and later (RT ticket 49419)
C/Cookbook.pod - typo fixes (thanks Brad Barber)
               - Change "NAME" from "C Cookbook ..." to "Inline::C-Cookbook 
...".
                (RT ticket 45417)
>How-To-Repeat:

>Fix:
diff -urN p5-Inline.orig/Makefile p5-Inline/Makefile
--- p5-Inline.orig/Makefile     2010-02-12 19:08:17.000000000 +0800
+++ p5-Inline/Makefile  2010-02-12 19:08:33.000000000 +0800
@@ -1,7 +1,7 @@
 # $NetBSD: Makefile,v 1.15 2008/10/19 19:17:55 he Exp $
 #

-DISTNAME=      Inline-0.45
+DISTNAME=      Inline-0.46
 PKGNAME=       p5-${DISTNAME}
 SVR4_PKGNAME=  p5inl
 CATEGORIES=    devel perl5
diff -urN p5-Inline.orig/distinfo p5-Inline/distinfo
--- p5-Inline.orig/distinfo     2010-02-12 19:08:17.000000000 +0800
+++ p5-Inline/distinfo  2010-02-13 02:07:46.000000000 +0800
@@ -1,6 +1,6 @@
 $NetBSD: distinfo,v 1.3 2005/02/23 22:24:26 agc Exp $

-SHA1 (Inline-0.45.tar.gz) = a2d9ef44861e66e573fc7ffb7e6ed7ab92a59038
-RMD160 (Inline-0.45.tar.gz) = 0563af1b2c52c26190cd2bef4f724395d92101e0
-Size (Inline-0.45.tar.gz) = 93844 bytes
-SHA1 (patch-aa) = 1212d464a76967d9c019fd246e0da2feb5dc9892
+SHA1 (Inline-0.46.tar.gz) = b1718517bdd4a9dd4603c9a35a2575e7958440a4
+RMD160 (Inline-0.46.tar.gz) = dffc15351730722e6899953517e9673b0a4dd2ff
+Size (Inline-0.46.tar.gz) = 94716 bytes
+SHA1 (patch-aa) = 796851711d818154f6df4b232117db9def589efc
diff -urN p5-Inline.orig/patches/patch-aa p5-Inline/patches/patch-aa
--- p5-Inline.orig/patches/patch-aa     2010-02-12 19:08:17.000000000 +0800
+++ p5-Inline/patches/patch-aa  2010-02-13 01:30:53.000000000 +0800
@@ -1,25 +1,20 @@
-$NetBSD$
-
-Include Inline::C without prompting.
-
---- C/Makefile.PL.orig 2008-11-10 11:35:43.000000000 +0100
-+++ C/Makefile.PL
-@@ -58,12 +58,12 @@ END
- # '
- }
-
--my $answer = '';
--my $default = $found ? "y" : "n";
--while (1) {
--    $answer = prompt ('Do you want to install Inline::C?', $default);
--    last if $answer =~ /^(y|yes|n|no)$/i;
--}
-+my $answer = 'y';
-+#my $default = $found ? "y" : "n";
-+#while (1) {
-+#    $answer = prompt ('Do you want to install Inline::C?', $default);
-+#    last if $answer =~ /^(y|yes|n|no)$/i;
-+#}
-
- if ($answer =~ /^(y|yes)$/i) {
-     WriteMakefile(
+--- C/Makefile.PL.orig 2010-02-13 01:28:27.000000000 +0800
++++ C/Makefile.PL      2010-02-13 01:30:18.000000000 +0800
+@@ -71,12 +71,12 @@
+ # '
+ }
+
+-my $answer = '';
++my $answer = 'y';
+ my $default = $found ? "y" : "n";
+-while (1) {
+-    $answer = prompt ('Do you want to install Inline::C?', $default);
+-    last if $answer =~ /^(y|yes|n|no)$/i;
+-}
++#while (1) {
++#    $answer = prompt ('Do you want to install Inline::C?', $default);
++#    last if $answer =~ /^(y|yes|n|no)$/i;
++#}
+
+ if ($answer =~ /^(y|yes)$/i) {
+     WriteMakefile(