void set_title (hwnd frame, p_string title)
{
  dlg_search (frame, (hwnd window) {
                                     if (window->has_id (DLG_TITLE_ID)) set_text (window, title);
                                   });
}