Se mejora el logue de errores en el proceso fork()eado.

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

diff --git a/src/sc_deliver b/src/sc_deliver
index 3b7abc4b68487aeec0c97cdb659fe2f30ac801ce..3979a86b32481d242a156734d30491087eb02584 100755 (executable)
--- a/src/sc_deliver
+++ b/src/sc_deliver
@@ -2,6 +2,8 @@
 # -*- encoding: iso-8859-1 -*-
 # vim: set et sw=4 sts=4 :
 
+# Módulos estándar
+import time
 # Módulos locales
 import sercom
 import sercom.sqlo
@@ -26,7 +28,7 @@ a su intento %d, recibido el %s.
     mail['To'] = inscripto.mail
     mail['Reply-To'] = conf.get('mail', 'admin')
     mail['Return-Path'] = conf.get('mail', 'admin')
-    mail['X-Mailer'] = 'sercom 0.3'
+    mail['X-Mailer'] = 'sercom ' + sercom.VERSION
     mail['X-Priority'] = '5'
     smtp = smtplib.SMTP(conf.get('mail', 'smtp'))
     smtp.sendmail(mail['From'], mail['To'], mail.as_string())
@@ -39,8 +41,13 @@ log.info('Iniciado')
 # Utilizo el directorio de datos como base para todos los SQLObjects
 sercom.sqlo.dir_base = conf.get('general', 'data_dir')
 
+# Atajo
+intervalo = float(conf.get('general', 'intervalo'))
+
 # Busco entregas pendientes
 for entrega in Entrega.getPendientes(conn):
+    while Intento.faltaCompilar(entrega, conn):
+        time.sleep(intervalo)
     log.info('Procesando entrega %d.%d.%d', entrega.curso.curso,
         entrega.nroEjercicio, entrega.entrega)
     for inscripto in Inscripto.selectBy(cursoID=entrega.cursoID, activo=True,