Cleanup interaction between haskell and rainbow. Add surround.