diff options
Diffstat (limited to 'Command')
| -rw-r--r-- | Command/Unannex.hs | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/Command/Unannex.hs b/Command/Unannex.hs index 288f9da44..2c60a23bb 100644 --- a/Command/Unannex.hs +++ b/Command/Unannex.hs @@ -29,8 +29,12 @@ seek = [withFilesInGit start] {- The unannex subcommand undoes an add. -} start :: CommandStartString start file = isAnnexed file $ \(key, backend) -> do - showStart "unannex" file - return $ Just $ perform file key backend + ishere <- inAnnex key + if ishere + then do + showStart "unannex" file + return $ Just $ perform file key backend + else return Nothing perform :: FilePath -> Key -> Backend -> CommandPerform perform file key backend = do |