improve error message

This commit is contained in:
Joey Hess 2012-02-08 15:49:42 -04:00
parent ef013506cb
commit ac97454659

View file

@ -44,7 +44,7 @@ perform url file = ifAnnexed file addurl geturl
where
geturl = do
whenM (liftIO $ doesFileExist file) $
error $ "already have this url in " ++ file
error $ "not overwriting existing " ++ file
fast <- Annex.getState Annex.fast
if fast then nodownload url file else download url file
addurl (key, _backend) = do