[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
05/05: gnu: Add light.
From: |
Ludovic Courtès |
Subject: |
05/05: gnu: Add light. |
Date: |
Mon, 30 Jan 2017 09:52:57 +0000 (UTC) |
civodul pushed a commit to branch master
in repository guix.
commit 01be4f939e09fb39de18d477bb48e87004de7439
Author: José Miguel Sánchez GarcÃa <address@hidden>
Date: Sat Jan 28 13:07:57 2017 +0100
gnu: Add light.
* gnu/packages/linux.scm (light): New variable.
Co-authored-by: Ludovic Courtès <address@hidden>
---
gnu/packages/linux.scm | 44 ++++++++++++++++++++++++++++++++++++++++++++
1 file changed, 44 insertions(+)
diff --git a/gnu/packages/linux.scm b/gnu/packages/linux.scm
index 2ee6bf0..395801e 100644
--- a/gnu/packages/linux.scm
+++ b/gnu/packages/linux.scm
@@ -19,6 +19,7 @@
;;; Copyright © 2016 Rene Saavedra <address@hidden>
;;; Copyright © 2016 ng0 <address@hidden>
;;; Copyright © 2017 Leo Famulari <address@hidden>
+;;; Copyright © 2017 José Miguel Sánchez GarcÃa <address@hidden>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -61,6 +62,7 @@
#:use-module (gnu packages gperf)
#:use-module (gnu packages gtk)
#:use-module (gnu packages libusb)
+ #:use-module (gnu packages man)
#:use-module (gnu packages maths)
#:use-module (gnu packages ncurses)
#:use-module (gnu packages perl)
@@ -3362,3 +3364,45 @@ monitoring tools for Linux. These include
@code{mpstat}, @code{iostat},
@code{tapestat}, @code{cifsiostat}, @code{pidstat}, @code{sar}, @code{sadc},
@code{sadf} and @code{sa}.")
(license license:gpl2+)))
+
+(define-public light
+ (package
+ (name "light")
+ (version "1.0")
+ (source (origin
+ (method url-fetch)
+ (uri (string-append "https://github.com/haikarainen/" name
+ "/archive/v" version ".tar.gz"))
+ (sha256
+ (base32
+ "0r5gn6c0jcxknzybl6059dplxv46dpahchqq4gymrs7z8bp0hilp"))
+ (file-name (string-append name "-" version ".tar.gz"))))
+ (build-system gnu-build-system)
+ (arguments
+ '(#:tests? #f ; no tests
+ #:make-flags (list "CC=gcc"
+ (string-append "PREFIX=" %output))
+ #:phases
+ (modify-phases %standard-phases
+ (delete 'configure)
+ (add-after 'unpack 'patch-makefile
+ (lambda _
+ (substitute* "Makefile" (("chown") "#")))))))
+ (native-inputs
+ `(("help2man" ,help2man)))
+ (home-page "https://haikarainen.github.io/light")
+ (synopsis "GNU/Linux application to control backlights")
+ (description
+ "Light is a program to send commands to screen backlight controllers
+under GNU/Linux. Features include:
+
address@hidden
address@hidden It does not rely on X.
address@hidden Light can automatically figure out the best controller to use,
making
+full use of underlying hardware.
address@hidden It is possible to set a minimum brightness value, as some
controllers
+set the screen to be pitch black at a vaĺue of 0 (or higher).
address@hidden itemize
+
+Light is the successor of lightscript.")
+ (license license:gpl3+)))