diff --git a/app/Main.hs b/app/Main.hs
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -34,7 +34,7 @@
 main = runHandlingStateT $ foreground liveProgram
 
 liveProgram :: LiveProgram (HandlingStateT IO)
-liveProgram = liveCell $ glossWrapC defaultSettings { debugEvents = True } glossCell
+liveProgram = liveCell $ glossWrapC defaultSettings { debugEvents = True } glossCell >>> arr (const ())
 
 glossCell' :: Cell PictureM () ()
 glossCell'
diff --git a/essence-of-live-coding-gloss-example.cabal b/essence-of-live-coding-gloss-example.cabal
--- a/essence-of-live-coding-gloss-example.cabal
+++ b/essence-of-live-coding-gloss-example.cabal
@@ -1,5 +1,5 @@
 name:                essence-of-live-coding-gloss-example
-version:             0.2.2
+version:             0.2.3
 synopsis: General purpose live coding framework - Gloss example
 description:
   essence-of-live-coding is a general purpose and type safe live coding framework.
@@ -32,7 +32,7 @@
 source-repository this
   type:     git
   location: git@github.com:turion/essence-of-live-coding.git
-  tag:      v0.2.2
+  tag:      v0.2.3
 
 
 executable essence-of-live-coding-gloss-example
@@ -41,8 +41,8 @@
       base >= 4.11 && < 5
     , transformers >= 0.5
     , gloss >= 1.13
-    , essence-of-live-coding >= 0.2.2
-    , essence-of-live-coding-gloss >= 0.2.2
+    , essence-of-live-coding >= 0.2.3
+    , essence-of-live-coding-gloss >= 0.2.3
     , syb >= 0.7
   hs-source-dirs:      app
   default-language:    Haskell2010