effests.parser: Oops wrong word.

diff --git a/core/effects/parser/parser.factor b/core/effects/parser/parser.factor
index 746e512d555c56428134119145055a5c72a6ed19..689757f4646d92ef42b828afa16fb627dd4c0e08 100644 (file)
--- a/core/effects/parser/parser.factor
+++ b/core/effects/parser/parser.factor
@@ -57,7 +57,7 @@ SYMBOL: in-definition
 ERROR: can't-nest-definitions word ;
 
 : check-in-definition ( -- )
-    in-definition get [ current-word can't-nest-definitions ] when ;
+    in-definition get [ last-word can't-nest-definitions ] when ;
 
 : with-definition ( quot -- )
     [ check-in-definition t in-definition ] dip with-variable ; inline