Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse code

Merge pull request #7 from f-me/master

Infix precedence redundancy fix
  • Loading branch information...
commit 99c94576571c9976068c9e7c3f560b3b1dac5a3c 2 parents 7ae662f + 67ac966
Ozgun Ataman authored

Showing 2 changed files with 3 additions and 2 deletions. Show diff stats Hide diff stats

  1. +2 1  csv-conduit.cabal
  2. +1 1  src/Data/CSV/Conduit.hs
3  csv-conduit.cabal
... ... @@ -1,5 +1,5 @@
1 1 Name: csv-conduit
2   -Version: 0.3.0.2
  2 +Version: 0.3.0.3
3 3 Synopsis: A flexible, fast, conduit-based CSV parser library for Haskell.
4 4 Homepage: http://github.com/ozataman/csv-conduit
5 5 License: BSD3
@@ -9,6 +9,7 @@ Maintainer: Ozgun Ataman <ozataman@gmail.com>
9 9 Category: Data, Conduit, CSV, Text
10 10 Build-type: Simple
11 11 Cabal-version: >= 1.9.2
  12 +Tested-with: GHC == 7.6.1
12 13 Description:
13 14 CSV files are the de-facto standard in many situations involving data transfer,
14 15 particularly when dealing with enterprise application or disparate database
2  src/Data/CSV/Conduit.hs
@@ -118,7 +118,7 @@ instance CSV ByteString (Row ByteString) where
118 118 let
119 119 sep = B.pack [c2w (csvOutputColSep s)]
120 120 wrapField !f = case csvOutputQuoteChar s of
121   - Just !x -> x `B8.cons` escape x f `B8.snoc` x
  121 + Just !x -> (x `B8.cons` escape x f) `B8.snoc` x
122 122 _ -> f
123 123 escape c str = B8.intercalate (B8.pack [c,c]) $ B8.split c str
124 124 in B.intercalate sep . map wrapField $ r

0 comments on commit 99c9457

Please sign in to comment.
Something went wrong with that request. Please try again.