summaryrefslogtreecommitdiff
path: root/GitRepo.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2010-10-25 18:32:29 -0400
committerGravatar Joey Hess <joey@kitenet.net>2010-10-25 18:32:29 -0400
commitd0a9cdadafca1ee0da100a993b23e8a063f86bf8 (patch)
tree46d6955950bafc004fdc47c3db499e5e2a4849fb /GitRepo.hs
parent8beed17168aab12bb4045b6d8635b37503d5099b (diff)
add dropkey subcommand and --quiet
Needed for better git annex move --from
Diffstat (limited to 'GitRepo.hs')
-rw-r--r--GitRepo.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/GitRepo.hs b/GitRepo.hs
index 553e91fec..ee1bdba34 100644
--- a/GitRepo.hs
+++ b/GitRepo.hs
@@ -156,7 +156,7 @@ workTree repo =
- name to use to refer to the file relative to a git repository's top.
- This is the same form displayed and used by git. -}
relative :: Repo -> String -> String
-relative repo file = drop (length absrepo) absfile
+relative repo file = assertLocal repo $ drop (length absrepo) absfile
where
-- normalize both repo and file, so that repo
-- will be substring of file