tests: New test-suite-only command __cmd

[empserver] / src / lib / player / init_nats.c

diff --git a/src/lib/player/init_nats.c b/src/lib/player/init_nats.c
index bc054f7020025cf9a3b1343574aed79690c14b83..705229be4fdd2f28a9ba0b25cec3285b9e5e75e2 100644 (file)
--- a/src/lib/player/init_nats.c
+++ b/src/lib/player/init_nats.c
@@ -29,7 +29,7 @@
  *  Known contributors to this file:
  *     Dave Pare, 1994
  *     Steve McClure, 2000
- *     Markus Armbruster, 2007-2012
+ *     Markus Armbruster, 2007-2014
  */
 
 #include <config.h>
@@ -81,6 +81,8 @@ player_set_nstat(struct player *pl, struct natstr *np)
        pl->nstat |= MONEY;
     if (np->nat_stat == STAT_ACTIVE && !influx(np))
        pl->nstat |= CAP;
+    if (running_test_suite)
+       pl->nstat |= TESTING;
     pl->nstat |= EXEC;
     return pl->nstat;
 }