[SCM] Git repository for devscripts branch, master, updated. v2.12.4-224-g2831834

[James McCoy]

The following commit has been merged in the master branch:
commit 283183430c55796069229ea301a2c5702caa88ba
Author: James McCoy <jamessan at debian.org>
Date:   Thu May 9 07:41:35 2013 -0400

    Treat gpg's output as utf8, not UTF-8, to avoid warnings.
    
    Some keys (e.g., 190E48D751174F42ABAC4DD7E2624966A269D927) have UIDs
    that are incorrectly encoded as non-UTF-8, but gpg's --with-colons
    forces UTF-8 output.  Those incorrectly encoded keys will therefore
    cause Perl to emit a warning when the strict UTF-8 layer is in use
    instead of the liberal utf8 layer.
    
    Signed-off-by: James McCoy <jamessan at debian.org>

diff --git a/scripts/who-permits-upload.pl b/scripts/who-permits-upload.pl
index bfb489b..041cf10 100755
--- a/scripts/who-permits-upload.pl
+++ b/scripts/who-permits-upload.pl
@@ -253,7 +253,7 @@ sub lookup_fingerprint
     }
     push(@gpg_arguments, ("--no-options", "--no-auto-check-trustdb", "--no-default-keyring", "--list-key", "--with-colons", encode(locale => $fingerprint)));
     open(CMD, '-|', $GPG, @gpg_arguments) || leave "$GPG: $!\n";
-    binmode CMD, ':encoding(UTF-8)';
+    binmode CMD, ':utf8';
     while (my $l = <CMD>)
     {
         if ($l =~ /^pub/)

-- 
Git repository for devscripts