proisagg switched to prokind in version 11

Author: turnstep

check_postgres.pl

@@ -1310,7 +1310,7 @@ package check_postgres;
     oid, tableoid, amname AS name FROM pg_am
 
   UNION ALL SELECT 'aggregate' AS object,
-    oid, tableoid, FORMAT('%s.%s(%s)', pronamespace::regnamespace, proname, pg_get_function_arguments(oid) )AS name FROM pg_proc WHERE proisagg
+    oid, tableoid, FORMAT('%s.%s(%s)', pronamespace::regnamespace, proname, pg_get_function_arguments(oid) )AS name FROM pg_proc WHERE prokind='a'
 
   UNION ALL SELECT 'cast' AS object,
     oid, tableoid, FORMAT('%s AS %s', format_type(castsource, NULL), format_type(casttarget, NULL)) AS name FROM pg_cast
@@ -1337,7 +1337,7 @@ package check_postgres;
     oid, tableoid, fdwname AS name FROM pg_foreign_data_wrapper
 
   UNION ALL SELECT 'function' AS object,
-    oid, tableoid, FORMAT('%s.%s(%s)', pronamespace::regnamespace, proname, pg_get_function_arguments(oid) )AS name FROM pg_proc WHERE NOT proisagg
+    oid, tableoid, FORMAT('%s.%s(%s)', pronamespace::regnamespace, proname, pg_get_function_arguments(oid) )AS name FROM pg_proc WHERE prokind IN ('f','p')
 
   UNION ALL SELECT 'large object' AS object,
     loid, tableoid, loid::text AS name FROM pg_largeobject
@@ -8017,6 +8017,11 @@ sub find_catalog_info {
         delete $ci->{innerSQL};
     }
 
+    if ($type eq 'comment' and $dbver->{major} < 11) {
+        $SQL =~ s/prokind='a'/proisagg/g;
+        $SQL =~ s/\Qprokind IN ('f','p')/NOT proisagg/g;
+    }
+
     if (exists $ci->{exclude}) {
         if ('temp_schemas' eq $ci->{exclude}) {
             if (! $opt{filtered}{system}) {