X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDBUtils.pm;h=f0952440e4aaa6595fe621eb4e77eee48ca11b46;hb=73f7989fcf23410ebd879d5150f6a13913ca2b90;hp=9d1bcace9d43ad15504ff3d4bd3f9435fbf05800;hpb=b7eaaf1fa6066ce3c6023b0d3031150f1ca243c3;p=kivitendo-erp.git diff --git a/SL/DBUtils.pm b/SL/DBUtils.pm index 9d1bcace9..f0952440e 100644 --- a/SL/DBUtils.pm +++ b/SL/DBUtils.pm @@ -13,7 +13,7 @@ our @EXPORT = qw(conv_i conv_date conv_dateq do_query selectrow_query do_stateme selectall_ids prepare_execute_query prepare_query create_sort_spec does_table_exist - add_token); + add_token check_trgm); use strict; @@ -398,6 +398,14 @@ sub role_is_superuser { return $is_superuser; } +sub check_trgm { + my ($dbh) = @_; + + my $version = $dbh->selectrow_array(qq|SELECT installed_version FROM pg_available_extensions WHERE name = 'pg_trgm'|); + + return !!$version; +} + 1; @@ -684,6 +692,11 @@ application (e.g. if the user clicked on a column header in a report). If it is undefined then the 'default_dir' parameter will be used instead. +=item check_trgm + +Checks if the postgresextension pg_trgm is installed and return trueish +or falsish. + =back =head1 DEBUG FUNCTIONS