;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2014 Julien Lepiller ;;; Copyright © 2016 Efraim Flashner ;;; Copyright © 2017 Nils Gillmann ;;; ;;; 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 . (define-module (gnu packages openbox) #:use-module ((guix licenses) #:select (gpl2+)) #:use-module (guix packages) #:use-module (guix download) #:use-module (guix build-system gnu) #:use-module (gnu packages freedesktop) #:use-module (gnu packages gettext) #:use-module (gnu packages gnome) #:use-module (gnu packages gtk) #:use-module (gnu packages image) #:use-module (gnu packages pkg-config) #:use-module (gnu packages python) #:use-module (gnu packages xdisorg) #:use-module (gnu packages xml) #:use-module (gnu packages xorg)) (define-public openbox (package (name "openbox") (version "3.6.1") (source (origin (method url-fetch) (uri (string-append "http://openbox.org/dist/openbox/" name "-" version ".tar.xz")) (sha256 (base32 "0vg2y1qddsdxkjv806mzpvmkgzliab8ll4s7zm7ma5jnriamirxb")))) (build-system gnu-build-system) (native-inputs `(("pkg-config" ,pkg-config))) (propagated-inputs `(("python2-pyxdg" ,python2-pyxdg))) (inputs `(("imlib2" ,imlib2) ("libxml2" ,libxml2) ("librsvg" ,librsvg) ("libsm" ,libsm) ("libxcursor" ,libxcursor) ("libxinerama" ,libxinerama) ("libxml2" ,libxml2) ("libxrandr" ,libxrandr) ("libxft" ,libxft) ("pango" ,pango) ("python-2" ,python-2))) (synopsis "Box style window manager") (description "Openbox is a highly configurable, next generation window manager with extensive standards support. The *box visual style is well known for its minimalistic appearance. Openbox uses the *box visual style, while providing a greater number of options for theme developers than previous *box implementations.") (home-page "http://openbox.org/wiki/Main_Page") (license gpl2+))) (define-public obconf (package (name "obconf") (version "2.0.4") (source (origin (method url-fetch) (uri (string-append "http://openbox.org/dist/" name "/" name "-" version ".tar.gz")) (sha256 (base32 "1fanjdmd8727kk74x5404vi8v7s4kpq48l583d12fsi4xvsfb8vi")))) (inputs `(("gtk+-2" ,gtk+-2) ("imlib2" ,imlib2) ("libglade" ,libglade) ("openbox" ,openbox) ("startup-notification" ,startup-notification) ("libsm" ,libsm) ("librsvg" ,librsvg) ("libxft" ,libxft))) (native-inputs `(("gettext" ,gettext-minimal) ("pkg-config" ,pkg-config))) (build-system gnu-build-system) (arguments `(#:configure-flags (list "--enable-nls"))) (home-page "http://openbox.org/wiki/ObConf:About") (synopsis "Openbox configuration tool") (description "Obconf is a tool for configuring the Openbox window manager. You can configure its appearance, themes, and much more.") (license gpl2+))) ;;; openbox.scm ends here ootstrap-inputs+toolchain): : New procedure replacing %bootstrap-inputs to prepare for Mes bootstrap. Update users. * tests/union.scm (%bootstrap-inputs): New variable: set to %bootstrap-inputs+toolchain. Jan Nieuwenhuizen 2018-09-22bootstrap: %bootstrap-inputs: Wrap input lists into thunks....* gnu/packages/bootstrap.scm (%bootstrap-inputs): Change to procedure. Update users; prepares for Mes bootstrap. * gnu/packages/commencement.scm (%boot0-inputs, %boot1-inputs, %boot2-inputs, %boot3-inputs, %boot4-inputs, %boot5-inputs, %boot-6-inputs): Change to procedure. Update users. * tests/builders.scm (%bootstrap-inputs, %bootstrap-search-paths): Make a procedure, filter on package?. Update users. Jan Nieuwenhuizen 2018-05-10union: Add 'relative-file-name'....* guix/build/union.scm (%not-slash): New variable. (relative-file-name): New procedure. * tests/union.scm (test-relative-file-name): New macro and tests. Ludovic Courtès 2018-04-08union: Allow callers to choose the collision resolution policy....* guix/build/union.scm (warn-about-collision): New procedure. (union-build): Add #:resolve-collision. [resolve-collisions]: Call it. * tests/union.scm ("union-build collision first & last"): New test. Ludovic Courtès 2017-03-26union: Add create-all-directories? parameter to 'union-build'....* guix/build/union.scm (union-build): Add create-all-directories? keyword parameter. * tests/union.scm ("union-build #:create-all-directories? #t"): New test. Co-authored-by: Ludovic Courtès <ludo@gnu.org> Huang Ying