packages feed

hxt 9.2.0 → 9.2.1

raw patch · 5 files changed

+17/−14 lines, 5 filesdep ~base

Dependency ranges changed: base

Files

hxt.cabal view
@@ -1,6 +1,6 @@ -- arch-tag: Haskell XML Toolbox main description file Name:           hxt-Version:        9.2.0+Version:        9.2.1 Synopsis:       A collection of tools for processing XML with Haskell. Description:    The Haskell XML Toolbox bases on the ideas of HaXml and HXML,                 but introduces a more general approach for processing XML with Haskell.@@ -15,6 +15,8 @@                 hxt-curl, hxt-tagsoup, hxt-relaxng, hxt-xpath, hxt-xslt, hxt-regex-xmlschema contain the extensions.                 hxt-unicode contains encoding and decoding functions,                 hxt-charproperties char properties for unicode and XML.+                .+                Changes to 9.2.0: New warnings from ghc-7.4 removed License:        MIT License-file:   LICENSE Author:         Uwe Schmidt, Martin Schmidt, Torben Kuseler@@ -22,7 +24,7 @@ Stability:      Stable Category:       XML Homepage:       http://www.fh-wedel.de/~si/HXmlToolbox/index.html-Copyright:      Copyright (c) 2005-2010 Uwe Schmidt+Copyright:      Copyright (c) 2005-2012 Uwe Schmidt Build-type:     Simple Cabal-version:  >=1.6 
src/Text/XML/HXT/Arrow/DocumentOutput.hs view
@@ -30,6 +30,7 @@ import Control.Arrow.ArrowTree import Control.Arrow.ArrowIO import Control.Arrow.ListArrow+import Control.Arrow.ArrowExc  import qualified        Data.ByteString.Lazy                     as BS@@ -62,7 +63,6 @@                                                 , hClose                                                 , stdout                                                 )-import System.IO.Error                          ( try )  -- ------------------------------------------------------------ --@@ -79,16 +79,15 @@           = ( if textMode               then ( xshow getChildren                      >>>-                     arrIO (\ s -> try ( hPutDocument (\h -> hPutStrLn h s)))+                     tryA (arrIO (\ s -> hPutDocument (\h -> hPutStrLn h s)))                    )               else ( xshowBlob getChildren                      >>>-                     arrIO (\ s -> try ( hPutDocument (\h -> do-                                                             BS.hPutStr h s-                                                             BS.hPutStr h (stringToBlob "\n")+                     tryA (arrIO (\ s -> hPutDocument (\h -> do BS.hPutStr h s+                                                                BS.hPutStr h (stringToBlob "\n")                                                       )-                                       )-                           )+                                 )+                          )                    )             )             >>>
src/Text/XML/HXT/Arrow/Pickle.hs view
@@ -93,6 +93,8 @@     , xpElem     , xpElemNS     , xpElemWithAttrValue+    , xpFilterAttr+    , xpFilterCont     , xpickle     , xpInt     , xpLift@@ -105,6 +107,7 @@     , xpPair     , xpPrim     , xpSeq+    , xpSeq'     , xpText     , xpText0     , xpTextDT
src/Text/XML/HXT/Arrow/Pickle/Xml.hs view
@@ -50,7 +50,7 @@  import           Control.Arrow.ArrowList import           Control.Arrow.ListArrows-import           Control.Monad+import           Control.Monad                    ( ) import           Control.Monad.Error import           Control.Monad.State 
src/Text/XML/HXT/IO/GetFILE.hs view
@@ -22,15 +22,14 @@  where -import qualified Data.ByteString.Lazy           as B+import           Control.Exception      ( try ) +import qualified Data.ByteString.Lazy   as B+ import           Network.URI            ( unEscapeString                                         )- import           System.IO.Error        ( ioeGetErrorString-                                        , try                                         )- import           System.Directory       ( doesFileExist                                         , getPermissions                                         , readable