Added $got_001 to Parser::IRC for checking if we've been sent 001.

src/API/IRC.pm

@@ -69,5 +69,7 @@ sub quit {
 	else {
 		Auto::socksnd($svr, "QUIT :Leaving");
 	}
+	
+	delete $Parser::IRC::got_001{$svr} if (defined $Parser::IRC::got_001{$svr});
 }