summaryrefslogtreecommitdiff
path: root/Command.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Command.hs')
-rw-r--r--Command.hs7
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