From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 3 Aug 2014 21:31:08 +0000 (+0100)
Subject: Treat .dsc as bytes, just like everything else, rather than letting HTTP::Message... 
X-Git-Tag: debian/0.22~19
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=dgit.git;a=commitdiff_plain;h=4ddcb6049e18f68c71f5ac0148aee9fdca5acb6a;hp=d7c9850a551cfb6391056e064bc032a4cb0d9036;ds=sidebyside

Treat .dsc as bytes, just like everything else, rather than letting HTTP::Message convert it to a Perl unicode string which the rest of the program mishandles.  Closes:#738536.
---

diff --git a/debian/changelog b/debian/changelog
index d63f5cb7..84d835b9 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -13,6 +13,9 @@ dgit (0.22~experimental1) experimental; urgency=low
   * Check SHA-256 of .dsc against hash from archive_query (ie projectb)
     rather than letting dpkg-source do a signature verification.
     Closes:#737619.
+  * Treat .dsc as bytes, just like everything else, rather than letting
+    HTTP::Message convert it to a Perl unicode string which the rest of
+    the program mishandles.  Closes:#738536.
 
   Minor improvements:
   * Include canonicalised suite name in signed tag message.
diff --git a/dgit b/dgit
index 8517c8ae..4125c37a 100755
--- a/dgit
+++ b/dgit
@@ -318,7 +318,7 @@ sub url_get {
     my $r = $ua->get(@_) or die $!;
     return undef if $r->code == 404;
     $r->is_success or fail "failed to fetch $what: ".$r->status_line;
-    return $r->decoded_content();
+    return $r->decoded_content(charset => 'none');
 }
 
 our ($dscdata,$dscurl,$dsc,$dsc_checked,$skew_warning_vsn);