From 481eca800255ce13cc01004a91e34f49fe4b694d Mon Sep 17 00:00:00 2001
From: Ricardo Wurmus <rekado@elephly.net>
Date: Thu, 16 May 2019 21:39:29 +0200
Subject: [PATCH] gnu: guile-file-names: Update to 0.2.

* gnu/packages/guile-xyz.scm (guile-file-names): Update to 0.2.
[arguments]: Adjust build phase "build-with-guile-2.2" and rename to
"fix-target-directory".
---
 gnu/packages/guile-xyz.scm | 10 ++++------
 1 file changed, 4 insertions(+), 6 deletions(-)

diff --git a/gnu/packages/guile-xyz.scm b/gnu/packages/guile-xyz.scm
index c640893e32..365f909c2c 100644
--- a/gnu/packages/guile-xyz.scm
+++ b/gnu/packages/guile-xyz.scm
@@ -2199,7 +2199,7 @@ from @code{tree-il}.")
 (define-public guile-file-names
   (package
     (name "guile-file-names")
-    (version "0.1")
+    (version "0.2")
     (source (origin
               (method url-fetch)
               (uri (string-append "http://brandon.invergo.net/software/download/"
@@ -2207,16 +2207,14 @@ from @code{tree-il}.")
                                   version ".tar.gz"))
               (sha256
                (base32
-                "01ba6jdypj9cwc5rgiw384dgz12iz6ab4dsd3ai5gfklprm2a50b"))))
+                "1kwx5hanl40960w2nhyga7ry4l6c3c57zdrihk4yajj87vn3pmi8"))))
     (build-system gnu-build-system)
     (arguments
      `(#:phases
        (modify-phases %standard-phases
-         (add-after 'unpack 'build-with-guile-2.2
+         (add-after 'unpack 'fix-target-directory
            (lambda _
-             (substitute* "configure"
-               (("guile-2.0") "guile-2.2"))
-             (substitute* "file-names/Makefile.in"
+             (substitute* "src/Makefile.in"
                (("guilemoddir = \\$\\(GUILE_SITE\\)")
                 "guilemoddir = $(datadir)/guile/site/$(GUILE_EFFECTIVE_VERSION)\n"))
              #t)))))