words: use remove-word-prop instead of f set-word-prop.

[factor.git] / core / words / alias / alias.factor

diff --git a/core/words/alias/alias.factor b/core/words/alias/alias.factor
index 754cda996b57c60990f4aa89afc3d4bed0df8895..81923af5ec4439635381f91f5e32c77ddaa513b3 100644 (file)
--- a/core/words/alias/alias.factor
+++ b/core/words/alias/alias.factor
@@ -12,6 +12,6 @@ PREDICATE: alias < word "alias" word-prop ;
     [ parsing-word? [ t "parsing" set-word-prop ] [ drop ] if ] 2tri ;
 
 M: alias reset-word
-    [ call-next-method ] [ f "alias" set-word-prop ] bi ;
+    [ call-next-method ] [ "alias" remove-word-prop ] bi ;
 
 M: alias definer drop \ ALIAS: f ;