15.326
Bearbeitungen
(+ Karte()) |
(Karte() mit wik.getArgs) |
||
| Zeile 3: | Zeile 3: | ||
local com = require("Modul:Common") | local com = require("Modul:Common") | ||
local str = require("Modul:String") | local str = require("Modul:String") | ||
local wik = require("Modul:Wiki") | |||
function p.Karte(frame) | function p.Karte(frame) | ||
return p.karte(frame, | -- nur die benötigten Argumente übernehmen | ||
local args = { | |||
"lat", "lon", "location", "locationlist", "geojson", "geocode", | |||
"zoom", "popuptitle", "popuptext", | |||
"box", "headline", "width", "height", | |||
"noattr", "form"} | |||
args = wik.getArgs(frame.args, args) | |||
return p.karte(frame, args) | |||
end | end | ||
| Zeile 13: | Zeile 21: | ||
local t = "" | local t = "" | ||
-- geocode location and locationlist | |||
local subobjects = {} | |||
local minimum_one_geocode_ok = false | |||
if not com.isTrue(args["Ehemals"]) then | |||
local loc = str.splitAndStrip(args["locationlist"] or "", ";") | |||
if args["location"] ~= nil then | |||
table.insert(loc, args["location"]) | |||
end | end | ||
for _, l in ipairs(loc) do | |||
local subobject_entry = {} | |||
subobject_entry["Geolokation"] = l | |||
local geocode = frame:callParserFunction("#geocode", | local geocode = frame:callParserFunction("#geocode", l) | ||
if geocode ~= "Geocoding failed" then | if geocode ~= "Geocoding failed" then | ||
subobject_entry["Geokoordinate"] = geocode | subobject_entry["Geokoordinate"] = geocode | ||
minimum_one_geocode_ok = true | |||
end | end | ||
table.insert(subobjects, subobject_entry) | |||
end | end | ||
end | |||
-- geocode lon/lat | |||
if (not minimum_one_geocode_ok or com.isTrue(args["Ehemals"])) and args["lat"] ~= nil and args["lon"] ~= nil then | |||
local geocode = frame:callParserFunction("#geocode", args["lat"] .. "," .. args["lon"]) | |||
if geocode ~= "Geocoding failed" then | |||
local subobject_entry = {} | |||
subobject_entry["Geokoordinate"] = geocode | |||
one_geocode_ok = true | |||
table.insert(subobjects, subobject_entry) | |||
end | end | ||
end | |||
mw.logObject(subobjects, "subobjects") | |||
-- subobjects setzen | |||
for _, s in ipairs(subobjects) do | |||
s["SubObjektTyp"] = "Geo" | |||
mw.smw.subobject(s, s["Geolokation"] or s["Geokoordinate"]) | |||
end | |||
-- bisherige Vorlagen-Karte | |||
t = frame:expandTemplate{title = "Karte/Legacy", args = args} | |||
mw.logObject(t, "t") | mw.logObject(t, "t") | ||