X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FUser.pm;h=68fd2c520ed8971dd88e437d47670e89d22683b1;hb=bfa674c9d4edc551afa6e27aac6f684a7b8cb656;hp=a271e77df2e91d737aeb8e33535469144fee708b;hpb=f30f0cce6468f895c7d59f3aab6e2a5731fc9705;p=kivitendo-erp.git

diff --git a/SL/User.pm b/SL/User.pm
index a271e77df..68fd2c520 100644
--- a/SL/User.pm
+++ b/SL/User.pm
@@ -130,7 +130,7 @@ sub _handle_superuser_privileges {
   my $dbh = SL::DBConnect->connect($dbconnect_form{dbconnect}, $dbconnect_form{dbuser}, $dbconnect_form{dbpasswd}, SL::DBConnect->get_options);
   return (%result, error => $::locale->text('The credentials (username & password) for connecting database are wrong.')) if !$dbh;
 
-  my ($is_superuser) = $dbh->selectrow_array(qq|SELECT usesuper FROM pg_user WHERE usename = ?|, undef, $dbconnect_form{dbuser});
+  my $is_superuser = SL::DBUtils::role_is_superuser($dbh, $dbconnect_form{dbuser});
 
   $dbh->disconnect;