method set_on_label_change f = on_label_change <- f