diff options
Diffstat (limited to 'Utility/Format.hs')
-rw-r--r-- | Utility/Format.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Utility/Format.hs b/Utility/Format.hs index 79e94ae96..1d96695ed 100644 --- a/Utility/Format.hs +++ b/Utility/Format.hs @@ -94,7 +94,7 @@ gen = filter (not . empty) . fuse [] . scan [] . decode_c | i < 0 = LeftJustified (-1 * i) | otherwise = RightJustified i novar v = "${" ++ reverse v - foundvar f v p cs = scan (Var (reverse v) p : f) cs + foundvar f v p = scan (Var (reverse v) p : f) empty :: Frag -> Bool empty (Const "") = True |