Hello community,

here is the log from the commit of package perl-CHI for openSUSE:Factory 
checked in at 2011-10-28 21:04:21
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-CHI (Old)
 and      /work/SRC/openSUSE:Factory/.perl-CHI.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "perl-CHI", Maintainer is ""

Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-CHI/perl-CHI.changes        2011-09-23 
12:36:04.000000000 +0200
+++ /work/SRC/openSUSE:Factory/.perl-CHI.new/perl-CHI.changes   2011-10-29 
00:35:21.000000000 +0200
@@ -1,0 +2,10 @@
+Tue Oct 25 17:08:27 UTC 2011 - [email protected]
+
+- updated to 0.49
+  - go back to generating version numbers for all sub-modules again
+
+- updated to 0.48
+  - disregard default expires_at and expires_in if either are provided
+    RT #67970 (spjw)
+
+-------------------------------------------------------------------

Old:
----
  CHI-0.47.tar.gz

New:
----
  CHI-0.49.tar.gz

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ perl-CHI.spec ++++++
--- /var/tmp/diff_new_pack.oRNE2Z/_old  2011-10-29 00:35:22.000000000 +0200
+++ /var/tmp/diff_new_pack.oRNE2Z/_new  2011-10-29 00:35:22.000000000 +0200
@@ -18,7 +18,7 @@
 
 
 Name:           perl-CHI
-Version:        0.47
+Version:        0.49
 Release:        1
 License:        GPL+ or Artistic
 %define cpan_name CHI
@@ -34,28 +34,122 @@
 BuildRequires:  perl(Data::UUID)
 BuildRequires:  perl(Date::Parse)
 BuildRequires:  perl(Digest::JHash)
+BuildRequires:  perl(Digest::MD5)
+BuildRequires:  perl(ExtUtils::MakeMaker)
+BuildRequires:  perl(File::Spec) >= 0.80
 BuildRequires:  perl(Hash::MoreUtils)
 BuildRequires:  perl(JSON)
 BuildRequires:  perl(List::MoreUtils) >= 0.13
 BuildRequires:  perl(Log::Any) >= 0.08
 BuildRequires:  perl(Moose) >= 0.66
+BuildRequires:  perl(Storable)
 BuildRequires:  perl(Task::Weaken)
+BuildRequires:  perl(Test::Builder)
 BuildRequires:  perl(Test::Class)
 BuildRequires:  perl(Test::Deep)
 BuildRequires:  perl(Test::Exception)
+BuildRequires:  perl(Test::More)
 BuildRequires:  perl(Test::Warn)
 BuildRequires:  perl(Time::Duration) >= 1.06
 BuildRequires:  perl(Time::Duration::Parse) >= 0.03
 BuildRequires:  perl(Try::Tiny) >= 0.05
+#BuildRequires: perl(Benchmark)
+#BuildRequires: perl(Blarg)
+#BuildRequires: perl(Cache::Cache)
+#BuildRequires: perl(Cache::FastMmap)
+#BuildRequires: perl(Capture::Tiny)
+#BuildRequires: perl(Carp)
+#BuildRequires: perl(CHI)
+#BuildRequires: perl(CHI::CacheObject)
+#BuildRequires: perl(CHI::Constants)
+#BuildRequires: perl(CHI::Driver)
+#BuildRequires: perl(CHI::Driver::Base::CacheContainer)
+#BuildRequires: perl(CHI::Driver::File)
+#BuildRequires: perl(CHI::Driver::Memory)
+#BuildRequires: perl(CHI::Driver::Metacache)
+#BuildRequires: perl(CHI::Driver::Role::HasSubcaches)
+#BuildRequires: perl(CHI::Driver::Role::IsSizeAware)
+#BuildRequires: perl(CHI::Driver::Role::IsSubcache)
+#BuildRequires: perl(CHI::Driver::Role::Universal)
+#BuildRequires: perl(CHI::Serializer::JSON)
+#BuildRequires: perl(CHI::Serializer::Storable)
+#BuildRequires: perl(CHI::Stats)
+#BuildRequires: perl(CHI::t::Bugs)
+#BuildRequires: perl(CHI::t::Constants)
+#BuildRequires: perl(CHI::t::Driver)
+#BuildRequires: perl(CHI::t::Driver::CacheCache)
+#BuildRequires: perl(CHI::t::Driver::FastMmap)
+#BuildRequires: perl(CHI::t::Driver::File)
+#BuildRequires: perl(CHI::t::Driver::File::DepthZero)
+#BuildRequires: perl(CHI::t::Driver::Memory)
+#BuildRequires: perl(CHI::t::Driver::NonMoose)
+#BuildRequires: perl(CHI::t::Driver::RawMemory)
+#BuildRequires: perl(CHI::t::Driver::Subcache)
+#BuildRequires: perl(CHI::t::Driver::Subcache::l1_cache)
+#BuildRequires: perl(CHI::t::Driver::Subcache::mirror_cache)
+#BuildRequires: perl(CHI::Test)
+#BuildRequires: perl(CHI::Test::Class)
+#BuildRequires: perl(CHI::Test::Driver::Role::CheckKeyValidity)
+#BuildRequires: perl(CHI::Test::Util)
+#BuildRequires: perl(CHI::t::GetError)
+#BuildRequires: perl(CHI::t::Initialize)
+#BuildRequires: perl(CHI::t::Null)
+#BuildRequires: perl(CHI::t::RequiredModules)
+#BuildRequires: perl(CHI::t::Sanity)
+#BuildRequires: perl(CHI::t::SetError)
+#BuildRequires: perl(CHI::t::Subcache)
+#BuildRequires: perl(CHI::t::Subclass)
+#BuildRequires: perl(CHI::t::Util)
+#BuildRequires: perl(CHI::Types)
+#BuildRequires: perl(CHI::Util)
+#BuildRequires: perl(Class::MOP)
+#BuildRequires: perl(Compress::Zlib)
+#BuildRequires: perl(constant)
+#BuildRequires: perl(Cwd)
+#BuildRequires: perl(d)
+#BuildRequires: perl(Data::Dump)
+#BuildRequires: perl(Data::Dumper)
+#BuildRequires: perl(DBD::mysql)
+#BuildRequires: perl(DBI)
+#BuildRequires: perl(Encode)
+#BuildRequires: perl(Exporter)
+#BuildRequires: perl(Fcntl)
+#BuildRequires: perl(File::Basename)
+#BuildRequires: perl(File::Find)
+#BuildRequires: perl(File::Path)
+#BuildRequires: perl(File::Spec::Functions)
+#BuildRequires: perl(File::Temp)
+#BuildRequires: perl(Getopt::Long)
+#BuildRequires: perl(List::Util)
+#BuildRequires: perl(Log::Any::Test)
+#BuildRequires: perl(Module::Load::Conditional)
+#BuildRequires: perl(Module::Mask)
+#BuildRequires: perl(Moose::Role)
+#BuildRequires: perl(Moose::Util::TypeConstraints)
+#BuildRequires: perl(Pod::Usage)
+#BuildRequires: perl(Scalar::Util)
+#BuildRequires: perl(Test::Pod)
+#BuildRequires: perl(Text::Table)
+#BuildRequires: perl(YAML::Any)
 Requires:       perl(Carp::Assert) >= 0.20
 Requires:       perl(Data::UUID)
+Requires:       perl(Date::Parse)
 Requires:       perl(Digest::JHash)
+Requires:       perl(Digest::MD5)
+Requires:       perl(File::Spec) >= 0.80
 Requires:       perl(Hash::MoreUtils)
 Requires:       perl(JSON)
 Requires:       perl(List::MoreUtils) >= 0.13
 Requires:       perl(Log::Any) >= 0.08
 Requires:       perl(Moose) >= 0.66
+Requires:       perl(Storable)
 Requires:       perl(Task::Weaken)
+Requires:       perl(Test::Builder)
+Requires:       perl(Test::Class)
+Requires:       perl(Test::Deep)
+Requires:       perl(Test::Exception)
+Requires:       perl(Test::More)
+Requires:       perl(Test::Warn)
 Requires:       perl(Time::Duration) >= 1.06
 Requires:       perl(Time::Duration::Parse) >= 0.03
 Requires:       perl(Try::Tiny) >= 0.05
@@ -76,6 +170,7 @@
 
 %prep
 %setup -q -n %{cpan_name}-%{version}
+find . -type f -print0 | xargs -0 chmod 644
 
 %build
 %{__perl} Makefile.PL INSTALLDIRS=vendor
@@ -89,9 +184,6 @@
 %perl_process_packlist
 %perl_gen_filelist
 
-%clean
-%{__rm} -rf %{buildroot}
-
 %files -f %{name}.files
 %defattr(-,root,root,755)
 %doc Changes LICENSE README

++++++ CHI-0.47.tar.gz -> CHI-0.49.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/Changes new/CHI-0.49/Changes
--- old/CHI-0.47/Changes        2011-04-28 23:37:22.000000000 +0200
+++ new/CHI-0.49/Changes        2011-06-23 20:54:54.000000000 +0200
@@ -2,6 +2,16 @@
 
 ** denotes an incompatible change
 
+0.49  Jun 23, 2011
+
+* Fixes
+  - Go back to generating version numbers for all sub-modules again
+
+0.48  Jun 15, 2011
+
+* Fixes
+  - Disregard default expires_at and expires_in if either are provided - RT 
#67970 (spjw)
+
 0.47  Apr 28, 2011
 
 * Improvements
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/META.json new/CHI-0.49/META.json
--- old/CHI-0.47/META.json      2011-04-28 23:37:22.000000000 +0200
+++ new/CHI-0.49/META.json      2011-06-23 20:54:54.000000000 +0200
@@ -77,6 +77,6 @@
          "web" : "https://github.com/jonswar/perl-chi";
       }
    },
-   "version" : "0.47"
+   "version" : "0.49"
 }
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/META.yml new/CHI-0.49/META.yml
--- old/CHI-0.47/META.yml       2011-04-28 23:37:22.000000000 +0200
+++ new/CHI-0.49/META.yml       2011-06-23 20:54:54.000000000 +0200
@@ -50,4 +50,4 @@
 resources:
   bugtracker: http://rt.cpan.org/NoAuth/Bugs.html?Dist=CHI
   repository: git://github.com/jonswar/perl-chi.git
-version: 0.47
+version: 0.49
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/Makefile.PL new/CHI-0.49/Makefile.PL
--- old/CHI-0.47/Makefile.PL    2011-04-28 23:37:22.000000000 +0200
+++ new/CHI-0.49/Makefile.PL    2011-06-23 20:54:54.000000000 +0200
@@ -44,7 +44,7 @@
     'Time::Duration::Parse' => '0.03',
     'Try::Tiny' => '0.05'
   },
-  'VERSION' => '0.47',
+  'VERSION' => '0.49',
   'test' => {
     'TESTS' => 't/*.t'
   }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/README new/CHI-0.49/README
--- old/CHI-0.47/README 2011-04-28 23:37:22.000000000 +0200
+++ new/CHI-0.49/README 2011-06-23 20:54:54.000000000 +0200
@@ -2,7 +2,7 @@
     CHI - Unified cache handling interface
 
 VERSION
-    version 0.47
+    version 0.49
 
 SYNOPSIS
         use CHI;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/Benchmarks.pod 
new/CHI-0.49/lib/CHI/Benchmarks.pod
--- old/CHI-0.47/lib/CHI/Benchmarks.pod 2011-04-28 23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/Benchmarks.pod 2011-06-23 20:54:54.000000000 +0200
@@ -9,7 +9,7 @@
 
 =head1 VERSION
 
-version 0.47
+version 0.49
 
 =head1 DESCRIPTION
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/CacheObject.pm 
new/CHI-0.49/lib/CHI/CacheObject.pm
--- old/CHI-0.47/lib/CHI/CacheObject.pm 2011-04-28 23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/CacheObject.pm 2011-06-23 20:54:54.000000000 +0200
@@ -1,6 +1,6 @@
 package CHI::CacheObject;
 BEGIN {
-  $CHI::CacheObject::VERSION = '0.47';
+  $CHI::CacheObject::VERSION = '0.49';
 }
 use CHI::Constants qw(CHI_Max_Time);
 use Encode;
@@ -180,7 +180,7 @@
 
 =head1 VERSION
 
-version 0.47
+version 0.49
 
 =head1 SYNOPSIS
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/Constants.pm 
new/CHI-0.49/lib/CHI/Constants.pm
--- old/CHI-0.47/lib/CHI/Constants.pm   2011-04-28 23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/Constants.pm   2011-06-23 20:54:54.000000000 +0200
@@ -1,6 +1,6 @@
 package CHI::Constants;
 BEGIN {
-  $CHI::Constants::VERSION = '0.47';
+  $CHI::Constants::VERSION = '0.49';
 }
 use strict;
 use warnings;
@@ -28,7 +28,7 @@
 
 =head1 VERSION
 
-version 0.47
+version 0.49
 
 =head1 DESCRIPTION
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/Driver/Base/CacheContainer.pm 
new/CHI-0.49/lib/CHI/Driver/Base/CacheContainer.pm
--- old/CHI-0.47/lib/CHI/Driver/Base/CacheContainer.pm  2011-04-28 
23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/Driver/Base/CacheContainer.pm  2011-06-23 
20:54:54.000000000 +0200
@@ -1,6 +1,6 @@
 package CHI::Driver::Base::CacheContainer;
 BEGIN {
-  $CHI::Driver::Base::CacheContainer::VERSION = '0.47';
+  $CHI::Driver::Base::CacheContainer::VERSION = '0.49';
 }
 use Moose;
 use Moose::Util::TypeConstraints;
@@ -62,7 +62,7 @@
 
 =head1 VERSION
 
-version 0.47
+version 0.49
 
 =head1 DESCRIPTION
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/Driver/CacheCache.pm 
new/CHI-0.49/lib/CHI/Driver/CacheCache.pm
--- old/CHI-0.47/lib/CHI/Driver/CacheCache.pm   2011-04-28 23:37:22.000000000 
+0200
+++ new/CHI-0.49/lib/CHI/Driver/CacheCache.pm   2011-06-23 20:54:54.000000000 
+0200
@@ -1,6 +1,6 @@
 package CHI::Driver::CacheCache;
 BEGIN {
-  $CHI::Driver::CacheCache::VERSION = '0.47';
+  $CHI::Driver::CacheCache::VERSION = '0.49';
 }
 use Cache::Cache;
 use Carp;
@@ -47,7 +47,7 @@
 
 =head1 VERSION
 
-version 0.47
+version 0.49
 
 =head1 SYNOPSIS
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/Driver/Development.pod 
new/CHI-0.49/lib/CHI/Driver/Development.pod
--- old/CHI-0.47/lib/CHI/Driver/Development.pod 2011-04-28 23:37:22.000000000 
+0200
+++ new/CHI-0.49/lib/CHI/Driver/Development.pod 2011-06-23 20:54:54.000000000 
+0200
@@ -9,7 +9,7 @@
 
 =head1 VERSION
 
-version 0.47
+version 0.49
 
 =head1 SYNOPSIS
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/Driver/FastMmap.pm 
new/CHI-0.49/lib/CHI/Driver/FastMmap.pm
--- old/CHI-0.47/lib/CHI/Driver/FastMmap.pm     2011-04-28 23:37:22.000000000 
+0200
+++ new/CHI-0.49/lib/CHI/Driver/FastMmap.pm     2011-06-23 20:54:54.000000000 
+0200
@@ -1,6 +1,6 @@
 package CHI::Driver::FastMmap;
 BEGIN {
-  $CHI::Driver::FastMmap::VERSION = '0.47';
+  $CHI::Driver::FastMmap::VERSION = '0.49';
 }
 use Carp;
 use Cache::FastMmap;
@@ -89,7 +89,7 @@
 
 =head1 VERSION
 
-version 0.47
+version 0.49
 
 =head1 SYNOPSIS
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/Driver/File.pm 
new/CHI-0.49/lib/CHI/Driver/File.pm
--- old/CHI-0.47/lib/CHI/Driver/File.pm 2011-04-28 23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/Driver/File.pm 2011-06-23 20:54:54.000000000 +0200
@@ -1,6 +1,6 @@
 package CHI::Driver::File;
 BEGIN {
-  $CHI::Driver::File::VERSION = '0.47';
+  $CHI::Driver::File::VERSION = '0.49';
 }
 use Carp;
 use Cwd qw(realpath cwd);
@@ -248,7 +248,7 @@
 
 =head1 VERSION
 
-version 0.47
+version 0.49
 
 =head1 SYNOPSIS
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/Driver/Memory.pm 
new/CHI-0.49/lib/CHI/Driver/Memory.pm
--- old/CHI-0.47/lib/CHI/Driver/Memory.pm       2011-04-28 23:37:22.000000000 
+0200
+++ new/CHI-0.49/lib/CHI/Driver/Memory.pm       2011-06-23 20:54:54.000000000 
+0200
@@ -1,6 +1,6 @@
 package CHI::Driver::Memory;
 BEGIN {
-  $CHI::Driver::Memory::VERSION = '0.47';
+  $CHI::Driver::Memory::VERSION = '0.49';
 }
 use Carp qw(cluck croak);
 use CHI::Constants qw(CHI_Meta_Namespace);
@@ -105,7 +105,7 @@
 
 =head1 VERSION
 
-version 0.47
+version 0.49
 
 =head1 SYNOPSIS
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/Driver/Metacache.pm 
new/CHI-0.49/lib/CHI/Driver/Metacache.pm
--- old/CHI-0.47/lib/CHI/Driver/Metacache.pm    2011-04-28 23:37:22.000000000 
+0200
+++ new/CHI-0.49/lib/CHI/Driver/Metacache.pm    2011-06-23 20:54:54.000000000 
+0200
@@ -1,6 +1,6 @@
 package CHI::Driver::Metacache;
 BEGIN {
-  $CHI::Driver::Metacache::VERSION = '0.47';
+  $CHI::Driver::Metacache::VERSION = '0.49';
 }
 use CHI::Constants qw(CHI_Meta_Namespace);
 use Moose;
@@ -66,7 +66,7 @@
 
 =head1 VERSION
 
-version 0.47
+version 0.49
 
 =head1 SYNOPSIS
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/Driver/Null.pm 
new/CHI-0.49/lib/CHI/Driver/Null.pm
--- old/CHI-0.47/lib/CHI/Driver/Null.pm 2011-04-28 23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/Driver/Null.pm 2011-06-23 20:54:54.000000000 +0200
@@ -1,6 +1,6 @@
 package CHI::Driver::Null;
 BEGIN {
-  $CHI::Driver::Null::VERSION = '0.47';
+  $CHI::Driver::Null::VERSION = '0.49';
 }
 use Moose;
 use strict;
@@ -28,7 +28,7 @@
 
 =head1 VERSION
 
-version 0.47
+version 0.49
 
 =head1 SYNOPSIS
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/Driver/RawMemory.pm 
new/CHI-0.49/lib/CHI/Driver/RawMemory.pm
--- old/CHI-0.47/lib/CHI/Driver/RawMemory.pm    2011-04-28 23:37:22.000000000 
+0200
+++ new/CHI-0.49/lib/CHI/Driver/RawMemory.pm    2011-06-23 20:54:54.000000000 
+0200
@@ -1,6 +1,6 @@
 package CHI::Driver::RawMemory;
 BEGIN {
-  $CHI::Driver::RawMemory::VERSION = '0.47';
+  $CHI::Driver::RawMemory::VERSION = '0.49';
 }
 use Moose;
 use strict;
@@ -30,7 +30,7 @@
 
 =head1 VERSION
 
-version 0.47
+version 0.49
 
 =head1 SYNOPSIS
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/Driver/Role/HasSubcaches.pm 
new/CHI-0.49/lib/CHI/Driver/Role/HasSubcaches.pm
--- old/CHI-0.47/lib/CHI/Driver/Role/HasSubcaches.pm    2011-04-28 
23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/Driver/Role/HasSubcaches.pm    2011-06-23 
20:54:54.000000000 +0200
@@ -1,4 +1,7 @@
 package CHI::Driver::Role::HasSubcaches;
+BEGIN {
+  $CHI::Driver::Role::HasSubcaches::VERSION = '0.49';
+}
 use Moose::Role;
 use Hash::MoreUtils qw(slice_exists);
 use Log::Any qw($log);
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/Driver/Role/IsSizeAware.pm 
new/CHI-0.49/lib/CHI/Driver/Role/IsSizeAware.pm
--- old/CHI-0.47/lib/CHI/Driver/Role/IsSizeAware.pm     2011-04-28 
23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/Driver/Role/IsSizeAware.pm     2011-06-23 
20:54:54.000000000 +0200
@@ -1,4 +1,7 @@
 package CHI::Driver::Role::IsSizeAware;
+BEGIN {
+  $CHI::Driver::Role::IsSizeAware::VERSION = '0.49';
+}
 use Carp::Assert;
 use Moose::Role;
 use strict;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/Driver/Role/IsSubcache.pm 
new/CHI-0.49/lib/CHI/Driver/Role/IsSubcache.pm
--- old/CHI-0.47/lib/CHI/Driver/Role/IsSubcache.pm      2011-04-28 
23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/Driver/Role/IsSubcache.pm      2011-06-23 
20:54:54.000000000 +0200
@@ -1,4 +1,7 @@
 package CHI::Driver::Role::IsSubcache;
+BEGIN {
+  $CHI::Driver::Role::IsSubcache::VERSION = '0.49';
+}
 use Moose::Role;
 use strict;
 use warnings;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/Driver/Role/Universal.pm 
new/CHI-0.49/lib/CHI/Driver/Role/Universal.pm
--- old/CHI-0.47/lib/CHI/Driver/Role/Universal.pm       2011-04-28 
23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/Driver/Role/Universal.pm       2011-06-23 
20:54:54.000000000 +0200
@@ -1,6 +1,6 @@
 package CHI::Driver::Role::Universal;
 BEGIN {
-  $CHI::Driver::Role::Universal::VERSION = '0.47';
+  $CHI::Driver::Role::Universal::VERSION = '0.49';
 }
 use CHI::Constants qw(CHI_Meta_Namespace);
 use Moose::Role;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/Driver.pm 
new/CHI-0.49/lib/CHI/Driver.pm
--- old/CHI-0.47/lib/CHI/Driver.pm      2011-04-28 23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/Driver.pm      2011-06-23 20:54:54.000000000 +0200
@@ -1,6 +1,6 @@
 package CHI::Driver;
 BEGIN {
-  $CHI::Driver::VERSION = '0.47';
+  $CHI::Driver::VERSION = '0.49';
 }
 use Carp;
 use CHI::CacheObject;
@@ -283,7 +283,18 @@
                 $options = { expires_in => $options };
             }
         }
-        $options = { %{ $self->_default_set_options }, %$options };
+
+        # Disregard default expires_at and expires_in if either are provided
+        #
+        if (   exists( $options->{expires_at} )
+            || exists( $options->{expires_in} ) )
+        {
+            $options =
+              { expires_variance => $self->expires_variance, %$options };
+        }
+        else {
+            $options = { %{ $self->_default_set_options }, %$options };
+        }
     }
 
     $self->set_with_options( $key, $value, $options );
@@ -686,7 +697,7 @@
 
 =head1 VERSION
 
-version 0.47
+version 0.49
 
 =head1 DESCRIPTION
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/Serializer/JSON.pm 
new/CHI-0.49/lib/CHI/Serializer/JSON.pm
--- old/CHI-0.47/lib/CHI/Serializer/JSON.pm     2011-04-28 23:37:22.000000000 
+0200
+++ new/CHI-0.49/lib/CHI/Serializer/JSON.pm     2011-06-23 20:54:54.000000000 
+0200
@@ -2,6 +2,9 @@
 # Recommend Data::Serializer for other serializers, rather than reinventing 
the wheel.
 #
 package CHI::Serializer::JSON;
+BEGIN {
+  $CHI::Serializer::JSON::VERSION = '0.49';
+}
 use Moose;
 use JSON;
 use strict;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/Serializer/Storable.pm 
new/CHI-0.49/lib/CHI/Serializer/Storable.pm
--- old/CHI-0.47/lib/CHI/Serializer/Storable.pm 2011-04-28 23:37:22.000000000 
+0200
+++ new/CHI-0.49/lib/CHI/Serializer/Storable.pm 2011-06-23 20:54:54.000000000 
+0200
@@ -2,6 +2,9 @@
 # Recommend Data::Serializer for other serializers, rather than reinventing 
the wheel.
 #
 package CHI::Serializer::Storable;
+BEGIN {
+  $CHI::Serializer::Storable::VERSION = '0.49';
+}
 use Moose;
 use Storable;
 use strict;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/Stats.pm 
new/CHI-0.49/lib/CHI/Stats.pm
--- old/CHI-0.47/lib/CHI/Stats.pm       2011-04-28 23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/Stats.pm       2011-06-23 20:54:54.000000000 +0200
@@ -1,6 +1,6 @@
 package CHI::Stats;
 BEGIN {
-  $CHI::Stats::VERSION = '0.47';
+  $CHI::Stats::VERSION = '0.49';
 }
 use Log::Any qw($log);
 use Moose;
@@ -137,7 +137,7 @@
 
 =head1 VERSION
 
-version 0.47
+version 0.49
 
 =head1 SYNOPSIS
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/Test/Class.pm 
new/CHI-0.49/lib/CHI/Test/Class.pm
--- old/CHI-0.47/lib/CHI/Test/Class.pm  2011-04-28 23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/Test/Class.pm  2011-06-23 20:54:54.000000000 +0200
@@ -1,4 +1,7 @@
 package CHI::Test::Class;
+BEGIN {
+  $CHI::Test::Class::VERSION = '0.49';
+}
 use Getopt::Long;
 use CHI::Util qw(can_load);
 use strict;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/Test/Driver/NonMoose.pm 
new/CHI-0.49/lib/CHI/Test/Driver/NonMoose.pm
--- old/CHI-0.47/lib/CHI/Test/Driver/NonMoose.pm        2011-04-28 
23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/Test/Driver/NonMoose.pm        2011-06-23 
20:54:54.000000000 +0200
@@ -1,4 +1,7 @@
 package CHI::Test::Driver::NonMoose;
+BEGIN {
+  $CHI::Test::Driver::NonMoose::VERSION = '0.49';
+}
 use Carp;
 use strict;
 use warnings;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/Test/Driver/Readonly.pm 
new/CHI-0.49/lib/CHI/Test/Driver/Readonly.pm
--- old/CHI-0.47/lib/CHI/Test/Driver/Readonly.pm        2011-04-28 
23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/Test/Driver/Readonly.pm        2011-06-23 
20:54:54.000000000 +0200
@@ -1,4 +1,7 @@
 package CHI::Test::Driver::Readonly;
+BEGIN {
+  $CHI::Test::Driver::Readonly::VERSION = '0.49';
+}
 use Carp;
 use Moose;
 use strict;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/CHI-0.47/lib/CHI/Test/Driver/Role/CheckKeyValidity.pm 
new/CHI-0.49/lib/CHI/Test/Driver/Role/CheckKeyValidity.pm
--- old/CHI-0.47/lib/CHI/Test/Driver/Role/CheckKeyValidity.pm   2011-04-28 
23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/Test/Driver/Role/CheckKeyValidity.pm   2011-06-23 
20:54:54.000000000 +0200
@@ -1,4 +1,7 @@
 package CHI::Test::Driver::Role::CheckKeyValidity;
+BEGIN {
+  $CHI::Test::Driver::Role::CheckKeyValidity::VERSION = '0.49';
+}
 use Carp;
 use Moose::Role;
 use strict;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/Test/Driver/Writeonly.pm 
new/CHI-0.49/lib/CHI/Test/Driver/Writeonly.pm
--- old/CHI-0.47/lib/CHI/Test/Driver/Writeonly.pm       2011-04-28 
23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/Test/Driver/Writeonly.pm       2011-06-23 
20:54:54.000000000 +0200
@@ -1,4 +1,7 @@
 package CHI::Test::Driver::Writeonly;
+BEGIN {
+  $CHI::Test::Driver::Writeonly::VERSION = '0.49';
+}
 use Carp;
 use strict;
 use warnings;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/Test/Util.pm 
new/CHI-0.49/lib/CHI/Test/Util.pm
--- old/CHI-0.47/lib/CHI/Test/Util.pm   2011-04-28 23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/Test/Util.pm   2011-06-23 20:54:54.000000000 +0200
@@ -1,4 +1,7 @@
 package CHI::Test::Util;
+BEGIN {
+  $CHI::Test::Util::VERSION = '0.49';
+}
 use Date::Parse;
 use Test::Builder;
 use Test::More;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/Test.pm new/CHI-0.49/lib/CHI/Test.pm
--- old/CHI-0.47/lib/CHI/Test.pm        2011-04-28 23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/Test.pm        2011-06-23 20:54:54.000000000 +0200
@@ -1,6 +1,9 @@
 # $Id: $
 #
 package CHI::Test;
+BEGIN {
+  $CHI::Test::VERSION = '0.49';
+}
 use Log::Any::Test;    # as early as possible
 use List::MoreUtils qw(uniq);
 use Class::MOP;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/Types.pm 
new/CHI-0.49/lib/CHI/Types.pm
--- old/CHI-0.47/lib/CHI/Types.pm       2011-04-28 23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/Types.pm       2011-06-23 20:54:54.000000000 +0200
@@ -1,4 +1,7 @@
 package CHI::Types;
+BEGIN {
+  $CHI::Types::VERSION = '0.49';
+}
 use Carp;
 use CHI::Util qw(can_load parse_duration parse_memory_size);
 use Moose;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/Util.pm new/CHI-0.49/lib/CHI/Util.pm
--- old/CHI-0.47/lib/CHI/Util.pm        2011-04-28 23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/Util.pm        2011-06-23 20:54:54.000000000 +0200
@@ -1,4 +1,7 @@
 package CHI::Util;
+BEGIN {
+  $CHI::Util::VERSION = '0.49';
+}
 use Carp qw( croak longmess );
 use Class::MOP;
 use Data::Dumper;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/t/Bugs.pm 
new/CHI-0.49/lib/CHI/t/Bugs.pm
--- old/CHI-0.47/lib/CHI/t/Bugs.pm      2011-04-28 23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/t/Bugs.pm      2011-06-23 20:54:54.000000000 +0200
@@ -1,4 +1,7 @@
 package CHI::t::Bugs;
+BEGIN {
+  $CHI::t::Bugs::VERSION = '0.49';
+}
 use strict;
 use warnings;
 use CHI::Test;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/t/Constants.pm 
new/CHI-0.49/lib/CHI/t/Constants.pm
--- old/CHI-0.47/lib/CHI/t/Constants.pm 2011-04-28 23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/t/Constants.pm 2011-06-23 20:54:54.000000000 +0200
@@ -1,4 +1,7 @@
 package CHI::t::Constants;
+BEGIN {
+  $CHI::t::Constants::VERSION = '0.49';
+}
 use strict;
 use warnings;
 use CHI::Test;
@@ -7,14 +10,23 @@
 sub test_import : Tests {
     {
         package Foo;
+BEGIN {
+  $Foo::VERSION = '0.49';
+}
         use CHI::Constants qw(CHI_Meta_Namespace);
     }
     {
         package Bar;
+BEGIN {
+  $Bar::VERSION = '0.49';
+}
         use CHI::Constants qw(:all);
     }
     {
         package Baz;
+BEGIN {
+  $Baz::VERSION = '0.49';
+}
     }
     is( Foo::CHI_Meta_Namespace, '_CHI_METACACHE' );
     is( Bar::CHI_Meta_Namespace, '_CHI_METACACHE' );
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/t/Driver/CacheCache.pm 
new/CHI-0.49/lib/CHI/t/Driver/CacheCache.pm
--- old/CHI-0.47/lib/CHI/t/Driver/CacheCache.pm 2011-04-28 23:37:22.000000000 
+0200
+++ new/CHI-0.49/lib/CHI/t/Driver/CacheCache.pm 2011-06-23 20:54:54.000000000 
+0200
@@ -1,4 +1,7 @@
 package CHI::t::Driver::CacheCache;
+BEGIN {
+  $CHI::t::Driver::CacheCache::VERSION = '0.49';
+}
 use strict;
 use warnings;
 use CHI::Test;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/t/Driver/FastMmap.pm 
new/CHI-0.49/lib/CHI/t/Driver/FastMmap.pm
--- old/CHI-0.47/lib/CHI/t/Driver/FastMmap.pm   2011-04-28 23:37:22.000000000 
+0200
+++ new/CHI-0.49/lib/CHI/t/Driver/FastMmap.pm   2011-06-23 20:54:54.000000000 
+0200
@@ -1,4 +1,7 @@
 package CHI::t::Driver::FastMmap;
+BEGIN {
+  $CHI::t::Driver::FastMmap::VERSION = '0.49';
+}
 use strict;
 use warnings;
 use CHI::Test;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/t/Driver/File/DepthZero.pm 
new/CHI-0.49/lib/CHI/t/Driver/File/DepthZero.pm
--- old/CHI-0.47/lib/CHI/t/Driver/File/DepthZero.pm     2011-04-28 
23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/t/Driver/File/DepthZero.pm     2011-06-23 
20:54:54.000000000 +0200
@@ -1,4 +1,7 @@
 package CHI::t::Driver::File::DepthZero;
+BEGIN {
+  $CHI::t::Driver::File::DepthZero::VERSION = '0.49';
+}
 use strict;
 use warnings;
 use CHI::Test;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/t/Driver/File.pm 
new/CHI-0.49/lib/CHI/t/Driver/File.pm
--- old/CHI-0.47/lib/CHI/t/Driver/File.pm       2011-04-28 23:37:22.000000000 
+0200
+++ new/CHI-0.49/lib/CHI/t/Driver/File.pm       2011-06-23 20:54:54.000000000 
+0200
@@ -1,4 +1,7 @@
 package CHI::t::Driver::File;
+BEGIN {
+  $CHI::t::Driver::File::VERSION = '0.49';
+}
 use strict;
 use warnings;
 use CHI::Test;
@@ -20,6 +23,9 @@
 
 {
     package CHI::t::Driver::File::NoTempDriver;
+BEGIN {
+  $CHI::t::Driver::File::NoTempDriver::VERSION = '0.49';
+}
     use Moose;
     extends 'CHI::Driver::File';
     __PACKAGE__->meta->make_immutable;
@@ -32,6 +38,9 @@
 
 {
     package CHI::t::Driver::File::BadTempDriver;
+BEGIN {
+  $CHI::t::Driver::File::BadTempDriver::VERSION = '0.49';
+}
     use Moose;
     extends 'CHI::Driver::File';
     __PACKAGE__->meta->make_immutable;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/t/Driver/Memory.pm 
new/CHI-0.49/lib/CHI/t/Driver/Memory.pm
--- old/CHI-0.47/lib/CHI/t/Driver/Memory.pm     2011-04-28 23:37:22.000000000 
+0200
+++ new/CHI-0.49/lib/CHI/t/Driver/Memory.pm     2011-06-23 20:54:54.000000000 
+0200
@@ -1,4 +1,7 @@
 package CHI::t::Driver::Memory;
+BEGIN {
+  $CHI::t::Driver::Memory::VERSION = '0.49';
+}
 use strict;
 use warnings;
 use CHI::Test;
@@ -90,6 +93,8 @@
 
 sub test_lru_discard : Tests {
     my $self = shift;
+    return 'author testing only' unless ( $ENV{AUTHOR_TESTING} );
+
     my $cache = $self->new_cleared_cache( max_size => 41 );
     is( $cache->discard_policy, 'lru' );
     my $value_20 = 'x' x 6;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/t/Driver/NonMoose.pm 
new/CHI-0.49/lib/CHI/t/Driver/NonMoose.pm
--- old/CHI-0.47/lib/CHI/t/Driver/NonMoose.pm   2011-04-28 23:37:22.000000000 
+0200
+++ new/CHI-0.49/lib/CHI/t/Driver/NonMoose.pm   2011-06-23 20:54:54.000000000 
+0200
@@ -1,4 +1,7 @@
 package CHI::t::Driver::NonMoose;
+BEGIN {
+  $CHI::t::Driver::NonMoose::VERSION = '0.49';
+}
 use strict;
 use warnings;
 use CHI::Test;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/t/Driver/RawMemory.pm 
new/CHI-0.49/lib/CHI/t/Driver/RawMemory.pm
--- old/CHI-0.47/lib/CHI/t/Driver/RawMemory.pm  2011-04-28 23:37:22.000000000 
+0200
+++ new/CHI-0.49/lib/CHI/t/Driver/RawMemory.pm  2011-06-23 20:54:54.000000000 
+0200
@@ -1,4 +1,7 @@
 package CHI::t::Driver::RawMemory;
+BEGIN {
+  $CHI::t::Driver::RawMemory::VERSION = '0.49';
+}
 use strict;
 use warnings;
 use CHI::Test;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/t/Driver/Subcache/l1_cache.pm 
new/CHI-0.49/lib/CHI/t/Driver/Subcache/l1_cache.pm
--- old/CHI-0.47/lib/CHI/t/Driver/Subcache/l1_cache.pm  2011-04-28 
23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/t/Driver/Subcache/l1_cache.pm  2011-06-23 
20:54:54.000000000 +0200
@@ -1,4 +1,7 @@
 package CHI::t::Driver::Subcache::l1_cache;
+BEGIN {
+  $CHI::t::Driver::Subcache::l1_cache::VERSION = '0.49';
+}
 use strict;
 use warnings;
 use CHI::Test;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/t/Driver/Subcache/mirror_cache.pm 
new/CHI-0.49/lib/CHI/t/Driver/Subcache/mirror_cache.pm
--- old/CHI-0.47/lib/CHI/t/Driver/Subcache/mirror_cache.pm      2011-04-28 
23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/t/Driver/Subcache/mirror_cache.pm      2011-06-23 
20:54:54.000000000 +0200
@@ -1,4 +1,7 @@
 package CHI::t::Driver::Subcache::mirror_cache;
+BEGIN {
+  $CHI::t::Driver::Subcache::mirror_cache::VERSION = '0.49';
+}
 use strict;
 use warnings;
 use CHI::Test;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/t/Driver/Subcache.pm 
new/CHI-0.49/lib/CHI/t/Driver/Subcache.pm
--- old/CHI-0.47/lib/CHI/t/Driver/Subcache.pm   2011-04-28 23:37:22.000000000 
+0200
+++ new/CHI-0.49/lib/CHI/t/Driver/Subcache.pm   2011-06-23 20:54:54.000000000 
+0200
@@ -1,4 +1,7 @@
 package CHI::t::Driver::Subcache;
+BEGIN {
+  $CHI::t::Driver::Subcache::VERSION = '0.49';
+}
 use strict;
 use warnings;
 use CHI::Test;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/t/Driver.pm 
new/CHI-0.49/lib/CHI/t/Driver.pm
--- old/CHI-0.47/lib/CHI/t/Driver.pm    2011-04-28 23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/t/Driver.pm    2011-06-23 20:54:54.000000000 +0200
@@ -1,4 +1,7 @@
 package CHI::t::Driver;
+BEGIN {
+  $CHI::t::Driver::VERSION = '0.49';
+}
 use strict;
 use warnings;
 use CHI::Test;
@@ -298,8 +301,10 @@
 }
 
 sub test_expires_immediately : Tests {
-    my $self  = shift;
-    my $cache = $self->{cache};
+    my $self = shift;
+
+    # expires_in default should be ignored
+    my $cache = $self->new_cache( expires_in => '1 hour' );
 
     # Expires immediately
     my $test_expires_immediately = sub {
@@ -326,8 +331,10 @@
 }
 
 sub test_expires_shortly : Tests {
-    my $self  = shift;
-    my $cache = $self->{cache};
+    my $self = shift;
+
+    # expires_in default should be ignored
+    my $cache = $self->new_cache( expires_in => '1 hour' );
 
     # Expires shortly (real time)
     my $test_expires_shortly = sub {
@@ -360,8 +367,10 @@
 }
 
 sub test_expires_later : Tests {
-    my $self  = shift;
-    my $cache = $self->{cache};
+    my $self = shift;
+
+    # expires_in default should be ignored
+    my $cache = $self->new_cache( expires_in => '1s' );
 
     # Expires later (test time)
     my $test_expires_later = sub {
@@ -373,16 +382,16 @@
         my $start_time = time();
         is_between(
             $cache->get_expires_at($key),
-            $start_time + 3599,
-            $start_time + 3601,
+            $start_time + 3590,
+            $start_time + 3610,
             "expires_at ($desc)"
         );
         ok( !$cache->exists_and_is_expired($key), "not expired ($desc)" );
         ok( $cache->is_valid($key),               "valid ($desc)" );
-        local $CHI::Driver::Test_Time = $start_time + 3598;
+        local $CHI::Driver::Test_Time = $start_time + 3590;
         ok( !$cache->exists_and_is_expired($key), "not expired ($desc)" );
         ok( $cache->is_valid($key),               "valid ($desc)" );
-        local $CHI::Driver::Test_Time = $start_time + 3602;
+        local $CHI::Driver::Test_Time = $start_time + 3610;
         ok( !defined $cache->get($key),          "miss after 1 hour ($desc)" );
         ok( $cache->exists_and_is_expired($key), "is_expired ($desc)" );
         ok( !$cache->is_valid($key),             "invalid ($desc)" );
@@ -393,8 +402,8 @@
 }
 
 sub test_expires_never : Tests {
-    my $self  = shift;
-    my $cache = $self->{cache};
+    my $self = shift;
+    my $cache;
 
     # Expires never (will fail in 2037)
     my ( $key, $value ) = $self->kvpair();
@@ -409,7 +418,13 @@
         ok( !$cache->exists_and_is_expired($key), "not expired" );
         ok( $cache->is_valid($key),               "valid" );
     };
+
+    # never is default
+    $cache = $self->new_cache();
     $test_expires_never->();
+
+    # expires_in default should be ignored when never passed to set (RT #67970)
+    $cache = $self->new_cache( expires_in => '1s' );
     $test_expires_never->('never');
 }
 
@@ -561,6 +576,9 @@
 
 {
     package DummySerializer;
+BEGIN {
+  $DummySerializer::VERSION = '0.49';
+}
     sub serialize   { }
     sub deserialize { }
 }
@@ -1434,7 +1452,9 @@
 }
 
 sub test_discard_timeout : Tests {
-    my $self       = shift;
+    my $self = shift;
+    return 'author testing only' unless ( $ENV{AUTHOR_TESTING} );
+
     my $bad_policy = sub {
         return sub { '1' };
     };
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/t/GetError.pm 
new/CHI-0.49/lib/CHI/t/GetError.pm
--- old/CHI-0.47/lib/CHI/t/GetError.pm  2011-04-28 23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/t/GetError.pm  2011-06-23 20:54:54.000000000 +0200
@@ -1,4 +1,7 @@
 package CHI::t::GetError;
+BEGIN {
+  $CHI::t::GetError::VERSION = '0.49';
+}
 use strict;
 use warnings;
 use CHI::Test;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/t/Initialize.pm 
new/CHI-0.49/lib/CHI/t/Initialize.pm
--- old/CHI-0.47/lib/CHI/t/Initialize.pm        2011-04-28 23:37:22.000000000 
+0200
+++ new/CHI-0.49/lib/CHI/t/Initialize.pm        2011-06-23 20:54:54.000000000 
+0200
@@ -1,4 +1,7 @@
 package CHI::t::Initialize;
+BEGIN {
+  $CHI::t::Initialize::VERSION = '0.49';
+}
 use strict;
 use warnings;
 use CHI::Test;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/t/Null.pm 
new/CHI-0.49/lib/CHI/t/Null.pm
--- old/CHI-0.47/lib/CHI/t/Null.pm      2011-04-28 23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/t/Null.pm      2011-06-23 20:54:54.000000000 +0200
@@ -1,4 +1,7 @@
 package CHI::t::Null;
+BEGIN {
+  $CHI::t::Null::VERSION = '0.49';
+}
 use strict;
 use warnings;
 use CHI::Test;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/t/RequiredModules.pm 
new/CHI-0.49/lib/CHI/t/RequiredModules.pm
--- old/CHI-0.47/lib/CHI/t/RequiredModules.pm   2011-04-28 23:37:22.000000000 
+0200
+++ new/CHI-0.49/lib/CHI/t/RequiredModules.pm   2011-06-23 20:54:54.000000000 
+0200
@@ -1,4 +1,7 @@
 package CHI::t::RequiredModules;
+BEGIN {
+  $CHI::t::RequiredModules::VERSION = '0.49';
+}
 use strict;
 use warnings;
 use CHI::Test;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/t/Sanity.pm 
new/CHI-0.49/lib/CHI/t/Sanity.pm
--- old/CHI-0.47/lib/CHI/t/Sanity.pm    2011-04-28 23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/t/Sanity.pm    2011-06-23 20:54:54.000000000 +0200
@@ -1,4 +1,7 @@
 package CHI::t::Sanity;
+BEGIN {
+  $CHI::t::Sanity::VERSION = '0.49';
+}
 use strict;
 use warnings;
 use CHI::Test;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/t/SetError.pm 
new/CHI-0.49/lib/CHI/t/SetError.pm
--- old/CHI-0.47/lib/CHI/t/SetError.pm  2011-04-28 23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/t/SetError.pm  2011-06-23 20:54:54.000000000 +0200
@@ -1,4 +1,7 @@
 package CHI::t::SetError;
+BEGIN {
+  $CHI::t::SetError::VERSION = '0.49';
+}
 use strict;
 use warnings;
 use CHI::Test;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/t/Subcache.pm 
new/CHI-0.49/lib/CHI/t/Subcache.pm
--- old/CHI-0.47/lib/CHI/t/Subcache.pm  2011-04-28 23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/t/Subcache.pm  2011-06-23 20:54:54.000000000 +0200
@@ -1,4 +1,7 @@
 package CHI::t::Subcache;
+BEGIN {
+  $CHI::t::Subcache::VERSION = '0.49';
+}
 use CHI::Test;
 use CHI::Util qw(can_load);
 use base qw(CHI::Test::Class);
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/t/Subclass.pm 
new/CHI-0.49/lib/CHI/t/Subclass.pm
--- old/CHI-0.47/lib/CHI/t/Subclass.pm  2011-04-28 23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/t/Subclass.pm  2011-06-23 20:54:54.000000000 +0200
@@ -1,4 +1,7 @@
 package CHI::t::Subclass;
+BEGIN {
+  $CHI::t::Subclass::VERSION = '0.49';
+}
 use strict;
 use warnings;
 use CHI::Test;
@@ -8,6 +11,9 @@
 #
 {
     package CHI::t::Subclass::Driver::HasUnsupported;
+BEGIN {
+  $CHI::t::Subclass::Driver::HasUnsupported::VERSION = '0.49';
+}
     use Moose;
     extends 'CHI::Driver::Memory';
     __PACKAGE__->declare_unsupported_methods(qw(get_namespaces));
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI/t/Util.pm 
new/CHI-0.49/lib/CHI/t/Util.pm
--- old/CHI-0.47/lib/CHI/t/Util.pm      2011-04-28 23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI/t/Util.pm      2011-06-23 20:54:54.000000000 +0200
@@ -1,4 +1,7 @@
 package CHI::t::Util;
+BEGIN {
+  $CHI::t::Util::VERSION = '0.49';
+}
 use strict;
 use warnings;
 use CHI::Test;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHI.pm new/CHI-0.49/lib/CHI.pm
--- old/CHI-0.47/lib/CHI.pm     2011-04-28 23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHI.pm     2011-06-23 20:54:54.000000000 +0200
@@ -1,6 +1,6 @@
 package CHI;
 BEGIN {
-  $CHI::VERSION = '0.47';
+  $CHI::VERSION = '0.49';
 }
 use 5.006;
 use Carp;
@@ -93,7 +93,7 @@
 
 =head1 VERSION
 
-version 0.47
+version 0.49
 
 =head1 SYNOPSIS
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CHI-0.47/lib/CHIx/DecayedSet.pm 
new/CHI-0.49/lib/CHIx/DecayedSet.pm
--- old/CHI-0.47/lib/CHIx/DecayedSet.pm 2011-04-28 23:37:22.000000000 +0200
+++ new/CHI-0.49/lib/CHIx/DecayedSet.pm 2011-06-23 20:54:54.000000000 +0200
@@ -1,4 +1,7 @@
 package CHIx::DecayedSet;
+BEGIN {
+  $CHIx::DecayedSet::VERSION = '0.49';
+}
 use Moose;
 
 has 'cache'       => ( isa => 'CHI::Types::Cache' );

-- 
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]

Reply via email to