Index: openacs-4/packages/acs-content-repository/tcl/content-item-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/tcl/content-item-procs.tcl,v
diff -u -r1.28 -r1.29
--- openacs-4/packages/acs-content-repository/tcl/content-item-procs.tcl	4 Apr 2018 18:51:56 -0000	1.28
+++ openacs-4/packages/acs-content-repository/tcl/content-item-procs.tcl	7 Apr 2018 17:40:02 -0000	1.29
@@ -134,10 +134,10 @@
         # since we can't rely on content_item__new to create a
         # revision we have to pass is_live to content::revision::new
         # and set the live revision there
-        if {([info exists title] && $title ne "")
-            || ([info exists text] && $text ne "")
-            || ([info exists data] && $data ne "")
-            || ([info exists tmp_filename] && $tmp_filename ne "")
+        if {$title ne ""
+            || $text ne ""
+            || $data ne ""
+            || $tmp_filename ne ""
             || [llength $attributes]
         } {
             content::revision::new \