.

svn: r3517
2006-06-28 06:59:12 +00:00 · 2006-06-28 06:59:12 +00:00 · 343c734291
commit 343c734291
parent 6d1f299cfc
1 changed files with 1 additions and 1 deletions
--- a/collects/planet/private/planet-shared.ss
+++ b/collects/planet/private/planet-shared.ss
@ -267,7 +267,7 @@ Various common pieces of code that both the client and server need to access
              #f
              (let ((best-row
                     (car 
-                      (sort
+                      (quicksort
                       matches
                       (λ (a b) (> (assoc-table-row->min a) (assoc-table-row->min b)))))))
                (make-pkg