diff --git a/Graphics/UI/Gtk/General/General.chs b/Graphics/UI/Gtk/General/General.chs
--- a/Graphics/UI/Gtk/General/General.chs
+++ b/Graphics/UI/Gtk/General/General.chs
@@ -219,7 +219,7 @@
 -- | Inquire the number of events pending on the event queue
 --
 eventsPending :: IO Int
-eventsPending  = liftM fromIntegral {#call unsafe events_pending#}
+eventsPending  = liftM fromIntegral {#call events_pending#}
 
 -- | Run the Gtk+ main event loop.
 --
diff --git a/gtk.cabal b/gtk.cabal
--- a/gtk.cabal
+++ b/gtk.cabal
@@ -1,5 +1,5 @@
 Name:           gtk
-Version:        0.12.5.3
+Version:        0.12.5.4
 License:        LGPL-2.1
 License-file:   COPYING
 Copyright:      (c) 2001-2010 The Gtk2Hs Team