r59338 - in /trunk/libnet-ident-perl/debian: changelog patches/export-hooks.patch
chrisb at users.alioth.debian.org
chrisb at users.alioth.debian.org
Sun Jun 13 16:03:16 UTC 2010
Author: chrisb
Date: Sun Jun 13 16:03:02 2010
New Revision: 59338
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=59338
Log:
Refreshed export-hooks patch.
Modified:
trunk/libnet-ident-perl/debian/changelog
trunk/libnet-ident-perl/debian/patches/export-hooks.patch
Modified: trunk/libnet-ident-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libnet-ident-perl/debian/changelog?rev=59338&op=diff
==============================================================================
--- trunk/libnet-ident-perl/debian/changelog (original)
+++ trunk/libnet-ident-perl/debian/changelog Sun Jun 13 16:03:02 2010
@@ -18,6 +18,7 @@
* Updated debian/copyright to DEP-5 format.
* Switched to source format 3.0 (quilt), removed quilt framework.
* Improved package description.
+ * Refreshed export-hooks patch.
-- Chris Butler <chrisb at debian.org> Sun, 13 Jun 2010 15:34:04 +0100
Modified: trunk/libnet-ident-perl/debian/patches/export-hooks.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libnet-ident-perl/debian/patches/export-hooks.patch?rev=59338&op=diff
==============================================================================
--- trunk/libnet-ident-perl/debian/patches/export-hooks.patch (original)
+++ trunk/libnet-ident-perl/debian/patches/export-hooks.patch Sun Jun 13 16:03:02 2010
@@ -4,17 +4,8 @@
--- a/Ident.pm
+++ b/Ident.pm
-@@ -28,7 +28,7 @@ use vars qw(@ISA @EXPORT_OK $DEBUG $VERS
- # put the export hooks in the standard Exporter structures
- _export_hooks();
- # for compatibility mode, uncomment the next line @@ s/^#\s*// @@
--# @EXPORT = qw(_export_hook_fh);
-+ at EXPORT = qw(_export_hook_fh);
-
- $VERSION = sprintf("%d.%02d", q$Revision: 1.20 $ =~ /: (\d+)\.(\d+)/);
-
-@@ -505,7 +505,7 @@ sub geterror ($) {
- }
+@@ -27,7 +27,7 @@
+ );
# provide import magic
-sub _export_hooks () {
@@ -22,7 +13,16 @@
my($tag, $hook);
while ( ($tag, $hook) = each %EXPORT_HOOKS ) {
my $hookname = "_export_hook_$tag"; # pseudo-function name
-@@ -683,18 +683,18 @@ of the function calls above.
+@@ -41,7 +41,7 @@
+ # put the export hooks in the standard Exporter structures
+ _export_hooks();
+ # for compatibility mode, uncomment the next line @@ s/^#\s*// @@
+-# @EXPORT = qw(_export_hook_fh);
++ at EXPORT = qw(_export_hook_fh);
+
+ $VERSION = "1.22";
+
+@@ -687,18 +687,18 @@
# add a paragraph about compatibility mode if appropriate. The non-breaking
# spaces are to force a new paragraph.
# @@12 s/^#// @@
More information about the Pkg-perl-cvs-commits
mailing list