From mboxrd@z Thu Jan 1 00:00:00 1970 From: Carlo Zancanaro Subject: [PATCH] gnu: Add awesome. Date: Wed, 15 Jun 2016 22:15:33 +1000 Message-ID: <1465992933-24389-1-git-send-email-carlo@zancanaro.id.au> References: <1465776755-16444-1-git-send-email-carlo@zancanaro.id.au> 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]:35186) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bD9jp-0007ar-C1 for guix-devel@gnu.org; Wed, 15 Jun 2016 08:16:06 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1bD9jl-0002jx-2C for guix-devel@gnu.org; Wed, 15 Jun 2016 08:16:04 -0400 Received: from mail-pf0-x233.google.com ([2607:f8b0:400e:c00::233]:34862) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bD9jk-0002jt-Nx for guix-devel@gnu.org; Wed, 15 Jun 2016 08:16:00 -0400 Received: by mail-pf0-x233.google.com with SMTP id c2so8482688pfa.2 for ; Wed, 15 Jun 2016 05:15:59 -0700 (PDT) Received: from localhost.localdomain (14-200-183-160.static.tpgi.com.au. [14.200.183.160]) by smtp.gmail.com with ESMTPSA id g63sm30915188pfb.7.2016.06.15.05.15.56 for (version=TLS1_2 cipher=ECDHE-RSA-AES128-SHA bits=128/128); Wed, 15 Jun 2016 05:15:57 -0700 (PDT) In-Reply-To: <1465776755-16444-1-git-send-email-carlo@zancanaro.id.au> 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 * gnu/packages/wm.scm (awesome): New variable. --- gnu/packages/wm.scm | 79 +++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 79 insertions(+) diff --git a/gnu/packages/wm.scm b/gnu/packages/wm.scm index 5f32fc4..7ee517c 100644 --- a/gnu/packages/wm.scm +++ b/gnu/packages/wm.scm @@ -7,6 +7,7 @@ ;;; Copyright © 2016 Danny Milosavljevic ;;; Copyright © 2016 Efraim Flashner ;;; Copyright © 2016 Al McElrath +;;; Copyright © 2016 Carlo Zancanaro ;;; ;;; This file is part of GNU Guix. ;;; @@ -28,6 +29,7 @@ #:use-module (guix packages) #:use-module (gnu packages) #:use-module (gnu packages linux) + #:use-module (guix build-system cmake) #:use-module (guix build-system gnu) #:use-module (guix build-system haskell) #:use-module (gnu packages haskell) @@ -49,6 +51,11 @@ #:use-module (gnu packages maths) #:use-module (gnu packages web) #:use-module (gnu packages fontutils) + #:use-module (gnu packages freedesktop) + #:use-module (gnu packages glib) + #:use-module (gnu packages gperf) + #:use-module (gnu packages imagemagick) + #:use-module (gnu packages lua) #:use-module (guix download) #:use-module (guix git-download)) @@ -370,3 +377,75 @@ and easy to handle yet full of features to make an easy and fast desktop experience.") (home-page "http://fluxbox.org/") (license license:expat))) + +(define-public awesome + (package + (name "awesome") + (version "3.4.15") + (source + (origin (method url-fetch) + (uri (string-append "https://awesome.naquadah.org/download/awesome-" + version ".tar.xz")) + (sha256 + (base32 + "1m910lr7wkw2dgzmirfvz7dasfswhhccdf65l21iiciv24c3w1bb")))) + (build-system cmake-build-system) + (native-inputs `(("asciidoc" ,asciidoc) + ("docbook-xsl" ,docbook-xsl) + ("doxygen" ,doxygen) + ("gperf" ,gperf) + ("imagemagick" ,imagemagick) + ("libxml2" ,libxml2) ; for XML_CATALOG_FILES + ("pkg-config" ,pkg-config) + ("xmlto" ,xmlto))) + (inputs `(("cairo" ,cairo) + ("dbus" ,dbus) + ("gdk-pixbuf" ,gdk-pixbuf) + ("glib" ,glib) + ("imlib2" ,imlib2) + ("libev" ,libev) + ("libxcb" ,libxcb) + ("libxcursor" ,libxcursor) + ("libxdg-basedir" ,libxdg-basedir) + ("lua" ,lua-5.1) + ("pango" ,pango) + ("startup-notification" ,startup-notification) + ("xcb-util" ,xcb-util) + ("xcb-util-cursor" ,xcb-util-cursor) + ("xcb-util-image" ,xcb-util-image) + ("xcb-util-keysyms" ,xcb-util-keysyms) + ("xcb-util-renderutil" ,xcb-util-renderutil) + ("xcb-util-wm" ,xcb-util-wm))) + (arguments `(#:phases (modify-phases %standard-phases + (add-before 'build 'xmlto-skip-validation + (lambda _ + ;; we can't download the necessary schema, so + ;; so skip validation and assume they're valid + (substitute* "../build/CMakeFiles/man.dir/build.make" + (("/xmlto") (string-append "/xmlto --skip-validation"))) + #t)) + (replace 'check + (lambda _ + ;; there aren't any tests, so just make sure the + ;; binary gets built and can be run successfully + (zero? (system* "../build/awesome" "-v"))))))) + (synopsis "Highly configurable, next generation framework window manager +for X") + (description + "awesome is a window manager for X. It manages windows in different +layouts, like floating or tiled. Any layout can be applied dynamically, +optimizing the environment for the application in use and the task currently +being performed. + +In a tiled layout, windows are managed in a master and stacking area. The +master area contains the windows which currently need the most attention, +whereas the stacking area contains all other windows. In a floating layout +windows can be resized and moved freely. Dialog windows are always managed as +floating, regardless of the layout currently applied. The spiral and dwindle +layouts are special cases of the tiled layout where the stacking area is +arranged in a spiral for the former or as a rectangular fractal for the later. + +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/"))) -- 2.7.3