From mboxrd@z Thu Jan 1 00:00:00 1970 From: ng0 Subject: Re: [PATCH] (3 patches): move dwm+dmenu to wm, move slock to xdisorg. Date: Sun, 07 Aug 2016 13:22:36 +0000 Message-ID: <87shug90ir.fsf@we.make.ritual.n0.is> References: <87vazc90o9.fsf@we.make.ritual.n0.is> Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: 8bit Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:43608) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bWO2L-0000Jn-An for guix-devel@gnu.org; Sun, 07 Aug 2016 09:22:43 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1bWO2I-00054h-63 for guix-devel@gnu.org; Sun, 07 Aug 2016 09:22:40 -0400 Received: from mithlond.libertad.in-berlin.de ([2001:67c:1400:2490::1]:42254 helo=beleriand.n0.is) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bWO2H-00053g-Qb for guix-devel@gnu.org; Sun, 07 Aug 2016 09:22:38 -0400 Received: by beleriand.n0.is (OpenSMTPD) with ESMTPSA id 07192c03 TLS version=TLSv1/SSLv3 cipher=ECDHE-RSA-AES256-GCM-SHA384 bits=256 verify=NO for ; Sun, 7 Aug 2016 13:22:36 +0000 (UTC) In-Reply-To: <87vazc90o9.fsf@we.make.ritual.n0.is> List-Id: "Development of GNU Guix and the GNU System distribution." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org Sender: "Guix-devel" To: guix-devel@gnu.org Iforgot to mention: A requirement is the patch which changes the dwm description, sent before this series. Logically moving and changing description are not one and the same thing, so I separated them. ng0 writes: > With these 3 moved to more logical places, only surf remains. We keep > web browsers in sepearate places so far, that's nothing I want to work > on today. > A grep for "gnu packages suckless" only showed the > gnu/services/desktop.scm calling it, which seems to be slock, I changed > that in patch which moves slock to xdisorg. > Anyone got ideas for what to do with package surf? > > From 0260bba10303e9c24302b5d3fd4ba1e0d1e2303f Mon Sep 17 00:00:00 2001 > From: ng0 > Date: Sun, 7 Aug 2016 12:52:18 +0000 > Subject: [PATCH 1/3] gnu: dwm: Move to wm.scm. > > * gnu/packages/suckless.scm (dwm): Move from here ... > * gnu/packages/wm.scm (dwm): ... to here. > --- > gnu/packages/suckless.scm | 38 -------------------------------------- > gnu/packages/wm.scm | 39 +++++++++++++++++++++++++++++++++++++++ > 2 files changed, 39 insertions(+), 38 deletions(-) > > diff --git a/gnu/packages/suckless.scm b/gnu/packages/suckless.scm > index 16e9146..9ec6dcf 100644 > --- a/gnu/packages/suckless.scm > +++ b/gnu/packages/suckless.scm > @@ -31,44 +31,6 @@ > #:use-module (gnu packages pkg-config) > #:use-module (gnu packages webkit)) > > -(define-public dwm > - (package > - (name "dwm") > - (version "6.0") > - (source (origin > - (method url-fetch) > - (uri (string-append "http://dl.suckless.org/dwm/dwm-" > - version ".tar.gz")) > - (sha256 > - (base32 "0mpbivy9j80l1jqq4bd4g4z8s5c54fxrjj44avmfwncjwqylifdj")))) > - (build-system gnu-build-system) > - (arguments > - `(#:tests? #f > - #:phases > - (alist-replace > - 'configure > - (lambda _ > - (substitute* "Makefile" (("\\$\\{CC\\}") "gcc")) > - #t) > - (alist-replace > - 'install > - (lambda* (#:key outputs #:allow-other-keys) > - (let ((out (assoc-ref outputs "out"))) > - (zero? > - (system* "make" "install" > - (string-append "DESTDIR=" out) "PREFIX=")))) > - %standard-phases)))) > - (inputs > - `(("libx11" ,libx11) > - ("libxinerama" ,libxinerama))) > - (home-page "http://dwm.suckless.org/") > - (synopsis "Dynamic window manager") > - (description > - "dwm is a dynamic window manager for X. It manages windows in tiled, > -monocle and floating layouts. All of the layouts can be applied dynamically, > -optimising the environment for the application in use and the task performed.") > - (license license:x11))) > - > (define-public dmenu > (package > (name "dmenu") > diff --git a/gnu/packages/wm.scm b/gnu/packages/wm.scm > index 2cc9f44..8df4a8e 100644 > --- a/gnu/packages/wm.scm > +++ b/gnu/packages/wm.scm > @@ -9,6 +9,7 @@ > ;;; Copyright © 2016 Al McElrath > ;;; Copyright © 2016 Carlo Zancanaro > ;;; Copyright © 2016 Ludovic Courtès > +;;; Coypright © 2016 ng0 > ;;; > ;;; This file is part of GNU Guix. > ;;; > @@ -465,3 +466,41 @@ Windows are grouped by tags in awesome. Each window can be tagged with one or > more tags. Selecting certain tags displays all windows with these tags.") > (license license:gpl2+) > (home-page "https://awesome.naquadah.org/"))) > + > +(define-public dwm > + (package > + (name "dwm") > + (version "6.0") > + (source (origin > + (method url-fetch) > + (uri (string-append "http://dl.suckless.org/dwm/dwm-" > + version ".tar.gz")) > + (sha256 > + (base32 "0mpbivy9j80l1jqq4bd4g4z8s5c54fxrjj44avmfwncjwqylifdj")))) > + (build-system gnu-build-system) > + (arguments > + `(#:tests? #f > + #:phases > + (alist-replace > + 'configure > + (lambda _ > + (substitute* "Makefile" (("\\$\\{CC\\}") "gcc")) > + #t) > + (alist-replace > + 'install > + (lambda* (#:key outputs #:allow-other-keys) > + (let ((out (assoc-ref outputs "out"))) > + (zero? > + (system* "make" "install" > + (string-append "DESTDIR=" out) "PREFIX=")))) > + %standard-phases)))) > + (inputs > + `(("libx11" ,libx11) > + ("libxinerama" ,libxinerama))) > + (home-page "http://dwm.suckless.org/") > + (synopsis "Dynamic window manager") > + (description > + "dwm is a dynamic window manager for X. It manages windows in tiled, > +monocle and floating layouts. All of the layouts can be applied dynamically, > +optimising the environment for the application in use and the task performed.") > + (license license:x11))) > -- > 2.9.2 > > From 65f9936b6a0a943259472c352f0c88fefad1a3bc Mon Sep 17 00:00:00 2001 > From: ng0 > Date: Sun, 7 Aug 2016 12:58:40 +0000 > Subject: [PATCH 2/3] gnu: dmenu: Move to wm.scm. > > * gnu/packages/suckless.scm (dmenu): Move from here ... > * gnu/packages/wm.scm (dmenu): ... to here. > --- > gnu/packages/suckless.scm | 28 ---------------------------- > gnu/packages/wm.scm | 28 ++++++++++++++++++++++++++++ > 2 files changed, 28 insertions(+), 28 deletions(-) > > diff --git a/gnu/packages/suckless.scm b/gnu/packages/suckless.scm > index 9ec6dcf..1bb577c 100644 > --- a/gnu/packages/suckless.scm > +++ b/gnu/packages/suckless.scm > @@ -31,34 +31,6 @@ > #:use-module (gnu packages pkg-config) > #:use-module (gnu packages webkit)) > > -(define-public dmenu > - (package > - (name "dmenu") > - (version "4.5") > - (source (origin > - (method url-fetch) > - (uri (string-append "http://dl.suckless.org/tools/dmenu-" > - version ".tar.gz")) > - (sha256 > - (base32 > - "0l58jpxrr80fmyw5pgw5alm5qry49aw6y049745wl991v2cdcb08")))) > - (build-system gnu-build-system) > - (arguments > - '(#:tests? #f ; no tests > - #:make-flags (list "CC=gcc" > - (string-append "PREFIX=" %output)) > - #:phases > - (alist-delete 'configure %standard-phases))) > - (inputs > - `(("libx11" ,libx11) > - ("libxinerama" ,libxinerama))) > - (home-page "http://tools.suckless.org/dmenu/") > - (synopsis "Dynamic menu") > - (description > - "A dynamic menu for X, originally designed for dwm. It manages large > -numbers of user-defined menu items efficiently.") > - (license license:x11))) > - > (define-public slock > (package > (name "slock") > diff --git a/gnu/packages/wm.scm b/gnu/packages/wm.scm > index 8df4a8e..b03133f 100644 > --- a/gnu/packages/wm.scm > +++ b/gnu/packages/wm.scm > @@ -504,3 +504,31 @@ more tags. Selecting certain tags displays all windows with these tags.") > monocle and floating layouts. All of the layouts can be applied dynamically, > optimising the environment for the application in use and the task performed.") > (license license:x11))) > + > +(define-public dmenu > + (package > + (name "dmenu") > + (version "4.5") > + (source (origin > + (method url-fetch) > + (uri (string-append "http://dl.suckless.org/tools/dmenu-" > + version ".tar.gz")) > + (sha256 > + (base32 > + "0l58jpxrr80fmyw5pgw5alm5qry49aw6y049745wl991v2cdcb08")))) > + (build-system gnu-build-system) > + (arguments > + '(#:tests? #f ; no tests > + #:make-flags (list "CC=gcc" > + (string-append "PREFIX=" %output)) > + #:phases > + (alist-delete 'configure %standard-phases))) > + (inputs > + `(("libx11" ,libx11) > + ("libxinerama" ,libxinerama))) > + (home-page "http://tools.suckless.org/dmenu/") > + (synopsis "Dynamic menu") > + (description > + "A dynamic menu for X, originally designed for dwm. It manages large > +numbers of user-defined menu items efficiently.") > + (license license:x11))) > -- > 2.9.2 > > From df66c705b9801b2c583b69acc14327478f61b46d Mon Sep 17 00:00:00 2001 > From: ng0 > Date: Sun, 7 Aug 2016 13:03:52 +0000 > Subject: [PATCH] gnu: slock: Move to xdisorg.scm. > > * gnu/packages/suckless.scm (slock): Move from here ... > * gnu/packages/xdisorg.scm (slock): ... to here. > --- > gnu/packages/suckless.scm | 27 --------------------------- > gnu/packages/xdisorg.scm | 28 ++++++++++++++++++++++++++++ > gnu/services/desktop.scm | 2 +- > 3 files changed, 29 insertions(+), 28 deletions(-) > > diff --git a/gnu/packages/suckless.scm b/gnu/packages/suckless.scm > index 1bb577c..7fe3403 100644 > --- a/gnu/packages/suckless.scm > +++ b/gnu/packages/suckless.scm > @@ -31,33 +31,6 @@ > #:use-module (gnu packages pkg-config) > #:use-module (gnu packages webkit)) > > -(define-public slock > - (package > - (name "slock") > - (version "1.2") > - (source (origin > - (method url-fetch) > - (uri (string-append "http://dl.suckless.org/tools/slock-" > - version ".tar.gz")) > - (sha256 > - (base32 > - "1crkyr4vblhciy6vnbjwwjnlkm9yg2hzq16v6hzxm20ai67na0il")))) > - (build-system gnu-build-system) > - (arguments > - '(#:tests? #f ; no tests > - #:make-flags (list "CC=gcc" > - (string-append "PREFIX=" %output)) > - #:phases (alist-delete 'configure %standard-phases))) > - (inputs > - `(("libx11" ,libx11) > - ("libxext" ,libxext) > - ("libxinerama" ,libxinerama))) > - (home-page "http://tools.suckless.org/slock/") > - (synopsis "Simple X session lock") > - (description > - "Simple X session lock with trivial feedback on password entry.") > - (license license:x11))) > - > (define-public surf > (package > (name "surf") > diff --git a/gnu/packages/xdisorg.scm b/gnu/packages/xdisorg.scm > index 226e5c1..18b8cb8 100644 > --- a/gnu/packages/xdisorg.scm > +++ b/gnu/packages/xdisorg.scm > @@ -14,6 +14,7 @@ > ;;; Copyright © 2016 Efraim Flashner > ;;; Copyright © 2016 Leo Famulari > ;;; Copyright © 2016 Alex Kost > +;;; Coypright © 2016 ng0 > ;;; > ;;; This file is part of GNU Guix. > ;;; > @@ -976,3 +977,30 @@ connectivity of the X server running on a particular @code{DISPLAY}.") > applications you regularily use and also allows you to search for an application > by name.") > (license license:expat))) > + > +(define-public slock > + (package > + (name "slock") > + (version "1.2") > + (source (origin > + (method url-fetch) > + (uri (string-append "http://dl.suckless.org/tools/slock-" > + version ".tar.gz")) > + (sha256 > + (base32 > + "1crkyr4vblhciy6vnbjwwjnlkm9yg2hzq16v6hzxm20ai67na0il")))) > + (build-system gnu-build-system) > + (arguments > + '(#:tests? #f ; no tests > + #:make-flags (list "CC=gcc" > + (string-append "PREFIX=" %output)) > + #:phases (alist-delete 'configure %standard-phases))) > + (inputs > + `(("libx11" ,libx11) > + ("libxext" ,libxext) > + ("libxinerama" ,libxinerama))) > + (home-page "http://tools.suckless.org/slock/") > + (synopsis "Simple X session lock") > + (description > + "Simple X session lock with trivial feedback on password entry.") > + (license license:x11))) > diff --git a/gnu/services/desktop.scm b/gnu/services/desktop.scm > index bf21707..9fdbb47 100644 > --- a/gnu/services/desktop.scm > +++ b/gnu/services/desktop.scm > @@ -3,6 +3,7 @@ > ;;; Copyright © 2015 Andy Wingo > ;;; Copyright © 2015 Mark H Weaver > ;;; Copyright © 2016 Sou Bunnbu > +;;; Coypright © 2016 ng0 > ;;; > ;;; This file is part of GNU Guix. > ;;; > @@ -37,7 +38,6 @@ > #:use-module (gnu packages avahi) > #:use-module (gnu packages polkit) > #:use-module (gnu packages xdisorg) > - #:use-module (gnu packages suckless) > #:use-module (gnu packages linux) > #:use-module (guix records) > #:use-module (guix packages) > -- > 2.9.2 > > > -- > ♥Ⓐ ng0 > Current Keys: https://we.make.ritual.n0.is/ng0.txt > For non-prism friendly talk find me on http://www.psyced.org -- ♥Ⓐ ng0 Current Keys: https://we.make.ritual.n0.is/ng0.txt For non-prism friendly talk find me on http://www.psyced.org