config/guix/system/default: Use official emacs-exwm-no-x-toolkit.

master
Pierre Neidhardt 2020-10-22 11:44:24 +02:00
parent ccd339e906
commit fa7ed4ed11
1 changed files with 1 additions and 23 deletions

View File

@ -2,9 +2,6 @@
;; guix size $(guix system -L ~/.config/guix/system build ~/.config/guix/system/default.scm)
(define-module (default)
#:use-module (srfi srfi-1)
#:use-module (guix packages) ; For emacs-no-x-toolkit
#:use-module (guix build-system gnu) ; For emacs-no-x-toolkit
#:use-module (guix utils) ; For emacs-no-x-toolkit
#:use-module (gnu)
#:use-module (gnu system nss)
#:use-module (gnu system mapped-devices))
@ -86,32 +83,13 @@ StrictNodes 1")
(list ;; %nitrokey-udev-rule
%ambrevar/cdemu-vhba-udev-rule))))))))
(define-public emacs-no-x-toolkit-xelb
(package
(inherit emacs-xelb)
(name "emacs-no-x-toolkit-xelb")
(arguments
(substitute-keyword-arguments (package-arguments emacs-xelb)
((#:emacs emacs) `,emacs-no-x-toolkit)))))
(define-public emacs-no-x-toolkit-exwm ; No GTK, but the Slim service drags GTK+ anyways.
(package
(inherit emacs-exwm)
(name "emacs-no-x-toolkit-exwm")
(synopsis "Emacs X window manager (without X toolkit)")
(propagated-inputs
`(("emacs-no-x-toolkit-xelb" ,emacs-no-x-toolkit-xelb)))
(arguments
(substitute-keyword-arguments (package-arguments emacs-exwm)
((#:emacs emacs) `,emacs-no-x-toolkit)))))
(define-public %ambrevar/packages
(cons* nss-certs ; for HTTPS access
;; gvfs ; TODO: For user mounts?
ntfs-3g
;; exfat-utils ; TODO: Needed for macOS drives? Does not seem to work.
fuse-exfat
emacs-no-x-toolkit-exwm ; Still needs emacs-exwm / emacs-no-x-toolkit-exwm installed in a user profile.
emacs-exwm-no-x-toolkit ; Still needs emacs-exwm / emacs-exwm-no-x-toolkit installed in a user profile.
vhba-module ; For CDEmu.
(fold (lambda (package l) (delete package l))
%base-packages