/*
* Empire - A multi-player, client/server Internet based war game.
- * Copyright (C) 1986-2011, Dave Pare, Jeff Bailey, Thomas Ruschak,
+ * Copyright (C) 1986-2012, Dave Pare, Jeff Bailey, Thomas Ruschak,
* Ken Stevens, Steve McClure, Markus Armbruster
*
* Empire is free software: you can redistribute it and/or modify
pr("Illegal status\n");
return RET_SYN;
}
+ if (stat == STAT_UNUSED
+ ? natp->nat_stat >= STAT_SANCT : natp->nat_stat != STAT_UNUSED) {
+ pr("Country %s (#%d) status is %s.\n"
+ "%s it in this state is normally a bad idea.",
+ natp->nat_cnam, natp->nat_cnum,
+ symbol_by_value(natp->nat_stat, nation_status),
+ stat == STAT_UNUSED ? "Deleting" : "Replacing");
+ if (!askyn("Are you sure? "))
+ return RET_FAIL;
+ }
+ if (getplayer(natp->nat_cnum)) {
+ pr("%s (#%d) is logged in!\n",
+ natp->nat_cnam, natp->nat_cnum);
+ return RET_FAIL;
+ }
nat_reset(natp, natp->nat_cnum, cntryname, pname, stat);
putnat(natp);
return 0;