Mon Sep 28 15:32:24 EDT 2009 Axe...@en...
* Add the dragFailed signal.
hunk ./gtk/Graphics/UI/Gtk/General/Drag.chs.pp 65
+ DragResult(..),
hunk ./gtk/Graphics/UI/Gtk/General/Drag.chs.pp 142
-import Graphics.UI.Gtk.General.Enums ( DestDefaults(..), DragProtocol(..) )
+import Graphics.UI.Gtk.General.Enums ( DestDefaults(..), DragProtocol(..),
+ DragResult(..) )
hunk ./gtk/Graphics/UI/Gtk/General/Drag.chs.pp 690
-dragFailed = error "dragFailed: not defined yet"
+-- | The 'dragFailed' signal is emitted on the drag source when a drag has
+-- failed. The signal handler may hook custom code to handle a failed DND
+-- operation based on the type of error, it returns @True@ is the failure has
+-- been already handled (not showing the default \"drag operation failed\"
+-- animation), otherwise it returns @False@.
+--
+-- * Available since Gtk+ 2.12.0.
+--
+dragFailed :: WidgetClass self => Signal self (DragContext -> DragResult -> IO Bool)
+dragFailed = Signal (connect_OBJECT_ENUM__BOOL "drag_failed")
hunk ./gtk/Graphics/UI/Gtk/General/Enums.chs.pp 38
+ DragResult(..),
hunk ./gtk/Graphics/UI/Gtk/General/Enums.chs.pp 176
+-- | Gives an indication why a drag operation failed. The value can by
+-- obtained by connecting to the 'Graphics.UI.Gtk.General.Drag.dragFailed'
+-- signal.
+--
+-- * 'DragResultSuccess': The drag operation was successful
+--
+-- * 'DragResultNoTarget': No suitable drag target
+--
+-- * 'DragResultUserCancelled': The user cancelled the drag operation
+--
+-- * 'DragResultTimeoutExpired': The drag operation timed out
+--
+-- * 'DragResultGrabBroken': The pointer or keyboard grab used for the drag
+-- operation was broken
+--
+-- * 'DragResultError': The drag operation failed due to some unspecified error
+--
+{#enum DragResult {underscoreToCase} deriving (Bounded,Eq,Show)#}
+
|
