Menu
▾
▴
gtk2hs-commit — Mailing list for Darcs commit messages.
You can subscribe to this list here.
| 2003 |
Jan
|
Feb
|
Mar
|
Apr
|
May
(4) |
Jun
|
Jul
(68) |
Aug
(4) |
Sep
|
Oct
(23) |
Nov
(95) |
Dec
(9) |
|---|---|---|---|---|---|---|---|---|---|---|---|---|
| 2004 |
Jan
(3) |
Feb
|
Mar
|
Apr
(51) |
May
(81) |
Jun
(2) |
Jul
(86) |
Aug
(143) |
Sep
(3) |
Oct
(31) |
Nov
(63) |
Dec
(90) |
| 2005 |
Jan
(277) |
Feb
(157) |
Mar
(99) |
Apr
(195) |
May
(151) |
Jun
(148) |
Jul
(98) |
Aug
(123) |
Sep
(20) |
Oct
(174) |
Nov
(155) |
Dec
(26) |
| 2006 |
Jan
(51) |
Feb
(19) |
Mar
(16) |
Apr
(12) |
May
(5) |
Jun
|
Jul
(11) |
Aug
(7) |
Sep
(10) |
Oct
(31) |
Nov
(174) |
Dec
(56) |
| 2007 |
Jan
(45) |
Feb
(52) |
Mar
(10) |
Apr
(5) |
May
(47) |
Jun
(16) |
Jul
(80) |
Aug
(29) |
Sep
(14) |
Oct
(59) |
Nov
(46) |
Dec
(16) |
| 2008 |
Jan
(10) |
Feb
(1) |
Mar
|
Apr
|
May
(49) |
Jun
(26) |
Jul
(8) |
Aug
(4) |
Sep
(25) |
Oct
(53) |
Nov
(9) |
Dec
(1) |
| 2009 |
Jan
(66) |
Feb
(11) |
Mar
(1) |
Apr
(14) |
May
(8) |
Jun
(1) |
Jul
(2) |
Aug
(2) |
Sep
(9) |
Oct
(23) |
Nov
(35) |
Dec
|
| 2010 |
Jan
(7) |
Feb
(2) |
Mar
(39) |
Apr
(19) |
May
(161) |
Jun
(19) |
Jul
(32) |
Aug
(65) |
Sep
(113) |
Oct
(120) |
Nov
(2) |
Dec
|
| 2012 |
Jan
|
Feb
(5) |
Mar
(4) |
Apr
(7) |
May
(9) |
Jun
(14) |
Jul
(1) |
Aug
|
Sep
(1) |
Oct
(1) |
Nov
(12) |
Dec
(2) |
| 2013 |
Jan
(1) |
Feb
(17) |
Mar
(4) |
Apr
(4) |
May
(9) |
Jun
|
Jul
(8) |
Aug
|
Sep
(2) |
Oct
|
Nov
|
Dec
|
|
From: Axel S. <si...@co...> - 2010-07-14 14:52:48
|
diffing dir...
Wed Jul 14 09:40:15 EDT 2010 Axe...@in...
* Acquire the Gtk lock only when initializing.
Ignore-this: e1f6d2e97259bc541a0e029c99212923
{
hunk ./gtk/Graphics/UI/Gtk/General/General.chs 140
- threadsLeave
hunk ./gtk/Graphics/UI/Gtk/General/General.chs 141
- threadsEnter
+ -- note: initizliseGThreads calls 'threadsEnter'
hunk ./gtk/Graphics/UI/Gtk/General/hsgthread.c 72
+ /* from here onwards, the Gdk lock is held */
+ GDK_THREADS_ENTER ();
}
|
|
From: Axel S. <si...@co...> - 2010-07-14 14:52:45
|
diffing dir...
Wed Jul 14 09:13:54 EDT 2010 Axe...@in...
* Add more debug output.
Ignore-this: 4eeb70916bcecfe3d7f312b4b2d3bcff
{
hunk ./gtk/Graphics/UI/Gtk/General/hsgthread.c 43
-static GStaticMutex gtk2hs_finalizer_mutex = G_STATIC_MUTEX_INIT;
+static GStaticMutex gtk2hs_finalizer_mutex;
hunk ./gtk/Graphics/UI/Gtk/General/hsgthread.c 55
- printf("gtk2hs_threads_initizlise: threads_initialised=%i, g_thread_get_initialized=%i\n",
+ printf("gtk2hs_threads_initialise: threads_initialised=%i, g_thread_get_initialized=%i\n",
hunk ./gtk/Graphics/UI/Gtk/General/hsgthread.c 63
+#else
+ g_static_mutex_init(>k2hs_finalizer_mutex);
hunk ./gtk/Graphics/UI/Gtk/General/hsgthread.c 68
+#ifdef DEBUG
+ printf("gtk2hs_threads_initialise: thread lock function=%lx\n",
+ (unsigned long) g_thread_functions_for_glib_use.mutex_lock);
+#endif
+
hunk ./gtk/Graphics/UI/Gtk/General/hsgthread.c 82
- printf("acquiring lock to add object %x\n", object);
+ printf("acquiring lock to add a %s object at %lx\n",
+ g_type_name(G_OBJECT_TYPE(object)), (unsigned long) object);
+ printf("value of lock function is %lx\n",
+ (unsigned long) g_thread_functions_for_glib_use.mutex_lock);
hunk ./gtk/Graphics/UI/Gtk/General/hsgthread.c 129
- printf("releasing lock to add object %x\n", object);
+ printf("releasing lock to add a %s object at %lx\n",
+ g_type_name(G_OBJECT_TYPE(object)), (unsigned long) object);
}
|
|
From: Axel S. <si...@co...> - 2010-07-14 14:52:45
|
diffing dir...
Wed Jul 14 04:27:14 EDT 2010 Axe...@in...
* Add some entering and leaving of the Gdk thread and add debug output.
Ignore-this: 3b1fa3be7d5b88792eb7956502497b90
{
hunk ./gtk/Graphics/UI/Gtk/General/General.chs 132
--- to ensure that all calls to Gtk+ happen on a single OS thread.
+-- to ensure that all calls to Gtk+ happen in a single OS thread.
hunk ./gtk/Graphics/UI/Gtk/General/General.chs 140
+ threadsLeave
hunk ./gtk/Graphics/UI/Gtk/General/hsgthread.c 54
+#ifdef DEBUG
+ printf("gtk2hs_threads_initizlise: threads_initialised=%i, g_thread_get_initialized=%i\n",
+ threads_initialised, g_thread_get_initialized());
+#endif
+
hunk ./gtk/Graphics/UI/Gtk/General/hsgthread.c 74
+#ifdef DEBUG
+ printf("acquiring lock to add object %x\n", object);
+#endif
hunk ./gtk/Graphics/UI/Gtk/General/hsgthread.c 86
- printf("adding finalizer!\n");
+ if (mutex_locked) printf("within mutex: ");
+ printf("adding finalizer to a %s object!\n", g_type_name(G_OBJECT_TYPE(object)));
hunk ./gtk/Graphics/UI/Gtk/General/hsgthread.c 96
+#ifdef DEBUG
+ printf("creating finalizer list.\n");
+#endif
hunk ./gtk/Graphics/UI/Gtk/General/hsgthread.c 101
+#ifdef DEBUG
+ printf("re-initializing finalizer source.\n");
+#endif
hunk ./gtk/Graphics/UI/Gtk/General/hsgthread.c 118
+#ifdef DEBUG
+ printf("releasing lock to add object %x\n", object);
+#endif
hunk ./gtk/Graphics/UI/Gtk/General/hsgthread.c 134
+ GDK_THREADS_ENTER ();
+[_^I_][_$_]
hunk ./gtk/Graphics/UI/Gtk/General/hsgthread.c 138
+#ifdef DEBUG
+ printf("acquiring lock to kill objects\n");
+#endif
hunk ./gtk/Graphics/UI/Gtk/General/hsgthread.c 161
+#ifdef DEBUG
+ printf("releasing lock to kill objects\n");
+#endif
hunk ./gtk/Graphics/UI/Gtk/General/hsgthread.c 171
+ GDK_THREADS_LEAVE ();
+
}
|
|
From: Axel S. <si...@co...> - 2010-07-08 16:17:35
|
diffing dir...
Thu Jul 8 12:16:56 EDT 2010 Axe...@in...
* Get docs in right order.
Ignore-this: 1d73bb3f15c75d65694bf4834071804f
{
hunk ./gtk/Graphics/UI/Gtk/Multiline/TextBuffer.chs 89
- textBufferSetText,
- textBufferGetText,
hunk ./gtk/Graphics/UI/Gtk/Multiline/TextBuffer.chs 92
+ textBufferSetText,
+ textBufferGetText,
}
|
|
From: Axel S. <si...@co...> - 2010-07-08 15:38:14
|
diffing dir...
Thu Jul 8 11:37:07 EDT 2010 Axe...@in...
* Fix documentation and don't import internal functions from ByteString.
Ignore-this: 6347b22b1641978869ebe1dd67f4f9a9
{
hunk ./gtk/Graphics/UI/Gtk/Multiline/TextBuffer.chs 93
+ textBufferGetByteStringSlice,
hunk ./gtk/Graphics/UI/Gtk/Multiline/TextBuffer.chs 203
-import Data.ByteString.Internal (c_strlen)
hunk ./gtk/Graphics/UI/Gtk/Multiline/TextBuffer.chs 433
--- | Same as 'textBufferSetText', but use to read *huge* file.
--- When you read content from huge file, 'ByteString' will save
--- much memory than 'String'.
--- NOTE, you need make sure 'ByteString' is a valid UTF-8 [_$_]
--- when you call this function.
+-- | Returns the text in the range [@start@,@end@). Excludes undisplayed text
+-- (text marked with tags that set the invisibility attribute) if
+-- @includeHiddenChars@ is @False@. The returned string includes a
+-- @(chr 0xFFFC)@ character whenever the buffer contains embedded images, so
+-- character indexes into the returned string /do/ correspond to
+-- character indexes into the buffer. Contrast with 'textBufferGetText'. Note
+-- that @(chr 0xFFFC)@ can occur in normal text as well, so it is not a reliable
+-- indicator that a pixbuf or widget is in the buffer.
hunk ./gtk/Graphics/UI/Gtk/Multiline/TextBuffer.chs 442
--- Below is example code to read huge file.
+textBufferGetSlice :: TextBufferClass self => self
+ -> TextIter -- ^ @start@ - start of a range
+ -> TextIter -- ^ @end@ - end of a range
+ -> Bool -- ^ @includeHiddenChars@ - whether to include invisible text
+ -> IO String
+textBufferGetSlice self start end includeHiddenChars =
+ {# call unsafe text_buffer_get_slice #}
+ (toTextBuffer self)
+ start
+ end
+ (fromBool includeHiddenChars)
+ >>= readUTFString
+
+-- | Deletes current contents of @buffer@, and inserts @text@ instead. Similar
+-- to 'textBufferSetText' but uses 'ByteString' buffers.
hunk ./gtk/Graphics/UI/Gtk/Multiline/TextBuffer.chs 458
--- textBufferSetByteString textBuffer =<< Data.ByteString.readFile "hugeFile"
+-- * The passed-in buffer must contain a valid UTF-8 encoded string.
hunk ./gtk/Graphics/UI/Gtk/Multiline/TextBuffer.chs 470
--- | Same as `textBufferGetText`, but use to get *huge* string.
+-- | Returns the text in the range [@start@,@end@). Similar to
+-- `textBufferGetText` but uses 'ByteString' buffers.
+--
+-- * The returned buffer is a UTF-8 encoded string.
+--
hunk ./gtk/Graphics/UI/Gtk/Multiline/TextBuffer.chs 480
-textBufferGetByteString self start end includeHiddenChars =
- {# call unsafe text_buffer_get_text #}
+textBufferGetByteString self start end includeHiddenChars = do
+ sPtr <- {# call unsafe text_buffer_get_text #}
hunk ./gtk/Graphics/UI/Gtk/Multiline/TextBuffer.chs 486
- >>= \strPtr -> do
- strLen <- c_strlen strPtr
- unsafePackCStringFinalizer (castPtr strPtr) (fromIntegral strLen) ({#call unsafe g_free#} (castPtr strPtr))
+ sLen <- lengthArray0 0 sPtr
+ unsafePackCStringFinalizer (castPtr sPtr) (fromIntegral sLen)
+ ({#call unsafe g_free#} (castPtr sPtr))
hunk ./gtk/Graphics/UI/Gtk/Multiline/TextBuffer.chs 490
--- | Returns the text in the range [@start@,@end@). Excludes undisplayed text
--- (text marked with tags that set the invisibility attribute) if
--- @includeHiddenChars@ is @False@. The returned string includes a
--- @(chr 0xFFFC)@ character whenever the buffer contains embedded images, so
--- character indexes into the returned string /do/ correspond to
--- character indexes into the buffer. Contrast with 'textBufferGetText'. Note
--- that @(chr 0xFFFC)@ can occur in normal text as well, so it is not a reliable
--- indicator that a pixbuf or widget is in the buffer.
+-- | Returns the text in the range [@start@,@end@). Similar to
+-- `textBufferGetSlice` but uses 'ByteString' buffers.
hunk ./gtk/Graphics/UI/Gtk/Multiline/TextBuffer.chs 493
-textBufferGetSlice :: TextBufferClass self => self
+-- * The returned buffer is a UTF-8 encoded string.
+--
+textBufferGetByteStringSlice :: TextBufferClass self => self
hunk ./gtk/Graphics/UI/Gtk/Multiline/TextBuffer.chs 499
- -> IO String
-textBufferGetSlice self start end includeHiddenChars =
- {# call unsafe text_buffer_get_slice #}
+ -> IO ByteString
+textBufferGetByteStringSlice self start end includeHiddenChars = do
+ sPtr <- {# call unsafe text_buffer_get_slice #}
hunk ./gtk/Graphics/UI/Gtk/Multiline/TextBuffer.chs 506
- >>= readUTFString
+ sLen <- lengthArray0 0 sPtr
+ unsafePackCStringFinalizer (castPtr sPtr) (fromIntegral sLen)
+ ({#call unsafe g_free#} (castPtr sPtr))
}
|
|
From: Andy S. <And...@co...> - 2010-07-08 12:24:13
|
diffing dir...
Thu Jul 8 08:20:10 EDT 2010 Andy Stewart <laz...@gm...>
* Add textBufferSetByteString and textBufferGetByteString for *huge* file.
Ignore-this: f7c8f643dc2cd1be2ac3c42f4e29640c
{
hunk ./gtk/Graphics/UI/Gtk/Multiline/TextBuffer.chs 91
+ textBufferSetByteString,
+ textBufferGetByteString,
hunk ./gtk/Graphics/UI/Gtk/Multiline/TextBuffer.chs 201
+import Data.ByteString (ByteString)
+import Data.ByteString.Internal (c_strlen)
+import Data.ByteString.Unsafe (unsafeUseAsCStringLen, unsafePackCStringFinalizer)
hunk ./gtk/Graphics/UI/Gtk/Multiline/TextBuffer.chs 433
+-- | Same as 'textBufferSetText', but use to read *huge* file.
+-- When you read content from huge file, 'ByteString' will save
+-- much memory than 'String'.
+-- NOTE, you need make sure 'ByteString' is a valid UTF-8 [_$_]
+-- when you call this function.
+--
+-- Below is example code to read huge file.
+--
+-- textBufferSetByteString textBuffer =<< Data.ByteString.readFile "hugeFile"
+--
+textBufferSetByteString :: TextBufferClass self => self
+ -> ByteString -- ^ @text@ - text to insert
+ -> IO ()
+textBufferSetByteString self text =
+ unsafeUseAsCStringLen text $ \(textPtr, len) ->
+ {# call text_buffer_set_text #}
+ (toTextBuffer self)
+ textPtr
+ (fromIntegral len)
+
+-- | Same as `textBufferGetText`, but use to get *huge* string.
+textBufferGetByteString :: TextBufferClass self => self
+ -> TextIter -- ^ @start@ - start of a range
+ -> TextIter -- ^ @end@ - end of a range
+ -> Bool -- ^ @includeHiddenChars@ - whether to include invisible text
+ -> IO ByteString
+textBufferGetByteString self start end includeHiddenChars =
+ {# call unsafe text_buffer_get_text #}
+ (toTextBuffer self)
+ start
+ end
+ (fromBool includeHiddenChars)
+ >>= \strPtr -> do
+ strLen <- c_strlen strPtr
+ unsafePackCStringFinalizer (castPtr strPtr) (fromIntegral strLen) ({#call unsafe g_free#} (castPtr strPtr))
+
hunk ./gtk/gtk.cabal 125
- array, containers, haskell98, mtl,
+ array, containers, haskell98, mtl, bytestring,
}
|
|
From: Andy S. <And...@co...> - 2010-07-04 13:18:03
|
diffing dir...
Fri Jul 2 10:30:22 EDT 2010 Andy Stewart <laz...@gm...>
* Add widgetEvent.
Ignore-this: 57d807386fa34f6323c285913c4e1cf0
{
hunk ./gtk/Graphics/UI/Gtk/Abstract/Widget.chs 205
+ widgetEvent,
hunk ./gtk/Graphics/UI/Gtk/Abstract/Widget.chs 361
-
+import Control.Monad.Reader (ask)
+import Control.Monad.Trans (liftIO)
hunk ./gtk/Graphics/UI/Gtk/Abstract/Widget.chs 2093
+-- | Rarely-used function. This function is used to emit the event signals on a widget (those signals
+-- should never be emitted without using this function to do so). If you want to synthesize an event
+-- though, don't use this function; instead, use 'mainDoEvent' so the event will behave as if it
+-- were in the event queue. Don't synthesize expose events; instead, use 'windowInvalidateRect'
+-- to invalidate a region of the window.
+widgetEvent :: WidgetClass self => self -> EventM t Bool
+widgetEvent widget = do
+ ptr <- ask
+ liftIO $ liftM toBool $ {#call widget_event #} (toWidget widget) (castPtr ptr)
+
}
|
|
From: Andy S. <And...@co...> - 2010-07-04 13:18:01
|
diffing dir...
Wed Jun 30 23:08:36 EDT 2010 Andy Stewart <laz...@gm...>
* Add mainDoEvent.
Ignore-this: 37cd08eb71f1eb3e77f09f04a02c5e3
{
hunk ./gtk/Graphics/UI/Gtk/General/General.chs 52
+ mainDoEvent,
hunk ./gtk/Graphics/UI/Gtk/General/General.chs 91
+import Graphics.UI.Gtk.Gdk.EventM (EventM)
+import Control.Monad.Reader (ask)
+import Control.Monad.Trans (liftIO)
hunk ./gtk/Graphics/UI/Gtk/General/General.chs 254
+-- | Processes a single GDK event. This is public only to allow filtering of events between GDK and
+-- GTK+. You will not usually need to call this function directly.
+-- [_$_]
+-- While you should not call this function directly, you might want to know how exactly events are
+-- handled. So here is what this function does with the event:
+-- [_$_]
+-- 1. Compress enter/leave notify events. If the event passed build an enter/leave pair together with
+-- the next event (peeked from GDK) both events are thrown away. This is to avoid a backlog of
+-- (de-)highlighting widgets crossed by the pointer.
+-- [_$_]
+-- 2. Find the widget which got the event. If the widget can't be determined the event is thrown away
+-- unless it belongs to a INCR transaction. In that case it is passed to
+-- 'selectionIncrEvent'.
+-- [_$_]
+-- 3. Then the event is passed on a stack so you can query the currently handled event with
+-- 'getCurrentEvent'.
+-- [_$_]
+-- 4. The event is sent to a widget. If a grab is active all events for widgets that are not in the
+-- contained in the grab widget are sent to the latter with a few exceptions:
+-- [_$_]
+-- * Deletion and destruction events are still sent to the event widget for obvious reasons.
+-- [_$_]
+-- * Events which directly relate to the visual representation of the event widget.
+-- [_$_]
+-- * Leave events are delivered to the event widget if there was an enter event delivered to it
+-- before without the paired leave event.
+-- [_$_]
+-- * Drag events are not redirected because it is unclear what the semantics of that would be.
+-- [_$_]
+-- Another point of interest might be that all key events are first passed through the key snooper
+-- functions if there are any. Read the description of 'keySnooperInstall' if you need this
+-- feature.
+-- [_$_]
+-- 5. After finishing the delivery the event is popped from the event stack.
+mainDoEvent :: EventM t ()
+mainDoEvent = do
+ ptr <- ask
+ liftIO $ {#call main_do_event #} (castPtr ptr)
+
}
|
|
From: Andy S. <And...@co...> - 2010-06-29 22:33:38
|
diffing dir...
Tue Jun 29 18:32:33 EDT 2010 Andy Stewart <laz...@gm...>
* Revert previous patch, because insert Entire string in error will cause speak leak sometimes.
Ignore-this: 92751d107bce7aabe5f903d4baedcfaa
{
hunk ./glib/System/Glib/UTFString.hs 169
- | ord x<=0xBF = err all
+ | ord x<=0xBF = err
hunk ./glib/System/Glib/UTFString.hs 172
- | otherwise = err all
+ | otherwise = err
hunk ./glib/System/Glib/UTFString.hs 176
- twoBytes str = error ("fromUTF: " ++ str ++ " has illegal two byte sequence!")
+ twoBytes _ = error "fromUTF: illegal two byte sequence"
hunk ./glib/System/Glib/UTFString.hs 181
- threeBytes str = error ("fromUTF: " ++ str ++ " has illegal three byte sequence!")
+ threeBytes _ = error "fromUTF: illegal three byte sequence" [_$_]
hunk ./glib/System/Glib/UTFString.hs 183
- err str = error ("fromUTF: " ++ str ++ " has illegal UTF-8 character!")
+ err = error "fromUTF: illegal UTF-8 character"
}
|
|
From: Andy S. <And...@co...> - 2010-06-29 09:02:50
|
diffing dir...
Tue Jun 29 04:58:31 EDT 2010 Andy Stewart <laz...@gm...>
* Add string info in fromUTF for easier to debug.
Ignore-this: 7e11a77e7524f36a53c78c6ebf7a6e3b
{
hunk ./glib/System/Glib/UTFString.hs 169
- | ord x<=0xBF = err
+ | ord x<=0xBF = err all
hunk ./glib/System/Glib/UTFString.hs 172
- | otherwise = err
+ | otherwise = err all
hunk ./glib/System/Glib/UTFString.hs 176
- twoBytes _ = error "fromUTF: illegal two byte sequence"
+ twoBytes str = error ("fromUTF: " ++ str ++ " has illegal two byte sequence!")
hunk ./glib/System/Glib/UTFString.hs 181
- threeBytes _ = error "fromUTF: illegal three byte sequence" [_$_]
+ threeBytes str = error ("fromUTF: " ++ str ++ " has illegal three byte sequence!")
hunk ./glib/System/Glib/UTFString.hs 183
- err = error "fromUTF: illegal UTF-8 character"
+ err str = error ("fromUTF: " ++ str ++ " has illegal UTF-8 character!")
}
|
|
From: Andy S. <And...@co...> - 2010-06-28 07:29:17
|
diffing dir...
Mon Jun 28 03:25:41 EDT 2010 Andy Stewart <laz...@gm...>
* Update Embedded demos.
Ignore-this: 1792a53558175309e474755b2fd170ab
{
hunk ./gtk/demo/embedded/MPlayer.hs 21
- initGUI
-
- putStrLn "Please entry path of multimedia file : "
- filepath <- getLine
- [_$_]
- mainWindow <- windowNew
- windowSetDefaultSize mainWindow 800 600
- windowSetPosition mainWindow WinPosCenter
-
- mplayer <- mplayerNew [_$_]
- mplayerStick mplayer (toContainer mainWindow) [_$_]
-
- mainWindow `afterShow` do [_$_]
- mplayerRun mplayer filepath
- [_$_]
- mainWindow `onDestroy` do
- mplayerQuit mplayer
- mainQuit
-
- return ()
-
- widgetShowAll mainWindow
-
- mainGUI
+ args <- getArgs
+ case args of
+ [filepath] -> do
+ initGUI
+ [_$_]
+ mainWindow <- windowNew
+ windowSetDefaultSize mainWindow 800 450
+ windowSetPosition mainWindow WinPosCenter
+ [_$_]
+ mplayer <- mplayerNew [_$_]
+ mplayerStick mplayer (toContainer mainWindow) [_$_]
+ [_$_]
+ mainWindow `afterShow` do [_$_]
+ mplayerRun mplayer filepath
+ [_$_]
+ mainWindow `onDestroy` do
+ mplayerQuit mplayer
+ mainQuit
+ [_$_]
+ return ()
+ [_$_]
+ widgetShowAll mainWindow
+ [_$_]
+ mainGUI
+ _ -> putStrLn "Usage : mplayer file"
hunk ./gtk/demo/embedded/MPlayer.hs 48
- MPlayer {mplayerSocket :: Socket
+ MPlayer {mplayerWidget :: DrawingArea
hunk ./gtk/demo/embedded/MPlayer.hs 53
- MPlayer <$> socketNew
+ MPlayer <$> drawingAreaNew
hunk ./gtk/demo/embedded/MPlayer.hs 57
-mplayerStick (MPlayer {mplayerSocket = socket}) container = do
- widgetShowAll socket
- container `containerAdd` socket
+mplayerStick (MPlayer {mplayerWidget = mWidget}) container = do
+ widgetShowAll mWidget
+ container `containerAdd` mWidget
hunk ./gtk/demo/embedded/MPlayer.hs 62
-mplayerRun (MPlayer {mplayerSocket = socket
+mplayerRun (MPlayer {mplayerWidget = mWidget
hunk ./gtk/demo/embedded/MPlayer.hs 64
- socketId <- liftM fromNativeWindowId $ socketGetId socket
- handle <- runInteractiveCommand $ printf "mplayer %s -slave -wid %d" filepath (socketId :: Int)
+ drawWindow <- widgetGetDrawWindow mWidget -- you just can get DrawWindow after widget realized
+ wid <- liftM fromNativeWindowId $ drawableGetID drawWindow
+ handle <- runInteractiveCommand $ printf "mplayer %s -slave -wid %d" filepath (wid :: Int)
hunk ./gtk/demo/embedded/MPlayer.hs 73
- Just (inp, _, _, _) -> hPutStr inp "quit\n"
+ Just (inp, _, _, _) -> hPutStrLn inp "quit"
hunk ./gtk/demo/embedded/Uzbl.hs 13
-import Graphics.UI.Gtk.Gdk.DrawWindow
}
|
|
From: Andy S. <And...@co...> - 2010-06-28 07:29:14
|
diffing dir...
Mon Jun 28 03:13:06 EDT 2010 Andy Stewart <laz...@gm...>
* Add function drawableGetID.
Ignore-this: 66f80a911f63867209160d53e51c8498
{
hunk ./gtk/Graphics/UI/Gtk/Gdk/Drawable.chs 46
+ drawableGetID,
hunk ./gtk/Graphics/UI/Gtk/Gdk/Drawable.chs 65
- drawDrawable) where
+ drawDrawable,
+) where
hunk ./gtk/Graphics/UI/Gtk/Gdk/Drawable.chs 71
-import Graphics.UI.Gtk.General.Structs (Point, Color)
+import Graphics.UI.Gtk.General.Structs (Point, Color, drawableGetID)
hunk ./gtk/Graphics/UI/Gtk/General/Structs.hsc 60
+ drawableGetID,
hunk ./gtk/Graphics/UI/Gtk/General/Structs.hsc 597
+#if !defined(WIN32) || GTK_CHECK_VERSION(2,8,0)
+foreign import ccall unsafe "gdk_x11_drawable_get_xid" [_$_]
+ gdk_x11_drawable_get_xid :: (Ptr Drawable) -> IO CInt
+#else [_$_]
+foreign import ccall unsafe "gdk_win32_drawable_get_handle" [_$_]
+ gdk_win32_drawable_get_handle :: (Ptr Drawable) -> IO CInt
+#endif [_$_]
+
+-- | Get 'NativeWindowId' of 'Drawable'. [_$_]
+drawableGetID :: DrawableClass d => d -> IO NativeWindowId
+drawableGetID d =
+ liftM toNativeWindowId $
+ (\(Drawable drawable) ->
+#if !defined(WIN32) || GTK_CHECK_VERSION(2,8,0)
+ withForeignPtr drawable gdk_x11_drawable_get_xid
+#else [_$_]
+ withForeignPtr drawable gdk_win32_drawable_get_handle
+#endif
+ ) (toDrawable d)
+
}
|
|
From: Andy S. <And...@co...> - 2010-06-27 12:08:00
|
diffing dir...
Sun Jun 27 07:35:50 EDT 2010 Andy Stewart <laz...@gm...>
* Fix freeHaskellFunPtr problem in Clipboard.chs
Ignore-this: efa86a719456d15b01eaaed62393f78f
{
hunk ./gtk/Graphics/UI/Gtk/General/Clipboard.chs 408
- cbPtr <- readIORef cbRef
- freeHaskellFunPtr cbPtr
+ freeHaskellFunPtr =<< readIORef cbRef
hunk ./gtk/Graphics/UI/Gtk/General/Clipboard.chs 440
+ cbRef <- newIORef nullFunPtr
hunk ./gtk/Graphics/UI/Gtk/General/Clipboard.chs 443
+ freeHaskellFunPtr =<< readIORef cbRef
hunk ./gtk/Graphics/UI/Gtk/General/Clipboard.chs 447
+ writeIORef cbRef cbPtr
hunk ./gtk/Graphics/UI/Gtk/General/Clipboard.chs 452
- freeHaskellFunPtr cbPtr
hunk ./gtk/Graphics/UI/Gtk/General/Clipboard.chs 478
+ cbRef <- newIORef nullFunPtr
hunk ./gtk/Graphics/UI/Gtk/General/Clipboard.chs 481
+ freeHaskellFunPtr =<< readIORef cbRef
hunk ./gtk/Graphics/UI/Gtk/General/Clipboard.chs 484
+ writeIORef cbRef cbPtr
hunk ./gtk/Graphics/UI/Gtk/General/Clipboard.chs 489
- freeHaskellFunPtr cbPtr
hunk ./gtk/Graphics/UI/Gtk/General/Clipboard.chs 553
+ cbRef <- newIORef nullFunPtr
hunk ./gtk/Graphics/UI/Gtk/General/Clipboard.chs 556
+ freeHaskellFunPtr =<< readIORef cbRef
hunk ./gtk/Graphics/UI/Gtk/General/Clipboard.chs 561
+ writeIORef cbRef cbPtr
hunk ./gtk/Graphics/UI/Gtk/General/Clipboard.chs 567
- freeHaskellFunPtr cbPtr
}
|
|
From: Andy S. <And...@co...> - 2010-06-27 10:35:15
|
diffing dir...
Sun Jun 27 06:33:36 EDT 2010 Andy Stewart <laz...@gm...>
* Apply Oleg's patch to fix clipboardRequestTargets segfault.
Ignore-this: 5602ff1727f889cdccc5bc2cb0f7353c
{
hunk ./gtk/Graphics/UI/Gtk/General/Clipboard.chs 511
+ cbRef <- newIORef nullFunPtr
hunk ./gtk/Graphics/UI/Gtk/General/Clipboard.chs 514
+ -- We must free Haskell pointer *in* the callback to avoid segfault.
+ freeHaskellFunPtr =<< readIORef cbRef
hunk ./gtk/Graphics/UI/Gtk/General/Clipboard.chs 519
+ writeIORef cbRef cbPtr
hunk ./gtk/Graphics/UI/Gtk/General/Clipboard.chs 524
- freeHaskellFunPtr cbPtr
}
|
|
From: Andy S. <And...@co...> - 2010-06-17 09:07:04
|
diffing dir...
Thu Jun 17 05:06:40 EDT 2010 Andy Stewart <laz...@gm...>
* Add MPlayer client demo.
Ignore-this: 5a8ab681c148ca07f27f768f9f62b1b7
{
addfile ./gtk/demo/embedded/MPlayer.hs
hunk ./gtk/demo/embedded/MPlayer.hs 1
+-- | MPlayer client demo
+-- Author : Andy Stewart
+-- Copyright : (c) 2010 Andy Stewart <laz...@gm...>
+
+module Main where
+
+import Control.Applicative
+import Control.Concurrent
+import Control.Concurrent.STM
+import Control.Monad
+import Control.Monad.Trans
+import Graphics.UI.Gtk
+import System.Exit
+import System.IO
+import System.Process
+import System.Environment [_$_]
+import Text.Printf
+
+main :: IO ()
+main = do
+ initGUI
+
+ putStrLn "Please entry path of multimedia file : "
+ filepath <- getLine
+ [_$_]
+ mainWindow <- windowNew
+ windowSetDefaultSize mainWindow 800 600
+ windowSetPosition mainWindow WinPosCenter
+
+ mplayer <- mplayerNew [_$_]
+ mplayerStick mplayer (toContainer mainWindow) [_$_]
+
+ mainWindow `afterShow` do [_$_]
+ mplayerRun mplayer filepath
+ [_$_]
+ mainWindow `onDestroy` do
+ mplayerQuit mplayer
+ mainQuit
+
+ return ()
+
+ widgetShowAll mainWindow
+
+ mainGUI
+
+data MPlayer =
+ MPlayer {mplayerSocket :: Socket
+ ,mplayerHandle :: TVar (Maybe (Handle, Handle, Handle, ProcessHandle))}
+ [_$_]
+mplayerNew :: IO MPlayer
+mplayerNew =
+ MPlayer <$> socketNew
+ <*> newTVarIO Nothing
+
+mplayerStick :: MPlayer -> Container -> IO ()
+mplayerStick (MPlayer {mplayerSocket = socket}) container = do
+ widgetShowAll socket
+ container `containerAdd` socket
+ [_$_]
+mplayerRun :: MPlayer -> FilePath -> IO ()
+mplayerRun (MPlayer {mplayerSocket = socket
+ ,mplayerHandle = mHandle}) filepath = do
+ socketId <- liftM fromNativeWindowId $ socketGetId socket
+ handle <- runInteractiveCommand $ printf "mplayer %s -slave -wid %d" filepath (socketId :: Int)
+ writeTVarIO mHandle (Just handle)
+ [_$_]
+mplayerQuit :: MPlayer -> IO ()
+mplayerQuit MPlayer {mplayerHandle = mHandle} = do
+ handle <- readTVarIO mHandle
+ case handle of
+ Just (inp, _, _, _) -> hPutStr inp "quit\n"
+ Nothing -> return ()
+
+-- | The IO version of `writeTVar`.
+writeTVarIO :: TVar a -> a -> IO ()
+writeTVarIO a b = atomically $ writeTVar a b
hunk ./gtk/demo/embedded/Makefile 2
-PROGS = Embedded Uzbl
-SOURCES = Embedded.hs Uzbl.hs
+PROGS = Embedded Uzbl MPlayer
+SOURCES = Embedded.hs Uzbl.hs MPlayer.hs
hunk ./gtk/demo/embedded/Makefile 13
+MPlayer : MPlayer.hs
+ $(HC) --make $< -o $@ $(HCFLAGS)
+
}
|
|
From: Andy S. <And...@co...> - 2010-06-04 14:11:43
|
diffing dir...
Fri Jun 4 09:02:10 EDT 2010 Andy Stewart <laz...@gm...>
* Move hierarchy.list to pango package (Don't need reinstall gtk2hs-buildtools after add new type)
Ignore-this: b2ebce6749cf1083f3810e6175ceb1a2
{
addfile ./pango/hierarchy.list
hunk ./pango/hierarchy.list 1
+# This list is the result of a copy-and-paste from the GtkObject hierarchy
+# html documentation. Deprecated widgets are uncommented. Some additional
+# object have been defined at the end of the copied list.
+
+# The Gtk prefix of every object is removed, the other prefixes are
+# kept. The indentation implies the object hierarchy. In case the
+# type query function cannot be derived from the name or the type name
+# is different, an alternative name and type query function can be
+# specified by appending 'as typename, <query_func>'. In case this
+# function is not specified, the <name> is converted to
+# gtk_<name'>_get_type where <name'> is <name> where each upperscore
+# letter is converted to an underscore and lowerletter. The underscore
+# is omitted if an upperscore letter preceeded: GtkHButtonBox ->
+# gtk_hbutton_box_get_type. The generation of a type can be
+# conditional by appending 'if <tag>'. Such types are only produces if
+# --tag=<tag> is given on the command line of TypeGenerator.
+
+
+ GObject [_$_]
+ GdkDrawable [_$_]
+ GdkWindow as DrawWindow, gdk_window_object_get_type
+# GdkDrawableImplX11
+# GdkWindowImplX11
+ GdkPixmap
+ GdkGLPixmap if gtkglext
+ GdkGLWindow if gtkglext
+ GdkColormap
+ GdkScreen if gtk-2.2
+ GdkDisplay if gtk-2.2
+ GdkVisual
+ GdkDevice
+ GtkSettings
+ GtkTextBuffer
+ GtkSourceBuffer if sourceview
+ GtkSourceBuffer if gtksourceview2
+ GtkTextTag
+ GtkSourceTag if sourceview
+ GtkTextTagTable
+ GtkSourceTagTable if sourceview
+ GtkStyle
+ GtkRcStyle
+ GdkDragContext
+ GdkPixbuf
+ GdkPixbufAnimation
+ GdkPixbufSimpleAnim
+ GdkPixbufAnimationIter
+ GtkTextChildAnchor
+ GtkTextMark
+ GtkSourceMarker if sourceview
+ GtkSourceMark if gtksourceview2
+ GtkObject
+ GtkWidget
+ GtkMisc
+ GtkLabel
+ GtkAccelLabel
+ GtkTipsQuery if deprecated
+ GtkArrow
+ GtkImage
+ GtkContainer
+ WebKitWebView as WebView, webkit_web_view_get_type if webkit [_$_]
+ GtkBin
+ GtkAlignment
+ GtkFrame
+ GtkAspectFrame
+ GtkButton
+ GtkToggleButton
+ GtkCheckButton
+ GtkRadioButton
+ GtkColorButton if gtk-2.4
+ GtkFontButton if gtk-2.4
+ GtkOptionMenu if deprecated
+ GtkItem
+ GtkMenuItem
+ GtkCheckMenuItem
+ GtkRadioMenuItem
+ GtkTearoffMenuItem
+ GtkImageMenuItem
+ GtkSeparatorMenuItem
+ GtkListItem if deprecated
+# GtkTreeItem
+ GtkWindow
+ GtkDialog
+ GtkAboutDialog if gtk-2.6
+ GtkColorSelectionDialog
+ GtkFileSelection
+ GtkFileChooserDialog if gtk-2.4
+ GtkFontSelectionDialog
+ GtkInputDialog
+ GtkMessageDialog
+ GtkPlug if plugNsocket
+ GtkEventBox
+ GtkHandleBox
+ GtkScrolledWindow
+ GtkViewport
+ GtkExpander if gtk-2.4
+ GtkComboBox if gtk-2.4
+ GtkComboBoxEntry if gtk-2.4
+ GtkToolItem if gtk-2.4
+ GtkToolButton if gtk-2.4
+ GtkMenuToolButton if gtk-2.6
+ GtkToggleToolButton if gtk-2.4
+ GtkRadioToolButton if gtk-2.4
+ GtkSeparatorToolItem if gtk-2.4
+ GtkMozEmbed if mozembed
+ VteTerminal as Terminal if vte
+ GtkBox
+ GtkButtonBox
+ GtkHButtonBox
+ GtkVButtonBox
+ GtkVBox
+ GtkColorSelection
+ GtkFontSelection
+ GtkFileChooserWidget if gtk-2.4
+ GtkHBox
+ GtkCombo if deprecated
+ GtkFileChooserButton if gtk-2.6
+ GtkStatusbar
+ GtkCList if deprecated
+ GtkCTree if deprecated
+ GtkFixed
+ GtkPaned
+ GtkHPaned
+ GtkVPaned
+ GtkIconView if gtk-2.6
+ GtkLayout
+ GtkList if deprecated
+ GtkMenuShell
+ GtkMenu
+ GtkMenuBar
+ GtkNotebook
+# GtkPacker
+ GtkSocket if plugNsocket
+ GtkTable
+ GtkTextView
+ GtkSourceView if sourceview
+ GtkSourceView if gtksourceview2
+ GtkToolbar
+ GtkTreeView
+ GtkCalendar
+ GtkCellView if gtk-2.6
+ GtkDrawingArea
+ GtkEntry
+ GtkSpinButton
+ GtkRuler
+ GtkHRuler
+ GtkVRuler
+ GtkRange
+ GtkScale
+ GtkHScale
+ GtkVScale
+ GtkScrollbar
+ GtkHScrollbar
+ GtkVScrollbar
+ GtkSeparator
+ GtkHSeparator
+ GtkVSeparator
+ GtkInvisible
+# GtkOldEditable
+# GtkText
+ GtkPreview if deprecated
+# Progress is deprecated, ProgressBar contains everything necessary
+# GtkProgress
+ GtkProgressBar
+ GtkAdjustment
+ GtkIMContext
+ GtkIMMulticontext
+ GtkItemFactory if deprecated
+ GtkTooltips
+[_^I_][_^I_][_^I_][_$_]
+# These object were added by hand because they do not show up in the hierarchy
+# chart.
+# These are derived from GtkObject:
+ GtkTreeViewColumn
+ GtkCellRenderer
+ GtkCellRendererPixbuf
+ GtkCellRendererText
+ GtkCellRendererCombo if gtk-2.6
+ GtkCellRendererToggle
+ GtkCellRendererProgress if gtk-2.6
+ GtkFileFilter if gtk-2.4
+ GtkBuilder if gtk-2.12
+# These are actually interfaces, but all objects that implement it are at
+# least GObjects.
+ GtkCellLayout if gtk-2.4
+ GtkTreeSortable if gtk-2.4
+ GtkTooltip if gtk-2.12
+# These are derived from GObject:
+ GtkStatusIcon if gtk-2.10
+ GtkTreeSelection
+ GtkTreeModel
+ GtkTreeStore
+ GtkListStore
+ GtkTreeModelSort
+ GtkTreeModelFilter if gtk-2.4
+ GtkIconFactory
+ GtkIconTheme
+ GtkSizeGroup
+ GtkClipboard if gtk-2.2
+ GtkAccelGroup
+ GtkAccelMap if gtk-2.4
+ GtkEntryCompletion if gtk-2.4
+ GtkAction if gtk-2.4
+ GtkToggleAction if gtk-2.4
+ GtkRadioAction if gtk-2.4
+ GtkActionGroup if gtk-2.4
+ GtkUIManager if gtk-2.4
+ GtkWindowGroup
+ GtkSourceLanguage if sourceview
+ GtkSourceLanguage if gtksourceview2
+ GtkSourceLanguagesManager if sourceview
+ GtkSourceLanguageManager if gtksourceview2
+ GladeXML as GladeXML, glade_xml_get_type if libglade
+ GConfClient as GConf if gconf
+# These ones are actualy interfaces, but interface implementations are GObjects
+ GtkEditable
+ GtkSourceStyle as SourceStyleObject if gtksourceview2
+ GtkSourceStyleScheme if sourceview
+ GtkSourceStyleScheme if gtksourceview2
+ GtkSourceStyleSchemeManager if gtksourceview2
+ GtkFileChooser if gtk-2.4
+## This now became a GObject in version 2:
+ GdkGC as GC, gdk_gc_get_type
+## These are Pango structures
+ PangoContext as PangoContext, pango_context_get_type if pango
+ PangoLayout as PangoLayoutRaw, pango_layout_get_type if pango
+ PangoFont as Font, pango_font_get_type if pango
+ PangoFontFamily as FontFamily, pango_font_family_get_type if pango
+ PangoFontFace as FontFace, pango_font_face_get_type if pango
+ PangoFontMap as FontMap, pango_font_face_get_type if pango
+ PangoFontset as FontSet, pango_fontset_get_type if pango
+## This type is only available for PANGO_ENABLE_BACKEND compiled source
+## PangoFontsetSimple as FontSetSimple, pango_fontset_simple_get_type
+
+## GtkGlExt classes
+ GdkGLContext if gtkglext
+ GdkGLConfig if gtkglext
+ GdkGLDrawable if gtkglext
+
+## GnomeVFS classes
+ GnomeVFSVolume as Volume, gnome_vfs_volume_get_type if gnomevfs
+ GnomeVFSDrive as Drive, gnome_vfs_drive_get_type if gnomevfs
+ GnomeVFSVolumeMonitor as VolumeMonitor, gnome_vfs_volume_monitor_get_type if gnomevfs
+
+## GIO classes
+# Note on all the "as" clauses: the prefix G is unfortunate since it leads
+# to two consecutive upper case letters which are not translated with an
+# underscore each (e.g. GConf -> gconf, GtkHButtonBox -> gtk_hbutton_box).
+# GUnixMountMonitor as UnixMountMonitor, g_unix_mount_monitor_get_type if gio
+ GOutputStream as OutputStream, g_output_stream_get_type if gio
+ GFilterOutputStream as FilterOutputStream, g_filter_output_stream_get_type if gio
+ GDataOutputStream as DataOutputStream, g_data_output_stream_get_type if gio
+ GBufferedOutputStream as BufferedOutputStream, g_buffered_output_stream_get_type if gio
+# GUnixOutputStream as UnixOutputStream, g_unix_output_stream_get_type if gio
+ GFileOutputStream as FileOutputStream, g_file_output_stream_get_type if gio
+ GMemoryOutputStream as MemoryOutputStream, g_memory_output_stream_get_type if gio
+ GInputStream as InputStream, g_input_stream_get_type if gio
+# GUnixInputStream as UnixInputStream, g_unix_input_stream_get_type if gio
+ GMemoryInputStream as MemoryInputStream, g_memory_input_stream_get_type if gio
+ GFilterInputStream as FilterInputStream, g_filter_input_stream_get_type if gio
+ GBufferedInputStream as BufferedInputStream, g_buffered_input_stream_get_type if gio
+ GDataInputStream as DataInputStream, g_data_input_stream_get_type if gio
+ GFileInputStream as FileInputStream, g_file_input_stream_get_type if gio
+# GDesktopAppInfo as DesktopAppInfo, g_desktop_app_info_get_type if gio
+ GFileMonitor as FileMonitor, g_file_monitor_get_type if gio
+ GVfs as Vfs, g_vfs_get_type if gio
+ GMountOperation as MountOperation, g_mount_operation_get_type if gio
+ GThemedIcon as ThemedIcon, g_themed_icon_get_type if gio
+ GEmblem as Emblem, g_emblem_get_type if gio
+ GEmblemedIcon as EmblemedIcon, g_emblemed_icon_get_type if gio
+ GFileEnumerator as FileEnumerator, g_file_enumerator_get_type if gio
+ GFilenameCompleter as FilenameCompleter, g_filename_completer_get_type if gio
+ GFileIcon as FileIcon, g_file_icon_get_type if gio
+ GVolumeMonitor as VolumeMonitor, g_volume_monitor_get_type if gio
+ GCancellable as Cancellable, g_cancellable_get_type if gio
+ GSimpleAsyncResult as SimpleAsyncResult, g_async_result_get_type if gio
+ GFileInfo as FileInfo, g_file_info_get_type if gio
+ GAppLaunchContext as AppLaunchContext, g_app_launch_context_get_type if gio
+## these are actually GInterfaces
+ GIcon as Icon, g_icon_get_type if gio
+ GSeekable as Seekable, g_seekable_get_type if gio
+ GAppInfo as AppInfo, g_app_info_get_type if gio
+ GVolume as Volume, g_volume_get_type if gio
+ GAsyncResult as AsyncResult, g_async_result_get_type if gio
+ GLoadableIcon as LoadableIcon, g_loadable_icon_get_type if gio
+ GDrive as Drive, g_drive_get_type if gio
+ GFile noEq as File, g_file_get_type if gio
+ GMount as Mount, g_mount_get_type if gio
+
+## GStreamer classes
+ GstObject as Object, gst_object_get_type if gstreamer
+ GstPad as Pad, gst_pad_get_type if gstreamer
+ GstGhostPad as GhostPad, gst_ghost_pad_get_type if gstreamer
+ GstPluginFeature as PluginFeature, gst_plugin_feature_get_type if gstreamer
+ GstElementFactory as ElementFactory, gst_element_factory_get_type if gstreamer
+ GstTypeFindFactory as TypeFindFactory, gst_type_find_factory_get_type if gstreamer
+ GstIndexFactory as IndexFactory, gst_index_factory_get_type if gstreamer
+ GstElement as Element, gst_element_get_type if gstreamer
+ GstBin as Bin, gst_bin_get_type if gstreamer
+ GstPipeline as Pipeline, gst_pipeline_get_type if gstreamer
+ GstImplementsInterface as ImplementsInterface, gst_implements_interface_get_type if gstreamer
+ GstTagSetter as TagSetter, gst_tag_setter_get_type if gstreamer
+ GstBaseSrc as BaseSrc, gst_base_src_get_type if gstreamer
+ GstPushSrc as PushSrc, gst_push_src_get_type if gstreamer
+ GstBaseSink as BaseSink, gst_base_sink_get_type if gstreamer
+ GstBaseTransform as BaseTransform, gst_base_transform_get_type if gstreamer
+ GstPlugin as Plugin, gst_plugin_get_type if gstreamer
+ GstRegistry as Registry, gst_registry_get_type if gstreamer
+ GstBus as Bus, gst_bus_get_type if gstreamer
+ GstClock as Clock, gst_clock_get_type if gstreamer
+ GstAudioClock as AudioClock, gst_audio_clock_get_type if gstreamer
+ GstSystemClock as SystemClock, gst_system_clock_get_type if gstreamer
+ GstNetClientClock as NetClientClock, gst_net_client_clock_get_type if gstreamer
+ GstIndex as Index, gst_index_get_type if gstreamer
+ GstPadTemplate as PadTemplate, gst_pad_template_get_type if gstreamer
+ GstTask as Task, gst_task_get_type if gstreamer
+ GstXML as XML, gst_xml_get_type if gstreamer
+ GstChildProxy as ChildProxy, gst_child_proxy_get_type if gstreamer
+ GstCollectPads as CollectPads, gst_collect_pads_get_type if gstreamer
+## these are actually GInterfaces
+ GstURIHandler as URIHandler, gst_uri_handler_get_type if gstreamer
+ GstAdapter as Adapter, gst_adapter_get_type if gstreamer
+ GstController as Controller, gst_controller_get_type if gstreamer
+
+ WebKitWebFrame as WebFrame, webkit_web_frame_get_type if webkit [_$_]
+ WebKitWebSettings as WebSettings, webkit_web_settings_get_type if webkit
+ WebKitNetworkRequest as NetworkRequest, webkit_network_request_get_type if webkit
+ WebKitNetworkResponse as NetworkResponse, webkit_network_response_get_type if webkit
+ WebKitDownload as Download, webkit_download_get_type if webkit
+ WebKitWebBackForwardList as WebBackForwardList, webkit_web_back_forward_list_get_type if webkit
+ WebKitWebHistoryItem as WebHistoryItem, webkit_web_history_item_get_type if webkit
+ WebKitWebInspector as WebInspector, webkit_web_inspector_get_type if webkit
+ WebKitHitTestResult as HitTestResult, webkit_hit_test_result_get_type if webkit
+ WebKitSecurityOrigin as SecurityOrigin, webkit_security_origin_get_type if webkit
+ WebKitSoupAuthDialog as SoupAuthDialog, webkit_soup_auth_dialog_get_type if webkit
+ WebKitWebDatabase as WebDatabase, webkit_web_database_get_type if webkit
+ WebKitWebDataSource as WebDataSource, webkit_web_data_source_get_type if webkit
+ WebKitWebNavigationAction as WebNavigationAction, webkit_web_navigation_action_get_type if webkit
+ WebKitWebPolicyDecision as WebPolicyDecision, webkit_web_policy_decision_get_type if webkit
+ WebKitWebResource as WebResource, webkit_web_resource_get_type if webkit
+ WebKitWebWindowFeatures as WebWindowFeatures, webkit_web_window_features_get_type if webkit
+
hunk ./pango/pango.cabal 23
+ hierarchy.list
hunk ./pango/pango.cabal 25
-x-Types-File: Graphics/Rendering/Pango/Types.chs
-x-Types-ModName: Graphics.Rendering.Pango.Types
-x-Types-Forward: *System.Glib.GObject
+x-Types-File: Graphics/Rendering/Pango/Types.chs
+x-Types-ModName: Graphics.Rendering.Pango.Types
+x-Types-Forward: *System.Glib.GObject
+x-Types-Hierarchy: hierarchy.list
}
|
|
From: Andy S. <And...@co...> - 2010-06-04 14:11:42
|
diffing dir...
Fri Jun 4 09:04:42 EDT 2010 Andy Stewart <laz...@gm...>
* Move hierarchy.list to gio package (Don't need reinstall gtk2hs-buildtools after add new type)
Ignore-this: 7539a9c035e4f25ac54d619c92021f49
{
hunk ./gio/gio.cabal 23
+ hierarchy.list
hunk ./gio/gio.cabal 25
-x-Types-File: System/GIO/Types.chs
-x-Types-Tag: gio
-x-Types-ModName: System.GIO.Types
-x-Types-Import: System.Glib.GObject
-x-Types-Lib: gio
-x-Types-Prefix: g
+x-Types-File: System/GIO/Types.chs
+x-Types-ModName: System.GIO.Types
+x-Types-Import: System.Glib.GObject
+x-Types-Lib: gio
+x-Types-Prefix: g
+x-Types-Tag: gio
+x-Types-Hierarchy: hierarchy.list
addfile ./gio/hierarchy.list
hunk ./gio/hierarchy.list 1
+# This list is the result of a copy-and-paste from the GtkObject hierarchy
+# html documentation. Deprecated widgets are uncommented. Some additional
+# object have been defined at the end of the copied list.
+
+# The Gtk prefix of every object is removed, the other prefixes are
+# kept. The indentation implies the object hierarchy. In case the
+# type query function cannot be derived from the name or the type name
+# is different, an alternative name and type query function can be
+# specified by appending 'as typename, <query_func>'. In case this
+# function is not specified, the <name> is converted to
+# gtk_<name'>_get_type where <name'> is <name> where each upperscore
+# letter is converted to an underscore and lowerletter. The underscore
+# is omitted if an upperscore letter preceeded: GtkHButtonBox ->
+# gtk_hbutton_box_get_type. The generation of a type can be
+# conditional by appending 'if <tag>'. Such types are only produces if
+# --tag=<tag> is given on the command line of TypeGenerator.
+
+
+ GObject [_$_]
+ GdkDrawable [_$_]
+ GdkWindow as DrawWindow, gdk_window_object_get_type
+# GdkDrawableImplX11
+# GdkWindowImplX11
+ GdkPixmap
+ GdkGLPixmap if gtkglext
+ GdkGLWindow if gtkglext
+ GdkColormap
+ GdkScreen if gtk-2.2
+ GdkDisplay if gtk-2.2
+ GdkVisual
+ GdkDevice
+ GtkSettings
+ GtkTextBuffer
+ GtkSourceBuffer if sourceview
+ GtkSourceBuffer if gtksourceview2
+ GtkTextTag
+ GtkSourceTag if sourceview
+ GtkTextTagTable
+ GtkSourceTagTable if sourceview
+ GtkStyle
+ GtkRcStyle
+ GdkDragContext
+ GdkPixbuf
+ GdkPixbufAnimation
+ GdkPixbufSimpleAnim
+ GdkPixbufAnimationIter
+ GtkTextChildAnchor
+ GtkTextMark
+ GtkSourceMarker if sourceview
+ GtkSourceMark if gtksourceview2
+ GtkObject
+ GtkWidget
+ GtkMisc
+ GtkLabel
+ GtkAccelLabel
+ GtkTipsQuery if deprecated
+ GtkArrow
+ GtkImage
+ GtkContainer
+ WebKitWebView as WebView, webkit_web_view_get_type if webkit [_$_]
+ GtkBin
+ GtkAlignment
+ GtkFrame
+ GtkAspectFrame
+ GtkButton
+ GtkToggleButton
+ GtkCheckButton
+ GtkRadioButton
+ GtkColorButton if gtk-2.4
+ GtkFontButton if gtk-2.4
+ GtkOptionMenu if deprecated
+ GtkItem
+ GtkMenuItem
+ GtkCheckMenuItem
+ GtkRadioMenuItem
+ GtkTearoffMenuItem
+ GtkImageMenuItem
+ GtkSeparatorMenuItem
+ GtkListItem if deprecated
+# GtkTreeItem
+ GtkWindow
+ GtkDialog
+ GtkAboutDialog if gtk-2.6
+ GtkColorSelectionDialog
+ GtkFileSelection
+ GtkFileChooserDialog if gtk-2.4
+ GtkFontSelectionDialog
+ GtkInputDialog
+ GtkMessageDialog
+ GtkPlug if plugNsocket
+ GtkEventBox
+ GtkHandleBox
+ GtkScrolledWindow
+ GtkViewport
+ GtkExpander if gtk-2.4
+ GtkComboBox if gtk-2.4
+ GtkComboBoxEntry if gtk-2.4
+ GtkToolItem if gtk-2.4
+ GtkToolButton if gtk-2.4
+ GtkMenuToolButton if gtk-2.6
+ GtkToggleToolButton if gtk-2.4
+ GtkRadioToolButton if gtk-2.4
+ GtkSeparatorToolItem if gtk-2.4
+ GtkMozEmbed if mozembed
+ VteTerminal as Terminal if vte
+ GtkBox
+ GtkButtonBox
+ GtkHButtonBox
+ GtkVButtonBox
+ GtkVBox
+ GtkColorSelection
+ GtkFontSelection
+ GtkFileChooserWidget if gtk-2.4
+ GtkHBox
+ GtkCombo if deprecated
+ GtkFileChooserButton if gtk-2.6
+ GtkStatusbar
+ GtkCList if deprecated
+ GtkCTree if deprecated
+ GtkFixed
+ GtkPaned
+ GtkHPaned
+ GtkVPaned
+ GtkIconView if gtk-2.6
+ GtkLayout
+ GtkList if deprecated
+ GtkMenuShell
+ GtkMenu
+ GtkMenuBar
+ GtkNotebook
+# GtkPacker
+ GtkSocket if plugNsocket
+ GtkTable
+ GtkTextView
+ GtkSourceView if sourceview
+ GtkSourceView if gtksourceview2
+ GtkToolbar
+ GtkTreeView
+ GtkCalendar
+ GtkCellView if gtk-2.6
+ GtkDrawingArea
+ GtkEntry
+ GtkSpinButton
+ GtkRuler
+ GtkHRuler
+ GtkVRuler
+ GtkRange
+ GtkScale
+ GtkHScale
+ GtkVScale
+ GtkScrollbar
+ GtkHScrollbar
+ GtkVScrollbar
+ GtkSeparator
+ GtkHSeparator
+ GtkVSeparator
+ GtkInvisible
+# GtkOldEditable
+# GtkText
+ GtkPreview if deprecated
+# Progress is deprecated, ProgressBar contains everything necessary
+# GtkProgress
+ GtkProgressBar
+ GtkAdjustment
+ GtkIMContext
+ GtkIMMulticontext
+ GtkItemFactory if deprecated
+ GtkTooltips
+[_^I_][_^I_][_^I_][_$_]
+# These object were added by hand because they do not show up in the hierarchy
+# chart.
+# These are derived from GtkObject:
+ GtkTreeViewColumn
+ GtkCellRenderer
+ GtkCellRendererPixbuf
+ GtkCellRendererText
+ GtkCellRendererCombo if gtk-2.6
+ GtkCellRendererToggle
+ GtkCellRendererProgress if gtk-2.6
+ GtkFileFilter if gtk-2.4
+ GtkBuilder if gtk-2.12
+# These are actually interfaces, but all objects that implement it are at
+# least GObjects.
+ GtkCellLayout if gtk-2.4
+ GtkTreeSortable if gtk-2.4
+ GtkTooltip if gtk-2.12
+# These are derived from GObject:
+ GtkStatusIcon if gtk-2.10
+ GtkTreeSelection
+ GtkTreeModel
+ GtkTreeStore
+ GtkListStore
+ GtkTreeModelSort
+ GtkTreeModelFilter if gtk-2.4
+ GtkIconFactory
+ GtkIconTheme
+ GtkSizeGroup
+ GtkClipboard if gtk-2.2
+ GtkAccelGroup
+ GtkAccelMap if gtk-2.4
+ GtkEntryCompletion if gtk-2.4
+ GtkAction if gtk-2.4
+ GtkToggleAction if gtk-2.4
+ GtkRadioAction if gtk-2.4
+ GtkActionGroup if gtk-2.4
+ GtkUIManager if gtk-2.4
+ GtkWindowGroup
+ GtkSourceLanguage if sourceview
+ GtkSourceLanguage if gtksourceview2
+ GtkSourceLanguagesManager if sourceview
+ GtkSourceLanguageManager if gtksourceview2
+ GladeXML as GladeXML, glade_xml_get_type if libglade
+ GConfClient as GConf if gconf
+# These ones are actualy interfaces, but interface implementations are GObjects
+ GtkEditable
+ GtkSourceStyle as SourceStyleObject if gtksourceview2
+ GtkSourceStyleScheme if sourceview
+ GtkSourceStyleScheme if gtksourceview2
+ GtkSourceStyleSchemeManager if gtksourceview2
+ GtkFileChooser if gtk-2.4
+## This now became a GObject in version 2:
+ GdkGC as GC, gdk_gc_get_type
+## These are Pango structures
+ PangoContext as PangoContext, pango_context_get_type if pango
+ PangoLayout as PangoLayoutRaw, pango_layout_get_type if pango
+ PangoFont as Font, pango_font_get_type if pango
+ PangoFontFamily as FontFamily, pango_font_family_get_type if pango
+ PangoFontFace as FontFace, pango_font_face_get_type if pango
+ PangoFontMap as FontMap, pango_font_face_get_type if pango
+ PangoFontset as FontSet, pango_fontset_get_type if pango
+## This type is only available for PANGO_ENABLE_BACKEND compiled source
+## PangoFontsetSimple as FontSetSimple, pango_fontset_simple_get_type
+
+## GtkGlExt classes
+ GdkGLContext if gtkglext
+ GdkGLConfig if gtkglext
+ GdkGLDrawable if gtkglext
+
+## GnomeVFS classes
+ GnomeVFSVolume as Volume, gnome_vfs_volume_get_type if gnomevfs
+ GnomeVFSDrive as Drive, gnome_vfs_drive_get_type if gnomevfs
+ GnomeVFSVolumeMonitor as VolumeMonitor, gnome_vfs_volume_monitor_get_type if gnomevfs
+
+## GIO classes
+# Note on all the "as" clauses: the prefix G is unfortunate since it leads
+# to two consecutive upper case letters which are not translated with an
+# underscore each (e.g. GConf -> gconf, GtkHButtonBox -> gtk_hbutton_box).
+# GUnixMountMonitor as UnixMountMonitor, g_unix_mount_monitor_get_type if gio
+ GOutputStream as OutputStream, g_output_stream_get_type if gio
+ GFilterOutputStream as FilterOutputStream, g_filter_output_stream_get_type if gio
+ GDataOutputStream as DataOutputStream, g_data_output_stream_get_type if gio
+ GBufferedOutputStream as BufferedOutputStream, g_buffered_output_stream_get_type if gio
+# GUnixOutputStream as UnixOutputStream, g_unix_output_stream_get_type if gio
+ GFileOutputStream as FileOutputStream, g_file_output_stream_get_type if gio
+ GMemoryOutputStream as MemoryOutputStream, g_memory_output_stream_get_type if gio
+ GInputStream as InputStream, g_input_stream_get_type if gio
+# GUnixInputStream as UnixInputStream, g_unix_input_stream_get_type if gio
+ GMemoryInputStream as MemoryInputStream, g_memory_input_stream_get_type if gio
+ GFilterInputStream as FilterInputStream, g_filter_input_stream_get_type if gio
+ GBufferedInputStream as BufferedInputStream, g_buffered_input_stream_get_type if gio
+ GDataInputStream as DataInputStream, g_data_input_stream_get_type if gio
+ GFileInputStream as FileInputStream, g_file_input_stream_get_type if gio
+# GDesktopAppInfo as DesktopAppInfo, g_desktop_app_info_get_type if gio
+ GFileMonitor as FileMonitor, g_file_monitor_get_type if gio
+ GVfs as Vfs, g_vfs_get_type if gio
+ GMountOperation as MountOperation, g_mount_operation_get_type if gio
+ GThemedIcon as ThemedIcon, g_themed_icon_get_type if gio
+ GEmblem as Emblem, g_emblem_get_type if gio
+ GEmblemedIcon as EmblemedIcon, g_emblemed_icon_get_type if gio
+ GFileEnumerator as FileEnumerator, g_file_enumerator_get_type if gio
+ GFilenameCompleter as FilenameCompleter, g_filename_completer_get_type if gio
+ GFileIcon as FileIcon, g_file_icon_get_type if gio
+ GVolumeMonitor as VolumeMonitor, g_volume_monitor_get_type if gio
+ GCancellable as Cancellable, g_cancellable_get_type if gio
+ GSimpleAsyncResult as SimpleAsyncResult, g_async_result_get_type if gio
+ GFileInfo as FileInfo, g_file_info_get_type if gio
+ GAppLaunchContext as AppLaunchContext, g_app_launch_context_get_type if gio
+## these are actually GInterfaces
+ GIcon as Icon, g_icon_get_type if gio
+ GSeekable as Seekable, g_seekable_get_type if gio
+ GAppInfo as AppInfo, g_app_info_get_type if gio
+ GVolume as Volume, g_volume_get_type if gio
+ GAsyncResult as AsyncResult, g_async_result_get_type if gio
+ GLoadableIcon as LoadableIcon, g_loadable_icon_get_type if gio
+ GDrive as Drive, g_drive_get_type if gio
+ GFile noEq as File, g_file_get_type if gio
+ GMount as Mount, g_mount_get_type if gio
+
+## GStreamer classes
+ GstObject as Object, gst_object_get_type if gstreamer
+ GstPad as Pad, gst_pad_get_type if gstreamer
+ GstGhostPad as GhostPad, gst_ghost_pad_get_type if gstreamer
+ GstPluginFeature as PluginFeature, gst_plugin_feature_get_type if gstreamer
+ GstElementFactory as ElementFactory, gst_element_factory_get_type if gstreamer
+ GstTypeFindFactory as TypeFindFactory, gst_type_find_factory_get_type if gstreamer
+ GstIndexFactory as IndexFactory, gst_index_factory_get_type if gstreamer
+ GstElement as Element, gst_element_get_type if gstreamer
+ GstBin as Bin, gst_bin_get_type if gstreamer
+ GstPipeline as Pipeline, gst_pipeline_get_type if gstreamer
+ GstImplementsInterface as ImplementsInterface, gst_implements_interface_get_type if gstreamer
+ GstTagSetter as TagSetter, gst_tag_setter_get_type if gstreamer
+ GstBaseSrc as BaseSrc, gst_base_src_get_type if gstreamer
+ GstPushSrc as PushSrc, gst_push_src_get_type if gstreamer
+ GstBaseSink as BaseSink, gst_base_sink_get_type if gstreamer
+ GstBaseTransform as BaseTransform, gst_base_transform_get_type if gstreamer
+ GstPlugin as Plugin, gst_plugin_get_type if gstreamer
+ GstRegistry as Registry, gst_registry_get_type if gstreamer
+ GstBus as Bus, gst_bus_get_type if gstreamer
+ GstClock as Clock, gst_clock_get_type if gstreamer
+ GstAudioClock as AudioClock, gst_audio_clock_get_type if gstreamer
+ GstSystemClock as SystemClock, gst_system_clock_get_type if gstreamer
+ GstNetClientClock as NetClientClock, gst_net_client_clock_get_type if gstreamer
+ GstIndex as Index, gst_index_get_type if gstreamer
+ GstPadTemplate as PadTemplate, gst_pad_template_get_type if gstreamer
+ GstTask as Task, gst_task_get_type if gstreamer
+ GstXML as XML, gst_xml_get_type if gstreamer
+ GstChildProxy as ChildProxy, gst_child_proxy_get_type if gstreamer
+ GstCollectPads as CollectPads, gst_collect_pads_get_type if gstreamer
+## these are actually GInterfaces
+ GstURIHandler as URIHandler, gst_uri_handler_get_type if gstreamer
+ GstAdapter as Adapter, gst_adapter_get_type if gstreamer
+ GstController as Controller, gst_controller_get_type if gstreamer
+
+ WebKitWebFrame as WebFrame, webkit_web_frame_get_type if webkit [_$_]
+ WebKitWebSettings as WebSettings, webkit_web_settings_get_type if webkit
+ WebKitNetworkRequest as NetworkRequest, webkit_network_request_get_type if webkit
+ WebKitNetworkResponse as NetworkResponse, webkit_network_response_get_type if webkit
+ WebKitDownload as Download, webkit_download_get_type if webkit
+ WebKitWebBackForwardList as WebBackForwardList, webkit_web_back_forward_list_get_type if webkit
+ WebKitWebHistoryItem as WebHistoryItem, webkit_web_history_item_get_type if webkit
+ WebKitWebInspector as WebInspector, webkit_web_inspector_get_type if webkit
+ WebKitHitTestResult as HitTestResult, webkit_hit_test_result_get_type if webkit
+ WebKitSecurityOrigin as SecurityOrigin, webkit_security_origin_get_type if webkit
+ WebKitSoupAuthDialog as SoupAuthDialog, webkit_soup_auth_dialog_get_type if webkit
+ WebKitWebDatabase as WebDatabase, webkit_web_database_get_type if webkit
+ WebKitWebDataSource as WebDataSource, webkit_web_data_source_get_type if webkit
+ WebKitWebNavigationAction as WebNavigationAction, webkit_web_navigation_action_get_type if webkit
+ WebKitWebPolicyDecision as WebPolicyDecision, webkit_web_policy_decision_get_type if webkit
+ WebKitWebResource as WebResource, webkit_web_resource_get_type if webkit
+ WebKitWebWindowFeatures as WebWindowFeatures, webkit_web_window_features_get_type if webkit
+
}
|
|
From: Andy S. <And...@co...> - 2010-06-04 14:11:41
|
diffing dir...
Fri Jun 4 09:13:09 EDT 2010 Andy Stewart <laz...@gm...>
* Move hierarchy.list to gtk package (Don't need reinstall gtk2hs-buildtools after add new type)
Ignore-this: d3f52ea66e784a2ecd66d764571f58a9
{
hunk ./gtk/gtk.cabal 19
-x-Types-File: Graphics/UI/Gtk/Types.chs
-x-Types-ModName: Graphics.UI.Gtk.Types
-x-Types-Forward: *System.Glib.GObject Graphics.UI.Gtk.General.Threading
-x-Types-Destructor: objectUnrefFromMainloop
hunk ./gtk/gtk.cabal 25
+ hierarchy.list
+[_^I_][_^I_][_^I_][_^I_][_^I_][_$_]
+x-Types-File: Graphics/UI/Gtk/Types.chs
+x-Types-ModName: Graphics.UI.Gtk.Types
+x-Types-Forward: *System.Glib.GObject Graphics.UI.Gtk.General.Threading
+x-Types-Destructor: objectUnrefFromMainloop
+x-Types-Hierarchy: hierarchy.list
addfile ./gtk/hierarchy.list
hunk ./gtk/hierarchy.list 1
+# This list is the result of a copy-and-paste from the GtkObject hierarchy
+# html documentation. Deprecated widgets are uncommented. Some additional
+# object have been defined at the end of the copied list.
+
+# The Gtk prefix of every object is removed, the other prefixes are
+# kept. The indentation implies the object hierarchy. In case the
+# type query function cannot be derived from the name or the type name
+# is different, an alternative name and type query function can be
+# specified by appending 'as typename, <query_func>'. In case this
+# function is not specified, the <name> is converted to
+# gtk_<name'>_get_type where <name'> is <name> where each upperscore
+# letter is converted to an underscore and lowerletter. The underscore
+# is omitted if an upperscore letter preceeded: GtkHButtonBox ->
+# gtk_hbutton_box_get_type. The generation of a type can be
+# conditional by appending 'if <tag>'. Such types are only produces if
+# --tag=<tag> is given on the command line of TypeGenerator.
+
+
+ GObject [_$_]
+ GdkDrawable [_$_]
+ GdkWindow as DrawWindow, gdk_window_object_get_type
+# GdkDrawableImplX11
+# GdkWindowImplX11
+ GdkPixmap
+ GdkGLPixmap if gtkglext
+ GdkGLWindow if gtkglext
+ GdkColormap
+ GdkScreen if gtk-2.2
+ GdkDisplay if gtk-2.2
+ GdkVisual
+ GdkDevice
+ GtkSettings
+ GtkTextBuffer
+ GtkSourceBuffer if sourceview
+ GtkSourceBuffer if gtksourceview2
+ GtkTextTag
+ GtkSourceTag if sourceview
+ GtkTextTagTable
+ GtkSourceTagTable if sourceview
+ GtkStyle
+ GtkRcStyle
+ GdkDragContext
+ GdkPixbuf
+ GdkPixbufAnimation
+ GdkPixbufSimpleAnim
+ GdkPixbufAnimationIter
+ GtkTextChildAnchor
+ GtkTextMark
+ GtkSourceMarker if sourceview
+ GtkSourceMark if gtksourceview2
+ GtkObject
+ GtkWidget
+ GtkMisc
+ GtkLabel
+ GtkAccelLabel
+ GtkTipsQuery if deprecated
+ GtkArrow
+ GtkImage
+ GtkContainer
+ WebKitWebView as WebView, webkit_web_view_get_type if webkit [_$_]
+ GtkBin
+ GtkAlignment
+ GtkFrame
+ GtkAspectFrame
+ GtkButton
+ GtkToggleButton
+ GtkCheckButton
+ GtkRadioButton
+ GtkColorButton if gtk-2.4
+ GtkFontButton if gtk-2.4
+ GtkOptionMenu if deprecated
+ GtkItem
+ GtkMenuItem
+ GtkCheckMenuItem
+ GtkRadioMenuItem
+ GtkTearoffMenuItem
+ GtkImageMenuItem
+ GtkSeparatorMenuItem
+ GtkListItem if deprecated
+# GtkTreeItem
+ GtkWindow
+ GtkDialog
+ GtkAboutDialog if gtk-2.6
+ GtkColorSelectionDialog
+ GtkFileSelection
+ GtkFileChooserDialog if gtk-2.4
+ GtkFontSelectionDialog
+ GtkInputDialog
+ GtkMessageDialog
+ GtkPlug if plugNsocket
+ GtkEventBox
+ GtkHandleBox
+ GtkScrolledWindow
+ GtkViewport
+ GtkExpander if gtk-2.4
+ GtkComboBox if gtk-2.4
+ GtkComboBoxEntry if gtk-2.4
+ GtkToolItem if gtk-2.4
+ GtkToolButton if gtk-2.4
+ GtkMenuToolButton if gtk-2.6
+ GtkToggleToolButton if gtk-2.4
+ GtkRadioToolButton if gtk-2.4
+ GtkSeparatorToolItem if gtk-2.4
+ GtkMozEmbed if mozembed
+ VteTerminal as Terminal if vte
+ GtkBox
+ GtkButtonBox
+ GtkHButtonBox
+ GtkVButtonBox
+ GtkVBox
+ GtkColorSelection
+ GtkFontSelection
+ GtkFileChooserWidget if gtk-2.4
+ GtkHBox
+ GtkCombo if deprecated
+ GtkFileChooserButton if gtk-2.6
+ GtkStatusbar
+ GtkCList if deprecated
+ GtkCTree if deprecated
+ GtkFixed
+ GtkPaned
+ GtkHPaned
+ GtkVPaned
+ GtkIconView if gtk-2.6
+ GtkLayout
+ GtkList if deprecated
+ GtkMenuShell
+ GtkMenu
+ GtkMenuBar
+ GtkNotebook
+# GtkPacker
+ GtkSocket if plugNsocket
+ GtkTable
+ GtkTextView
+ GtkSourceView if sourceview
+ GtkSourceView if gtksourceview2
+ GtkToolbar
+ GtkTreeView
+ GtkCalendar
+ GtkCellView if gtk-2.6
+ GtkDrawingArea
+ GtkEntry
+ GtkSpinButton
+ GtkRuler
+ GtkHRuler
+ GtkVRuler
+ GtkRange
+ GtkScale
+ GtkHScale
+ GtkVScale
+ GtkScrollbar
+ GtkHScrollbar
+ GtkVScrollbar
+ GtkSeparator
+ GtkHSeparator
+ GtkVSeparator
+ GtkInvisible
+# GtkOldEditable
+# GtkText
+ GtkPreview if deprecated
+# Progress is deprecated, ProgressBar contains everything necessary
+# GtkProgress
+ GtkProgressBar
+ GtkAdjustment
+ GtkIMContext
+ GtkIMMulticontext
+ GtkItemFactory if deprecated
+ GtkTooltips
+[_^I_][_^I_][_^I_][_$_]
+# These object were added by hand because they do not show up in the hierarchy
+# chart.
+# These are derived from GtkObject:
+ GtkTreeViewColumn
+ GtkCellRenderer
+ GtkCellRendererPixbuf
+ GtkCellRendererText
+ GtkCellRendererCombo if gtk-2.6
+ GtkCellRendererToggle
+ GtkCellRendererProgress if gtk-2.6
+ GtkFileFilter if gtk-2.4
+ GtkBuilder if gtk-2.12
+# These are actually interfaces, but all objects that implement it are at
+# least GObjects.
+ GtkCellLayout if gtk-2.4
+ GtkTreeSortable if gtk-2.4
+ GtkTooltip if gtk-2.12
+# These are derived from GObject:
+ GtkStatusIcon if gtk-2.10
+ GtkTreeSelection
+ GtkTreeModel
+ GtkTreeStore
+ GtkListStore
+ GtkTreeModelSort
+ GtkTreeModelFilter if gtk-2.4
+ GtkIconFactory
+ GtkIconTheme
+ GtkSizeGroup
+ GtkClipboard if gtk-2.2
+ GtkAccelGroup
+ GtkAccelMap if gtk-2.4
+ GtkEntryCompletion if gtk-2.4
+ GtkAction if gtk-2.4
+ GtkToggleAction if gtk-2.4
+ GtkRadioAction if gtk-2.4
+ GtkActionGroup if gtk-2.4
+ GtkUIManager if gtk-2.4
+ GtkWindowGroup
+ GtkSourceLanguage if sourceview
+ GtkSourceLanguage if gtksourceview2
+ GtkSourceLanguagesManager if sourceview
+ GtkSourceLanguageManager if gtksourceview2
+ GladeXML as GladeXML, glade_xml_get_type if libglade
+ GConfClient as GConf if gconf
+# These ones are actualy interfaces, but interface implementations are GObjects
+ GtkEditable
+ GtkSourceStyle as SourceStyleObject if gtksourceview2
+ GtkSourceStyleScheme if sourceview
+ GtkSourceStyleScheme if gtksourceview2
+ GtkSourceStyleSchemeManager if gtksourceview2
+ GtkFileChooser if gtk-2.4
+## This now became a GObject in version 2:
+ GdkGC as GC, gdk_gc_get_type
+## These are Pango structures
+ PangoContext as PangoContext, pango_context_get_type if pango
+ PangoLayout as PangoLayoutRaw, pango_layout_get_type if pango
+ PangoFont as Font, pango_font_get_type if pango
+ PangoFontFamily as FontFamily, pango_font_family_get_type if pango
+ PangoFontFace as FontFace, pango_font_face_get_type if pango
+ PangoFontMap as FontMap, pango_font_face_get_type if pango
+ PangoFontset as FontSet, pango_fontset_get_type if pango
+## This type is only available for PANGO_ENABLE_BACKEND compiled source
+## PangoFontsetSimple as FontSetSimple, pango_fontset_simple_get_type
+
+## GtkGlExt classes
+ GdkGLContext if gtkglext
+ GdkGLConfig if gtkglext
+ GdkGLDrawable if gtkglext
+
+## GnomeVFS classes
+ GnomeVFSVolume as Volume, gnome_vfs_volume_get_type if gnomevfs
+ GnomeVFSDrive as Drive, gnome_vfs_drive_get_type if gnomevfs
+ GnomeVFSVolumeMonitor as VolumeMonitor, gnome_vfs_volume_monitor_get_type if gnomevfs
+
+## GIO classes
+# Note on all the "as" clauses: the prefix G is unfortunate since it leads
+# to two consecutive upper case letters which are not translated with an
+# underscore each (e.g. GConf -> gconf, GtkHButtonBox -> gtk_hbutton_box).
+# GUnixMountMonitor as UnixMountMonitor, g_unix_mount_monitor_get_type if gio
+ GOutputStream as OutputStream, g_output_stream_get_type if gio
+ GFilterOutputStream as FilterOutputStream, g_filter_output_stream_get_type if gio
+ GDataOutputStream as DataOutputStream, g_data_output_stream_get_type if gio
+ GBufferedOutputStream as BufferedOutputStream, g_buffered_output_stream_get_type if gio
+# GUnixOutputStream as UnixOutputStream, g_unix_output_stream_get_type if gio
+ GFileOutputStream as FileOutputStream, g_file_output_stream_get_type if gio
+ GMemoryOutputStream as MemoryOutputStream, g_memory_output_stream_get_type if gio
+ GInputStream as InputStream, g_input_stream_get_type if gio
+# GUnixInputStream as UnixInputStream, g_unix_input_stream_get_type if gio
+ GMemoryInputStream as MemoryInputStream, g_memory_input_stream_get_type if gio
+ GFilterInputStream as FilterInputStream, g_filter_input_stream_get_type if gio
+ GBufferedInputStream as BufferedInputStream, g_buffered_input_stream_get_type if gio
+ GDataInputStream as DataInputStream, g_data_input_stream_get_type if gio
+ GFileInputStream as FileInputStream, g_file_input_stream_get_type if gio
+# GDesktopAppInfo as DesktopAppInfo, g_desktop_app_info_get_type if gio
+ GFileMonitor as FileMonitor, g_file_monitor_get_type if gio
+ GVfs as Vfs, g_vfs_get_type if gio
+ GMountOperation as MountOperation, g_mount_operation_get_type if gio
+ GThemedIcon as ThemedIcon, g_themed_icon_get_type if gio
+ GEmblem as Emblem, g_emblem_get_type if gio
+ GEmblemedIcon as EmblemedIcon, g_emblemed_icon_get_type if gio
+ GFileEnumerator as FileEnumerator, g_file_enumerator_get_type if gio
+ GFilenameCompleter as FilenameCompleter, g_filename_completer_get_type if gio
+ GFileIcon as FileIcon, g_file_icon_get_type if gio
+ GVolumeMonitor as VolumeMonitor, g_volume_monitor_get_type if gio
+ GCancellable as Cancellable, g_cancellable_get_type if gio
+ GSimpleAsyncResult as SimpleAsyncResult, g_async_result_get_type if gio
+ GFileInfo as FileInfo, g_file_info_get_type if gio
+ GAppLaunchContext as AppLaunchContext, g_app_launch_context_get_type if gio
+## these are actually GInterfaces
+ GIcon as Icon, g_icon_get_type if gio
+ GSeekable as Seekable, g_seekable_get_type if gio
+ GAppInfo as AppInfo, g_app_info_get_type if gio
+ GVolume as Volume, g_volume_get_type if gio
+ GAsyncResult as AsyncResult, g_async_result_get_type if gio
+ GLoadableIcon as LoadableIcon, g_loadable_icon_get_type if gio
+ GDrive as Drive, g_drive_get_type if gio
+ GFile noEq as File, g_file_get_type if gio
+ GMount as Mount, g_mount_get_type if gio
+
+## GStreamer classes
+ GstObject as Object, gst_object_get_type if gstreamer
+ GstPad as Pad, gst_pad_get_type if gstreamer
+ GstGhostPad as GhostPad, gst_ghost_pad_get_type if gstreamer
+ GstPluginFeature as PluginFeature, gst_plugin_feature_get_type if gstreamer
+ GstElementFactory as ElementFactory, gst_element_factory_get_type if gstreamer
+ GstTypeFindFactory as TypeFindFactory, gst_type_find_factory_get_type if gstreamer
+ GstIndexFactory as IndexFactory, gst_index_factory_get_type if gstreamer
+ GstElement as Element, gst_element_get_type if gstreamer
+ GstBin as Bin, gst_bin_get_type if gstreamer
+ GstPipeline as Pipeline, gst_pipeline_get_type if gstreamer
+ GstImplementsInterface as ImplementsInterface, gst_implements_interface_get_type if gstreamer
+ GstTagSetter as TagSetter, gst_tag_setter_get_type if gstreamer
+ GstBaseSrc as BaseSrc, gst_base_src_get_type if gstreamer
+ GstPushSrc as PushSrc, gst_push_src_get_type if gstreamer
+ GstBaseSink as BaseSink, gst_base_sink_get_type if gstreamer
+ GstBaseTransform as BaseTransform, gst_base_transform_get_type if gstreamer
+ GstPlugin as Plugin, gst_plugin_get_type if gstreamer
+ GstRegistry as Registry, gst_registry_get_type if gstreamer
+ GstBus as Bus, gst_bus_get_type if gstreamer
+ GstClock as Clock, gst_clock_get_type if gstreamer
+ GstAudioClock as AudioClock, gst_audio_clock_get_type if gstreamer
+ GstSystemClock as SystemClock, gst_system_clock_get_type if gstreamer
+ GstNetClientClock as NetClientClock, gst_net_client_clock_get_type if gstreamer
+ GstIndex as Index, gst_index_get_type if gstreamer
+ GstPadTemplate as PadTemplate, gst_pad_template_get_type if gstreamer
+ GstTask as Task, gst_task_get_type if gstreamer
+ GstXML as XML, gst_xml_get_type if gstreamer
+ GstChildProxy as ChildProxy, gst_child_proxy_get_type if gstreamer
+ GstCollectPads as CollectPads, gst_collect_pads_get_type if gstreamer
+## these are actually GInterfaces
+ GstURIHandler as URIHandler, gst_uri_handler_get_type if gstreamer
+ GstAdapter as Adapter, gst_adapter_get_type if gstreamer
+ GstController as Controller, gst_controller_get_type if gstreamer
+
+ WebKitWebFrame as WebFrame, webkit_web_frame_get_type if webkit [_$_]
+ WebKitWebSettings as WebSettings, webkit_web_settings_get_type if webkit
+ WebKitNetworkRequest as NetworkRequest, webkit_network_request_get_type if webkit
+ WebKitNetworkResponse as NetworkResponse, webkit_network_response_get_type if webkit
+ WebKitDownload as Download, webkit_download_get_type if webkit
+ WebKitWebBackForwardList as WebBackForwardList, webkit_web_back_forward_list_get_type if webkit
+ WebKitWebHistoryItem as WebHistoryItem, webkit_web_history_item_get_type if webkit
+ WebKitWebInspector as WebInspector, webkit_web_inspector_get_type if webkit
+ WebKitHitTestResult as HitTestResult, webkit_hit_test_result_get_type if webkit
+ WebKitSecurityOrigin as SecurityOrigin, webkit_security_origin_get_type if webkit
+ WebKitSoupAuthDialog as SoupAuthDialog, webkit_soup_auth_dialog_get_type if webkit
+ WebKitWebDatabase as WebDatabase, webkit_web_database_get_type if webkit
+ WebKitWebDataSource as WebDataSource, webkit_web_data_source_get_type if webkit
+ WebKitWebNavigationAction as WebNavigationAction, webkit_web_navigation_action_get_type if webkit
+ WebKitWebPolicyDecision as WebPolicyDecision, webkit_web_policy_decision_get_type if webkit
+ WebKitWebResource as WebResource, webkit_web_resource_get_type if webkit
+ WebKitWebWindowFeatures as WebWindowFeatures, webkit_web_window_features_get_type if webkit
+
}
|
|
From: Andy S. <And...@co...> - 2010-06-04 09:55:23
|
diffing dir...
Fri Jun 4 05:54:08 EDT 2010 Andy Stewart <laz...@gm...>
* Fix INSTALL
Ignore-this: 832b7cff47d7200ee89ee797981febee
hunk ./INSTALL 134
-~:$ darcs get --lazy http://code/haskell.org/gtk2hs
+~:$ darcs get --lazy http://code.haskell.org/gtk2hs
|
diffing dir...
Thu Jun 3 11:37:00 EDT 2010 Axe...@in...
* Create Gtk specific versions of functions that add something to the main loop. These specific functions acquire the Gtk lock before executing the action which the documentation promised but...
{
hunk ./gtk/Graphics/UI/Gtk/General/General.chs 72
- IOCondition,
- HandlerId
+ IOCondition(..),
+ HandlerId,
+ FD
hunk ./gtk/Graphics/UI/Gtk/General/General.chs 85
-import System.Glib.MainLoop
+import qualified System.Glib.MainLoop as ML
+import System.Glib.MainLoop ( Priority, priorityLow, priorityDefaultIdle,
+ priorityHighIdle, priorityDefault, priorityHigh, timeoutRemove, idleRemove,
+ inputRemove, IOCondition(..), HandlerId )
hunk ./gtk/Graphics/UI/Gtk/General/General.chs 180
--- | Acquired the global Gtk lock.
+-- | Acquire the global Gtk lock.
hunk ./gtk/Graphics/UI/Gtk/General/General.chs 268
+-- | Sets a function to be called at regular intervals, with the default
+-- priority 'priorityDefault'. The function is called repeatedly until it
+-- returns @False@, after which point the timeout function will not be called
+-- again. The first call to the function will be at the end of the first interval.
+--
+-- Note that timeout functions may be delayed, due to the processing of other
+-- event sources. Thus they should not be relied on for precise timing. After
+-- each call to the timeout function, the time of the next timeout is
+-- recalculated based on the current time and the given interval (it does not
+-- try to 'catch up' time lost in delays).
+--
+-- This function differs from 'ML.timeoutAdd' in that the action will
+-- be executed within the global Gtk+ lock. It is therefore possible to
+-- call Gtk+ functions from the action.
+--
+timeoutAdd :: IO Bool -> Int -> IO HandlerId
+timeoutAdd fun msec = timeoutAddFull fun priorityDefault msec
+
+-- | Sets a function to be called at regular intervals, with the given
+-- priority. The function is called repeatedly until it returns @False@, after
+-- which point the timeout function will not be called again. The first call
+-- to the function will be at the end of the first interval.
+--
+-- Note that timeout functions may be delayed, due to the processing of other
+-- event sources. Thus they should not be relied on for precise timing. After
+-- each call to the timeout function, the time of the next timeout is
+-- recalculated based on the current time and the given interval (it does not
+-- try to 'catch up' time lost in delays).
+--
+-- This function differs from 'ML.timeoutAddFull' in that the action will
+-- be executed within the global Gtk+ lock. It is therefore possible to
+-- call Gtk+ functions from the action.
+--
+timeoutAddFull :: IO Bool -> Priority -> Int -> IO HandlerId
+timeoutAddFull fun pri msec =
+ ML.timeoutAddFull (threadsEnter >> fun >>= \r -> threadsLeave >> return r)
+ pri msec
+
+-- | Add a callback that is called whenever the system is idle.
+--
+-- * A priority can be specified via an integer. This should usually be
+-- 'priorityDefaultIdle'.
+--
+-- * If the function returns @False@ it will be removed.
+--
+-- This function differs from 'ML.idleAdd' in that the action will
+-- be executed within the global Gtk+ lock. It is therefore possible to
+-- call Gtk+ functions from the action.
+--
+idleAdd :: IO Bool -> Priority -> IO HandlerId
+idleAdd fun pri =
+ ML.idleAdd (threadsEnter >> fun >>= \r -> threadsLeave >> return r) pri
+
+type FD = Int
+
+-- | Adds the file descriptor into the main event loop with the given priority.
+--
+-- This function differs from 'ML.inputAdd' in that the action will
+-- be executed within the global Gtk+ lock. It is therefore possible to
+-- call Gtk+ functions from the action.
+--
+inputAdd ::
+ FD -- ^ a file descriptor
+ -> [IOCondition] -- ^ the condition to watch for
+ -> Priority -- ^ the priority of the event source
+ -> IO Bool -- ^ the function to call when the condition is satisfied.
+ -- The function should return False if the event source
+ -- should be removed.
+ -> IO HandlerId -- ^ the event source id
+inputAdd fd conds pri fun =
+ ML.inputAdd fd conds pri (threadsEnter >> fun >>= \r -> threadsLeave >> return r)
}
|
|
From: Andy S. <And...@co...> - 2010-06-02 07:08:35
|
diffing dir...
Wed Jun 2 03:05:55 EDT 2010 Andy Stewart <laz...@gm...>
* Improve signal `queryTooltip`
Ignore-this: 4b625d69ebb779f22ec57ae0cc5223aa
{
hunk ./gtk/Graphics/UI/Gtk/Abstract/Widget.chs 380
+ ,Point
hunk ./gtk/Graphics/UI/Gtk/Abstract/Widget.chs 2478
--- for widget. If this is the case 'True' should be returned, 'False' otherwise. Note that if @keyboardMode@
--- is 'True', the values of x and y are undefined and should not be used.
+-- for widget. If this is the case 'True' should be returned, 'False' otherwise. [_$_]
+-- Note if widget got focus in keyboard mode, 'Point' is 'Nothing'.
hunk ./gtk/Graphics/UI/Gtk/Abstract/Widget.chs 2485
-queryTooltip :: WidgetClass self => Signal self (Widget -> Int -> Int -> Bool -> Tooltip -> IO Bool)
-queryTooltip = Signal (connect_OBJECT_INT_INT_BOOL_OBJECT__BOOL "query-tooltip")
+queryTooltip :: WidgetClass self => Signal self (Widget -> Maybe Point -> Tooltip -> IO Bool)
+queryTooltip =
+ Signal (\after model user -> [_$_]
+ connect_OBJECT_INT_INT_BOOL_OBJECT__BOOL "query_tooltip" [_$_]
+ after model (\widget x y keyb tooltip -> [_$_]
+ user widget (if keyb then Nothing else Just (x, y)) tooltip))
}
|
|
From: Andy S. <And...@co...> - 2010-06-02 07:08:31
|
diffing dir...
Tue Jun 1 12:58:57 EDT 2010 Andy Stewart <laz...@gm...>
* Add MenuToolButton support functions for Tooltip.chs
Ignore-this: 9e153056f052f09f3bf7bd5569ce347c
{
hunk ./gtk/Graphics/UI/Gtk/MenuComboToolbar/MenuToolButton.chs 69
+#if GTK_CHECK_VERSION(2,12,0)
+ menuToolButtonSetArrowTooltipText,
+ menuToolButtonSetArrowTooltipMarkup,
+#endif
hunk ./gtk/Graphics/UI/Gtk/MenuComboToolbar/MenuToolButton.chs 92
+import Graphics.Rendering.Pango.Markup
hunk ./gtk/Graphics/UI/Gtk/MenuComboToolbar/MenuToolButton.chs 171
+#if GTK_CHECK_VERSION(2,12,0)
+-- | Sets the tooltip text to be used as tooltip for the arrow button which
+-- pops up the menu. See 'toolItemSetTooltip' for setting a tooltip on the
+-- whole 'MenuToolButton'.
+--
+-- * Available since Gtk+ version 2.12
+--
+menuToolButtonSetArrowTooltipText :: MenuToolButtonClass self => self
+ -> String -- ^ @text@ - text to be used as tooltip text for button's arrow
+ -- button
+ -> IO ()
+menuToolButtonSetArrowTooltipText self text =
+ withUTFString text $ \textPtr ->
+ {# call gtk_menu_tool_button_set_arrow_tooltip_text #}
+ (toMenuToolButton self)
+ textPtr
+
+-- | Sets the tooltip markup text to be used as tooltip for the arrow button
+-- which pops up the menu. See 'toolItemSetTooltip' for setting a tooltip on
+-- the whole 'MenuToolButton'.
+--
+-- * Available since Gtk+ version 2.12
+--
+menuToolButtonSetArrowTooltipMarkup :: MenuToolButtonClass self => self
+ -> Markup -- ^ @markup@ - markup text to be used as tooltip text for button's
+ -- arrow button
+ -> IO ()
+menuToolButtonSetArrowTooltipMarkup self markup =
+ withUTFString markup $ \markupPtr ->
+ {# call gtk_menu_tool_button_set_arrow_tooltip_markup #}
+ (toMenuToolButton self)
+ markupPtr
+#endif
+
}
|
|
From: Andy S. <And...@co...> - 2010-06-01 14:50:59
|
diffing dir...
Tue Jun 1 10:39:48 EDT 2010 Andy Stewart <laz...@gm...>
* Fix function `tooltipSetMarkup`
Ignore-this: b4af7ecca1bc74b22e20727f33729a8b
{
hunk ./gtk/Graphics/UI/Gtk/Misc/Tooltip.chs 104
+import Graphics.Rendering.Pango.Markup
hunk ./gtk/Graphics/UI/Gtk/Misc/Tooltip.chs 117
- -> Maybe String -- ^ @markup@ - a markup string (see Pango markup format) or 'Nothing'
+ -> Maybe Markup -- ^ @markup@ - a markup string (see Pango markup format) or 'Nothing'
}
|
|
From: Andy S. <And...@co...> - 2010-06-01 14:50:58
|
diffing dir...
Tue Jun 1 10:47:01 EDT 2010 Andy Stewart <laz...@gm...>
* Fix `widgetTooltipMarkup` and docs.
Ignore-this: 3fc33fd561f18f221d8b7b0215c71826
{
hunk ./gtk/Graphics/UI/Gtk/Abstract/Widget.chs 371
+import Graphics.Rendering.Pango.Markup
hunk ./gtk/Graphics/UI/Gtk/Abstract/Widget.chs 1189
- -> IO Window -- ^ returns The 'Window' of the current tooltip. . transfer none. [_$_]
+ -> IO Window -- ^ returns The 'Window' of the current tooltip
hunk ./gtk/Graphics/UI/Gtk/Abstract/Widget.chs 2288
-widgetTooltipMarkup :: WidgetClass self => Attr self (Maybe String)
+widgetTooltipMarkup :: WidgetClass self => Attr self (Maybe Markup)
}
|
|
From: Andy S. <And...@co...> - 2010-06-01 14:50:54
|
diffing dir...
Tue Jun 1 10:03:04 EDT 2010 Andy Stewart <laz...@gm...>
* Add Widget support functions for Tooltip.chs
Ignore-this: 6b10098119f7a416d763c834bd892cae
{
hunk ./gtk/Graphics/UI/Gtk/Abstract/Widget.chs 143
+#if GTK_CHECK_VERSION(2,12,0)
+ widgetGetTooltipWindow,
+ widgetSetTooltipWindow,
+ widgetTriggerTooltipQuery,
+#endif
hunk ./gtk/Graphics/UI/Gtk/Abstract/Widget.chs 229
+ widgetTooltipMarkup,
+ widgetTooltipText,
+ widgetHasTooltip,
hunk ./gtk/Graphics/UI/Gtk/Abstract/Widget.chs 253
+ queryTooltip,
hunk ./gtk/Graphics/UI/Gtk/Abstract/Widget.chs 1181
+#if GTK_CHECK_VERSION(2,12,0)
+-- | Returns the 'Window' of the current tooltip. This can be the 'Window' created by default, or the
+-- custom tooltip window set using 'widgetSetTooltipWindow'.
+-- [_$_]
+-- * Available since Gtk+ version 2.12
+--
+widgetGetTooltipWindow :: WidgetClass self => self
+ -> IO Window -- ^ returns The 'Window' of the current tooltip. . transfer none. [_$_]
+widgetGetTooltipWindow self =
+ makeNewObject mkWindow $
+ {# call gtk_widget_get_tooltip_window #}
+ (toWidget self)
+
+-- | Replaces the default, usually yellow, window used for displaying tooltips with @customWindow@. GTK+
+-- will take care of showing and hiding @customWindow@ at the right moment, to behave likewise as the
+-- default tooltip window. If @customWindow@ is 'Nothing', the default tooltip window will be used.
+-- [_$_]
+-- If the custom window should have the default theming it needs to have the name 'gtk-tooltip', see
+-- 'widgetSetName'.
+--
+-- * Available since Gtk+ version 2.12
+-- [_$_]
+widgetSetTooltipWindow :: (WidgetClass self, WindowClass customWindow) => self
+ -> Maybe customWindow -- ^ @customWindow@ a 'Window', or 'Nothing'. allow-none. [_$_]
+ -> IO ()
+widgetSetTooltipWindow self customWindow =
+ {# call gtk_widget_set_tooltip_window #}
+ (toWidget self)
+ (maybe (Window nullForeignPtr) toWindow customWindow)
+
+-- | Triggers a tooltip query on the display where the toplevel of @widget@ is
+-- located. See 'tooltipTriggerTooltipQuery' for more information.
+--
+-- * Available since Gtk+ version 2.12
+--
+widgetTriggerTooltipQuery :: WidgetClass self => self -> IO ()
+widgetTriggerTooltipQuery self =
+ {# call gtk_widget_trigger_tooltip_query #}
+ (toWidget self)
+#endif
+
hunk ./gtk/Graphics/UI/Gtk/Abstract/Widget.chs 2276
+-- | Sets the text of tooltip to be the given string, which is marked up with the Pango text markup
+-- language. Also see 'tooltipSetMarkup'.
+-- [_$_]
+-- This is a convenience property which will take care of getting the tooltip shown if the given string
+-- is not \"\": 'hasTooltip' will automatically be set to 'True' and there will be taken care of
+-- 'queryTooltip' in the default signal handler.
+-- [_$_]
+-- Default value: \"\"
+-- [_$_]
+-- * Available since Gtk+ version 2.12
+--
+widgetTooltipMarkup :: WidgetClass self => Attr self (Maybe String)
+widgetTooltipMarkup = newAttrFromMaybeStringProperty "tooltip-markup"
+
+-- | Sets the text of tooltip to be the given string.
+-- [_$_]
+-- Also see 'tooltipSetText'.
+-- [_$_]
+-- This is a convenience property which will take care of getting the tooltip shown if the given string
+-- is not \"\": 'hasTooltip' will automatically be set to 'True' and there will be taken care of
+-- 'queryTooltip' in the default signal handler.
+-- [_$_]
+-- Default value: \"\"
+-- [_$_]
+-- * Available since Gtk+ version 2.12
+--
+widgetTooltipText :: WidgetClass self => Attr self (Maybe String)
+widgetTooltipText = newAttrFromMaybeStringProperty "tooltip-text"
+
+-- | Enables or disables the emission of 'queryTooltip' on widget. A value of 'True' indicates that widget
+-- can have a tooltip, in this case the widget will be queried using 'queryTooltip' to determine
+-- whether it will provide a tooltip or not.
+-- [_$_]
+-- Note that setting this property to 'True' for the first time will change the event masks of the
+-- 'Windows' of this widget to include leave-notify and motion-notify events. This cannot and will not
+-- be undone when the property is set to 'False' again.
+-- [_$_]
+-- Default value: 'False'
+-- [_$_]
+-- * Available since Gtk+ version 2.12
+--
+widgetHasTooltip :: WidgetClass self => Attr self Bool
+widgetHasTooltip = newAttrFromBoolProperty "has-tooltip"
+
hunk ./gtk/Graphics/UI/Gtk/Abstract/Widget.chs 2472
+-- | Emitted when 'hasTooltip' is 'True' and the 'gtkTooltipTimeout' has expired with the cursor
+-- hovering "above" widget; or emitted when widget got focus in keyboard mode.
+-- [_$_]
+-- Using the given coordinates, the signal handler should determine whether a tooltip should be shown
+-- for widget. If this is the case 'True' should be returned, 'False' otherwise. Note that if @keyboardMode@
+-- is 'True', the values of x and y are undefined and should not be used.
+-- [_$_]
+-- The signal handler is free to manipulate tooltip with the therefore destined function calls.
+--
+-- * Available since Gtk+ version 2.12
+--
+queryTooltip :: WidgetClass self => Signal self (Widget -> Int -> Int -> Bool -> Tooltip -> IO Bool)
+queryTooltip = Signal (connect_OBJECT_INT_INT_BOOL_OBJECT__BOOL "query-tooltip")
+
hunk ./gtk/marshal.list 156
-
+# For queryTooltip
+BOOLEAN:TOBJECT,INT,INT,BOOLEAN,TOBJECT
}
|
2 messages has been excluded from this view by a project administrator.
