[Fencommits] fenserve: pointer over the button looks like over a link
Tuukka Hastrup
Tuukka.Hastrup at iki.fi
Wed May 23 15:31:25 EEST 2007
Wed May 23 15:29:50 EEST 2007 Tuukka Hastrup <Tuukka.Hastrup at iki.fi>
* pointer over the button looks like over a link
diff -rN -u old-fenserve/fendata/Main.hs new-fenserve/fendata/Main.hs
--- old-fenserve/fendata/Main.hs 2007-05-23 15:31:25.000000000 +0300
+++ new-fenserve/fendata/Main.hs 2007-05-23 15:31:25.000000000 +0300
@@ -394,7 +394,7 @@
\<input type=hidden name=item value='"++show id++"'>\
\<a href='item/"++show id++"'>[Edit item]</a>\
\<span style='margin-left: 0.7em; margin-right: 0.4em; font-weight: bold'>·</span>\
- \<button style='background: none; border: none; font: inherit; margin: 0; padding: 0'>[Delete item]</button></form><hr>") . ("<p>"++)
+ \<button style='cursor: pointer; background: none; border: none; font: inherit; margin: 0; padding: 0'>[Delete item]</button></form><hr>") . ("<p>"++)
. concatFor (Map.toList fields) $ \(f:fs,v) ->
"<b>" ++ (toUpper f : fs) ++ ":</b> " ++ v ++ "<br>",
s) where new = concatFor (Map.keys $ stateSchema s) $ \cat ->
More information about the Fencommits
mailing list