Index: openacs-4/packages/lorsm/tcl/lorsm-callback-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/tcl/lorsm-callback-procs.xql,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/lorsm/tcl/lorsm-callback-procs.xql	7 Jun 2006 14:05:44 -0000	1.2
+++ openacs-4/packages/lorsm/tcl/lorsm-callback-procs.xql	12 Dec 2008 14:25:33 -0000	1.3
@@ -1,36 +1,46 @@
 <?xml version="1.0"?>
 <queryset>
 
-  <fullquery name="callback::MergeShowUserInfo::impl::lorsm.sel_student_track">      
-    <querytext>
-      select track_id from
-      lorsm_student_track
-      where user_id = :user_id
-    </querytext>
-  </fullquery>
+    <fullquery name="callback::MergeShowUserInfo::impl::lorsm.sel_student_track">
+        <querytext>
+            select track_id from
+            lorsm_student_track
+            where user_id = :user_id
+        </querytext>
+    </fullquery>
 
-  <fullquery name="callback::MergeShowUserInfo::impl::lorsm.sel_student_bookmark">      
-    <querytext>
-      select community_id 
-      from lorsm_student_bookmark
-      where user_id = :user_id
-    </querytext>
-  </fullquery>
-  
-  <fullquery name="callback::MergePackageUser::impl::lorsm.student_track">      
-    <querytext>
-      update lorsm_student_track
-      set user_id = :to_user_id
-      where user_id = :from_user_id
-    </querytext>
-  </fullquery>
-  
-  <fullquery name="callback::MergePackageUser::impl::lorsm.student_bookmark">      
-    <querytext>
-      update lorsm_student_bookmark
-      set user_id = :to_user_id
-      where user_id = :from_user_id
-    </querytext>
-  </fullquery>
-  
-</queryset>
\ No newline at end of file
+    <fullquery name="callback::MergeShowUserInfo::impl::lorsm.sel_student_bookmark">
+        <querytext>
+            select community_id
+            from lorsm_student_bookmark
+            where user_id = :user_id
+        </querytext>
+    </fullquery>
+
+    <fullquery name="callback::MergePackageUser::impl::lorsm.student_track">
+        <querytext>
+            update lorsm_student_track
+            set user_id = :to_user_id
+            where user_id = :from_user_id
+        </querytext>
+    </fullquery>
+
+    <fullquery name="callback::MergePackageUser::impl::lorsm.student_bookmark">
+        <querytext>
+            update lorsm_student_bookmark
+            set user_id = :to_user_id
+            where user_id = :from_user_id
+        </querytext>
+    </fullquery>
+
+    <fullquery name="callback::application-track::getGeneralInfo::impl::lorsm.my_query">
+        <querytext>
+            select count(1) as result
+            from (  select distinct l.course_id
+                    from lorsm_student_track l
+                    where l.community_id=:comm_id
+                    group by l.course_id) as t
+        </querytext>
+    </fullquery>
+
+</queryset>