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.8 -r1.9
--- openacs-4/packages/acs-content-repository/tcl/test/content-item-test-procs.tcl	19 Jun 2010 21:17:51 -0000	1.8
+++ openacs-4/packages/acs-content-repository/tcl/test/content-item-test-procs.tcl	19 Jun 2010 21:20:04 -0000	1.9
@@ -56,12 +56,13 @@
                                             -name "$test_name" \
                                             -item_id $first_item_id \
                                             -parent_id $first_folder_id \
+                                            -is_live "t" \
                                             -attributes [list [list title "$test_name"]]
                                        ]
 
             aa_true "First item created" [expr {$first_item_id == $returned_first_item_id}]
 
-            aa_true "first item exists" [expr {[content::item::get -item_id $first_item_id -revision "latest"] == 1}]
+            aa_true "first item exists" [expr {[content::item::get -item_id $first_item_id] == 1}]
 
             aa_true "First item's revision exists" \
                 [expr \
@@ -158,6 +159,7 @@
                                             -name "test_item_${new_type_item_id}" \
                                             -item_id $new_type_item_id \
                                             -parent_id $first_folder_id \
+                                            -is_live "t" \
                                             -content_type  "test_type" \
                                                -attributes [list [list title "Title"] [list attribute_name "attribute_value"]]]