parseEvent :: Parser EventType
parseEvent = do
  string "event: "
  try ("delete" *> return EDelete)   <|>
    try ("update" *> return EUpdate) <|>
    try ("notification" *> return ENotification)
parseEvent :: Parser EventType
parseEvent = do
  string "event: "
  try ("delete" *> return EDelete)   <|>
    try ("update" *> return EUpdate) <|>
    try ("notification" *> return ENotification)
parseEvent = do
  string "event: "
  try ("delete" *> return EDelete)   <|>
    try ("update" *> return EUpdate) <|>
    try ("notification" *> return ENotification)