Import isodate() from Utils.pm

diff --git a/lib/ZOOM/IRSpy/Test/Ping.pm b/lib/ZOOM/IRSpy/Test/Ping.pm
index ae27126..3b88e34 100644 (file)
--- a/lib/ZOOM/IRSpy/Test/Ping.pm
+++ b/lib/ZOOM/IRSpy/Test/Ping.pm
@@ -1,4 +1,4 @@
-# $Id: Ping.pm,v 1.15 2006-11-20 15:05:53 mike Exp $
+# $Id: Ping.pm,v 1.16 2006-11-29 18:18:37 mike Exp $

 
 # See the "Main" test package for documentation
 
 
 # See the "Main" test package for documentation
 

@@ -11,6 +11,8 @@ use warnings;
 use ZOOM::IRSpy::Test;
 our @ISA = qw(ZOOM::IRSpy::Test);
 
 use ZOOM::IRSpy::Test;
 our @ISA = qw(ZOOM::IRSpy::Test);
 

+use ZOOM::IRSpy::Utils qw(isodate);
+

 
 sub start {
     my $class = shift();
 
 sub start {
     my $class = shift();

diff --git a/lib/ZOOM/IRSpy/Test/Search/DBDate.pm b/lib/ZOOM/IRSpy/Test/Search/DBDate.pm
index 4ecdc91..a7f3519 100644 (file)
--- a/lib/ZOOM/IRSpy/Test/Search/DBDate.pm
+++ b/lib/ZOOM/IRSpy/Test/Search/DBDate.pm
@@ -1,4 +1,4 @@
-# $Id: DBDate.pm,v 1.2 2006-10-25 10:49:51 mike Exp $
+# $Id: DBDate.pm,v 1.3 2006-11-29 18:18:38 mike Exp $

 
 # This plugin tests searching on BIB-1 access-point 1011 (Date/time
 # added to db), the significance of which is that this search
 
 # This plugin tests searching on BIB-1 access-point 1011 (Date/time
 # added to db), the significance of which is that this search

@@ -17,6 +17,8 @@ use warnings;
 use ZOOM::IRSpy::Test;
 our @ISA = qw(ZOOM::IRSpy::Test);
 
 use ZOOM::IRSpy::Test;
 our @ISA = qw(ZOOM::IRSpy::Test);
 

+use ZOOM::IRSpy::Utils qw(isodate);
+

 
 sub start {
     my $class = shift();
 
 sub start {
     my $class = shift();

diff --git a/lib/ZOOM/IRSpy/Test/Search/Title.pm b/lib/ZOOM/IRSpy/Test/Search/Title.pm
index 8ccb221..2705be6 100644 (file)
--- a/lib/ZOOM/IRSpy/Test/Search/Title.pm
+++ b/lib/ZOOM/IRSpy/Test/Search/Title.pm
@@ -1,4 +1,4 @@
-# $Id: Title.pm,v 1.8 2006-10-25 10:49:51 mike Exp $
+# $Id: Title.pm,v 1.9 2006-11-29 18:18:38 mike Exp $

 
 # See the "Main" test package for documentation
 
 
 # See the "Main" test package for documentation
 

@@ -11,6 +11,8 @@ use warnings;
 use ZOOM::IRSpy::Test;
 our @ISA = qw(ZOOM::IRSpy::Test);
 
 use ZOOM::IRSpy::Test;
 our @ISA = qw(ZOOM::IRSpy::Test);
 

+use ZOOM::IRSpy::Utils qw(isodate);
+

 
 sub start {
     my $class = shift();
 
 sub start {
     my $class = shift();