Index: openacs-4/packages/acs-content-repository/tcl/test/content-item-test-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/tcl/test/content-item-test-procs.tcl,v diff -u -r1.10.2.1 -r1.10.2.2 --- openacs-4/packages/acs-content-repository/tcl/test/content-item-test-procs.tcl 10 Sep 2015 08:21:19 -0000 1.10.2.1 +++ openacs-4/packages/acs-content-repository/tcl/test/content-item-test-procs.tcl 2 Jan 2016 21:24:47 -0000 1.10.2.2 @@ -67,7 +67,10 @@ aa_true "First item's revision exists" \ [expr \ {![string equal "" \ - [db_string get_revision "select latest_revision from cr_items, cr_revisions where latest_revision=revision_id and cr_items.item_id=:first_item_id" -default ""]]}] + [db_string get_revision { + select latest_revision from cr_items, cr_revisions + where latest_revision=revision_id and cr_items.item_id = :first_item_id + } -default ""]]}] # check the folder is not empty now. set is_empty [content::folder::is_empty -folder_id $first_folder_id]