From 432f25c16c5067056b767f51243b9ddada214b2c Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Mon, 5 Apr 2004 09:24:25 +0000 Subject: perl now handle cleanly utf8 string in exceptions, no need to die \N("...") --- perl-install/authentication.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/authentication.pm') diff --git a/perl-install/authentication.pm b/perl-install/authentication.pm index 08bad2cc7..0c86777aa 100644 --- a/perl-install/authentication.pm +++ b/perl-install/authentication.pm @@ -80,7 +80,7 @@ sub set { } elsif ($kind eq 'NIS') { $in->do_pkgs->install('ypbind'); my $domain = $netc->{NISDOMAIN}; - $domain || $val ne "broadcast" or die \N("Can't use broadcast with no NIS domain"); + $domain || $val ne "broadcast" or die N("Can't use broadcast with no NIS domain"); my $t = $domain ? "domain $domain" . ($val ne "broadcast" && " server") : "ypserver"; substInFile { $_ = "#~$_" unless /^#/; -- cgit v1.2.1