sort tweaks from John P. Linderman.
[p5sagit/p5-mst-13.2.git] / lib / sort.t
index 6b60716..44aaf8f 100644 (file)
@@ -12,6 +12,6 @@ BEGIN {
     ok(sort::current() eq 'mergesort');
 }
 
-use sort 'fast';
-ok(sort::current() eq 'quicksort fast');
+use sort qw( stable _qsort );
+ok(sort::current() eq 'quicksort stable');