Index: openacs-4/packages/photo-album/www/photo-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/photo-album/www/photo-edit.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/photo-album/www/photo-edit.tcl	6 Sep 2013 17:17:44 -0000	1.6
+++ openacs-4/packages/photo-album/www/photo-edit.tcl	14 Oct 2013 17:56:29 -0000	1.7
@@ -71,7 +71,7 @@
 db_1row get_photo_info { *SQL* }
 db_1row get_thumbnail_info { *SQL* }
 
-if [empty_string_p $live_revision] {
+if {$live_revision eq ""} {
     set checked_string "checked"
 } else {
     set checked_string ""
@@ -112,7 +112,7 @@
 
 	db_exec_plsql set_live_revision {} 
 
-	if $hide {
+	if {$hide} {
 	    db_dml update_hides { *SQL* }
 	} 
     } on_error {