Index: openacs-4/packages/bug-tracker/www/bulk-update-op.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/bulk-update-op.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/bug-tracker/www/bulk-update-op.tcl	29 May 2016 10:50:02 -0000	1.4
+++ openacs-4/packages/bug-tracker/www/bulk-update-op.tcl	8 Apr 2018 05:29:43 -0000	1.5
@@ -79,7 +79,7 @@
                 
         # check cached list first
         set action_id_list [workflow::case::get_enabled_actions -case_id $case_id]
-        if {[lsearch $action_id_list $action_id] != -1} {
+        if {$action_id in $action_id_list} {
             set enabled_action_id [workflow::case::action::get_enabled_action_id \
                                        -case_id $case_id \
                                        -action_id $action_id \
@@ -162,7 +162,7 @@
                              -workflow_short_name [bug_tracker::bug::workflow_short_name]]
             
             set action_id_list [workflow::case::get_enabled_actions -case_id $case_id]
-            if {[lsearch $action_id_list $action_id] != -1} {
+            if {$action_id in $action_id_list} {
                 set enabled_action_id [workflow::case::action::get_enabled_action_id \
                                            -case_id $case_id \
                                            -action_id $action_id \
@@ -209,7 +209,7 @@
     }
     
     foreach field $all_fields {
-        if {[lsearch $present_fields $field] == -1 || $dummy_case_id eq ""} {
+        if {$field ni $present_fields || $dummy_case_id eq ""} {
             element set_properties bug $field -widget hidden
         }
     }