Index: openacs-4/packages/wp-slim/tcl/wp-slim-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/wp-slim/tcl/wp-slim-procs.xql,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/wp-slim/tcl/wp-slim-procs.xql	28 Aug 2003 09:42:00 -0000	1.2
+++ openacs-4/packages/wp-slim/tcl/wp-slim-procs.xql	13 Jun 2005 16:32:48 -0000	1.3
@@ -1,21 +1,32 @@
 <?xml version="1.0"?>
 <queryset>
 
-<fullquery name="wp_header.get_style_data">      
-      <querytext>
+  <fullquery name="callback::MergePackageUser::impl::wp-slim.upd_wp_styles">      
+    <querytext>
+      update wp_styles 
+      set owner = :to_user_id
+      where owner = :from_user_id
+    </querytext>
+  </fullquery>
 
-	select * from wp_styles where style_id = :style_id      
+  <fullquery name="callback::MergeShowUserInfo::impl::wp-slim.sel_wp_styles">      
+    <querytext>
+      select style_id , name 
+      from wp_styles
+      where owner = :user_id
+    </querytext>
+  </fullquery>
 
-      </querytext>
-</fullquery>
-
- 
-<fullquery name="wp_check_style_authorization.wp_style_owner_select">      
-      <querytext>
-
+  <fullquery name="wp_header.get_style_data">      
+    <querytext>
+	select * from wp_styles where style_id = :style_id      
+    </querytext>
+  </fullquery>
+  
+  <fullquery name="wp_check_style_authorization.wp_style_owner_select">      
+    <querytext>
 	select owner from wp_styles where style_id = :style_id
-
-      </querytext>
-</fullquery>
- 
+    </querytext>
+  </fullquery>
+  
 </queryset>