haskell/stackage-server
1
0
Fork 0
mirror of https://github.com/commercialhaskell/stackage-server.git synced 2026-02-05 07:40:26 +01:00
Code Issues Actions Packages Projects Releases Wiki Activity

Improve styling a bit

Browse Source
This commit is contained in:
Michael Snoyman 2015-01-05 10:46:36 +02:00
parent a9131a7cdd
commit cb9736f50b
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
Handler/Hoogle.hs
View File

@ -35,9 +35,10 @@ getHoogleR slug = do
Nothing -> (>>= sendResponse) $ defaultLayout $ do Nothing -> (>>= sendResponse) $ defaultLayout $ do
setTitle "Hoogle database not available" setTitle "Hoogle database not available"
[whamlet| [whamlet|
<p>The given Hoogle database is not available. <div .container>
<p> <p>The given Hoogle database is not available.
<a href=@{SnapshotR slug StackageHomeR}>Return to snapshot homepage <p>
<a href=@{SnapshotR slug StackageHomeR}>Return to snapshot homepage
|] |]
mresults <- case mquery of mresults <- case mquery of