/**************************************************************************
Popdownown the player list dialog.
**************************************************************************/
void popdown_players_dialog(void)
{
if (pPlayers_Dlg) {
popdown_window_group_dialog(pPlayers_Dlg->pBeginWidgetList,
pPlayers_Dlg->pEndWidgetList);
FC_FREE(pPlayers_Dlg);
}
}
static void popdown_start_menu()
{
if(pStartMenu) {
popdown_window_group_dialog(pStartMenu->pBeginWidgetList,
pStartMenu->pEndWidgetList);
FC_FREE(pStartMenu);
flush_dirty();
}
}
/**************************************************************************
Popdown the short player list dialog version.
**************************************************************************/
void popdown_players_nations_dialog(void)
{
if (pShort_Players_Dlg) {
popdown_window_group_dialog(pShort_Players_Dlg->pBeginWidgetList,
pShort_Players_Dlg->pEndWidgetList);
FC_FREE(pShort_Players_Dlg->pScroll);
FC_FREE(pShort_Players_Dlg);
}
}
/****************************************************************
Close caravan dialog
*****************************************************************/
void popdown_caravan_dialog(void)
{
if (pCaravan_Dlg) {
is_unit_move_blocked = FALSE;
popdown_window_group_dialog(pCaravan_Dlg->pBeginWidgetList,
pCaravan_Dlg->pEndWidgetList);
FC_FREE(pCaravan_Dlg);
flush_dirty();
}
}
/**************************************************************************
Popdown a window asking a diplomatic unit if it wishes to incite the
given enemy city.
**************************************************************************/
void popdown_incite_dialog(void)
{
if (pIncite_Dlg) {
is_unit_move_blocked = FALSE;
popdown_window_group_dialog(pIncite_Dlg->pdialog->pBeginWidgetList,
pIncite_Dlg->pdialog->pEndWidgetList);
FC_FREE(pIncite_Dlg->pdialog);
FC_FREE(pIncite_Dlg);
flush_dirty();
}
}
/**************************************************************************
Close the spaceship dialog for the given player.
**************************************************************************/
void popdown_spaceship_dialog(struct player *pPlayer)
{
struct SMALL_DLG *pSpaceShp;
if((pSpaceShp = get_spaceship_dialog(pPlayer))) {
popdown_window_group_dialog(pSpaceShp->pBeginWidgetList,
pSpaceShp->pEndWidgetList);
dialog_list_remove(dialog_list, pSpaceShp);
FC_FREE(pSpaceShp);
}
}
/**************************************************************************
Popdown a dialog giving a diplomatic unit some options when moving into
the target tile.
**************************************************************************/
void popdown_diplomat_dialog(void)
{
if (pDiplomat_Dlg) {
is_unit_move_blocked = FALSE;
popdown_window_group_dialog(pDiplomat_Dlg->pdialog->pBeginWidgetList,
pDiplomat_Dlg->pdialog->pEndWidgetList);
FC_FREE(pDiplomat_Dlg->pdialog->pScroll);
FC_FREE(pDiplomat_Dlg->pdialog);
FC_FREE(pDiplomat_Dlg);
queue_flush();
}
}