01/01: gnu: Add missing patch for Guile-Present.

[Ludovic Courtès]

civodul pushed a commit to branch master
in repository guix.

commit 26ecc2a780e3129aa3ebd7b130f1f8f17c57b4a4
Author: Ludovic Courtès <address@hidden>
Date:   Wed Sep 2 09:48:37 2015 +0200

    gnu: Add missing patch for Guile-Present.
    
    This patch should have been added in cdd383e.
    
    * gnu/packages/patches/guile-present-coding.patch: New file.
    * gnu-system.am (dist_patch_DATA): Add it.
---
 gnu-system.am                                   |    1 +
 gnu/packages/patches/guile-present-coding.patch |   16 ++++++++++++++++
 2 files changed, 17 insertions(+), 0 deletions(-)

diff --git a/gnu-system.am b/gnu-system.am
index 56dc084..4acbb51 100644
--- a/gnu-system.am
+++ b/gnu-system.am
@@ -487,6 +487,7 @@ dist_patch_DATA =                                           
\
   gnu/packages/patches/guile-arm-fixes.patch                   \
   gnu/packages/patches/guile-default-utf8.patch                        \
   gnu/packages/patches/guile-linux-syscalls.patch              \
+  gnu/packages/patches/guile-present-coding.patch              \
   gnu/packages/patches/guile-relocatable.patch                 \
   gnu/packages/patches/guile-rsvg-pkgconfig.patch              \
   gnu/packages/patches/gtkglext-disable-disable-deprecated.patch \
diff --git a/gnu/packages/patches/guile-present-coding.patch 
b/gnu/packages/patches/guile-present-coding.patch
new file mode 100644
index 0000000..0655726
--- /dev/null
+++ b/gnu/packages/patches/guile-present-coding.patch
@@ -0,0 +1,16 @@
+The tests/org-mode.scm tests expects 'jpl-outline-es' to be read as UTF-8.
+
+--- guile-present-0.3.0/tests/org-mode.scm     2014-09-23 22:29:51.426705753 
+0200
++++ guile-present-0.3.0/tests/org-mode.scm     2014-09-23 22:30:09.634705548 
+0200
+@@ -194,9 +194,10 @@
+                "(Just another hacker)"
+                "address@hidden")
+             (p "Julien Moutte, CEO" "address@hidden")))
++   (with-fluids ((%default-port-encoding "UTF-8"))
+    (call-with-input-file
+        (in-vicinity *top-srcdir* "tests/jpl-outline-es")
+-     org->presentation)))
++       org->presentation))))
+ 
+ (setlocale LC_ALL "")
+ (exit-with-summary (run-all-defined-test-cases))