Revision be54aea5
Von Moritz Bunkus vor etwa 7 Jahren hinzugefügt
| SL/DBUtils.pm | ||
|---|---|---|
| 392 | 392 |
return "%" . SL::Util::trim($string // '') . "%"; |
| 393 | 393 |
} |
| 394 | 394 |
|
| 395 |
sub role_is_superuser {
|
|
| 396 |
my ($dbh, $login) = @_; |
|
| 397 |
my ($is_superuser) = $dbh->selectrow_array(qq|SELECT usesuper FROM pg_user WHERE usename = ?|, undef, $login); |
|
| 398 |
|
|
| 399 |
return $is_superuser; |
|
| 400 |
} |
|
| 401 |
|
|
| 395 | 402 |
1; |
| 396 | 403 |
|
| 397 | 404 |
|
Auch abrufbar als: Unified diff
Datenbank anlegen: Super-User-Rechte abfragen, sofern nötig