> Follow up a visit from the style police.

diff --git a/src/pl/plperl/plperl.c b/src/pl/plperl/plperl.c
index 19ffe8fb896d56f952bf6e7a78cdfea9281fea9b..bb6d021b6837155108677b34b29d67fa69701add 100644 (file)
--- 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.67.4.12 2010/05/13 16:44:03 adunstan Exp $
+ *       $PostgreSQL: pgsql/src/pl/plperl/plperl.c,v 1.67.4.13 2010/05/17 20:46:12 adunstan Exp $
  *
  **********************************************************************/
 
@@ -527,7 +527,7 @@ plperl_safe_init(void)
        if (SvTRUE(ERRSV))
                ereport(ERROR,
                                (errmsg("%s", strip_trailing_ws(SvPV_nolen(ERRSV))),
-                                errcontext("While executing PLC_TRUSTED.")));
+                                errcontext("while executing PLC_TRUSTED")));
 
        if (GetDatabaseEncoding() == PG_UTF8)
        {
@@ -540,7 +540,7 @@ plperl_safe_init(void)
                if (SvTRUE(ERRSV))
                        ereport(ERROR,
                                        (errmsg("%s", strip_trailing_ws(SvPV_nolen(ERRSV))),
-                                        errcontext("While executing utf8fix.")));
+                                        errcontext("while executing utf8fix")));
 
        }