FIX: Add missing files apps-list.reb, delete.reb

metaeducation · Aug 27, 2019 · 36ff439 · 36ff439
1 parent 08f7565
commit 36ff439
Show file tree

Hide file tree

Showing 3 changed files with 11 additions and 1 deletion.
diff --git a/assets-src/apps/apps-list.reb b/assets-src/apps/apps-list.reb
@@ -0,0 +1,3 @@
+<r3-console>
+  https://github.com/hostilefork/replpad-js
+  "Interactive Web Console for Rebol language (Ren-C branch)"
diff --git a/assets-src/apps/delete.reb b/assets-src/apps/delete.reb
@@ -0,0 +1,7 @@
+function [request] [
+  query: parse-query request/query-string
+  ?? name: clean-path join %apps/ select query "name"
+  delete-recur name
+  {<meta http-equiv="Refresh" content="0; url=/apps/" />}
+]
+
diff --git a/assets-src/apps/index.reb b/assets-src/apps/index.reb
@@ -17,7 +17,7 @@ function [request] [
   }
   for-each x read cwd [
     if dir? x [
-      emit ?? reword
+      emit reword
         {<a href='delete.reb?name=$t'>[&ndash;]</a>
           <a href='$x'>$t</a> <br>
         }