sqrtminusone/dotfiles
1
0
Fork 0
mirror of https://github.com/SqrtMinusOne/dotfiles.git synced 2025-12-10 19:23:03 +03:00
Code Issues Projects Releases Packages Wiki Activity Actions

feat(desktop): try to put xmodmap to shepherd

Browse source
This commit is contained in:
Pavel Korytov 2021-08-18 22:27:53 +03:00
parent 0ad807a841
commit d22dc6c645
4 changed files with 22 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
.config/shepherd/init.scm
View file

@ -70,6 +70,12 @@
#:start (make-forkexec-constructor '("/home/pavel/.guix-extra-profiles/desktop/desktop/libexec/polkit-gnome-authentication-agent-1"))
#:stop (make-kill-destructor)))
(define xmodmap
(make <service>
#:provides '(xmodmap)
#:one-shot? #t
#:start (make-system-constructor "xmodmap /home/pavel/.Xmodmap")))
(define vpn
(make <service>
#:provides '(vpn)
@ -96,8 +102,9 @@
discord-rich-presence
polkit-gnome
vpn
davmail)
davmail
xmodmap)
(action 'shepherd 'daemonize)
(for-each start '(mpd mpd-watcher mcron aw-server aw-watcher-afk aw-watcher-window pulseeffects xsettingsd discord-rich-presence polkit-gnome davmail))
(for-each start '(mpd mpd-watcher mcron aw-server aw-watcher-afk aw-watcher-window pulseeffects xsettingsd discord-rich-presence polkit-gnome davmail xmodmap))

3
.config/yadm/encrypt
View file

@ -5,5 +5,6 @@ Mail/thexcloud/.credentials.gmailieer.json
Mail/progin6304/.credentials.gmailieer.json
.emacs.d/dired-bookmarks.el
.emacs.d/elfeed.org
.emacs.d/prodigy.org
.emacs.d/private.org
.emacs.d/prodigy-config.el
.emacs.d/private.el

BIN
.local/share/yadm/archive
View file

Binary file not shown.

13
Desktop.org
View file

@ -2357,6 +2357,14 @@ Launch an authentication agent. Necessary for stuff like =pkexec=. I suspect I'm
#:start (make-forkexec-constructor '("/home/pavel/.guix-extra-profiles/desktop/desktop/libexec/polkit-gnome-authentication-agent-1"))
#:stop (make-kill-destructor)))
#+end_src
** Xmodmap
#+begin_src scheme
(define xmodmap
(make <service>
#:provides '(xmodmap)
#:one-shot? #t
#:start (make-system-constructor "xmodmap /home/pavel/.Xmodmap")))
#+end_src
** VPN
Run my [[file:Guix.org::*VPN][OpenVPN setup]]. Not lauching this automatially, as it requires an active connection.
@ -2392,7 +2400,8 @@ Register services
discord-rich-presence
polkit-gnome
vpn
davmail)
davmail
xmodmap)
#+end_src
Daemonize shepherd
@ -2402,7 +2411,7 @@ Daemonize shepherd
Run services
#+begin_src scheme
(for-each start '(mpd mpd-watcher mcron aw-server aw-watcher-afk aw-watcher-window pulseeffects xsettingsd discord-rich-presence polkit-gnome davmail))
(for-each start '(mpd mpd-watcher mcron aw-server aw-watcher-afk aw-watcher-window pulseeffects xsettingsd discord-rich-presence polkit-gnome davmail xmodmap))
#+end_src
** Sync
| Guix dependency |