r63793 - in /trunk/libfile-changenotify-perl: ./ debian/ lib/File/ lib/File/ChangeNotify/ lib/File/ChangeNotify/Watcher/

carnil at users.alioth.debian.org carnil at users.alioth.debian.org
Sat Oct 16 06:52:10 UTC 2010


Author: carnil
Date: Sat Oct 16 06:52:02 2010
New Revision: 63793

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=63793
Log:
* New upstream release (0.17)
* New upstream release (0.18)

Modified:
    trunk/libfile-changenotify-perl/Build.PL
    trunk/libfile-changenotify-perl/Changes
    trunk/libfile-changenotify-perl/META.json
    trunk/libfile-changenotify-perl/META.yml
    trunk/libfile-changenotify-perl/Makefile.PL
    trunk/libfile-changenotify-perl/README
    trunk/libfile-changenotify-perl/SIGNATURE
    trunk/libfile-changenotify-perl/debian/changelog
    trunk/libfile-changenotify-perl/dist.ini
    trunk/libfile-changenotify-perl/lib/File/ChangeNotify.pm
    trunk/libfile-changenotify-perl/lib/File/ChangeNotify/Event.pm
    trunk/libfile-changenotify-perl/lib/File/ChangeNotify/Watcher.pm
    trunk/libfile-changenotify-perl/lib/File/ChangeNotify/Watcher/Default.pm
    trunk/libfile-changenotify-perl/lib/File/ChangeNotify/Watcher/Inotify.pm
    trunk/libfile-changenotify-perl/lib/File/ChangeNotify/Watcher/KQueue.pm

Modified: trunk/libfile-changenotify-perl/Build.PL
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libfile-changenotify-perl/Build.PL?rev=63793&op=diff
==============================================================================
--- trunk/libfile-changenotify-perl/Build.PL (original)
+++ trunk/libfile-changenotify-perl/Build.PL Sat Oct 16 06:52:02 2010
@@ -24,6 +24,7 @@
     'File::Path' => '0',
     'File::Temp' => '0',
     'Module::Build' => '0.3601',
+    'Test::Exception' => '0',
     'Test::More' => '0.88'
   },
   'configure_requires' => {
@@ -35,7 +36,7 @@
     'Dave Rolsky <autarch at urth.org>'
   ],
   'dist_name' => 'File-ChangeNotify',
-  'dist_version' => '0.17',
+  'dist_version' => '0.18',
   'license' => 'artistic_2',
   'module_name' => 'File::ChangeNotify',
   'recommends' => {},

Modified: trunk/libfile-changenotify-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libfile-changenotify-perl/Changes?rev=63793&op=diff
==============================================================================
--- trunk/libfile-changenotify-perl/Changes (original)
+++ trunk/libfile-changenotify-perl/Changes Sat Oct 16 06:52:02 2010
@@ -1,3 +1,10 @@
+0.18   2010-10-15
+
+- Always make a Default watcher object if we cannot load an OS-specific class.
+
+- Add Test::Exception as a test prereq.
+
+
 0.17   2010-10-04
 
 - Loading File::ChangeNotify always loads the Default watcher class. This will

Modified: trunk/libfile-changenotify-perl/META.json
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libfile-changenotify-perl/META.json?rev=63793&op=diff
==============================================================================
--- trunk/libfile-changenotify-perl/META.json (original)
+++ trunk/libfile-changenotify-perl/META.json Sat Oct 16 06:52:02 2010
@@ -43,6 +43,7 @@
          "requires" : {
             "File::Path" : 0,
             "File::Temp" : 0,
+            "Test::Exception" : 0,
             "Test::More" : "0.88"
          }
       }
@@ -59,6 +60,6 @@
          "web" : "http://hg.urth.org/hg/File-ChangeNotify"
       }
    },
-   "version" : "0.17"
+   "version" : "0.18"
 }
 

Modified: trunk/libfile-changenotify-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libfile-changenotify-perl/META.yml?rev=63793&op=diff
==============================================================================
--- trunk/libfile-changenotify-perl/META.yml (original)
+++ trunk/libfile-changenotify-perl/META.yml Sat Oct 16 06:52:02 2010
@@ -6,6 +6,7 @@
   File::Path: 0
   File::Temp: 0
   Module::Build: 0.3601
+  Test::Exception: 0
   Test::More: 0.88
 configure_requires:
   ExtUtils::MakeMaker: 6.31
@@ -31,4 +32,4 @@
 resources:
   bugtracker: http://rt.cpan.org/NoAuth/Bugs.html?Dist=File-ChangeNotify
   repository: http://hg.urth.org/hg/File-ChangeNotify
-version: 0.17
+version: 0.18

Modified: trunk/libfile-changenotify-perl/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libfile-changenotify-perl/Makefile.PL?rev=63793&op=diff
==============================================================================
--- trunk/libfile-changenotify-perl/Makefile.PL (original)
+++ trunk/libfile-changenotify-perl/Makefile.PL Sat Oct 16 06:52:02 2010
@@ -15,6 +15,7 @@
     'File::Path' => '0',
     'File::Temp' => '0',
     'Module::Build' => '0.3601',
+    'Test::Exception' => '0',
     'Test::More' => '0.88'
   },
   'CONFIGURE_REQUIRES' => {
@@ -37,7 +38,7 @@
     'Time::HiRes' => '0',
     'namespace::autoclean' => '0'
   },
-  'VERSION' => '0.17',
+  'VERSION' => '0.18',
   'test' => {
     'TESTS' => 't/*.t'
   }

Modified: trunk/libfile-changenotify-perl/README
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libfile-changenotify-perl/README?rev=63793&op=diff
==============================================================================
--- trunk/libfile-changenotify-perl/README (original)
+++ trunk/libfile-changenotify-perl/README Sat Oct 16 06:52:02 2010
@@ -1,7 +1,7 @@
 
 
 This archive contains the distribution File-ChangeNotify,
-version 0.17:
+version 0.18:
 
   Watch for changes to files, cross-platform style
 

Modified: trunk/libfile-changenotify-perl/SIGNATURE
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libfile-changenotify-perl/SIGNATURE?rev=63793&op=diff
==============================================================================
--- trunk/libfile-changenotify-perl/SIGNATURE (original)
+++ trunk/libfile-changenotify-perl/SIGNATURE Sat Oct 16 06:52:02 2010
@@ -14,23 +14,23 @@
 -----BEGIN PGP SIGNED MESSAGE-----
 Hash: SHA1
 
-SHA1 efef993adabb5db6b86fa321cc95e1c1ff22aa13 Build.PL
-SHA1 de18f0820650cdec53cadd7641ee526408d39de2 Changes
+SHA1 a5c697a8b02edbad1f0fa8a54d35684f9f5b2923 Build.PL
+SHA1 74093fa3e9a385475f18a7937e308778de3237e8 Changes
 SHA1 4c0c7e93d78142144a9b1fcabd161adb2a3abf9b INSTALL
 SHA1 23c628b4a8a36738405ccdacaeb912d2e727b4c0 LICENSE
 SHA1 3d31a276934879feb37eafed650bc719bb17ad12 MANIFEST
-SHA1 9dca28fbe1cfe96432b966cf6c6bd0cc105e6a32 META.json
-SHA1 23b2f1f9e0dcf3a3d540461090ec457aaf61e959 META.yml
-SHA1 0e89acd1b34e7763b542485c2501e2868738d7d6 Makefile.PL
-SHA1 e6afea7b0be2e070cdaa56efd57a76aaa3447154 README
-SHA1 12d86d93511b2ae3f05266b7512ce13bf838048b dist.ini
+SHA1 55727b15625d2dc0b020a1ed87b9361eb831de75 META.json
+SHA1 07ee13421a527e1cced7210adfcb0085e79a2d1f META.yml
+SHA1 43c8a88a38ae320ab08cad32061332104edb1579 Makefile.PL
+SHA1 303ccf39a768bd0e74719fe826f86af3ec0f2486 README
+SHA1 b8f37406ab8870bb880b866538bce879e094f87b dist.ini
 SHA1 7ade7a38764306110be102cb6b78aad66645246c inc/MyModuleBuild.pm
-SHA1 4305f0855ac54e547826b243eeb37f905f15d9cd lib/File/ChangeNotify.pm
-SHA1 e102454e9c280ff08275916841ee1f6215bc5ef4 lib/File/ChangeNotify/Event.pm
-SHA1 02c57e124e1a78942dffeda1254e6b76f18cbb34 lib/File/ChangeNotify/Watcher.pm
-SHA1 3cc69beac51e3db80f418ef20544b28d25922adb lib/File/ChangeNotify/Watcher/Default.pm
-SHA1 924381c981ba3c3df92526e3ee3b29c3de6a1e09 lib/File/ChangeNotify/Watcher/Inotify.pm
-SHA1 c663fc2dc1145c2f675d5bbacdc2c64770590ae8 lib/File/ChangeNotify/Watcher/KQueue.pm
+SHA1 8a3cd3f2d42a7065b49a38b04c4418aa37136ce7 lib/File/ChangeNotify.pm
+SHA1 fe536a3b07fc81c765fd6c12536c00e9f7f7fcfa lib/File/ChangeNotify/Event.pm
+SHA1 8ad657911e11c7ce5cf1a1e0c519596b3dd39cb4 lib/File/ChangeNotify/Watcher.pm
+SHA1 0a344c6ae99722ae3b4b109703b562f8a726f2f8 lib/File/ChangeNotify/Watcher/Default.pm
+SHA1 2e3089a0742e4c6108fb95e4e5799a42e7d07d17 lib/File/ChangeNotify/Watcher/Inotify.pm
+SHA1 bf6550d0aa9d31a434fe4cd92148b3cacaadaf2b lib/File/ChangeNotify/Watcher/KQueue.pm
 SHA1 a20ef45409fdaaa48eb6c23e61c549f5578f8538 t/all.t
 SHA1 c4850e640da725089b03ac33ae1f87ba7a2cb7a8 t/excluded-dirs.t
 SHA1 e8a3259aff1b6f2433f03091c06e9e2c552ab1e2 t/instantiate-twice.t
@@ -44,7 +44,7 @@
 -----BEGIN PGP SIGNATURE-----
 Version: GnuPG v1.4.10 (GNU/Linux)
 
-iEYEARECAAYFAkyqLFwACgkQIgMCsV8qvRIzjwCeJXiMed26WcBp3GPAWmIbJQIf
-rYcAnjAjAmzIauPtvQ2sJFTyOfcl+faF
-=18XB
+iEUEARECAAYFAky4zwAACgkQIgMCsV8qvRL0DQCXTencG/hgj7QtuL5r9AnrcKdP
+ngCdGGArVJzWW8H1ziWfz8GLlEQmIN4=
+=3n3g
 -----END PGP SIGNATURE-----

Modified: trunk/libfile-changenotify-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libfile-changenotify-perl/debian/changelog?rev=63793&op=diff
==============================================================================
--- trunk/libfile-changenotify-perl/debian/changelog (original)
+++ trunk/libfile-changenotify-perl/debian/changelog Sat Oct 16 06:52:02 2010
@@ -1,13 +1,11 @@
-libfile-changenotify-perl (0.17-1) UNRELEASED; urgency=low
+libfile-changenotify-perl (0.18-1) UNRELEASED; urgency=low
 
   [ Jonathan Yu ]
-  Provides error message if module's prerequites aren't loaded
-  IGNORE-VERSION: 0.17-1
-
-  * New upstream release
+  * New upstream release (0.17)
   * Standards-Version 3.9.1 (no changes)
 
   [ Salvatore Bonaccorso ]
+  * New upstream release (0.18)
   * Update my email address.
 
  -- Jonathan Yu <jawnsy at cpan.org>  Mon, 04 Oct 2010 20:15:33 -0400

Modified: trunk/libfile-changenotify-perl/dist.ini
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libfile-changenotify-perl/dist.ini?rev=63793&op=diff
==============================================================================
--- trunk/libfile-changenotify-perl/dist.ini (original)
+++ trunk/libfile-changenotify-perl/dist.ini Sat Oct 16 06:52:02 2010
@@ -2,7 +2,7 @@
 author  = Dave Rolsky <autarch at urth.org>
 copyright_year = 2010
 
-version = 0.17
+version = 0.18
 
 [@Filter]
 bundle = @Basic
@@ -47,9 +47,10 @@
 Module::Build = 0
 
 [Prereqs / TestRequires]
-File::Path = 0
-File::Temp = 0
-Test::More = 0.88
+File::Path      = 0
+File::Temp      = 0
+Test::Exception = 0
+Test::More      = 0.88
 
 [@Mercurial]
 

Modified: trunk/libfile-changenotify-perl/lib/File/ChangeNotify.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libfile-changenotify-perl/lib/File/ChangeNotify.pm?rev=63793&op=diff
==============================================================================
--- trunk/libfile-changenotify-perl/lib/File/ChangeNotify.pm (original)
+++ trunk/libfile-changenotify-perl/lib/File/ChangeNotify.pm Sat Oct 16 06:52:02 2010
@@ -1,6 +1,6 @@
 package File::ChangeNotify;
 BEGIN {
-  $File::ChangeNotify::VERSION = '0.17';
+  $File::ChangeNotify::VERSION = '0.18';
 }
 
 use strict;
@@ -21,8 +21,7 @@
         }
     }
 
-    die
-        "Could not load a File::ChangeNotify::Watcher subclass (this should not happen, something is badly broken)";
+    return File::ChangeNotify::Watcher::Default->new(@_);
 }
 
 {
@@ -32,32 +31,36 @@
         my $class = shift;
 
         return @usable_classes if @usable_classes;
-        return @usable_classes = grep { _try_load($_) } $class->_all_classes();
+        return @usable_classes
+            = grep { _try_load($_) } $class->_all_classes();
     }
 }
 
-sub _try_load {
-    my $class = shift;
+{
+    my %tried;
 
-    eval { Class::MOP::load_class($class) };
+    sub _try_load {
+        my $class = shift;
 
-    my $e = $@;
-    die $e if $e && $e !~ /Can\'t locate|did not return a true value/;
+        return $tried{$class}
+            if exists $tried{$class};
 
-    return $e ? 0 : 1;
+        eval { Class::MOP::load_class($class) };
+
+        my $e = $@;
+        die $e if $e && $e !~ /Can\'t locate|did not return a true value/;
+
+        return $tried{$class} = $e ? 0 : 1;
+    }
 }
 
 my $finder = Module::Pluggable::Object->new(
     search_path => 'File::ChangeNotify::Watcher' );
 
 sub _all_classes {
-    return sort _sort_classes $finder->plugins();
-}
-
-sub _sort_classes {
-          $a eq 'File::ChangeNotify::Watcher::Default' ? 1
-        : $b eq 'File::ChangeNotify::Watcher::Default' ? -1
-        :                                                $a cmp $b;
+    return
+        sort grep { $_ ne 'File::ChangeNotify::Watcher::Default' }
+        $finder->plugins();
 }
 
 1;
@@ -74,7 +77,7 @@
 
 =head1 VERSION
 
-version 0.17
+version 0.18
 
 =head1 SYNOPSIS
 

Modified: trunk/libfile-changenotify-perl/lib/File/ChangeNotify/Event.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libfile-changenotify-perl/lib/File/ChangeNotify/Event.pm?rev=63793&op=diff
==============================================================================
--- trunk/libfile-changenotify-perl/lib/File/ChangeNotify/Event.pm (original)
+++ trunk/libfile-changenotify-perl/lib/File/ChangeNotify/Event.pm Sat Oct 16 06:52:02 2010
@@ -1,6 +1,6 @@
 package File::ChangeNotify::Event;
 BEGIN {
-  $File::ChangeNotify::Event::VERSION = '0.17';
+  $File::ChangeNotify::Event::VERSION = '0.18';
 }
 
 use strict;
@@ -38,7 +38,7 @@
 
 =head1 VERSION
 
-version 0.17
+version 0.18
 
 =head1 SYNOPSIS
 

Modified: trunk/libfile-changenotify-perl/lib/File/ChangeNotify/Watcher.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libfile-changenotify-perl/lib/File/ChangeNotify/Watcher.pm?rev=63793&op=diff
==============================================================================
--- trunk/libfile-changenotify-perl/lib/File/ChangeNotify/Watcher.pm (original)
+++ trunk/libfile-changenotify-perl/lib/File/ChangeNotify/Watcher.pm Sat Oct 16 06:52:02 2010
@@ -1,6 +1,6 @@
 package File::ChangeNotify::Watcher;
 BEGIN {
-  $File::ChangeNotify::Watcher::VERSION = '0.17';
+  $File::ChangeNotify::Watcher::VERSION = '0.18';
 }
 
 use strict;
@@ -125,7 +125,7 @@
 
 =head1 VERSION
 
-version 0.17
+version 0.18
 
 =head1 SYNOPSIS
 

Modified: trunk/libfile-changenotify-perl/lib/File/ChangeNotify/Watcher/Default.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libfile-changenotify-perl/lib/File/ChangeNotify/Watcher/Default.pm?rev=63793&op=diff
==============================================================================
--- trunk/libfile-changenotify-perl/lib/File/ChangeNotify/Watcher/Default.pm (original)
+++ trunk/libfile-changenotify-perl/lib/File/ChangeNotify/Watcher/Default.pm Sat Oct 16 06:52:02 2010
@@ -1,6 +1,6 @@
 package File::ChangeNotify::Watcher::Default;
 BEGIN {
-  $File::ChangeNotify::Watcher::Default::VERSION = '0.17';
+  $File::ChangeNotify::Watcher::Default::VERSION = '0.18';
 }
 
 use strict;
@@ -171,7 +171,7 @@
 
 =head1 VERSION
 
-version 0.17
+version 0.18
 
 =head1 DESCRIPTION
 

Modified: trunk/libfile-changenotify-perl/lib/File/ChangeNotify/Watcher/Inotify.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libfile-changenotify-perl/lib/File/ChangeNotify/Watcher/Inotify.pm?rev=63793&op=diff
==============================================================================
--- trunk/libfile-changenotify-perl/lib/File/ChangeNotify/Watcher/Inotify.pm (original)
+++ trunk/libfile-changenotify-perl/lib/File/ChangeNotify/Watcher/Inotify.pm Sat Oct 16 06:52:02 2010
@@ -1,6 +1,6 @@
 package File::ChangeNotify::Watcher::Inotify;
 BEGIN {
-  $File::ChangeNotify::Watcher::Inotify::VERSION = '0.17';
+  $File::ChangeNotify::Watcher::Inotify::VERSION = '0.18';
 }
 
 use strict;
@@ -211,7 +211,7 @@
 
 =head1 VERSION
 
-version 0.17
+version 0.18
 
 =head1 DESCRIPTION
 

Modified: trunk/libfile-changenotify-perl/lib/File/ChangeNotify/Watcher/KQueue.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libfile-changenotify-perl/lib/File/ChangeNotify/Watcher/KQueue.pm?rev=63793&op=diff
==============================================================================
--- trunk/libfile-changenotify-perl/lib/File/ChangeNotify/Watcher/KQueue.pm (original)
+++ trunk/libfile-changenotify-perl/lib/File/ChangeNotify/Watcher/KQueue.pm Sat Oct 16 06:52:02 2010
@@ -1,6 +1,6 @@
 package File::ChangeNotify::Watcher::KQueue;
 BEGIN {
-  $File::ChangeNotify::Watcher::KQueue::VERSION = '0.17';
+  $File::ChangeNotify::Watcher::KQueue::VERSION = '0.18';
 }
 
 use strict;




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