another small message tweak

diff --git a/src/pl/plperl/plperl.c b/src/pl/plperl/plperl.c
index 8d685face00e604f2c3d3ecf029124a806d6864c..2127a2369fb716f84803b39f5464223335d06217 100644 (file)
--- a/src/pl/plperl/plperl.c
+++ b/src/pl/plperl/plperl.c
@@ -1446,7 +1446,7 @@ plperl_trigger_handler(PG_FUNCTION_ARGS)
                {
                        ereport(ERROR,
                                        (errcode(ERRCODE_E_R_I_E_TRIGGER_PROTOCOL_VIOLATED),
-                                        errmsg("result of Perl trigger function must be undef, "
+                                        errmsg("result of PL/Perl trigger function must be undef, "
                                                        "\"SKIP\", or \"MODIFY\"")));
                        trv = NULL;
                }