Index: openacs-4/packages/categories/categories.info
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/categories/categories.info,v
diff -u -N -r1.21.2.7 -r1.21.2.8
--- openacs-4/packages/categories/categories.info	16 Sep 2021 08:27:38 -0000	1.21.2.7
+++ openacs-4/packages/categories/categories.info	17 Aug 2022 10:32:05 -0000	1.21.2.8
@@ -10,7 +10,7 @@
     <inherit-templates-p>t</inherit-templates-p>
     <auto-mount>categories</auto-mount>
 
-    <version name="1.1.5d4" url="http://openacs.org/repository/apm/packages/categories-1.1.5d4">
+    <version name="1.1.5d5" url="http://openacs.org/repository/apm/packages/categories-1.1.5d5">
         <owner url="mailto:timo@timohentschel.de">timo@timohentschel.de</owner>
         <summary>Manage categories in category trees and let users map objects to categories.</summary>
         <release-date>2021-09-15</release-date>
@@ -19,9 +19,9 @@
         <license>GPL</license>
         <maturity>1</maturity>
 
-        <provides url="categories" version="1.1.5d4"/>
+        <provides url="categories" version="1.1.5d5"/>
         <requires url="acs-kernel" version="5.10.0"/>
-	<requires url="acs-tcl" version="5.10.0"/>
+	<requires url="acs-tcl" version="5.10.1d16"/>
 
         <callbacks>
             <callback type="after-install"  proc="category::after_install"/>
Index: openacs-4/packages/categories/lib/tree-code.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/categories/lib/tree-code.tcl,v
diff -u -N -r1.3 -r1.3.2.1
--- openacs-4/packages/categories/lib/tree-code.tcl	7 Aug 2017 23:48:05 -0000	1.3
+++ openacs-4/packages/categories/lib/tree-code.tcl	17 Aug 2022 10:32:05 -0000	1.3.2.1
@@ -1,3 +1,10 @@
+ad_include_contract {
+    This include produces a Tcl code snippet that serializes a
+    category tree for import.
+} {
+    tree_id:object_type(category_tree)
+}
+
 set default_locale [lang::system::site_wide_locale]
 
 array set tree [category_tree::get_data $tree_id $default_locale]