diff options
| author | Joris Guyonvarch | 2015-08-01 00:37:19 +0200 |
|---|---|---|
| committer | Joris Guyonvarch | 2015-08-01 00:37:19 +0200 |
| commit | cd7ca2fcc7a2f4a10235f8807a89c8d6549b99bf (patch) | |
| tree | 8c7c1355fc390ed7c40e1ed08a1ad17b859fc140 /src/server/Design | |
| parent | c345f9daa28e0c174b35413addf78df0a793f8c1 (diff) | |
| download | budget-cd7ca2fcc7a2f4a10235f8807a89c8d6549b99bf.tar.gz budget-cd7ca2fcc7a2f4a10235f8807a89c8d6549b99bf.tar.bz2 budget-cd7ca2fcc7a2f4a10235f8807a89c8d6549b99bf.zip | |
Fixing percent computation for add payment labels
Diffstat (limited to 'src/server/Design')
| -rw-r--r-- | src/server/Design/Global.hs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/server/Design/Global.hs b/src/server/Design/Global.hs index ebe7ad7..25b7d95 100644 --- a/src/server/Design/Global.hs +++ b/src/server/Design/Global.hs @@ -53,7 +53,7 @@ global = do ".payments" ? do form # ".add" ? do let inputHeight = 40 - width (pct 60) + width (pct 80) marginLeft auto marginRight auto marginBottom (px 45) @@ -61,8 +61,9 @@ global = do ".name" <> ".cost" ? do position relative - width (pct 50) + width (pct 49) label ? do + display inlineBlock width (pct 25) paddingRight (pct 5) input ? defaultInput inputHeight |