From 3227427ef1c9887162c259604d18c4e4d34b7355 Mon Sep 17 00:00:00 2001
From: Denis Tereshkin <denis@kasan.ws>
Date: Sun, 13 May 2018 16:42:12 +0700
Subject: [PATCH] Updated to lts-11.9

---
 src/ATrade/Broker/Server.hs      | 3 ++-
 src/ATrade/QuoteSource/Server.hs | 2 +-
 stack.yaml                       | 2 +-
 3 files changed, 4 insertions(+), 3 deletions(-)

diff --git a/src/ATrade/Broker/Server.hs b/src/ATrade/Broker/Server.hs
index 6d2cac5..6209292 100644
--- a/src/ATrade/Broker/Server.hs
+++ b/src/ATrade/Broker/Server.hs
@@ -16,6 +16,7 @@ import qualified Data.Map as M
 import qualified Data.ByteString as B hiding (putStrLn)
 import qualified Data.ByteString.Lazy as BL hiding (putStrLn)
 import qualified Data.Text as T
+import qualified Data.Text.Encoding as E
 import qualified Data.List as L
 import Data.Aeson
 import Data.Maybe
@@ -63,7 +64,7 @@ startBrokerServer brokers c ep tradeSinks params = do
   sock <- socket c Router
   setLinger (restrict 0) sock
   case sspDomain params of
-    Just domain -> setZapDomain domain sock
+    Just domain -> setZapDomain (restrict $ E.encodeUtf8 domain) sock
     Nothing -> return ()
   case sspCertificate params of
     Just cert -> do
diff --git a/src/ATrade/QuoteSource/Server.hs b/src/ATrade/QuoteSource/Server.hs
index 7b1340d..4a3e6ff 100644
--- a/src/ATrade/QuoteSource/Server.hs
+++ b/src/ATrade/QuoteSource/Server.hs
@@ -85,7 +85,7 @@ startQuoteSourceServer chan c ep socketDomainIdMb = do
   sock <- socket c Pub
   setLinger (restrict 0) sock
   case socketDomainIdMb of
-    Just socketDomainId -> setZapDomain socketDomainId sock
+    Just socketDomainId -> setZapDomain (restrict $ E.encodeUtf8 socketDomainId) sock
     _ -> return ()
   bind sock $ T.unpack ep
   tid <- myThreadId
diff --git a/stack.yaml b/stack.yaml
index e998669..f88d557 100644
--- a/stack.yaml
+++ b/stack.yaml
@@ -15,7 +15,7 @@
 # resolver:
 #  name: custom-snapshot
 #  location: "./custom-snapshot.yaml"
-resolver: lts-8.18
+resolver: lts-11.9
 
 # User packages to be built.
 # Various formats can be used as shown in the example below.