Index: openacs-4/packages/lorsm/tcl/lorsm-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/tcl/lorsm-procs.xql,v
diff -u -r1.2.2.1 -r1.2.2.2
--- openacs-4/packages/lorsm/tcl/lorsm-procs.xql 13 Jun 2005 15:10:56 -0000 1.2.2.1
+++ openacs-4/packages/lorsm/tcl/lorsm-procs.xql 17 Jun 2005 00:13:30 -0000 1.2.2.2
@@ -75,4 +75,36 @@
+
+
+ select track_id from
+ lorsm_student_track
+ where user_id = :user_id
+
+
+
+
+
+ select community_id
+ from lorsm_student_bookmark
+ where user_id = :user_id
+
+
+
+
+
+ update lorsm_student_track
+ set user_id = :to_user_id
+ where user_id = :from_user_id
+
+
+
+
+
+ update lorsm_student_bookmark
+ set user_id = :to_user_id
+ where user_id = :from_user_id
+
+
+
\ No newline at end of file