Index: openacs-4/packages/contacts/tcl/contacts-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/tcl/contacts-procs-postgresql.xql,v
diff -u -N -r1.27 -r1.28
--- openacs-4/packages/contacts/tcl/contacts-procs-postgresql.xql	24 Jun 2007 08:20:54 -0000	1.27
+++ openacs-4/packages/contacts/tcl/contacts-procs-postgresql.xql	24 Jun 2007 08:50:16 -0000	1.28
@@ -64,9 +64,9 @@
   <querytext>
     insert into contact_privacy
            ( party_id, email_p, mail_p, phone_p, gone_p )
-    select party_id, 't'::boolean, 't'::boolean, 't'::boolean, 'f'::boolean
-      from parties
-     where party_id not in ( select party_id from contact_privacy )
+    select p.party_id, 't'::boolean, 't'::boolean, 't'::boolean, 'f'::boolean
+      from parties p left join contact_privacy c on c.party_id = p.party_id
+     where c.party_id is null
   </querytext>
 </fullquery>