damnpacket 0.4.0 → 0.4.1
raw patch · 2 files changed
+3/−3 lines, 2 files
Files
- damnpacket.cabal +1/−1
- src/Text/Damn/Packet/Parser.hs +2/−2
damnpacket.cabal view
@@ -1,5 +1,5 @@ name: damnpacket-version: 0.4.0+version: 0.4.1 synopsis: Parsing dAmn packets license: MIT license-file: LICENSE
src/Text/Damn/Packet/Parser.hs view
@@ -13,7 +13,7 @@ ) where import Prelude hiding (null)-import Control.Applicative ((<$>), (*>), (<*), liftA3, pure)+import Control.Applicative ((<$>), (*>), liftA3, pure) import Control.Arrow (second) import Data.Char import qualified Data.Map as M@@ -91,7 +91,7 @@ case ch of Just '\n' -> liftA3 M.insert (T.pack <$> some (notChar '='))- (char '=' *> fmap T.pack (some (notChar '\n')) <* char '\n')+ (char '=' *> fmap T.pack (some (notChar '\n'))) argsP _ -> pure mempty