[PATCH 01/13] gnu: subversion: Propagate env variables to hooks.

[Eric Bavier]

* gnu/packages/patches/subversion-propagate-env-to-hooks.patch: New patch.
* gnu-system.am (dist_patch_DATA): Add it.
* gnu/packages/version-control.scm (subversion): Use it.
---
 gnu-system.am                                      |    1 +
 .../subversion-propagate-env-to-hooks.patch        |   14 ++++++++++++++
 gnu/packages/version-control.scm                   |    8 +++++---
 3 files changed, 20 insertions(+), 3 deletions(-)
 create mode 100644 gnu/packages/patches/subversion-propagate-env-to-hooks.patch

diff --git a/gnu-system.am b/gnu-system.am
index d39d869..5fd18e8 100644
--- a/gnu-system.am
+++ b/gnu-system.am
@@ -418,6 +418,7 @@ dist_patch_DATA =                                           
\
   gnu/packages/patches/soprano-find-clucene.patch              \
   gnu/packages/patches/source-highlight-regexrange-test.patch  \
   gnu/packages/patches/sqlite-large-page-size-fix.patch                \
+  gnu/packages/patches/subversion-propagate-env-to-hooks.patch \
   gnu/packages/patches/superlu-dist-scotchmetis.patch          \
   gnu/packages/patches/tcsh-fix-autotest.patch                 \
   gnu/packages/patches/teckit-cstdio.patch                     \
diff --git a/gnu/packages/patches/subversion-propagate-env-to-hooks.patch 
b/gnu/packages/patches/subversion-propagate-env-to-hooks.patch
new file mode 100644
index 0000000..55cecab
--- /dev/null
+++ b/gnu/packages/patches/subversion-propagate-env-to-hooks.patch
@@ -0,0 +1,14 @@
+* Hooks need to inherit environment variables such as PATH, otherwise simple
+  things like `ls` might fail in a hook.
+
+--- subversion-1.7.18/subversion/libsvn_repos/hooks.c  2011-07-26 
11:48:50.000000000 -0500
++++ subversion-1.7.18/subversion/libsvn_repos/hooks.c  2014-09-27 
11:53:37.444830624 -0500
+@@ -196,7 +196,7 @@
+             (apr_err, _("Can't create null stdout for hook '%s'"), cmd);
+     }
+ 
+-  err = svn_io_start_cmd2(&cmd_proc, ".", cmd, args, FALSE,
++  err = svn_io_start_cmd2(&cmd_proc, ".", cmd, args, TRUE,
+                           FALSE, stdin_handle, result != NULL, null_handle,
+                           TRUE, NULL, pool);
+ 
diff --git a/gnu/packages/version-control.scm b/gnu/packages/version-control.scm
index 0b52f0c..5d2eb58 100644
--- a/gnu/packages/version-control.scm
+++ b/gnu/packages/version-control.scm
@@ -297,11 +297,13 @@ property manipulation.")
     (version "1.7.18")
     (source (origin
              (method url-fetch)
-             (uri (string-append 
"http://archive.apache.org/dist/subversion/subversion-";
-                                 version ".tar.bz2"))
+             (uri (string-append "http://archive.apache.org/dist/subversion/";
+                                 "subversion-" version ".tar.bz2"))
              (sha256
               (base32
-               "06nrqnn3qq1hhskkcdbm0ilk2xv6ay2gyf2c7qvxp6xncb782wzn"))))
+               "06nrqnn3qq1hhskkcdbm0ilk2xv6ay2gyf2c7qvxp6xncb782wzn"))
+             (patches
+              (list (search-patch 
"subversion-propagate-env-to-hooks.patch")))))
     (build-system gnu-build-system)
     (arguments
      '(#:phases (alist-cons-after
-- 
1.7.9.5