[Rt-commit] r2110 - in Cache-Simple-TimedExpiry: . inc/Module inc/Module/Install lib/Cache/Simple t

jesse at bestpractical.com jesse at bestpractical.com
Tue Jan 18 08:36:30 EST 2005 

Author: jesse
Date: Tue Jan 18 08:36:26 2005
New Revision: 2110

Added:
   Cache-Simple-TimedExpiry/SIGNATURE
Modified:
   Cache-Simple-TimedExpiry/   (props changed)
   Cache-Simple-TimedExpiry/Changes
   Cache-Simple-TimedExpiry/MANIFEST
   Cache-Simple-TimedExpiry/META.yml
   Cache-Simple-TimedExpiry/Makefile
   Cache-Simple-TimedExpiry/inc/Module/Install.pm
   Cache-Simple-TimedExpiry/inc/Module/Install/Base.pm
   Cache-Simple-TimedExpiry/inc/Module/Install/Can.pm
   Cache-Simple-TimedExpiry/inc/Module/Install/Fetch.pm
   Cache-Simple-TimedExpiry/inc/Module/Install/Makefile.pm
   Cache-Simple-TimedExpiry/inc/Module/Install/Metadata.pm
   Cache-Simple-TimedExpiry/inc/Module/Install/Win32.pm
   Cache-Simple-TimedExpiry/inc/Module/Install/WriteAll.pm
   Cache-Simple-TimedExpiry/lib/Cache/Simple/TimedExpiry.pm
   Cache-Simple-TimedExpiry/t/01basic.t
Log:
 r3881 at hualien:  jesse | 2005-01-18T13:31:59.362687Z
 Bumped to 0.23 corrected fetch/set semantic


Modified: Cache-Simple-TimedExpiry/Changes
==============================================================================
--- Cache-Simple-TimedExpiry/Changes	(original)
+++ Cache-Simple-TimedExpiry/Changes	Tue Jan 18 08:36:26 2005
@@ -1,3 +1,7 @@
+0.23 Tue Jan 18 08:31:03 EST 2005
+    - Switch to fetch/store instead of fetch/set (recommended by Ruslan)
+      (Also support get/set as aliases)
+
 0.22
     - Minor doc fixes
     - Try harder not to invoke "expire" multiple times in the same second.

Modified: Cache-Simple-TimedExpiry/MANIFEST
==============================================================================
--- Cache-Simple-TimedExpiry/MANIFEST	(original)
+++ Cache-Simple-TimedExpiry/MANIFEST	Tue Jan 18 08:36:26 2005
@@ -1,3 +1,4 @@
+Changes
 inc/Module/Install.pm
 inc/Module/Install/Base.pm
 inc/Module/Install/Can.pm

Modified: Cache-Simple-TimedExpiry/META.yml
==============================================================================
--- Cache-Simple-TimedExpiry/META.yml	(original)
+++ Cache-Simple-TimedExpiry/META.yml	Tue Jan 18 08:36:26 2005
@@ -1,5 +1,5 @@
 name: Cache-Simple-TimedExpiry
-version: 0.21
+version: 0.23
 abstract: A lightweight cache with timed expiration
 author: Robert Spier <rspier at pobox.com>, Jesse Vincent <jesse at bestpractical.com>
 license: perl

Modified: Cache-Simple-TimedExpiry/Makefile
==============================================================================
--- Cache-Simple-TimedExpiry/Makefile	(original)
+++ Cache-Simple-TimedExpiry/Makefile	Tue Jan 18 08:36:26 2005
@@ -18,7 +18,7 @@
 #     NO_META => q[1]
 #     PL_FILES => {  }
 #     PREREQ_PM => {  }
-#     VERSION => q[0.21]
+#     VERSION => q[0.23]
 #     dist => { PREOP=>q[$(PERL) -I. -MModule::Install::Admin -e "dist_preop(q($(DISTVNAME)))"] }
 
 # --- MakeMaker post_initialize section:
@@ -26,31 +26,31 @@
 
 # --- MakeMaker const_config section:
 
-# These definitions are from config.sh (via /opt/perl-5.8.5/lib/5.8.5/darwin-2level/Config.pm)
+# These definitions are from config.sh (via /usr/lib/perl/5.8/Config.pm)
 
 # They may have been overridden via Makefile.PL or on the command line
 AR = ar
 CC = cc
-CCCDLFLAGS =  
-CCDLFLAGS =  
-DLEXT = bundle
-DLSRC = dl_dyld.xs
-LD = env MACOSX_DEPLOYMENT_TARGET=10.3 cc
-LDDLFLAGS =  -bundle -undefined dynamic_lookup
-LDFLAGS = 
-LIBC = /usr/lib/libc.dylib
+CCCDLFLAGS = -fPIC
+CCDLFLAGS = -Wl,-E
+DLEXT = so
+DLSRC = dl_dlopen.xs
+LD = cc
+LDDLFLAGS = -shared -L/usr/local/lib
+LDFLAGS =  -L/usr/local/lib
+LIBC = /lib/libc-2.3.2.so
 LIB_EXT = .a
 OBJ_EXT = .o
-OSNAME = darwin
-OSVERS = 7.5.0
-RANLIB = /usr/bin/ar ts
-SITELIBEXP = /opt/perl-5.8.5/lib/site_perl/5.8.5
-SITEARCHEXP = /opt/perl-5.8.5/lib/site_perl/5.8.5/darwin-2level
-SO = dylib
+OSNAME = linux
+OSVERS = 2.6.8.1
+RANLIB = :
+SITELIBEXP = /usr/local/share/perl/5.8.4
+SITEARCHEXP = /usr/local/lib/perl/5.8.4
+SO = so
 EXE_EXT = 
 FULL_AR = /usr/bin/ar
-VENDORARCHEXP = 
-VENDORLIBEXP = 
+VENDORARCHEXP = /usr/lib/perl5
+VENDORLIBEXP = /usr/share/perl5
 
 
 # --- MakeMaker constants section:
@@ -58,11 +58,11 @@
 DIRFILESEP = /
 NAME = Cache::Simple::TimedExpiry
 NAME_SYM = Cache_Simple_TimedExpiry
-VERSION = 0.21
+VERSION = 0.23
 VERSION_MACRO = VERSION
-VERSION_SYM = 0_21
+VERSION_SYM = 0_23
 DEFINE_VERSION = -D$(VERSION_MACRO)=\"$(VERSION)\"
-XS_VERSION = 0.21
+XS_VERSION = 0.23
 XS_VERSION_MACRO = XS_VERSION
 XS_DEFINE_VERSION = -D$(XS_VERSION_MACRO)=\"$(XS_VERSION)\"
 INST_ARCHLIB = blib/arch
@@ -71,56 +71,56 @@
 INST_LIB = blib/lib
 INST_MAN1DIR = blib/man1
 INST_MAN3DIR = blib/man3
-MAN1EXT = 1
-MAN3EXT = 3
+MAN1EXT = 1p
+MAN3EXT = 3pm
 INSTALLDIRS = site
 DESTDIR = 
-PREFIX = 
-PERLPREFIX = /opt/perl-5.8.5
-SITEPREFIX = /opt/perl-5.8.5
-VENDORPREFIX = 
-INSTALLPRIVLIB = $(PERLPREFIX)/lib/5.8.5
+PREFIX = /usr
+PERLPREFIX = $(PREFIX)
+SITEPREFIX = $(PREFIX)/local
+VENDORPREFIX = $(PREFIX)
+INSTALLPRIVLIB = $(PERLPREFIX)/share/perl/5.8
 DESTINSTALLPRIVLIB = $(DESTDIR)$(INSTALLPRIVLIB)
-INSTALLSITELIB = $(SITEPREFIX)/lib/site_perl/5.8.5
+INSTALLSITELIB = $(SITEPREFIX)/share/perl/5.8.4
 DESTINSTALLSITELIB = $(DESTDIR)$(INSTALLSITELIB)
-INSTALLVENDORLIB = 
+INSTALLVENDORLIB = $(VENDORPREFIX)/share/perl5
 DESTINSTALLVENDORLIB = $(DESTDIR)$(INSTALLVENDORLIB)
-INSTALLARCHLIB = $(PERLPREFIX)/lib/5.8.5/darwin-2level
+INSTALLARCHLIB = $(PERLPREFIX)/lib/perl/5.8
 DESTINSTALLARCHLIB = $(DESTDIR)$(INSTALLARCHLIB)
-INSTALLSITEARCH = $(SITEPREFIX)/lib/site_perl/5.8.5/darwin-2level
+INSTALLSITEARCH = $(SITEPREFIX)/lib/perl/5.8.4
 DESTINSTALLSITEARCH = $(DESTDIR)$(INSTALLSITEARCH)
-INSTALLVENDORARCH = 
+INSTALLVENDORARCH = $(VENDORPREFIX)/lib/perl5
 DESTINSTALLVENDORARCH = $(DESTDIR)$(INSTALLVENDORARCH)
 INSTALLBIN = $(PERLPREFIX)/bin
 DESTINSTALLBIN = $(DESTDIR)$(INSTALLBIN)
 INSTALLSITEBIN = $(SITEPREFIX)/bin
 DESTINSTALLSITEBIN = $(DESTDIR)$(INSTALLSITEBIN)
-INSTALLVENDORBIN = 
+INSTALLVENDORBIN = $(VENDORPREFIX)/bin
 DESTINSTALLVENDORBIN = $(DESTDIR)$(INSTALLVENDORBIN)
 INSTALLSCRIPT = $(PERLPREFIX)/bin
 DESTINSTALLSCRIPT = $(DESTDIR)$(INSTALLSCRIPT)
-INSTALLMAN1DIR = $(PERLPREFIX)/man/man1
+INSTALLMAN1DIR = $(PERLPREFIX)/share/man/man1
 DESTINSTALLMAN1DIR = $(DESTDIR)$(INSTALLMAN1DIR)
 INSTALLSITEMAN1DIR = $(SITEPREFIX)/man/man1
 DESTINSTALLSITEMAN1DIR = $(DESTDIR)$(INSTALLSITEMAN1DIR)
-INSTALLVENDORMAN1DIR = 
+INSTALLVENDORMAN1DIR = $(VENDORPREFIX)/share/man/man1
 DESTINSTALLVENDORMAN1DIR = $(DESTDIR)$(INSTALLVENDORMAN1DIR)
-INSTALLMAN3DIR = $(PERLPREFIX)/man/man3
+INSTALLMAN3DIR = $(PERLPREFIX)/share/man/man3
 DESTINSTALLMAN3DIR = $(DESTDIR)$(INSTALLMAN3DIR)
 INSTALLSITEMAN3DIR = $(SITEPREFIX)/man/man3
 DESTINSTALLSITEMAN3DIR = $(DESTDIR)$(INSTALLSITEMAN3DIR)
-INSTALLVENDORMAN3DIR = 
+INSTALLVENDORMAN3DIR = $(VENDORPREFIX)/share/man/man3
 DESTINSTALLVENDORMAN3DIR = $(DESTDIR)$(INSTALLVENDORMAN3DIR)
-PERL_LIB = /opt/perl-5.8.5/lib/5.8.5
-PERL_ARCHLIB = /opt/perl-5.8.5/lib/5.8.5/darwin-2level
+PERL_LIB = /usr/share/perl/5.8
+PERL_ARCHLIB = /usr/lib/perl/5.8
 LIBPERL_A = libperl.a
 FIRST_MAKEFILE = Makefile
 MAKEFILE_OLD = $(FIRST_MAKEFILE).old
 MAKE_APERL_FILE = $(FIRST_MAKEFILE).aperl
 PERLMAINCC = $(CC)
-PERL_INC = /opt/perl-5.8.5/lib/5.8.5/darwin-2level/CORE
-PERL = /opt/perl-5.8.5/bin/perl -Iinc
-FULLPERL = /opt/perl-5.8.5/bin/perl -Iinc
+PERL_INC = /usr/lib/perl/5.8/CORE
+PERL = /usr/bin/perl -Iinc
+FULLPERL = /usr/bin/perl -Iinc
 ABSPERL = $(PERL)
 PERLRUN = $(PERL)
 FULLPERLRUN = $(FULLPERL)
@@ -132,7 +132,7 @@
 PERM_RW = 644
 PERM_RWX = 755
 
-MAKEMAKER   = /opt/perl-5.8.5/lib/5.8.5/ExtUtils/MakeMaker.pm
+MAKEMAKER   = /usr/share/perl/5.8/ExtUtils/MakeMaker.pm
 MM_VERSION  = 6.17
 MM_REVISION = 1.133
 
@@ -243,7 +243,7 @@
 DIST_CP = best
 DIST_DEFAULT = tardist
 DISTNAME = Cache-Simple-TimedExpiry
-DISTVNAME = Cache-Simple-TimedExpiry-0.21
+DISTVNAME = Cache-Simple-TimedExpiry-0.23
 
 
 # --- MakeMaker macro section:
@@ -311,21 +311,21 @@
 config :: $(INST_AUTODIR)$(DIRFILESEP).exists
 	$(NOECHO) $(NOOP)
 
-$(INST_AUTODIR)/.exists :: /opt/perl-5.8.5/lib/5.8.5/darwin-2level/CORE/perl.h
+$(INST_AUTODIR)/.exists :: /usr/lib/perl/5.8/CORE/perl.h
 	$(NOECHO) $(MKPATH) $(INST_AUTODIR)
-	$(NOECHO) $(EQUALIZE_TIMESTAMP) /opt/perl-5.8.5/lib/5.8.5/darwin-2level/CORE/perl.h $(INST_AUTODIR)/.exists
+	$(NOECHO) $(EQUALIZE_TIMESTAMP) /usr/lib/perl/5.8/CORE/perl.h $(INST_AUTODIR)/.exists
 
 	-$(NOECHO) $(CHMOD) $(PERM_RWX) $(INST_AUTODIR)
 
-$(INST_LIBDIR)/.exists :: /opt/perl-5.8.5/lib/5.8.5/darwin-2level/CORE/perl.h
+$(INST_LIBDIR)/.exists :: /usr/lib/perl/5.8/CORE/perl.h
 	$(NOECHO) $(MKPATH) $(INST_LIBDIR)
-	$(NOECHO) $(EQUALIZE_TIMESTAMP) /opt/perl-5.8.5/lib/5.8.5/darwin-2level/CORE/perl.h $(INST_LIBDIR)/.exists
+	$(NOECHO) $(EQUALIZE_TIMESTAMP) /usr/lib/perl/5.8/CORE/perl.h $(INST_LIBDIR)/.exists
 
 	-$(NOECHO) $(CHMOD) $(PERM_RWX) $(INST_LIBDIR)
 
-$(INST_ARCHAUTODIR)/.exists :: /opt/perl-5.8.5/lib/5.8.5/darwin-2level/CORE/perl.h
+$(INST_ARCHAUTODIR)/.exists :: /usr/lib/perl/5.8/CORE/perl.h
 	$(NOECHO) $(MKPATH) $(INST_ARCHAUTODIR)
-	$(NOECHO) $(EQUALIZE_TIMESTAMP) /opt/perl-5.8.5/lib/5.8.5/darwin-2level/CORE/perl.h $(INST_ARCHAUTODIR)/.exists
+	$(NOECHO) $(EQUALIZE_TIMESTAMP) /usr/lib/perl/5.8/CORE/perl.h $(INST_ARCHAUTODIR)/.exists
 
 	-$(NOECHO) $(CHMOD) $(PERM_RWX) $(INST_ARCHAUTODIR)
 
@@ -333,9 +333,9 @@
 	$(NOECHO) $(NOOP)
 
 
-$(INST_MAN3DIR)/.exists :: /opt/perl-5.8.5/lib/5.8.5/darwin-2level/CORE/perl.h
+$(INST_MAN3DIR)/.exists :: /usr/lib/perl/5.8/CORE/perl.h
 	$(NOECHO) $(MKPATH) $(INST_MAN3DIR)
-	$(NOECHO) $(EQUALIZE_TIMESTAMP) /opt/perl-5.8.5/lib/5.8.5/darwin-2level/CORE/perl.h $(INST_MAN3DIR)/.exists
+	$(NOECHO) $(EQUALIZE_TIMESTAMP) /usr/lib/perl/5.8/CORE/perl.h $(INST_MAN3DIR)/.exists
 
 	-$(NOECHO) $(CHMOD) $(PERM_RWX) $(INST_MAN3DIR)
 
@@ -386,7 +386,7 @@
 manifypods : pure_all  \
 	lib/Cache/Simple/TimedExpiry.pm \
 	lib/Cache/Simple/TimedExpiry.pm
-	$(NOECHO) $(POD2MAN) --section=3 --perm_rw=$(PERM_RW)\
+	$(NOECHO) $(POD2MAN) --section=3pm --perm_rw=$(PERM_RW)\
 	  lib/Cache/Simple/TimedExpiry.pm $(INST_MAN3DIR)/Cache::Simple::TimedExpiry.$(MAN3EXT) 
 
 
@@ -541,9 +541,7 @@
 	$(NOECHO) $(ECHO) INSTALLDIRS not defined, defaulting to INSTALLDIRS=site
 
 pure_perl_install ::
-	$(NOECHO) $(MOD_INSTALL) \
-		read $(PERL_ARCHLIB)/auto/$(FULLEXT)/.packlist \
-		write $(DESTINSTALLARCHLIB)/auto/$(FULLEXT)/.packlist \
+	$(NOECHO) umask 022; $(MOD_INSTALL) \
 		$(INST_LIB) $(DESTINSTALLPRIVLIB) \
 		$(INST_ARCHLIB) $(DESTINSTALLARCHLIB) \
 		$(INST_BIN) $(DESTINSTALLBIN) \
@@ -555,7 +553,7 @@
 
 
 pure_site_install ::
-	$(NOECHO) $(MOD_INSTALL) \
+	$(NOECHO) umask 02; $(MOD_INSTALL) \
 		read $(SITEARCHEXP)/auto/$(FULLEXT)/.packlist \
 		write $(DESTINSTALLSITEARCH)/auto/$(FULLEXT)/.packlist \
 		$(INST_LIB) $(DESTINSTALLSITELIB) \
@@ -568,9 +566,7 @@
 		$(PERL_ARCHLIB)/auto/$(FULLEXT)
 
 pure_vendor_install ::
-	$(NOECHO) $(MOD_INSTALL) \
-		read $(VENDORARCHEXP)/auto/$(FULLEXT)/.packlist \
-		write $(DESTINSTALLVENDORARCH)/auto/$(FULLEXT)/.packlist \
+	$(NOECHO) umask 022; $(MOD_INSTALL) \
 		$(INST_LIB) $(DESTINSTALLVENDORLIB) \
 		$(INST_ARCHLIB) $(DESTINSTALLVENDORARCH) \
 		$(INST_BIN) $(DESTINSTALLVENDORBIN) \
@@ -579,37 +575,19 @@
 		$(INST_MAN3DIR) $(DESTINSTALLVENDORMAN3DIR)
 
 doc_perl_install ::
-	$(NOECHO) $(ECHO) Appending installation info to $(DESTINSTALLARCHLIB)/perllocal.pod
-	-$(NOECHO) $(MKPATH) $(DESTINSTALLARCHLIB)
-	-$(NOECHO) $(DOC_INSTALL) \
-		"Module" "$(NAME)" \
-		"installed into" "$(INSTALLPRIVLIB)" \
-		LINKTYPE "$(LINKTYPE)" \
-		VERSION "$(VERSION)" \
-		EXE_FILES "$(EXE_FILES)" \
-		>> $(DESTINSTALLARCHLIB)/perllocal.pod
 
 doc_site_install ::
-	$(NOECHO) $(ECHO) Appending installation info to $(DESTINSTALLARCHLIB)/perllocal.pod
-	-$(NOECHO) $(MKPATH) $(DESTINSTALLARCHLIB)
-	-$(NOECHO) $(DOC_INSTALL) \
+	$(NOECHO) $(ECHO) Appending installation info to $(DESTINSTALLSITEARCH)/perllocal.pod
+	-$(NOECHO) umask 02; $(MKPATH) $(DESTINSTALLSITEARCH)
+	-$(NOECHO) umask 02; $(DOC_INSTALL) \
 		"Module" "$(NAME)" \
 		"installed into" "$(INSTALLSITELIB)" \
 		LINKTYPE "$(LINKTYPE)" \
 		VERSION "$(VERSION)" \
 		EXE_FILES "$(EXE_FILES)" \
-		>> $(DESTINSTALLARCHLIB)/perllocal.pod
+		>> $(DESTINSTALLSITEARCH)/perllocal.pod
 
 doc_vendor_install ::
-	$(NOECHO) $(ECHO) Appending installation info to $(DESTINSTALLARCHLIB)/perllocal.pod
-	-$(NOECHO) $(MKPATH) $(DESTINSTALLARCHLIB)
-	-$(NOECHO) $(DOC_INSTALL) \
-		"Module" "$(NAME)" \
-		"installed into" "$(INSTALLVENDORLIB)" \
-		LINKTYPE "$(LINKTYPE)" \
-		VERSION "$(VERSION)" \
-		EXE_FILES "$(EXE_FILES)" \
-		>> $(DESTINSTALLARCHLIB)/perllocal.pod
 
 
 uninstall :: uninstall_from_$(INSTALLDIRS)dirs
@@ -654,7 +632,7 @@
 
 # --- MakeMaker makeaperl section ---
 MAP_TARGET    = perl
-FULLPERL      = /opt/perl-5.8.5/bin/perl
+FULLPERL      = /usr/bin/perl
 
 $(MAP_TARGET) :: static $(MAKE_APERL_FILE)
 	$(MAKE) -f $(MAKE_APERL_FILE) $@
@@ -694,13 +672,13 @@
 # --- MakeMaker ppd section:
 # Creates a PPD (Perl Package Description) for a binary distribution.
 ppd:
-	$(NOECHO) $(ECHO) '<SOFTPKG NAME="$(DISTNAME)" VERSION="0,21,0,0">' > $(DISTNAME).ppd
+	$(NOECHO) $(ECHO) '<SOFTPKG NAME="$(DISTNAME)" VERSION="0,23,0,0">' > $(DISTNAME).ppd
 	$(NOECHO) $(ECHO) '    <TITLE>$(DISTNAME)</TITLE>' >> $(DISTNAME).ppd
 	$(NOECHO) $(ECHO) '    <ABSTRACT>A lightweight cache with timed expiration</ABSTRACT>' >> $(DISTNAME).ppd
 	$(NOECHO) $(ECHO) '    <AUTHOR>Robert Spier &lt;rspier at pobox.com&gt;, Jesse Vincent &lt;jesse at bestpractical.com&gt;</AUTHOR>' >> $(DISTNAME).ppd
 	$(NOECHO) $(ECHO) '    <IMPLEMENTATION>' >> $(DISTNAME).ppd
 	$(NOECHO) $(ECHO) '        <OS NAME="$(OSNAME)" />' >> $(DISTNAME).ppd
-	$(NOECHO) $(ECHO) '        <ARCHITECTURE NAME="darwin-2level" />' >> $(DISTNAME).ppd
+	$(NOECHO) $(ECHO) '        <ARCHITECTURE NAME="i386-linux-thread-multi" />' >> $(DISTNAME).ppd
 	$(NOECHO) $(ECHO) '        <CODEBASE HREF="" />' >> $(DISTNAME).ppd
 	$(NOECHO) $(ECHO) '    </IMPLEMENTATION>' >> $(DISTNAME).ppd
 	$(NOECHO) $(ECHO) '</SOFTPKG>' >> $(DISTNAME).ppd

Added: Cache-Simple-TimedExpiry/SIGNATURE
==============================================================================
--- (empty file)
+++ Cache-Simple-TimedExpiry/SIGNATURE	Tue Jan 18 08:36:26 2005
@@ -0,0 +1,37 @@
+This file contains message digests of all files listed in MANIFEST,
+signed via the Module::Signature module, version 0.41.
+
+To verify the content in this distribution, first make sure you have
+Module::Signature installed, then type:
+
+    % cpansign -v
+
+It would check each file's integrity, as well as the signature's
+validity.  If "==> Signature verified OK! <==" is not displayed,
+the distribution may already have been compromised, and you should
+not run its Makefile.PL or Build.PL.
+
+-----BEGIN PGP SIGNED MESSAGE-----
+Hash: SHA1
+
+SHA1 dd3cb9925395f67740e160fecaab6c6c3cf7943e Changes
+SHA1 da374967372206aaf495c616eeea10f49dd8f5be MANIFEST
+SHA1 3cc062b139fb52d98b69360b2ae641d887de2d4b META.yml
+SHA1 1c7f2a080b159adcfacd9bea57b80751ff796eef Makefile.PL
+SHA1 05d89e1fe6d49cd518b5a3e6694cc313e655fb02 inc/Module/Install.pm
+SHA1 2e300b145ee61eea9dfd71624b17b0bc9218aa4f inc/Module/Install/Base.pm
+SHA1 29ce36027266c1839b496bf660396e0a91ab53cf inc/Module/Install/Can.pm
+SHA1 c0f347c388074beb42aad080661c7e3552110c71 inc/Module/Install/Fetch.pm
+SHA1 e094fe96aef06c68d7a424818c12e52b11f1ccdd inc/Module/Install/Makefile.pm
+SHA1 e448c6dc5351ef425e3f8bdbeb642409120bc3ca inc/Module/Install/Metadata.pm
+SHA1 134de6ff2f762873b6a1af950dd53f8e0a801d73 inc/Module/Install/Win32.pm
+SHA1 1ec06df292af7f652d33db6129e9e4c7cc8b5095 inc/Module/Install/WriteAll.pm
+SHA1 6a8045d739a1bc5d97cd7c93f2040cb9f64a9e14 lib/Cache/Simple/TimedExpiry.pm
+SHA1 b43f5a5c5193c15d8aa1f428ff5a34108257e0b9 t/01basic.t
+-----BEGIN PGP SIGNATURE-----
+Version: GnuPG v1.2.5 (GNU/Linux)
+
+iD8DBQFB7Q+2Ei9d9xCOQEYRAqtbAKDBQwnw0D9FF4PvkApcnxc5Dfc07QCbBUj+
+eHRWDAbZUlH+mulKlAc4K0E=
+=44Ps
+-----END PGP SIGNATURE-----

Modified: Cache-Simple-TimedExpiry/inc/Module/Install.pm
==============================================================================
--- Cache-Simple-TimedExpiry/inc/Module/Install.pm	(original)
+++ Cache-Simple-TimedExpiry/inc/Module/Install.pm	Tue Jan 18 08:36:26 2005
@@ -1,4 +1,4 @@
-#line 1 "inc/Module/Install.pm - /opt/perl-5.8.5/lib/site_perl/5.8.5/Module/Install.pm"
+#line 1 "inc/Module/Install.pm - /usr/local/share/perl/5.8.4/Module/Install.pm"
 package Module::Install;
 $VERSION = '0.36';
 

Modified: Cache-Simple-TimedExpiry/inc/Module/Install/Base.pm
==============================================================================
--- Cache-Simple-TimedExpiry/inc/Module/Install/Base.pm	(original)
+++ Cache-Simple-TimedExpiry/inc/Module/Install/Base.pm	Tue Jan 18 08:36:26 2005
@@ -1,4 +1,4 @@
-#line 1 "inc/Module/Install/Base.pm - /opt/perl-5.8.5/lib/site_perl/5.8.5/Module/Install/Base.pm"
+#line 1 "inc/Module/Install/Base.pm - /usr/local/share/perl/5.8.4/Module/Install/Base.pm"
 package Module::Install::Base;
 
 #line 28

Modified: Cache-Simple-TimedExpiry/inc/Module/Install/Can.pm
==============================================================================
--- Cache-Simple-TimedExpiry/inc/Module/Install/Can.pm	(original)
+++ Cache-Simple-TimedExpiry/inc/Module/Install/Can.pm	Tue Jan 18 08:36:26 2005
@@ -1,4 +1,4 @@
-#line 1 "inc/Module/Install/Can.pm - /opt/perl-5.8.5/lib/site_perl/5.8.5/Module/Install/Can.pm"
+#line 1 "inc/Module/Install/Can.pm - /usr/local/share/perl/5.8.4/Module/Install/Can.pm"
 package Module::Install::Can;
 use Module::Install::Base; @ISA = qw(Module::Install::Base);
 $VERSION = '0.01';

Modified: Cache-Simple-TimedExpiry/inc/Module/Install/Fetch.pm
==============================================================================
--- Cache-Simple-TimedExpiry/inc/Module/Install/Fetch.pm	(original)
+++ Cache-Simple-TimedExpiry/inc/Module/Install/Fetch.pm	Tue Jan 18 08:36:26 2005
@@ -1,4 +1,4 @@
-#line 1 "inc/Module/Install/Fetch.pm - /opt/perl-5.8.5/lib/site_perl/5.8.5/Module/Install/Fetch.pm"
+#line 1 "inc/Module/Install/Fetch.pm - /usr/local/share/perl/5.8.4/Module/Install/Fetch.pm"
 package Module::Install::Fetch;
 use Module::Install::Base; @ISA = qw(Module::Install::Base);
 

Modified: Cache-Simple-TimedExpiry/inc/Module/Install/Makefile.pm
==============================================================================
--- Cache-Simple-TimedExpiry/inc/Module/Install/Makefile.pm	(original)
+++ Cache-Simple-TimedExpiry/inc/Module/Install/Makefile.pm	Tue Jan 18 08:36:26 2005
@@ -1,4 +1,4 @@
-#line 1 "inc/Module/Install/Makefile.pm - /opt/perl-5.8.5/lib/site_perl/5.8.5/Module/Install/Makefile.pm"
+#line 1 "inc/Module/Install/Makefile.pm - /usr/local/share/perl/5.8.4/Module/Install/Makefile.pm"
 package Module::Install::Makefile;
 use Module::Install::Base; @ISA = qw(Module::Install::Base);
 

Modified: Cache-Simple-TimedExpiry/inc/Module/Install/Metadata.pm
==============================================================================
--- Cache-Simple-TimedExpiry/inc/Module/Install/Metadata.pm	(original)
+++ Cache-Simple-TimedExpiry/inc/Module/Install/Metadata.pm	Tue Jan 18 08:36:26 2005
@@ -1,4 +1,4 @@
-#line 1 "inc/Module/Install/Metadata.pm - /opt/perl-5.8.5/lib/site_perl/5.8.5/Module/Install/Metadata.pm"
+#line 1 "inc/Module/Install/Metadata.pm - /usr/local/share/perl/5.8.4/Module/Install/Metadata.pm"
 package Module::Install::Metadata;
 use Module::Install::Base; @ISA = qw(Module::Install::Base);
 

Modified: Cache-Simple-TimedExpiry/inc/Module/Install/Win32.pm
==============================================================================
--- Cache-Simple-TimedExpiry/inc/Module/Install/Win32.pm	(original)
+++ Cache-Simple-TimedExpiry/inc/Module/Install/Win32.pm	Tue Jan 18 08:36:26 2005
@@ -1,4 +1,4 @@
-#line 1 "inc/Module/Install/Win32.pm - /opt/perl-5.8.5/lib/site_perl/5.8.5/Module/Install/Win32.pm"
+#line 1 "inc/Module/Install/Win32.pm - /usr/local/share/perl/5.8.4/Module/Install/Win32.pm"
 package Module::Install::Win32;
 use Module::Install::Base; @ISA = qw(Module::Install::Base);
 

Modified: Cache-Simple-TimedExpiry/inc/Module/Install/WriteAll.pm
==============================================================================
--- Cache-Simple-TimedExpiry/inc/Module/Install/WriteAll.pm	(original)
+++ Cache-Simple-TimedExpiry/inc/Module/Install/WriteAll.pm	Tue Jan 18 08:36:26 2005
@@ -1,4 +1,4 @@
-#line 1 "inc/Module/Install/WriteAll.pm - /opt/perl-5.8.5/lib/site_perl/5.8.5/Module/Install/WriteAll.pm"
+#line 1 "inc/Module/Install/WriteAll.pm - /usr/local/share/perl/5.8.4/Module/Install/WriteAll.pm"
 package Module::Install::WriteAll;
 use Module::Install::Base; @ISA = qw(Module::Install::Base);
 

Modified: Cache-Simple-TimedExpiry/lib/Cache/Simple/TimedExpiry.pm
==============================================================================
--- Cache-Simple-TimedExpiry/lib/Cache/Simple/TimedExpiry.pm	(original)
+++ Cache-Simple-TimedExpiry/lib/Cache/Simple/TimedExpiry.pm	Tue Jan 18 08:36:26 2005
@@ -3,7 +3,7 @@
 
 use vars qw/$VERSION/;
 
-$VERSION = '0.22';
+$VERSION = '0.23';
 
 # 0 - expiration delay
 # 1 - hash
@@ -55,8 +55,12 @@
 Return the cache entry with key KEY.
 Returns undef if there is no such entry
 
+(Can also be called as L<get>)
+
 =cut
 
+*get = \&fetch;
+
 sub fetch ($$) {
   my ($self,$key) = @_;
 
@@ -71,14 +75,18 @@
 
 }
 
-=head2 set KEY VALUE
+=head2 store KEY VALUE
 
 Store VALUE in the cache with accessor KEY.  Expire it from the cache 
 at or after EXPIRYTIME.
 
+(Can also be called as L<set>)
+
 =cut
 
-sub set ($$$) {
+*set = \&store;
+
+sub store ($$$) {
   my ($self,$key,$value) = @_;
 
   my $time = time;

Modified: Cache-Simple-TimedExpiry/t/01basic.t
==============================================================================
--- Cache-Simple-TimedExpiry/t/01basic.t	(original)
+++ Cache-Simple-TimedExpiry/t/01basic.t	Tue Jan 18 08:36:26 2005
@@ -13,9 +13,9 @@
 $h->expire_after(10);
 is ($h->expire_after(),10);
 
-$h->set( 'Temp' => 'Temporary');
+$h->store( 'Temp' => 'Temporary');
 sleep(8);
-$h->set( 'Temp2' => 'Temporary2');
+$h->store( 'Temp2' => 'Temporary2');
 is ($h->fetch('Temp'), 'Temporary');
 is ($h->fetch('Temp2'), 'Temporary2');
 my @elements = sort $h->elements;
@@ -42,8 +42,8 @@
 
 $h->expire_after(2);
 is ($h->has_key(), 0);
-$h->set( '' => 'WithEmptyKey');
-$h->set( 0 => 'WithZeroKey');
+$h->store( '' => 'WithEmptyKey');
+$h->store( 0 => 'WithZeroKey');
 is ($h->fetch(''), 'WithEmptyKey' );
 is ($h->fetch(0), 'WithZeroKey' );
 is ($h->has_key(''), 1);

More information about the Rt-commit mailing list