ryuslash/dotfiles
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Add eros to my Emacs configuration

Browse source
This commit is contained in:
Tom Willemse 2023-09-27 23:44:06 -07:00
parent 6054dccc67
commit 9ad2400a9a
2 changed files with 43 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
oni/home/config/rincewind.scm
View file

@ -75,7 +75,8 @@
home-emacs-helpful-configuration home-emacs-helpful-configuration
home-emacs-yasnippet-capf-service-type home-emacs-yasnippet-capf-service-type
home-emacs-dashboard-service-type home-emacs-dashboard-service-type
home-emacs-dashboard-configuration)) home-emacs-dashboard-configuration
home-emacs-eros-service-type))
#:use-module ((oni home services environment) #:use-module ((oni home services environment)
#:select (home-environment-service)) #:select (home-environment-service))
#:use-module ((oni home services flameshot) #:use-module ((oni home services flameshot)
@ -414,6 +415,7 @@
(local-file "../services/emacs/oni-helpful.el"))))) (local-file "../services/emacs/oni-helpful.el")))))
(service home-emacs-yasnippet-capf-service-type) (service home-emacs-yasnippet-capf-service-type)
(service home-emacs-dashboard-service-type) (service home-emacs-dashboard-service-type)
(service home-emacs-eros-service-type)
(service home-flameshot-service-type) (service home-flameshot-service-type)

42
oni/home/services/emacs.scm
View file

@ -9,7 +9,8 @@
#:select (emacs)) #:select (emacs))
#:use-module ((gnu packages emacs-xyz) #:use-module ((gnu packages emacs-xyz)
#:select (emacs-helpful #:select (emacs-helpful
emacs-dashboard)) emacs-dashboard
emacs-eros))
#:use-module ((gnu home services) #:use-module ((gnu home services)
#:select (service-type #:select (service-type
service-extension service-extension
@ -39,7 +40,10 @@
home-emacs-yasnippet-capf-configuration home-emacs-yasnippet-capf-configuration
home-emacs-dashboard-service-type home-emacs-dashboard-service-type
home-emacs-dashboard-configuration)) home-emacs-dashboard-configuration
home-emacs-eros-service-type
home-emacs-eros-configuration))
(define-configuration/no-serialization home-emacs-extension (define-configuration/no-serialization home-emacs-extension
(configurations (configurations
@ -196,3 +200,37 @@
(compose identity) (compose identity)
(default-value (home-emacs-dashboard-configuration)) (default-value (home-emacs-dashboard-configuration))
(description "Install and configure emacs-dashboard."))) (description "Install and configure emacs-dashboard.")))
(define-configuration/no-serialization home-emacs-eros-configuration
(package
(package emacs-eros)
"Package to use for setting emacs-eros.")
(configurations
(text-config '())
"Configuration for emacs-eros."))
(define (add-emacs-eros config)
(home-emacs-extension
(configurations
(append
(list (mixed-text-file "eros-config"
"(eros-mode)\n"))
(home-emacs-eros-configuration-configurations config)))))
(define (add-emacs-eros-packages config)
(list (home-emacs-eros-configuration-package config)))
(define home-emacs-eros-service-type
(service-type
(name 'home-emacs-eros)
(extensions
(list (service-extension
home-emacs-service-type
add-emacs-eros)
(service-extension
home-profile-service-type
add-emacs-eros-packages)))
(compose identity)
(default-value (home-emacs-eros-configuration))
(description "Install and configure emacs-eros.")))