From mboxrd@z Thu Jan 1 00:00:00 1970 Received: from eggs.gnu.org ([2001:4830:134:3::10]:33249) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1gY46M-0004k8-47 for guix-patches@gnu.org; Sat, 15 Dec 2018 02:11:07 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1gY46I-0001ZD-Vp for guix-patches@gnu.org; Sat, 15 Dec 2018 02:11:06 -0500 Received: from debbugs.gnu.org ([208.118.235.43]:44653) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1gY46I-0001Z3-RU for guix-patches@gnu.org; Sat, 15 Dec 2018 02:11:02 -0500 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1gY46I-0001x7-M7 for guix-patches@gnu.org; Sat, 15 Dec 2018 02:11:02 -0500 Subject: [bug#33756] [PATCH] gnu: Add sct. Resent-Message-ID: Received: from eggs.gnu.org ([2001:4830:134:3::10]:33159) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1gY45o-0004fy-JE for guix-patches@gnu.org; Sat, 15 Dec 2018 02:10:33 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1gY45l-0000kX-ED for guix-patches@gnu.org; Sat, 15 Dec 2018 02:10:32 -0500 Received: from mail-lj1-f194.google.com ([209.85.208.194]:35772) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1gY45l-0000jZ-5x for guix-patches@gnu.org; Sat, 15 Dec 2018 02:10:29 -0500 Received: by mail-lj1-f194.google.com with SMTP id x85-v6so6801000ljb.2 for ; Fri, 14 Dec 2018 23:10:29 -0800 (PST) From: Nam Nguyen Date: Fri, 14 Dec 2018 23:09:59 -0800 Message-Id: <20181215070959.2260-1-namn@berkeley.edu> MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-patches-bounces+kyle=kyleam.com@gnu.org Sender: "Guix-patches" To: 33756@debbugs.gnu.org Cc: Nam Nguyen * gnu/packages/xdisorg.scm (sct): New variable. --- gnu/packages/xdisorg.scm | 44 ++++++++++++++++++++++++++++++++++++++++ 1 file changed, 44 insertions(+) diff --git a/gnu/packages/xdisorg.scm b/gnu/packages/xdisorg.scm index 82ed065a3..5d6257ab8 100644 --- a/gnu/packages/xdisorg.scm +++ b/gnu/packages/xdisorg.scm @@ -24,6 +24,7 @@ ;;; Copyright © 2018 Thomas Sigurdsen ;;; Copyright © 2018 Rutger Helling ;;; Copyright © 2018 Pierre Neidhardt +;;; Copyright © 2018 Nam Nguyen ;;; ;;; This file is part of GNU Guix. ;;; @@ -1555,3 +1556,46 @@ to automatically turn it on on login.") (description "This package provides a small utility for inverting the colors on all monitors attached to an XRandR-capable X11 display server.") (license license:gpl3+))) + +(define-public sct + (package + (name "sct") + (version "0.4") + (source + (origin + (method url-fetch) + (uri + (string-append "https://www.umaxx.net/dl/sct-" + version ".tar.gz")) + (sha256 + (base32 + "0r57z9ki8pvxhawfxys0v5h85z2x211sqxki0xvk1bga88ryldlv")))) + (build-system gnu-build-system) + (arguments + '(#:phases + (modify-phases %standard-phases + (add-after 'unpack 'replace-cc-with-gcc + ;; Use gcc in Makefile. + (lambda _ + (substitute* "Makefile" + (("CC\\?\\=gcc") + "CC=gcc")))) + (delete 'configure) + (delete 'check) + (replace 'install + (lambda* (#:key outputs #:allow-other-keys) + (let ((out (assoc-ref outputs "out"))) + (install-file "sct" (string-append out "/bin")) + (install-file "sctd.sh" (string-append out "/bin")) + (mkdir (string-append out "/man")) + (mkdir (string-append out "/man/man1")) + (install-file "sct.1" (string-append out "/man/man1")) + (install-file "sctd.1" (string-append out "/man/man1")) + #t)))))) + (inputs + `(("libxrandr" ,libxrandr))) + (home-page "https://www.umaxx.net/") + (synopsis "Set the color temperature of the screen") + (description "@code{sct} is a lightweight utility to set the color +temperature of the screen.") + (license license:bsd-3))) -- 2.20.0