Commit2299cea

committed

Invoke mksafefunc and mkunsafefunc with :: decoration. This seems a good

idea on consistency grounds, whether or not it really fixes bug #1831.Michael Fuhr

1 parentba2fc7e commit2299ceaCopy full SHA for 2299cea

File tree

-2

lines changed

-2

lines changed

Lines changed: 2 additions & 2 deletions

Original file line number	Diff line number	Diff line change
`@@ -33,7 +33,7 @@`
`33`	`33`	`* ENHANCEMENTS, OR MODIFICATIONS.`
`34`	`34`	`*`
`35`	`35`	`* IDENTIFICATION`
`36`		`- * $PostgreSQL: pgsql/src/pl/plperl/plperl.c,v 1.89 2005/08/12 21:26:32 tgl Exp $`
	`36`	`+ * $PostgreSQL: pgsql/src/pl/plperl/plperl.c,v 1.90 2005/08/20 19:19:21 tgl Exp $`
`37`	`37`	`*`
`38`	`38`	`**********************************************************************/`
`39`	`39`
`@@ -680,7 +680,7 @@ plperl_create_sub(char *s, bool trusted)`
`680`	`680`	`* errors properly. Perhaps it's because there's another level of`
`681`	`681`	`* eval inside mksafefunc?`
`682`	`682`	`*/`
`683`		`-count=perl_call_pv((trusted ?"mksafefunc" :"mkunsafefunc"),`
	`683`	`+count=perl_call_pv((trusted ?"::mksafefunc" :"::mkunsafefunc"),`
`684`	`684`	`G_SCALAR \|G_EVAL \|G_KEEPERR);`
`685`	`685`	`SPAGAIN;`
`686`	`686`

Comments

(0)