# HG changeset patch
# User František Kučera <franta-hg@frantovo.cz>
# Date 1322669606 -3600
# Node ID c78f71bda3406e633f6accd30c62ecf95da7d582
# Parent  0eca162a758c0182f01b6e1217fe4634acea63cf
Doručenky: drobnosti

diff -r 0eca162a758c -r c78f71bda340 doručenky/dorucenky.pl
--- a/doručenky/dorucenky.pl	Wed Nov 30 15:56:29 2011 +0100
+++ b/doručenky/dorucenky.pl	Wed Nov 30 17:13:26 2011 +0100
@@ -11,7 +11,7 @@
 
 # viz http://search.cpan.org/~dskoll/MIME-tools-5.502/lib/MIME/Entity.pm
 # viz http://search.cpan.org/~dskoll/MIME-tools-5.502/lib/MIME/Head.pm
-# viz http://search.cpan.org/~gbarr/libnet-1.21/Net/SMTP.pm
+# viz http://perldoc.perl.org/Net/SMTP.html
 
 
 # Nastavení --------------------------------------------------------------------
@@ -62,17 +62,14 @@
 			} else {
 				$stav = "chyba - Message-ID nenalezeno";
 			}
-			
 		} else {
-			$stav = "hlavicka References uz byla nastavena drive";
+			$stav = "ok - hlavicka References uz byla nastavena drive";
 		}		
 	} else {
 		$stav = "chyba - nevime, kam zpravu poslat zpet";
 	}	
 } else {
-	# Zpráva se zacyklila → pouze přidáme svoji značku
-	# a pošleme správci (nezměníme $komu)
-	$stav = "chyba - cyklus";
+	$stav = "chyba - zprava se zacyklila";
 }