From ac44a27691c6bc684b1b5b373636a34d7f0f4e2f Mon Sep 17 00:00:00 2001
From: Tony Garnock-Jones <tonygarnockjones@gmail.com>
Date: Sun, 4 May 2014 16:38:03 -0400
Subject: [PATCH] Log when waypoint is reached.

---
 echo-client.rkt | 1 +
 1 file changed, 1 insertion(+)

diff --git a/echo-client.rkt b/echo-client.rkt
index 9c46654..036000d 100644
--- a/echo-client.rkt
+++ b/echo-client.rkt
@@ -107,5 +107,6 @@
     ['() (void)]
     [(cons next-waypoint rest)
      (grow-to-waypoint next-waypoint)
+     (log-info "At waypoint ~a" next-waypoint)
      (ping-randomly)
      (loop rest)]))