diff options
| author | Oliver Tappe | 2007-04-13 16:24:31 +0200 |
|---|---|---|
| committer | Oliver Tappe | 2007-04-13 16:24:31 +0200 |
| commit | 7b3b226ed2a7b3bcc173e047359ac847624ce527 (patch) | |
| tree | 397cd0f722f4d164f02f6089d80eaeb6c08aecda /config-db/OpenSLX/MetaDB/SQLite.pm | |
| parent | * fixed incorrect module names in error message. (diff) | |
| download | core-7b3b226ed2a7b3bcc173e047359ac847624ce527.tar.gz core-7b3b226ed2a7b3bcc173e047359ac847624ce527.tar.xz core-7b3b226ed2a7b3bcc173e047359ac847624ce527.zip | |
* improved error message in case a database module could
not be loaded
git-svn-id: http://svn.openslx.org/svn/openslx/trunk@886 95ad53e4-c205-0410-b2fa-d234c58c8868
Diffstat (limited to 'config-db/OpenSLX/MetaDB/SQLite.pm')
| -rw-r--r-- | config-db/OpenSLX/MetaDB/SQLite.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/config-db/OpenSLX/MetaDB/SQLite.pm b/config-db/OpenSLX/MetaDB/SQLite.pm index 493f0a0a..4b574639 100644 --- a/config-db/OpenSLX/MetaDB/SQLite.pm +++ b/config-db/OpenSLX/MetaDB/SQLite.pm @@ -58,7 +58,7 @@ sub connect vlog 1, "trying to connect to SQLite-database <$dbSpec>"; eval ('require DBD::SQLite; 1;') or die _tr(qq[%s doesn't seem to be installed, -so there is no support for %s available, sorry!\n], 'DBD::SQLite', 'SQLite'); +so there is no support for %s available, sorry!\n%s], 'DBD::SQLite', 'SQLite', $@); $self->{'dbh'} = DBI->connect("dbi:SQLite:$dbSpec", undef, undef, {PrintError => 0, AutoCommit => 1}) or confess _tr("Cannot connect to database <%s> (%s)", |