diff options
Diffstat (limited to 'config-db/OpenSLX/MetaDB/CSV.pm')
| -rw-r--r-- | config-db/OpenSLX/MetaDB/CSV.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/config-db/OpenSLX/MetaDB/CSV.pm b/config-db/OpenSLX/MetaDB/CSV.pm index 44bd2158..39cf13f0 100644 --- a/config-db/OpenSLX/MetaDB/CSV.pm +++ b/config-db/OpenSLX/MetaDB/CSV.pm @@ -65,7 +65,7 @@ sub connect vlog 1, "trying to connect to CSV-database <$dbSpec>"; eval ('require DBD::CSV; 1;') or die _tr(qq[%s doesn't seem to be installed, -so there is no support for %s available, sorry!\n], 'DBD::CSV', 'CSV'); +so there is no support for %s available, sorry!\n%s], 'DBD::CSV', 'CSV', $@); $self->{'dbh'} = DBI->connect("dbi:CSV:$dbSpec", undef, undef, {PrintError => 0}) or confess _tr("Cannot connect to database <%s> (%s)", |
