Ticket 5041: have Auth::login() send Auth.afterIdentify event

Per ticket #5041. I augmented `testLogin()` to avoid duplicating the auth code, since there were already 3 assertions done there.
object $object