r29790 - in /branches/upstream/libpoe-component-client-dns-perl/current: CHANGES DNS.pm META.yml t/06_hosts.t

gregoa at users.alioth.debian.org gregoa at users.alioth.debian.org
Sat Jan 17 22:27:41 UTC 2009


Author: gregoa
Date: Sat Jan 17 22:27:38 2009
New Revision: 29790

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=29790
Log:
[svn-upgrade] Integrating new upstream version, libpoe-component-client-dns-perl (1.02)

Modified:
    branches/upstream/libpoe-component-client-dns-perl/current/CHANGES
    branches/upstream/libpoe-component-client-dns-perl/current/DNS.pm
    branches/upstream/libpoe-component-client-dns-perl/current/META.yml
    branches/upstream/libpoe-component-client-dns-perl/current/t/06_hosts.t

Modified: branches/upstream/libpoe-component-client-dns-perl/current/CHANGES
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libpoe-component-client-dns-perl/current/CHANGES?rev=29790&op=diff
==============================================================================
--- branches/upstream/libpoe-component-client-dns-perl/current/CHANGES (original)
+++ branches/upstream/libpoe-component-client-dns-perl/current/CHANGES Sat Jan 17 22:27:38 2009
@@ -1,3 +1,12 @@
+=================================
+2009-01-13T20:18:27.751944Z v1_02
+=================================
+
+  2009-01-13 20:08:27 (r70) by rcaputo; DNS.pm M; t/06_hosts.t M
+
+    A host-file test was failing because its address segments were wider
+    than single octets. 
+
 =================================
 2008-10-29T16:19:41.680362Z v1_01
 =================================

Modified: branches/upstream/libpoe-component-client-dns-perl/current/DNS.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libpoe-component-client-dns-perl/current/DNS.pm?rev=29790&op=diff
==============================================================================
--- branches/upstream/libpoe-component-client-dns-perl/current/DNS.pm (original)
+++ branches/upstream/libpoe-component-client-dns-perl/current/DNS.pm Sat Jan 17 22:27:38 2009
@@ -1,4 +1,4 @@
-# $Id: DNS.pm 68 2008-10-29 16:18:54Z rcaputo $
+# $Id: DNS.pm 70 2009-01-13 20:08:27Z rcaputo $
 # License and documentation are after __END__.
 
 package POE::Component::Client::DNS;
@@ -6,7 +6,7 @@
 use strict;
 
 use vars qw($VERSION);
-$VERSION = '1.01';
+$VERSION = '1.02';
 
 use Carp qw(croak);
 

Modified: branches/upstream/libpoe-component-client-dns-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libpoe-component-client-dns-perl/current/META.yml?rev=29790&op=diff
==============================================================================
--- branches/upstream/libpoe-component-client-dns-perl/current/META.yml (original)
+++ branches/upstream/libpoe-component-client-dns-perl/current/META.yml Sat Jan 17 22:27:38 2009
@@ -1,16 +1,22 @@
 --- #YAML:1.0
-name:                POE-Component-Client-DNS
-version:             1.01
-abstract:            Non-blocking/concurrent DNS queries using Net::DNS and POE
-license:             perl
-author:              
+name:               POE-Component-Client-DNS
+version:            1.02
+abstract:           Non-blocking/concurrent DNS queries using Net::DNS and POE
+author:
     - Rocco Caputo <rcaputo at cpan.org>
-generated_by:        ExtUtils::MakeMaker version 6.44
-distribution_type:   module
-requires:     
-    Net::DNS:                      0.59
-    POE:                           0.31
-    Test::More:                    0
+license:            perl
+distribution_type:  module
+configure_requires:
+    ExtUtils::MakeMaker:  0
+requires:
+    Net::DNS:    0.59
+    POE:         0.31
+    Test::More:  0
+no_index:
+    directory:
+        - t
+        - inc
+generated_by:       ExtUtils::MakeMaker version 6.48
 meta-spec:
-    url:     http://module-build.sourceforge.net/META-spec-v1.3.html
-    version: 1.3
+    url:      http://module-build.sourceforge.net/META-spec-v1.4.html
+    version:  1.4

Modified: branches/upstream/libpoe-component-client-dns-perl/current/t/06_hosts.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libpoe-component-client-dns-perl/current/t/06_hosts.t?rev=29790&op=diff
==============================================================================
--- branches/upstream/libpoe-component-client-dns-perl/current/t/06_hosts.t (original)
+++ branches/upstream/libpoe-component-client-dns-perl/current/t/06_hosts.t Sat Jan 17 22:27:38 2009
@@ -1,5 +1,5 @@
 #!/usr/bin/perl
-# $Id: 06_hosts.t 67 2008-10-15 03:18:31Z rcaputo $
+# $Id: 06_hosts.t 70 2009-01-13 20:08:27Z rcaputo $
 # vim: filetype=perl
 
 # Test the hosts file stuff.
@@ -60,7 +60,7 @@
   # 2. Test with a hosts file that contains a host match.
   unlink HOSTS_FILE;  # Changes inode!
   open(HF, ">" . HOSTS_FILE) or die "couldn't write hosts file: $!";
-  print HF "123.456.789.012 poe.perl.org\n";
+  print HF "123.45.67.89 poe.perl.org\n";
   close HF;
 
   $resolver->resolve(
@@ -74,7 +74,7 @@
   my $response = $_[ARG0];
   my $address = a_data($response);
   ok(
-    $address eq "123.456.789.012",
+    $address eq "123.45.67.89",
     "lookup when hosts file matches ($address)"
   );
 




More information about the Pkg-perl-cvs-commits mailing list