From 16bc4a4c50e8496d33379c5ae92eda4ad740a36d Mon Sep 17 00:00:00 2001
From: Mikhail Glushenkov <mikhail.glushenkov@gmail.com>
Date: Thu, 26 Mar 2015 16:23:16 +0100
Subject: [PATCH] Typo.
---
Cabal/Distribution/Simple/Build/PathsModule.hs | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/Cabal/Distribution/Simple/Build/PathsModule.hs b/Cabal/Distribution/Simple/Build/PathsModule.hs
index 05e4e25673..950cc9ac4e 100644
--- a/Cabal/Distribution/Simple/Build/PathsModule.hs
+++ b/Cabal/Distribution/Simple/Build/PathsModule.hs
@@ -50,9 +50,9 @@ import Data.Maybe
generate :: PackageDescription -> LocalBuildInfo -> String
generate pkg_descr lbi =
- let pragmas = ffi_pragmas + warning_pragmas
+ let pragmas = ffi_pragmas ++ warning_pragmas
- ffi_pragmas =
+ ffi_pragmas
| absolute = ""
| supports_language_pragma =
"{-# LANGUAGE ForeignFunctionInterface #-}\n"
--
GitLab