Error enviando mail

[living]

Tienes puesto esto:
if ($mail){
fputs($ficheromailscorrectos,$emailaenviar."\r\n") ;
}

Deberías tener esto

if ($mailenviar){
fputs($ficheromailscorrectos,$emailaenviar."\r\n") ;
}