markdown2svg 0.0.1.16 → 0.0.1.17

raw patch · 2 files changed

+6/−6 lines, 2 files

Files

• markdown2svg.cabal +2/−2
• src/SVG.hs +4/−4

@@ -2,7 +2,7 @@ cabal-version:	>=1.8  name:		markdown2svg-version:	0.0.1.16+version:	0.0.1.17 stability:	Experimental author:		Yoshikuni Jujo <PAF01143@nifty.ne.jp> maintainer:	Yoshikuni Jujo <PAF01143@nifty.ne.jp>@@ -31,7 +31,7 @@ source-repository	this   type:		git   location:	git://github.com/YoshikuniJujo/markdown2svg.git-  tag:		0.0.1.16+  tag:		0.0.1.17  executable markdown2svg   hs-source-dirs:	src

@@ -13,12 +13,12 @@ import SepWords import Image -headerFont, normalFont, codeFont :: String-headerFont = "Kochi Gothic"-normalFont = "Kochi Mincho"+headerFont, normalFont, codeFont :: Font+headerFont = Font "Kochi Gothic" Normal+normalFont = Font "Kochi Mincho" Normal -- normalFont = "Kochi Gothic" -- codeFont = "Kochi Gothic"-codeFont = "Monospace"+codeFont = Font "Monospace" Normal  textToSVG :: [(FilePath, String)] -> Bool -> Double -> [Text] -> [String] textToSVG fp n r = map (showSVG (width r) (height r)) . textToSVGData fp r (topMargin r) .