diff options
author | 2015-10-09 18:03:00 -0400 | |
---|---|---|
committer | 2015-10-09 18:03:00 -0400 | |
commit | 2512faa6301603cfbda9706acb6b3670d3311e7f (patch) | |
tree | 2c07df8981953fb2dcf81abc0694648a34b44c87 /Command/DropUnused.hs | |
parent | b65e678e7b557520be4b63eb0e91d88682e1dd42 (diff) | |
parent | bef58852d9b6150b0e2a47c412bd12dcc34a7794 (diff) |
Merge branch 'dropproof'
Diffstat (limited to 'Command/DropUnused.hs')
-rw-r--r-- | Command/DropUnused.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/DropUnused.hs b/Command/DropUnused.hs index 98fcef6ea..9c2ae972a 100644 --- a/Command/DropUnused.hs +++ b/Command/DropUnused.hs @@ -44,7 +44,7 @@ perform from numcopies key = case from of Just r -> do showAction $ "from " ++ Remote.name r Command.Drop.performRemote key Nothing numcopies r - Nothing -> Command.Drop.performLocal key Nothing numcopies Nothing + Nothing -> Command.Drop.performLocal key Nothing numcopies [] performOther :: (Key -> Git.Repo -> FilePath) -> Key -> CommandPerform performOther filespec key = do |