From cafbc96c2703ca70c11aa9fe56513dd53a298a74 Mon Sep 17 00:00:00 2001
From: Elliott Davis <elliott@bywatersolutions.com>
Date: Mon, 3 Sep 2012 22:22:12 -0500
Subject: [PATCH] Bug8798 Updated to remove tabs
http://bugs.koha-community.org/show_bug.cgi?id=8798
Signed-off-by: wajasu <matted-34813@mypacks.net>
---
C4/Context.pm | 7 ++++---
C4/Installer/PerlDependencies.pm | 4 ++--
2 files changed, 6 insertions(+), 5 deletions(-)
diff --git a/C4/Context.pm b/C4/Context.pm
index 9a8484c..5a634a5 100644
--- a/C4/Context.pm
+++ b/C4/Context.pm
@@ -1005,8 +1005,9 @@ sub _new_schema {
my $db_port = $context->config("port") || '';
my $db_user = $context->config("user");
my $db_passwd = $context->config("pass");
- my $schema= Koha::Schema->connect("DBI:$db_driver:dbname=$db_name;host=$db_host;port=$db_port",
- $db_user, $db_passwd);
+ my $schema = Koha::Schema->connect(
+ "DBI:$db_driver:dbname=$db_name;host=$db_host;port=$db_port",
+ $db_user, $db_passwd );
return $schema;
}
@@ -1029,7 +1030,7 @@ sub schema {
my $self = shift;
my $sth;
- if (defined($context->{"schema"}) && $context->{"schema"}->ping()) {
+ if ( defined( $context->{"schema"} ) && $context->{"schema"}->ping() ) {
return $context->{"schema"};
}
diff --git a/C4/Installer/PerlDependencies.pm b/C4/Installer/PerlDependencies.pm
index 73c68a4..356ba86 100644
--- a/C4/Installer/PerlDependencies.pm
+++ b/C4/Installer/PerlDependencies.pm
@@ -55,10 +55,10 @@ our $PERL_DEPS = {
'min_ver' => '1.53'
},
'DBIx::Class::Schema::Loader' => {
- 'usage' => 'Core',
+ 'usage' => 'Core',
'required' => '1',
'min_ver' => '0.07000'
- },
+ },
'Net::Z3950::ZOOM' => {
'usage' => 'Core',
'required' => '1',
--
1.7.2.5