diff --git a/Graphics/Rendering/Pango/GlyphStorage.chs b/Graphics/Rendering/Pango/GlyphStorage.chs
--- a/Graphics/Rendering/Pango/GlyphStorage.chs
+++ b/Graphics/Rendering/Pango/GlyphStorage.chs
@@ -55,21 +55,20 @@
 
 -- | Ask for bounding rectangles of this glyph sequence.
 --
--- * Compute the logical and ink extents of a glyph string. The
---   logical extend is used for positioning, the ink size is the smallest
+-- * Compute the ink and logical extents of a glyph string. The
+--   logical size is used for positioning, the ink size is the smallest
 --   bounding box that includes all character pixels. The ink size can be
---   smaller or larger that the logical layout.
---
+--   smaller or larger than the logical size.
 --
 glyphItemExtents :: GlyphItem -> IO (PangoRectangle, PangoRectangle)
 glyphItemExtents (GlyphItem pi self) = do
   font <- pangoItemGetFont pi
-  alloca $ \logPtr -> alloca $ \inkPtr -> do
+  alloca $ \inkPtr -> alloca $ \logPtr -> do
   {#call unsafe glyph_string_extents#} self font
-    (castPtr logPtr) (castPtr inkPtr)
-  log <- peek logPtr
+    (castPtr inkPtr) (castPtr logPtr)
   ink <- peek inkPtr
-  return (log, ink)
+  log <- peek logPtr
+  return (ink, log)
 
 -- | Ask for bounding rectangles for a sub-range of a glyph sequence.
 --
diff --git a/Graphics/Rendering/Pango/Types.chs b/Graphics/Rendering/Pango/Types.chs
--- a/Graphics/Rendering/Pango/Types.chs
+++ b/Graphics/Rendering/Pango/Types.chs
@@ -72,7 +72,7 @@
 #else
 import Foreign.ForeignPtr (unsafeForeignPtrToPtr)
 #endif
-import Foreign.C.Types    (CULong(..), CUInt(..))
+import Foreign.C.Types    (CULong(..), CUInt(..), CULLong(..))
 import System.Glib.GType  (GType, typeInstanceIsA)
 {#import System.Glib.GObject#}
 
diff --git a/pango.cabal b/pango.cabal
--- a/pango.cabal
+++ b/pango.cabal
@@ -1,5 +1,5 @@
 Name:           pango
-Version:        0.13.0.0
+Version:        0.13.0.1
 License:        LGPL-2.1
 License-file:   COPYING
 Copyright:      (c) 2001-2010 The Gtk2Hs Team
@@ -44,7 +44,7 @@
                         process, directory, array, containers, pretty, mtl,
                         glib  >= 0.13.0.0 && < 0.14,
                         cairo >= 0.13.0.0 && < 0.14,
-                        text >= 0.11.0.6 && < 1.2
+                        text >= 0.11.0.6 && < 1.3
 
         if flag(new-exception)
           build-depends:  base >= 4