sub gtk2_update()
{

  return if (Gtk2->main_level() == 0);
  while (Gtk2->events_pending())
  {
    Gtk2->main_iteration();
  }

}