Index: openacs-4/packages/acs-tcl/catalog/acs-tcl.de_DE.ISO-8859-1.xml
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/catalog/acs-tcl.de_DE.ISO-8859-1.xml,v
diff -u -r1.13.2.7 -r1.13.2.8
--- openacs-4/packages/acs-tcl/catalog/acs-tcl.de_DE.ISO-8859-1.xml	23 Oct 2005 13:38:33 -0000	1.13.2.7
+++ openacs-4/packages/acs-tcl/catalog/acs-tcl.de_DE.ISO-8859-1.xml	27 Jan 2006 16:53:26 -0000	1.13.2.8
@@ -1,5 +1,5 @@
 <?xml version="1.0" encoding="ISO-8859-1"?>
-<message_catalog package_key="acs-tcl" package_version="5.2.0b5" locale="de_DE" charset="ISO-8859-1">
+<message_catalog package_key="acs-tcl" package_version="5.2.2" locale="de_DE" charset="ISO-8859-1">
 
   <msg key="a_problem">Ein Problem</msg>
   <msg key="approve">Freischalten</msg>
Index: openacs-4/packages/acs-tcl/catalog/acs-tcl.en_US.ISO-8859-1.xml
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/catalog/acs-tcl.en_US.ISO-8859-1.xml,v
diff -u -r1.17.2.6 -r1.17.2.7
--- openacs-4/packages/acs-tcl/catalog/acs-tcl.en_US.ISO-8859-1.xml	23 Oct 2005 13:38:33 -0000	1.17.2.6
+++ openacs-4/packages/acs-tcl/catalog/acs-tcl.en_US.ISO-8859-1.xml	27 Jan 2006 16:53:26 -0000	1.17.2.7
@@ -1,5 +1,5 @@
 <?xml version="1.0" encoding="ISO-8859-1"?>
-<message_catalog package_key="acs-tcl" package_version="5.2.0b5" locale="en_US" charset="ISO-8859-1">
+<message_catalog package_key="acs-tcl" package_version="5.2.2" locale="en_US" charset="ISO-8859-1">
 
   <msg key="a_problem">a problem</msg>
   <msg key="approve">approve</msg>
Index: openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl,v
diff -u -r1.47.2.2 -r1.47.2.3
--- openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl	25 Jan 2006 14:04:29 -0000	1.47.2.2
+++ openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl	27 Jan 2006 16:53:26 -0000	1.47.2.3
@@ -656,7 +656,7 @@
 
     @return party_id
 } {
-    return [lindex [db_list select_party_id {*SQL*}] 0]
+    return [db_string select_party_id {*SQL*} -default ""]
 }
 
 ad_proc -public party::approved_members {
Index: openacs-4/packages/acs-tcl/tcl/community-core-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/community-core-procs.xql,v
diff -u -r1.16.2.1 -r1.16.2.2
--- openacs-4/packages/acs-tcl/tcl/community-core-procs.xql	25 Jan 2006 14:04:29 -0000	1.16.2.1
+++ openacs-4/packages/acs-tcl/tcl/community-core-procs.xql	27 Jan 2006 16:53:26 -0000	1.16.2.2
@@ -157,17 +157,7 @@
       </querytext>
 </fullquery>
 
-<fullquery name="party::get_by_email.select_party_id">
-      <querytext>
-      
-        select party_id 
-        from   parties 
-        where  lower(email) = lower(:email)
-	order by party_id desc
-      </querytext>
-</fullquery>
 
-
 <fullquery name="party::get_by_email.select_party_id">
       <querytext>