gistfile1.txt

diff --git a/lib/puppet/network/http/compression.rb b/lib/puppet/network/http/compression.rb
index e4fd5b9e8a..782cbcb1de 100644
--- a/lib/puppet/network/http/compression.rb
+++ b/lib/puppet/network/http/compression.rb
@@ -18,7 +18,11 @@ module Puppet::Network::HTTP::Compression
     # return an uncompressed body if the response has been
     # compressed
     def uncompress_body(response)
-      Puppet.deprecation_warning(_('Puppet::Network::HTTP::Compression is deprecated.'))
+      Puppet.deprecation_warning(_('Puppet::Network::HTTP::Compression::Active#uncompress_body is deprecated.'))
+      File.open('deprecations.txt', 'a') { |f|
+        f.puts caller.join("\n")
+      }
+
       case response['content-encoding']
       when 'gzip'
         # ZLib::GzipReader has an associated encoding, by default Encoding.default_external