Manda mails notificando si compila bien.

[software/sercom-old.git] / src / sc_fetch

diff --git a/src/sc_fetch b/src/sc_fetch
index 3455028ed238077d8aefbf7ab92858e149f9abe4..528b1dbb553ce8919a96dbfd33480e0b12705c00 100755 (executable)
--- a/src/sc_fetch
+++ b/src/sc_fetch
@@ -158,7 +158,7 @@ imap_close($mbox);
 
 function enviar_respuesta($tipo, $to, $mensaje = '', $intento = null) {
     global $mconf;
 
 function enviar_respuesta($tipo, $to, $mensaje = '', $intento = null) {
     global $mconf;

-    $subject = '[' . strtoupper($NAME) . '] Entrega ';
+    $subject = $mconf['prefijo'] . 'Entrega ';

     if ($tipo == R_OK) $estado = 'ACEPTADA';
     else               $estado = 'RECHAZADA';
     $subject .= $estado;
     if ($tipo == R_OK) $estado = 'ACEPTADA';
     else               $estado = 'RECHAZADA';
     $subject .= $estado;


@@ -169,6 +169,7 @@ function enviar_respuesta($tipo, $to, $mensaje = '', $intento = null) {
     $headers = <<<EOT
 From: {$mconf['from']}
 Reply-To: {$mconf['admin']}
     $headers = <<<EOT
 From: {$mconf['from']}
 Reply-To: {$mconf['admin']}

+Return-Path: {$mconf['admin']}

 X-Mailer: $NAME $VERSION
 X-Priority: 5
 EOT;
 X-Mailer: $NAME $VERSION
 X-Priority: 5
 EOT;