Index: openacs-4/packages/acs-kernel/sql/postgresql/rel-constraints-body-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-kernel/sql/postgresql/rel-constraints-body-create.sql,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/acs-kernel/sql/postgresql/rel-constraints-body-create.sql	17 Apr 2001 23:41:36 -0000	1.6
+++ openacs-4/packages/acs-kernel/sql/postgresql/rel-constraints-body-create.sql	20 Apr 2001 02:03:49 -0000	1.7
@@ -14,6 +14,27 @@
 
 
 -- create or replace package body rel_constraint
+
+create function rel_constraint__new(varchar,integer,varchar,integer) 
+returns integer as '
+declare
+        nam     alias for $1;
+        sid1    alias for $2;
+        side    alias for $3;
+        sid2    alias for $4;
+begin
+        return rel_constraint__new(null,
+                                   ''rel_constraint'',
+                                   nam,
+                                   sid1,
+                                   side,
+                                   sid2,
+                                   null,
+                                   null,
+                                   null
+                                   );                                   
+end;' language 'plpgsql';
+
 -- function new
 create function rel_constraint__new (integer,varchar,varchar,integer,char,integer,integer,integer,varchar)
 returns integer as '
