diff options
author | Gregor Kleen <gkleen@yggdrasil.li> | 2017-07-29 22:46:35 +0200 |
---|---|---|
committer | Gregor Kleen <gkleen@yggdrasil.li> | 2017-07-29 22:46:35 +0200 |
commit | 98743e691390a63853364763007a52c13ed5382f (patch) | |
tree | 2c817ec6c806556dec0d0ff115202914a7ea10cc /Handler/Common.hs | |
parent | 56d759069b45f1ea7bafc7f7d89ae0d99ce7f545 (diff) | |
download | bar-98743e691390a63853364763007a52c13ed5382f.tar bar-98743e691390a63853364763007a52c13ed5382f.tar.gz bar-98743e691390a63853364763007a52c13ed5382f.tar.bz2 bar-98743e691390a63853364763007a52c13ed5382f.tar.xz bar-98743e691390a63853364763007a52c13ed5382f.zip |
Slightly tweak field widths
Diffstat (limited to 'Handler/Common.hs')
-rw-r--r-- | Handler/Common.hs | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/Handler/Common.hs b/Handler/Common.hs index 73ce9ba..29a8060 100644 --- a/Handler/Common.hs +++ b/Handler/Common.hs | |||
@@ -240,6 +240,13 @@ typedKindField collate (kindProto, typeProto) = do | |||
240 | }) ; | 240 | }) ; |
241 | }); | 241 | }); |
242 | |] | 242 | |] |
243 | toWidget $ | ||
244 | [cassius| | ||
245 | ##{fvId kindView} | ||
246 | width: 12em | ||
247 | ##{fvId typeView} | ||
248 | width: 8em | ||
249 | |] | ||
243 | let | 250 | let |
244 | kindWidget = | 251 | kindWidget = |
245 | [whamlet| | 252 | [whamlet| |