external action_area : [>`dialog] obj -> button_box obj
      = "ml_GtkDialog_action_area"