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.239.2.47 -r1.239.2.48 --- openacs-4/packages/xowiki/tcl/includelet-procs.tcl 11 Aug 2020 19:47:09 -0000 1.239.2.47 +++ openacs-4/packages/xowiki/tcl/includelet-procs.tcl 13 Aug 2020 10:04:58 -0000 1.239.2.48 @@ -1883,8 +1883,13 @@ where reference = :item_id and ci.item_id = page and ci.item_id = o.object_id } { if {$pid eq ""} { - # in version less then oacs 5.2, this returns empty - set pid [::xo::dc get_value 5.2 {select package_id from cr_folders where folder_id = :parent_id}] + # + # In versions before oacs 5.2, the following query returns + # empty. + # + set pid [::xo::dc get_value 5.2 { + select package_id from cr_folders where folder_id = :parent_id + }] } if {$pid ne ""} { ::xowiki::Package require $pid @@ -1931,8 +1936,13 @@ from xowiki_references,cr_items ci,acs_objects o \ where page = :item_id and ci.item_id = reference and ci.item_id = o.object_id" { if {$pid eq ""} { - # in version less then oacs 5.2, this returns empty - set pid [::xo::dc get_value 5.2 {select package_id from cr_folders where folder_id = :parent_id}] + # + # In versions begore oacs 5.2, the following query returns + # empty. + # + set pid [::xo::dc get_value 5.2 { + select package_id from cr_folders where folder_id = :parent_id + }] } if {$pid ne ""} { ::xowiki::Package require $pid Index: openacs-4/packages/xowiki/tcl/test/test-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/test/test-procs.tcl,v diff -u -r1.15.2.12 -r1.15.2.13 --- openacs-4/packages/xowiki/tcl/test/test-procs.tcl 1 Jul 2020 19:31:58 -0000 1.15.2.12 +++ openacs-4/packages/xowiki/tcl/test/test-procs.tcl 13 Aug 2020 10:04:58 -0000 1.15.2.13 @@ -241,7 +241,7 @@ } { Create a form page via the web interface. - In essence this calls $instance/$path/$form_name?m=create-new + In essence, this calls $instance/$path/$form_name?m=create-new } { # Index: openacs-4/packages/xowiki/tcl/test/xowiki-admin-tests-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/test/xowiki-admin-tests-procs.tcl,v diff -u -r1.1.2.3 -r1.1.2.4 --- openacs-4/packages/xowiki/tcl/test/xowiki-admin-tests-procs.tcl 21 Jan 2020 06:26:46 -0000 1.1.2.3 +++ openacs-4/packages/xowiki/tcl/test/xowiki-admin-tests-procs.tcl 13 Aug 2020 10:04:58 -0000 1.1.2.4 @@ -25,7 +25,7 @@ xowiki_test_cases { XoWiki Test Cases - This tests have been ported from those originally stored in + These tests have been ported from those originally stored in xowiki/www/admin/test.tcl and cover various aspects of XoWiki API.