let set_icon_from_stock tt id =
    set_icon_from_stock tt (GtkStock.convert_id id)