- let placeholder = model#iter_children ~nth:0 (Some row) in
- ignore (model#remove placeholder)
- with Invalid_argument _ -> ()
+ let hdata = IsLeaf, Loading in
+ let row = find_child_node_by_hdata t row hdata in
+ ignore (model#remove row)
+ with Invalid_argument _ | Not_found -> ()