packages feed

gi-notify 0.2.32.12 → 0.2.32.13

raw patch · 9 files changed

+341/−184 lines, 9 filesdep ~gi-gdkpixbufdep ~gi-glibdep ~gi-gobjectPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

Dependency ranges changed: gi-gdkpixbuf, gi-glib, gi-gobject, haskell-gi-base

API changes (from Hackage documentation)

- GI.Notify.Enums: instance Enum Urgency
- GI.Notify.Enums: instance Eq Urgency
- GI.Notify.Enums: instance Show Urgency
- GI.Notify.Objects.Notification: instance (GObject o, IsDescendantOf Notification o) => NotificationK o
- GI.Notify.Objects.Notification: instance AttrInfo NotificationAppNamePropertyInfo
- GI.Notify.Objects.Notification: instance AttrInfo NotificationBodyPropertyInfo
- GI.Notify.Objects.Notification: instance AttrInfo NotificationClosedReasonPropertyInfo
- GI.Notify.Objects.Notification: instance AttrInfo NotificationIconNamePropertyInfo
- GI.Notify.Objects.Notification: instance AttrInfo NotificationIdPropertyInfo
- GI.Notify.Objects.Notification: instance AttrInfo NotificationSummaryPropertyInfo
- GI.Notify.Objects.Notification: instance GObject Notification
- GI.Notify.Objects.Notification: instance SignalInfo NotificationClosedSignalInfo
+ GI.Notify.Enums: instance GHC.Classes.Eq GI.Notify.Enums.Urgency
+ GI.Notify.Enums: instance GHC.Enum.Enum GI.Notify.Enums.Urgency
+ GI.Notify.Enums: instance GHC.Show.Show GI.Notify.Enums.Urgency
+ GI.Notify.Objects.Notification: data NotificationAddActionMethodInfo
+ GI.Notify.Objects.Notification: data NotificationClearActionsMethodInfo
+ GI.Notify.Objects.Notification: data NotificationClearHintsMethodInfo
+ GI.Notify.Objects.Notification: data NotificationCloseMethodInfo
+ GI.Notify.Objects.Notification: data NotificationGetClosedReasonMethodInfo
+ GI.Notify.Objects.Notification: data NotificationSetAppNameMethodInfo
+ GI.Notify.Objects.Notification: data NotificationSetCategoryMethodInfo
+ GI.Notify.Objects.Notification: data NotificationSetHintByteArrayMethodInfo
+ GI.Notify.Objects.Notification: data NotificationSetHintByteMethodInfo
+ GI.Notify.Objects.Notification: data NotificationSetHintDoubleMethodInfo
+ GI.Notify.Objects.Notification: data NotificationSetHintInt32MethodInfo
+ GI.Notify.Objects.Notification: data NotificationSetHintMethodInfo
+ GI.Notify.Objects.Notification: data NotificationSetHintStringMethodInfo
+ GI.Notify.Objects.Notification: data NotificationSetHintUint32MethodInfo
+ GI.Notify.Objects.Notification: data NotificationSetIconFromPixbufMethodInfo
+ GI.Notify.Objects.Notification: data NotificationSetImageFromPixbufMethodInfo
+ GI.Notify.Objects.Notification: data NotificationSetTimeoutMethodInfo
+ GI.Notify.Objects.Notification: data NotificationSetUrgencyMethodInfo
+ GI.Notify.Objects.Notification: data NotificationShowMethodInfo
+ GI.Notify.Objects.Notification: data NotificationUpdateMethodInfo
+ GI.Notify.Objects.Notification: instance (Data.GI.Base.BasicTypes.GObject o, Data.GI.Base.Overloading.IsDescendantOf GI.Notify.Objects.Notification.Notification o) => GI.Notify.Objects.Notification.NotificationK o
+ GI.Notify.Objects.Notification: instance (info Data.Type.Equality.~ GI.Notify.Objects.Notification.ResolveNotificationMethod t GI.Notify.Objects.Notification.Notification, Data.GI.Base.Overloading.MethodInfo info GI.Notify.Objects.Notification.Notification p) => Data.GI.Base.Overloading.IsLabelProxy t (GI.Notify.Objects.Notification.Notification -> p)
+ GI.Notify.Objects.Notification: instance (info Data.Type.Equality.~ GI.Notify.Objects.Notification.ResolveNotificationMethod t GI.Notify.Objects.Notification.Notification, Data.GI.Base.Overloading.MethodInfo info GI.Notify.Objects.Notification.Notification p) => GHC.OverloadedLabels.IsLabel t (GI.Notify.Objects.Notification.Notification -> p)
+ GI.Notify.Objects.Notification: instance (signature Data.Type.Equality.~ (Data.Text.Internal.Text -> Data.Text.Internal.Text -> GI.Notify.Callbacks.ActionCallback -> m ()), Control.Monad.IO.Class.MonadIO m, GI.Notify.Objects.Notification.NotificationK a) => Data.GI.Base.Overloading.MethodInfo GI.Notify.Objects.Notification.NotificationAddActionMethodInfo a signature
+ GI.Notify.Objects.Notification: instance (signature Data.Type.Equality.~ (Data.Text.Internal.Text -> Data.Text.Internal.Text -> m ()), Control.Monad.IO.Class.MonadIO m, GI.Notify.Objects.Notification.NotificationK a) => Data.GI.Base.Overloading.MethodInfo GI.Notify.Objects.Notification.NotificationSetHintStringMethodInfo a signature
+ GI.Notify.Objects.Notification: instance (signature Data.Type.Equality.~ (Data.Text.Internal.Text -> GHC.Base.Maybe Data.GI.Base.BasicTypes.GVariant -> m ()), Control.Monad.IO.Class.MonadIO m, GI.Notify.Objects.Notification.NotificationK a) => Data.GI.Base.Overloading.MethodInfo GI.Notify.Objects.Notification.NotificationSetHintMethodInfo a signature
+ GI.Notify.Objects.Notification: instance (signature Data.Type.Equality.~ (Data.Text.Internal.Text -> GHC.Base.Maybe Data.Text.Internal.Text -> GHC.Base.Maybe Data.Text.Internal.Text -> m GHC.Types.Bool), Control.Monad.IO.Class.MonadIO m, GI.Notify.Objects.Notification.NotificationK a) => Data.GI.Base.Overloading.MethodInfo GI.Notify.Objects.Notification.NotificationUpdateMethodInfo a signature
+ GI.Notify.Objects.Notification: instance (signature Data.Type.Equality.~ (Data.Text.Internal.Text -> GHC.Int.Int32 -> m ()), Control.Monad.IO.Class.MonadIO m, GI.Notify.Objects.Notification.NotificationK a) => Data.GI.Base.Overloading.MethodInfo GI.Notify.Objects.Notification.NotificationSetHintInt32MethodInfo a signature
+ GI.Notify.Objects.Notification: instance (signature Data.Type.Equality.~ (Data.Text.Internal.Text -> GHC.Types.Double -> m ()), Control.Monad.IO.Class.MonadIO m, GI.Notify.Objects.Notification.NotificationK a) => Data.GI.Base.Overloading.MethodInfo GI.Notify.Objects.Notification.NotificationSetHintDoubleMethodInfo a signature
+ GI.Notify.Objects.Notification: instance (signature Data.Type.Equality.~ (Data.Text.Internal.Text -> GHC.Word.Word32 -> m ()), Control.Monad.IO.Class.MonadIO m, GI.Notify.Objects.Notification.NotificationK a) => Data.GI.Base.Overloading.MethodInfo GI.Notify.Objects.Notification.NotificationSetHintUint32MethodInfo a signature
+ GI.Notify.Objects.Notification: instance (signature Data.Type.Equality.~ (Data.Text.Internal.Text -> GHC.Word.Word8 -> GHC.Word.Word64 -> m ()), Control.Monad.IO.Class.MonadIO m, GI.Notify.Objects.Notification.NotificationK a) => Data.GI.Base.Overloading.MethodInfo GI.Notify.Objects.Notification.NotificationSetHintByteArrayMethodInfo a signature
+ GI.Notify.Objects.Notification: instance (signature Data.Type.Equality.~ (Data.Text.Internal.Text -> GHC.Word.Word8 -> m ()), Control.Monad.IO.Class.MonadIO m, GI.Notify.Objects.Notification.NotificationK a) => Data.GI.Base.Overloading.MethodInfo GI.Notify.Objects.Notification.NotificationSetHintByteMethodInfo a signature
+ GI.Notify.Objects.Notification: instance (signature Data.Type.Equality.~ (Data.Text.Internal.Text -> m ()), Control.Monad.IO.Class.MonadIO m, GI.Notify.Objects.Notification.NotificationK a) => Data.GI.Base.Overloading.MethodInfo GI.Notify.Objects.Notification.NotificationSetAppNameMethodInfo a signature
+ GI.Notify.Objects.Notification: instance (signature Data.Type.Equality.~ (Data.Text.Internal.Text -> m ()), Control.Monad.IO.Class.MonadIO m, GI.Notify.Objects.Notification.NotificationK a) => Data.GI.Base.Overloading.MethodInfo GI.Notify.Objects.Notification.NotificationSetCategoryMethodInfo a signature
+ GI.Notify.Objects.Notification: instance (signature Data.Type.Equality.~ (GHC.Int.Int32 -> m ()), Control.Monad.IO.Class.MonadIO m, GI.Notify.Objects.Notification.NotificationK a) => Data.GI.Base.Overloading.MethodInfo GI.Notify.Objects.Notification.NotificationSetTimeoutMethodInfo a signature
+ GI.Notify.Objects.Notification: instance (signature Data.Type.Equality.~ (GI.Notify.Enums.Urgency -> m ()), Control.Monad.IO.Class.MonadIO m, GI.Notify.Objects.Notification.NotificationK a) => Data.GI.Base.Overloading.MethodInfo GI.Notify.Objects.Notification.NotificationSetUrgencyMethodInfo a signature
+ GI.Notify.Objects.Notification: instance (signature Data.Type.Equality.~ (b -> m ()), Control.Monad.IO.Class.MonadIO m, GI.Notify.Objects.Notification.NotificationK a, GI.GdkPixbuf.Objects.Pixbuf.PixbufK b) => Data.GI.Base.Overloading.MethodInfo GI.Notify.Objects.Notification.NotificationSetIconFromPixbufMethodInfo a signature
+ GI.Notify.Objects.Notification: instance (signature Data.Type.Equality.~ (b -> m ()), Control.Monad.IO.Class.MonadIO m, GI.Notify.Objects.Notification.NotificationK a, GI.GdkPixbuf.Objects.Pixbuf.PixbufK b) => Data.GI.Base.Overloading.MethodInfo GI.Notify.Objects.Notification.NotificationSetImageFromPixbufMethodInfo a signature
+ GI.Notify.Objects.Notification: instance (signature Data.Type.Equality.~ m (), Control.Monad.IO.Class.MonadIO m, GI.Notify.Objects.Notification.NotificationK a) => Data.GI.Base.Overloading.MethodInfo GI.Notify.Objects.Notification.NotificationClearActionsMethodInfo a signature
+ GI.Notify.Objects.Notification: instance (signature Data.Type.Equality.~ m (), Control.Monad.IO.Class.MonadIO m, GI.Notify.Objects.Notification.NotificationK a) => Data.GI.Base.Overloading.MethodInfo GI.Notify.Objects.Notification.NotificationClearHintsMethodInfo a signature
+ GI.Notify.Objects.Notification: instance (signature Data.Type.Equality.~ m (), Control.Monad.IO.Class.MonadIO m, GI.Notify.Objects.Notification.NotificationK a) => Data.GI.Base.Overloading.MethodInfo GI.Notify.Objects.Notification.NotificationCloseMethodInfo a signature
+ GI.Notify.Objects.Notification: instance (signature Data.Type.Equality.~ m (), Control.Monad.IO.Class.MonadIO m, GI.Notify.Objects.Notification.NotificationK a) => Data.GI.Base.Overloading.MethodInfo GI.Notify.Objects.Notification.NotificationShowMethodInfo a signature
+ GI.Notify.Objects.Notification: instance (signature Data.Type.Equality.~ m GHC.Int.Int32, Control.Monad.IO.Class.MonadIO m, GI.Notify.Objects.Notification.NotificationK a) => Data.GI.Base.Overloading.MethodInfo GI.Notify.Objects.Notification.NotificationGetClosedReasonMethodInfo a signature
+ GI.Notify.Objects.Notification: instance Data.GI.Base.Attributes.AttrInfo GI.Notify.Objects.Notification.NotificationAppNamePropertyInfo
+ GI.Notify.Objects.Notification: instance Data.GI.Base.Attributes.AttrInfo GI.Notify.Objects.Notification.NotificationBodyPropertyInfo
+ GI.Notify.Objects.Notification: instance Data.GI.Base.Attributes.AttrInfo GI.Notify.Objects.Notification.NotificationClosedReasonPropertyInfo
+ GI.Notify.Objects.Notification: instance Data.GI.Base.Attributes.AttrInfo GI.Notify.Objects.Notification.NotificationIconNamePropertyInfo
+ GI.Notify.Objects.Notification: instance Data.GI.Base.Attributes.AttrInfo GI.Notify.Objects.Notification.NotificationIdPropertyInfo
+ GI.Notify.Objects.Notification: instance Data.GI.Base.Attributes.AttrInfo GI.Notify.Objects.Notification.NotificationSummaryPropertyInfo
+ GI.Notify.Objects.Notification: instance Data.GI.Base.BasicTypes.GObject GI.Notify.Objects.Notification.Notification
+ GI.Notify.Objects.Notification: instance Data.GI.Base.Signals.SignalInfo GI.Notify.Objects.Notification.NotificationClosedSignalInfo
- GI.Notify.Functions: getAppName :: MonadIO m => m Text
+ GI.Notify.Functions: getAppName :: (MonadIO m) => m Text
- GI.Notify.Functions: getServerCaps :: MonadIO m => m [Text]
+ GI.Notify.Functions: getServerCaps :: (MonadIO m) => m [Text]
- GI.Notify.Functions: getServerInfo :: MonadIO m => m (Bool, Text, Text, Text, Text)
+ GI.Notify.Functions: getServerInfo :: (MonadIO m) => m (Bool, Text, Text, Text, Text)
- GI.Notify.Functions: init :: MonadIO m => Text -> m Bool
+ GI.Notify.Functions: init :: (MonadIO m) => Text -> m Bool
- GI.Notify.Functions: isInitted :: MonadIO m => m Bool
+ GI.Notify.Functions: isInitted :: (MonadIO m) => m Bool
- GI.Notify.Functions: setAppName :: MonadIO m => Text -> m ()
+ GI.Notify.Functions: setAppName :: (MonadIO m) => Text -> m ()
- GI.Notify.Functions: uninit :: MonadIO m => m ()
+ GI.Notify.Functions: uninit :: (MonadIO m) => m ()
- GI.Notify.Objects.Notification: notificationNew :: MonadIO m => Text -> Maybe (Text) -> Maybe (Text) -> m Notification
+ GI.Notify.Objects.Notification: notificationNew :: (MonadIO m) => Text -> Maybe (Text) -> Maybe (Text) -> m Notification

Files

GI/Notify.hs view
@@ -1,4 +1,5 @@ + {- | Copyright  : Will Thompson, Iñaki García Etxebarria and Jonas Platte License    : LGPL-2.1@@ -13,6 +14,10 @@     module GI.Notify.Objects                ,  ++    module Data.GI.Base                     ,++     ) where  import GI.Notify.Callbacks@@ -31,4 +36,5 @@ import GI.Notify.Types import GI.Notify.Callbacks +import Data.GI.Base 
GI/Notify/Callbacks.hs view
@@ -1,4 +1,5 @@ + {- | Copyright  : Will Thompson, Iñaki García Etxebarria and Jonas Platte License    : LGPL-2.1
GI/Notify/Constants.hs view
@@ -1,5 +1,6 @@ {-# LANGUAGE PatternSynonyms, ScopedTypeVariables, ViewPatterns #-} + {- | Copyright  : Will Thompson, Iñaki García Etxebarria and Jonas Platte License    : LGPL-2.1
GI/Notify/Enums.hs view
@@ -1,4 +1,5 @@ + {- | Copyright  : Will Thompson, Iñaki García Etxebarria and Jonas Platte License    : LGPL-2.1
GI/Notify/Functions.hs view
@@ -1,4 +1,5 @@ + {- | Copyright  : Will Thompson, Iñaki García Etxebarria and Jonas Platte License    : LGPL-2.1@@ -54,7 +55,6 @@ -- function notify_uninit -- Args : [] -- Lengths : []--- hInArgs : [] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False@@ -65,16 +65,15 @@  uninit ::     (MonadIO m) =>-    m ()+    m ()                                    -- result uninit  = liftIO $ do     notify_uninit     return ()   -- function notify_set_app_name--- Args : [Arg {argName = "app_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]+-- Args : [Arg {argCName = "app_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : []--- hInArgs : [Arg {argName = "app_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False@@ -86,19 +85,18 @@  setAppName ::     (MonadIO m) =>-    T.Text ->                               -- app_name-    m ()-setAppName app_name = liftIO $ do-    app_name' <- textToCString app_name-    notify_set_app_name app_name'-    freeMem app_name'+    T.Text                                  -- appName+    -> m ()                                 -- result+setAppName appName = liftIO $ do+    appName' <- textToCString appName+    notify_set_app_name appName'+    freeMem appName'     return ()   -- function notify_is_initted -- Args : [] -- Lengths : []--- hInArgs : [] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False@@ -109,7 +107,7 @@  isInitted ::     (MonadIO m) =>-    m Bool+    m Bool                                  -- result isInitted  = liftIO $ do     result <- notify_is_initted     let result' = (/= 0) result@@ -117,9 +115,8 @@   -- function notify_init--- Args : [Arg {argName = "app_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]+-- Args : [Arg {argCName = "app_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : []--- hInArgs : [Arg {argName = "app_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False@@ -131,20 +128,19 @@  init ::     (MonadIO m) =>-    T.Text ->                               -- app_name-    m Bool-init app_name = liftIO $ do-    app_name' <- textToCString app_name-    result <- notify_init app_name'+    T.Text                                  -- appName+    -> m Bool                               -- result+init appName = liftIO $ do+    appName' <- textToCString appName+    result <- notify_init appName'     let result' = (/= 0) result-    freeMem app_name'+    freeMem appName'     return result'   -- function notify_get_server_info--- Args : [Arg {argName = "ret_name", argType = TBasicType TUTF8, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferEverything},Arg {argName = "ret_vendor", argType = TBasicType TUTF8, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferEverything},Arg {argName = "ret_version", argType = TBasicType TUTF8, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferEverything},Arg {argName = "ret_spec_version", argType = TBasicType TUTF8, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferEverything}]+-- Args : [Arg {argCName = "ret_name", argType = TBasicType TUTF8, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything},Arg {argCName = "ret_vendor", argType = TBasicType TUTF8, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything},Arg {argCName = "ret_version", argType = TBasicType TUTF8, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything},Arg {argCName = "ret_spec_version", argType = TBasicType TUTF8, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything}] -- Lengths : []--- hInArgs : [] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False@@ -159,37 +155,36 @@  getServerInfo ::     (MonadIO m) =>-    m (Bool,T.Text,T.Text,T.Text,T.Text)+    m (Bool,T.Text,T.Text,T.Text,T.Text)    -- result getServerInfo  = liftIO $ do-    ret_name <- allocMem :: IO (Ptr CString)-    ret_vendor <- allocMem :: IO (Ptr CString)-    ret_version <- allocMem :: IO (Ptr CString)-    ret_spec_version <- allocMem :: IO (Ptr CString)-    result <- notify_get_server_info ret_name ret_vendor ret_version ret_spec_version+    retName <- allocMem :: IO (Ptr CString)+    retVendor <- allocMem :: IO (Ptr CString)+    retVersion <- allocMem :: IO (Ptr CString)+    retSpecVersion <- allocMem :: IO (Ptr CString)+    result <- notify_get_server_info retName retVendor retVersion retSpecVersion     let result' = (/= 0) result-    ret_name' <- peek ret_name-    ret_name'' <- cstringToText ret_name'-    freeMem ret_name'-    ret_vendor' <- peek ret_vendor-    ret_vendor'' <- cstringToText ret_vendor'-    freeMem ret_vendor'-    ret_version' <- peek ret_version-    ret_version'' <- cstringToText ret_version'-    freeMem ret_version'-    ret_spec_version' <- peek ret_spec_version-    ret_spec_version'' <- cstringToText ret_spec_version'-    freeMem ret_spec_version'-    freeMem ret_name-    freeMem ret_vendor-    freeMem ret_version-    freeMem ret_spec_version-    return (result', ret_name'', ret_vendor'', ret_version'', ret_spec_version'')+    retName' <- peek retName+    retName'' <- cstringToText retName'+    freeMem retName'+    retVendor' <- peek retVendor+    retVendor'' <- cstringToText retVendor'+    freeMem retVendor'+    retVersion' <- peek retVersion+    retVersion'' <- cstringToText retVersion'+    freeMem retVersion'+    retSpecVersion' <- peek retSpecVersion+    retSpecVersion'' <- cstringToText retSpecVersion'+    freeMem retSpecVersion'+    freeMem retName+    freeMem retVendor+    freeMem retVersion+    freeMem retSpecVersion+    return (result', retName'', retVendor'', retVersion'', retSpecVersion'')   -- function notify_get_server_caps -- Args : [] -- Lengths : []--- hInArgs : [] -- returnType : TGList (TBasicType TUTF8) -- throws : False -- Skip return : False@@ -200,7 +195,7 @@  getServerCaps ::     (MonadIO m) =>-    m [T.Text]+    m [T.Text]                              -- result getServerCaps  = liftIO $ do     result <- notify_get_server_caps     checkUnexpectedReturnNULL "notify_get_server_caps" result@@ -214,7 +209,6 @@ -- function notify_get_app_name -- Args : [] -- Lengths : []--- hInArgs : [] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False@@ -225,7 +219,7 @@  getAppName ::     (MonadIO m) =>-    m T.Text+    m T.Text                                -- result getAppName  = liftIO $ do     result <- notify_get_app_name     checkUnexpectedReturnNULL "notify_get_app_name" result
GI/Notify/Objects.hs view
@@ -1,4 +1,5 @@ + {- | Copyright  : Will Thompson, Iñaki García Etxebarria and Jonas Platte License    : LGPL-2.1
GI/Notify/Objects/Notification.hs view
@@ -1,4 +1,5 @@ + {- | Copyright  : Will Thompson, Iñaki García Etxebarria and Jonas Platte License    : LGPL-2.1@@ -17,22 +18,27 @@   -- * Methods -- ** notificationAddAction+    NotificationAddActionMethodInfo         ,     notificationAddAction                   ,   -- ** notificationClearActions+    NotificationClearActionsMethodInfo      ,     notificationClearActions                ,   -- ** notificationClearHints+    NotificationClearHintsMethodInfo        ,     notificationClearHints                  ,   -- ** notificationClose+    NotificationCloseMethodInfo             ,     notificationClose                       ,   -- ** notificationGetClosedReason+    NotificationGetClosedReasonMethodInfo   ,     notificationGetClosedReason             ,  @@ -41,62 +47,77 @@   -- ** notificationSetAppName+    NotificationSetAppNameMethodInfo        ,     notificationSetAppName                  ,   -- ** notificationSetCategory+    NotificationSetCategoryMethodInfo       ,     notificationSetCategory                 ,   -- ** notificationSetHint+    NotificationSetHintMethodInfo           ,     notificationSetHint                     ,   -- ** notificationSetHintByte+    NotificationSetHintByteMethodInfo       ,     notificationSetHintByte                 ,   -- ** notificationSetHintByteArray+    NotificationSetHintByteArrayMethodInfo  ,     notificationSetHintByteArray            ,   -- ** notificationSetHintDouble+    NotificationSetHintDoubleMethodInfo     ,     notificationSetHintDouble               ,   -- ** notificationSetHintInt32+    NotificationSetHintInt32MethodInfo      ,     notificationSetHintInt32                ,   -- ** notificationSetHintString+    NotificationSetHintStringMethodInfo     ,     notificationSetHintString               ,   -- ** notificationSetHintUint32+    NotificationSetHintUint32MethodInfo     ,     notificationSetHintUint32               ,   -- ** notificationSetIconFromPixbuf+    NotificationSetIconFromPixbufMethodInfo ,     notificationSetIconFromPixbuf           ,   -- ** notificationSetImageFromPixbuf+    NotificationSetImageFromPixbufMethodInfo,     notificationSetImageFromPixbuf          ,   -- ** notificationSetTimeout+    NotificationSetTimeoutMethodInfo        ,     notificationSetTimeout                  ,   -- ** notificationSetUrgency+    NotificationSetUrgencyMethodInfo        ,     notificationSetUrgency                  ,   -- ** notificationShow+    NotificationShowMethodInfo              ,     notificationShow                        ,   -- ** notificationUpdate+    NotificationUpdateMethodInfo            ,     notificationUpdate                      ,  @@ -196,6 +217,59 @@ noNotification :: Maybe Notification noNotification = Nothing +type family ResolveNotificationMethod (t :: Symbol) (o :: *) :: * where+    ResolveNotificationMethod "addAction" o = NotificationAddActionMethodInfo+    ResolveNotificationMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo+    ResolveNotificationMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo+    ResolveNotificationMethod "clearActions" o = NotificationClearActionsMethodInfo+    ResolveNotificationMethod "clearHints" o = NotificationClearHintsMethodInfo+    ResolveNotificationMethod "close" o = NotificationCloseMethodInfo+    ResolveNotificationMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo+    ResolveNotificationMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo+    ResolveNotificationMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo+    ResolveNotificationMethod "notify" o = GObject.ObjectNotifyMethodInfo+    ResolveNotificationMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo+    ResolveNotificationMethod "ref" o = GObject.ObjectRefMethodInfo+    ResolveNotificationMethod "refSink" o = GObject.ObjectRefSinkMethodInfo+    ResolveNotificationMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo+    ResolveNotificationMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo+    ResolveNotificationMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo+    ResolveNotificationMethod "show" o = NotificationShowMethodInfo+    ResolveNotificationMethod "stealData" o = GObject.ObjectStealDataMethodInfo+    ResolveNotificationMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo+    ResolveNotificationMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo+    ResolveNotificationMethod "unref" o = GObject.ObjectUnrefMethodInfo+    ResolveNotificationMethod "update" o = NotificationUpdateMethodInfo+    ResolveNotificationMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo+    ResolveNotificationMethod "getClosedReason" o = NotificationGetClosedReasonMethodInfo+    ResolveNotificationMethod "getData" o = GObject.ObjectGetDataMethodInfo+    ResolveNotificationMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo+    ResolveNotificationMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo+    ResolveNotificationMethod "setAppName" o = NotificationSetAppNameMethodInfo+    ResolveNotificationMethod "setCategory" o = NotificationSetCategoryMethodInfo+    ResolveNotificationMethod "setData" o = GObject.ObjectSetDataMethodInfo+    ResolveNotificationMethod "setHint" o = NotificationSetHintMethodInfo+    ResolveNotificationMethod "setHintByte" o = NotificationSetHintByteMethodInfo+    ResolveNotificationMethod "setHintByteArray" o = NotificationSetHintByteArrayMethodInfo+    ResolveNotificationMethod "setHintDouble" o = NotificationSetHintDoubleMethodInfo+    ResolveNotificationMethod "setHintInt32" o = NotificationSetHintInt32MethodInfo+    ResolveNotificationMethod "setHintString" o = NotificationSetHintStringMethodInfo+    ResolveNotificationMethod "setHintUint32" o = NotificationSetHintUint32MethodInfo+    ResolveNotificationMethod "setIconFromPixbuf" o = NotificationSetIconFromPixbufMethodInfo+    ResolveNotificationMethod "setImageFromPixbuf" o = NotificationSetImageFromPixbufMethodInfo+    ResolveNotificationMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo+    ResolveNotificationMethod "setTimeout" o = NotificationSetTimeoutMethodInfo+    ResolveNotificationMethod "setUrgency" o = NotificationSetUrgencyMethodInfo+    ResolveNotificationMethod l o = MethodResolutionFailed l o++instance (info ~ ResolveNotificationMethod t Notification, MethodInfo info Notification p) => IsLabelProxy t (Notification -> p) where+    fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)++#if MIN_VERSION_base(4,9,0)+instance (info ~ ResolveNotificationMethod t Notification, MethodInfo info Notification p) => IsLabel t (Notification -> p) where+    fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)+#endif+ -- signal Notification::closed type NotificationClosedCallback =     IO ()@@ -253,7 +327,7 @@     type AttrSetTypeConstraint NotificationAppNamePropertyInfo = (~) T.Text     type AttrBaseTypeConstraint NotificationAppNamePropertyInfo = NotificationK     type AttrGetType NotificationAppNamePropertyInfo = T.Text-    type AttrLabel NotificationAppNamePropertyInfo = "Notification::app-name"+    type AttrLabel NotificationAppNamePropertyInfo = "app-name"     attrGet _ = getNotificationAppName     attrSet _ = setNotificationAppName     attrConstruct _ = constructNotificationAppName@@ -277,7 +351,7 @@     type AttrSetTypeConstraint NotificationBodyPropertyInfo = (~) T.Text     type AttrBaseTypeConstraint NotificationBodyPropertyInfo = NotificationK     type AttrGetType NotificationBodyPropertyInfo = T.Text-    type AttrLabel NotificationBodyPropertyInfo = "Notification::body"+    type AttrLabel NotificationBodyPropertyInfo = "body"     attrGet _ = getNotificationBody     attrSet _ = setNotificationBody     attrConstruct _ = constructNotificationBody@@ -295,7 +369,7 @@     type AttrSetTypeConstraint NotificationClosedReasonPropertyInfo = (~) ()     type AttrBaseTypeConstraint NotificationClosedReasonPropertyInfo = NotificationK     type AttrGetType NotificationClosedReasonPropertyInfo = Int32-    type AttrLabel NotificationClosedReasonPropertyInfo = "Notification::closed-reason"+    type AttrLabel NotificationClosedReasonPropertyInfo = "closed-reason"     attrGet _ = getNotificationClosedReason     attrSet _ = undefined     attrConstruct _ = undefined@@ -319,7 +393,7 @@     type AttrSetTypeConstraint NotificationIconNamePropertyInfo = (~) T.Text     type AttrBaseTypeConstraint NotificationIconNamePropertyInfo = NotificationK     type AttrGetType NotificationIconNamePropertyInfo = T.Text-    type AttrLabel NotificationIconNamePropertyInfo = "Notification::icon-name"+    type AttrLabel NotificationIconNamePropertyInfo = "icon-name"     attrGet _ = getNotificationIconName     attrSet _ = setNotificationIconName     attrConstruct _ = constructNotificationIconName@@ -343,7 +417,7 @@     type AttrSetTypeConstraint NotificationIdPropertyInfo = (~) Int32     type AttrBaseTypeConstraint NotificationIdPropertyInfo = NotificationK     type AttrGetType NotificationIdPropertyInfo = Int32-    type AttrLabel NotificationIdPropertyInfo = "Notification::id"+    type AttrLabel NotificationIdPropertyInfo = "id"     attrGet _ = getNotificationId     attrSet _ = setNotificationId     attrConstruct _ = constructNotificationId@@ -367,13 +441,13 @@     type AttrSetTypeConstraint NotificationSummaryPropertyInfo = (~) T.Text     type AttrBaseTypeConstraint NotificationSummaryPropertyInfo = NotificationK     type AttrGetType NotificationSummaryPropertyInfo = T.Text-    type AttrLabel NotificationSummaryPropertyInfo = "Notification::summary"+    type AttrLabel NotificationSummaryPropertyInfo = "summary"     attrGet _ = getNotificationSummary     attrSet _ = setNotificationSummary     attrConstruct _ = constructNotificationSummary  type instance AttributeList Notification = NotificationAttributeList-type NotificationAttributeList = ('[ '("app-name", NotificationAppNamePropertyInfo), '("body", NotificationBodyPropertyInfo), '("closed-reason", NotificationClosedReasonPropertyInfo), '("icon-name", NotificationIconNamePropertyInfo), '("id", NotificationIdPropertyInfo), '("summary", NotificationSummaryPropertyInfo)] :: [(Symbol, *)])+type NotificationAttributeList = ('[ '("appName", NotificationAppNamePropertyInfo), '("body", NotificationBodyPropertyInfo), '("closedReason", NotificationClosedReasonPropertyInfo), '("iconName", NotificationIconNamePropertyInfo), '("id", NotificationIdPropertyInfo), '("summary", NotificationSummaryPropertyInfo)] :: [(Symbol, *)])  data NotificationClosedSignalInfo instance SignalInfo NotificationClosedSignalInfo where@@ -381,13 +455,12 @@     connectSignal _ = connectNotificationClosed  type instance SignalList Notification = NotificationSignalList-type NotificationSignalList = ('[ '("closed", NotificationClosedSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)])+type NotificationSignalList = ('[ '("closed", NotificationClosedSignalInfo), '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)])  -- method Notification::new -- method type : Constructor--- Args : [Arg {argName = "summary", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "body", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "icon", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]+-- Args : [Arg {argCName = "summary", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "body", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "icon", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : []--- hInArgs : [Arg {argName = "summary", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "body", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "icon", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "Notify" "Notification" -- throws : False -- Skip return : False@@ -401,10 +474,10 @@  notificationNew ::     (MonadIO m) =>-    T.Text ->                               -- summary-    Maybe (T.Text) ->                       -- body-    Maybe (T.Text) ->                       -- icon-    m Notification+    T.Text                                  -- summary+    -> Maybe (T.Text)                       -- body+    -> Maybe (T.Text)                       -- icon+    -> m Notification                       -- result notificationNew summary body icon = liftIO $ do     summary' <- textToCString summary     maybeBody <- case body of@@ -427,9 +500,8 @@  -- method Notification::add_action -- method type : OrdinaryMethod--- Args : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "action", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "label", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "callback", argType = TInterface "Notify" "ActionCallback", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeNotified, argClosure = 4, argDestroy = 5, transfer = TransferNothing},Arg {argName = "user_data", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "free_func", argType = TInterface "GLib" "DestroyNotify", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeAsync, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]+-- Args : [Arg {argCName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "action", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "label", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "callback", argType = TInterface "Notify" "ActionCallback", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeNotified, argClosure = 4, argDestroy = 5, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "user_data", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "free_func", argType = TInterface "GLib" "DestroyNotify", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeAsync, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : []--- hInArgs : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "action", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "label", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "callback", argType = TInterface "Notify" "ActionCallback", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeNotified, argClosure = 4, argDestroy = 5, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False@@ -446,29 +518,32 @@  notificationAddAction ::     (MonadIO m, NotificationK a) =>-    a ->                                    -- _obj-    T.Text ->                               -- action-    T.Text ->                               -- label-    ActionCallback ->                       -- callback-    m ()+    a                                       -- _obj+    -> T.Text                               -- action+    -> T.Text                               -- label+    -> ActionCallback                       -- callback+    -> m ()                                 -- result notificationAddAction _obj action label callback = liftIO $ do     let _obj' = unsafeManagedPtrCastPtr _obj     action' <- textToCString action     label' <- textToCString label     callback' <- mkActionCallback (actionCallbackWrapper Nothing callback)-    let user_data = castFunPtrToPtr callback'-    let free_func = safeFreeFunPtrPtr-    notify_notification_add_action _obj' action' label' callback' user_data free_func+    let userData = castFunPtrToPtr callback'+    let freeFunc = safeFreeFunPtrPtr+    notify_notification_add_action _obj' action' label' callback' userData freeFunc     touchManagedPtr _obj     freeMem action'     freeMem label'     return () +data NotificationAddActionMethodInfo+instance (signature ~ (T.Text -> T.Text -> ActionCallback -> m ()), MonadIO m, NotificationK a) => MethodInfo NotificationAddActionMethodInfo a signature where+    overloadedMethod _ = notificationAddAction+ -- method Notification::clear_actions -- method type : OrdinaryMethod--- Args : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]+-- Args : [Arg {argCName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : []--- hInArgs : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False@@ -480,19 +555,22 @@  notificationClearActions ::     (MonadIO m, NotificationK a) =>-    a ->                                    -- _obj-    m ()+    a                                       -- _obj+    -> m ()                                 -- result notificationClearActions _obj = liftIO $ do     let _obj' = unsafeManagedPtrCastPtr _obj     notify_notification_clear_actions _obj'     touchManagedPtr _obj     return () +data NotificationClearActionsMethodInfo+instance (signature ~ (m ()), MonadIO m, NotificationK a) => MethodInfo NotificationClearActionsMethodInfo a signature where+    overloadedMethod _ = notificationClearActions+ -- method Notification::clear_hints -- method type : OrdinaryMethod--- Args : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]+-- Args : [Arg {argCName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : []--- hInArgs : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False@@ -504,19 +582,22 @@  notificationClearHints ::     (MonadIO m, NotificationK a) =>-    a ->                                    -- _obj-    m ()+    a                                       -- _obj+    -> m ()                                 -- result notificationClearHints _obj = liftIO $ do     let _obj' = unsafeManagedPtrCastPtr _obj     notify_notification_clear_hints _obj'     touchManagedPtr _obj     return () +data NotificationClearHintsMethodInfo+instance (signature ~ (m ()), MonadIO m, NotificationK a) => MethodInfo NotificationClearHintsMethodInfo a signature where+    overloadedMethod _ = notificationClearHints+ -- method Notification::close -- method type : OrdinaryMethod--- Args : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]+-- Args : [Arg {argCName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : []--- hInArgs : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : True -- Skip return : False@@ -529,8 +610,8 @@  notificationClose ::     (MonadIO m, NotificationK a) =>-    a ->                                    -- _obj-    m ()+    a                                       -- _obj+    -> m ()                                 -- result notificationClose _obj = liftIO $ do     let _obj' = unsafeManagedPtrCastPtr _obj     onException (do@@ -541,11 +622,14 @@         return ()      ) +data NotificationCloseMethodInfo+instance (signature ~ (m ()), MonadIO m, NotificationK a) => MethodInfo NotificationCloseMethodInfo a signature where+    overloadedMethod _ = notificationClose+ -- method Notification::get_closed_reason -- method type : OrdinaryMethod--- Args : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]+-- Args : [Arg {argCName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : []--- hInArgs : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt32 -- throws : False -- Skip return : False@@ -557,19 +641,22 @@  notificationGetClosedReason ::     (MonadIO m, NotificationK a) =>-    a ->                                    -- _obj-    m Int32+    a                                       -- _obj+    -> m Int32                              -- result notificationGetClosedReason _obj = liftIO $ do     let _obj' = unsafeManagedPtrCastPtr _obj     result <- notify_notification_get_closed_reason _obj'     touchManagedPtr _obj     return result +data NotificationGetClosedReasonMethodInfo+instance (signature ~ (m Int32), MonadIO m, NotificationK a) => MethodInfo NotificationGetClosedReasonMethodInfo a signature where+    overloadedMethod _ = notificationGetClosedReason+ -- method Notification::set_app_name -- method type : OrdinaryMethod--- Args : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "app_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]+-- Args : [Arg {argCName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "app_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : []--- hInArgs : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "app_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False@@ -582,22 +669,25 @@  notificationSetAppName ::     (MonadIO m, NotificationK a) =>-    a ->                                    -- _obj-    T.Text ->                               -- app_name-    m ()-notificationSetAppName _obj app_name = liftIO $ do+    a                                       -- _obj+    -> T.Text                               -- appName+    -> m ()                                 -- result+notificationSetAppName _obj appName = liftIO $ do     let _obj' = unsafeManagedPtrCastPtr _obj-    app_name' <- textToCString app_name-    notify_notification_set_app_name _obj' app_name'+    appName' <- textToCString appName+    notify_notification_set_app_name _obj' appName'     touchManagedPtr _obj-    freeMem app_name'+    freeMem appName'     return () +data NotificationSetAppNameMethodInfo+instance (signature ~ (T.Text -> m ()), MonadIO m, NotificationK a) => MethodInfo NotificationSetAppNameMethodInfo a signature where+    overloadedMethod _ = notificationSetAppName+ -- method Notification::set_category -- method type : OrdinaryMethod--- Args : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "category", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]+-- Args : [Arg {argCName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "category", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : []--- hInArgs : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "category", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False@@ -610,9 +700,9 @@  notificationSetCategory ::     (MonadIO m, NotificationK a) =>-    a ->                                    -- _obj-    T.Text ->                               -- category-    m ()+    a                                       -- _obj+    -> T.Text                               -- category+    -> m ()                                 -- result notificationSetCategory _obj category = liftIO $ do     let _obj' = unsafeManagedPtrCastPtr _obj     category' <- textToCString category@@ -621,11 +711,14 @@     freeMem category'     return () +data NotificationSetCategoryMethodInfo+instance (signature ~ (T.Text -> m ()), MonadIO m, NotificationK a) => MethodInfo NotificationSetCategoryMethodInfo a signature where+    overloadedMethod _ = notificationSetCategory+ -- method Notification::set_hint -- method type : OrdinaryMethod--- Args : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TVariant, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]+-- Args : [Arg {argCName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TVariant, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : []--- hInArgs : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TVariant, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False@@ -639,10 +732,10 @@  notificationSetHint ::     (MonadIO m, NotificationK a) =>-    a ->                                    -- _obj-    T.Text ->                               -- key-    Maybe (GVariant) ->                     -- value-    m ()+    a                                       -- _obj+    -> T.Text                               -- key+    -> Maybe (GVariant)                     -- value+    -> m ()                                 -- result notificationSetHint _obj key value = liftIO $ do     let _obj' = unsafeManagedPtrCastPtr _obj     key' <- textToCString key@@ -656,11 +749,14 @@     freeMem key'     return () +data NotificationSetHintMethodInfo+instance (signature ~ (T.Text -> Maybe (GVariant) -> m ()), MonadIO m, NotificationK a) => MethodInfo NotificationSetHintMethodInfo a signature where+    overloadedMethod _ = notificationSetHint+ -- method Notification::set_hint_byte -- method type : OrdinaryMethod--- Args : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUInt8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]+-- Args : [Arg {argCName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUInt8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : []--- hInArgs : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUInt8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False@@ -674,10 +770,10 @@ {-# DEPRECATED notificationSetHintByte ["(Since version 0.6.)","Use notify_notification_set_hint() instead"]#-} notificationSetHintByte ::     (MonadIO m, NotificationK a) =>-    a ->                                    -- _obj-    T.Text ->                               -- key-    Word8 ->                                -- value-    m ()+    a                                       -- _obj+    -> T.Text                               -- key+    -> Word8                                -- value+    -> m ()                                 -- result notificationSetHintByte _obj key value = liftIO $ do     let _obj' = unsafeManagedPtrCastPtr _obj     key' <- textToCString key@@ -686,11 +782,14 @@     freeMem key'     return () +data NotificationSetHintByteMethodInfo+instance (signature ~ (T.Text -> Word8 -> m ()), MonadIO m, NotificationK a) => MethodInfo NotificationSetHintByteMethodInfo a signature where+    overloadedMethod _ = notificationSetHintByte+ -- method Notification::set_hint_byte_array -- method type : OrdinaryMethod--- Args : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUInt8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "len", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]+-- Args : [Arg {argCName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUInt8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "len", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : []--- hInArgs : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUInt8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "len", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False@@ -705,11 +804,11 @@ {-# DEPRECATED notificationSetHintByteArray ["(Since version 0.6.)","Use notify_notification_set_hint() instead"]#-} notificationSetHintByteArray ::     (MonadIO m, NotificationK a) =>-    a ->                                    -- _obj-    T.Text ->                               -- key-    Word8 ->                                -- value-    Word64 ->                               -- len-    m ()+    a                                       -- _obj+    -> T.Text                               -- key+    -> Word8                                -- value+    -> Word64                               -- len+    -> m ()                                 -- result notificationSetHintByteArray _obj key value len = liftIO $ do     let _obj' = unsafeManagedPtrCastPtr _obj     key' <- textToCString key@@ -718,11 +817,14 @@     freeMem key'     return () +data NotificationSetHintByteArrayMethodInfo+instance (signature ~ (T.Text -> Word8 -> Word64 -> m ()), MonadIO m, NotificationK a) => MethodInfo NotificationSetHintByteArrayMethodInfo a signature where+    overloadedMethod _ = notificationSetHintByteArray+ -- method Notification::set_hint_double -- method type : OrdinaryMethod--- Args : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]+-- Args : [Arg {argCName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : []--- hInArgs : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False@@ -736,10 +838,10 @@ {-# DEPRECATED notificationSetHintDouble ["(Since version 0.6.)","Use notify_notification_set_hint() instead"]#-} notificationSetHintDouble ::     (MonadIO m, NotificationK a) =>-    a ->                                    -- _obj-    T.Text ->                               -- key-    Double ->                               -- value-    m ()+    a                                       -- _obj+    -> T.Text                               -- key+    -> Double                               -- value+    -> m ()                                 -- result notificationSetHintDouble _obj key value = liftIO $ do     let _obj' = unsafeManagedPtrCastPtr _obj     key' <- textToCString key@@ -749,11 +851,14 @@     freeMem key'     return () +data NotificationSetHintDoubleMethodInfo+instance (signature ~ (T.Text -> Double -> m ()), MonadIO m, NotificationK a) => MethodInfo NotificationSetHintDoubleMethodInfo a signature where+    overloadedMethod _ = notificationSetHintDouble+ -- method Notification::set_hint_int32 -- method type : OrdinaryMethod--- Args : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]+-- Args : [Arg {argCName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : []--- hInArgs : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False@@ -767,10 +872,10 @@ {-# DEPRECATED notificationSetHintInt32 ["(Since version 0.6.)","Use notify_notification_set_hint() instead"]#-} notificationSetHintInt32 ::     (MonadIO m, NotificationK a) =>-    a ->                                    -- _obj-    T.Text ->                               -- key-    Int32 ->                                -- value-    m ()+    a                                       -- _obj+    -> T.Text                               -- key+    -> Int32                                -- value+    -> m ()                                 -- result notificationSetHintInt32 _obj key value = liftIO $ do     let _obj' = unsafeManagedPtrCastPtr _obj     key' <- textToCString key@@ -779,11 +884,14 @@     freeMem key'     return () +data NotificationSetHintInt32MethodInfo+instance (signature ~ (T.Text -> Int32 -> m ()), MonadIO m, NotificationK a) => MethodInfo NotificationSetHintInt32MethodInfo a signature where+    overloadedMethod _ = notificationSetHintInt32+ -- method Notification::set_hint_string -- method type : OrdinaryMethod--- Args : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]+-- Args : [Arg {argCName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : []--- hInArgs : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False@@ -797,10 +905,10 @@ {-# DEPRECATED notificationSetHintString ["(Since version 0.6.)","Use notify_notification_set_hint() instead"]#-} notificationSetHintString ::     (MonadIO m, NotificationK a) =>-    a ->                                    -- _obj-    T.Text ->                               -- key-    T.Text ->                               -- value-    m ()+    a                                       -- _obj+    -> T.Text                               -- key+    -> T.Text                               -- value+    -> m ()                                 -- result notificationSetHintString _obj key value = liftIO $ do     let _obj' = unsafeManagedPtrCastPtr _obj     key' <- textToCString key@@ -811,11 +919,14 @@     freeMem value'     return () +data NotificationSetHintStringMethodInfo+instance (signature ~ (T.Text -> T.Text -> m ()), MonadIO m, NotificationK a) => MethodInfo NotificationSetHintStringMethodInfo a signature where+    overloadedMethod _ = notificationSetHintString+ -- method Notification::set_hint_uint32 -- method type : OrdinaryMethod--- Args : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]+-- Args : [Arg {argCName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : []--- hInArgs : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False@@ -829,10 +940,10 @@ {-# DEPRECATED notificationSetHintUint32 ["(Since version 0.6.)","Use notify_notification_set_hint() instead"]#-} notificationSetHintUint32 ::     (MonadIO m, NotificationK a) =>-    a ->                                    -- _obj-    T.Text ->                               -- key-    Word32 ->                               -- value-    m ()+    a                                       -- _obj+    -> T.Text                               -- key+    -> Word32                               -- value+    -> m ()                                 -- result notificationSetHintUint32 _obj key value = liftIO $ do     let _obj' = unsafeManagedPtrCastPtr _obj     key' <- textToCString key@@ -841,11 +952,14 @@     freeMem key'     return () +data NotificationSetHintUint32MethodInfo+instance (signature ~ (T.Text -> Word32 -> m ()), MonadIO m, NotificationK a) => MethodInfo NotificationSetHintUint32MethodInfo a signature where+    overloadedMethod _ = notificationSetHintUint32+ -- method Notification::set_icon_from_pixbuf -- method type : OrdinaryMethod--- Args : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "icon", argType = TInterface "GdkPixbuf" "Pixbuf", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]+-- Args : [Arg {argCName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "icon", argType = TInterface "GdkPixbuf" "Pixbuf", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : []--- hInArgs : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "icon", argType = TInterface "GdkPixbuf" "Pixbuf", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False@@ -858,9 +972,9 @@ {-# DEPRECATED notificationSetIconFromPixbuf ["use notify_notification_set_image_from_pixbuf() instead."]#-} notificationSetIconFromPixbuf ::     (MonadIO m, NotificationK a, GdkPixbuf.PixbufK b) =>-    a ->                                    -- _obj-    b ->                                    -- icon-    m ()+    a                                       -- _obj+    -> b                                    -- icon+    -> m ()                                 -- result notificationSetIconFromPixbuf _obj icon = liftIO $ do     let _obj' = unsafeManagedPtrCastPtr _obj     let icon' = unsafeManagedPtrCastPtr icon@@ -869,11 +983,14 @@     touchManagedPtr icon     return () +data NotificationSetIconFromPixbufMethodInfo+instance (signature ~ (b -> m ()), MonadIO m, NotificationK a, GdkPixbuf.PixbufK b) => MethodInfo NotificationSetIconFromPixbufMethodInfo a signature where+    overloadedMethod _ = notificationSetIconFromPixbuf+ -- method Notification::set_image_from_pixbuf -- method type : OrdinaryMethod--- Args : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "pixbuf", argType = TInterface "GdkPixbuf" "Pixbuf", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]+-- Args : [Arg {argCName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "pixbuf", argType = TInterface "GdkPixbuf" "Pixbuf", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : []--- hInArgs : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "pixbuf", argType = TInterface "GdkPixbuf" "Pixbuf", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False@@ -886,9 +1003,9 @@  notificationSetImageFromPixbuf ::     (MonadIO m, NotificationK a, GdkPixbuf.PixbufK b) =>-    a ->                                    -- _obj-    b ->                                    -- pixbuf-    m ()+    a                                       -- _obj+    -> b                                    -- pixbuf+    -> m ()                                 -- result notificationSetImageFromPixbuf _obj pixbuf = liftIO $ do     let _obj' = unsafeManagedPtrCastPtr _obj     let pixbuf' = unsafeManagedPtrCastPtr pixbuf@@ -897,11 +1014,14 @@     touchManagedPtr pixbuf     return () +data NotificationSetImageFromPixbufMethodInfo+instance (signature ~ (b -> m ()), MonadIO m, NotificationK a, GdkPixbuf.PixbufK b) => MethodInfo NotificationSetImageFromPixbufMethodInfo a signature where+    overloadedMethod _ = notificationSetImageFromPixbuf+ -- method Notification::set_timeout -- method type : OrdinaryMethod--- Args : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "timeout", argType = TBasicType TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]+-- Args : [Arg {argCName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "timeout", argType = TBasicType TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : []--- hInArgs : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "timeout", argType = TBasicType TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False@@ -914,20 +1034,23 @@  notificationSetTimeout ::     (MonadIO m, NotificationK a) =>-    a ->                                    -- _obj-    Int32 ->                                -- timeout-    m ()+    a                                       -- _obj+    -> Int32                                -- timeout+    -> m ()                                 -- result notificationSetTimeout _obj timeout = liftIO $ do     let _obj' = unsafeManagedPtrCastPtr _obj     notify_notification_set_timeout _obj' timeout     touchManagedPtr _obj     return () +data NotificationSetTimeoutMethodInfo+instance (signature ~ (Int32 -> m ()), MonadIO m, NotificationK a) => MethodInfo NotificationSetTimeoutMethodInfo a signature where+    overloadedMethod _ = notificationSetTimeout+ -- method Notification::set_urgency -- method type : OrdinaryMethod--- Args : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "urgency", argType = TInterface "Notify" "Urgency", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]+-- Args : [Arg {argCName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "urgency", argType = TInterface "Notify" "Urgency", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : []--- hInArgs : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "urgency", argType = TInterface "Notify" "Urgency", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False@@ -940,9 +1063,9 @@  notificationSetUrgency ::     (MonadIO m, NotificationK a) =>-    a ->                                    -- _obj-    Urgency ->                              -- urgency-    m ()+    a                                       -- _obj+    -> Urgency                              -- urgency+    -> m ()                                 -- result notificationSetUrgency _obj urgency = liftIO $ do     let _obj' = unsafeManagedPtrCastPtr _obj     let urgency' = (fromIntegral . fromEnum) urgency@@ -950,11 +1073,14 @@     touchManagedPtr _obj     return () +data NotificationSetUrgencyMethodInfo+instance (signature ~ (Urgency -> m ()), MonadIO m, NotificationK a) => MethodInfo NotificationSetUrgencyMethodInfo a signature where+    overloadedMethod _ = notificationSetUrgency+ -- method Notification::show -- method type : OrdinaryMethod--- Args : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]+-- Args : [Arg {argCName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : []--- hInArgs : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : True -- Skip return : False@@ -967,8 +1093,8 @@  notificationShow ::     (MonadIO m, NotificationK a) =>-    a ->                                    -- _obj-    m ()+    a                                       -- _obj+    -> m ()                                 -- result notificationShow _obj = liftIO $ do     let _obj' = unsafeManagedPtrCastPtr _obj     onException (do@@ -979,11 +1105,14 @@         return ()      ) +data NotificationShowMethodInfo+instance (signature ~ (m ()), MonadIO m, NotificationK a) => MethodInfo NotificationShowMethodInfo a signature where+    overloadedMethod _ = notificationShow+ -- method Notification::update -- method type : OrdinaryMethod--- Args : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "summary", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "body", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "icon", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]+-- Args : [Arg {argCName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "summary", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "body", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "icon", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : []--- hInArgs : [Arg {argName = "_obj", argType = TInterface "Notify" "Notification", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "summary", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "body", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "icon", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False@@ -998,11 +1127,11 @@  notificationUpdate ::     (MonadIO m, NotificationK a) =>-    a ->                                    -- _obj-    T.Text ->                               -- summary-    Maybe (T.Text) ->                       -- body-    Maybe (T.Text) ->                       -- icon-    m Bool+    a                                       -- _obj+    -> T.Text                               -- summary+    -> Maybe (T.Text)                       -- body+    -> Maybe (T.Text)                       -- icon+    -> m Bool                               -- result notificationUpdate _obj summary body icon = liftIO $ do     let _obj' = unsafeManagedPtrCastPtr _obj     summary' <- textToCString summary@@ -1023,5 +1152,9 @@     freeMem maybeBody     freeMem maybeIcon     return result'++data NotificationUpdateMethodInfo+instance (signature ~ (T.Text -> Maybe (T.Text) -> Maybe (T.Text) -> m Bool), MonadIO m, NotificationK a) => MethodInfo NotificationUpdateMethodInfo a signature where+    overloadedMethod _ = notificationUpdate  
GI/Notify/Objects/Notification.hs-boot view
@@ -18,3 +18,23 @@ data NotificationIdPropertyInfo data NotificationSummaryPropertyInfo data NotificationClosedSignalInfo+data NotificationAddActionMethodInfo+data NotificationClearActionsMethodInfo+data NotificationClearHintsMethodInfo+data NotificationCloseMethodInfo+data NotificationGetClosedReasonMethodInfo+data NotificationSetAppNameMethodInfo+data NotificationSetCategoryMethodInfo+data NotificationSetHintMethodInfo+data NotificationSetHintByteMethodInfo+data NotificationSetHintByteArrayMethodInfo+data NotificationSetHintDoubleMethodInfo+data NotificationSetHintInt32MethodInfo+data NotificationSetHintStringMethodInfo+data NotificationSetHintUint32MethodInfo+data NotificationSetIconFromPixbufMethodInfo+data NotificationSetImageFromPixbufMethodInfo+data NotificationSetTimeoutMethodInfo+data NotificationSetUrgencyMethodInfo+data NotificationShowMethodInfo+data NotificationUpdateMethodInfo
gi-notify.cabal view
@@ -1,6 +1,6 @@ -- Autogenerated, do not edit. name:               gi-notify-version:            0.2.32.12+version:            0.2.32.13 synopsis:           Notify bindings description:        Bindings for Notify, autogenerated by haskell-gi. homepage:           https://github.com/haskell-gi/haskell-gi@@ -14,8 +14,8 @@  library     default-language:   Haskell2010-    default-extensions: OverloadedStrings, NegativeLiterals, ConstraintKinds, TypeFamilies, MultiParamTypeClasses, KindSignatures, FlexibleInstances, UndecidableInstances, DataKinds, FlexibleContexts-    other-extensions:   PatternSynonyms ScopedTypeVariables, ViewPatterns+    default-extensions: ScopedTypeVariables, CPP, OverloadedStrings, NegativeLiterals, ConstraintKinds, TypeFamilies, MultiParamTypeClasses, KindSignatures, FlexibleInstances, UndecidableInstances, DataKinds, FlexibleContexts+    other-extensions:   PatternSynonyms ViewPatterns     ghc-options:        -fno-warn-unused-imports -fno-warn-warnings-deprecations     exposed-modules:    GI.Notify.Types                         GI.Notify@@ -27,10 +27,10 @@                         GI.Notify.Objects.Notification     pkgconfig-depends:  gdk-pixbuf-2.0 >= 2.32     build-depends: base >= 4.7 && <5,-        haskell-gi-base >= 0.12 && < 1,-        gi-glib >= 0.2.46.12 && < 0.2.47,-        gi-gobject >= 0.2.46.12 && < 0.2.47,-        gi-gdkpixbuf >= 0.2.32.12 && < 0.2.33,+        haskell-gi-base >= 0.13 && < 1,+        gi-glib >= 0.2.46.13 && < 0.2.47,+        gi-gobject >= 0.2.46.13 && < 0.2.47,+        gi-gdkpixbuf >= 0.2.32.13 && < 0.2.33,         bytestring >= 0.10,         containers >= 0.5,         text >= 1.0,