Rename and add sorting words

[factor.git] / extra / tools / tree / tree.factor

diff --git a/extra/tools/tree/tree.factor b/extra/tools/tree/tree.factor
index 4487a9ed982bce2c6644f39e77bf0c46f93a42c6..e55d4aef98e05949a399aed32a98099d6a66288c 100644 (file)
--- a/extra/tools/tree/tree.factor
+++ b/extra/tools/tree/tree.factor
@@ -33,7 +33,7 @@ DEFER: write-tree
 
 :: write-tree ( path indents -- )
     path [
-        [ name>> ] sort-with [ ] [
+        [ name>> ] sort-by [ ] [
             unclip-last [
                 f indents push
                 [ indents write-entry ] each