Index: openacs-4/packages/schema-browser/tcl/schema-browser-procs-postgresql.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/schema-browser/tcl/schema-browser-procs-postgresql.tcl,v
diff -u -N -r1.4 -r1.5
--- openacs-4/packages/schema-browser/tcl/schema-browser-procs-postgresql.tcl	22 Apr 2003 01:12:26 -0000	1.4
+++ openacs-4/packages/schema-browser/tcl/schema-browser-procs-postgresql.tcl	20 May 2004 13:55:13 -0000	1.5
@@ -397,7 +397,7 @@
 
     # current_contraint_info -- a constraint_info_set for the constraint being processed in the loop below
     set check_constraint_set [ns_set create]
-    if {[string match {7.[3]*} [db_version]]} {
+    if {![string match {7.[12]*} [db_version]]} {
 	db_foreach schema_browser_index_get_subselect "
             select
               conname as constraint_name,