Index: openacs-4/packages/file-storage/www/file-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/file-edit.tcl,v
diff -u -r1.10.4.1 -r1.10.4.2
--- openacs-4/packages/file-storage/www/file-edit.tcl	6 Sep 2013 16:01:48 -0000	1.10.4.1
+++ openacs-4/packages/file-storage/www/file-edit.tcl	3 Oct 2013 08:33:57 -0000	1.10.4.2
@@ -8,7 +8,7 @@
     file_id:integer,notnull
 } -validate {
     valid_file -requires {file_id} {
-        if ![fs_file_p $file_id] {
+        if {![fs_file_p $file_id]} {
             ad_complain "[_ file-storage.lt_The_specified_file_is]"
         }
     }
@@ -54,9 +54,9 @@
 ad_form -extend -form {
     {submit:text(submit) {label $submit_label}}
 } -on_submit {
-    if [catch {
+    if {[catch {
         db_dml edit_title {}
-    } errmsg] {
+    } errmsg]} {
         if { [db_string duplicate_check {}] } {
             ad_return_complaint 1 "[_ file-storage.lt_It_appears_that_there]"
         } else {