diff options
| author | Tom Lane <tgl@sss.pgh.pa.us> | 2005-08-24 19:06:28 +0000 |
|---|---|---|
| committer | Tom Lane <tgl@sss.pgh.pa.us> | 2005-08-24 19:06:28 +0000 |
| commit | 6f64cf592ba9dad03301b27c6f964ddf6c37f380 (patch) | |
| tree | fb971f206ed22244fd7418c18f9ee59ebe6c3ea1 /src/pl/plperl/plperl.c | |
| parent | 95f202c0212f87ec2610b20643cb74c310f54952 (diff) | |
| download | postgresql-6f64cf592ba9dad03301b27c6f964ddf6c37f380.tar.gz postgresql-6f64cf592ba9dad03301b27c6f964ddf6c37f380.zip | |
Get rid of inappropriate use of croak(). Per report from Michael Fuhr.
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 b6dfb96102e..5f9246187c9 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.91 2005/08/24 18:16:56 tgl Exp $ + * $PostgreSQL: pgsql/src/pl/plperl/plperl.c,v 1.92 2005/08/24 19:06:28 tgl Exp $ * **********************************************************************/ @@ -370,7 +370,7 @@ plperl_convert_to_pg_array(SV *src) SPAGAIN ; if (count != 1) - croak("Big trouble\n") ; + elog(ERROR, "unexpected _plperl_to_pg_array failure"); rv = POPs; |