Update of /cvsroot/gtk2hs/gtk2hs/mozembed/Graphics/UI/Gtk
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv1970/mozembed/Graphics/UI/Gtk
Modified Files:
MozEmbed.chs
Log Message:
Use Int in the signal handler return type rather than (Num n, Integral n) => n
since there's no need to be so general (and it breaks my new signals system!)
Index: MozEmbed.chs
===================================================================
RCS file: /cvsroot/gtk2hs/gtk2hs/mozembed/Graphics/UI/Gtk/MozEmbed.chs,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- MozEmbed.chs 14 Jan 2005 19:04:50 -0000 1.4
+++ MozEmbed.chs 26 Mar 2005 00:09:27 -0000 1.5
@@ -248,8 +248,9 @@
onKeyDown, onKeyPress, onKeyUp,
onMouseDown, onMouseUp, onMouseClick, onMouseDoubleClick,
onMouseOver, onMouseOut
- :: (Num n, Integral n, MozEmbedClass m)
- => m -> (Ptr a -> IO n) -> IO (ConnectId m)
+ :: MozEmbedClass self => self
+ -> (Ptr a -> IO Int)
+ -> IO (ConnectId self)
onKeyDown = connect_PTR__INT "dom_key_down" False
onKeyPress = connect_PTR__INT "dom_key_press" False
onKeyUp = connect_PTR__INT "dom_key_up" False
|
