Fix some issues with monad operator |