/*
* Empire - A multi-player, client/server Internet based war game.
- * Copyright (C) 1986-2011, Dave Pare, Jeff Bailey, Thomas Ruschak,
+ * Copyright (C) 1986-2018, Dave Pare, Jeff Bailey, Thomas Ruschak,
* Ken Stevens, Steve McClure, Markus Armbruster
*
* Empire is free software: you can redistribute it and/or modify
*
* Known contributors to this file:
* Steve McClure, 2000
- * Markus Armbruster, 2004-2011
+ * Markus Armbruster, 2004-2016
*/
#include <config.h>
case 'v':
stat = STAT_VIS;
break;
- case 'n':
- pr("Argument 'new' is deprecated and will go away in a future release.\n"
- "Use 'player' instead.\n");
- /* fall through */
case 'p':
stat = STAT_NEW;
break;
pr("Illegal status\n");
return RET_SYN;
}
+ if (stat == STAT_UNUSED
+ ? natp->nat_stat >= STAT_SANCT : natp->nat_stat != STAT_UNUSED) {
+ pr("Country %s status is %s.\n"
+ "%s it in this state is normally a bad idea.",
+ prnat(natp), 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);
+ pr("%s is logged in!\n", prnat(natp));
return RET_FAIL;
}
- nat_reset(natp, natp->nat_cnum, cntryname, pname, stat);
- putnat(natp);
- return 0;
+
+ nat_reset(natp->nat_cnum, cntryname, pname, stat);
+ return RET_OK;
}