diff options
| author | Joey Hess <joeyh@joeyh.name> | 2018-06-14 12:32:36 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2018-06-14 12:32:36 -0400 |
| commit | 391a83c98551c65c44582f39f9bb0bdfd7d8ac06 (patch) | |
| tree | 072ef6a0022eb7ac83e88c0e0f4c27861cacb633 | |
| parent | 8b734da8769f618153c8332b41097d26bd5135bd (diff) | |
remove unused value
| -rw-r--r-- | Command/Export.hs | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/Command/Export.hs b/Command/Export.hs index 4f5fa260a4..5084e4f994 100644 --- a/Command/Export.hs +++ b/Command/Export.hs @@ -201,7 +201,6 @@ fillExport r ea db new = do startExport :: Remote -> ExportActions Annex -> ExportHandle -> MVar Bool -> Git.LsTree.TreeItem -> CommandStart startExport r ea db cvar ti = do ek <- exportKey (Git.LsTree.sha ti) - np <- notpresent ek stopUnless (notpresent ek) $ do showStart ("export " ++ name r) f liftIO $ modifyMVar_ cvar (pure . const True) |