content menu moved to xml (no icons yet)

res/layouts/pages/add_packs.xml

@@ -0,0 +1,6 @@
+<panel size='550' color='0' padding='8' interval='5'>
+    <panel id='packs_panel' size='540,10' color='0,0,0,50' max-length='400'>
+        <!-- content is generated in script -->
+    </panel>
+    <button onclick='menu:back()' padding='10'>@Back</button>
+</panel>

res/layouts/pages/add_packs.xml.lua

@@ -0,0 +1,14 @@
+function add_pack(packid, packinfo)
+    local callback = string.format('core.add_packs({%q})', packid)
+    packinfo.id = packid
+    packinfo.callback = callback
+    packinfo.icon = "gui/no_icon"
+    document.packs_panel:add(gui.template("pack", packinfo))
+end
+
+function on_open()
+    local packs = pack.get_available()
+    for i,id in ipairs(packs) do
+        add_pack(id, pack.get_info(id))
+    end
+end

res/layouts/pages/content.xml

@@ -1,6 +1,7 @@
 <panel size='550' color='0' padding='8' interval='5'>
     <panel id='packs_panel' size='540,10' color='0,0,0,50' max-length='400'>
-         <!-- content is generated in script -->
+        <!-- content is generated in script -->
     </panel>
+    <button onclick='menu.page = "add_packs"' padding='10'>@Add</button>
     <button onclick='menu:back()' padding='10'>@Back</button>
 </panel>

res/layouts/pages/content.xml.lua

@@ -1,12 +1,15 @@
 function add_pack(packid, packinfo)
-    document.packs_panel:add(gui.template("pack", {
-        id=packid,
-        title=packinfo.title,
-        description=packinfo.description,
-        icon="gui/no_icon",
-        creator=packinfo.creator,
-        remover='0'
-    }))
+    local remover = ''
+    if packid ~= "base" then
+        remover = string.format('core.remove_packs({%q})', packid)
+    end
+    if packinfo.has_indices then
+        packid = packid.."*"
+    end
+    packinfo.id = packid
+    packinfo.remover = remover
+    packinfo.icon = "gui/no_icon"
+    document.packs_panel:add(gui.template("pack", packinfo))
 end
 
 function on_open()

res/scripts/stdlib.lua

@@ -204,7 +204,8 @@ end
 function gui.template(name, params)
     local text = file.read(file.find("layouts/templates/"..name..".xml"))
     for k,v in pairs(params) do
-        text = text:gsub("(%%{"..k.."})", tostring(v))
+        local arg = tostring(v):gsub("'", "\\'"):gsub('"', '\\"')
+        text = text:gsub("(%%{"..k.."})", arg)
     end
     text = text:gsub("if%s*=%s*'%%{%w+}'", "if=''")
     text = text:gsub("if%s*=%s*\"%%{%w+}\"", "if=\"\"")