Update server.hs

noted: third status needed (to incompetent to add this myself)