Rename and add sorting words

[factor.git] / basis / models / sort / sort.factor

diff --git a/basis/models/sort/sort.factor b/basis/models/sort/sort.factor
index e9daeb1c313ccb26469334e53ca36e215eb6b21b..576fc5024c9712de55755f04584b222948df084c 100644 (file)
--- a/basis/models/sort/sort.factor
+++ b/basis/models/sort/sort.factor
@@ -4,4 +4,4 @@ USING: models.arrow.smart sorting ;
 IN: models.sort
 
 : <sort> ( values sort -- model )
-    [ '[ _ call( obj1 obj2 -- <=> ) ] sort ] <smart-arrow> ; inline
+    [ '[ _ call( obj1 obj2 -- <=> ) ] sort-with ] <smart-arrow> ; inline