diff --git a/example/Main.hs b/example/Main.hs
--- a/example/Main.hs
+++ b/example/Main.hs
@@ -10,10 +10,10 @@
 import System.Console.StructuredCLI
 import Text.Read                    (readMaybe)
 
-data State = State { bars :: Int,
-                     bazs :: Int }
+data AppState = AppState { bars :: Int,
+                           bazs :: Int }
 
-type StateM = StateT State IO
+type StateM = StateT AppState IO
 
 root :: CommandsT StateM ()
 root = do
@@ -42,7 +42,7 @@
         n <- lift $ modify incBaz >> gets bazs
         liftIO . putStrLn $ "You have bazzed " ++ show n ++ " times"
         return 0
-            where incBaz s@State{..} = s { bazs = bazs + 1 }
+            where incBaz s@AppState{..} = s { bazs = bazs + 1 }
 
 frob :: CommandsT StateM ()
 frob = command "frob" (Just "frob this level") $ Just $ do
@@ -61,13 +61,13 @@
     where complain = do
                   return $ failure name
           accept x remaining n = do
-                  modify $ \s@State{..} -> s { bars = n }
+                  modify $ \s@AppState{..} -> s { bars = n }
                   return $ Done x remaining
 
 failure :: String -> ParseResult
 failure name = Fail name $ Just "<number of times to bar>"
 
 main :: IO ()
-main = evalStateT (runCLI "some CLI" (Just settings) root) $ State 0 0
+main = evalStateT (runCLI "some CLI" (Just settings) root) $ AppState 0 0
     where settings = def { banner = "Some CLI Application\nTab completion is your friend!",
                            history = Just ".someCLI.history" }
diff --git a/src/System/Console/StructuredCLI.hs b/src/System/Console/StructuredCLI.hs
--- a/src/System/Console/StructuredCLI.hs
+++ b/src/System/Console/StructuredCLI.hs
@@ -58,11 +58,13 @@
 -- >>> Hello CLI world > exit
 --
 -- A good way to get you started is to grab the example code available under <https://github.com/erickg/structured-cli/blob/master/example/Main.hs example/Main.hs> and modify it to suit your needs.
+                                     Action,
                                      Commands,
                                      CommandsT(..),
                                      Parser,
                                      ParseResult(..),
                                      Settings(..),
+                                     State(..),
                                      (>+),
                                      command,
                                      exit,
@@ -256,7 +258,7 @@
             throw Exit
         else
             lift $ modify $ \state -> state { nodes = nodes0,    -- parse failed or no action
-                                             labels = labels0 } -- restore nodes to previous state
+                                              labels = labels0 } -- restore nodes to previous state
     Just _ -> do
         Node{..} <- lift getCurrentCommand
         case action of
diff --git a/structured-cli.cabal b/structured-cli.cabal
--- a/structured-cli.cabal
+++ b/structured-cli.cabal
@@ -1,5 +1,5 @@
 name:                structured-cli
-version:             0.9.2.0
+version:             0.9.3.0
 synopsis:            Application library for building interactive console CLIs
 description:         This module provides the tools to build a complete "structured" CLI application, similar to those found in systems like Cisco IOS or console configuration utilities etc. It aims to be easy for implementors to use.
 homepage:            https://github.com/erickg/structured-cli#readme