 
 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 ;
 

DEFER: edit

: edit-vocab ( vocab -- )
    >vocab-link edit ;

GENERIC: edit ( object -- )



GENERIC: edit-docs ( object -- )

M: object edit-docs
    vocab-name* vocab-docs-path 1 edit-location ;

M: word edit-docs
    dup "help-loc" word-prop
