Accepting request 327576 from devel:languages:perl

1

OBS-URL: https://build.opensuse.org/request/show/327576
OBS-URL: https://build.opensuse.org/package/show/openSUSE:Factory/perl-Unicode-String?expand=0&rev=22

perl-Unicode-String.changes

@@ -1,3 +1,8 @@
+-------------------------------------------------------------------
+Thu Aug 27 10:42:46 UTC 2015 - hsk@imb-jena.de
+
+- perl522.patch: fix to make module work with perl-5.22
+
 -------------------------------------------------------------------
 Wed Oct 15 07:28:46 UTC 2014 - jengelh@inai.de
 

perl-Unicode-String.spec

@@ -24,6 +24,7 @@ License:        Artistic-1.0
 Group:          Development/Libraries/Perl
 Url:            http://cpan.org/modules/by-module/Unicode/
 Source:         http://search.cpan.org/CPAN/authors/id/G/GA/GAAS/Unicode-String-%version.tar.gz
+Patch0:         perl522.patch
 BuildRoot:      %{_tmppath}/%{name}-%{version}-build
 %{perl_requires}
 BuildRequires:  perl
@@ -46,6 +47,7 @@ Authors:
 
 %prep
 %setup -n Unicode-String-%{version}
+%patch0 -p2
 
 %build
 perl Makefile.PL OPTIMIZE="$RPM_OPT_FLAGS -Wall"

perl522.patch

@@ -0,0 +1,11 @@
+--- a/Unicode-String-2.09/lib/Unicode/CharName.pm	2005-10-25 20:11:00.000000000 +0200
++++ b/Unicode-String-2.09/lib/Unicode/CharName.pm	2015-08-27 12:33:13.761929481 +0200
+@@ -77,7 +77,7 @@
+ 	    return join("", "HANGUL SYLLABLE ", @s)
+ 	}
+     }
+-    _init_names() unless defined %NAMES;
++    _init_names() unless %NAMES;
+     $NAMES{sprintf("%04X",$code)}
+ }
+