Index: openacs-4/packages/dotlrn/tcl/community-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/community-procs.xql,v
diff -u -N -r1.62 -r1.63
--- openacs-4/packages/dotlrn/tcl/community-procs.xql	21 May 2002 06:52:34 -0000	1.62
+++ openacs-4/packages/dotlrn/tcl/community-procs.xql	24 May 2002 01:58:45 -0000	1.63
@@ -20,14 +20,6 @@
         </querytext>
     </fullquery>
 
-    <fullquery name="dotlrn_community::set_type_portal_id.set_type_portal_id">
-        <querytext>
-            update dotlrn_community_types
-            set portal_id = :portal_id
-            where community_type = :community_type
-        </querytext>
-    </fullquery>
-
     <fullquery name="dotlrn_community::set_type_package_id.update_package_id">
         <querytext>
             update dotlrn_community_types set package_id= :package_id where community_type= :community_type