@@ -91,7 +91,7 @@ newFileOwner fp s = do
92 Left c -> case c of
92 Left c -> case c of
93 CloseMsg -> do
93 CloseMsg -> do
94− lasMsgs <- atomically $ flushTBQueue dqueue
94+ lastMsgs <- atomically $ flushTBQueue dqueue
95 -- flush never blocks
95 -- flush never blocks
96 case lastMsgs of
96 case lastMsgs of
97 [] -> return ()
97 [] -> return ()