diff options
| author | Bruce Momjian <bruce@momjian.us> | 2005-06-05 03:16:42 +0000 |
|---|---|---|
| committer | Bruce Momjian <bruce@momjian.us> | 2005-06-05 03:16:42 +0000 |
| commit | bebe7c5600ad750fb52b86ecb083a3f623ba0a99 (patch) | |
| tree | ef4c1f3094cba0e91f7b93522ca767abab3d319e /src/pl/plperl/plperl.c | |
| parent | 27bdb0c40d1319d82af2b21e10b1e69aef763b82 (diff) | |
Here's a patch to do the following:
1. Rename spi_return_next to return_next.
2. Add a new test for return_next.
3. Update the expected output.
4. Update the documentation.
Abhijit Menon-Sen
Diffstat (limited to 'src/pl/plperl/plperl.c')
| -rw-r--r-- | src/pl/plperl/plperl.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/pl/plperl/plperl.c b/src/pl/plperl/plperl.c index 82fdb86b180..6cd3494fb9f 100644 --- a/src/pl/plperl/plperl.c +++ b/src/pl/plperl/plperl.c @@ -33,7 +33,7 @@ * ENHANCEMENTS, OR MODIFICATIONS. * * IDENTIFICATION - * $PostgreSQL: pgsql/src/pl/plperl/plperl.c,v 1.75 2005/06/04 20:33:06 momjian Exp $ + * $PostgreSQL: pgsql/src/pl/plperl/plperl.c,v 1.76 2005/06/05 03:16:35 momjian Exp $ * **********************************************************************/ @@ -222,7 +222,7 @@ plperl_safe_init(void) "use vars qw($PLContainer); $PLContainer = new Safe('PLPerl');" "$PLContainer->permit_only(':default');" "$PLContainer->permit(qw[:base_math !:base_io sort time]);" - "$PLContainer->share(qw[&elog &spi_exec_query &spi_return_next " + "$PLContainer->share(qw[&elog &spi_exec_query &return_next " "&DEBUG &LOG &INFO &NOTICE &WARNING &ERROR %_SHARED ]);" ; |