From 3ae7439fd8a2f9a8b4359b00ef3b0808aa45f9d4 Mon Sep 17 00:00:00 2001 From: Lars-Dominik Braun Date: Tue, 28 Apr 2015 11:10:30 +0200 Subject: Pretty popup --- Main.hs | 13 ++++++------- 1 file changed, 6 insertions(+), 7 deletions(-) (limited to 'Main.hs') diff --git a/Main.hs b/Main.hs index 1d5195a..8b0229c 100644 --- a/Main.hs +++ b/Main.hs @@ -210,13 +210,12 @@ page db attrib = doctypehtml_ $ do div_ [id_ "background"] "" div_ [id_ "popup"] $ do h2_ "" - p_ [class_ "subtitle"] "" - p_ [class_ "ref"] $ do - span_ [class_ "year"] "" - ", " - a_ [class_ "doi"] "" - ", " - a_ [class_ "scholar"] "Scholar" + p_ [class_ "longname"] "" + ul_ [class_ "ref"] $ do + li_ [class_ "title"] "" + li_ [class_ "year"] "" + li_ $ a_ [class_ "doi"] "" + li_ $ a_ [class_ "scholar"] "Scholar" p_ [class_ "description"] "" extjs "script.js" -- cgit v1.2.3