Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/lars-blogger/tcl/lars-blogger-callback-procs.tcl'.
Fisheye: No comparison available.  Pass `N' to diff?
Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/lars-blogger/tcl/lars-blogger-callback-procs.xql'.
Fisheye: No comparison available.  Pass `N' to diff?
Index: openacs-4/packages/lars-blogger/tcl/lars-blogger-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/tcl/lars-blogger-procs.tcl,v
diff -u -r1.23.2.2 -r1.23.2.3
--- openacs-4/packages/lars-blogger/tcl/lars-blogger-procs.tcl	7 Jul 2005 23:23:40 -0000	1.23.2.2
+++ openacs-4/packages/lars-blogger/tcl/lars-blogger-procs.tcl	19 Jul 2005 22:08:28 -0000	1.23.2.3
@@ -7,46 +7,6 @@
 
 namespace eval lars_blogger {}
 
-
-
-ad_proc -callback merge::MergeShowUserInfo -impl lars_blogger {
-    -user_id:required
-} {
-    Show the items of user_id
-} {
-    set msg "Lars_blogger items of $user_id"
-    set result [list $msg]
-
-    set channels [db_list_of_lists sel_channels { *SQL* }]
-    lappend result $channels
-    
-    return $result
-}
-
-ad_proc -callback merge::MergePackageUser -impl lars_blogger {
-    -from_user_id:required
-    -to_user_id:required
-} {
-    Merge the entries of two users.
-
-    The from_user_id is the user_id of the user
-    that will be deleted and all the entries
-    of this user will be mapped to the to_user_id.
-    
-} {
-    set msg "Merging lars_blogger"
-    ns_log Notice $msg
-    set result [list $msg]
-
-    db_dml upd_channels { *SQL* }
-    
-    lappend result "Merge of lars_blogger is done"
-    
-    return $result
-}
-
-
-
 ad_proc lars_blog_setup_feed {
     -user:boolean
     {-package_id ""}
Index: openacs-4/packages/lars-blogger/tcl/lars-blogger-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/tcl/lars-blogger-procs.xql,v
diff -u -r1.8.2.1 -r1.8.2.2
--- openacs-4/packages/lars-blogger/tcl/lars-blogger-procs.xql	15 Jun 2005 18:40:28 -0000	1.8.2.1
+++ openacs-4/packages/lars-blogger/tcl/lars-blogger-procs.xql	19 Jul 2005 22:08:28 -0000	1.8.2.2
@@ -87,20 +87,4 @@
         </querytext>
     </fullquery>
 
-    <fullquery name="callback::MergePackageUser::impl::lars_blogger.upd_channels">
-        <querytext>	
-        update weblogger_channels
-	set user_id = :to_user_id
-	where user_id = :from_user_id
-        </querytext>
-    </fullquery>	
-
-    <fullquery name="callback::MergeShowUserInfo::impl::lars_blogger.sel_channels">
-        <querytext>	
-        select channel_id, package_id
-        from weblogger_channels
-        where user_id = :user_id
-        </querytext>
-    </fullquery>	
-
 </queryset>