markdown2svg 0.0.1.3 → 0.0.1.4

raw patch · 2 files changed

+5/−4 lines, 2 files

Files

markdown2svg.cabal +2/−2
src/Parser.hs +3/−2

markdown2svg.cabal view

@@ -2,7 +2,7 @@ cabal-version:	>=1.8  name:		markdown2svg-version:	0.0.1.3+version:	0.0.1.4 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.3+  tag:		0.0.1.4  executable markdown2svg   hs-source-dirs:	src

src/Parser.hs view

@@ -51,8 +51,8 @@  markdown1 :: Text 	= h:header				{ return h }-	/ c:code				{ return $ Code c } 	/ l:list				{ return $ List l }+	/ c:code				{ return $ Code c } 	/ p:paras				{ return $ Paras p }  header :: Text@@ -123,7 +123,8 @@ 	= ps:para+				{ return ps }  para :: String-	= ls:(!_:header !_:fourSpaces l:line '\n' { return l })+ _:('\n' / !_ / !_:para)	{ return $ concat ls }+	= ls:(!_:header !_:fourSpaces l:line '\n' { return l })+ _:('\n' / !_ / !_:para) !_:list+						{ return $ concat ls }  shllw :: () 	= _:dmmy[shallow]