summaryrefslogtreecommitdiff
path: root/Command
diff options
context:
space:
mode:
Diffstat (limited to 'Command')
-rw-r--r--Command/Export.hs4
1 files changed, 3 insertions, 1 deletions
diff --git a/Command/Export.hs b/Command/Export.hs
index 1310244ac..0df13e489 100644
--- a/Command/Export.hs
+++ b/Command/Export.hs
@@ -70,7 +70,9 @@ seek :: ExportOptions -> CommandSeek
seek o = do
r <- getParsed (exportRemote o)
new <- fromMaybe (error "unknown tree") <$>
- inRepo (Git.Ref.sha (exportTreeish o))
+ -- Dereference the tree pointed to by the branch, commit,
+ -- or tag.
+ inRepo (Git.Ref.tree (exportTreeish o))
old <- getExport (uuid r)
when (length old > 1) $