Remove remainder of old the tunnel implementation with b:add_action().

scripts/eressea/tunnels.lua

@@ -1,3 +1,4 @@
+-- Weltentor portal module
 local tunnels = {}
 
 local buildings = {}
@@ -24,25 +25,15 @@ local function get_target(param)
 end
 
 local function tunnel_action(b, param)
-  local r = nil
-  if tonumber(param)~=nil then
-    r = get_region_by_id(tonumber(param))
-  end
   local units = tunnel_travelers(b)
-  if units~=nil then
+  local rto = get_target(param)
+  if rto and units then
     eressea.log.debug("Tunnel from " .. tostring(b) .. " [" .. param .. "]")
     for key, u in pairs(units) do
-      local rto = r
-      if r==nil then
-        rto = get_target(param)
-      end
-      if rto~=nil then
         u.region = rto
         eressea.log.debug("teleported " .. tostring(u) .. " to " .. tostring(rto))
-      end
     end
   end
-  return 1 -- return 0 to destroy
 end
 
 function tunnels.init()

scripts/tools/wormholes.lua

@@ -1,52 +0,0 @@
--- create a fixed path to a specific region
-local function create_path(from, to)
-  local param = tostring(to.uid)
-  local b = building.create(from, "portal")
-  b.name = "Weltentor"
-  b.size = 1
-  b:add_action("tunnel_action", param)
-end
-
--- create a wonky tunnel wth more than one exit
-local function create_tunnel(from, param)
-  local b = building.create(from, "portal")
-  b.name = "Weltentor"
-  b.size = 1
-  b:add_action("tunnel_action", param)
-end
-
--- make a tunnel from the cursor to the first selected region
-function mktunnel()
-  local from = gmtool.get_cursor()
-  local to = gmtool.get_selection()()
-  if to~=nil then
-    region.create(from.x, from.y, "glacier")
-    create_tunnel(from, to)
-    gmtool.select(to, 0)
-    gmtool.highlight(to, 1)
-  end
-end
-
--- turn all selected regions into targets for a wonky tunnel ("tnnL")
-function mkanchors()
-  for r in gmtool.get_selection() do
-    if not r:get_key("tnnL") then
-      r:set_key("tnnL", true)
-      if r:get_flag(0) then
-        -- RF_CHAOTIC gets removed
-        r:set_flag(0, false)
-      end
-      r:set_resource("peasant", r:get_resource("peasant") + 1)
-    end
-  end
-end
-
--- region.create and prepare all hell-regions to become wonky gates
-function mkgates()
-  for r in regions() do
-    if r.plane_id==0 and r.terrain=="hell" then
-      create_tunnel(r, "tnnL")
-      region.create(r.x, r.y, "glacier")
-    end
-  end
-end