GNU bug report logs - #39804
[PATCH] gnu: add emacs-exwm-next package (i.e. exwm for emacs-next)

Please note: This is a static page, with minimal formatting, updated once a day.
Click here to see this page with the latest information and nicer formatting.

Package: guix-patches; Reported by: dakling <dario.klingenberg@HIDDEN>; Keywords: patch; dated Wed, 26 Feb 2020 21:27:02 UTC; Maintainer for guix-patches is guix-patches@HIDDEN.

Message received at 39804 <at> debbugs.gnu.org:


Received: (at 39804) by debbugs.gnu.org; 28 Feb 2020 08:32:41 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Fri Feb 28 03:32:41 2020
Received: from localhost ([127.0.0.1]:60629 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1j7b4a-0006J2-O5
	for submit <at> debbugs.gnu.org; Fri, 28 Feb 2020 03:32:41 -0500
Received: from relay6-d.mail.gandi.net ([217.70.183.198]:33475)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1j7b4X-0006Im-Se
 for 39804 <at> debbugs.gnu.org; Fri, 28 Feb 2020 03:32:38 -0500
X-Originating-IP: 92.169.129.147
Received: from bababa (lfbn-idf2-1-1315-147.w92-169.abo.wanadoo.fr
 [92.169.129.147]) (Authenticated sender: mail@HIDDEN)
 by relay6-d.mail.gandi.net (Postfix) with ESMTPSA id EE2E0C0010;
 Fri, 28 Feb 2020 08:32:28 +0000 (UTC)
From: Pierre Neidhardt <mail@HIDDEN>
To: dario <dario.klingenberg@HIDDEN>
Subject: Re: [bug#39804] [PATCH] gnu: add emacs-exwm-next package (i.e. exwm
 for emacs-next)
In-Reply-To: <87tv3bd6v1.fsf@HIDDEN>
References: <87blplqcdd.fsf@HIDDEN> <8736aw8igd.fsf@HIDDEN>
 <87tv3bd6v1.fsf@HIDDEN>
Date: Fri, 28 Feb 2020 09:32:27 +0100
Message-ID: <878skn5cys.fsf@HIDDEN>
MIME-Version: 1.0
Content-Type: multipart/signed; boundary="=-=-=";
 micalg=pgp-sha256; protocol="application/pgp-signature"
X-Spam-Score: 1.8 (+)
X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org",
 has NOT identified this incoming email as spam.  The original
 message has been attached to this so you can view it or label
 similar future email.  If you have any questions, see
 the administrator of that system for details.
 Content preview:  Hi Dario, dario <dario.klingenberg@HIDDEN> writes: > Thanks
 for your feedback. > >>> --- >>> gnu/packages/emacs-xyz.scm | 71
 ++++++++++++++++++++++++++++++++++++++ >>> 1 file changed,
 71 insertions(+) >>> >>> diff --git a/gnu/packages/emacs-xyz.scm
 b/ [...] 
 Content analysis details:   (1.8 points, 10.0 required)
 pts rule name              description
 ---- ---------------------- --------------------------------------------------
 0.0 URIBL_BLOCKED          ADMINISTRATOR NOTICE: The query to URIBL was
 blocked.  See
 http://wiki.apache.org/spamassassin/DnsBlocklists#dnsbl-block
 for more information. [URIs: gnu.org]
 -0.7 RCVD_IN_DNSWL_LOW      RBL: Sender listed at https://www.dnswl.org/,
 low trust [217.70.183.198 listed in list.dnswl.org]
 -0.0 SPF_PASS               SPF: sender matches SPF record
 0.0 SPF_HELO_NONE          SPF: HELO does not publish an SPF Record
 2.0 PDS_OTHER_BAD_TLD      Untrustworthy TLDs
 [URI: ambrevar.xyz (xyz)]
 0.5 FROM_SUSPICIOUS_NTLD   From abused NTLD
X-Debbugs-Envelope-To: 39804
Cc: 39804 <at> debbugs.gnu.org, Maxim Cournoyer <maxim.cournoyer@HIDDEN>,
 Leo Prikler <leo.prikler@HIDDEN>
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: 1.8 (+)
X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org",
 has NOT identified this incoming email as spam.  The original
 message has been attached to this so you can view it or label
 similar future email.  If you have any questions, see
 the administrator of that system for details.
 
 Content preview:  Hi Dario, dario <dario.klingenberg@HIDDEN> writes: > Thanks
    for your feedback. > >>> --- >>> gnu/packages/emacs-xyz.scm | 71 ++++++++++++++++++++++++++++++++++++++
    >>> 1 file changed, 71 insertions(+) >>> >>> diff --git a/gnu/packages/emacs-xyz.scm
    b/ [...] 
 
 Content analysis details:   (1.8 points, 10.0 required)
 
  pts rule name              description
 ---- ---------------------- --------------------------------------------------
  0.0 URIBL_BLOCKED          ADMINISTRATOR NOTICE: The query to URIBL was
                             blocked.  See
                             http://wiki.apache.org/spamassassin/DnsBlocklists#dnsbl-block
                              for more information.
                             [URIs: ambrevar.xyz]
 -0.7 RCVD_IN_DNSWL_LOW      RBL: Sender listed at https://www.dnswl.org/,
                             low trust
                             [217.70.183.198 listed in list.dnswl.org]
 -0.0 SPF_PASS               SPF: sender matches SPF record
  0.0 SPF_HELO_NONE          SPF: HELO does not publish an SPF Record
  2.0 PDS_OTHER_BAD_TLD      Untrustworthy TLDs
                             [URI: ambrevar.xyz (xyz)]
  1.0 BULK_RE_SUSP_NTLD      Precedence bulk and RE: from a suspicious TLD
 -1.0 MAILING_LIST_MULTI     Multiple indicators imply a widely-seen list
                             manager
  0.5 FROM_SUSPICIOUS_NTLD   From abused NTLD

--=-=-=
Content-Type: text/plain
Content-Transfer-Encoding: quoted-printable

Hi Dario,

dario <dario.klingenberg@HIDDEN> writes:

> Thanks for your feedback.
>
>>> ---
>>>  gnu/packages/emacs-xyz.scm | 71 ++++++++++++++++++++++++++++++++++++++
>>>  1 file changed, 71 insertions(+)
>>>
>>> diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
>>> index 6b9027df8a..c6df469895 100644
>>> --- a/gnu/packages/emacs-xyz.scm
>>> +++ b/gnu/packages/emacs-xyz.scm
>>> @@ -8601,6 +8601,77 @@ It should enable you to implement low-level X11 =
applications.")
>>>  built on top of XELB.")
>>>      (license license:gpl3+)))
>>>
>>> +(define-public emacs-exwm-next
>>
>> I think you don't need to copy the whole package definition.  Instead,
>> you could `inherit' from the original definition and only adjust the
>> name, description, inputs and maybe arguments.
>>
>> For instance
>>
>> --8<---------------cut here---------------start------------->8---
>> (define-public emacs-exwm-next
>>   (package
>>     (inherit emacs)
>>     (name "emacs-exwm-next")
>>     (inputs ...)
>>     (synopsys ...)))
>> --8<---------------cut here---------------end--------------->8---
>>
>> See `substitute-keyword-arguments' in the fftwf package for a convenient
>> way to modify just one argument.
>>
>>> +  (package
>>> +    (name "emacs-exwm-next")
>>> +    (version "0.23")
>>> +    (synopsis "Emacs X window manager")
>
> Nice - I was not aware of that. The following definition seems to work
> (see also the patch at the end of this mail)
>> --8<---------------cut here---------------start------------->8---
> (define-public emacs-exwm-next
>   (package
>     (inherit emacs-exwm)
>     (name "emacs-exwm-next")
>     (synopsis "Emacs X window manager using the next version of emacs")
>     (inputs
>      (cons
>       `("emacs-next" ,emacs-next)
>       (delete `("emacs" ,emacs)
>               (package-inputs emacs-exwm))))))

Maybe a bit better:

    (inputs
     `(("emacs" ,emacs-next)
       ,@(alist-delete "emacs" (package-inputs emacs-exwm))))))

>> --8<---------------cut here---------------end------------->8---
>
>>> +    (arguments
>>> +     `(#:emacs ,emacs
>>
>> Shouldn't this be `emacs-next` as well?
> I have to admit that I do not understand that part. If I change it to
> emacs-next, the build fails with the error
>> --8<---------------cut here---------------start------------->8---
> phase `install' succeeded after 0.0 seconds
> starting phase `make-autoloads'
> Wrong type argument: stringp, nil
> command "/gnu/store/1z520fgx6fiq426yf2174kal2q63a9q7-emacs-next-27.0.50-0=
.36abf68/bin/emacs" "--quick" "--batch" "--eval=3D(let ((backup-inhibited t=
) (generated-autoload-file \"/gnu/store/nnjcqc448yj79dxaj11fnq7s9a8zpc1z-em=
acs-exwm-next-test-0.23/share/emacs/site-lisp/exwm-next-test-autoloads.el\"=
)) (update-directory-autoloads \"/gnu/store/nnjcqc448yj79dxaj11fnq7s9a8zpc1=
z-emacs-exwm-next-test-0.23/share/emacs/site-lisp\"))" failed with status 2=
55
>> --8<---------------cut here---------------end------------->8---
> It is a bit difficult for me to understand what is going on here,
> because, like I said, I do not really understand this part of the
> package definition in the first place - sorry. However, without
> modifying the arguments, everything seems to work.

The `#:emacs` field tells the build system which Emacs package to use to
build this package.  There may be something that not compatible between
our current build system and emacs-next.

I've CC'ed Maxim and Leo, they might know more than me.

> The following patch seems to work (do I need to send it on its own? I am
> new to this type of workflow.)

Attaching to this email is fine.
Better is to use `git send-email` like so:

=2D-8<---------------cut here---------------start------------->8---
git send-email --to=3D39804 <at> debbugs.gnu.org --in-reply-to=3D<MESSAGE-ID> 00=
01-your.patch
=2D-8<---------------cut here---------------end--------------->8---

with <MESSAGE-ID> being the message ID of the email you are replying to.
You can get this message ID in various ways: one way that always works
is to look up the "message-id" header of the raw email.

Also when you generate the patch with git, set the subject prefix to
[PATCH v2] for the second iteration, PATCH v3 for the third, etc.

Thanks!

=2D-=20
Pierre Neidhardt
https://ambrevar.xyz/

--=-=-=
Content-Type: application/pgp-signature; name="signature.asc"

-----BEGIN PGP SIGNATURE-----

iQEzBAEBCAAdFiEEUPM+LlsMPZAEJKvom9z0l6S7zH8FAl5Y0BsACgkQm9z0l6S7
zH95mggAocyhL3wVt7SWN4QJupqaEXIwjSPuM0rzMPU9rLeDd9MKfZJEHgXIubDC
+G3nK2Hy5nUmlQ8tFvzt6GsAOAcMYGcy+Mfv2FglfAPI3+uxy39C7F+i403q3C3P
SrRXJV0tnMzk/3suiQQXjQScqcPwL+Q0LMd7Kq9mXNaS7Sk5D79oYCap70nyW8wE
5ne6f9Ee3+NDyfUYhu/jsPbOlMKwDLxAW16smi2m0yd6FJ7dM3ckg8x1ua7sv6jL
9jtXbtxw3+0K7bAcbPCZVfyQQjzwOfRmWywBJukKLvEL21R8PDnZZjA/v+PLtZFr
txzcS1bOQKsXdS6SKd9XGeHrOA7DOg==
=h9ax
-----END PGP SIGNATURE-----
--=-=-=--




Information forwarded to guix-patches@HIDDEN:
bug#39804; Package guix-patches. Full text available.

Message received at 39804 <at> debbugs.gnu.org:


Received: (at 39804) by debbugs.gnu.org; 27 Feb 2020 22:05:01 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Thu Feb 27 17:05:01 2020
Received: from localhost ([127.0.0.1]:60401 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1j7RHA-0004Lz-Rb
	for submit <at> debbugs.gnu.org; Thu, 27 Feb 2020 17:05:01 -0500
Received: from mout.web.de ([212.227.15.3]:41675)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <dario.klingenberg@HIDDEN>) id 1j7RH8-0004Lm-V5
 for 39804 <at> debbugs.gnu.org; Thu, 27 Feb 2020 17:04:59 -0500
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=web.de;
 s=dbaedf251592; t=1582841092;
 bh=2doqy+gJGHJiTWZOVUpMEBdFC5JBWcfvq56c2QKorhM=;
 h=X-UI-Sender-Class:References:From:To:Cc:Subject:In-reply-to:Date;
 b=BCSuPFjlaLKMMz/boHVpgrI+ze9YV1zjkOe/+FqPC99ASSVSCNLAclq2ZbtESp04S
 dvpLTbDSZC0bRbW+Xkl9RJpFBo79kZHvE1d7CrxWN7JoRq+JAnFIU1nwOV4V7PmQfd
 lr/ncO7EofHp0BHFKy4zmsAOAYZLk/UqPvgIzxpo=
X-UI-Sender-Class: c548c8c5-30a9-4db5-a2e7-cb6cb037b8f9
Received: from klingenberg-tablet ([95.222.214.232]) by smtp.web.de (mrweb004
 [213.165.67.108]) with ESMTPSA (Nemesis) id 0M9MDO-1jFdxF3nlW-00ClO8; Thu, 27
 Feb 2020 23:04:51 +0100
References: <87blplqcdd.fsf@HIDDEN> <8736aw8igd.fsf@HIDDEN>
User-agent: mu4e 1.2.0; emacs 27.0.50
From: dario <dario.klingenberg@HIDDEN>
To: Pierre Neidhardt <mail@HIDDEN>
Subject: Re: [bug#39804] [PATCH] gnu: add emacs-exwm-next package (i.e. exwm
 for emacs-next)
In-reply-to: <8736aw8igd.fsf@HIDDEN>
Date: Thu, 27 Feb 2020 23:04:50 +0100
Message-ID: <87tv3bd6v1.fsf@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain
X-Provags-ID: V03:K1:uox87Vwl7X0DOj6murqeWmj04tDALy2q4Dkh6ghnMW/kMo2fdAh
 WVNq691BgzwXAR/rU3Wv6KX1HWT5+IFFqU4vt+57jRwFyKfHqLW240tvqnwhYqcJQp9iNjA
 GlYY76tdwL0cpukGjY2nJwsvkKlJc2eN/D6En1jTTlQSBMnP+iDm8UYLmN1tNpo0zb+d7VQ
 SxGS79PiF08cFtiPElS3A==
X-Spam-Flag: NO
X-UI-Out-Filterresults: notjunk:1;V03:K0:ZI4Bo2/akdU=:27ygHqCudEjy+Q/8gWUMBC
 u68NMHokVAGkpA4nAxLGuS33+rxjb8vtbVnlUQp6AVQvejkLqSdp8HStwr9OQ+8nb28LwolI6
 X0TG5OIc+8jKSCfFzf73aY/nH0CTj4iLwXR1KmmCd47yLZK4YVOaQ+/yZP+QhwCVTaaH0lpd1
 vr+oXVHekWRs/WBkxK+hb04pKkDgsrOxXbLZk+F0GR3IifGRe3A6bB61VViBP4jC66urxywKN
 OhtoMKM9uCommWhOJGX2bsblzEgAUWFTinX4PjCbCythP00T4fU0LmnaxYlR7gcSykWQq2AK2
 RiUTMpXPxID0KL5+8+uYHpbC9PesOxoyF3vIQtu3whEZSX/ZrEEtLdf1VUXMGA6VVj/5somDq
 PDd1SvDXmgcwrAa0PfYN2ZQG3yKTUqvcuqJj3Dwtty8WtQHW8fz44RYylkpbb/X51QGDuaotr
 ndVaZ5fVjHyTajvkFGWwp26VbERznqpHGYB93cfPOFIm3HS1fH+LB4T7GpPv1KPbJc7ce8VQh
 8Dj9r5k6pMAi+cd2Hae1bPWBvLoyeplpHcfFDHdgFUyQ3mwQhujrvGwcfZslbUbg2Z0es/r+x
 blDQ94jaATaoJBcBFKZ2tnoXvYAqJklbrobtXRHe23KFSD2Z9owuGrXjKTGIiEPyKskhhir9A
 FDwgsow8OYUkFegTQvDO+Rz5knao2z95eRfrYx8zhD6VPMy7P+RMYOzqqLjLCYRMyCc9LM+Hs
 9Kj2qkIWvM3VIHgq02P327gTe6khDGybaUF7BlnCKVoDHryRmui/J7FgurycWk6OJHdPVpakh
 mwt0D8blpdhD0LRulNuElIrf8expaXqtELlrA6OeLkJxZ6XlgOM2Q/j7NefjqZQUqG2PQkALY
 y0d0hFHER6y8qqPotI9xFtWQJhPS12jvAwrtKgWdC8gQTeZrJP7g/4wDLkrFFwEcBv1Pa8xEk
 oiYAf3a/fMOMb536AZGmQuF/u5y+PLVFNibhJHu47fWOwVkPIOkWPpdy0cfcJmbs1v4JGbQhh
 KTsfKh4tSfPEXxWtvIVGa9s7t9+9IuJFalHH173UaBk1BfzSY4N2oLyoG52pquqALUPBkVHeG
 FCvj1UjMypm9Ohr7DvWF41IqMe8EVsQiZLCyBkE+xp3+eRMoA6lUyD2yjL9fvBYoiNQbRxx80
 dmaMauQAPApm82a7hCkxiFpsgEVPfQCRn/wZO8kJIQvNpH1kuQDURiq9UbE/CPv+s5FqbTkkj
 trOCm80+ndTF7O/C9
Content-Transfer-Encoding: quoted-printable
X-Spam-Score: -0.7 (/)
X-Debbugs-Envelope-To: 39804
Cc: 39804 <at> debbugs.gnu.org
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.7 (-)

Thanks for your feedback.

>> ---
>>  gnu/packages/emacs-xyz.scm | 71 ++++++++++++++++++++++++++++++++++++++
>>  1 file changed, 71 insertions(+)
>>
>> diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
>> index 6b9027df8a..c6df469895 100644
>> --- a/gnu/packages/emacs-xyz.scm
>> +++ b/gnu/packages/emacs-xyz.scm
>> @@ -8601,6 +8601,77 @@ It should enable you to implement low-level X11 =
applications.")
>>  built on top of XELB.")
>>      (license license:gpl3+)))
>>
>> +(define-public emacs-exwm-next
>
> I think you don't need to copy the whole package definition.  Instead,
> you could `inherit' from the original definition and only adjust the
> name, description, inputs and maybe arguments.
>
> For instance
>
> --8<---------------cut here---------------start------------->8---
> (define-public emacs-exwm-next
>   (package
>     (inherit emacs)
>     (name "emacs-exwm-next")
>     (inputs ...)
>     (synopsys ...)))
> --8<---------------cut here---------------end--------------->8---
>
> See `substitute-keyword-arguments' in the fftwf package for a convenient
> way to modify just one argument.
>
>> +  (package
>> +    (name "emacs-exwm-next")
>> +    (version "0.23")
>> +    (synopsis "Emacs X window manager")

Nice - I was not aware of that. The following definition seems to work
(see also the patch at the end of this mail)
> --8<---------------cut here---------------start------------->8---
(define-public emacs-exwm-next
  (package
    (inherit emacs-exwm)
    (name "emacs-exwm-next")
    (synopsis "Emacs X window manager using the next version of emacs")
    (inputs
     (cons
      `("emacs-next" ,emacs-next)
      (delete `("emacs" ,emacs)
              (package-inputs emacs-exwm))))))
> --8<---------------cut here---------------end------------->8---

>> +    (arguments
>> +     `(#:emacs ,emacs
>
> Shouldn't this be `emacs-next` as well?
I have to admit that I do not understand that part. If I change it to
emacs-next, the build fails with the error
> --8<---------------cut here---------------start------------->8---
phase `install' succeeded after 0.0 seconds
starting phase `make-autoloads'
Wrong type argument: stringp, nil
command "/gnu/store/1z520fgx6fiq426yf2174kal2q63a9q7-emacs-next-27.0.50-0.=
36abf68/bin/emacs" "--quick" "--batch" "--eval=3D(let ((backup-inhibited t=
) (generated-autoload-file \"/gnu/store/nnjcqc448yj79dxaj11fnq7s9a8zpc1z-e=
macs-exwm-next-test-0.23/share/emacs/site-lisp/exwm-next-test-autoloads.el=
\")) (update-directory-autoloads \"/gnu/store/nnjcqc448yj79dxaj11fnq7s9a8z=
pc1z-emacs-exwm-next-test-0.23/share/emacs/site-lisp\"))" failed with stat=
us 255
> --8<---------------cut here---------------end------------->8---
It is a bit difficult for me to understand what is going on here,
because, like I said, I do not really understand this part of the
package definition in the first place - sorry. However, without
modifying the arguments, everything seems to work.

The following patch seems to work (do I need to send it on its own? I am
new to this type of workflow.)

Best
Dario

=2D--
 gnu/packages/emacs-xyz.scm | 72 ++++----------------------------------
 1 file changed, 6 insertions(+), 66 deletions(-)

diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index c6df469895..3d5b650df9 100644
=2D-- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -8603,74 +8603,14 @@ built on top of XELB.")

 (define-public emacs-exwm-next
   (package
+    (inherit emacs-exwm)
     (name "emacs-exwm-next")
-    (version "0.23")
-    (synopsis "Emacs X window manager")
-    (source (origin
-              (method url-fetch)
-              (uri (string-append "https://elpa.gnu.org/packages/exwm-"
-                                  version ".tar"))
-              (sha256
-               (base32
-                "05w1v3wrp1lzz20zd9lcvr5nhk809kgy6svvkbs15xhnr6x55ad5")))=
)
-    (build-system emacs-build-system)
-    (propagated-inputs
-     `(("emacs-xelb" ,emacs-xelb)))
+    (synopsis "Emacs X window manager using the next version of emacs")
     (inputs
-     `(("xhost" ,xhost)
-       ("emacs-next" ,emacs-next)
-       ("dbus" ,dbus)))
-    ;; The following functions and variables needed by emacs-exwm are
-    ;; not included in emacs-minimal:
-    ;; scroll-bar-mode, fringe-mode
-    ;; x-display-pixel-width, x-display-pixel-height
-    (arguments
-     `(#:emacs ,emacs
-       #:phases
-       (modify-phases %standard-phases
-         (add-after 'build 'install-xsession
-           (lambda* (#:key inputs outputs #:allow-other-keys)
-             (let* ((out (assoc-ref outputs "out"))
-                    (xsessions (string-append out "/share/xsessions"))
-                    (bin (string-append out "/bin"))
-                    (exwm-executable (string-append bin "/exwm")))
-               ;; Add a .desktop file to xsessions
-               (mkdir-p xsessions)
-               (mkdir-p bin)
-               (with-output-to-file
-                   (string-append xsessions "/exwm.desktop")
-                 (lambda _
-                   (format #t "[Desktop Entry]~@
-                     Name=3D~a~@
-                     Comment=3D~a~@
-                     Exec=3D~a~@
-                     TryExec=3D~:*~a~@
-                     Type=3DApplication~%" ,name ,synopsis exwm-executabl=
e)))
-               ;; Add a shell wrapper to bin
-               (with-output-to-file exwm-executable
-                 (lambda _
-                   (format #t "#!~a ~@
-                     ~a +SI:localuser:$USER ~@
-                     exec ~a --exit-with-session ~a \"$@\" --eval '~s' ~%=
"
-                           (string-append (assoc-ref inputs "bash") "/bin=
/sh")
-                           (string-append (assoc-ref inputs "xhost") "/bi=
n/xhost")
-                           (string-append (assoc-ref inputs "dbus") "/bin=
/dbus-launch")
-                           (string-append (assoc-ref inputs "emacs-next")=
 "/bin/emacs")
-                           '(cond
-                             ((file-exists-p "~/.exwm")
-                              (load-file "~/.exwm"))
-                             ((not (featurep 'exwm))
-                              (require 'exwm)
-                              (require 'exwm-config)
-                              (exwm-config-default)
-                              (message (concat "exwm configuration not fo=
und. "
-                                               "Falling back to default c=
onfiguration...")))))))
-               (chmod exwm-executable #o555)
-               #t))))))
-    (home-page "https://github.com/ch11ng/exwm")
-    (description "EXWM is a full-featured tiling X window manager for Ema=
cs
-built on top of XELB.")
-    (license license:gpl3+)))
+     (cons
+      `("emacs-next" ,emacs-next)
+      (delete `("emacs" ,emacs)
+              (package-inputs emacs-exwm))))))

 (define-public emacs-switch-window
   (package
=2D-
2.25.1




Information forwarded to guix-patches@HIDDEN:
bug#39804; Package guix-patches. Full text available.

Message received at 39804 <at> debbugs.gnu.org:


Received: (at 39804) by debbugs.gnu.org; 27 Feb 2020 09:53:34 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Thu Feb 27 04:53:34 2020
Received: from localhost ([127.0.0.1]:58679 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1j7FrK-00024H-H3
	for submit <at> debbugs.gnu.org; Thu, 27 Feb 2020 04:53:34 -0500
Received: from relay4-d.mail.gandi.net ([217.70.183.196]:56359)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1j7FrI-00023w-61
 for 39804 <at> debbugs.gnu.org; Thu, 27 Feb 2020 04:53:33 -0500
X-Originating-IP: 92.169.129.147
Received: from bababa (lfbn-idf2-1-1315-147.w92-169.abo.wanadoo.fr
 [92.169.129.147]) (Authenticated sender: mail@HIDDEN)
 by relay4-d.mail.gandi.net (Postfix) with ESMTPSA id 4F6A7E000F;
 Thu, 27 Feb 2020 09:53:22 +0000 (UTC)
From: Pierre Neidhardt <mail@HIDDEN>
To: dakling <dario.klingenberg@HIDDEN>
Subject: Re: [bug#39804] [PATCH] gnu: add emacs-exwm-next package (i.e. exwm
 for emacs-next)
References: <87blplqcdd.fsf@HIDDEN>
Date: Thu, 27 Feb 2020 10:53:22 +0100
In-Reply-To: <87blplqcdd.fsf@HIDDEN> (dakling's message of "Wed, 26 Feb 2020
 22:07:44 +0100")
Message-ID: <8736aw8igd.fsf@HIDDEN>
User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/26.3 (gnu/linux)
MIME-Version: 1.0
Content-Type: multipart/signed; boundary="=-=-=";
 micalg=pgp-sha256; protocol="application/pgp-signature"
X-Spam-Score: 1.7 (+)
X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org",
 has NOT identified this incoming email as spam.  The original
 message has been attached to this so you can view it or label
 similar future email.  If you have any questions, see
 the administrator of that system for details.
 Content preview:  Thanks for your submission. Note that you need not create
 a new thread for to send a update of a patch. If you used the `git send-email`
 command, you could have used the `--to=` option to send to the previous thread.
 For instanc [...] 
 Content analysis details:   (1.7 points, 10.0 required)
 pts rule name              description
 ---- ---------------------- --------------------------------------------------
 0.0 URIBL_BLOCKED          ADMINISTRATOR NOTICE: The query to URIBL was
 blocked.  See
 http://wiki.apache.org/spamassassin/DnsBlocklists#dnsbl-block
 for more information. [URIs: gnu.org]
 -0.7 RCVD_IN_DNSWL_LOW      RBL: Sender listed at https://www.dnswl.org/,
 low trust [217.70.183.196 listed in list.dnswl.org]
 0.0 RCVD_IN_MSPIKE_H3      RBL: Good reputation (+3)
 [217.70.183.196 listed in wl.mailspike.net]
 0.0 SPF_HELO_NONE          SPF: HELO does not publish an SPF Record
 -0.0 SPF_PASS               SPF: sender matches SPF record
 1.9 PDS_OTHER_BAD_TLD      Untrustworthy TLDs
 [URI: ambrevar.xyz (xyz)]
 0.0 RCVD_IN_MSPIKE_WL      Mailspike good senders
 0.5 FROM_SUSPICIOUS_NTLD   From abused NTLD
X-Debbugs-Envelope-To: 39804
Cc: 39804 <at> debbugs.gnu.org
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: 1.7 (+)
X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org",
 has NOT identified this incoming email as spam.  The original
 message has been attached to this so you can view it or label
 similar future email.  If you have any questions, see
 the administrator of that system for details.
 
 Content preview:  Thanks for your submission. Note that you need not create
   a new thread for to send a update of a patch. If you used the `git send-email`
    command, you could have used the `--to=` option to send to the previous thread.
    For instanc [...] 
 
 Content analysis details:   (1.7 points, 10.0 required)
 
  pts rule name              description
 ---- ---------------------- --------------------------------------------------
  0.0 URIBL_BLOCKED          ADMINISTRATOR NOTICE: The query to URIBL was
                             blocked.  See
                             http://wiki.apache.org/spamassassin/DnsBlocklists#dnsbl-block
                              for more information.
                             [URIs: ambrevar.xyz]
  0.0 RCVD_IN_MSPIKE_H3      RBL: Good reputation (+3)
                             [217.70.183.196 listed in wl.mailspike.net]
 -0.7 RCVD_IN_DNSWL_LOW      RBL: Sender listed at https://www.dnswl.org/,
                             low trust
                             [217.70.183.196 listed in list.dnswl.org]
  0.0 SPF_HELO_NONE          SPF: HELO does not publish an SPF Record
 -0.0 SPF_PASS               SPF: sender matches SPF record
  1.9 PDS_OTHER_BAD_TLD      Untrustworthy TLDs
                             [URI: ambrevar.xyz (xyz)]
  0.0 RCVD_IN_MSPIKE_WL      Mailspike good senders
 -1.0 MAILING_LIST_MULTI     Multiple indicators imply a widely-seen list
                             manager
  1.0 BULK_RE_SUSP_NTLD      Precedence bulk and RE: from a suspicious TLD
  0.5 FROM_SUSPICIOUS_NTLD   From abused NTLD

--=-=-=
Content-Type: text/plain
Content-Transfer-Encoding: quoted-printable

Thanks for your submission.

Note that you need not create a new thread for to send a update of a
patch.  If you used the `git send-email` command, you could have used
the `--to=3D` option to send to the previous thread.  For instance

=2D-8<---------------cut here---------------start------------->8---
git send-email --to=3D39756 <at> debbugs.gnu.org 0001-my-patch.diff
=2D-8<---------------cut here---------------end--------------->8---

Comments below:

> ---
>  gnu/packages/emacs-xyz.scm | 71 ++++++++++++++++++++++++++++++++++++++
>  1 file changed, 71 insertions(+)
>
> diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
> index 6b9027df8a..c6df469895 100644
> --- a/gnu/packages/emacs-xyz.scm
> +++ b/gnu/packages/emacs-xyz.scm
> @@ -8601,6 +8601,77 @@ It should enable you to implement low-level X11 ap=
plications.")
>  built on top of XELB.")
>      (license license:gpl3+)))
>
> +(define-public emacs-exwm-next

I think you don't need to copy the whole package definition.  Instead,
you could `inherit' from the original definition and only adjust the
name, description, inputs and maybe arguments.

For instance

=2D-8<---------------cut here---------------start------------->8---
(define-public emacs-exwm-next
  (package
    (inherit emacs)
    (name "emacs-exwm-next")
    (inputs ...)
    (synopsys ...)))
=2D-8<---------------cut here---------------end--------------->8---

See `substitute-keyword-arguments' in the fftwf package for a convenient
way to modify just one argument.

> +  (package
> +    (name "emacs-exwm-next")
> +    (version "0.23")
> +    (synopsis "Emacs X window manager")

Maybe tell that this is using the next version of Emacs.

> +    (source (origin
> +              (method url-fetch)
> +              (uri (string-append "https://elpa.gnu.org/packages/exwm-"
> +                                  version ".tar"))
> +              (sha256
> +               (base32
> +                "05w1v3wrp1lzz20zd9lcvr5nhk809kgy6svvkbs15xhnr6x55ad5"))=
))
> +    (build-system emacs-build-system)
> +    (propagated-inputs
> +     `(("emacs-xelb" ,emacs-xelb)))
> +    (inputs
> +     `(("xhost" ,xhost)
> +       ("emacs-next" ,emacs-next)
> +       ("dbus" ,dbus)))
> +    ;; The following functions and variables needed by emacs-exwm are
> +    ;; not included in emacs-minimal:
> +    ;; scroll-bar-mode, fringe-mode
> +    ;; x-display-pixel-width, x-display-pixel-height
> +    (arguments
> +     `(#:emacs ,emacs

Shouldn't this be `emacs-next` as well?

Cheers!

=2D-=20
Pierre Neidhardt
https://ambrevar.xyz/

--=-=-=
Content-Type: application/pgp-signature; name="signature.asc"

-----BEGIN PGP SIGNATURE-----

iQEzBAEBCAAdFiEEUPM+LlsMPZAEJKvom9z0l6S7zH8FAl5XkZIACgkQm9z0l6S7
zH9nPQf9E27fTm31eLYvkzUt+6zck81xYzuqnSTCjVr4EH7StDzq0r8xObfBrJNH
JsovSqNGpurjSxHnAHhE/PlZ7KokvQ0JiHL/wEF0ct1jI1wh6UAv1hjX/zMw189G
hCzMePtZ6aIsHC5pHv3Z0NUiLGPPc0qxHlKSPxq6jAdxypY+fx8Nnj/0xdqoQ+0j
xmvLdL3pE2gEplwZ0aVGdZyWpzlO+izgPuWUDSEJL48w5E1QXzW9L8Q6jDSfTio9
kIiOI+7kusXS4B6dolCZhCYCRWfvMeV6C/cYJxf0CGN9Rimi5M0+JUTfVKHPrEbE
kGIjgQti3omKmi06FaFyfMx9VJoGoQ==
=jM47
-----END PGP SIGNATURE-----
--=-=-=--




Information forwarded to guix-patches@HIDDEN:
bug#39804; Package guix-patches. Full text available.

Message received at submit <at> debbugs.gnu.org:


Received: (at submit) by debbugs.gnu.org; 26 Feb 2020 21:26:38 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Wed Feb 26 16:26:38 2020
Received: from localhost ([127.0.0.1]:57856 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1j74CU-0000xi-05
	for submit <at> debbugs.gnu.org; Wed, 26 Feb 2020 16:26:38 -0500
Received: from lists.gnu.org ([209.51.188.17]:44570)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <dario.klingenberg@HIDDEN>) id 1j741Y-0000ev-U3
 for submit <at> debbugs.gnu.org; Wed, 26 Feb 2020 16:15:21 -0500
Received: from eggs.gnu.org ([2001:470:142:3::10]:53780)
 by lists.gnu.org with esmtp (Exim 4.90_1)
 (envelope-from <dario.klingenberg@HIDDEN>) id 1j741X-00069q-Bn
 for guix-patches@HIDDEN; Wed, 26 Feb 2020 16:15:20 -0500
X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org
X-Spam-Level: 
X-Spam-Status: No, score=-0.7 required=5.0 tests=BAYES_40,FREEMAIL_FROM,
 RCVD_IN_DNSWL_LOW,SPOOFED_FREEMAIL,URIBL_BLOCKED autolearn=disabled
 version=3.3.2
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
 (envelope-from <dario.klingenberg@HIDDEN>) id 1j741V-0000V3-Te
 for guix-patches@HIDDEN; Wed, 26 Feb 2020 16:15:19 -0500
Received: from mout.web.de ([217.72.192.78]:53389)
 by eggs.gnu.org with esmtps (TLS1.0:DHE_RSA_AES_128_CBC_SHA1:16)
 (Exim 4.71) (envelope-from <dario.klingenberg@HIDDEN>)
 id 1j741T-0000Go-6o
 for guix-patches@HIDDEN; Wed, 26 Feb 2020 16:15:16 -0500
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=web.de;
 s=dbaedf251592; t=1582751711;
 bh=IKNNA5YiDhe4EIVC9ujnX63p8SvC+bqJ4lm998dH1vQ=;
 h=X-UI-Sender-Class:From:To:Subject:Date;
 b=lDSngoeHV9Kw5AMykmS8Oa8LjlvZiE3nXHLP+LTXA+dkzyrn73H+zHhK9+BRM3Uci
 UVSx9VMtXmY2Y5MnZj9nLwCU7xNCgjg5Yf3Oz1wrivdI/QiqJ0bjWHsIsVIkn0vx+X
 WdHnhay68NxirxLviKf24kxphwi87SX5MqHSnIS4=
X-UI-Sender-Class: c548c8c5-30a9-4db5-a2e7-cb6cb037b8f9
Received: from klingenberg-tablet ([95.222.214.30]) by smtp.web.de (mrweb102
 [213.165.67.124]) with ESMTPSA (Nemesis) id 0MOzsZ-1j1GSO0wHH-006QLd for
 <guix-patches@HIDDEN>; Wed, 26 Feb 2020 22:15:11 +0100
User-agent: mu4e 1.2.0; emacs 27.0.50
From: dakling <dario.klingenberg@HIDDEN>
To: guix-patches@HIDDEN
Subject: [PATCH] gnu: add emacs-exwm-next package (i.e. exwm for emacs-next)
Date: Wed, 26 Feb 2020 22:07:44 +0100
Message-ID: <87blplqcdd.fsf@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain
X-Provags-ID: V03:K1:atInNwPyqgiq3TcDMQZaAOyt1QqJSj4vvZk0uUXvWUKoEJBLn3L
 HCzIDs0tKg6HktpF7eh5mTS/ChMWLVkRbxh8ZpGwv8M/bg3EybaTW0Sj0qU9m2tdUvE+6tV
 2WKFrx3g2wi0YF80rpO2SkFD74DFmq/ELRNQsfufV7NkyO7wa6KH+e9UYKv79Sdzg1Sy3DS
 WC1qH3Ou/2ZTCK61eS26g==
X-UI-Out-Filterresults: notjunk:1;V03:K0:RVwRrgUGuIs=:sdJa4e8BX+mepVhgMIipX5
 HMrN5b8AqFDn6JuARGGVmqjPoJll/5ByEMYJZIU2IUB4k5+9ekXRChoyKlKiNCgteTe/O+hGz
 UUqR/l7ICzkiPutwtmtbbzSxPMSMm323QRQKMMjNAQ5VYk9Ysuy/52tlYUSajTvnsRJv1LCSV
 bP/9O9HSvOfIdc2oE1zDYwsGtxoMPi6JOC19BLyfCML5Idd2+HIXRUNEz/2ciGsSV8WpzwIuw
 AMatdkVhM3Rx9HA5eppuEbRY5cdDFQbUTq7qXR4pH/xIjWT3JLpPDT17oSXQkWF6Fkd6Yl19G
 9cBWBClrmLyIQIzN5Gi/4vWUogVkuq2RG3z7au4uwm5udHvpvdjx2uO+j1qQrDdvUDrRHddjU
 Oa/GnE370/olCIYE3vRiMhs7ACOh/pTmnxpE9b6bLMXWzJesCOzE13XWG6dWr1NBuyqgRG6Ew
 SdOakciFatDgLMPS+OS2ODVU5hFmWfo71qp73p9VruVt1nqjrXLD1V8IqgsB8apQtzHHTGpTR
 YuiwC6X+kN6ZTfIW0dXZLMvtWH1hMJvPUADu/WoHzJAmaTRdQu+8nRV60R6JIUL15OIaBDXDu
 XlPGDujyRSWkiUJ32/amQfD/UUNf+qYRigEl8X3l9/p/6DWfbgKPQr8ycgzDxlV3/zeaK7MCS
 15iZkHbgKsnEDdldu6S2i2a71b3Zxd9smkNNRD/zH5cpL6U6enbg2YzYGA4X+t5LYotX+OEG2
 JCAJu7lIr0FJcvl95fqc4AmfwINSfnQthFIfPfW7TtM24VMa5vbKChe2HQe3rZe8aiDEeDOl0
 66d5njU9TuB97MCaj85Yo7ccs0uAvG5Beqxe7t0+mVg0tkwn1EZQWUZ8RqnKmEot4hW5Ve321
 cLRijLTTrbJUopEs3+NEAQ/t9d8dCdqpHv/mRHXl7STY51slszwVA85kkNJqQx9b2MkuftZ4y
 /e94DV/MFmtqbCeHac0i27Vd5lTJbVA9KnRnvWFFnF8o4zpV2ZSECTXRHeOrBcc8vgCeGtp3T
 7mlTdNdsiRiGzYIHobgXkDCHjhfA8nUvdnsiXef3FvcWydzcTaY3OKHZWLpliwWRGop0K0Kwi
 7T91WFihq2PRib+PC0IrnYLqxDRW9vXfIZ99xM3lrpqBNgp5mQphS9IxCsIhtL+WvIe7ZRzUn
 H1oHg8JrIyNeE7Eq5dwTwjvG1rBG868atZ8P50F2MyovZlzBB2KRbqU0PO8fYcwiibdg1vyFp
 D2C5mwkc2gVUpi/zE4WwHctrR1AOT6xyDbEkwBA==
Content-Transfer-Encoding: quoted-printable
X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic]
X-Received-From: 217.72.192.78
X-Spam-Score: 0.2 (/)
X-Debbugs-Envelope-To: submit
X-Mailman-Approved-At: Wed, 26 Feb 2020 16:26:36 -0500
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -0.8 (/)


=2D--
 gnu/packages/emacs-xyz.scm | 71 ++++++++++++++++++++++++++++++++++++++
 1 file changed, 71 insertions(+)

diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index 6b9027df8a..c6df469895 100644
=2D-- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -8601,6 +8601,77 @@ It should enable you to implement low-level X11 app=
lications.")
 built on top of XELB.")
     (license license:gpl3+)))

+(define-public emacs-exwm-next
+  (package
+    (name "emacs-exwm-next")
+    (version "0.23")
+    (synopsis "Emacs X window manager")
+    (source (origin
+              (method url-fetch)
+              (uri (string-append "https://elpa.gnu.org/packages/exwm-"
+                                  version ".tar"))
+              (sha256
+               (base32
+                "05w1v3wrp1lzz20zd9lcvr5nhk809kgy6svvkbs15xhnr6x55ad5")))=
)
+    (build-system emacs-build-system)
+    (propagated-inputs
+     `(("emacs-xelb" ,emacs-xelb)))
+    (inputs
+     `(("xhost" ,xhost)
+       ("emacs-next" ,emacs-next)
+       ("dbus" ,dbus)))
+    ;; The following functions and variables needed by emacs-exwm are
+    ;; not included in emacs-minimal:
+    ;; scroll-bar-mode, fringe-mode
+    ;; x-display-pixel-width, x-display-pixel-height
+    (arguments
+     `(#:emacs ,emacs
+       #:phases
+       (modify-phases %standard-phases
+         (add-after 'build 'install-xsession
+           (lambda* (#:key inputs outputs #:allow-other-keys)
+             (let* ((out (assoc-ref outputs "out"))
+                    (xsessions (string-append out "/share/xsessions"))
+                    (bin (string-append out "/bin"))
+                    (exwm-executable (string-append bin "/exwm")))
+               ;; Add a .desktop file to xsessions
+               (mkdir-p xsessions)
+               (mkdir-p bin)
+               (with-output-to-file
+                   (string-append xsessions "/exwm.desktop")
+                 (lambda _
+                   (format #t "[Desktop Entry]~@
+                     Name=3D~a~@
+                     Comment=3D~a~@
+                     Exec=3D~a~@
+                     TryExec=3D~:*~a~@
+                     Type=3DApplication~%" ,name ,synopsis exwm-executabl=
e)))
+               ;; Add a shell wrapper to bin
+               (with-output-to-file exwm-executable
+                 (lambda _
+                   (format #t "#!~a ~@
+                     ~a +SI:localuser:$USER ~@
+                     exec ~a --exit-with-session ~a \"$@\" --eval '~s' ~%=
"
+                           (string-append (assoc-ref inputs "bash") "/bin=
/sh")
+                           (string-append (assoc-ref inputs "xhost") "/bi=
n/xhost")
+                           (string-append (assoc-ref inputs "dbus") "/bin=
/dbus-launch")
+                           (string-append (assoc-ref inputs "emacs-next")=
 "/bin/emacs")
+                           '(cond
+                             ((file-exists-p "~/.exwm")
+                              (load-file "~/.exwm"))
+                             ((not (featurep 'exwm))
+                              (require 'exwm)
+                              (require 'exwm-config)
+                              (exwm-config-default)
+                              (message (concat "exwm configuration not fo=
und. "
+                                               "Falling back to default c=
onfiguration...")))))))
+               (chmod exwm-executable #o555)
+               #t))))))
+    (home-page "https://github.com/ch11ng/exwm")
+    (description "EXWM is a full-featured tiling X window manager for Ema=
cs
+built on top of XELB.")
+    (license license:gpl3+)))
+
 (define-public emacs-switch-window
   (package
     (name "emacs-switch-window")
=2D-
2.25.1





Acknowledgement sent to dakling <dario.klingenberg@HIDDEN>:
New bug report received and forwarded. Copy sent to guix-patches@HIDDEN. Full text available.
Report forwarded to guix-patches@HIDDEN:
bug#39804; Package guix-patches. Full text available.
Please note: This is a static page, with minimal formatting, updated once a day.
Click here to see this page with the latest information and nicer formatting.
Last modified: Fri, 28 Feb 2020 08:45:01 UTC

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997 nCipher Corporation Ltd, 1994-97 Ian Jackson.