diff options
Diffstat (limited to 'gnu/packages/freedesktop.scm')
| -rw-r--r-- | gnu/packages/freedesktop.scm | 73 | 
1 files changed, 50 insertions, 23 deletions
| diff --git a/gnu/packages/freedesktop.scm b/gnu/packages/freedesktop.scm index ce7ae8b7d5..4342a59b2a 100644 --- a/gnu/packages/freedesktop.scm +++ b/gnu/packages/freedesktop.scm @@ -649,7 +649,7 @@ the freedesktop.org XDG Base Directory specification.")               ;; logind system so that it can flicker the monitor, etc.               ;; Just skip it until a more narrow selection can be made.               (substitute* "src/libelogind/sd-login/test-login.c" -               (("r = sd_pid_get_slice.*") +               (("test_login\\(\\);")                  "return 77;"))               #t))           (add-after 'unpack 'change-pid-file-path @@ -953,38 +953,63 @@ Python.")  (define-public wayland    (package      (name "wayland") -    (version "1.18.0") +    (version "1.19.0")      (source (origin                (method url-fetch)                (uri (string-append "https://wayland.freedesktop.org/releases/"                                    name "-" version ".tar.xz"))                (sha256                 (base32 -                "0k995rn96xkplrapz5k648j651wc43kq817xk1x8280h16gsfxa6")))) -    (build-system gnu-build-system) +                "05bd2vphyx8qwa1mhsj1zdaiv4m4v94wrlssrn0lad8d601dkk5s")))) +    (build-system meson-build-system) +    (outputs '("out" "doc"))      (arguments -     `(#:parallel-tests? #f)) +     `(#:parallel-tests? #f +        #:phases +       (modify-phases %standard-phases +         (add-after 'unpack 'patch-docbook-xml +           (lambda* (#:key inputs #:allow-other-keys) +             (with-directory-excursion "doc" +               (substitute* (find-files "." "\\.xml$") +                 (("http://www.oasis-open.org/docbook/xml/4\\.5/") +                  (string-append (assoc-ref inputs "docbook-xml") +                                 "/xml/dtd/docbook/")) +                 (("http://www.oasis-open.org/docbook/xml/4\\.2/") +                  (string-append (assoc-ref inputs "docbook-xml-4.2") +                                 "/xml/dtd/docbook/")))) +             #t)) +         (add-after 'install 'move-doc +           (lambda* (#:key outputs #:allow-other-keys) +             (let* ((out (assoc-ref outputs "out")) +                    (doc (assoc-ref outputs "doc"))) +               (mkdir-p (string-append doc "/share")) +               (rename-file +                (string-append out "/share/doc") +                (string-append doc "/share/doc")) +               #t))))))      (native-inputs -     `(("doxygen" ,doxygen) -       ("graphviz" ,graphviz) +     `(("docbook-xml-4.2" ,docbook-xml-4.2) +       ("docbook-xml" ,docbook-xml) +       ("docbook-xsl" ,docbook-xsl) +       ("dot" ,graphviz) +       ("doxygen" ,doxygen)         ("pkg-config" ,pkg-config)         ("xmlto" ,xmlto)         ("xsltproc" ,libxslt)))      (inputs -     `(("docbook-xml" ,docbook-xml) -       ("docbook-xsl" ,docbook-xsl) -       ("expat" ,expat) -       ("libffi" ,libffi) -       ("libxml2" ,libxml2))) ; for XML_CATALOG_FILES +     `(("expat" ,expat) +       ("libxml2" ,libxml2)))           ; for XML_CATALOG_FILES +    (propagated-inputs +     `(("libffi" ,libffi)))      (home-page "https://wayland.freedesktop.org/") -    (synopsis "Display server protocol") -    (description -     "Wayland is a protocol for a compositor to talk to its clients as well as -a C library implementation of that protocol.  The compositor can be a standalone -display server running on Linux kernel modesetting and evdev input devices, an X -application, or a wayland client itself.  The clients can be traditional -applications, X servers (rootless or fullscreen) or other display servers.") -    (license license:x11))) +    (synopsis "Core Wayland window system code and protocol") +    (description "Wayland is a project to define a protocol for a compositor to +talk to its clients as well as a library implementation of the protocol.  The +compositor can be a standalone display server running on Linux kernel +modesetting and evdev input devices, an X application, or a wayland client +itself.  The clients can be traditional applications, X servers (rootless or +fullscreen) or other display servers.") +    (license license:expat)))  (define-public wayland-protocols    (package @@ -1004,7 +1029,10 @@ applications, X servers (rootless or fullscreen) or other display servers.")      (native-inputs       `(("pkg-config" ,pkg-config)))      (synopsis "Wayland protocols") -    (description "This package contains XML definitions of the Wayland protocols.") +    (description "Wayland-Protocols contains Wayland protocols that add +functionality not available in the Wayland core protocol.  Such protocols either +add completely new functionality, or extend the functionality of some other +protocol either in Wayland core, or some other protocol in wayland-protocols.")      (home-page "https://wayland.freedesktop.org")      (license license:expat))) @@ -1125,8 +1153,7 @@ applications, X servers (rootless or fullscreen) or other display servers.")           (add-before 'check 'start-xorg-server             (lambda* (#:key inputs #:allow-other-keys)               ;; The test suite requires a running X server. -             (system (string-append (assoc-ref inputs "xorg-server") -                                    "/bin/Xvfb :1 &")) +             (system "Xvfb :1 &")               (setenv "DISPLAY" ":1")               #t)))))      (home-page "https://wayland.freedesktop.org") | 
