generic: rename method-body predicate class to method

[factor.git] / extra / mason / test / test.factor

diff --git a/extra/mason/test/test.factor b/extra/mason/test/test.factor
index 034d86b9c68c905ea28054fab2e460c2fe520719..bd703d3cb9247fc0af936bcd82c81e9bb6e9953a 100644 (file)
--- a/extra/mason/test/test.factor
+++ b/extra/mason/test/test.factor
@@ -18,7 +18,7 @@ GENERIC: word-vocabulary ( word -- vocabulary )
 
 M: word word-vocabulary vocabulary>> ;
 
-M: method-body word-vocabulary "method-generic" word-prop word-vocabulary ;
+M: method word-vocabulary "method-generic" word-prop word-vocabulary ;
 
 :: do-step ( errors summary-file details-file -- )
     errors