diff options
Diffstat (limited to 'Logs')
| -rw-r--r-- | Logs/MetaData.hs | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/Logs/MetaData.hs b/Logs/MetaData.hs index 807b50afa..77c1b56a5 100644 --- a/Logs/MetaData.hs +++ b/Logs/MetaData.hs @@ -24,6 +24,7 @@ -} {-# OPTIONS_GHC -fno-warn-orphans #-} +{-# LANGUAGE CPP #-} module Logs.MetaData ( getCurrentMetaData, @@ -120,7 +121,11 @@ simplifyLog s = case sl of else s _ -> s where +#if MIN_VERSION_containers(0,5,0) sl = S.toDescList s +#else + sl = reverse (S.toAscList s) +#endif go c _ [] = c go c newer (l:ls) |