Minor kibitzing.

diff --git a/src/backend/catalog/pg_proc.c b/src/backend/catalog/pg_proc.c
index e7421ef20776bb7562f27f198e3a1f972b00b487..899258a4ebcacf1ebcc43139146f1871b36253f9 100644 (file)
--- a/src/backend/catalog/pg_proc.c
+++ b/src/backend/catalog/pg_proc.c
@@ -8,7 +8,7 @@
  *
  *
  * IDENTIFICATION
- *   $Header: /cvsroot/pgsql/src/backend/catalog/pg_proc.c,v 1.74 2002/05/22 17:20:58 petere Exp $
+ *   $Header: /cvsroot/pgsql/src/backend/catalog/pg_proc.c,v 1.75 2002/05/22 18:33:15 tgl Exp $
  *
  *-------------------------------------------------------------------------
  */
@@ -140,7 +140,6 @@ ProcedureCreate(const char *procedureName,
        elog(ERROR, "method %s already an attribute of type %s",
             procedureName, format_type_be(typev[0]));
 
-
    /*
     * All seems OK; prepare the data to be inserted into pg_proc.
     */
@@ -177,7 +176,6 @@ ProcedureCreate(const char *procedureName,
                                      CStringGetDatum(probin));
    /* proacl will be handled below */
 
-
    rel = heap_openr(ProcedureRelationName, RowExclusiveLock);
    tupDesc = rel->rd_att;
 
@@ -220,7 +218,8 @@ ProcedureCreate(const char *procedureName,
                     procedureName);
        }
 
-       /* do not change existing permissions, either */
+       /* do not change existing ownership or permissions, either */
+       replaces[Anum_pg_proc_proowner-1] = ' ';
        replaces[Anum_pg_proc_proacl-1] = ' ';
 
        /* Okay, do it... */
@@ -258,9 +257,9 @@ ProcedureCreate(const char *procedureName,
    /* Verify function body */
    if (OidIsValid(languageValidator))
    {
-       /* Advance command counter so recursive functions can be defined */
+       /* Advance command counter so new tuple can be seen by validator */
        CommandCounterIncrement();
-       OidFunctionCall1(languageValidator, retval);
+       OidFunctionCall1(languageValidator, ObjectIdGetDatum(retval));
    }
 
    return retval;