Index: openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.tcl,v
diff -u -r1.56 -r1.57
--- openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.tcl	25 Apr 2018 19:47:46 -0000	1.56
+++ openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.tcl	30 Apr 2018 12:45:00 -0000	1.57
@@ -442,8 +442,7 @@
         set child_id [lindex $elm 0]
 
         if { $child_id == $keyword_id } {
-            set parent(id) [lindex $elm 2]
-            set parent(heading) [lindex $elm 3]
+            lassign $elm . . parent(id) parent(heading)
             return $parent($element)
         }
     }