File tree Expand file tree Collapse file tree 1 file changed +2
-2
lines changed Expand file tree Collapse file tree 1 file changed +2
-2
lines changed Original file line number Diff line number Diff line change 33
33
* ENHANCEMENTS, OR MODIFICATIONS.
34
34
*
35
35
* IDENTIFICATION
36
- * $PostgreSQL: pgsql/src/pl/plperl/plperl.c,v 1.73 2005/05/06 17:24:55 tgl Exp $
36
+ * $PostgreSQL: pgsql/src/pl/plperl/plperl.c,v 1.74 2005/05/23 01:57:51 neilc Exp $
37
37
*
38
38
**********************************************************************/
39
39
@@ -226,7 +226,7 @@ plperl_safe_init(void)
226
226
"$PLContainer->permit_only(':default');"
227
227
"$PLContainer->permit(qw[:base_math !:base_io sort time]);"
228
228
"$PLContainer->share(qw[&elog &spi_exec_query &DEBUG &LOG "
229
- "&INFO &NOTICE &WARNING &ERROR %SHARED ]);"
229
+ "&INFO &NOTICE &WARNING &ERROR %_SHARED ]);"
230
230
"sub ::mksafefunc { return $PLContainer->reval(qq[sub { $_[0] $_[1]}]); }"
231
231
;
232
232
You can’t perform that action at this time.
0 commit comments