packages feed

anansi 0.3.1 → 0.3.2

raw patch · 2 files changed

+2/−2 lines, 2 files

Files

anansi.cabal view
@@ -1,5 +1,5 @@ name: anansi-version: 0.3.1+version: 0.3.2 synopsis: Simple literate programming preprocessor license: GPL-3 license-file: license.txt
lib/Anansi/Tangle.hs view
@@ -96,7 +96,7 @@ putPosition enableLine pos = do 	TangleState lastPos indent macros <- S.get 	let expectedPos = Position (positionFile lastPos) (positionLine lastPos + 1)-	let filename = FP.toText (positionFile pos)+	let filename = either id id FP.toText (positionFile pos) 	let line = if enableLine 		then "\n#line " ++ show (positionLine pos) ++ " " ++ show filename ++ "\n" 		else "\n"