Commit 2168ea57 authored by Monika Komorowska's avatar Monika Komorowska
Browse files

bug fix

parent 2b31bf77
......@@ -112,7 +112,7 @@ sub run_script {
my $core_dbc;
print "Using $host $vdbname for Vega and $cdbname for Core\n";
print "Using $vhost $vdbname for Vega and $cdbname for Core\n";
my $vega_db = XrefParser::Database->new({ host => $vhost,
port => $vport,
user => $vuser,
......@@ -130,7 +130,7 @@ sub run_script {
dbname => $cdbname,
pass => $cpass});
my $core_dbc = $core_db->dbi();
$core_dbc = $core_db->dbi();
print "Problem could not open connectipn to $chost, $cport, $cuser, $cdbname, $cpass\n";
return 1;
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment