diff --git a/gloss-juicy.cabal b/gloss-juicy.cabal
--- a/gloss-juicy.cabal
+++ b/gloss-juicy.cabal
@@ -1,19 +1,18 @@
 name:                gloss-juicy
-version:             0.2.2
+version:             0.2.3
 synopsis:            Load any image supported by Juicy.Pixels in your gloss application
 description:         Lets you convert any image supported by Juicy.Pixels in a gloss application by converting to gloss' Bitmap representation.
-		     .
                      Version 0.1.2 just enabled caching (from a frame to the next, and so on) of the images you load, so that they are not recomputed for each frame. Credits go to Jonathan Daugherty for the patch.
-homepage:            http://github.com/alpmestan/gloss-juicy
+homepage:            http://github.com/hpacheco/gloss-juicy
 license:             BSD3
 license-file:        LICENSE
 author:              Alp Mestanogullari <alpmestan@gmail.com>
-maintainer:          Alp Mestanogullari <alpmestan@gmail.com>
+maintainer:          Hugo Pacheco <hpacheco@gmail.com>
 copyright:           2013-2015 Alp Mestanogullari
 category:            Graphics
 build-type:          Simple
 cabal-version:       >=1.8
-tested-with:         GHC == 8.0.1
+tested-with:         GHC == 8.4.2
 
 library
   exposed-modules:     Graphics.Gloss.Juicy
@@ -21,7 +20,7 @@
   build-depends:       base >=4 && < 5,
                        bytestring,
                        bmp >= 1.2.4.1,
-                       gloss >= 1.10,
+                       gloss >= 1.13,
                        JuicyPixels,
                        vector
   ghc-options:         -O2 -Wall
@@ -31,7 +30,7 @@
   build-depends:       base >= 4 && < 5,
                        bytestring,
                        bmp >= 1.2.4.1,
-                       gloss >= 1.10,
+                       gloss >= 1.13,
                        JuicyPixels,
                        vector
   ghc-options:         -O2 -Wall -threaded
diff --git a/gloss-juicy.hs b/gloss-juicy.hs
--- a/gloss-juicy.hs
+++ b/gloss-juicy.hs
@@ -13,7 +13,8 @@
 
 
 displayPic :: Picture -> IO ()
-displayPic p@(Bitmap width height _ _) = display (InWindow "Image Viewer" (width, height) (10, 10))
+displayPic p@(Bitmap dta) = display (InWindow "Image Viewer" (width, height) (10, 10))
                                                  white
                                                  p
+  where (width,height) = bitmapSize dta
 displayPic _ = error "only the Bitmap constructor should be used here"