diff --git a/gtk-sni-tray.cabal b/gtk-sni-tray.cabal
--- a/gtk-sni-tray.cabal
+++ b/gtk-sni-tray.cabal
@@ -1,11 +1,11 @@
--- This file has been generated from package.yaml by hpack version 0.28.2.
+-- This file has been generated from package.yaml by hpack version 0.27.0.
 --
 -- see: https://github.com/sol/hpack
 --
--- hash: 7df63c6c96e3fca85aa9675c23240c83d4a6deeedfdbd6b0a4ddd1295965abf8
+-- hash: d1e672e55e7a2e314add18da0c35b7cb0a029595671050692864ae0b56395ffa
 
 name:           gtk-sni-tray
-version:        0.1.3.0
+version:        0.1.3.1
 synopsis:       A standalone StatusNotifierItem/AppIndicator tray
 description:    Please see the README on Github at <https://github.com/IvanMalison/gtk-sni-tray#readme>
 category:       System
@@ -18,6 +18,7 @@
 license-file:   LICENSE
 build-type:     Simple
 cabal-version:  >= 1.10
+
 extra-source-files:
     ChangeLog.md
     README.md
@@ -49,7 +50,7 @@
     , gi-gdkpixbuf >=2.0.16
     , gi-glib
     , gi-gtk >=3.0.21
-    , gtk-strut
+    , gtk-strut >=0.1.2.1
     , haskell-gi >=0.21.2
     , haskell-gi-base >=0.21.1
     , hslogger
diff --git a/src/StatusNotifier/Tray.hs b/src/StatusNotifier/Tray.hs
--- a/src/StatusNotifier/Tray.hs
+++ b/src/StatusNotifier/Tray.hs
@@ -1,3 +1,4 @@
+{-# LANGUAGE OverloadedStrings #-}
 {-# LANGUAGE OverloadedLabels #-}
 module StatusNotifier.Tray where
 
@@ -38,6 +39,12 @@
 trayLogger :: Priority -> String -> IO ()
 trayLogger = logM "StatusNotifier.Tray"
 
+logItemInfo :: ItemInfo -> String -> IO ()
+logItemInfo info message =
+  trayLogger INFO $ printf "%s - %s pixmap count: %s" message
+         (show $ info { iconPixmaps = []})
+         (show $ length $ iconPixmaps info)
+
 getScaledWidthHeight :: Bool -> Int32 -> Int32 -> Int32 -> (Int32, Int32)
 getScaledWidthHeight shouldTargetWidth targetSize width height =
   let getRatio :: Int32 -> Rational
@@ -265,6 +272,9 @@
                 pixBuf <- getScaledPixBufFromInfo size info
                 Gtk.imageNewFromPixbuf pixBuf
 
+          Gtk.widgetGetStyleContext image >>=
+             flip Gtk.styleContextAddClass "tray-icon-image"
+
           Gtk.containerAdd button image
 
           maybeMenu <- sequenceA $ DM.menuNew (T.pack serviceNameStr) .
@@ -309,11 +319,6 @@
       updateHandler IconNameUpdated i = updateIconFromInfo i
 
       updateHandler _ _ = return ()
-
-      logItemInfo info message =
-        trayLogger INFO $ printf "%s - %s pixmap count: %s" message
-               (show $ info { iconPixmaps = []})
-               (show $ length $ iconPixmaps info)
 
       getScaledPixBufFromInfo size info =
         getPixBufFromInfo size info >>=