diff options
Diffstat (limited to 'Command/Undo.hs')
| -rw-r--r-- | Command/Undo.hs | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/Command/Undo.hs b/Command/Undo.hs index 8e6b1c44f..c647dfba4 100644 --- a/Command/Undo.hs +++ b/Command/Undo.hs @@ -21,12 +21,13 @@ import qualified Git.Command as Git import qualified Git.Branch import qualified Command.Sync -cmd :: [Command] -cmd = [notBareRepo $ - command "undo" paramPaths seek - SectionCommon "undo last change to a file or directory"] +cmd :: Command +cmd = notBareRepo $ + command "undo" SectionCommon + "undo last change to a file or directory" + paramPaths (withParams seek) -seek :: CommandSeek +seek :: CmdParams -> CommandSeek seek ps = do -- Safety first; avoid any undo that would touch files that are not -- in the index. |