Slightly better error messages for when we detect an invalid interpreter

leto · Jul 29, 2010 · 9739681 · 9739681
1 parent 8c87e64
commit 9739681
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/plparrot.c b/plparrot.c
@@ -401,7 +401,7 @@ plperl6u_call_handler(PG_FUNCTION_ARGS)
     Datum retval;
     interp = p6_interp;
     if(!interp) {
-        elog(ERROR,"Invalid Parrot interpreter!");
+        elog(ERROR,"Invalid Parrot interpreter for PL/Perl6u!");
     }
     retval = plperl6_call_handler(fcinfo);
     interp = trusted_interp;
@@ -416,7 +416,7 @@ plperl6_call_handler(PG_FUNCTION_ARGS)
     elog(NOTICE, "plperl6_call_handler");
     interp = p6_interp;
     if(!interp) {
-        elog(ERROR,"Invalid Parrot interpreter!");
+        elog(ERROR,"Invalid Parrot interpreter for PL/Perl6!");
     }
     PG_TRY();
     {