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 -N -r1.58 -r1.59 --- openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.tcl 9 May 2018 15:33:29 -0000 1.58 +++ openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.tcl 16 May 2018 22:04:59 -0000 1.59 @@ -442,7 +442,8 @@ set child_id [lindex $elm 0] if { $child_id == $keyword_id } { - lassign $elm . . parent(id) parent(heading) + set parent(id) [lindex $elm 2] + set parent(heading) [lindex $elm 3] return $parent($element) } }