diff options
Diffstat (limited to 'Command.hs')
-rw-r--r-- | Command.hs | 7 |
1 files changed, 0 insertions, 7 deletions
diff --git a/Command.hs b/Command.hs index 6c127c15d..478dfdc39 100644 --- a/Command.hs +++ b/Command.hs @@ -18,7 +18,6 @@ module Command ( whenAnnexed, ifAnnexed, notBareRepo, - notDirect, isBareRepo, numCopies, numCopiesCheck, @@ -104,12 +103,6 @@ notBareRepo a = do error "You cannot run this subcommand in a bare repository." a -notDirect :: Annex a -> Annex a -notDirect a = ifM isDirect - ( error "You cannot run this subcommand in a direct mode repository." - , a - ) - isBareRepo :: Annex Bool isBareRepo = fromRepo Git.repoIsLocalBare |