X-Git-Url: http://git.plutz.net/?p=busy;a=blobdiff_plain;f=templates%2FWiki_edit.page;fp=templates%2FWiki_edit.page;h=a803ca9deae2f29b820bc026ee5baa32247f454e;hp=0000000000000000000000000000000000000000;hb=f485895094cd72318b46f39689c3ba954eb37411;hpb=904730d1782749bfac15b0344fe5782433f3099b

diff --git a/templates/Wiki_edit.page b/templates/Wiki_edit.page
new file mode 100755
index 0000000..a803ca9
--- /dev/null
+++ b/templates/Wiki_edit.page
@@ -0,0 +1,33 @@
+#!/bin/zsh
+
+list_comments() {
+  base="$1"
+  
+  stat -c '' Wiki/${base}.comment.<0000000001-9999999999>_<000-999> \
+  && for each in $(ls -c Wiki/${base}.comment.<0000000001-9999999999>_<000-999>); do
+    author=$(grep -m1 '^author=' "$each" |cut -d= -f2-)
+    echo "<div class='comment'><h1>$author wrote:</h1><div class='wikitext'>"
+    tail -n+2 $each |_wiki
+    echo '</div></div>'
+  done
+}
+
+cat <<WikiEND
+    <form class="edit" action="/?action=wikiedit&i=$edit" method="post" accept-charset="UTF-8">
+      <div id="LEFT">
+	Editing <b>$title</b><br>
+        <input type="submit" value="Submit">
+        <input type="submit" name="cancel" value="Cancel">
+	<hr>
+      </div>
+      <div id="MAIN">
+	<div class="wiki">
+          <h1>$title</h1>
+          <textarea name="page" rows=30 cols=40>$(cat "$_DATA/Wiki/${edit}${rev}")</textarea>
+        </div>
+      </div>
+    </form>
+    <div id="RIGHT">
+    $(list_comments $edit)
+    </div>
+WikiEND