Sqitch create function templates for pg engine

pg_deploy_create_function.tmpl

-- Deploy [% project %]:[% change %] to [% engine %]
[% FOREACH item IN requires -%]
-- requires: [% item %]
[% END -%]
[% FOREACH item IN conflicts -%]
-- conflicts: [% item %]
[% END -%]

BEGIN;

SET SEARCH_PATH TO [% IF schema %][% schema %],[% END %]public;
CREATE OR REPLACE FUNCTION [% IF name %][% name %][% ELSE %][% change %][% END %] (
[% FOREACH arg IN argument -%]
  [% arg %] [% type.item( loop.index ) or 'TEXT' %][% loop.last ? '' : ', ' %]
[% END -%]
)
RETURNS [% IF returns; returns; ELSE %]VOID[% END %]
LANGUAGE plpgsql
SET SEARCH_PATH TO [% IF schema %][% schema %],[% END %]public
[% IF owner %]SECURITY DEFINER[% END %]
AS $$
BEGIN
  PERFORM TRUE;
  IF NOT FOUND THEN RAISE EXCEPTION '% did not work', 'something'; END IF;
  RETURN;
END
$$;

[% IF owner -%]
ALTER FUNCTION [% IF name %][% name %][% ELSE %][% change %][% END %] (
[%- FOREACH typ IN type -%]
  [%- typ %][% loop.last ? '' : ', ' -%]
[%- END -%]
) OWNER TO [% owner %]
[% END %]
[% IF execute -%]
GRANT EXECUTE ON FUNCTION [% IF name %][% name %][% ELSE %][% change %][% END %] (
[%- FOREACH typ IN type -%]
  [%- typ %][% loop.last ? '' : ', ' -%]
[%- END -%]
) TO [% execute %];
[% END %]

COMMIT;

pg_revert_create_function.tmpl

-- Revert [% project %]:[% change %] from [% engine %]

BEGIN;

SET SEARCH_PATH TO [% IF schema %][% schema %],[% END %]public;

[% IF owner -%]
ALTER FUNCTION [% IF name %][% name %][% ELSE %][% change %][% END %] (
[%- FOREACH typ IN type -%]
  [%- typ %][% loop.last ? '' : ', ' -%]
[%- END -%]
) OWNER TO CURRENT_USER
[% END %]
DROP FUNCTION [% IF name %][% name %][% ELSE %][% change %][% END %](
[%- FOREACH typ IN type -%]
    [%- typ %][% loop.last ? '' : ',' -%]
[%- END -%]);

COMMIT;

pg_verify_create_function.tmpl

-- Verify [% project %]:[% change %] on [% engine %]

BEGIN;

SET SEARCH_PATH TO [% IF schema %][% schema %],[% END %]public;
SELECT pg_catalog.has_function_privilege('[% IF name %][% name %][% ELSE %][% change %][% END %](
  [%- FOREACH typ IN type -%]
    [%- typ %][% loop.last ? '' : ',' -%]
[% END -%])','execute');

ROLLBACK;