let insert_widget w ?(tooltip="") ?(tooltip_private="") ?(pos = -1) w' = insert_widget w w' ~tooltip ~tooltip_private ~pos