summary refs log tree commit diff
path: root/gnu/packages/gnome.scm
diff options
context:
space:
mode:
authorMark H Weaver <mhw@netris.org>2015-08-22 02:34:41 -0400
committerMark H Weaver <mhw@netris.org>2015-08-22 02:34:41 -0400
commit86aff7912c6a3e904f7b904a441c3339a3c300c1 (patch)
tree0f6ff64faaf7509e9d822c2066e7b5695f094d4e /gnu/packages/gnome.scm
parent020cdbd0e494d75173a71f55a24c4ea72ae215c7 (diff)
downloadguix-86aff7912c6a3e904f7b904a441c3339a3c300c1.tar.gz
gnu: d-feet: Return booleans from phase procedures.
* gnu/packages/gnome.scm (d-feet)[arguments]: Return booleans from phase
  procedures.  Omit unused 'inputs' keyword argument from 'pre-check' phase.
Diffstat (limited to 'gnu/packages/gnome.scm')
-rw-r--r--gnu/packages/gnome.scm8
1 files changed, 5 insertions, 3 deletions
diff --git a/gnu/packages/gnome.scm b/gnu/packages/gnome.scm
index 88ff4ff505..4b26066379 100644
--- a/gnu/packages/gnome.scm
+++ b/gnu/packages/gnome.scm
@@ -3322,7 +3322,7 @@ principles are simplicity and standards compliance.")
        (modify-phases %standard-phases
          (add-before
           'check 'pre-check
-          (lambda* (#:key inputs #:allow-other-keys)
+          (lambda _
             ;; The test suite requires a running X server.
             (system "Xvfb :1 &")
             (setenv "DISPLAY" ":1")
@@ -3331,7 +3331,8 @@ principles are simplicity and standards compliance.")
             ;; tests.py and window.py don't meet E402:
             ;;   E402 module level import not at top of file
             (substitute* "src/tests/Makefile"
-              (("--ignore=E123") "--ignore=E123,E402"))))
+              (("--ignore=E123") "--ignore=E123,E402"))
+            #t))
          (add-after
           'install 'wrap-program
           (lambda* (#:key outputs #:allow-other-keys)
@@ -3339,7 +3340,8 @@ principles are simplicity and standards compliance.")
                                        "/bin/d-feet")))
               (wrap-program prog
                 `("PYTHONPATH" = (,(getenv "PYTHONPATH")))
-                `("GI_TYPELIB_PATH" = (,(getenv "GI_TYPELIB_PATH"))))))))))
+                `("GI_TYPELIB_PATH" = (,(getenv "GI_TYPELIB_PATH"))))
+              #t))))))
     (native-inputs
      `(("intltool" ,intltool)
        ("itstool" ,itstool)