add export list to Commands module

darcs-hash:20070131172040-f399b-63ed7bddd2de55fb342c259595fc18ecb45f33fc
Moiman · Jan 31, 2007 · 2d476ab · 2d476ab
1 parent 8da86be
commit 2d476ab
Showing 1 changed file with 17 additions and 3 deletions.
diff --git a/src/System/Console/Shell/Commands.hs b/src/System/Console/Shell/Commands.hs
@@ -4,20 +4,34 @@
  -
  -}
 
-module System.Console.Shell.Commands where
+module System.Console.Shell.Commands
+( File (..)
+, Username (..)
+, Completable (..)
+, Completion (..)
+, showShellHelp
+, showCmdHelp
+, helpCommand
+, exitCommand
+, toggle
+, cmd
+, CommandFunction
+, maybePrefix
+, getShellCommands
+, commandsRegex
+) where
 
 import System.Console.Shell.Types
 import System.Console.Shell.PPrint
 import System.Console.Shell.Regex
 import System.Console.Shell.ShellMonad
 
-
 maybePrefix :: ShellDescription st -> String
 maybePrefix desc = case commandStyle desc of CharPrefixCommands x -> [x]; _ -> ""
 
+getShellCommands :: ShellDescription st -> [(String,CommandParser st,Doc,Doc)]
 getShellCommands desc = map ($ desc) (shellCommands desc)
 
-
 -- | Represents a command argument which is a filename
 newtype File = File String