Re: Cannot handle date (0, 0, 0, 2, 0, 1970)

[p5sagit/p5-mst-13.2.git] / lib / sort.pm

diff --git a/lib/sort.pm b/lib/sort.pm
index c9ef3fa..8140a7d 100644 (file)
--- a/lib/sort.pm
+++ b/lib/sort.pm
@@ -31,7 +31,7 @@ sub import {
            $^H{SORT} |=  $sort::stable_bit;
        } else {
            require Carp;
-           Carp::croak("sort: unknown subpragma '@_'");
+           Carp::croak("sort: unknown subpragma '$_'");
        }
     }
 }
@@ -77,7 +77,7 @@ quicksort defends against quadratic behaviour by shuffling large
 arrays before sorting.
 
 A stable sort means that for records that compare equal, the original
-input ordering is preserved.  Perl's mergesort is stable, quicksort is not.
+input ordering is preserved.  Mergesort is stable, quicksort is not.
 Stability will matter only if elements that compare equal can be
 distinguished in some other way.  That means that simple numerical
 and lexical sorts do not profit from stability, since equal elements