Tom Willemse
a85ad3fddd
- Sort all use-module directives - Remove ‘gcc-toolchain’ from the installed packages because it appears that the regular emacs-next (not from a git checkout) works fine without it. - Add ‘emacs-org-roam’ and ‘emacs-vterm’ packages because they both come with C modules and installing them on-the-fly in Emacs wasn't working properly. - Add ‘fakeroot’ package because it appears to be needed now that I'm using guix-home if I want to build packages for Archlinux. This still happens when I need to install some proprietary program from the AUR. - Add an Emacs configuration service. For now this just ensures that the ‘emacs-next’ package is installed and creates a shepherd service that starts Emacs when I log in. - Change the default run dialog from ‘rofi -show run’ to ‘rofi -show drun’ to run .desktop files. This offers more control over what does and doesn't show up in the list and allows me to put only stuff in there that actually works in a graphical environment.
46 lines
1.4 KiB
Scheme
46 lines
1.4 KiB
Scheme
(define-module (oni home services emacs)
|
|
#:use-module (gnu services configuration)
|
|
#:use-module (gnu packages emacs)
|
|
#:use-module (gnu home services)
|
|
#:use-module (gnu home services shepherd)
|
|
#:use-module (gnu home services utils)
|
|
#:use-module (guix packages)
|
|
#:use-module (guix gexp)
|
|
|
|
#:export (home-emacs-service-type
|
|
home-emacs-configuration))
|
|
|
|
(define-configuration home-emacs-configuration
|
|
(package
|
|
(package emacs)
|
|
"Package to use for setting Emacs"))
|
|
|
|
(define (add-emacs-packages config)
|
|
(list (home-emacs-configuration-package config)))
|
|
|
|
(define (home-emacs-shepherd-service config)
|
|
(list
|
|
(shepherd-service
|
|
(documentation "Start Emacs")
|
|
(provision '(emacs))
|
|
(auto-start? #t)
|
|
(start
|
|
#~(make-forkexec-constructor
|
|
(list #$(file-append (home-emacs-configuration-package config) "/bin/emacs")
|
|
"--fg-daemon")
|
|
#:log-file (format #f "~a/.local/var/log/xbindkeys.log" (getenv "HOME"))))
|
|
(stop #~(make-kill-destructor)))))
|
|
|
|
(define home-emacs-service-type
|
|
(service-type
|
|
(name 'home-emacs)
|
|
(extensions
|
|
(list (service-extension
|
|
home-profile-service-type
|
|
add-emacs-packages)
|
|
(service-extension
|
|
home-shepherd-service-type
|
|
home-emacs-shepherd-service)))
|
|
(compose identity)
|
|
(default-value (home-emacs-configuration))
|
|
(description "Install and configure Emacs.")))
|