GI.Gtk.Objects.ProgressBar

Exported types

newtype ProgressBar

Constructors

ProgressBar (ManagedPtr ProgressBar)

Instances

GObject ProgressBar

Methods

gobjectIsInitiallyUnowned :: ProgressBar -> Bool

gobjectType :: ProgressBar -> IO GType

IsObject ProgressBar

IsWidget ProgressBar

IsOrientable ProgressBar

IsBuildable ProgressBar

IsImplementorIface ProgressBar

IsProgressBar ProgressBar

((~) * info (ResolveProgressBarMethod t ProgressBar), MethodInfo * info ProgressBar p) => IsLabel t (ProgressBar -> p)

Methods

fromLabel :: Proxy# Symbol t -> ProgressBar -> p

((~) * info (ResolveProgressBarMethod t ProgressBar), MethodInfo * info ProgressBar p) => IsLabelProxy t (ProgressBar -> p)

Methods

fromLabelProxy :: Proxy Symbol t -> ProgressBar -> p

HasAttributeList * ProgressBar

type SignalList ProgressBar

type SignalList ProgressBar

type AttributeList ProgressBar

type AttributeList ProgressBar

class GObject o => IsProgressBar o

Instances

(GObject a, UnknownAncestorError Constraint ProgressBar a) => IsProgressBar a

IsProgressBar ProgressBar

toProgressBar :: IsProgressBar o => o -> IO ProgressBar

noProgressBar :: Maybe ProgressBar

Methods

getEllipsize

data ProgressBarGetEllipsizeMethodInfo

Instances

((~) * signature (m EllipsizeMode), MonadIO m, IsProgressBar a) => MethodInfo * ProgressBarGetEllipsizeMethodInfo a signature

Methods

overloadedMethod :: MethodProxy ProgressBarGetEllipsizeMethodInfo a -> signature -> s

progressBarGetEllipsize :: (MonadIO m, IsProgressBar a) => a -> m EllipsizeMode

getFraction

data ProgressBarGetFractionMethodInfo

Instances

((~) * signature (m Double), MonadIO m, IsProgressBar a) => MethodInfo * ProgressBarGetFractionMethodInfo a signature

Methods

overloadedMethod :: MethodProxy ProgressBarGetFractionMethodInfo a -> signature -> s

progressBarGetFraction :: (MonadIO m, IsProgressBar a) => a -> m Double

getInverted

data ProgressBarGetInvertedMethodInfo

Instances

((~) * signature (m Bool), MonadIO m, IsProgressBar a) => MethodInfo * ProgressBarGetInvertedMethodInfo a signature

Methods

overloadedMethod :: MethodProxy ProgressBarGetInvertedMethodInfo a -> signature -> s

progressBarGetInverted :: (MonadIO m, IsProgressBar a) => a -> m Bool

getPulseStep

data ProgressBarGetPulseStepMethodInfo

Instances

((~) * signature (m Double), MonadIO m, IsProgressBar a) => MethodInfo * ProgressBarGetPulseStepMethodInfo a signature

Methods

overloadedMethod :: MethodProxy ProgressBarGetPulseStepMethodInfo a -> signature -> s

progressBarGetPulseStep :: (MonadIO m, IsProgressBar a) => a -> m Double

getShowText

data ProgressBarGetShowTextMethodInfo

Instances

((~) * signature (m Bool), MonadIO m, IsProgressBar a) => MethodInfo * ProgressBarGetShowTextMethodInfo a signature

Methods

overloadedMethod :: MethodProxy ProgressBarGetShowTextMethodInfo a -> signature -> s

progressBarGetShowText :: (MonadIO m, IsProgressBar a) => a -> m Bool

getText

data ProgressBarGetTextMethodInfo

Instances

((~) * signature (m (Maybe Text)), MonadIO m, IsProgressBar a) => MethodInfo * ProgressBarGetTextMethodInfo a signature

Methods

overloadedMethod :: MethodProxy ProgressBarGetTextMethodInfo a -> signature -> s

progressBarGetText :: (MonadIO m, IsProgressBar a) => a -> m (Maybe Text)

new

progressBarNew :: MonadIO m => m ProgressBar

pulse

data ProgressBarPulseMethodInfo

Instances

((~) * signature (m ()), MonadIO m, IsProgressBar a) => MethodInfo * ProgressBarPulseMethodInfo a signature

Methods

overloadedMethod :: MethodProxy ProgressBarPulseMethodInfo a -> signature -> s

progressBarPulse :: (MonadIO m, IsProgressBar a) => a -> m ()

setEllipsize

data ProgressBarSetEllipsizeMethodInfo

Instances

((~) * signature (EllipsizeMode -> m ()), MonadIO m, IsProgressBar a) => MethodInfo * ProgressBarSetEllipsizeMethodInfo a signature

Methods

overloadedMethod :: MethodProxy ProgressBarSetEllipsizeMethodInfo a -> signature -> s

progressBarSetEllipsize :: (MonadIO m, IsProgressBar a) => a -> EllipsizeMode -> m ()

setFraction

data ProgressBarSetFractionMethodInfo

Instances

((~) * signature (Double -> m ()), MonadIO m, IsProgressBar a) => MethodInfo * ProgressBarSetFractionMethodInfo a signature

Methods

overloadedMethod :: MethodProxy ProgressBarSetFractionMethodInfo a -> signature -> s

progressBarSetFraction :: (MonadIO m, IsProgressBar a) => a -> Double -> m ()

setInverted

data ProgressBarSetInvertedMethodInfo

Instances

((~) * signature (Bool -> m ()), MonadIO m, IsProgressBar a) => MethodInfo * ProgressBarSetInvertedMethodInfo a signature

Methods

overloadedMethod :: MethodProxy ProgressBarSetInvertedMethodInfo a -> signature -> s

progressBarSetInverted :: (MonadIO m, IsProgressBar a) => a -> Bool -> m ()

setPulseStep

data ProgressBarSetPulseStepMethodInfo

Instances

((~) * signature (Double -> m ()), MonadIO m, IsProgressBar a) => MethodInfo * ProgressBarSetPulseStepMethodInfo a signature

Methods

overloadedMethod :: MethodProxy ProgressBarSetPulseStepMethodInfo a -> signature -> s

progressBarSetPulseStep :: (MonadIO m, IsProgressBar a) => a -> Double -> m ()

setShowText

data ProgressBarSetShowTextMethodInfo

Instances

((~) * signature (Bool -> m ()), MonadIO m, IsProgressBar a) => MethodInfo * ProgressBarSetShowTextMethodInfo a signature

Methods

overloadedMethod :: MethodProxy ProgressBarSetShowTextMethodInfo a -> signature -> s

progressBarSetShowText :: (MonadIO m, IsProgressBar a) => a -> Bool -> m ()

setText

data ProgressBarSetTextMethodInfo

Instances

((~) * signature (Maybe Text -> m ()), MonadIO m, IsProgressBar a) => MethodInfo * ProgressBarSetTextMethodInfo a signature

Methods

overloadedMethod :: MethodProxy ProgressBarSetTextMethodInfo a -> signature -> s

progressBarSetText :: (MonadIO m, IsProgressBar a) => a -> Maybe Text -> m ()

Properties

ellipsize

data ProgressBarEllipsizePropertyInfo

Instances

AttrInfo ProgressBarEllipsizePropertyInfo

Associated Types

type AttrAllowedOps ProgressBarEllipsizePropertyInfo :: [AttrOpTag]

type AttrSetTypeConstraint ProgressBarEllipsizePropertyInfo :: * -> Constraint

type AttrBaseTypeConstraint ProgressBarEllipsizePropertyInfo :: * -> Constraint

type AttrGetType ProgressBarEllipsizePropertyInfo :: *

type AttrLabel ProgressBarEllipsizePropertyInfo :: Symbol

type AttrOrigin ProgressBarEllipsizePropertyInfo :: *

Methods

attrGet :: AttrBaseTypeConstraint ProgressBarEllipsizePropertyInfo o => Proxy * ProgressBarEllipsizePropertyInfo -> o -> IO (AttrGetType ProgressBarEllipsizePropertyInfo)

attrSet :: (AttrBaseTypeConstraint ProgressBarEllipsizePropertyInfo o, AttrSetTypeConstraint ProgressBarEllipsizePropertyInfo b) => Proxy * ProgressBarEllipsizePropertyInfo -> o -> b -> IO ()

attrClear :: AttrBaseTypeConstraint ProgressBarEllipsizePropertyInfo o => Proxy * ProgressBarEllipsizePropertyInfo -> o -> IO ()

attrConstruct :: (AttrBaseTypeConstraint ProgressBarEllipsizePropertyInfo o, AttrSetTypeConstraint ProgressBarEllipsizePropertyInfo b) => Proxy * ProgressBarEllipsizePropertyInfo -> b -> IO (GValueConstruct o)

type AttrSetTypeConstraint ProgressBarEllipsizePropertyInfo

type AttrSetTypeConstraint ProgressBarEllipsizePropertyInfo = * ~ EllipsizeMode

type AttrOrigin ProgressBarEllipsizePropertyInfo

type AttrOrigin ProgressBarEllipsizePropertyInfo = ProgressBar

type AttrLabel ProgressBarEllipsizePropertyInfo

type AttrLabel ProgressBarEllipsizePropertyInfo = "ellipsize"

type AttrGetType ProgressBarEllipsizePropertyInfo

type AttrGetType ProgressBarEllipsizePropertyInfo = EllipsizeMode

type AttrBaseTypeConstraint ProgressBarEllipsizePropertyInfo

type AttrBaseTypeConstraint ProgressBarEllipsizePropertyInfo = IsProgressBar

type AttrAllowedOps ProgressBarEllipsizePropertyInfo

type AttrAllowedOps ProgressBarEllipsizePropertyInfo = (:) AttrOpTag AttrSet ((:) AttrOpTag AttrConstruct ((:) AttrOpTag AttrGet ([] AttrOpTag)))

constructProgressBarEllipsize :: IsProgressBar o => EllipsizeMode -> IO (GValueConstruct o)

getProgressBarEllipsize :: (MonadIO m, IsProgressBar o) => o -> m EllipsizeMode

progressBarEllipsize :: AttrLabelProxy "ellipsize"

setProgressBarEllipsize :: (MonadIO m, IsProgressBar o) => o -> EllipsizeMode -> m ()

fraction

data ProgressBarFractionPropertyInfo

Instances

AttrInfo ProgressBarFractionPropertyInfo

Associated Types

type AttrAllowedOps ProgressBarFractionPropertyInfo :: [AttrOpTag]

type AttrSetTypeConstraint ProgressBarFractionPropertyInfo :: * -> Constraint

type AttrBaseTypeConstraint ProgressBarFractionPropertyInfo :: * -> Constraint

type AttrGetType ProgressBarFractionPropertyInfo :: *

type AttrLabel ProgressBarFractionPropertyInfo :: Symbol

type AttrOrigin ProgressBarFractionPropertyInfo :: *

Methods

attrGet :: AttrBaseTypeConstraint ProgressBarFractionPropertyInfo o => Proxy * ProgressBarFractionPropertyInfo -> o -> IO (AttrGetType ProgressBarFractionPropertyInfo)

attrSet :: (AttrBaseTypeConstraint ProgressBarFractionPropertyInfo o, AttrSetTypeConstraint ProgressBarFractionPropertyInfo b) => Proxy * ProgressBarFractionPropertyInfo -> o -> b -> IO ()

attrClear :: AttrBaseTypeConstraint ProgressBarFractionPropertyInfo o => Proxy * ProgressBarFractionPropertyInfo -> o -> IO ()

attrConstruct :: (AttrBaseTypeConstraint ProgressBarFractionPropertyInfo o, AttrSetTypeConstraint ProgressBarFractionPropertyInfo b) => Proxy * ProgressBarFractionPropertyInfo -> b -> IO (GValueConstruct o)

type AttrSetTypeConstraint ProgressBarFractionPropertyInfo

type AttrSetTypeConstraint ProgressBarFractionPropertyInfo = * ~ Double

type AttrOrigin ProgressBarFractionPropertyInfo

type AttrOrigin ProgressBarFractionPropertyInfo = ProgressBar

type AttrLabel ProgressBarFractionPropertyInfo

type AttrLabel ProgressBarFractionPropertyInfo = "fraction"

type AttrGetType ProgressBarFractionPropertyInfo

type AttrGetType ProgressBarFractionPropertyInfo = Double

type AttrBaseTypeConstraint ProgressBarFractionPropertyInfo

type AttrBaseTypeConstraint ProgressBarFractionPropertyInfo = IsProgressBar

type AttrAllowedOps ProgressBarFractionPropertyInfo

type AttrAllowedOps ProgressBarFractionPropertyInfo = (:) AttrOpTag AttrSet ((:) AttrOpTag AttrConstruct ((:) AttrOpTag AttrGet ([] AttrOpTag)))

constructProgressBarFraction :: IsProgressBar o => Double -> IO (GValueConstruct o)

getProgressBarFraction :: (MonadIO m, IsProgressBar o) => o -> m Double

progressBarFraction :: AttrLabelProxy "fraction"

setProgressBarFraction :: (MonadIO m, IsProgressBar o) => o -> Double -> m ()

inverted

data ProgressBarInvertedPropertyInfo

Instances

AttrInfo ProgressBarInvertedPropertyInfo

Associated Types

type AttrAllowedOps ProgressBarInvertedPropertyInfo :: [AttrOpTag]

type AttrSetTypeConstraint ProgressBarInvertedPropertyInfo :: * -> Constraint

type AttrBaseTypeConstraint ProgressBarInvertedPropertyInfo :: * -> Constraint

type AttrGetType ProgressBarInvertedPropertyInfo :: *

type AttrLabel ProgressBarInvertedPropertyInfo :: Symbol

type AttrOrigin ProgressBarInvertedPropertyInfo :: *

Methods

attrGet :: AttrBaseTypeConstraint ProgressBarInvertedPropertyInfo o => Proxy * ProgressBarInvertedPropertyInfo -> o -> IO (AttrGetType ProgressBarInvertedPropertyInfo)

attrSet :: (AttrBaseTypeConstraint ProgressBarInvertedPropertyInfo o, AttrSetTypeConstraint ProgressBarInvertedPropertyInfo b) => Proxy * ProgressBarInvertedPropertyInfo -> o -> b -> IO ()

attrClear :: AttrBaseTypeConstraint ProgressBarInvertedPropertyInfo o => Proxy * ProgressBarInvertedPropertyInfo -> o -> IO ()

attrConstruct :: (AttrBaseTypeConstraint ProgressBarInvertedPropertyInfo o, AttrSetTypeConstraint ProgressBarInvertedPropertyInfo b) => Proxy * ProgressBarInvertedPropertyInfo -> b -> IO (GValueConstruct o)

type AttrSetTypeConstraint ProgressBarInvertedPropertyInfo

type AttrSetTypeConstraint ProgressBarInvertedPropertyInfo = * ~ Bool

type AttrOrigin ProgressBarInvertedPropertyInfo

type AttrOrigin ProgressBarInvertedPropertyInfo = ProgressBar

type AttrLabel ProgressBarInvertedPropertyInfo

type AttrLabel ProgressBarInvertedPropertyInfo = "inverted"

type AttrGetType ProgressBarInvertedPropertyInfo

type AttrGetType ProgressBarInvertedPropertyInfo = Bool

type AttrBaseTypeConstraint ProgressBarInvertedPropertyInfo

type AttrBaseTypeConstraint ProgressBarInvertedPropertyInfo = IsProgressBar

type AttrAllowedOps ProgressBarInvertedPropertyInfo

type AttrAllowedOps ProgressBarInvertedPropertyInfo = (:) AttrOpTag AttrSet ((:) AttrOpTag AttrConstruct ((:) AttrOpTag AttrGet ([] AttrOpTag)))

constructProgressBarInverted :: IsProgressBar o => Bool -> IO (GValueConstruct o)

getProgressBarInverted :: (MonadIO m, IsProgressBar o) => o -> m Bool

progressBarInverted :: AttrLabelProxy "inverted"

setProgressBarInverted :: (MonadIO m, IsProgressBar o) => o -> Bool -> m ()

pulseStep

data ProgressBarPulseStepPropertyInfo

Instances

AttrInfo ProgressBarPulseStepPropertyInfo

Associated Types

type AttrAllowedOps ProgressBarPulseStepPropertyInfo :: [AttrOpTag]

type AttrSetTypeConstraint ProgressBarPulseStepPropertyInfo :: * -> Constraint

type AttrBaseTypeConstraint ProgressBarPulseStepPropertyInfo :: * -> Constraint

type AttrGetType ProgressBarPulseStepPropertyInfo :: *

type AttrLabel ProgressBarPulseStepPropertyInfo :: Symbol

type AttrOrigin ProgressBarPulseStepPropertyInfo :: *

Methods

attrGet :: AttrBaseTypeConstraint ProgressBarPulseStepPropertyInfo o => Proxy * ProgressBarPulseStepPropertyInfo -> o -> IO (AttrGetType ProgressBarPulseStepPropertyInfo)

attrSet :: (AttrBaseTypeConstraint ProgressBarPulseStepPropertyInfo o, AttrSetTypeConstraint ProgressBarPulseStepPropertyInfo b) => Proxy * ProgressBarPulseStepPropertyInfo -> o -> b -> IO ()

attrClear :: AttrBaseTypeConstraint ProgressBarPulseStepPropertyInfo o => Proxy * ProgressBarPulseStepPropertyInfo -> o -> IO ()

attrConstruct :: (AttrBaseTypeConstraint ProgressBarPulseStepPropertyInfo o, AttrSetTypeConstraint ProgressBarPulseStepPropertyInfo b) => Proxy * ProgressBarPulseStepPropertyInfo -> b -> IO (GValueConstruct o)

type AttrSetTypeConstraint ProgressBarPulseStepPropertyInfo

type AttrSetTypeConstraint ProgressBarPulseStepPropertyInfo = * ~ Double

type AttrOrigin ProgressBarPulseStepPropertyInfo

type AttrOrigin ProgressBarPulseStepPropertyInfo = ProgressBar

type AttrLabel ProgressBarPulseStepPropertyInfo

type AttrLabel ProgressBarPulseStepPropertyInfo = "pulse-step"

type AttrGetType ProgressBarPulseStepPropertyInfo

type AttrGetType ProgressBarPulseStepPropertyInfo = Double

type AttrBaseTypeConstraint ProgressBarPulseStepPropertyInfo

type AttrBaseTypeConstraint ProgressBarPulseStepPropertyInfo = IsProgressBar

type AttrAllowedOps ProgressBarPulseStepPropertyInfo

type AttrAllowedOps ProgressBarPulseStepPropertyInfo = (:) AttrOpTag AttrSet ((:) AttrOpTag AttrConstruct ((:) AttrOpTag AttrGet ([] AttrOpTag)))

constructProgressBarPulseStep :: IsProgressBar o => Double -> IO (GValueConstruct o)

getProgressBarPulseStep :: (MonadIO m, IsProgressBar o) => o -> m Double

progressBarPulseStep :: AttrLabelProxy "pulseStep"

setProgressBarPulseStep :: (MonadIO m, IsProgressBar o) => o -> Double -> m ()

showText

data ProgressBarShowTextPropertyInfo

Instances

AttrInfo ProgressBarShowTextPropertyInfo

Associated Types

type AttrAllowedOps ProgressBarShowTextPropertyInfo :: [AttrOpTag]

type AttrSetTypeConstraint ProgressBarShowTextPropertyInfo :: * -> Constraint

type AttrBaseTypeConstraint ProgressBarShowTextPropertyInfo :: * -> Constraint

type AttrGetType ProgressBarShowTextPropertyInfo :: *

type AttrLabel ProgressBarShowTextPropertyInfo :: Symbol

type AttrOrigin ProgressBarShowTextPropertyInfo :: *

Methods

attrGet :: AttrBaseTypeConstraint ProgressBarShowTextPropertyInfo o => Proxy * ProgressBarShowTextPropertyInfo -> o -> IO (AttrGetType ProgressBarShowTextPropertyInfo)

attrSet :: (AttrBaseTypeConstraint ProgressBarShowTextPropertyInfo o, AttrSetTypeConstraint ProgressBarShowTextPropertyInfo b) => Proxy * ProgressBarShowTextPropertyInfo -> o -> b -> IO ()

attrClear :: AttrBaseTypeConstraint ProgressBarShowTextPropertyInfo o => Proxy * ProgressBarShowTextPropertyInfo -> o -> IO ()

attrConstruct :: (AttrBaseTypeConstraint ProgressBarShowTextPropertyInfo o, AttrSetTypeConstraint ProgressBarShowTextPropertyInfo b) => Proxy * ProgressBarShowTextPropertyInfo -> b -> IO (GValueConstruct o)

type AttrSetTypeConstraint ProgressBarShowTextPropertyInfo

type AttrSetTypeConstraint ProgressBarShowTextPropertyInfo = * ~ Bool

type AttrOrigin ProgressBarShowTextPropertyInfo

type AttrOrigin ProgressBarShowTextPropertyInfo = ProgressBar

type AttrLabel ProgressBarShowTextPropertyInfo

type AttrLabel ProgressBarShowTextPropertyInfo = "show-text"

type AttrGetType ProgressBarShowTextPropertyInfo

type AttrGetType ProgressBarShowTextPropertyInfo = Bool

type AttrBaseTypeConstraint ProgressBarShowTextPropertyInfo

type AttrBaseTypeConstraint ProgressBarShowTextPropertyInfo = IsProgressBar

type AttrAllowedOps ProgressBarShowTextPropertyInfo

type AttrAllowedOps ProgressBarShowTextPropertyInfo = (:) AttrOpTag AttrSet ((:) AttrOpTag AttrConstruct ((:) AttrOpTag AttrGet ([] AttrOpTag)))

constructProgressBarShowText :: IsProgressBar o => Bool -> IO (GValueConstruct o)

getProgressBarShowText :: (MonadIO m, IsProgressBar o) => o -> m Bool

progressBarShowText :: AttrLabelProxy "showText"

setProgressBarShowText :: (MonadIO m, IsProgressBar o) => o -> Bool -> m ()

text

data ProgressBarTextPropertyInfo

Instances

AttrInfo ProgressBarTextPropertyInfo

Associated Types

type AttrAllowedOps ProgressBarTextPropertyInfo :: [AttrOpTag]

type AttrSetTypeConstraint ProgressBarTextPropertyInfo :: * -> Constraint

type AttrBaseTypeConstraint ProgressBarTextPropertyInfo :: * -> Constraint

type AttrGetType ProgressBarTextPropertyInfo :: *

type AttrLabel ProgressBarTextPropertyInfo :: Symbol

type AttrOrigin ProgressBarTextPropertyInfo :: *

Methods

attrGet :: AttrBaseTypeConstraint ProgressBarTextPropertyInfo o => Proxy * ProgressBarTextPropertyInfo -> o -> IO (AttrGetType ProgressBarTextPropertyInfo)

attrSet :: (AttrBaseTypeConstraint ProgressBarTextPropertyInfo o, AttrSetTypeConstraint ProgressBarTextPropertyInfo b) => Proxy * ProgressBarTextPropertyInfo -> o -> b -> IO ()

attrClear :: AttrBaseTypeConstraint ProgressBarTextPropertyInfo o => Proxy * ProgressBarTextPropertyInfo -> o -> IO ()

attrConstruct :: (AttrBaseTypeConstraint ProgressBarTextPropertyInfo o, AttrSetTypeConstraint ProgressBarTextPropertyInfo b) => Proxy * ProgressBarTextPropertyInfo -> b -> IO (GValueConstruct o)

type AttrSetTypeConstraint ProgressBarTextPropertyInfo

type AttrSetTypeConstraint ProgressBarTextPropertyInfo = * ~ Text

type AttrOrigin ProgressBarTextPropertyInfo

type AttrOrigin ProgressBarTextPropertyInfo = ProgressBar

type AttrLabel ProgressBarTextPropertyInfo

type AttrLabel ProgressBarTextPropertyInfo = "text"

type AttrGetType ProgressBarTextPropertyInfo

type AttrGetType ProgressBarTextPropertyInfo = Maybe Text

type AttrBaseTypeConstraint ProgressBarTextPropertyInfo

type AttrBaseTypeConstraint ProgressBarTextPropertyInfo = IsProgressBar

type AttrAllowedOps ProgressBarTextPropertyInfo

type AttrAllowedOps ProgressBarTextPropertyInfo = (:) AttrOpTag AttrSet ((:) AttrOpTag AttrConstruct ((:) AttrOpTag AttrGet ((:) AttrOpTag AttrClear ([] AttrOpTag))))

clearProgressBarText :: (MonadIO m, IsProgressBar o) => o -> m ()

constructProgressBarText :: IsProgressBar o => Text -> IO (GValueConstruct o)

getProgressBarText :: (MonadIO m, IsProgressBar o) => o -> m (Maybe Text)

progressBarText :: AttrLabelProxy "text"

setProgressBarText :: (MonadIO m, IsProgressBar o) => o -> Text -> m ()