aelve/guide
1
1
Fork 0
mirror of https://github.com/aelve/guide.git synced 2024-11-23 12:15:06 +03:00
Code Issues Projects Releases Wiki Activity

Nicer listing of edits

Browse Source
This commit is contained in:
Artyom 2016-05-25 23:57:12 +03:00
parent e1a6245afc
commit 412d3611c8
2 changed files with 15 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/View.hs
View File

@ -313,10 +313,10 @@ renderEdits globalState edits = do
JS.undoBlock (editId (editBlock ^?! _head._1._2),
editId (editBlock ^?! _last._1._2),
blockNode)
ul_ $ do
for_ editBlock $ \((edit, EditDetails{..}), mbErr) -> li_ $ do
for_ editBlock $ \((edit, EditDetails{..}), mbErr) ->
div_ [class_ "edit"] $ do
editNode <- thisNode
p_ $ do
p_ [class_ "edit-info"] $ do
toHtml =<< liftIO (humanReadableTime editDate)
emptySpan "1em"
textButton "accept" $

12
static/admin.css
View File

@ -31,6 +31,18 @@ textarea:focus {
outline: 0px none;
border: 1px solid #07C; }
.edit {
padding: 0.3em 1em;
margin: 1em 0.5em;
box-shadow: 0 1px 5px rgba(0,0,0,0.12), 0 1px 2px rgba(0,0,0,0.24); }
.edit-info {
color: gray;
opacity: 0.8; }
#edits > * > h2 {
margin-top: 3em; }
#edits table {
width: 100%;
border: none;