Index: openacs-4/packages/xowiki/resources/templates/view-book-no-ajax.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/resources/templates/view-book-no-ajax.tcl,v
diff -u -N -r1.2 -r1.2.2.1
--- openacs-4/packages/xowiki/resources/templates/view-book-no-ajax.tcl	7 Aug 2017 23:48:30 -0000	1.2
+++ openacs-4/packages/xowiki/resources/templates/view-book-no-ajax.tcl	8 May 2019 14:33:40 -0000	1.2.2.1
@@ -1,4 +1,4 @@
-set title [$package_id get_parameter PackageTitle [$package_id instance_name]]
+set title [::$package_id get_parameter PackageTitle [::$package_id instance_name]]
 #set toc   [$page include [list toc -ajax 0 -open_page $name -decoration plain -remove_levels 0]]
 set toc   [$page include [list toc -style list -open_page $name -expand_all 1 -decoration plain]]
 set i     [$page set __last_includelet]
@@ -14,8 +14,8 @@
 
   if {$count > 0} {
     set book_relpos [format %.2f%% [expr {100.0 * $p / $count}]]
-    if {$p>1}      {set book_prev_link [$package_id pretty_link -parent_id [$i parent_id] [$i page_name [expr {$p - 1}]]]}
-    if {$p<$count} {set book_next_link [$package_id pretty_link -parent_id [$i parent_id] [$i page_name [expr {$p + 1}]]]}
+    if {$p>1}      {set book_prev_link [::$package_id pretty_link -parent_id [$i parent_id] [$i page_name [expr {$p - 1}]]]}
+    if {$p<$count} {set book_next_link [::$package_id pretty_link -parent_id [$i parent_id] [$i page_name [expr {$p + 1}]]]}
     set page_title "<h2>[$i current] $title</h2>"
   } else {
     set book_relpos 0.0%