From 96c5edd76d844cb44088529013da881b9811e472 Mon Sep 17 00:00:00 2001
From: Enno Rehling <enno@eressea.de>
Date: Sat, 12 Oct 2002 09:28:21 +0000
Subject: [PATCH] Der Inselgenerator macht manchmal beschissene Inseln, da kann
 ich im Moment nix dran tun...

---
 src/mapper/autoseed.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/mapper/autoseed.c b/src/mapper/autoseed.c
index aa8d51357..64cedc40c 100644
--- a/src/mapper/autoseed.c
+++ b/src/mapper/autoseed.c
@@ -330,7 +330,7 @@ mkisland(int nsize)
 	terraform(r, T_OCEAN);
 	add_regionlist(&rlist, r);
 	rsize = 1;
-	while (nsize) {
+	while (nsize && rsize) {
 		int i = rand() % rsize;
 		regionlist ** rnext = &rlist;
 		direction_t d;