steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

fix formatting

db4
Doug Coleman 2009-05-26 11:55:48 -05:00
parent daf1594390
commit 0d45dafdd0
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
basis/sorting/title/title.factor
View File

@ -4,4 +4,7 @@ USING: sorting.functor regexp kernel accessors sequences
unicode.case ; unicode.case ;
IN: sorting.title IN: sorting.title
<< "title" [ >lower dup R/ ^(the|a|an|el|la|los|las|il) / first-match [ to>> tail-slice ] when* ] define-sorting >> << "title" [
>lower dup R/ ^(the|a|an|el|la|los|las|il) / first-match
[ to>> tail-slice ] when*
] define-sorting >>