Rename and add sorting words

[factor.git] / extra / images / atlas / atlas.factor

diff --git a/extra/images/atlas/atlas.factor b/extra/images/atlas/atlas.factor
index 236fce210c603ebeacc0cfa15002ee0645d6828d..f22541d8a07e94b0194d16b4c84942f03e9c16ac 100644 (file)
--- a/extra/images/atlas/atlas.factor
+++ b/extra/images/atlas/atlas.factor
@@ -44,7 +44,7 @@ ERROR: atlas-image-formats-dont-match images ;
     stripe-height ;
 
 :: (pack-images) ( images atlas-width sort-quot -- placements )
-    images sort-quot inv-sort-with [ f image-placement boa ] map :> image-placements
+    images sort-quot inv-sort-by [ f image-placement boa ] map :> image-placements
     0 :> @y!
     [ image-placements atlas-width @y (pack-stripe) ] [ @y + @y! ] while*
     image-placements ; inline