diff --git a/markdown2svg.cabal b/markdown2svg.cabal --- a/markdown2svg.cabal +++ b/markdown2svg.cabal @@ -2,7 +2,7 @@ cabal-version: >=1.8 name: markdown2svg -version: 0.0.1.8 +version: 0.0.1.9 stability: Experimental author: Yoshikuni Jujo maintainer: Yoshikuni Jujo @@ -31,7 +31,7 @@ source-repository this type: git location: git://github.com/YoshikuniJujo/markdown2svg.git - tag: 0.0.1.8 + tag: 0.0.1.9 executable markdown2svg hs-source-dirs: src diff --git a/src/SVG.hs b/src/SVG.hs --- a/src/SVG.hs +++ b/src/SVG.hs @@ -176,5 +176,5 @@ remSpaces :: String -> String remSpaces "" = "" remSpaces (c : ' ' : c' : cs) - | not (isAscii c) && not (isAscii c') = c : c' : remSpaces cs + | not (isAscii c) || not (isAscii c') = c : c' : remSpaces cs remSpaces (c : cs) = c : remSpaces cs