update

diff --git a/miTask.icl b/miTask.icl
index d483490..89a3cd6 100644 (file)
--- 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 ||-
        (
                (