Lens.hs

module Control.Concurrent.Capataz.Lens
  ( module X )
  where

import Control.Concurrent.Capataz.Internal.Types.Lens as X
    ( onSystemEventL
    , supervisorIntensityL
    , supervisorOnFailureL
    , supervisorOnIntensityReachedL
    , supervisorPeriodSecondsL
    , supervisorProcessSpecListL
    , supervisorProcessTerminationOrderL
    , supervisorRestartStrategyL
    , workerOnCompletionL
    , workerOnFailureL
    , workerOnTerminationL
    , workerRestartStrategyL
    , workerTerminationPolicyL
    )
import Lens.Micro                                     as X (set, (&), (.~), (^.))
import Lens.Micro.Extras                              as X (view)