fix using, make sure article-only title sort works

Doug Coleman 2009-05-26 12:01:28 -05:00
parent ded3cb887c
commit c7b2eadb28
2 changed files with 8 additions and 1 deletions

View File

@ -1,6 +1,7 @@
! Copyright (C) 2008 Doug Coleman, Slava Pestov. ! Copyright (C) 2008 Doug Coleman, Slava Pestov.
! See http://factorcode.org/license.txt for BSD license. ! See http://factorcode.org/license.txt for BSD license.
USING: math.parser peg.ebnf sorting.functor ; USING: accessors kernel math math.order math.parser peg.ebnf
sequences sorting.functor ;
IN: sorting.human IN: sorting.human
: find-numbers ( string -- seq ) : find-numbers ( string -- seq )

View File

@ -8,6 +8,9 @@ IN: sorting.title.tests
"The Beatles" "The Beatles"
"A river runs through it" "A river runs through it"
"Another" "Another"
"The"
"A"
"Los"
"la vida loca" "la vida loca"
"Basketball" "Basketball"
"racquetball" "racquetball"
@ -21,6 +24,7 @@ IN: sorting.title.tests
} ; } ;
[ [
{ {
"A"
"Another" "Another"
"Basketball" "Basketball"
"The Beatles" "The Beatles"
@ -29,10 +33,12 @@ IN: sorting.title.tests
"for the horde" "for the horde"
"Los Fujis" "Los Fujis"
"los Fujis" "los Fujis"
"Los"
"of mice and men" "of mice and men"
"on belay" "on belay"
"racquetball" "racquetball"
"A river runs through it" "A river runs through it"
"The"
"la vida loca" "la vida loca"
} }
] [ ] [