Rename and add sorting words

[factor.git] / extra / lint / vocabs / vocabs.factor

diff --git a/extra/lint/vocabs/vocabs.factor b/extra/lint/vocabs/vocabs.factor
index a5b319b5c1c74d61436b50a7683eb1944322c3a0..962ced0010b1d2ce18950859602fffb42a4dd62b 100644 (file)
--- a/extra/lint/vocabs/vocabs.factor
+++ b/extra/lint/vocabs/vocabs.factor
@@ -232,7 +232,7 @@ PRIVATE>
 
 : find-unused-in-string ( string -- seq )
     strip-code [ get-imported-words ] [ find-used-words ] bi
-        reject-unused-vocabs natural-sort ;
+        reject-unused-vocabs sort ;
 
 : find-unused-in-file ( path -- seq )
     utf8 file-contents find-unused-in-string ;
@@ -243,4 +243,4 @@ PRIVATE>
 : find-unused. ( name -- )
     dup find-unused dup empty?
         [ print-no-unused-vocabs ]
-           [ print-unused-vocabs ] if ;
\ No newline at end of file
+           [ print-unused-vocabs ] if ;