mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

don't crash on malformed lines in uuid.log

Browse source
This commit is contained in:
Joey Hess 2011-09-30 14:59:35 -04:00
parent d48ae1b8fd
commit f88738223e
1 changed files with 5 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

6
UUID.hs
View file

@ -100,4 +100,8 @@ uuidMap = do
s <- Branch.get uuidLog
return $ M.fromList $ map pair $ lines s
where
pair l = (head $ words l, unwords $ drop 1 $ words l)
pair l
| null ws = ("", "")
| otherwise = (head ws, unwords $ drop 1 ws)
where
ws = words l