From 11511840bd66955201fcfa6705d16f20a10c6769 Mon Sep 17 00:00:00 2001
From: Petr Baudis <pasky@ucw.cz>
Date: Fri, 23 Dec 2011 17:57:08 +0100
Subject: [PATCH] Example client: Fix secrete command issue

---
 client/example.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/client/example.pl b/client/example.pl
index b39af85..491799d 100755
--- a/client/example.pl
+++ b/client/example.pl
@@ -137,7 +137,7 @@ sub take_action($$) {
 	}
 	# We unconditionally secrete this pheromone for identification
 	# by others of our kin.
-	print $socket "secrete 65536 1\r\n";
+	print $socket $state->{tick}." secrete 65536 1\r\n";
 	print $socket "\r\n";
 }