From 052b9089d5c18e54bea8333dfaa041c389da3289 Mon Sep 17 00:00:00 2001 From: Mart Lubbers Date: Sun, 15 Jan 2017 14:59:05 +0100 Subject: [PATCH] update --- miTask.icl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/miTask.icl b/miTask.icl index d483490..89a3cd6 100644 --- a/miTask.icl +++ b/miTask.icl @@ -49,8 +49,8 @@ deviceSelectorSerial = accWorld getDevices mTaskTask :: (Shared ([MTaskMSGRecv],Bool,[MTaskMSGSend],Bool)) -> Task () mTaskTask ch = - deviceSelectorNetwork >>= \(p,h)->syncNetworkChannel h p "\n" decode encode` ch ||- -// deviceSelectorSerial >>= \(s,set)->syncSerialChannel s set decode` encode` ch ||- +// deviceSelectorNetwork >>= \(p,h)->syncNetworkChannel h p "\n" decode encode` ch ||- + deviceSelectorSerial >>= \(s,set)->syncSerialChannel s set decode` encode` ch ||- sendMsg msgs ch ||- ( ( -- 2.20.1