X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=blobdiff_plain;f=extra%2Fproject-euler%2F022%2F022.factor;h=b548591b5e3ba6eff89a05315a6afd883169bfc0;hp=1b675d41c47333ff9171c85a652ae12ca873b70a;hb=3f3d57032bf29190e9bee12d168a4bce6d74653c;hpb=cd1bb8f4c8afba318249c7b756a45aa1c46ea51e

diff --git a/extra/project-euler/022/022.factor b/extra/project-euler/022/022.factor
index 1b675d41c4..b548591b5e 100644
--- a/extra/project-euler/022/022.factor
+++ b/extra/project-euler/022/022.factor
@@ -32,7 +32,7 @@ IN: project-euler.022
     ascii file-contents [ quotable? ] filter "," split ;
 
 : name-scores ( seq -- seq )
-    [ 1+ swap alpha-value * ] map-index ;
+    [ 1 + swap alpha-value * ] map-index ;
 
 PRIVATE>