From a9493db8b616de80fd82b0b66562f5d443d9b70f Mon Sep 17 00:00:00 2001
From: Stefan Siegel <siegel@linux-mandrake.com>
Date: Sat, 18 Aug 2001 00:10:21 +0000
Subject: fixed i18n

---
 perl-install/install_any.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/install_any.pm')

diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm
index 41ec2cf19..92ce4ffcd 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -786,7 +786,7 @@ sub loadO {
     } else {
 	-e "$f.pl" and $f .= ".pl" unless -e $f;
 
-	my $fh = -e $f ? do { local *F; open F, $f; *F } : getFile($f) or die _("Error reading file $f");
+	my $fh = -e $f ? do { local *F; open F, $f; *F } : getFile($f) or die _("Error reading file %s", $f);
 	{
 	    local $/ = "\0";
 	    no strict;
-- 
cgit v1.2.1