clckwrks-cli 0.3.0 → 0.3.0.1
raw patch · 3 files changed
+16/−6 lines, 3 filesdep ~acid-state
Dependency ranges changed: acid-state
Files
- Clckwrks/CLI/Core.hs +0/−1
- Clckwrks/CLI/ProfileData.hs +12/−1
- clckwrks-cli.cabal +4/−4
Clckwrks/CLI/Core.hs view
@@ -10,7 +10,6 @@ import Data.Acid.Remote (openRemoteState, skipAuthenticationPerform) import Data.Map (Map) import qualified Data.Map as Map-import Network (PortID(UnixSocket)) import System.Environment import System.Exit (exitSuccess) import System.Console.Haskeline
Clckwrks/CLI/ProfileData.hs view
@@ -1,3 +1,4 @@+{-# language CPP #-} module Clckwrks.CLI.ProfileData where import Control.Applicative ((<$>), (<*>), (*>), pure)@@ -8,8 +9,14 @@ import Control.Monad.Reader import Data.Acid (AcidState) import Data.Acid.Advanced (query', update')-import Data.Acid.Remote (openRemoteState, skipAuthenticationPerform)++#if MIN_VERSION_network(3,0,0)+import Network.Socket (SockAddr(..))+import Data.Acid.Remote (openRemoteStateSockAddr, skipAuthenticationPerform)+#else import Network (PortID(UnixSocket))+import Data.Acid.Remote (openRemoteState, skipAuthenticationPerform)+#endif import System.Environment import System.FilePath ((</>)) import System.Console.Haskeline@@ -108,7 +115,11 @@ initUserCommand :: FilePath -> IO (UserCmd -> IO ()) initUserCommand basePath =+#if MIN_VERSION_network(3,0,0)+ do profileData <- openRemoteStateSockAddr skipAuthenticationPerform (SockAddrUnix ((basePath </> "profileData_socket")))+#else do profileData <- openRemoteState skipAuthenticationPerform "localhost" (UnixSocket ((basePath </> "profileData_socket")))+#endif pure $ \c -> runReaderT (execUserCommand c) profileData userCLIHandler :: FilePath -> IO CLIHandler
clckwrks-cli.cabal view
@@ -1,5 +1,5 @@ Name: clckwrks-cli-Version: 0.3.0+Version: 0.3.0.1 Synopsis: a command-line interface for adminstrating some aspects of clckwrks Description: This tool permits browsing of users, changing their roles, and other features. Homepage: http://www.clckwrks.com/@@ -11,7 +11,7 @@ Category: Clckwrks Build-type: Simple Cabal-version: >=1.10-tested-with: GHC == 7.8.4, GHC == 7.10.3, GHC == 8.0.1+tested-with: GHC == 7.8.4, GHC == 7.10.3, GHC == 8.0.1, GHC == 8.6.5, GHC == 8.8.1 source-repository head type: git@@ -22,7 +22,7 @@ Exposed-Modules: Clckwrks.CLI.Core Clckwrks.CLI.ProfileData Build-depends:- acid-state >= 0.12 && < 0.16,+ acid-state >= 0.12 && < 0.17, base < 5, clckwrks >= 0.23 && < 0.26, containers >= 0.6 && < 0.7,@@ -37,7 +37,7 @@ Main.hs Default-Language: Haskell2010 Build-depends:- acid-state >= 0.12 && < 0.16,+ acid-state >= 0.12 && < 0.17, base < 5, clckwrks >= 0.23 && < 0.26, clckwrks-cli >= 0.3 && < 0.4,