fix mismatches with transient 0.5.5 hackage

src/Transient/Move/Internals.hs

@@ -310,7 +310,7 @@ single f= do
 
 
    case  M.lookup id mapth of
-          Just tv -> killBranch'  tv      -- !> "JUSTTTTTTTTT"
+          Just tv -> liftIO $ killBranch'  tv      -- !> "JUSTTTTTTTTT"
           Nothing ->  return ()           -- !> "NOTHING"
 
 
@@ -345,7 +345,7 @@ wormhole node (Cloud comp) = local $ Transient $ do
 
    moldconn <- getData :: StateIO (Maybe Connection)
    mclosure <- getData :: StateIO (Maybe Closure)
-   labelState $ "wormhole" ++ show node
+   -- labelState $ "wormhole" ++ show node
    logdata@(Log rec log fulLog) <- getData `onNothing` return (Log False [][])
 
 
@@ -413,7 +413,7 @@ teleport =  do
   local $ Transient $ do
 
      cont <- get
-     labelState "teleport"
+     -- labelState "teleport"
      -- send log with closure at head
      Log rec log fulLog <- getData `onNothing` return (Log False [][])
      if not rec   -- !> ("teleport rec,loc fulLog=",rec,log,fulLog)

stack.yaml

@@ -3,7 +3,7 @@ packages:
 - '.'
 - location:
     git:  https://github.com/agocorona/transient.git
-    commit: 684baa077b9272fd09bf3ee77d2fb86c35cb84f3
+    commit: 44062d3c8b29c9d357e07f6f023c4345ba0d71b8
   extra-dep: true
 extra-package-dbs: []
 flags: {}

transient-universe.cabal

@@ -61,7 +61,7 @@ library
         text -any,
         time -any,
         transformers -any,
-        transient >= 0.5.4
+        transient >= 0.5.5
     default-language: Haskell2010
     hs-source-dirs: src .
 
@@ -70,7 +70,7 @@ executable monitorService
     if !impl(ghcjs >=0.1)
         build-depends:
             transformers -any,
-            transient >=0.4.4,
+            transient >=0.5.5,
             transient-universe -any
         hs-source-dirs: app/server/Transient/Move/Services
     else