mirror of
https://git.FreeBSD.org/ports.git
synced 2024-12-24 04:33:24 +00:00
- Fix perl syntax with perl 5.24+
- While here, fix typo in documentation PR: 190531 Submitted by: vess@slavof.net Approved by: maintainer timeout (daemon, 2.5 years) MFH: 2016Q4
This commit is contained in:
parent
0bd90a15a5
commit
d34c91c4e5
Notes:
svn2git
2021-03-31 03:12:20 +00:00
svn path=/head/; revision=426998
@ -3,7 +3,7 @@
|
||||
|
||||
PORTNAME= I18N-LangTags
|
||||
PORTVERSION= 0.35
|
||||
PORTREVISION= 1
|
||||
PORTREVISION= 2
|
||||
CATEGORIES= misc perl5
|
||||
MASTER_SITES= CPAN
|
||||
PKGNAMEPREFIX= p5-
|
||||
|
11
misc/p5-I18N-LangTags/files/patch-lib_I18N_LangTags.pm
Normal file
11
misc/p5-I18N-LangTags/files/patch-lib_I18N_LangTags.pm
Normal file
@ -0,0 +1,11 @@
|
||||
--- lib/I18N/LangTags.pm.orig 2004-10-07 07:26:33 UTC
|
||||
+++ lib/I18N/LangTags.pm
|
||||
@@ -489,7 +489,7 @@ lookup in %greetings fails. That's the
|
||||
You could instead do lookups on $wanted with:
|
||||
|
||||
use I18N::LangTags qw(same_language_tag);
|
||||
- my $repsonse = '';
|
||||
+ my $response = '';
|
||||
foreach my $l2 (keys %greetings) {
|
||||
if(same_language_tag($wanted, $l2)) {
|
||||
$response = $greetings{$l2};
|
@ -0,0 +1,11 @@
|
||||
--- lib/I18N/LangTags/Detect.pm.orig 2004-06-21 05:47:55 UTC
|
||||
+++ lib/I18N/LangTags/Detect.pm
|
||||
@@ -137,7 +137,7 @@ sub _try_use { # Basically a wrapper a
|
||||
my $module = $_[0]; # ASSUME sane module name!
|
||||
{ no strict 'refs';
|
||||
return($tried{$module} = 1)
|
||||
- if defined(%{$module . "::Lexicon"}) or defined(@{$module . "::ISA"});
|
||||
+ if %{$module . "::Lexicon"} or @{$module . "::ISA"};
|
||||
# weird case: we never use'd it, but there it is!
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user