From 0a015b012074562f7c531044b3fa4f8d1330a1ad Mon Sep 17 00:00:00 2001
From: Joe Atzberger <joe.atzberger@liblime.com>
Date: Mon, 10 Dec 2007 17:25:49 -0600
Subject: [PATCH] install.pl - Important fix for Algorithm::CheckDigits
 mismatch

Signed-off-by: Joshua Ferraro <jmf@liblime.com>
---
 installer/install.pl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/installer/install.pl b/installer/install.pl
index 11762c500d..bfa5e223fb 100755
--- a/installer/install.pl
+++ b/installer/install.pl
@@ -40,7 +40,7 @@ $info{'dbms'} =
     ? C4::Context->config("db_scheme")
     : "mysql" );
 $info{'hostname'} = C4::Context->config("hostname");
-$info{'port'} = C4::Context->config("port");
+$info{'port'}     = C4::Context->config("port");
 $info{'user'}     = C4::Context->config("user");
 $info{'password'} = C4::Context->config("pass");
 my $dbh = DBI->connect(
@@ -140,7 +140,7 @@ if ( $step && $step == 1 ) {
             push @missing, { name => "PDF::Report", usagebarcode => 1 };
         }
     }
-    unless ( eval { require Net::LDAP } ) {
+    unless ( eval { require Algorithm::CheckDigits } ) {
         if ( $#missing >= 0 ) {   # only when $#missing >= 0 so this isn't fatal
             push @missing, { name => "Algorithm::CheckDigits", usagebarcode => 1 };
         }
-- 
2.39.5