[bug#30344] cwm

[ng0@crash.cx]

[-- Attachment #1: Type: text/plain, Size: 1125 bytes --]

On Mon, 05 Feb 2018, Leo Famulari <leo@famulari.name> wrote:
> On Sun, Feb 04, 2018 at 11:32:09AM +0000, ng0@n0.is wrote:
>> On Sun, 04 Feb 2018, ng0@n0.is wrote:
>> > Trying to reduce the amount of software I keep in my domain.
>> > Here's cwm, the OpenBSD window manager.
>> >
>> > From 6c3d991fd5b99dded91e00b6f98d79c041e4be7d Mon Sep 17 00:00:00 2001
>> > From: ng0 <ng0@n0.is>
>> > Date: Sun, 4 Feb 2018 11:15:19 +0000
>> > Subject: [PATCH] gnu: Add cwm.
>> >
>> > * gnu/packages/wm.scm (cwm): New variable.
>
>> > +    (synopsis "OpenBSD fork of calmwm")
>>                            ^- about this...
>> 
>> > +    (description
>> > +     "Cwm is a OpenBSD fork of the clean and lightweight window manager
>>                           ^- ... and this I am not so sure, as
>>                           the man pages state there has been a
>>                           rewrite since then, so maybe just
>>                           "inspired by"? It could be the same as
>>                           with neomutt.
>
> You could say that it's "derived from" calmwn.
>

Okay, I've written a new variant which is appended.

[-- Attachment #2: 0001-gnu-Add-cwm.patch --]
[-- Type: text/x-patch, Size: 3356 bytes --]

From 13398bb7d37d99c4103815cd3765bf1f687f27db Mon Sep 17 00:00:00 2001
From: ng0 <ng0@n0.is>
Date: Sun, 4 Feb 2018 11:15:19 +0000
Subject: [PATCH] gnu: Add cwm.

* gnu/packages/wm.scm (cwm): New variable.
---
 gnu/packages/wm.scm | 56 ++++++++++++++++++++++++++++++++++++++++++++++++++++-
 1 file changed, 55 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/wm.scm b/gnu/packages/wm.scm
index 0cf6c1a2d..78e9d5b8d 100644
--- a/gnu/packages/wm.scm
+++ b/gnu/packages/wm.scm
@@ -9,7 +9,7 @@
 ;;; Copyright © 2016 Al McElrath <hello@yrns.org>
 ;;; Copyright © 2016 Carlo Zancanaro <carlo@zancanaro.id.au>
 ;;; Copyright © 2016, 2017 Ludovic Courtès <ludo@gnu.org>
-;;; Copyright © 2016, 2017 ng0 <ng0@n0.is>
+;;; Copyright © 2016, 2017, 2018 ng0 <ng0@crash.cx>
 ;;; Copyright © 2016 doncatnip <gnopap@gmail.com>
 ;;; Copyright © 2016 Ivan Vilata i Balaguer <ivan@selidor.net>
 ;;; Copyright © 2017 Mekeor Melire <mekeor.melire@gmail.com>
@@ -46,6 +46,7 @@
   #:use-module (gnu packages haskell-check)
   #:use-module (gnu packages haskell-web)
   #:use-module (gnu packages autotools)
+  #:use-module (gnu packages bison)
   #:use-module (gnu packages gawk)
   #:use-module (gnu packages base)
   #:use-module (gnu packages pkg-config)
@@ -915,3 +916,56 @@ It is inspired by Xmonad and dwm.  Its major features include:
 @end itemize\n")
     (home-page "https://github.com/conformal/spectrwm")
     (license license:isc)))
+
+(define-public cwm
+  (package
+    (name "cwm")
+    (version "6.2")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (string-append "http://chneukirchen.org/releases/cwm-"
+                           version ".tar.gz"))
+       (sha256
+        (base32
+         "1b8k2hjxpb0bzqjh2wj6mn2nf2360zacf8z19sw2rw5lxvmfy89x"))))
+    (build-system gnu-build-system)
+    (arguments
+     `(#:make-flags (list "CC=gcc"
+                          (string-append "PREFIX=" %output))
+       #:tests? #f
+       #:phases
+       (modify-phases %standard-phases
+         (delete 'configure)
+         (add-after 'build 'install-xsession
+           (lambda* (#:key outputs #:allow-other-keys)
+             ;; Add a .desktop file to xsessions.
+             (let* ((output (assoc-ref outputs "out"))
+                    (xsessions (string-append output "/share/xsessions")))
+               (mkdir-p xsessions)
+               (with-output-to-file
+                   (string-append xsessions "/cwm.desktop")
+                 (lambda _
+                   (format #t
+                           "[Desktop Entry]~@
+                     Name=cwm~@
+                     Comment=OpenBSD Calm Window Manager fork~@
+                     Exec=~a/bin/cwm~@
+                     TryExec=~@*~a/bin/cwm~@
+                     Icon=~@
+                     Type=Application~%"
+                           output)))
+               #t))))))
+    (inputs
+     `(("libxft" ,libxft)
+       ("libxrandr" ,libxrandr)
+       ("libxinerama" ,libxinerama)))
+    (native-inputs
+     `(("pkg-config" ,pkg-config)
+       ("bison" ,bison)))
+    (home-page "https://github.com/chneukirchen/cwm")
+    (synopsis "OpenBSD fork of calmwm")
+    (description
+     "Cwm is a stacking window manager for X11.
+It is a OpenBSD project derived from the original Calm Window Manager.")
+    (license license:isc)))
-- 
2.16.1


[-- Attachment #3: Type: text/plain, Size: 95 bytes --]

-- 
ng0 :: https://crash.cx
A88C8ADD129828D7EAC02E52E22F9BBFEE348588 :: https://crash.cx/keys/