From 22bb18042febac782047c327f11d4b1f9bebc46a Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Sat, 22 Jan 2011 19:17:40 -0800
Subject: [PATCH] todos: "1array append" is suffix.  Thanks, jonenst!

---
 todos/todos.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/todos/todos.factor b/todos/todos.factor
index 6351979e..f476f8ac 100644
--- a/todos/todos.factor
+++ b/todos/todos.factor
@@ -19,7 +19,7 @@ IN: todos
     CHAR: \n todo member? [ "invalid" throw ] when
     vocab vocab-todo :> todos
     todo todos member? [
-        todos todo 1array append vocab set-vocab-todo
+        todos todo suffix vocab set-vocab-todo
     ] unless ;
 
 : todos. ( vocab -- )