Ordered words: Difference between revisions
Content added Content deleted
(→{{header|AppleScript}}: Minor modification to match change to recommended sort.) |
|||
| Line 290: | Line 290: | ||
if (thisWordLength ≥ longestWordLength) then |
if (thisWordLength ≥ longestWordLength) then |
||
set theseCharacters to thisWord's characters |
set theseCharacters to thisWord's characters |
||
tell sorter to |
tell sorter to sort(theseCharacters, 1, -1) |
||
set sortedWord to theseCharacters as text |
set sortedWord to theseCharacters as text |
||
if (sortedWord = thisWord) then |
if (sortedWord = thisWord) then |
||