summaryrefslogtreecommitdiffstats
path: root/skins-read-html.lsp
diff options
context:
space:
mode:
authorMika Havela <mika.havela@gmail.com>2007-12-20 14:09:36 +0000
committerMika Havela <mika.havela@gmail.com>2007-12-20 14:09:36 +0000
commit790fc5c495d8f5dc428fdd8964500e24d7bd2014 (patch)
treecaf8a84f4fa780d80c0296c7e05e4c3f6315d022 /skins-read-html.lsp
parent1ab9d16c73cce05f6c4488b22fd40ac4d228a9fd (diff)
downloadacf-alpine-baselayout-790fc5c495d8f5dc428fdd8964500e24d7bd2014.tar.bz2
acf-alpine-baselayout-790fc5c495d8f5dc428fdd8964500e24d7bd2014.tar.xz
Gives you alternative to change skin
git-svn-id: svn://svn.alpinelinux.org/acf/alpine-baselayout/trunk@427 ab2d0c66-481e-0410-8bed-d214d4d58bed
Diffstat (limited to 'skins-read-html.lsp')
-rw-r--r--skins-read-html.lsp16
1 files changed, 16 insertions, 0 deletions
diff --git a/skins-read-html.lsp b/skins-read-html.lsp
new file mode 100644
index 0000000..690d339
--- /dev/null
+++ b/skins-read-html.lsp
@@ -0,0 +1,16 @@
+<? local view = ... ?>
+<html>
+<body>
+<h1>Available skins</h1>
+
+<? for i = 1, table.maxn(view.skin) do ?>
+ <dt><?= view.skin[i].name ?></dt>
+ <? if (view.skin[i].inuse) then ?>
+ <dd><?= view.skin[i].inuse ?></dd>
+ <? else ?>
+ <dd>[<a href="update?skin=<?= view.skin[i].name ?>">use this skin</a>]</dd>
+ <? end ?>
+<? end ?>
+
+</body>
+</html>