diff options
Diffstat (limited to 'meta/recipes-devtools/perl/perl-5.20.0/debian/squelch-locale-warnings.diff')
-rw-r--r-- | meta/recipes-devtools/perl/perl-5.20.0/debian/squelch-locale-warnings.diff | 55 |
1 files changed, 55 insertions, 0 deletions
diff --git a/meta/recipes-devtools/perl/perl-5.20.0/debian/squelch-locale-warnings.diff b/meta/recipes-devtools/perl/perl-5.20.0/debian/squelch-locale-warnings.diff new file mode 100644 index 0000000000..5c1900498b --- /dev/null +++ b/meta/recipes-devtools/perl/perl-5.20.0/debian/squelch-locale-warnings.diff @@ -0,0 +1,55 @@ +From 2f332eeedbf63f72f6b1b157a912282a31a25d3b Mon Sep 17 00:00:00 2001 +From: Niko Tyni <ntyni@debian.org> +Date: Sun, 3 Oct 2010 21:36:17 +0300 +Subject: Squelch locale warnings in Debian package maintainer scripts + +Bug-Debian: http://bugs.debian.org/508764 + +The system locales are rather frequently out of sync with the C library +during package upgrades, causing a huge amount of useless Perl locale +warnings. Squelch them when running package maintainer scripts, detected +by the DPKG_RUNNING_VERSION environment variable. + +Any real locale problem will show up after the system upgrade too, and +the warning will be triggered normally again at that point. + +Patch-Name: debian/squelch-locale-warnings.diff +--- + locale.c | 4 ++++ + pod/perllocale.pod | 8 ++++++++ + 2 files changed, 12 insertions(+) + +diff --git a/locale.c b/locale.c +index 6e8728c..f55c4b2 100644 +--- a/locale.c ++++ b/locale.c +@@ -512,6 +512,10 @@ Perl_init_i18nl10n(pTHX_ int printwarn) + char *p; + const bool locwarn = (printwarn > 1 || + (printwarn && ++ ++ /* Debian specific change - see http://bugs.debian.org/508764 */ ++ (!PerlEnv_getenv("DPKG_RUNNING_VERSION")) && ++ + (!(p = PerlEnv_getenv("PERL_BADLANG")) || atoi(p)))); + bool done = FALSE; + const char *system_default_locale = NULL; +diff --git a/pod/perllocale.pod b/pod/perllocale.pod +index 914281f..15de0d4 100644 +--- a/pod/perllocale.pod ++++ b/pod/perllocale.pod +@@ -1151,6 +1151,14 @@ B<NOTE>: PERL_BADLANG only gives you a way to hide the warning message. + The message tells about some problem in your system's locale support, + and you should investigate what the problem is. + ++=item DPKG_RUNNING_VERSION ++ ++On Debian systems, if the DPKG_RUNNING_VERSION environment variable is ++set (to any value), the locale failure warnings will be suppressed just ++like with a zero PERL_BADLANG setting. This is done to avoid floods ++of spurious warnings during system upgrades. ++See L<http://bugs.debian.org/508764>. ++ + =back + + The following environment variables are not specific to Perl: They are |