Another suggestion from Faré:
(sort (loop for p being the hash-values of asdf::*source-registry* collect p) 'string< :key 'pathname-name)
Another suggestion from Faré:
(sort (loop for p being the hash-values of asdf::* source- registry*
collect p) 'string< :key 'pathname-name)