import (<>) with GHC >= 7.0.4

This commit is contained in:
Peter Berry 2012-06-18 23:45:52 +02:00
parent 8b5fbb47af
commit 6bb584a8ec

View File

@ -15,7 +15,11 @@ module Import
import Prelude hiding (writeFile, readFile, head, tail, init, last)
import Yesod hiding (Route(..))
import Foundation
#if __GLASGOW_HASKELL__ < 704
import Data.Monoid (Monoid (mappend, mempty, mconcat))
#else
import Data.Monoid (Monoid (mappend, mempty, mconcat), (<>))
#endif
import Control.Applicative ((<$>), (<*>), pure)
import Data.Text (Text)
import Settings.StaticFiles