bugfix: fixed quelling of warning if $db_port not specified

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

C4/Context.pm

@@ -583,7 +583,8 @@ sub _new_dbh
 
     my $db_name   = $context->config("database");
     my $db_host   = $context->config("hostname");
-    my $db_port   = $context->config("port") or "";
+    my $db_port   = $context->config("port");
+    $db_port = "" unless defined $db_port;
     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",