Repository : ssh://darcs.haskell.org//srv/darcs/packages/Cabal On branch : master
http://hackage.haskell.org/trac/ghc/changeset/748f9658fb8cdf61107c2e7420a9c4d20a67d6ae >--------------------------------------------------------------- commit 748f9658fb8cdf61107c2e7420a9c4d20a67d6ae Author: Duncan Coutts <[email protected]> Date: Sun Aug 10 21:17:05 2008 +0000 Remove most warnings from BuildReports.Upload module >--------------------------------------------------------------- .../Distribution/Client/BuildReports/Upload.hs | 21 +++---------------- 1 files changed, 4 insertions(+), 17 deletions(-) diff --git a/cabal-install/Distribution/Client/BuildReports/Upload.hs b/cabal-install/Distribution/Client/BuildReports/Upload.hs index c8c855e..861e3b7 100644 --- a/cabal-install/Distribution/Client/BuildReports/Upload.hs +++ b/cabal-install/Distribution/Client/BuildReports/Upload.hs @@ -9,30 +9,17 @@ module Distribution.Client.BuildReports.Upload , putBuildLog ) where -import Distribution.Client.Types (Username(..), Password(..)) -import Distribution.Client.HttpUtils (proxy) - -import Distribution.Simple.Utils (debug, notice, warn) -import Distribution.Verbosity (Verbosity) - import Network.Browser - ( BrowserAction, browse, request - , Authority(..), addAuthority, setAuthorityGen - , setOutHandler, setErrHandler, setProxy - , setAllowRedirects ) + ( BrowserAction, request, setAllowRedirects ) import Network.HTTP ( Header(..), HeaderName(..) , Request(..), RequestMethod(..), Response(..) ) -import Network.URI (URI, uriPath, parseURI,parseRelativeReference, relativeTo) +import Network.URI (URI, uriPath, parseRelativeReference, relativeTo) -import Data.Char (intToDigit) -import Numeric (showHex) -import System.IO (hFlush, stdin, stdout, hGetEcho, hSetEcho - ,openBinaryFile, IOMode(ReadMode), hGetContents) -import Control.Exception (bracket) import Control.Monad -import System.Random (randomRIO) + ( forM_ ) import System.FilePath.Posix + ( (</>) ) import qualified Distribution.Client.BuildReports.Anonymous as BuildReport import Distribution.Client.BuildReports.Anonymous (BuildReport) _______________________________________________ Cvs-libraries mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-libraries
