[PATCH] gnu: Add compton.

[PATCH] gnu: Add compton.

[José Miguel Sánchez García]

[-- Attachment #1: Type: text/html, Size: 101 bytes --]

[-- Attachment #2: 0001-gnu-Add-compton.patch --]
[-- Type: application/octet-stream, Size: 4949 bytes --]

From c8687c5d8471366c3126880841ece19fff203af1 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Jos=C3=A9=20Miguel=20S=C3=A1nchez=20Garc=C3=ADa?=
 <jmi2k@openmailbox.org>
Date: Fri, 20 Jan 2017 11:59:15 +0100
Subject: [PATCH] gnu: Add compton.

* gnu/packages/compton.scm: New file.
* gnu/local.mk (GNU_SYSTEM_MODULES): Add compton.scm
---
 gnu/local.mk             |   1 +
 gnu/packages/compton.scm | 105 +++++++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 106 insertions(+)
 create mode 100644 gnu/packages/compton.scm

diff --git a/gnu/local.mk b/gnu/local.mk
index 2da8b82db..c2e7d49fb 100644
--- a/gnu/local.mk
+++ b/gnu/local.mk
@@ -78,6 +78,7 @@ GNU_SYSTEM_MODULES =				\
   %D%/packages/code.scm				\
   %D%/packages/commencement.scm			\
   %D%/packages/compression.scm			\
+  %D%/packages/compton.scm 			\
   %D%/packages/conkeror.scm			\
   %D%/packages/conky.scm			\
   %D%/packages/connman.scm			\
diff --git a/gnu/packages/compton.scm b/gnu/packages/compton.scm
new file mode 100644
index 000000000..67b0df93a
--- /dev/null
+++ b/gnu/packages/compton.scm
@@ -0,0 +1,105 @@
+;;; GNU Guix --- Functional package management for GNU
+;;; Copyright © 2017 José Miguel Sánchez García <jmi2k@openmailbox.org>
+;;;
+;;; This file is part of GNU Guix.
+;;;
+;;; GNU Guix is free software; you can redistribute it and/or modify it
+;;; under the terms of the GNU General Public License as published by
+;;; the Free Software Foundation; either version 3 of the License, or (at
+;;; your option) any later version.
+;;;
+;;; GNU Guix is distributed in the hope that it will be useful, but
+;;; WITHOUT ANY WARRANTY; without even the implied warranty of
+;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;;; GNU General Public License for more details.
+;;;
+;;; You should have received a copy of the GNU General Public License
+;;; along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.
+
+(define-module (gnu packages compton)
+  #:use-module ((guix licenses) #:prefix license:)
+  #:use-module (guix packages)
+  #:use-module (guix download)
+  #:use-module (guix build-system gnu)
+  #:use-module (gnu packages docbook)
+  #:use-module (gnu packages documentation)
+  #:use-module (gnu packages gl)
+  #:use-module (gnu packages glib)
+  #:use-module (gnu packages pkg-config)
+  #:use-module (gnu packages python)
+  #:use-module (gnu packages textutils)
+  #:use-module (gnu packages xdisorg)
+  #:use-module (gnu packages xml)
+  #:use-module (gnu packages xorg))
+
+(define-public compton
+  (package
+    (name "compton")
+    (version "0.1_beta2")
+    (source
+     (origin
+      (method url-fetch)
+      (uri (string-append
+             "https://github.com/chjj/" name "/archive/v"
+             version ".tar.gz"))
+      (sha256
+       (base32
+        "02dhlqqcwnmlf2dxg7rd4lapgqahgndzixdkbpxicq9jawmdb73v"))))
+    (build-system gnu-build-system)
+    (inputs
+     `(("dbus" ,dbus)
+       ("docbook-xml" ,docbook-xml)
+       ("libconfig" ,libconfig)
+       ("libx11" ,libx11)
+       ("libxcomposite" ,libxcomposite)
+       ("libxdamage" ,libxdamage)
+       ("libxext" ,libxext)
+       ("libxfixes" ,libxfixes)
+       ("libxinerama" ,libxinerama)
+       ("libxml2" ,libxml2)
+       ("libxrandr" ,libxrandr)
+       ("libxrender" ,libxrender)
+       ("libxslt" ,libxslt)
+       ("mesa" ,mesa)
+       ("xprop" ,xprop)
+       ("xwininfo" ,xwininfo)))
+    (native-inputs
+     `(("asciidoc" ,asciidoc)
+       ("libdrm" ,libdrm)
+       ("pkg-config" ,pkg-config)
+       ("python" ,python)
+       ("xproto" ,xproto)))
+    (arguments
+     `(#:make-flags (list
+         "CC=gcc"
+         "NO_REGEX_PCRE=1" ; pcre makes build fail
+         (string-append "PREFIX=" (assoc-ref %outputs "out")))
+       #:tests? #f ; no tests
+       #:phases
+         (modify-phases %standard-phases
+           (delete 'configure))))
+    (home-page "https://github.com/chjj/compton")
+    (synopsis "Compositor for X11")
+    (description
+     "Compton is a compositor for X, and a for of xcompmgr-dana, which
+implements some changes like:
+
+@enumerate
+@item OpenGL backend (@command{--backend glx}), in addition to the old X Render
+backend.
+@item Inactive window transparency (@command{-i}) / dimming
+(@command{--inactive-dim}).
+@item Menu transparency (@command{-m}, thanks to Dana).
+@item Shadows are now enabled for argb windows, e.g terminals with transparency
+@item Removed serverside shadows (and simple compositing) to clean the code,
+the only option that remains is clientside shadows.
+@item Configuration files (see the man page for more details).
+@item Colored shadows (@command{--shadow-[red/green/blue]}).
+@item A new fade system.
+@item VSync support (not always working).
+@item Blur of background of transparent windows, window color inversion (bad in
+performance).
+@item Some more options...
+@end enumerate
+")
+    (license license:expat)))
-- 
2.11.0

Re: [PATCH] gnu: Add compton.

[Ludovic Courtès]

Hi!

José Miguel Sánchez García <jmi2k@openmailbox.org> skribis:

> From c8687c5d8471366c3126880841ece19fff203af1 Mon Sep 17 00:00:00 2001
> From: =?UTF-8?q?Jos=C3=A9=20Miguel=20S=C3=A1nchez=20Garc=C3=ADa?=
>  <jmi2k@openmailbox.org>
> Date: Fri, 20 Jan 2017 11:59:15 +0100
> Subject: [PATCH] gnu: Add compton.
>
> * gnu/packages/compton.scm: New file.
> * gnu/local.mk (GNU_SYSTEM_MODULES): Add compton.scm

Pushed with minor changes:

  - added ‘file-name’ to ‘origin’ to placate ‘guix lint’;
  - remove “_” from the Guix version string;
  - reindented things as per etc/indent-code.el;
  - used @itemize instead of @enumerate.

http://git.savannah.gnu.org/cgit/guix.git/commit/?id=cacf4e9db0b656759d0cac0badcd90897c7f50db

Thank you!

Ludo’.