[PATCH] gnu: Add xcompmgr

[PATCH] gnu: Add xcompmgr

[Cyrill Schenkel]

[-- Attachment #1: 0001-gnu-Add-xcompmgr.patch --]
[-- Type: text/x-patch, Size: 2619 bytes --]

From dc8d0477c0644e9d54ebba6af955c3d4e29270fc Mon Sep 17 00:00:00 2001
From: Cyrill Schenkel <cyrill.schenkel@gmail.com>
Date: Fri, 23 Oct 2015 13:25:11 +0200
Subject: [PATCH] gnu: Add xcompmgr

* gnu/packages/xorg.scm (xcompmgr): New variable.
---
 gnu/packages/xorg.scm | 41 +++++++++++++++++++++++++++++++++++++++++
 1 file changed, 41 insertions(+)

diff --git a/gnu/packages/xorg.scm b/gnu/packages/xorg.scm
index b39bbd4..d51cd30 100644
--- a/gnu/packages/xorg.scm
+++ b/gnu/packages/xorg.scm
@@ -4,6 +4,7 @@
 ;;; Copyright © 2014, 2015 Eric Bavier <bavier@member.fsf.org>
 ;;; Copyright © 2015 Ludovic Courtès <ludo@gnu.org>
 ;;; Copyright © 2015 Eric Dvorsak <eric@dvorsak.fr>
+;;; Copyright © 2015 Cyrill Schenkel <cyrill.schenkel@gmail.com>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -5439,3 +5440,43 @@ perl programs to display windows and graphics on X11 servers.")
     ;; of the extension modules in the directory Protocol/Ext: see those files
     ;; for details)."
     (license (package-license perl))))
+
+(define-public xcompmgr
+  (package
+    (name "xcompmgr")
+    (version "1.1.7")
+    (source
+     (origin
+       ;; there's no current tarball
+       (method git-fetch)
+       (uri (git-reference
+             (url "http://anongit.freedesktop.org/git/xorg/app/xcompmgr.git")
+             (commit (string-append name "-" version))))
+       (sha256
+        (base32
+         "04swkrm3gk689wrjc418bd3n25w8r20kg1xfbn5j8d7mx1r5gf16"))
+       (file-name (string-append name "-" version))))
+    (build-system gnu-build-system)
+    (arguments
+     `(#:phases (modify-phases %standard-phases
+                  (add-before 'configure 'autogen
+                              (lambda _
+                                (setenv "NOCONFIGURE" "t")
+                                (zero? (system* "./autogen.sh")))))))
+    (native-inputs
+     `(("pkg-config" ,pkg-config)
+       ("autoconf" ,autoconf)
+       ("automake" ,automake)))
+    (inputs
+     `(("libX11" ,libx11)
+       ("libXext" ,libxext)
+       ("libXcomposite" ,libxcomposite)
+       ("libXfixes" ,libxfixes)
+       ("libXdamage" ,libxdamage)
+       ("libXrender" ,libxrender)))
+    (synopsis "X Compositing manager using RENDER")
+    (description "xcompmgr is a sample compositing manager for X servers
+supporting the XFIXES, DAMAGE, RENDER, and COMPOSITE extensions.  It enables
+basic eye-candy effects.")
+    (home-page "http://cgit.freedesktop.org/xorg/app/xcompmgr/")
+    (license (license:x11-style "file://COPYING"))))
-- 
2.5.0

Re: [PATCH] gnu: Add xcompmgr

[Paul van der Walt]

Hello Cyrill,

Small comment.

> From dc8d0477c0644e9d54ebba6af955c3d4e29270fc Mon Sep 17 00:00:00 2001
> From: Cyrill Schenkel <cyrill.schenkel@gmail.com>
> Date: Fri, 23 Oct 2015 13:25:11 +0200
> Subject: [PATCH] gnu: Add xcompmgr
> 
> * gnu/packages/xorg.scm (xcompmgr): New variable.
> ---
>  gnu/packages/xorg.scm | 41 +++++++++++++++++++++++++++++++++++++++++
>  1 file changed, 41 insertions(+)
> 
> diff --git a/gnu/packages/xorg.scm b/gnu/packages/xorg.scm
> index b39bbd4..d51cd30 100644
> --- a/gnu/packages/xorg.scm
> +++ b/gnu/packages/xorg.scm
> @@ -4,6 +4,7 @@
> [...]
> +    (arguments
> +     `(#:phases (modify-phases %standard-phases
> +                  (add-before 'configure 'autogen
> +                              (lambda _
> +                                (setenv "NOCONFIGURE" "t")
> +                                (zero? (system* "./autogen.sh")))))))
> +    (native-inputs
> [...]

Mark Weaver recently told me that autogen phases should be after 'unpack
instead of before 'configure, since the MIPS platform (and perhaps
others) sometimes need to adjust the output of autogen.sh.

I'll leave the real review to others :).

Kind regards,
p.

Re: [PATCH] gnu: Add xcompmgr

[Paul van der Walt]

...and another thing while i'm at it, although i'm less sure about this
one...

On 2015-10-23 at 11:46, quoth Paul van der Walt:
>> +                                (setenv "NOCONFIGURE" "t")

Does that do what i think it does?  If so, why not just use something
like the following?

  (modify-phases %standard-phases
    (delete 'configure)
    ...)

Ciao,
p.

Re: [PATCH] gnu: Add xcompmgr

[Cyrill Schenkel]

[-- Attachment #1: Type: text/plain, Size: 1954 bytes --]

Hello Paul

Paul van der Walt <paul@denknerd.org> writes:

> > From dc8d0477c0644e9d54ebba6af955c3d4e29270fc Mon Sep 17 00:00:00 2001
> > From: Cyrill Schenkel <cyrill.schenkel@gmail.com>
> > Date: Fri, 23 Oct 2015 13:25:11 +0200
> > Subject: [PATCH] gnu: Add xcompmgr
> > 
> > * gnu/packages/xorg.scm (xcompmgr): New variable.
> > ---
> >  gnu/packages/xorg.scm | 41 +++++++++++++++++++++++++++++++++++++++++
> >  1 file changed, 41 insertions(+)
> > 
> > diff --git a/gnu/packages/xorg.scm b/gnu/packages/xorg.scm
> > index b39bbd4..d51cd30 100644
> > --- a/gnu/packages/xorg.scm
> > +++ b/gnu/packages/xorg.scm
> > @@ -4,6 +4,7 @@
> > [...]
> > +    (arguments
> > +     `(#:phases (modify-phases %standard-phases
> > +                  (add-before 'configure 'autogen
> > +                              (lambda _
> > +                                (setenv "NOCONFIGURE" "t")
> > +                                (zero? (system* "./autogen.sh")))))))
> > +    (native-inputs
> > [...]
>
> Mark Weaver recently told me that autogen phases should be after 'unpack
> instead of before 'configure, since the MIPS platform (and perhaps
> others) sometimes need to adjust the output of autogen.sh.

Yes, you're right. I changed it accordingly.

> ...and another thing while i'm at it, although i'm less sure about this
> one...
>
> On 2015-10-23 at 11:46, quoth Paul van der Walt:
>>> +                                (setenv "NOCONFIGURE" "t")
>
> Does that do what i think it does?  If so, why not just use something
> like the following?
>
>   (modify-phases %standard-phases
>     (delete 'configure)
>     ...)

It does what you think it does. If I did omit it, I'd need to patch the
`autogen.sh` file so that it passes the neccessary parameters to the
configure script and I'd also need to set the neccessary environment
variables. It seems to me that setting the `NOCONFIGURE` environment
variable is by far the simpler solution.

Regards,
Cyrill


[-- Attachment #2: 0001-gnu-Add-xcompmgr.patch --]
[-- Type: text/x-patch, Size: 2620 bytes --]

From 55122d4c14231f3646db902bc2b88469fc96666e Mon Sep 17 00:00:00 2001
From: Cyrill Schenkel <cyrill.schenkel@gmail.com>
Date: Fri, 23 Oct 2015 16:38:16 +0200
Subject: [PATCH] gnu: Add xcompmgr

* gnu/packages/xorg.scm (xcompmgr): New variable.
---
 gnu/packages/xorg.scm | 41 +++++++++++++++++++++++++++++++++++++++++
 1 file changed, 41 insertions(+)

diff --git a/gnu/packages/xorg.scm b/gnu/packages/xorg.scm
index b39bbd4..e237754 100644
--- a/gnu/packages/xorg.scm
+++ b/gnu/packages/xorg.scm
@@ -4,6 +4,7 @@
 ;;; Copyright © 2014, 2015 Eric Bavier <bavier@member.fsf.org>
 ;;; Copyright © 2015 Ludovic Courtès <ludo@gnu.org>
 ;;; Copyright © 2015 Eric Dvorsak <eric@dvorsak.fr>
+;;; Copyright © 2015 Cyrill Schenkel <cyrill.schenkel@gmail.com>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -5439,3 +5440,43 @@ perl programs to display windows and graphics on X11 servers.")
     ;; of the extension modules in the directory Protocol/Ext: see those files
     ;; for details)."
     (license (package-license perl))))
+
+(define-public xcompmgr
+  (package
+    (name "xcompmgr")
+    (version "1.1.7")
+    (source
+     (origin
+       ;; there's no current tarball
+       (method git-fetch)
+       (uri (git-reference
+             (url "http://anongit.freedesktop.org/git/xorg/app/xcompmgr.git")
+             (commit (string-append name "-" version))))
+       (sha256
+        (base32
+         "04swkrm3gk689wrjc418bd3n25w8r20kg1xfbn5j8d7mx1r5gf16"))
+       (file-name (string-append name "-" version))))
+    (build-system gnu-build-system)
+    (arguments
+     `(#:phases (modify-phases %standard-phases
+                  (add-after 'unpack 'autogen
+                              (lambda _
+                                (setenv "NOCONFIGURE" "t")
+                                (zero? (system* "sh" "autogen.sh")))))))
+    (native-inputs
+     `(("pkg-config" ,pkg-config)
+       ("autoconf" ,autoconf)
+       ("automake" ,automake)))
+    (inputs
+     `(("libX11" ,libx11)
+       ("libXext" ,libxext)
+       ("libXcomposite" ,libxcomposite)
+       ("libXfixes" ,libxfixes)
+       ("libXdamage" ,libxdamage)
+       ("libXrender" ,libxrender)))
+    (synopsis "X Compositing manager using RENDER")
+    (description "xcompmgr is a sample compositing manager for X servers
+supporting the XFIXES, DAMAGE, RENDER, and COMPOSITE extensions.  It enables
+basic eye-candy effects.")
+    (home-page "http://cgit.freedesktop.org/xorg/app/xcompmgr/")
+    (license (license:x11-style "file://COPYING"))))
-- 
2.5.0

Re: [PATCH] gnu: Add xcompmgr

[Paul van der Walt]

Hey Cyrill,

On 2015-10-23 at 16:45, quoth Cyrill Schenkel:
>> On 2015-10-23 at 11:46, quoth Paul van der Walt:
>>>> +                                (setenv "NOCONFIGURE" "t")
>>
>> Does that do what i think it does?  If so, why not just use something
>> like the following?
>>
>>   (modify-phases %standard-phases
>>     (delete 'configure)
>>     ...)
>
> It does what you think it does. If I did omit it, I'd need to patch the
> `autogen.sh` file so that it passes the neccessary parameters to the
> configure script and I'd also need to set the neccessary environment
> variables. It seems to me that setting the `NOCONFIGURE` environment
> variable is by far the simpler solution.

Ah, in fact, i misunderstood and thought it did something else :).  I
blame my ambiguous communication.  I thought it would simply make the
configure script not run, at all.  Of course, that makes no sense.  The
parameter seems to stop *autogen.sh* from running `configure`, which is
reasonable, since gnu-build-system will do so with the right parameters.

Your version seems right indeed, i was simply confused; sorry about
that!

Cheers,
p.

Re: [PATCH] gnu: Add xcompmgr

[Ludovic Courtès]

Cyrill Schenkel <cyrill.schenkel@gmail.com> skribis:

> From 55122d4c14231f3646db902bc2b88469fc96666e Mon Sep 17 00:00:00 2001
> From: Cyrill Schenkel <cyrill.schenkel@gmail.com>
> Date: Fri, 23 Oct 2015 16:38:16 +0200
> Subject: [PATCH] gnu: Add xcompmgr
>
> * gnu/packages/xorg.scm (xcompmgr): New variable.

[...]

> +    (license (license:x11-style "file://COPYING"))))

I changed that to
http://cgit.freedesktop.org/xorg/app/xcompmgr/tree/COPYING, which is
more convenient, and applied it.

Thank you!

Ludo’.

Re: [PATCH] gnu: Add xcompmgr

[Andreas Enge]

On Mon, Oct 26, 2015 at 11:30:40PM +0100, Ludovic Courtès wrote:
> http://cgit.freedesktop.org/xorg/app/xcompmgr/tree/COPYING, which is

As it is not part of xorg proper, I think it should go to xdisorg.scm.
Are you okay with me moving it there?

Andreas

Re: [PATCH] gnu: Add xcompmgr

[Ludovic Courtès]

Andreas Enge <andreas@enge.fr> skribis:

> On Mon, Oct 26, 2015 at 11:30:40PM +0100, Ludovic Courtès wrote:
>> http://cgit.freedesktop.org/xorg/app/xcompmgr/tree/COPYING, which is
>
> As it is not part of xorg proper, I think it should go to xdisorg.scm.
> Are you okay with me moving it there?

Fine with me (I wondered about it and noticed a couple of “misplaced”
packages at the bottom of xorg.scm and thought xcompmgr was closer to
Xorg than these).  Make sure to remove #:use-module clauses that the
patch added.

Thanks,
Ludo’.