editors: these should understand private.

db4
John Benediktsson 2012-08-13 10:32:27 -07:00
parent e374f2fa19
commit d6c60258cf
1 changed files with 5 additions and 3 deletions

View File

@ -56,7 +56,7 @@ M: cannot-find-source error.
DEFER: edit
: edit-vocab ( vocab -- )
>vocab-link edit ;
vocab-name* >vocab-link edit ;
GENERIC: edit ( object -- )
@ -90,7 +90,8 @@ M: string edit edit-vocab ;
GENERIC: edit-docs ( object -- )
M: object edit-docs vocab-docs-path 1 edit-location ;
M: object edit-docs
vocab-name* vocab-docs-path 1 edit-location ;
M: word edit-docs
dup "help-loc" word-prop
@ -100,7 +101,8 @@ M: word edit-docs
GENERIC: edit-tests ( object -- )
M: object edit-tests vocab-tests-path 1 edit-location ;
M: object edit-tests
vocab-name* vocab-tests-path 1 edit-location ;
M: word edit-tests vocabulary>> edit-tests ;