Index: openacs-4/packages/xowiki/xowiki.info
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/xowiki.info,v
diff -u -r1.10 -r1.11
--- openacs-4/packages/xowiki/xowiki.info	12 Feb 2006 01:21:37 -0000	1.10
+++ openacs-4/packages/xowiki/xowiki.info	22 Feb 2006 12:35:53 -0000	1.11
@@ -8,11 +8,11 @@
     <singleton-p>f</singleton-p>
     <auto-mount>xowiki</auto-mount>
 
-    <version name="0.22" url="http://openacs.org/repository/download/apm/xowiki-0.22.apm">
+    <version name="0.23" url="http://openacs.org/repository/download/apm/xowiki-0.23.apm">
         <owner url="mailto:neumann@wu-wien.ac.at">Gustaf Neumann</owner>
         <summary>A more generic xotcl-based wikis example with object types
 and subtypes based on the content repository (with category support)</summary>
-        <release-date>2006-02-12</release-date>
+        <release-date>2006-02-22</release-date>
         <description format="text/html">XoWiki is a wiki implementation for OpenACS in xotcl. Instead of trying to
 implement the full set of wiki markup commands of systems like MediaWiki,
 XoWiki is based on a rich text editor and focuses more on integration
@@ -24,11 +24,11 @@
 </description>
         <maturity>0</maturity>
 
-        <provides url="xowiki" version="0.22"/>
+        <provides url="xowiki" version="0.23"/>
         <requires url="categories" version="1.0d3"/>
         <requires url="file-storage" version="5.1.0"/>
         <requires url="general-comments" version="4.6.1"/>
-        <requires url="xotcl-core" version="0.35"/>
+        <requires url="xotcl-core" version="0.36"/>
 
         <callbacks>
             <callback type="before-uninstall"  proc="::xowiki::sc::unregister_implementations"/>
Index: openacs-4/packages/xowiki/tcl/xowiki-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-procs.tcl,v
diff -u -r1.19 -r1.20
--- openacs-4/packages/xowiki/tcl/xowiki-procs.tcl	17 Feb 2006 13:56:24 -0000	1.19
+++ openacs-4/packages/xowiki/tcl/xowiki-procs.tcl	22 Feb 2006 12:35:54 -0000	1.20
@@ -536,11 +536,10 @@
     if {![::xotcl::Object isobject ::$folder_id]} {
       set item_id [CrItem lookup -title ::$folder_id -parent_id $folder_id]
       if {$item_id != 0} {
-	my log "--f fetch folder object"
-	set o [::xowiki::Object create ::$folder_id]
-	::xowiki::Object fetch_object -object $o -item_id $item_id
+	#my log "--f fetch folder object -object ::$folder_id -item_id $item_id"
+	set o [::xowiki::Object fetch_object -object ::$folder_id -item_id $item_id]
       } else {
-	my log "--f save new folder object"
+	#my log "--f save new folder object"
 	set o [::xowiki::Object create ::$folder_id]
 	$o set text "# this is the payload of the folder object\n\nset index_page \"\"\n"
 	$o set parent_id $folder_id
@@ -550,10 +549,10 @@
       }
       #$o proc destroy {} {my log "--f "; next}
       $o set package_id $package_id
-      my log "--f exists $o -> [::xotcl::Object isobject $o]"
+      #my log "--f package_id set, exists $o -> [::xotcl::Object isobject $o]"
       uplevel #0 [list $o volatile]
     } else {
-      my log "--f reuse folder object $folder_id"; # [::Serializer deepSerialize ::$folder_id]
+      #my log "--f reuse folder object $folder_id [::Serializer deepSerialize ::$folder_id]"
     }
   }
 
@@ -807,7 +806,7 @@
 
   Page instproc render {-update_references:switch} {
     my instvar item_id references lang render_adp unresolved_references parent_id
-    my log "-- my class=[my info class]"
+    #my log "-- my class=[my info class]"
 
     set package_id [$parent_id set package_id]
     Page set url_prefix [site_node::get_url_from_object_id -object_id $package_id]
@@ -833,7 +832,7 @@
   #
 
   PlainPage instproc get_content {} {
-    my log "-- my class=[my info class]"
+    #my log "-- my class=[my info class]"
     return [my substitute_markup [my set text]]
   }