From a89dc76b6a861f2579ba57b6cbb0bdb341484c45 Mon Sep 17 00:00:00 2001
From: Benjamin Barenblat <bbaren@mit.edu>
Date: Sat, 2 Mar 2013 20:44:07 -0500
Subject: Move forum page generation to separate library

---
 forum/forum.ur  | 28 ++++++++++++++++++++++++++++
 forum/forum.urs | 19 +++++++++++++++++++
 forum/lib.urp   |  2 ++
 3 files changed, 49 insertions(+)
 create mode 100644 forum/forum.ur
 create mode 100644 forum/forum.urs
 create mode 100644 forum/lib.urp

(limited to 'forum')

diff --git a/forum/forum.ur b/forum/forum.ur
new file mode 100644
index 0000000..f680ec4
--- /dev/null
+++ b/forum/forum.ur
@@ -0,0 +1,28 @@
+(* Forum -- forum subapp
+Copyright (C) 2013  Benjamin Barenblat <bbaren@mit.edu>
+
+This file is a part of 6.947.
+
+6.947 is is free software: you can redistribute it and/or modify it under the
+terms of the GNU Affero General Public License as published by the Free
+Software Foundation, either version 3 of the License, or (at your option) any
+later version.
+
+6.947 is distributed in the hope that it will be useful, but WITHOUT ANY
+WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A
+PARTICULAR PURPOSE.  See the GNU Affero General Public License for more
+details.
+
+You should have received a copy of the GNU Affero General Public License along
+with 6.947.  If not, see <http://www.gnu.org/licenses/>. *)
+
+open Styles
+
+fun main () : xbody =
+    <xml>
+      <div class={content}>
+	<p>
+	  Coming soon!
+	</p>
+      </div>
+    </xml>
diff --git a/forum/forum.urs b/forum/forum.urs
new file mode 100644
index 0000000..1dad9a7
--- /dev/null
+++ b/forum/forum.urs
@@ -0,0 +1,19 @@
+(* Forum -- forum subapp
+Copyright (C) 2013  Benjamin Barenblat <bbaren@mit.edu>
+
+This file is a part of 6.947.
+
+6.947 is is free software: you can redistribute it and/or modify it under the
+terms of the GNU Affero General Public License as published by the Free
+Software Foundation, either version 3 of the License, or (at your option) any
+later version.
+
+6.947 is distributed in the hope that it will be useful, but WITHOUT ANY
+WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A
+PARTICULAR PURPOSE.  See the GNU Affero General Public License for more
+details.
+
+You should have received a copy of the GNU Affero General Public License along
+with 6.947.  If not, see <http://www.gnu.org/licenses/>. *)
+
+val main : unit -> xbody
diff --git a/forum/lib.urp b/forum/lib.urp
new file mode 100644
index 0000000..9e01f09
--- /dev/null
+++ b/forum/lib.urp
@@ -0,0 +1,2 @@
+../styles
+forum
-- 
cgit v1.2.3