Add missing expansion island

The number of islands was off by one.  The last island was
created, but not actually placed on the map.

diff --git a/src/util/fairland.c b/src/util/fairland.c
index d7802add01d2d32f234a48931fdfe146aabe6387..104aa9df787f3be1488e1a639795a270e7f476cc 100644 (file)
--- a/src/util/fairland.c
+++ b/src/util/fairland.c
@@ -832,7 +832,7 @@ grow_islands(void)
        find_coast(c);
        qprint(" %d(%d)", c - nc + 1, secs);
        isecs[c] = secs;
        find_coast(c);
        qprint(" %d(%d)", c - nc + 1, secs);
        isecs[c] = secs;

-       ctot = c;
+       ctot++;

     }
 }
 
     }
 }