remove some backtraces on user errors

This commit is contained in:
Joey Hess 2017-09-04 13:55:49 -04:00
parent 7eb9889bfd
commit 42eaa340fe
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38

View file

@ -71,9 +71,9 @@ seek :: ExportOptions -> CommandSeek
seek o = do
r <- getParsed (exportRemote o)
unlessM (exportSupported (exportActions r)) $
error "That remote does not support exports."
giveup "That remote does not support exports."
new <- fromMaybe (error "unknown tree") <$>
new <- fromMaybe (giveup "unknown tree") <$>
-- Dereference the tree pointed to by the branch, commit,
-- or tag.
inRepo (Git.Ref.tree (exportTreeish o))