phundrak/dotfiles
1
0
Fork 0
Code Issues Pull Requests Activity

[StumpWM, Bin] Replace StumpWM’s notification manager with Dunst

Browse Source
This commit is contained in:
Lucien Cartier-Tilet 2022-03-10 22:25:56 +01:00
parent 84e3c91c51
commit de78e16bd9
Signed by: phundrak
GPG Key ID: BD7789E705CB8DCA
2 changed files with 22 additions and 36 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

36
org/config/bin.org
View File

@ -42,33 +42,35 @@ of said command running.
| ~xwallpaper~ | ~--zoom "$(cat "$HOME"/.cache/wallpaper)"~ | no | | ~xwallpaper~ | ~--zoom "$(cat "$HOME"/.cache/wallpaper)"~ | no |
| ~xss-lock~ | ~plock~ | yes | | ~xss-lock~ | ~plock~ | yes |
| ~/usr/lib/kdeconnectd~ | | yes | | ~/usr/lib/kdeconnectd~ | | yes |
| ~dunst~ | | yes |
#+NAME: autostart-gen #+NAME: autostart-gen
#+header: :wrap "src bash :exports code" #+header: :wrap "src bash :exports code"
#+BEGIN_SRC emacs-lisp :var table=autostart-table :cache yes #+BEGIN_SRC emacs-lisp :var table=autostart-table :cache yes
(mapconcat (lambda (start-command) (mapconcat (lambda (start-command)
(let ((command (replace-regexp-in-string (regexp-quote "~") "" (nth 0 start-command))) (let* ((command (replace-regexp-in-string (regexp-quote "~") "" (nth 0 start-command)))
(arguments (replace-regexp-in-string (regexp-quote "~") "" (nth 1 start-command))) (arguments (replace-regexp-in-string (regexp-quote "~") "" (nth 1 start-command)))
(oncep (string= "yes" (nth 2 start-command)))) (oncep (string= "yes" (nth 2 start-command)))
(full-command (replace-regexp-in-string " +"
" "
(format "%s %s &" command arguments))))
(if oncep (if oncep
(format (format
(concat "if pgrep -x %s ; then\n" (concat "if pgrep -x %s ; then\n"
" echo \"%s already running\"\n" " echo \"%s already running\"\n"
"else\n" "else\n"
" %s &\n" " %s\n"
" disown\n" " disown\n"
"fi") "fi")
command command
command command
(replace-regexp-in-string " +" " " (format "%s %s" full-command)
command full-command)))
arguments)))
(format "%s %s &" command arguments))))
table table
"\n") "\n")
#+END_SRC #+END_SRC
#+RESULTS[7f5adf8d562e118b8e468d7c62c94a8708d32d9e]: autostart-gen #+RESULTS[97a97fceb694333615e59599d7c2d7fac52c5e8d]: autostart-gen
#+begin_src bash :exports code #+begin_src bash :exports code
pactl load-module module-switch-on-connect & pactl load-module module-switch-on-connect &
mpc stop & mpc stop &
@ -79,7 +81,7 @@ else
picom --experimental-backends & picom --experimental-backends &
disown disown
fi fi
set-screens & set-screens &
if pgrep -x numlockx ; then if pgrep -x numlockx ; then
echo "numlockx already running" echo "numlockx already running"
else else
@ -89,19 +91,19 @@ fi
if pgrep -x pumopm ; then if pgrep -x pumopm ; then
echo "pumopm already running" echo "pumopm already running"
else else
pumopm & pumopm &
disown disown
fi fi
if pgrep -x xfce-polkit ; then if pgrep -x xfce-polkit ; then
echo "xfce-polkit already running" echo "xfce-polkit already running"
else else
xfce-polkit & xfce-polkit &
disown disown
fi fi
if pgrep -x nm-applet ; then if pgrep -x nm-applet ; then
echo "nm-applet already running" echo "nm-applet already running"
else else
nm-applet & nm-applet &
disown disown
fi fi
xwallpaper --zoom "$(cat "$HOME"/.cache/wallpaper)" & xwallpaper --zoom "$(cat "$HOME"/.cache/wallpaper)" &
@ -114,7 +116,13 @@ fi
if pgrep -x /usr/lib/kdeconnectd ; then if pgrep -x /usr/lib/kdeconnectd ; then
echo "/usr/lib/kdeconnectd already running" echo "/usr/lib/kdeconnectd already running"
else else
/usr/lib/kdeconnectd & /usr/lib/kdeconnectd &
disown
fi
if pgrep -x dunst ; then
echo "dunst already running"
else
dunst &
disown disown
fi fi
#+end_src #+end_src

22
org/config/stumpwm.org
View File

@ -1112,28 +1112,6 @@ paru -S libfixposix --noconfirm
<<keybinds-gen(map="*root-map*", keybinds=nm-keybinds)>> <<keybinds-gen(map="*root-map*", keybinds=nm-keybinds)>>
#+end_src #+end_src
** Notifications
:PROPERTIES:
:CUSTOM_ID: Utilities-Notifications-g7rj2qu0z9j0
:END:
No need for ~dunst~ or something like that, the contrib modules of
StumpWM have got us covered! Simply load the module and toggle the
server on.
#+begin_src lisp
(load-module "notify")
(notify:notify-server-toggle)
#+end_src
I don’t like the default colors of the notifications though, let’s change that.
#+begin_src lisp
(load "~/.stumpwm.d/colors.lisp")
(setf notify:*notify-server-title-color* "^2"
notify:*notify-server-body-color* "^7")
#+end_src
** Pinentry ** Pinentry
:PROPERTIES: :PROPERTIES:
:CUSTOM_ID: Utilities-Pinentry-o6v95fu0z9j0 :CUSTOM_ID: Utilities-Pinentry-o6v95fu0z9j0