From 09cce11af705b250f3d5768b259928b79da125e2 Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Tue, 2 Sep 2008 13:02:51 -0500
Subject: [PATCH] new accessors

---
 extra/gesture-logger/gesture-logger.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/extra/gesture-logger/gesture-logger.factor b/extra/gesture-logger/gesture-logger.factor
index b990de03fc..61dc8cf77e 100644
--- a/extra/gesture-logger/gesture-logger.factor
+++ b/extra/gesture-logger/gesture-logger.factor
@@ -19,7 +19,7 @@ M: gesture-logger handle-gesture
     t ;
 
 M: gesture-logger user-input*
-    gesture-logger-stream [
+    stream>> [
         "User input: " write print
     ] with-output-stream* t ;