Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

because we can that's why

  • Loading branch information...
commit be29bfda2eb37c08c7bdb89f605d642276c9964b 1 parent 6bc1e7d
@dag authored
Showing with 3 additions and 2 deletions.
  1. +1 −1  happaste.cabal
  2. +2 −1  src/Happaste/Html.hs
View
2  happaste.cabal
@@ -49,7 +49,7 @@ Executable happaste
happstack-hsp == 7.0.*,
happstack-jmacro == 7.0.*,
happstack-server == 7.0.*,
- haskell-src-exts == 1.13.*,
+ haskell-src-exts == 1.13.* && >= 1.13.1,
haskell-src-meta == 0.5.* && >= 0.5.1.2,
highlighter == 0.2.*,
hslogger == 1.1.*,
View
3  src/Happaste/Html.hs
@@ -85,7 +85,8 @@ newPasteForm f =
</%>
recentPastesList :: Template
-recentPastesList = query RecentPastes >>= \ps ->
+recentPastesList = do
+ ps <- query RecentPastes
<ol class="recent-pastes">
<% each ps $ \(k,p) ->
<li><a href=(ShowPaste k) class="pjax"><% p ^. fileName %></a></li>
Please sign in to comment.
Something went wrong with that request. Please try again.