diff options
| author |  Joey Hess <joey@kitenet.net> | 2013-11-09 13:50:44 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2013-11-09 13:50:44 -0400 |
| commit | 77acd08ea1422daf75d94dd6c4bb29e6c799c427 (patch) | |
| tree | 5f1addc67e2480c3c0a33ae24a47807c483957f6 /Logs/UUID.hs | |
| parent | 4807612214df574e1dd11dff68c7c55dbff73108 (diff) | |
fix crash on empty description
Caused by bug fixed in 4807612214df574e1dd11dff68c7c55dbff73108
Diffstat (limited to 'Logs/UUID.hs')
| -rw-r--r-- | Logs/UUID.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Logs/UUID.hs b/Logs/UUID.hs index ef1074e78..154f86d51 100644 --- a/Logs/UUID.hs +++ b/Logs/UUID.hs @@ -56,7 +56,7 @@ fixBadUUID = M.fromList . map fixup . M.toList | otherwise = (k, v) where kuuid = fromUUID k - isbad = not (isuuid kuuid) && isuuid lastword + isbad = not (isuuid kuuid) && not (null ws) && isuuid lastword ws = words $ value v lastword = Prelude.last ws fixeduuid = toUUID lastword |