Skip to content
Browse files

Add license

  • Loading branch information...
1 parent c43c6fb commit 733b7af62958db90d7919bc9d3aaf65ad17aa689 @gregorycollins committed
Showing with 32 additions and 5 deletions.
  1. +2 −0 .gitignore
  2. +25 −0 LICENSE
  3. +3 −3 src/Homepage/Handlers.hs
  4. +2 −2 templates/home.st
View
2 .gitignore
@@ -1,3 +1,5 @@
dist/**
dist
*~
+.DS_Store
+**/.DS_Store
View
25 LICENSE
@@ -0,0 +1,25 @@
+Copyright (c) 2009, Gregory David Collins
+All rights reserved.
+
+Redistribution and use in source and binary forms, with or without
+modification, are permitted provided that the following conditions are met:
+ * Redistributions of source code must retain the above copyright
+ notice, this list of conditions and the following disclaimer.
+ * Redistributions in binary form must reproduce the above copyright
+ notice, this list of conditions and the following disclaimer in the
+ documentation and/or other materials provided with the distribution.
+ * Neither the name of Gregory David Collins nor the
+ names of its contributors may be used to endorse or promote products
+ derived from this software without specific prior written permission.
+
+THIS SOFTWARE IS PROVIDED "AS IS" AND ANY EXPRESS OR IMPLIED
+WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
+MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
+DISCLAIMED. IN NO EVENT SHALL GREGORY DAVID COLLINS BE LIABLE FOR ANY
+DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
+GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER
+IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
+OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
+ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
View
6 src/Homepage/Handlers.hs
@@ -44,7 +44,7 @@ aboutpage :: HomepageHandler
aboutpage =
exactdir "/about" $ do
serveTemplate' "." "about" (setAttribute "whichCss"
- ("posts" :: String))
+ ("posts" :: String))
temporaryPosts :: HomepageHandler
@@ -62,9 +62,9 @@ temporaryPosts = do
\http://www.happstack.com/\">happstack</a> \
\web framework to power a simple personal \
\website.")
- , ("postDate", "march 26, 2009") ]
+ , ("postDate", "march 28, 2009") ]
- exactdir "/posts/2009/03/26/building-a-website-part-1" $
+ exactdir "/posts/2009/03/28/building-a-website-part-1" $
serveTemplate' "." "post" (setManyAttrib attrs)
View
4 templates/home.st
@@ -18,9 +18,9 @@ $htmlheader()$
<h2>posts</h2>
<table>
<tr>
- <td class="date">march 26, 2009</td>
+ <td class="date">march 28, 2009</td>
<td class="title">
- <a href="/posts/2009/03/26/building-a-website-part-1">Building
+ <a href="/posts/2009/03/28/building-a-website-part-1">Building
a website with Haskell, part 1</a>
</td>
<td class="summary">

0 comments on commit 733b7af

Please sign in to comment.
Something went wrong with that request. Please try again.