Update IRC.hs