Index: openacs-4/packages/acs-admin/www/apm/version-i18n.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/apm/version-i18n.tcl,v
diff -u -N -r1.9 -r1.10
--- openacs-4/packages/acs-admin/www/apm/version-i18n.tcl	20 Apr 2004 21:12:28 -0000	1.9
+++ openacs-4/packages/acs-admin/www/apm/version-i18n.tcl	10 Jan 2007 21:21:59 -0000	1.10
@@ -62,7 +62,7 @@
         set add_file_p 1
         # If we are showing adp:s and we are only showing adp:s with texts to translate, check if
         # this file has any texts
-        if { [string equal $file_type "adp"] && $only_text_p } {
+        if { $file_type eq "adp" && $only_text_p } {
             if { $number_of_text_snippets == "0" } {
                 set add_file_p 0
             }
@@ -95,7 +95,7 @@
         -values $adp_preselect_list
 
 set action_label "Action to take on files"
-if { [string equal $file_type adp] } {
+if {$file_type eq "adp"} {
     element create file_list_form file_action \
         -datatype text \
         -widget checkbox \