diff options
| -rw-r--r-- | src/Text/Pandoc/Compat/Monoid.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Compat/Monoid.hs b/src/Text/Pandoc/Compat/Monoid.hs index 80ffcbbd6..cb7ea2527 100644 --- a/src/Text/Pandoc/Compat/Monoid.hs +++ b/src/Text/Pandoc/Compat/Monoid.hs @@ -11,6 +11,10 @@ import Data.Monoid (mappend, Monoid(..)) #if MIN_VERSION_base(4,5,0) #else +infixr 6 <> + +-- | An infix synonym for 'mappend'. (<>) :: Monoid m => m -> m -> m (<>) = mappend +{-# INLINE (<>) #-} #endif |