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

Minor (edit some words)

Browse Source
This commit is contained in:
Artyom 2016-02-25 23:06:09 +03:00
parent f558b7d12f
commit b44f0274f8
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/Main.hs
View File

@ -441,7 +441,7 @@ renderItemInfo editable item =
Just l -> " (" >> a_ [href_ l] "site" >> ")"
Nothing -> return ()
emptySpan "1em"
textButton "edit" $
textButton "edit details" $
JS.setItemInfoMode (this, item^.uid, InEdit)
InEdit -> do
let handler s = JS.submitItemInfo (this, item^.uid, s)
@ -461,7 +461,7 @@ renderItemInfo editable item =
input_ [type_ "text", name_ "link",
value_ (fromMaybe "" (item^.link))]
br_ []
input_ [type_ "submit", value_ "Submit"]
input_ [type_ "submit", value_ "Save"]
button "Cancel" [] $
JS.setItemInfoMode (this, item^.uid, Editable)