diff options
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 |