Sorting list of symbols

[Chris Uzdavinis <chris@atdesk.com>]

I'd like to sort a list of symbols.  I have some working code, but
it's a kludge and I'm not sure how to improve it.  For example, given
this list: '(c d b a), I want '(a b c d).  This works:

(quicksort items (lambda (x y) 
                  (string<? (symbol->string x) 
                            (symbol->string y))))


Is there a better way?  Thanks!

-- 
Chris