Index: openacs-4/packages/content-portlet/misc/portlets/ges-categories.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/content-portlet/misc/portlets/ges-categories.tcl,v
diff -u -N -r1.2 -r1.3
--- openacs-4/packages/content-portlet/misc/portlets/ges-categories.tcl	25 Apr 2018 19:47:47 -0000	1.2
+++ openacs-4/packages/content-portlet/misc/portlets/ges-categories.tcl	9 May 2018 15:33:30 -0000	1.3
@@ -34,7 +34,7 @@
     if {!$no_tree_name} {
       append content "<h3>$my_tree_name</h3>"
     }
-    set categories {}
+    set categories [list]
     set pos 0
     set cattree(0) [::xowiki::CatTree new -volatile -orderby pos -name $my_tree_name]
     foreach category_info [category_tree::get_tree $tree_id] {