Index: openacs-4/packages/new-portal/tcl/portal-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/tcl/portal-procs.xql,v
diff -u -r1.37 -r1.38
--- openacs-4/packages/new-portal/tcl/portal-procs.xql	29 Jun 2002 15:41:05 -0000	1.37
+++ openacs-4/packages/new-portal/tcl/portal-procs.xql	29 Jun 2002 21:48:21 -0000	1.38
@@ -191,23 +191,6 @@
   </querytext>
 </fullquery> 
 
-<fullquery name="portal::configure_dispatch.revert_update">      
-  <querytext>
-  update portals
-  set theme_id = :theme_id
-  where portal_id = :portal_id
-  </querytext>
-</fullquery> 
-
-
-<fullquery name="portal::configure_dispatch.revert_update">      
-  <querytext>
-  update portals
-  set theme_id = :theme_id
-  where portal_id = :portal_id
-  </querytext>
-</fullquery> 
-
 <fullquery name="portal::configure_dispatch.update_theme">      
   <querytext>
   update portals