~ruther/guix-config

917d2bfac08e5337d885399ef66028c099ef05ab — Rutherther 7 months ago 56cf0dc
feat: make wm better self-container
2 files changed, 9 insertions(+), 12 deletions(-)

M home/dotfiles/dwl/print.sh
M home/modules/ruther/home/dwl/wm.scm
M home/dotfiles/dwl/print.sh => home/dotfiles/dwl/print.sh +2 -2
@@ 1,4 1,4 @@
#!/bin/sh -e
#!/usr/bin/env -S guix shell slurp grim wl-clipboard -- bash

out="$HOME/screens/$(date +%Y/%Y%m%d_%H%M%S).png"



@@ 8,6 8,6 @@ while getopts o:s arg; do case $arg in
                            ?|*) echo "usage: shot [-s] [-o out]" >&2; exit 1 ;;
                          esac; done

grim ''${sel:+ -g "$sel"} "$out"
grim ${sel:+ -g "$sel"} "$out"
echo "$out"
wl-copy -t image/png < "$out"

M home/modules/ruther/home/dwl/wm.scm => home/modules/ruther/home/dwl/wm.scm +7 -10
@@ 57,22 57,19 @@
                    #~(modify-phases #$original-phases
                        (add-after 'unpack 'add-config
                          (lambda _
                            (copy-file #$(local-file "config.h") "config.h"))))))))))
                            (copy-file #$(local-file "config.h") "config.h")
                            (substitute* "config.h"
                              (("\"foot\"") (string-append #$foot "/bin/foot"))
                              (("\"rofi\"") (string-append #$rofi-wayland "/bin/rofi"))
                              (("\"passmenu\"") (string-append #$password-store-wl "/bin/passmenu"))
                              (("\"emacsclient\"") (string-append #$emacs-pgtk "/bin/emacsclient"))))))))))))

;; Packages I use when in the WM, it's dependent on those.
(define wm-packages
  (specifications->manifest
   '("waybar-mine"
     "rofi-wayland"
     "brillo"
   '("brillo"
     "wlr-randr"
     "dwlmsg"
     "wlopm"

     "grim"
     "slurp"

     "swayidle"

     "password-store-wl"


Do not follow this link