Hello community,

here is the log from the commit of package perl-Encode-Locale for 
openSUSE:Factory checked in at 2012-02-16 16:21:47
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Encode-Locale (Old)
 and      /work/SRC/openSUSE:Factory/.perl-Encode-Locale.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "perl-Encode-Locale", Maintainer is ""

Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-Encode-Locale/perl-Encode-Locale.changes    
2011-09-23 12:36:57.000000000 +0200
+++ 
/work/SRC/openSUSE:Factory/.perl-Encode-Locale.new/perl-Encode-Locale.changes   
    2012-02-16 16:21:51.000000000 +0100
@@ -1,0 +2,6 @@
+Wed Feb 15 12:02:38 UTC 2012 - [email protected]
+
+- updated to 1.03
+ Documentation spelling fixes and tweaks to improve testing on Windows.
+
+-------------------------------------------------------------------

Old:
----
  Encode-Locale-1.02.tar.gz

New:
----
  Encode-Locale-1.03.tar.gz

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ perl-Encode-Locale.spec ++++++
--- /var/tmp/diff_new_pack.qjKjc1/_old  2012-02-16 16:21:52.000000000 +0100
+++ /var/tmp/diff_new_pack.qjKjc1/_new  2012-02-16 16:21:52.000000000 +0100
@@ -1,7 +1,7 @@
 #
 # spec file for package perl-Encode-Locale
 #
-# Copyright (c) 2011 SUSE LINUX Products GmbH, Nuernberg, Germany.
+# Copyright (c) 2012 SUSE LINUX Products GmbH, Nuernberg, Germany.
 #
 # All modifications and additions to the file contributed by third parties
 # remain the property of their copyright owners, unless otherwise agreed
@@ -16,49 +16,52 @@
 #
 
 
-
 Name:           perl-Encode-Locale
-Version:        1.02
-Release:        3
-License:        GPL-1.0+ or Artistic-1.0
+Version:        1.03
+Release:        0
 %define cpan_name Encode-Locale
 Summary:        Determine the locale encoding
-Url:            http://search.cpan.org/dist/Encode-Locale/
+License:        Artistic-1.0 or GPL-1.0+
 Group:          Development/Libraries/Perl
-#Source:         
http://www.cpan.org/authors/id/G/GA/GAAS/Encode-Locale-%{version}.tar.gz
-Source:         %{cpan_name}-%{version}.tar.gz
+Url:            http://search.cpan.org/dist/Encode-Locale/
+Source:         
http://www.cpan.org/authors/id/G/GA/GAAS/%{cpan_name}-%{version}.tar.gz
 BuildArch:      noarch
 BuildRoot:      %{_tmppath}/%{name}-%{version}-build
 BuildRequires:  perl
 BuildRequires:  perl-macros
+#BuildRequires: perl(Encode::HanExtra)
+#BuildRequires: perl(Encode::Locale)
+#BuildRequires: perl(Win32::API)
+#BuildRequires: perl(Win32::Console)
+Recommends:     perl(Win32::Console)
 %{perl_requires}
 
 %description
 In many applications it's wise to let Perl use Unicode for the strings it
 processes. Most of the interfaces Perl has to the outside world are still
-byte based. Programs therefore needs to decode byte strings that enter the
+byte based. Programs therefore need to decode byte strings that enter the
 program from the outside and encode them again on the way out.
 
 The POSIX locale system is used to specify both the language conventions
 requested by the user and the preferred character set to consume and
 output. The 'Encode::Locale' module looks up the charset and encoding
-(called a CODESET in the locale jargon) and arrange for the Encode
-module to know this encoding under the name "locale". It means
+(called a CODESET in the locale jargon) and arranges for the the Encode
+manpage module to know this encoding under the name "locale". It means
 bytes obtained from the environment can be converted to Unicode strings by
 calling 'Encode::encode(locale => $bytes)' and converted back again with
 'Encode::decode(locale => $string)'.
 
 Where file systems interfaces pass file names in and out of the program we
 also need care. The trend is for operating systems to use a fixed file
-encoding that doesn't actually depend on the locale; and this module
-determines the most appropriate encoding for file names. The Encode
-module will know this encoding under the name "locale_fs". For
+encoding that don't actually depend on the locale; and this module
+determines the most appropriate encoding for file names. The the Encode
+manpage module will know this encoding under the name "locale_fs". For
 traditional Unix systems this will be an alias to the same encoding as
 "locale".
 
 For programs running in a terminal window (called a "Console" on some
 systems) the "locale" encoding is usually a good choice for what to expect
-as input and output. Some systems allow us to query the encoding set for
+as input and output. Some systems allows us to query the encoding set for
 the terminal and 'Encode::Locale' will do that if available and make these
 encodings known under the 'Encode' aliases "console_in" and "console_out".
 For systems where we can't determine the terminal encoding these will be
@@ -118,13 +121,13 @@
 
 * $ENCODING_LOCALE
 
-  The encoding name determined to be suitable for the current locale. The
-  Encode manpage knows this encoding as "locale".
+  The encoding name determined to be suitable for the current locale. the
+  Encode manpage know this encoding as "locale".
 
 * $ENCODING_LOCALE_FS
 
   The encoding name determined to be suiteable for file system interfaces
-  involving file names. The Encode manpage knows this encoding as
+  involving file names. the Encode manpage know this encoding as
   "locale_fs".
 
 * $ENCODING_CONSOLE_IN
@@ -132,7 +135,7 @@
 * $ENCODING_CONSOLE_OUT
 
   The encodings to be used for reading and writing output to the a console.
-  The Encode manpage knows these encodings as "console_in" and
+  the Encode manpage know these encodings as "console_in" and
   "console_out".
 
 %prep
@@ -150,11 +153,8 @@
 %perl_process_packlist
 %perl_gen_filelist
 
-%clean
-%{__rm} -rf %{buildroot}
-
 %files -f %{name}.files
-%defattr(644,root,root,755)
+%defattr(-,root,root,755)
 %doc Changes README
 
 %changelog

++++++ Encode-Locale-1.02.tar.gz -> Encode-Locale-1.03.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Encode-Locale-1.02/Changes 
new/Encode-Locale-1.03/Changes
--- old/Encode-Locale-1.02/Changes      2011-03-28 09:44:40.000000000 +0200
+++ new/Encode-Locale-1.03/Changes      2012-02-11 16:51:55.000000000 +0100
@@ -1,3 +1,8 @@
+## 2012-01-11  Release 1.03
+
+Documentation spelling fixes and tweaks to improve testing on Windows.
+
+
 ## 2011-03-28  Release 1.02
 
 Added supporting hacks for GB18030 and roman8. [RT#66373] [RT#67010]
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Encode-Locale-1.02/META.yml 
new/Encode-Locale-1.03/META.yml
--- old/Encode-Locale-1.02/META.yml     2011-03-28 09:45:34.000000000 +0200
+++ new/Encode-Locale-1.03/META.yml     2012-02-11 16:54:06.000000000 +0100
@@ -1,6 +1,6 @@
 --- #YAML:1.0
 name:               Encode-Locale
-version:            1.02
+version:            1.03
 abstract:           Determine the locale encoding
 author:
     - Gisle Aas <[email protected]>
@@ -20,7 +20,7 @@
     directory:
         - t
         - inc
-generated_by:       ExtUtils::MakeMaker version 6.56
+generated_by:       ExtUtils::MakeMaker version 6.57_05
 meta-spec:
     url:      http://module-build.sourceforge.net/META-spec-v1.4.html
     version:  1.4
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Encode-Locale-1.02/lib/Encode/Locale.pm 
new/Encode-Locale-1.03/lib/Encode/Locale.pm
--- old/Encode-Locale-1.02/lib/Encode/Locale.pm 2011-03-28 09:42:29.000000000 
+0200
+++ new/Encode-Locale-1.03/lib/Encode/Locale.pm 2012-02-11 16:50:26.000000000 
+0100
@@ -1,7 +1,7 @@
 package Encode::Locale;
 
 use strict;
-our $VERSION = "1.02";
+our $VERSION = "1.03";
 
 use base 'Exporter';
 our @EXPORT_OK = qw(
@@ -22,27 +22,34 @@
 
 sub _init {
     if ($^O eq "MSWin32") {
-       # Try to obtain what the Windows ANSI code page is
-       eval {
-           require Win32::API;
-           if (Win32::API->Import('kernel32', 'int GetACP()')) {
-               my $cp = GetACP();
-               $ENCODING_LOCALE = "cp$cp" if $cp;
-           }
-       };
+       unless ($ENCODING_LOCALE) {
+           # Try to obtain what the Windows ANSI code page is
+           eval {
+               unless (defined &GetACP) {
+                   require Win32::API;
+                   Win32::API->Import('kernel32', 'int GetACP()');
+               };
+               if (defined &GetACP) {
+                   my $cp = GetACP();
+                   $ENCODING_LOCALE = "cp$cp" if $cp;
+               }
+           };
+       }
 
-       # If we have the Win32::Console module installed we can ask
-       # it for the code set to use
-       eval {
-           require Win32::Console;
-           my $cp = Win32::Console::InputCP();
-           $ENCODING_CONSOLE_IN = "cp$cp" if $cp;
-           $cp = Win32::Console::OutputCP();
-           $ENCODING_CONSOLE_OUT = "cp$cp" if $cp;
-       };
-       # Invoking the 'chcp' program might also work
-       if (!$ENCODING_CONSOLE_IN && qx(chcp) =~ /^Active code page: (\d+)/) {
-           $ENCODING_CONSOLE_IN = "cp$1";
+       unless ($ENCODING_CONSOLE_IN) {
+           # If we have the Win32::Console module installed we can ask
+           # it for the code set to use
+           eval {
+               require Win32::Console;
+               my $cp = Win32::Console::InputCP();
+               $ENCODING_CONSOLE_IN = "cp$cp" if $cp;
+               $cp = Win32::Console::OutputCP();
+               $ENCODING_CONSOLE_OUT = "cp$cp" if $cp;
+           };
+           # Invoking the 'chcp' program might also work
+           if (!$ENCODING_CONSOLE_IN && (qx(chcp) || '') =~ /^Active code 
page: (\d+)/) {
+               $ENCODING_CONSOLE_IN = "cp$1";
+           }
        }
     }
 
@@ -52,7 +59,7 @@
            $ENCODING_LOCALE = 
I18N::Langinfo::langinfo(I18N::Langinfo::CODESET());
 
            # Workaround of Encode < v2.25.  The "646" encoding  alias was
-           # introducted in Encode-2.25, but we don't want to require that 
version
+           # introduced in Encode-2.25, but we don't want to require that 
version
            # quite yet.  Should avoid the CPAN testers failure reported from
            # openbsd-4.7/perl-5.10.0 combo.
            $ENCODING_LOCALE = "ascii" if $ENCODING_LOCALE eq "646";
@@ -88,6 +95,8 @@
            unless $foundit;
 
     }
+
+    # use Data::Dump; ddx $ENCODING_LOCALE, $ENCODING_LOCALE_FS, 
$ENCODING_CONSOLE_IN, $ENCODING_CONSOLE_OUT;
 }
 
 _init();
@@ -170,14 +179,14 @@
 =head1 DESCRIPTION
 
 In many applications it's wise to let Perl use Unicode for the strings it
-processes.  Most of the interfaces Perl has to the outside world is still byte
-based.  Programs therefore needs to decode byte strings that enter the program
+processes.  Most of the interfaces Perl has to the outside world are still byte
+based.  Programs therefore need to decode byte strings that enter the program
 from the outside and encode them again on the way out.
 
 The POSIX locale system is used to specify both the language conventions
 requested by the user and the preferred character set to consume and
 output.  The C<Encode::Locale> module looks up the charset and encoding (called
-a CODESET in the locale jargon) and arrange for the L<Encode> module to know
+a CODESET in the locale jargon) and arranges for the L<Encode> module to know
 this encoding under the name "locale".  It means bytes obtained from the
 environment can be converted to Unicode strings by calling C<<
 Encode::encode(locale => $bytes) >> and converted back again with C<<
@@ -323,7 +332,7 @@
 filenames.  Since this module has no way to actually figure out
 what the is correct it goes with the best guess which is to
 assume filenames are encoding according to the current locale.
-Users are adviced to always specify UTF-8 as the locale charset.
+Users are advised to always specify UTF-8 as the locale charset.
 
 =head1 SEE ALSO
 

-- 
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]

Reply via email to