diff options
Diffstat (limited to 'src/pl/plperl/sql/plperl_elog.sql')
| -rw-r--r-- | src/pl/plperl/sql/plperl_elog.sql | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/pl/plperl/sql/plperl_elog.sql b/src/pl/plperl/sql/plperl_elog.sql index 4f1c014efbd..40896a48f48 100644 --- a/src/pl/plperl/sql/plperl_elog.sql +++ b/src/pl/plperl/sql/plperl_elog.sql @@ -43,3 +43,6 @@ create or replace function uses_global() returns text language plperl as $$ $$; select uses_global(); + +-- make sure we don't choke on readonly values +do language plperl $$ elog(NOTICE, ${^TAINT}); $$; |