From 39318169e0b50551db511851829f9337c5fa6313 Mon Sep 17 00:00:00 2001
From: glenda <glenda@9front.local>
Date: Sun, 15 Nov 2020 15:13:27 +0000
Subject: Import site to git

---
 tpl/_debug.tpl | 29 +++++++++++++++++++++++++++++
 1 file changed, 29 insertions(+)
 create mode 100644 tpl/_debug.tpl

(limited to 'tpl/_debug.tpl')

diff --git a/tpl/_debug.tpl b/tpl/_debug.tpl
new file mode 100644
index 0000000..4d650ea
--- /dev/null
+++ b/tpl/_debug.tpl
@@ -0,0 +1,29 @@
+% if(! ~ $#debug_shell 0) {
+<form method="POST" name="prompt">
+<input size="80" type="text" name="command" value="%($"post_arg_command%)">
+<input type="submit" Value="Run">
+</form>
+<script language="javascript"><!--
+document.prompt.command.focus()
+//--></script>
+
+%{
+fn evl {
+    # Buffering is probably messing this up:
+    #rc -c 'flag x +;{'^$post_arg_command'} |[2] awk ''{print ">> "$0}'''
+    rc -c 'flag s +; flag x +;'^$post_arg_command
+}
+    if(! ~ $#post_arg_command 0 && ! ~ $#post_arg_command '') {
+        echo '<hr><pre>'
+        evl | escape_html |[2] awk '{print "<b>"$0"</b>"}' 
+        echo '</pre>'
+    }
+%}
+% }
+
+<hr><pre>
+% env | escape_html
+</pre><hr>
+
+% umask
+
-- 
cgit v1.2.3