From d842a7563997127267a504a2d0fec1581f25fa93 Mon Sep 17 00:00:00 2001
From: Eduardo Cavazos <dharmatech@finkelstein.stackeffects.info>
Date: Tue, 23 Dec 2008 22:46:03 -0600
Subject: [PATCH] easy-help: Add 'Word:'

---
 extra/easy-help/easy-help.factor | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/extra/easy-help/easy-help.factor b/extra/easy-help/easy-help.factor
index 1849c7330b..c59fbab6ee 100644
--- a/extra/easy-help/easy-help.factor
+++ b/extra/easy-help/easy-help.factor
@@ -62,5 +62,13 @@ IN: easy-help
 
   ; parsing
 
+! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
+: Word:
 
+  scan current-vocab create dup old-definitions get
+  [ delete-at ] with each dup set-word
+
+  bootstrap-word dup set-word
+  dup >link save-location
+  \ ; parse-until >array swap set-word-help ; parsing