@@ -30,7 +30,7 @@ data Directive
30 deriving Eq
30 deriving Eq
33−-- Maps given directive relating command strings.
33+-- Maps given directive to relating command strings.
35commands :: Directive -> [String]
35commands :: Directive -> [String]
36commands Help = ["?", "help"]
36commands Help = ["?", "help"]