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