diff options
Diffstat (limited to '')
| -rw-r--r-- | ListPath.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ListPath.hs b/ListPath.hs index 6c1fcfa..ca72e87 100644 --- a/ListPath.hs +++ b/ListPath.hs @@ -19,7 +19,7 @@ main = do rawArgs <- getArgs case getOpt Permute optionDescription rawArgs of (actions, args, []) -> do - options <- foldl (>>=) (return defaultOptions) actions + options <- foldl (>>=) (return defaultOptions) actions case args of [] -> listPath options _ -> invalidNumberOfArguments |