From cef449e3faab212f9f9b1932e3c7455fb67253aa Mon Sep 17 00:00:00 2001
From: arensb <arensb>
Date: Sat, 12 Oct 2002 06:08:28 +0000
Subject: [PATCH] Removed the dependency on Set::Scalar.

---
 INSTALL           | 1 -
 installer-lite.pl | 1 -
 installer.pl      | 1 -
 koha.upgrade      | 1 -
 t/require.t       | 1 -
 5 files changed, 5 deletions(-)

diff --git a/INSTALL b/INSTALL
index 215e717971..bac6efa887 100644
--- a/INSTALL
+++ b/INSTALL
@@ -16,7 +16,6 @@ Perl Modules:
 
 Date::Manip 
 DBI 
-Set::Scalar 
 DBD::mysql (or whatever database system you use) 
 AuthenDBI (if you want to use Database based authentication) 
 CDK (for the telnet interface not nessecary if you plan to use the web based circulation module) also requires installation of the C CDK libraries http://www.vexus.ca/CDK.html ( CDKModuleHasProblems ) 
diff --git a/installer-lite.pl b/installer-lite.pl
index d15b03a964..a8e0bef0d8 100644
--- a/installer-lite.pl
+++ b/installer-lite.pl
@@ -74,7 +74,6 @@ my @missing = ();
 unless (eval require DBI)               { push @missing,"DBI" };
 unless (eval require Date::Manip)       { push @missing,"Date::Manip" };
 unless (eval require DBD::mysql)        { push @missing,"DBD::mysql" };
-unless (eval require Set::Scalar)       { push @missing,"Set::Scalar" };
 
 #
 # Print out a list of any missing modules
diff --git a/installer.pl b/installer.pl
index c938ec0abe..6fafab63b7 100644
--- a/installer.pl
+++ b/installer.pl
@@ -145,7 +145,6 @@ my @missing = ();
 unless (eval {require DBI})               { push @missing,"DBI" };
 unless (eval {require Date::Manip})       { push @missing,"Date::Manip" };
 unless (eval {require DBD::mysql})        { push @missing,"DBD::mysql" };
-unless (eval {require Set::Scalar})       { push @missing,"Set::Scalar" };
 unless (eval {require Net::Z3950})        { 
     print qq|
 
diff --git a/koha.upgrade b/koha.upgrade
index a9dee421e9..8f207a4db3 100644
--- a/koha.upgrade
+++ b/koha.upgrade
@@ -121,7 +121,6 @@ my @missing = ();
 unless (eval {require DBI})               { push @missing,"DBI" };
 unless (eval {require Date::Manip})       { push @missing,"Date::Manip" };
 unless (eval {require DBD::mysql})        { push @missing,"DBD::mysql" };
-unless (eval {require Set::Scalar})       { push @missing,"Set::Scalar" };
 unless (eval {require Net::Z3950})        { 
     print qq|
 
diff --git a/t/require.t b/t/require.t
index 98f429d7d8..8a45fac150 100644
--- a/t/require.t
+++ b/t/require.t
@@ -3,5 +3,4 @@ BEGIN { $| = 1; print "1..4\n"; }
 my $i = 1;
 eval { require Date::Manip; } || print "not "; print "ok ",$i++,"\n";
 eval { require DBI; }         || print "not "; print "ok ",$i++,"\n";
-eval { require Set::Scalar; } || print "not "; print "ok ",$i++,"\n";
 eval { require DBD::mysql; }  || print "not "; print "ok ",$i++,"\n";
-- 
2.39.2