happindicator 0.0.2 → 0.0.3
raw patch · 2 files changed
+5/−2 lines, 2 files
Files
Graphics/UI/AppIndicator/AppIndicator.chs view
@@ -144,15 +144,18 @@ {# call app_indicator_set_menu #} (toAppIndicator self) (toMenu menu) +-- | This function retrieves the current status of the Application Indicator. appIndicatorGetStatus :: AppIndicatorClass self => self -> IO AppIndicatorStatus appIndicatorGetStatus self = liftM (toEnum . fromIntegral) $ {# call app_indicator_get_status #} (toAppIndicator self) +-- | This function set the status of the Application Indicator. appIndicatorSetStatus :: AppIndicatorClass self => self -> AppIndicatorStatus -> IO () appIndicatorSetStatus self stat = {# call app_indicator_set_status #} (toAppIndicator self) ((fromIntegral . fromEnum) stat) +-- | This function retrieves the category of the Application Indicator. appIndicatorGetCategory :: AppIndicatorClass self => self -> IO AppIndicatorCategory appIndicatorGetCategory self = liftM (toEnum . fromIntegral) $ {# call app_indicator_get_category #} (toAppIndicator self)
happindicator.cabal view
@@ -1,10 +1,10 @@ Name: happindicator-Version: 0.0.2+Version: 0.0.3 License: LGPL-2.1 License-file: COPYING Copyright: (c) 2011 the authors Author: Andrew Miller <andrew@amxl.com>; some parts derived from Gtk2hs by Axel Simon, Duncan Coutts and many others-Maintainer: gtk2hs-devel@list.sourceforge.net+Maintainer: gtk2hs-devel@lists.sourceforge.net Build-Type: Custom Cabal-Version: >= 1.6.0 Stability: provisional