quell warning about missing config parameter (DB) 'port'

This context parameter is not necessarily present for
MySQL storage method.

Signed-off-by: Joshua Ferraro <jmf@liblime.com>

diff --git a/C4/Context.pm b/C4/Context.pm
index 3c9d9a4..c40eb70 100644 (file)
--- a/C4/Context.pm
+++ b/C4/Context.pm
@@ -583,7 +583,7 @@ sub _new_dbh
 
     my $db_name   = $context->config("database");
     my $db_host   = $context->config("hostname");
-    my $db_port   = $context->config("port");
+    my $db_port   = $context->config("port") or "";
     my $db_user   = $context->config("user");
     my $db_passwd = $context->config("pass");
     my $dbh= DBI->connect("DBI:$db_driver:dbname=$db_name;host=$db_host;port=$db_port",