r68073 - in /branches/upstream/libsearch-gin-perl/current: ./ lib/Search/ lib/Search/GIN/ lib/Search/GIN/Driver/ lib/Search/GIN/Driver/Pack/ lib/Search/GIN/Extract/ lib/Search/GIN/Keys/ lib/Search/GIN/Query/ t/

angelabad-guest at users.alioth.debian.org angelabad-guest at users.alioth.debian.org
Mon Jan 31 21:04:54 UTC 2011 

Author: angelabad-guest
Date: Mon Jan 31 21:02:52 2011
New Revision: 68073

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=68073
Log:
[svn-upgrade] new version libsearch-gin-perl (0.08)

Added:
    branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Query/Set.pm
Removed:
    branches/upstream/libsearch-gin-perl/current/SIGNATURE
Modified:
    branches/upstream/libsearch-gin-perl/current/Changes
    branches/upstream/libsearch-gin-perl/current/MANIFEST
    branches/upstream/libsearch-gin-perl/current/META.yml
    branches/upstream/libsearch-gin-perl/current/Makefile.PL
    branches/upstream/libsearch-gin-perl/current/README
    branches/upstream/libsearch-gin-perl/current/dist.ini
    branches/upstream/libsearch-gin-perl/current/lib/Search/GIN.pm
    branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Callbacks.pm
    branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Core.pm
    branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/DelegateToIndexed.pm
    branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver.pm
    branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Hash.pm
    branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Pack.pm
    branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Pack/Delim.pm
    branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Pack/IDs.pm
    branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Pack/Length.pm
    branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Pack/UUID.pm
    branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Pack/Values.pm
    branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/TXN.pm
    branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Extract.pm
    branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Extract/Attributes.pm
    branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Extract/Callback.pm
    branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Extract/Class.pm
    branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Extract/Delegate.pm
    branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Extract/Multiplex.pm
    branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Indexable.pm
    branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Keys.pm
    branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Keys/Deep.pm
    branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Keys/Expand.pm
    branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Keys/Join.pm
    branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Query.pm
    branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Query/Attributes.pm
    branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Query/Class.pm
    branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Query/Manual.pm
    branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/SelfIDs.pm
    branches/upstream/libsearch-gin-perl/current/t/00-compile.t

Modified: branches/upstream/libsearch-gin-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/Changes?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/Changes (original)
+++ branches/upstream/libsearch-gin-perl/current/Changes Mon Jan 31 21:02:52 2011
@@ -1,4 +1,8 @@
-0.07    30.09.10
+0.08    01.31.11
+	* Fix dup release on CPAN
+
+0.07    12.09.10
+        * Adds support for Set queries
         * Renaming excludes to -excludes, requiring Moose >= 0.89
         * Removing special deprecated usage of qw (now complies with 5.13.5)
 

Modified: branches/upstream/libsearch-gin-perl/current/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/MANIFEST?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/MANIFEST (original)
+++ branches/upstream/libsearch-gin-perl/current/MANIFEST Mon Jan 31 21:02:52 2011
@@ -4,7 +4,6 @@
 META.yml
 Makefile.PL
 README
-SIGNATURE
 dist.ini
 lib/Search/GIN.pm
 lib/Search/GIN/Callbacks.pm
@@ -34,6 +33,7 @@
 lib/Search/GIN/Query/Attributes.pm
 lib/Search/GIN/Query/Class.pm
 lib/Search/GIN/Query/Manual.pm
+lib/Search/GIN/Query/Set.pm
 lib/Search/GIN/SelfIDs.pm
 t/00-compile.t
 t/attrs.t

Modified: branches/upstream/libsearch-gin-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/META.yml?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/META.yml (original)
+++ branches/upstream/libsearch-gin-perl/current/META.yml Mon Jan 31 21:02:52 2011
@@ -13,7 +13,7 @@
 configure_requires:
   ExtUtils::MakeMaker: 6.31
 dynamic_config: 0
-generated_by: 'Dist::Zilla version 4.102340, CPAN::Meta::Converter version 2.101610'
+generated_by: 'Dist::Zilla version 4.200001, CPAN::Meta::Converter version 2.102400'
 license: perl
 meta-spec:
   url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -29,5 +29,6 @@
   Scope::Guard: 0
   Set::Object: 0
   Test::Deep::NoTest: 0
+  constant: 0
   namespace::clean: 0
-version: 0.07
+version: 0.08

Modified: branches/upstream/libsearch-gin-perl/current/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/Makefile.PL?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/Makefile.PL (original)
+++ branches/upstream/libsearch-gin-perl/current/Makefile.PL Mon Jan 31 21:02:52 2011
@@ -37,9 +37,10 @@
     'Scope::Guard' => '0',
     'Set::Object' => '0',
     'Test::Deep::NoTest' => '0',
+    'constant' => '0',
     'namespace::clean' => '0'
   },
-  'VERSION' => '0.07',
+  'VERSION' => '0.08',
   'test' => {
     'TESTS' => 't/*.t'
   }

Modified: branches/upstream/libsearch-gin-perl/current/README
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/README?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/README (original)
+++ branches/upstream/libsearch-gin-perl/current/README Mon Jan 31 21:02:52 2011
@@ -2,7 +2,7 @@
     Search::GIN - Generalized Inverted Indexing
 
 VERSION
-    version 0.07
+    version 0.08
 
 DESCRIPTION
     Inverted Indexing is an indexing method that maps from content to
@@ -20,7 +20,7 @@
     *   Inverted_index on Wikipedia
 
 AUTHOR
-      Yuval Kogman <nothingmuch at cpan.org>
+    Yuval Kogman <nothingmuch at cpan.org>
 
 COPYRIGHT AND LICENSE
     This software is copyright (c) 2010 by Yuval Kogman, Infinity

Modified: branches/upstream/libsearch-gin-perl/current/dist.ini
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/dist.ini?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/dist.ini (original)
+++ branches/upstream/libsearch-gin-perl/current/dist.ini Mon Jan 31 21:02:52 2011
@@ -4,7 +4,7 @@
 copyright_holder = Yuval Kogman, Infinity Interactive
 copyright_year   = 2010
 
-version = 0.07
+version = 0.08
 
 [@Basic]
 [PodSyntaxTests]
@@ -15,6 +15,5 @@
 [CompileTests]
 [AutoPrereq]
 skip = ^(Bar|Base|MyTagQuery)$
-[Signature]
 [Prereq]
 Moose = 0.89

Modified: branches/upstream/libsearch-gin-perl/current/lib/Search/GIN.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/lib/Search/GIN.pm?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/lib/Search/GIN.pm (original)
+++ branches/upstream/libsearch-gin-perl/current/lib/Search/GIN.pm Mon Jan 31 21:02:52 2011
@@ -2,7 +2,7 @@
 use warnings;
 package Search::GIN;
 BEGIN {
-  $Search::GIN::VERSION = '0.07';
+  $Search::GIN::VERSION = '0.08';
 }
 # ABSTRACT: Generalized Inverted Indexing
 
@@ -18,7 +18,7 @@
 
 =head1 VERSION
 
-version 0.07
+version 0.08
 
 =head1 DESCRIPTION
 
@@ -44,7 +44,7 @@
 
 =head1 AUTHOR
 
-  Yuval Kogman <nothingmuch at cpan.org>
+Yuval Kogman <nothingmuch at cpan.org>
 
 =head1 COPYRIGHT AND LICENSE
 

Modified: branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Callbacks.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Callbacks.pm?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Callbacks.pm (original)
+++ branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Callbacks.pm Mon Jan 31 21:02:52 2011
@@ -2,7 +2,7 @@
 use warnings;
 package Search::GIN::Callbacks;
 BEGIN {
-  $Search::GIN::Callbacks::VERSION = '0.07';
+  $Search::GIN::Callbacks::VERSION = '0.08';
 }
 # ABSTRACT: Provide callbacks
 
@@ -34,7 +34,7 @@
 
 =head1 VERSION
 
-version 0.07
+version 0.08
 
 =head1 DESCRIPTION
 
@@ -42,7 +42,7 @@
 
 =head1 AUTHOR
 
-  Yuval Kogman <nothingmuch at cpan.org>
+Yuval Kogman <nothingmuch at cpan.org>
 
 =head1 COPYRIGHT AND LICENSE
 

Modified: branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Core.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Core.pm?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Core.pm (original)
+++ branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Core.pm Mon Jan 31 21:02:52 2011
@@ -2,7 +2,7 @@
 use warnings;
 package Search::GIN::Core;
 BEGIN {
-  $Search::GIN::Core::VERSION = '0.07';
+  $Search::GIN::Core::VERSION = '0.08';
 }
 # ABSTRACT: Core of Search::GIN
 
@@ -80,11 +80,11 @@
 
 =head1 VERSION
 
-version 0.07
+version 0.08
 
 =head1 AUTHOR
 
-  Yuval Kogman <nothingmuch at cpan.org>
+Yuval Kogman <nothingmuch at cpan.org>
 
 =head1 COPYRIGHT AND LICENSE
 

Modified: branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/DelegateToIndexed.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/DelegateToIndexed.pm?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/DelegateToIndexed.pm (original)
+++ branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/DelegateToIndexed.pm Mon Jan 31 21:02:52 2011
@@ -2,7 +2,7 @@
 use warnings;
 package Search::GIN::DelegateToIndexed;
 BEGIN {
-  $Search::GIN::DelegateToIndexed::VERSION = '0.07';
+  $Search::GIN::DelegateToIndexed::VERSION = '0.08';
 }
 # ABSTRACT:
 
@@ -41,7 +41,7 @@
 
 =head1 VERSION
 
-version 0.07
+version 0.08
 
 =head1 SYNOPSIS
 
@@ -51,7 +51,7 @@
 
 =head1 AUTHOR
 
-  Yuval Kogman <nothingmuch at cpan.org>
+Yuval Kogman <nothingmuch at cpan.org>
 
 =head1 COPYRIGHT AND LICENSE
 

Modified: branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver.pm?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver.pm (original)
+++ branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver.pm Mon Jan 31 21:02:52 2011
@@ -2,7 +2,7 @@
 use warnings;
 package Search::GIN::Driver;
 BEGIN {
-  $Search::GIN::Driver::VERSION = '0.07';
+  $Search::GIN::Driver::VERSION = '0.08';
 }
 # ABSTRACT:
 
@@ -93,7 +93,7 @@
 
 =head1 VERSION
 
-version 0.07
+version 0.08
 
 =head1 SYNOPSIS
 
@@ -103,7 +103,7 @@
 
 =head1 AUTHOR
 
-  Yuval Kogman <nothingmuch at cpan.org>
+Yuval Kogman <nothingmuch at cpan.org>
 
 =head1 COPYRIGHT AND LICENSE
 

Modified: branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Hash.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Hash.pm?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Hash.pm (original)
+++ branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Hash.pm Mon Jan 31 21:02:52 2011
@@ -2,7 +2,7 @@
 use warnings;
 package Search::GIN::Driver::Hash;
 BEGIN {
-  $Search::GIN::Driver::Hash::VERSION = '0.07';
+  $Search::GIN::Driver::Hash::VERSION = '0.08';
 }
 # ABSTRACT:
 
@@ -95,11 +95,11 @@
 
 =head1 VERSION
 
-version 0.07
+version 0.08
 
 =head1 AUTHOR
 
-  Yuval Kogman <nothingmuch at cpan.org>
+Yuval Kogman <nothingmuch at cpan.org>
 
 =head1 COPYRIGHT AND LICENSE
 

Modified: branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Pack.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Pack.pm?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Pack.pm (original)
+++ branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Pack.pm Mon Jan 31 21:02:52 2011
@@ -2,7 +2,7 @@
 use warnings;
 package Search::GIN::Driver::Pack;
 BEGIN {
-  $Search::GIN::Driver::Pack::VERSION = '0.07';
+  $Search::GIN::Driver::Pack::VERSION = '0.08';
 }
 # ABSTRACT:
 
@@ -25,11 +25,11 @@
 
 =head1 VERSION
 
-version 0.07
+version 0.08
 
 =head1 AUTHOR
 
-  Yuval Kogman <nothingmuch at cpan.org>
+Yuval Kogman <nothingmuch at cpan.org>
 
 =head1 COPYRIGHT AND LICENSE
 

Modified: branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Pack/Delim.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Pack/Delim.pm?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Pack/Delim.pm (original)
+++ branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Pack/Delim.pm Mon Jan 31 21:02:52 2011
@@ -2,7 +2,7 @@
 use warnings;
 package Search::GIN::Driver::Pack::Delim;
 BEGIN {
-  $Search::GIN::Driver::Pack::Delim::VERSION = '0.07';
+  $Search::GIN::Driver::Pack::Delim::VERSION = '0.08';
 }
 # ABSTRACT:
 
@@ -32,11 +32,11 @@
 
 =head1 VERSION
 
-version 0.07
+version 0.08
 
 =head1 AUTHOR
 
-  Yuval Kogman <nothingmuch at cpan.org>
+Yuval Kogman <nothingmuch at cpan.org>
 
 =head1 COPYRIGHT AND LICENSE
 

Modified: branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Pack/IDs.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Pack/IDs.pm?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Pack/IDs.pm (original)
+++ branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Pack/IDs.pm Mon Jan 31 21:02:52 2011
@@ -2,7 +2,7 @@
 use warnings;
 package Search::GIN::Driver::Pack::IDs;
 BEGIN {
-  $Search::GIN::Driver::Pack::IDs::VERSION = '0.07';
+  $Search::GIN::Driver::Pack::IDs::VERSION = '0.08';
 }
 # ABSTRACT:
 
@@ -24,11 +24,11 @@
 
 =head1 VERSION
 
-version 0.07
+version 0.08
 
 =head1 AUTHOR
 
-  Yuval Kogman <nothingmuch at cpan.org>
+Yuval Kogman <nothingmuch at cpan.org>
 
 =head1 COPYRIGHT AND LICENSE
 

Modified: branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Pack/Length.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Pack/Length.pm?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Pack/Length.pm (original)
+++ branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Pack/Length.pm Mon Jan 31 21:02:52 2011
@@ -2,7 +2,7 @@
 use warnings;
 package Search::GIN::Driver::Pack::Length;
 BEGIN {
-  $Search::GIN::Driver::Pack::Length::VERSION = '0.07';
+  $Search::GIN::Driver::Pack::Length::VERSION = '0.08';
 }
 # ABSTRACT:
 
@@ -32,7 +32,7 @@
 
 =head1 VERSION
 
-version 0.07
+version 0.08
 
 =head1 SYNOPSIS
 
@@ -42,7 +42,7 @@
 
 =head1 AUTHOR
 
-  Yuval Kogman <nothingmuch at cpan.org>
+Yuval Kogman <nothingmuch at cpan.org>
 
 =head1 COPYRIGHT AND LICENSE
 

Modified: branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Pack/UUID.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Pack/UUID.pm?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Pack/UUID.pm (original)
+++ branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Pack/UUID.pm Mon Jan 31 21:02:52 2011
@@ -2,7 +2,7 @@
 use warnings;
 package Search::GIN::Driver::Pack::UUID;
 BEGIN {
-  $Search::GIN::Driver::Pack::UUID::VERSION = '0.07';
+  $Search::GIN::Driver::Pack::UUID::VERSION = '0.08';
 }
 # ABSTRACT: UUID key packing
 
@@ -34,7 +34,7 @@
 
 =head1 VERSION
 
-version 0.07
+version 0.08
 
 =head1 SYNOPSIS
 
@@ -44,7 +44,7 @@
 
 =head1 AUTHOR
 
-  Yuval Kogman <nothingmuch at cpan.org>
+Yuval Kogman <nothingmuch at cpan.org>
 
 =head1 COPYRIGHT AND LICENSE
 

Modified: branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Pack/Values.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Pack/Values.pm?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Pack/Values.pm (original)
+++ branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/Pack/Values.pm Mon Jan 31 21:02:52 2011
@@ -2,7 +2,7 @@
 use warnings;
 package Search::GIN::Driver::Pack::Values;
 BEGIN {
-  $Search::GIN::Driver::Pack::Values::VERSION = '0.07';
+  $Search::GIN::Driver::Pack::Values::VERSION = '0.08';
 }
 # ABSTRACT:
 
@@ -24,11 +24,11 @@
 
 =head1 VERSION
 
-version 0.07
+version 0.08
 
 =head1 AUTHOR
 
-  Yuval Kogman <nothingmuch at cpan.org>
+Yuval Kogman <nothingmuch at cpan.org>
 
 =head1 COPYRIGHT AND LICENSE
 

Modified: branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/TXN.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/TXN.pm?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/TXN.pm (original)
+++ branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Driver/TXN.pm Mon Jan 31 21:02:52 2011
@@ -2,7 +2,7 @@
 use warnings;
 package Search::GIN::Driver::TXN;
 BEGIN {
-  $Search::GIN::Driver::TXN::VERSION = '0.07';
+  $Search::GIN::Driver::TXN::VERSION = '0.08';
 }
 # ABSTRACT:
 
@@ -93,7 +93,7 @@
 
 =head1 VERSION
 
-version 0.07
+version 0.08
 
 =head1 SYNOPSIS
 
@@ -103,7 +103,7 @@
 
 =head1 AUTHOR
 
-  Yuval Kogman <nothingmuch at cpan.org>
+Yuval Kogman <nothingmuch at cpan.org>
 
 =head1 COPYRIGHT AND LICENSE
 

Modified: branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Extract.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Extract.pm?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Extract.pm (original)
+++ branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Extract.pm Mon Jan 31 21:02:52 2011
@@ -2,7 +2,7 @@
 use warnings;
 package Search::GIN::Extract;
 BEGIN {
-  $Search::GIN::Extract::VERSION = '0.07';
+  $Search::GIN::Extract::VERSION = '0.08';
 }
 # ABSTRACT:
 
@@ -24,11 +24,11 @@
 
 =head1 VERSION
 
-version 0.07
+version 0.08
 
 =head1 AUTHOR
 
-  Yuval Kogman <nothingmuch at cpan.org>
+Yuval Kogman <nothingmuch at cpan.org>
 
 =head1 COPYRIGHT AND LICENSE
 

Modified: branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Extract/Attributes.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Extract/Attributes.pm?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Extract/Attributes.pm (original)
+++ branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Extract/Attributes.pm Mon Jan 31 21:02:52 2011
@@ -2,7 +2,7 @@
 use warnings;
 package Search::GIN::Extract::Attributes;
 BEGIN {
-  $Search::GIN::Extract::Attributes::VERSION = '0.07';
+  $Search::GIN::Extract::Attributes::VERSION = '0.08';
 }
 # ABSTRACT:
 
@@ -56,7 +56,7 @@
 
 =head1 VERSION
 
-version 0.07
+version 0.08
 
 =head1 SYNOPSIS
 
@@ -66,7 +66,7 @@
 
 =head1 AUTHOR
 
-  Yuval Kogman <nothingmuch at cpan.org>
+Yuval Kogman <nothingmuch at cpan.org>
 
 =head1 COPYRIGHT AND LICENSE
 

Modified: branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Extract/Callback.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Extract/Callback.pm?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Extract/Callback.pm (original)
+++ branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Extract/Callback.pm Mon Jan 31 21:02:52 2011
@@ -2,7 +2,7 @@
 use warnings;
 package Search::GIN::Extract::Callback;
 BEGIN {
-  $Search::GIN::Extract::Callback::VERSION = '0.07';
+  $Search::GIN::Extract::Callback::VERSION = '0.08';
 }
 # ABSTRACT:
 
@@ -42,7 +42,7 @@
 
 =head1 VERSION
 
-version 0.07
+version 0.08
 
 =head1 SYNOPSIS
 
@@ -52,7 +52,7 @@
 
 =head1 AUTHOR
 
-  Yuval Kogman <nothingmuch at cpan.org>
+Yuval Kogman <nothingmuch at cpan.org>
 
 =head1 COPYRIGHT AND LICENSE
 

Modified: branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Extract/Class.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Extract/Class.pm?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Extract/Class.pm (original)
+++ branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Extract/Class.pm Mon Jan 31 21:02:52 2011
@@ -2,7 +2,7 @@
 use warnings;
 package Search::GIN::Extract::Class;
 BEGIN {
-  $Search::GIN::Extract::Class::VERSION = '0.07';
+  $Search::GIN::Extract::Class::VERSION = '0.08';
 }
 # ABSTRACT:
 
@@ -44,7 +44,7 @@
 
 =head1 VERSION
 
-version 0.07
+version 0.08
 
 =head1 SYNOPSIS
 
@@ -54,7 +54,7 @@
 
 =head1 AUTHOR
 
-  Yuval Kogman <nothingmuch at cpan.org>
+Yuval Kogman <nothingmuch at cpan.org>
 
 =head1 COPYRIGHT AND LICENSE
 

Modified: branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Extract/Delegate.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Extract/Delegate.pm?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Extract/Delegate.pm (original)
+++ branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Extract/Delegate.pm Mon Jan 31 21:02:52 2011
@@ -2,7 +2,7 @@
 use warnings;
 package Search::GIN::Extract::Delegate;
 BEGIN {
-  $Search::GIN::Extract::Delegate::VERSION = '0.07';
+  $Search::GIN::Extract::Delegate::VERSION = '0.08';
 }
 # ABSTRACT:
 
@@ -30,11 +30,11 @@
 
 =head1 VERSION
 
-version 0.07
+version 0.08
 
 =head1 AUTHOR
 
-  Yuval Kogman <nothingmuch at cpan.org>
+Yuval Kogman <nothingmuch at cpan.org>
 
 =head1 COPYRIGHT AND LICENSE
 

Modified: branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Extract/Multiplex.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Extract/Multiplex.pm?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Extract/Multiplex.pm (original)
+++ branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Extract/Multiplex.pm Mon Jan 31 21:02:52 2011
@@ -2,7 +2,7 @@
 use warnings;
 package Search::GIN::Extract::Multiplex;
 BEGIN {
-  $Search::GIN::Extract::Multiplex::VERSION = '0.07';
+  $Search::GIN::Extract::Multiplex::VERSION = '0.08';
 }
 # ABSTRACT:
 
@@ -37,7 +37,7 @@
 
 =head1 VERSION
 
-version 0.07
+version 0.08
 
 =head1 SYNOPSIS
 
@@ -47,7 +47,7 @@
 
 =head1 AUTHOR
 
-  Yuval Kogman <nothingmuch at cpan.org>
+Yuval Kogman <nothingmuch at cpan.org>
 
 =head1 COPYRIGHT AND LICENSE
 

Modified: branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Indexable.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Indexable.pm?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Indexable.pm (original)
+++ branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Indexable.pm Mon Jan 31 21:02:52 2011
@@ -2,7 +2,7 @@
 use warnings;
 package Search::GIN::Indexable;
 BEGIN {
-  $Search::GIN::Indexable::VERSION = '0.07';
+  $Search::GIN::Indexable::VERSION = '0.08';
 }
 # ABSTRACT:
 
@@ -37,7 +37,7 @@
 
 =head1 VERSION
 
-version 0.07
+version 0.08
 
 =head1 SYNOPSIS
 
@@ -47,7 +47,7 @@
 
 =head1 AUTHOR
 
-  Yuval Kogman <nothingmuch at cpan.org>
+Yuval Kogman <nothingmuch at cpan.org>
 
 =head1 COPYRIGHT AND LICENSE
 

Modified: branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Keys.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Keys.pm?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Keys.pm (original)
+++ branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Keys.pm Mon Jan 31 21:02:52 2011
@@ -2,7 +2,7 @@
 use warnings;
 package Search::GIN::Keys;
 BEGIN {
-  $Search::GIN::Keys::VERSION = '0.07';
+  $Search::GIN::Keys::VERSION = '0.08';
 }
 # ABSTRACT:
 
@@ -23,11 +23,11 @@
 
 =head1 VERSION
 
-version 0.07
+version 0.08
 
 =head1 AUTHOR
 
-  Yuval Kogman <nothingmuch at cpan.org>
+Yuval Kogman <nothingmuch at cpan.org>
 
 =head1 COPYRIGHT AND LICENSE
 

Modified: branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Keys/Deep.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Keys/Deep.pm?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Keys/Deep.pm (original)
+++ branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Keys/Deep.pm Mon Jan 31 21:02:52 2011
@@ -2,7 +2,7 @@
 use warnings;
 package Search::GIN::Keys::Deep;
 BEGIN {
-  $Search::GIN::Keys::Deep::VERSION = '0.07';
+  $Search::GIN::Keys::Deep::VERSION = '0.08';
 }
 # ABSTRACT:
 
@@ -33,7 +33,7 @@
 
 =head1 VERSION
 
-version 0.07
+version 0.08
 
 =head1 SYNOPSIS
 
@@ -43,7 +43,7 @@
 
 =head1 AUTHOR
 
-  Yuval Kogman <nothingmuch at cpan.org>
+Yuval Kogman <nothingmuch at cpan.org>
 
 =head1 COPYRIGHT AND LICENSE
 

Modified: branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Keys/Expand.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Keys/Expand.pm?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Keys/Expand.pm (original)
+++ branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Keys/Expand.pm Mon Jan 31 21:02:52 2011
@@ -2,7 +2,7 @@
 use warnings;
 package Search::GIN::Keys::Expand;
 BEGIN {
-  $Search::GIN::Keys::Expand::VERSION = '0.07';
+  $Search::GIN::Keys::Expand::VERSION = '0.08';
 }
 # ABSTRACT:
 
@@ -65,11 +65,11 @@
 
 =head1 VERSION
 
-version 0.07
+version 0.08
 
 =head1 AUTHOR
 
-  Yuval Kogman <nothingmuch at cpan.org>
+Yuval Kogman <nothingmuch at cpan.org>
 
 =head1 COPYRIGHT AND LICENSE
 

Modified: branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Keys/Join.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Keys/Join.pm?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Keys/Join.pm (original)
+++ branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Keys/Join.pm Mon Jan 31 21:02:52 2011
@@ -2,7 +2,7 @@
 use warnings;
 package Search::GIN::Keys::Join;
 BEGIN {
-  $Search::GIN::Keys::Join::VERSION = '0.07';
+  $Search::GIN::Keys::Join::VERSION = '0.08';
 }
 # ABSTRACT:
 
@@ -31,11 +31,11 @@
 
 =head1 VERSION
 
-version 0.07
+version 0.08
 
 =head1 AUTHOR
 
-  Yuval Kogman <nothingmuch at cpan.org>
+Yuval Kogman <nothingmuch at cpan.org>
 
 =head1 COPYRIGHT AND LICENSE
 

Modified: branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Query.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Query.pm?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Query.pm (original)
+++ branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Query.pm Mon Jan 31 21:02:52 2011
@@ -2,7 +2,7 @@
 use warnings;
 package Search::GIN::Query;
 BEGIN {
-  $Search::GIN::Query::VERSION = '0.07';
+  $Search::GIN::Query::VERSION = '0.08';
 }
 # ABSTRACT:
 
@@ -26,7 +26,7 @@
 
 =head1 VERSION
 
-version 0.07
+version 0.08
 
 =head1 SYNOPSIS
 
@@ -36,7 +36,7 @@
 
 =head1 AUTHOR
 
-  Yuval Kogman <nothingmuch at cpan.org>
+Yuval Kogman <nothingmuch at cpan.org>
 
 =head1 COPYRIGHT AND LICENSE
 

Modified: branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Query/Attributes.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Query/Attributes.pm?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Query/Attributes.pm (original)
+++ branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Query/Attributes.pm Mon Jan 31 21:02:52 2011
@@ -2,7 +2,7 @@
 use warnings;
 package Search::GIN::Query::Attributes;
 BEGIN {
-  $Search::GIN::Query::Attributes::VERSION = '0.07';
+  $Search::GIN::Query::Attributes::VERSION = '0.08';
 }
 # ABSTRACT: Create attributes-based GIN queries
 
@@ -94,7 +94,7 @@
 
 =head1 VERSION
 
-version 0.07
+version 0.08
 
 =head1 SYNOPSIS
 
@@ -135,7 +135,7 @@
 
 =head1 AUTHOR
 
-  Yuval Kogman <nothingmuch at cpan.org>
+Yuval Kogman <nothingmuch at cpan.org>
 
 =head1 COPYRIGHT AND LICENSE
 

Modified: branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Query/Class.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Query/Class.pm?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Query/Class.pm (original)
+++ branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Query/Class.pm Mon Jan 31 21:02:52 2011
@@ -2,7 +2,7 @@
 use warnings;
 package Search::GIN::Query::Class;
 BEGIN {
-  $Search::GIN::Query::Class::VERSION = '0.07';
+  $Search::GIN::Query::Class::VERSION = '0.08';
 }
 # ABSTRACT: Create class-based GIN queries
 
@@ -105,7 +105,7 @@
 
 =head1 VERSION
 
-version 0.07
+version 0.08
 
 =head1 SYNOPSIS
 
@@ -156,7 +156,7 @@
 
 =head1 AUTHOR
 
-  Yuval Kogman <nothingmuch at cpan.org>
+Yuval Kogman <nothingmuch at cpan.org>
 
 =head1 COPYRIGHT AND LICENSE
 

Modified: branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Query/Manual.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Query/Manual.pm?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Query/Manual.pm (original)
+++ branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Query/Manual.pm Mon Jan 31 21:02:52 2011
@@ -2,7 +2,7 @@
 use warnings;
 package Search::GIN::Query::Manual;
 BEGIN {
-  $Search::GIN::Query::Manual::VERSION = '0.07';
+  $Search::GIN::Query::Manual::VERSION = '0.08';
 }
 # ABSTRACT: Create manual GIN queries
 
@@ -75,7 +75,7 @@
 
 =head1 VERSION
 
-version 0.07
+version 0.08
 
 =head1 SYNOPSIS
 
@@ -109,7 +109,7 @@
 
 =head1 AUTHOR
 
-  Yuval Kogman <nothingmuch at cpan.org>
+Yuval Kogman <nothingmuch at cpan.org>
 
 =head1 COPYRIGHT AND LICENSE
 

Added: branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Query/Set.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Query/Set.pm?rev=68073&op=file
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Query/Set.pm (added)
+++ branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/Query/Set.pm Mon Jan 31 21:02:52 2011
@@ -1,0 +1,137 @@
+use strict;
+use warnings;
+package Search::GIN::Query::Set;
+BEGIN {
+  $Search::GIN::Query::Set::VERSION = '0.08';
+}
+# ABSTRACT: Create queries with set operations
+
+use Moose;
+use namespace::clean -except => 'meta';
+
+with qw(
+    Search::GIN::Query
+);
+
+use constant 'method' => 'set';
+use constant 'has_method' => 1;
+
+has operation => (
+    isa     => 'Str',
+    is      => 'ro',
+    default => 'UNION'
+);
+
+has subqueries => (
+    isa => "ArrayRef",
+    is  => "ro",
+    required => 1,
+);
+
+has _processed => (
+    is => "ro",
+    lazy_build => 1,
+);
+
+sub _build__processed {
+    my $self = shift;
+    return [ map { { $_->extract_values, () } }
+             @{$self->subqueries} ];
+}
+
+sub extract_values {
+    my $self  = shift;
+
+    return (
+        subqueries => $self->_processed,
+        operation  => $self->operation,
+        method     => 'set'
+    );
+}
+
+sub consistent {
+    return 1;
+}
+
+__PACKAGE__->meta->make_immutable;
+
+1;
+
+
+
+=pod
+
+=head1 NAME
+
+Search::GIN::Query::Set - Create queries with set operations
+
+=head1 VERSION
+
+version 0.08
+
+=head1 SYNOPSIS
+
+    # build a query like:
+    # (type:pdf OR type:png) AND (name:Homer OR name:Bart)
+
+    use Search::GIN::Query::Set;
+    use Search::GIN::Query::Manual;
+
+    my $query = Search::GIN::Query::Set->new(
+        operation => 'INTERSECT',
+        subqueries => [
+            Search::GIN::Query::Manual->new(
+                values => {
+                   type => [qw(pdf png)]
+                }
+            ),
+            Search::GIN::Query::Manual->new(
+                values => {
+                   name => [qw(Homer Bart)]
+                }
+            ),
+        ]
+    );
+
+=head1 DESCRIPTION
+
+Creates a manual GIN query that can be used to search using basic set
+theory, in order to build more complex queries.
+
+This query doesn't provide any specific search, it's just a set
+operator for subqueries. You can build complex queries by using other
+set queries as subqueries for a set query.
+
+=head1 METHODS/SUBROUTINES
+
+=head2 new
+
+Creates a new query.
+
+=head1 ATTRIBUTES
+
+=head2 subqueries
+
+The subqueries to process
+
+=head2 operation
+
+One of the basic set operators: "UNION", "INTERSECT" and "EXCEPT". The
+default is "UNION"
+
+=head1 AUTHOR
+
+Yuval Kogman <nothingmuch at cpan.org>
+
+=head1 COPYRIGHT AND LICENSE
+
+This software is copyright (c) 2010 by Yuval Kogman, Infinity Interactive.
+
+This is free software; you can redistribute it and/or modify it under
+the same terms as the Perl 5 programming language system itself.
+
+=cut
+
+
+__END__
+

Modified: branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/SelfIDs.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/SelfIDs.pm?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/SelfIDs.pm (original)
+++ branches/upstream/libsearch-gin-perl/current/lib/Search/GIN/SelfIDs.pm Mon Jan 31 21:02:52 2011
@@ -2,7 +2,7 @@
 use warnings;
 package Search::GIN::SelfIDs;
 BEGIN {
-  $Search::GIN::SelfIDs::VERSION = '0.07';
+  $Search::GIN::SelfIDs::VERSION = '0.08';
 }
 # ABSTRACT:
 
@@ -31,7 +31,7 @@
 
 =head1 VERSION
 
-version 0.07
+version 0.08
 
 =head1 SYNOPSIS
 
@@ -41,7 +41,7 @@
 
 =head1 AUTHOR
 
-  Yuval Kogman <nothingmuch at cpan.org>
+Yuval Kogman <nothingmuch at cpan.org>
 
 =head1 COPYRIGHT AND LICENSE
 

Modified: branches/upstream/libsearch-gin-perl/current/t/00-compile.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libsearch-gin-perl/current/t/00-compile.t?rev=68073&op=diff
==============================================================================
--- branches/upstream/libsearch-gin-perl/current/t/00-compile.t (original)
+++ branches/upstream/libsearch-gin-perl/current/t/00-compile.t Mon Jan 31 21:02:52 2011
@@ -4,6 +4,9 @@
 use warnings;
 
 use Test::More;
+
+
+
 use File::Find;
 use File::Temp qw{ tempdir };
 
@@ -23,13 +26,14 @@
 
 my @scripts = glob "bin/*";
 
-plan tests => scalar(@modules) + scalar(@scripts);
+my $plan = scalar(@modules) + scalar(@scripts);
+$plan ? (plan tests => $plan) : (plan skip_all => "no tests to run");
 
 {
     # fake home for cpan-testers
     # no fake requested ## local $ENV{HOME} = tempdir( CLEANUP => 1 );
 
-    like( qx{ $^X -Ilib -e "use $_; print '$_ ok'" }, qr/^\s*$_ ok/s, "$_ loaded ok" )
+    like( qx{ $^X -Ilib -e "require $_; print '$_ ok'" }, qr/^\s*$_ ok/s, "$_ loaded ok" )
         for sort @modules;
 
     SKIP: {

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