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 -r1.200.2.3 -r1.200.2.4
--- openacs-4/packages/xowiki/tcl/includelet-procs.tcl	3 Sep 2015 08:00:52 -0000	1.200.2.3
+++ openacs-4/packages/xowiki/tcl/includelet-procs.tcl	14 Oct 2015 08:25:44 -0000	1.200.2.4
@@ -2362,9 +2362,10 @@
         set html [$p include [list $b -book_mode true]]
         if {$html ne ""} {lappend menu $html}
       }
+      set label "$page_order $title"
       append output "<h$level class='book'>" \
           "<div style='float: right'>" [join $menu "&nbsp;"] "</div>" \
-          "<a name='[ns_quotehtml [toc anchor $name]]'></a>[ns_quotehtml $page_order $title]</h$level>" \
+          "<a name='[ns_quotehtml [toc anchor $name]]'></a>[ns_quotehtml $label]</h$level>" \
           $content
     }
     return $output
@@ -2459,9 +2460,10 @@
       # <div> not allowed in h*: style='float: right; position: relative; top: -32px
       set menu "<span style='float: right;'>$menu</span>"
     }
+    set label "$page_order $title"
     append output \
         "<h$level class='book'>" $menu \
-        "<a name='[ns_quotehtml [toc anchor $name]]'></a>[ns_quotehtml $page_order $title]</h$level>" \
+        "<a name='[ns_quotehtml [toc anchor $name]]'></a>[ns_quotehtml $label]</h$level>" \
         $content
   }