Mehr Debugcode.

[mfinanz.git] / SL / User.pm

diff --git a/SL/User.pm b/SL/User.pm
index 7e40414170ce9cf6be6a423f852068518b5e2e56..86821f7b3d2722231fb51fa6993c749c12967037 100644 (file)
--- a/SL/User.pm
+++ b/SL/User.pm
@@ -272,7 +272,7 @@ sub dbsources {
 
   if ($form->{dbdriver} eq 'Pg') {
 
-    $query = qq|SELECT datname FROM pg_database|;
+    $query = qq|SELECT datname FROM pg_database WHERE NOT ((datname = 'template0') OR (datname = 'template1'))|;
     $sth   = $dbh->prepare($query);
     $sth->execute || $form->dberror($query);