ambrevar/shell: Use right Guix for kernel modules.

2021-03-28 20:55:22 +02:00 · 2021-03-28 20:55:22 +02:00 · 0197c1a92f
parent 31ffdbd505
commit 0197c1a92f
1 changed files with 2 additions and 1 deletions
--- a/.local/share/common-lisp/source/ambrevar/shell.lisp
+++ b/.local/share/common-lisp/source/ambrevar/shell.lisp
@ -379,7 +379,8 @@ INTERFACE is a string in the form of `wlp2s0'."
 (export-always 'mimimi-save-power)
 (defun mimimi-save-power ()
  (flet ((bbswitch-off ()
-           (let* ((bbswitch-path (cmd:$cmd "guix" "build" "bbswitch-module"))
+           (let* ((bbswitch-path (cmd:$cmd "/run/booted-system/profile/bin/guix"
+                                           "build" "bbswitch-module"))
                  (modules (str:concat bbswitch-path "/lib/modules"))
                  (first-dir (namestring (first (uiop:subdirectories modules))))
                  (switch "/proc/acpi/bbswitch"))