libjenkins 0.8.2 → 0.8.3

raw patch · 6 files changed

+67/−11 lines, 6 filesdep ~basedep ~mtlPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

Dependency ranges changed: base, mtl

API changes (from Hackage documentation)

Files

• CHANGELOG.markdown +8/−1
• LICENSE +1/−1
• example/repl.hs +50/−0
• libjenkins.cabal +5/−5
• src/Jenkins/Rest.hs +1/−1
• src/Jenkins/Rest/Internal.hs +2/−3

@@ -1,7 +1,14 @@+0.8.3+=====++  * Switched to `Control.Monad.Except`++  * Dropped support for GHC < 7.10+ 0.8.2 ===== -  * Stopped using the deprecated stuff in `http-client{,-tls}`.+  * Stopped using the deprecated stuff in `http-client{,-tls}`  0.8.1 =====

@@ -1,4 +1,4 @@-Copyright (c) 2013-2015, Matvey Aksenov+Copyright (c) 2013-2016, Matvey Aksenov  All rights reserved. 

@@ -0,0 +1,50 @@+{-# LANGUAGE CPP #-}+{-# LANGUAGE OverloadedStrings #-}+-- | A simple Groovy REPL (type :q to quit)+--+-- @+-- >>> println "Hello, World!"+-- Hello, World!+-- >>> println 4 * 7+-- 28+-- @+module Main (main) where++#if __GLASGOW_HASKELL__ < 710+import           Control.Applicative       -- base+#endif+import           Data.Text.Lazy (Text)     -- text+import qualified Data.Text.Lazy.IO as Text -- text+import           Env                       -- envparse+import           Jenkins.Rest as Jenkins   -- libjenkins+import qualified System.IO as IO           -- base+++main :: IO ()+main = do+  conf <- envConf+  Right ()+       <- Jenkins.run conf loop+  return ()++envConf :: IO Jenkins.Master+envConf = Env.parse (desc "A simple Groovy REPL") $+  Jenkins.Master <$> var str "JENKINS_URL"       (help "Jenkins URL")+                 <*> var str "JENKINS_USERNAME"  (help "Jenkins username")+                 <*> var str "JENKINS_API_TOKEN" (help "Jenkins API token")++loop :: Jenkins ()+loop = do+  reply <- prompt+  case reply of+    ":q" -> return ()+    _    -> do+      res <- groovy reply+      liftIO $ do Text.putStr res; flush;+      loop++prompt :: Jenkins Text+prompt = liftIO $ do Text.putStr ">>> "; flush; Text.getLine++flush :: IO ()+flush = IO.hFlush IO.stdout

@@ -1,5 +1,5 @@ name:                libjenkins-version:             0.8.2+version:             0.8.3 synopsis:            Jenkins API interface description:         Jenkins API interface. It supports REST and Discovery APIs license:             BSD2@@ -17,6 +17,7 @@   example/rename-jobs.hs   example/discover.hs   example/running-jobs-count.hs+  example/repl.hs cabal-version:       >= 1.10  source-repository head@@ -26,13 +27,13 @@ source-repository this   type:     git   location: https://github.com/supki/libjenkins-  tag:      0.8.2+  tag:      0.8.3  library   default-language:     Haskell2010   build-depends:-      base          >= 4.6 && < 5+      base          >= 4.8 && < 5     , async         >= 2.0     , attoparsec    >= 0.12     , bytestring    >= 0.9@@ -44,12 +45,11 @@     , http-types    >= 0.8     , monad-control >= 0.3     , profunctors   >= 4.2-    , mtl           >= 2.1+    , mtl           >= 2.2.1     , network       >= 2.6     , network-uri   >= 2.6     , resourcet     >= 1.1     , text          >= 0.11-    , transformers   hs-source-dirs:     src   exposed-modules:

@@ -41,7 +41,7 @@  import qualified Control.Exception as Unlifted import           Control.Monad (void)-import           Control.Monad.IO.Class (MonadIO(..))+import           Control.Monad.Trans (MonadIO(..)) import           Control.Monad.Trans.Control (MonadBaseControl(..)) import           Control.Monad.Trans.Resource (MonadResource) import qualified Data.ByteString.Lazy as Lazy

@@ -31,11 +31,10 @@ import qualified Control.Exception as Unlifted import           Control.Monad import           Control.Monad.Free.Church (liftF)-import           Control.Monad.Error (MonadError(..))-import           Control.Monad.IO.Class (MonadIO(..))+import           Control.Monad.Except (MonadError(..)) import           Control.Monad.Reader (MonadReader(..)) import           Control.Monad.State (MonadState(..))-import           Control.Monad.Trans.Class (MonadTrans(..))+import           Control.Monad.Trans (MonadIO(..), MonadTrans(..)) import           Control.Monad.Trans.Control (MonadBaseControl(..), control, liftBaseOp_) import           Control.Monad.Trans.Free.Church (FT, iterTM) import           Control.Monad.Trans.Resource (MonadResource)