From 425fd8e551a4e1c74755d68b202be332f7794ef7 Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@factorcode.org>
Date: Sun, 24 Feb 2008 17:40:28 -0600
Subject: [PATCH] edit-vocab word

---
 extra/editors/editors.factor | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/extra/editors/editors.factor b/extra/editors/editors.factor
index f0c5289dd9..3b65466225 100755
--- a/extra/editors/editors.factor
+++ b/extra/editors/editors.factor
@@ -35,6 +35,9 @@ SYMBOL: edit-hook
 : edit ( defspec -- )
     where [ first2 edit-location ] when* ;
 
+: edit-vocab ( name -- )
+    vocab-source-path 1 edit-location ;
+
 : :edit ( -- )
     error get delegates [ parse-error? ] find-last nip [
         dup parse-error-file source-file-path ?resource-path