~ruther/guix-local

10cd39d1e03e267d0c47a80e7edf9f98a5ce8b5b — Marius Bakke 9 years ago 404e48c
gnu: xorg-server: Use 'modify-phases' syntax.

* gnu/packages/xorg.scm (xorg-server)[arguments]: Use 'modify-phases'.
1 files changed, 13 insertions(+), 11 deletions(-)

M gnu/packages/xorg.scm
M gnu/packages/xorg.scm => gnu/packages/xorg.scm +13 -11
@@ 5066,17 5066,19 @@ over Xlib, including:
             "--enable-kdrive"
             "--enable-xephyr")

       #:phases (alist-cons-before
                 'configure 'pre-configure
                 (lambda _
                   (substitute* (find-files "." "\\.c$")
                     (("/bin/sh") (which "sh")))

                   ;; Don't try to 'mkdir /var'.
                   (substitute* "hw/xfree86/Makefile.in"
                     (("\\$\\(MKDIR_P\\).*logdir.*")
                      "true\n")))
                 %standard-phases)))
       #:phases
       (modify-phases %standard-phases
         (add-before
          'configure 'pre-configure
          (lambda _
            (substitute* (find-files "." "\\.c$")
              (("/bin/sh") (which "sh")))

            ;; Don't try to 'mkdir /var'.
            (substitute* "hw/xfree86/Makefile.in"
              (("\\$\\(MKDIR_P\\).*logdir.*")
               "true\n"))
            #t)))))
    (home-page "https://www.x.org/wiki/")
    (synopsis "Xorg implementation of the X Window System")
    (description