hilitedLines bug

[Terry Dennis]

Bug: hilitedLines is incorrect after delete of a line.

on mouseUp
   if exists(field "Info") then
      delete field "Info"
   end if
   create field "Info"
   set the listBehavior of field "Info" to true
   repeat with tCounter = 1 to 20
      put "test data" && tCounter & cr after field "Info"
   end repeat
   set the hilitedLines of field "Info" to "12,13,14,15"
   if the hilitedLines of field "Info" <> "12,13,14,15" then
      answer "Ooops - Should be 12,13,14,15 -- is" && the hilitedLines of field "Info"
      breakpoint
   end if
   delete line 2 of field "Info"
   if the hilitedLines of field "Info" <> "11,12,13,14" then
      answer "Ooops - Should be 11,12,13,14 -- is" && the hilitedLines of field "Info"
      breakpoint
   end if
end mouseUp