diff options
Diffstat (limited to 'RemovePath.hs')
| -rw-r--r-- | RemovePath.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/RemovePath.hs b/RemovePath.hs index 50c4ca2..5fd6d6d 100644 --- a/RemovePath.hs +++ b/RemovePath.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 [path] -> removePath path options _ -> invalidNumberOfArguments |