From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Tue, 27 Nov 2001 15:05:33 +0000 (+0000)
Subject: Tiny fix from John P. Linderman.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=71c4de84bc8506275f6b08965e20ece87fc9c47b;p=p5sagit%2Fp5-mst-13.2.git

Tiny fix from John P. Linderman.

p4raw-id: //depot/perl@13320
---

diff --git a/lib/sort.pm b/lib/sort.pm
index c9ef3fa..18f3606 100644
--- 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 '$_'");
 	}
     }
 }