Rename and add sorting words

[factor.git] / extra / project-euler / 022 / 022.factor

diff --git a/extra/project-euler/022/022.factor b/extra/project-euler/022/022.factor
index 1b2d058697c7701ba7eb6df0672a854836daaed6..ff27a5a9ff11a16cea174fa1aa7aa8954f1d93c2 100644 (file)
--- a/extra/project-euler/022/022.factor
+++ b/extra/project-euler/022/022.factor
@@ -37,7 +37,7 @@ IN: project-euler.022
 PRIVATE>
 
 : euler022 ( -- answer )
-    source-022 natural-sort name-scores sum ;
+    source-022 sort name-scores sum ;
 
 ! [ euler022 ] 100 ave-time
 ! 74 ms ave run time - 5.13 SD (100 trials)