#45 refactoring tlssv.hs: use toTChans from Data.Pipe.TChan