From 918057aa90758dac90523eff79c53cb69b7e4595 Mon Sep 17 00:00:00 2001
From: Enno Rehling <enno@eressea.de>
Date: Mon, 3 Jan 2005 22:09:33 +0000
Subject: [PATCH] Man kann von lua aus regionen versetzen. Ich muss mal wieder
 Weltkosmetik betreiben, weild er Mapper Dinge in alte Welten setzt.

---
 src/eressea/lua/region.cpp | 27 +++++++++++++++++++++++++++
 1 file changed, 27 insertions(+)

diff --git a/src/eressea/lua/region.cpp b/src/eressea/lua/region.cpp
index a735ae889..9bcbd639c 100644
--- a/src/eressea/lua/region.cpp
+++ b/src/eressea/lua/region.cpp
@@ -187,12 +187,38 @@ region_remove(region& r)
         }
       }
 #endif
+      runhash(&r);
       break;
     }
     rp = &(*rp)->next;
   }
 }
 
+void
+region_move(region& r, int x, int y)
+{
+#ifdef FAST_CONNECT
+  direction_t dir;
+  for (dir=0;dir!=MAXDIRECTIONS;++dir) {
+    region * rn = r.connect[dir];
+    if (rn!=NULL) {
+      direction_t reldir = reldirection(rn, &r);
+      rn->connect[reldir] = NULL;
+    }
+    rn = findregion(x+delta_x[dir], y+delta_y[dir]);
+    if (rn!=NULL) {
+      direction_t reldir = reldirection(rn, &r);
+      rn->connect[reldir] = &r;
+    }
+    r.connect[dir] = rn;
+  }
+#endif
+  runhash(&r);
+  r.x = x;
+  r.y = y;
+  rhash(&r);
+}
+
 void
 bind_region(lua_State * L) 
 {
@@ -214,6 +240,7 @@ bind_region(lua_State * L)
     .def("set_flag", &region_setflag)
 
     .def("remove", &region_remove)
+    .def("move", &region_move)
 
     .def("get_road", &region_getroad)
     .def("set_road", &region_setroad)