diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -1,5 +1,9 @@
 # Changelog
 
+### 0.4.2.1
+
+* Update Examples/Full.hs to work with new API
+
 ### 0.4.2.0
 
 * Add `withNonOptions` function to consume any number of non-option arguments.
diff --git a/Examples/Full.hs b/Examples/Full.hs
--- a/Examples/Full.hs
+++ b/Examples/Full.hs
@@ -22,20 +22,14 @@
   ]
 
 countUp,countDown,help :: Command IO
-countUp = command
-  {
-    name        = "up"
-  , description = "Count up"
-  , action      = withOption verboseOpt $ \ v -> io $ if v == Quiet
+countUp = command "up" "Count up" $
+  withOption verboseOpt $ \ v -> io $
+    if v == Quiet
       then putStrLn "Counting quietly!"
       else mapM_ print [1 ..]
-  }
-countDown = command
-  {
-    name        = "down"
-  , description = "Count down from INT."
-  , action      = withNonOption Argument.natural $ \ upperBound -> io $ mapM_ print [upperBound, pred upperBound .. 1]
-  }
+countDown = command "down" "Count down from INT." $
+  withNonOption Argument.natural $ \ upperBound -> io $
+    mapM_ print [upperBound, pred upperBound .. 1]
 help = command "help" "Show usage info" $ io (showUsage myCommands)
 
 
diff --git a/console-program.cabal b/console-program.cabal
--- a/console-program.cabal
+++ b/console-program.cabal
@@ -1,5 +1,5 @@
 name:            console-program
-version:         0.4.2.0
+version:         0.4.2.1
 cabal-Version:   >= 1.6
 license:         BSD3
 author:          Arie Peterson