diff options
author | Alexander Krotov <ilabdsf@gmail.com> | 2018-09-11 11:49:30 +0300 |
---|---|---|
committer | Alexander Krotov <ilabdsf@gmail.com> | 2018-09-11 11:49:30 +0300 |
commit | 97f6833ee58667defbf4f203ebd69f5062232563 (patch) | |
tree | ef8bb9c94c4df1d4d1ad8cf7ab521bf2167e9430 /src/Text | |
parent | 165a61095c08794d1639a683f1c6f1a82387c8d5 (diff) | |
download | pandoc-97f6833ee58667defbf4f203ebd69f5062232563.tar.gz |
Muse writer: use "" instead of [] for empty String
Diffstat (limited to 'src/Text')
-rw-r--r-- | src/Text/Pandoc/Writers/Muse.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/Muse.hs b/src/Text/Pandoc/Writers/Muse.hs index 025114a47..26349493b 100644 --- a/src/Text/Pandoc/Writers/Muse.hs +++ b/src/Text/Pandoc/Writers/Muse.hs @@ -435,7 +435,7 @@ isHorizontalRule s = length s >= 4 && all (== '-') s stringStartsWithSpace :: String -> Bool stringStartsWithSpace (x:_) = isSpace x -stringStartsWithSpace [] = False +stringStartsWithSpace "" = False fixOrEscape :: Bool -> Inline -> Bool fixOrEscape sp (Str "-") = sp |