[libmodule-build-withxspp-perl] 01/02: Add patch to make output reproducible.

[gregor herrmann]

This is an automated email from the git hooks/post-receive script.

gregoa pushed a commit to branch master
in repository libmodule-build-withxspp-perl.

commit 6b58431ff197857eae8737009712d2c31586e709
Author: gregor herrmann <gregoa at debian.org>
Date:   Fri Aug 26 20:05:34 2016 +0200

    Add patch to make output reproducible.
    
    Thanks: Chris Lamb <lamby at debian.org> for the bug report and the patch.
    Closes: #835447
---
 debian/patches/reproducible-output.patch | 35 ++++++++++++++++++++++++++++++++
 debian/patches/series                    |  1 +
 2 files changed, 36 insertions(+)

diff --git a/debian/patches/reproducible-output.patch b/debian/patches/reproducible-output.patch
new file mode 100644
index 0000000..460937b
--- /dev/null
+++ b/debian/patches/reproducible-output.patch
@@ -0,0 +1,35 @@
+Description: Make output reproducible.
+ The call to Cwd::abs_path introduces the build directory into
+ target. The patch changes this to use the path relative to the build directory.
+ (For background and details cf. the Debian bug below.)
+Origin: vendor
+Bug-Debian: https://bugs.debian.org/835447
+Author: Chris Lamb <lamby at debian.org>
+Reviewed-by: gregor herrmann <gregoa at debian.org>
+Last-Update: 2016-08-26
+
+--- a/lib/Module/Build/WithXSpp.pm
++++ b/lib/Module/Build/WithXSpp.pm
+@@ -2,6 +2,7 @@
+ use strict;
+ use warnings;
+ 
++use File::Spec;
+ use Module::Build;
+ use ExtUtils::CppGuess ();
+ 
+@@ -228,11 +229,11 @@
+ HERE
+ 
+   my $typemap_args = '';
+-  $typemap_args .= '-t "' . _naive_shell_escape(Cwd::abs_path($_)) . '" ' foreach keys %$xspt_files;
++  $typemap_args .= '-t "' . _naive_shell_escape(File::Spec->abs2rel($_, $this->build_dir)) . '" ' foreach keys %$xspt_files;
+ 
+   foreach my $xsp_file (keys %$xsp_files) {
+-    my $full_path_file = _naive_shell_escape( Cwd::abs_path($xsp_file) );
+-    my $cmd = qq{INCLUDE_COMMAND: \$^X -MExtUtils::XSpp::Cmd -e xspp -- $typemap_args "$full_path_file"\n\n};
++    my $relative_path_file = _naive_shell_escape( File::Spec->abs2rel($xsp_file, $this->build_dir) );
++    my $cmd = qq{INCLUDE_COMMAND: \$^X -MExtUtils::XSpp::Cmd -e xspp -- $typemap_args "$relative_path_file"\n\n};
+     $xs_code .= $cmd;
+   }
+ 
diff --git a/debian/patches/series b/debian/patches/series
new file mode 100644
index 0000000..bfd2ede
--- /dev/null
+++ b/debian/patches/series
@@ -0,0 +1 @@
+reproducible-output.patch

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libmodule-build-withxspp-perl.git