diff --git a/Application/CLI.hs b/Application/CLI.hs
--- a/Application/CLI.hs
+++ b/Application/CLI.hs
@@ -15,9 +15,6 @@
     , CLI(..)
     , OptHelp(..)
       -- ** Default CLIs
-    , Usage
-    , printUsage
-
     , Help(..)
     , printHelp
 
@@ -26,6 +23,7 @@
     , getHeader
     , getDefault
     , initialize
+    , initializeWithDefault
     , with
     ) where
 
@@ -59,6 +57,7 @@
     options _  = []
     action  _ ctx _ = do
         progName <- getProgName
+        putStrLn $ progName ++ ": " ++ getHeader ctx
         putStrLn $ printHelp "    " progName ctx
 
 -------------------------------------------------------------------------------
@@ -73,17 +72,21 @@
 with c l = insertCommand (cliToCommand c) l
 
 -- | Initialize a collection of commands
-initialize :: CLI cliDefault
-           => Maybe cliDefault -- ^ The command to execute if no option is given
-           -> String           -- ^ CLI Description
-           -> CLIContext
-initialize defaultCli description =
-    case defaultCli of
-        Nothing  -> cmdMap
-        Just cmd -> insertDefault (cliToCommand cmd) cmdMap
+initializeWithDefault :: CLI cliDefault
+                      => cliDefault -- ^ The command to execute if no option is given
+                      -> String     -- ^ CLI Description
+                      -> CLIContext
+initializeWithDefault defaultCli description =
+    insertDefault (cliToCommand defaultCli) cmdMap
   where
     cmdMap :: CLIContext
     cmdMap = createContext (cliToCommand Usage) description
+
+-- | Initialize a collection of command
+initialize :: String     -- ^ CLI Description
+           -> CLIContext
+initialize description =
+    createContext (cliToCommand Usage) description
 
 -------------------------------------------------------------------------------
 --                             Default Main                                  --
diff --git a/cli.cabal b/cli.cabal
--- a/cli.cabal
+++ b/cli.cabal
@@ -1,5 +1,5 @@
 Name:                cli
-Version:             0.0.1
+Version:             0.0.2
 Synopsis:            Simple Command Line Interface Library
 Description:
     This package provides a simple Command Line Library
diff --git a/example/Main.hs b/example/Main.hs
--- a/example/Main.hs
+++ b/example/Main.hs
@@ -17,4 +17,4 @@
 main =
     defaultMain
         $ with Help
-        $ initialize (Nothing :: Maybe Help) "Example of use of CLI Library"
+        $ initialize "Example of use of CLI Library"