Index: openacs-4/packages/xowiki/tcl/includelet-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/includelet-procs.tcl,v
diff -u -N -r1.150 -r1.151
--- openacs-4/packages/xowiki/tcl/includelet-procs.tcl	14 Jun 2010 11:29:44 -0000	1.150
+++ openacs-4/packages/xowiki/tcl/includelet-procs.tcl	17 Jun 2010 10:23:51 -0000	1.151
@@ -2234,7 +2234,7 @@
 
   toc instproc include_head_entries {} {
     my instvar style renderer
-    switch {$renderer} {
+    switch -- $renderer {
       list    {::xowiki::Tree include_head_entries -renderer listdnd -style $style}
       yuitree {::xowiki::Tree include_head_entries -renderer yuitree -style $style}
       none {}