I don't know where to find the exception itself. The only error I get is at boot and states "/gnu/store/fw305y3ga53yi27pa5bsvvala983w8ik-shepherd.conf: exception thrown while loading configuration file". The root Shepherd seemingly starts fine but the user-level one doesn't. Here's my system and home configuration, as well as the shepherd.conf file:

(use-modules (gnu)
             (gnu packages)
             (nongnu packages linux)
             (nongnu system linux-initrd)
             (nongnu packages firmware))
(use-service-modules cups desktop networking ssh xorg admin sound virtualization pm audio firmware)

(operating-system
 (kernel linux)
 (initrd microcode-initrd)
 (firmware (list linux-firmware sof-firmware))
 (locale "en_GB.utf8")
 (timezone "Europe/Budapest")
 (keyboard-layout (keyboard-layout "us"))
 (host-name "ggero-host")

 (users (cons* (user-account
                (name "ggero")
                (comment "Gabor Gero")
                (group "users")
                (home-directory "/home/ggero")
                (supplementary-groups '("wheel" "netdev" "audio" "video")))
               %base-user-accounts))
 (packages
  (append (map specification->package
               '("lynx"
                 "emacs"
                 "ksshaskpass"
                 "plasma-integration"
                 "desktop-file-utils"
                 "dolphin-plugins"))
          %base-packages))
 (services
  (append (list
                (service plasma-desktop-service-type)
                (service kwallet-service-type
                         (kwallet-configuration
                          (pam-services '(("gdm-password" . login)
                                          ("passwd" . passwd)))))
                (service power-profiles-daemon-service-type)
                (service bluetooth-service-type)
                (service file-database-service-type)
                (service package-database-service-type)
                (service openssh-service-type)
                (service cups-service-type)
                (service qemu-binfmt-service-type
                         (qemu-binfmt-configuration
                          (platforms (lookup-qemu-platforms "x86" "arm" "aarch64"))))
                (set-xorg-configuration
                 (xorg-configuration (keyboard-layout keyboard-layout))))
          (modify-services %desktop-services
                           (guix-service-type config => (guix-configuration
                                                         (inherit config)
 (substitute-urls
                                                          (append (list
 "https://substitutes.nonguix.org";
 "https://hydra-guix-129.guix.gnu.org/";
 "https://bordeaux-singapore-mirror.cbaines.net/";
 "https://bordeaux-us-east-mirror.cbaines.net/";
 "https://guix.bordeaux.inria.fr/";)
%default-substitute-urls))
 (authorized-keys
                                                          (append (list
 (local-file "./nonguix-signing-key.pub")
 (local-file "./science-signing-key.pub")) %default-authorized-guix-keys)))))))
 (bootloader (bootloader-configuration
              (bootloader grub-efi-bootloader)
              (targets (list "/boot/efi"))
              (keyboard-layout keyboard-layout)))
 (swap-devices (list (swap-space
                      (target (uuid
 "96ff5eda-c5a9-4b8e-ac98-f6c7a8647415")))))
 (file-systems (cons* (file-system
                       (mount-point "/boot/efi")
                       (device (uuid "3AC5-B4DA"
                                     'fat32))
                       (type "vfat"))
                      (file-system
                       (mount-point "/")
                       (device (uuid
"15a7298c-b7bd-472a-96a3-b54019842609"
                                'ext4))
                       (type "ext4")) %base-file-systems)))


(use-modules (guix channels)
                         (guix inferior)
                         (guix gexp)
                         (gnu home)
                         (gnu home services desktop)
                         (gnu home services guix)
                         (gnu home services shells)
                         (gnu home services sound)
                         (gnu home services shepherd)
                         (gnu home services niri)
                         (gnu packages)
                         (gnu services)
                         (guix transformations)
                         (gnu packages emacs))

(define *newest-emacs* #t)

(define emacs-package
    (if *newest-emacs*
            (begin
                (car (lookup-inferior-packages
                            (inferior-for-channels
                             (list (channel
                                            (name 'guix)
                                            (url "https://git.guix.gnu.org/guix.git";)
                                            (branch "emacs-team")
                                            (introduction
 (make-channel-introduction
"9edb3f66fd807b096b48283debdcddccfea34bad"
(openpgp-fingerprint
                                                 "BBB0 2DDF 2CEA F6A8 0D1D  E643 A2A0 6DF2 A33A 54FA"))))))
                            "emacs")))
            emacs))

(define-syntax preserve-variable
    (syntax-rules ()
        ((preserve-variable str)
         (string-append str "=" (or (getenv str) "")))))

(define emacsd-service
  (simple-service 'emacs-daemon-service home-shepherd-service-type
                                    (list (shepherd-service
                                                 (provision '(emacs emacsd emacs-daemon))
                                                 (respawn? #t)
                                                 (respawn-limit 3)
                                                 (start #~(make-forkexec-constructor
   (list #$(file-append emacs-package "/bin/emacs") "--fg-daemon")
   #:environment-variables (list
(preserve-variable "WAYLAND_DISPLAY")
(preserve-variable "DISPLAY")
(preserve-variable "XAUTHORITY"))))
                                                 (stop #~(make-kill-destructor))
                                                 (auto-start? #t)
                                                 (documentation "Start emacsdaemon.")))))

(define transform1
  (options->transformation '((with-branch . "yt-dlp=master"))))

(define emacs-packages (list
(specification->package "emacs-auctex")
(specification->package "emacs-beacon")
(specification->package "emacs-ben")
(specification->package "emacs-cape")
(specification->package "emacs-consult")
(specification->package "emacs-diff-hl")
(specification->package "emacs-eat")
(specification->package "emacs-edit-indirect")
(specification->package "emacs-embark")
(specification->package "emacs-envrc")
(specification->package "emacs-forge")
(specification->package "emacs-geiser")
(specification->package "emacs-geiser-guile")
(specification->package "emacs-guix")
(specification->package "emacs-hl-todo")
(specification->package "emacs-hyperbole")
(specification->package "emacs-iedit")
(specification->package "emacs-macrostep-geiser")
(specification->package "emacs-marginalia")
(specification->package "emacs-org-modern")
(specification->package "emacs-org-modern-indent")
(specification->package "emacs-vertico")
(specification->package "emacs-magit")
(specification->package "emacs-orderless")
(specification->package "emacs-paredit")
(specification->package "emacs-sly")
(specification->package "emacs-sly-asdf")
(specification->package "emacs-sly-macrostep")
(specification->package "emacs-sly-quicklisp")
(specification->package "emacs-sly-stepper")
(specification->package "emacs-treesit-auto")
(specification->package "emacs-typst-ts-mode")
(specification->package "emacs-undo-tree")
(specification->package "emacs-web-mode")
(specification->package "emacs-yasnippet")
(specification->package "emacs-yasnippet-snippets")
(specification->package "emacs-zig-mode")))

(home-environment
 (packages (append
                        (list
                         (specification->package "7zip")
                         (specification->package "ark")
                         (specification->package "akregator")
                         (specification->package "codeberg-cli")
                         (specification->package "desktop-file-utils")
                         (specification->package "direnv")
                         (specification->package "elisa")
                         emacs-package
                         (specification->package "file")
                         (specification->package "filelight")
                         (specification->package "firefox-esr")
                         (specification->package "git")
                         (specification->package "gnupg")
                         (specification->package "graphviz")
                         (specification->package "guile")
                         (specification->package "gwenview")
                         (specification->package "haruna")
                         (specification->package "icedove")
                         (specification->package "isoimagewriter")
                         (specification->package "imhex")
                         (specification->package "kbackup")
                         (specification->package "kdeconnect")
                         (specification->package "keepassxc")
                         (specification->package "kfind")
                         (specification->package "kget")
                         (specification->package "kgpg")
                         (specification->package "kgraphviewer")
                         (specification->package "kicad")
                         (specification->package "konversation")
                         (specification->package "korganizer")
                         (specification->package "krusader")
                         (specification->package "ksystemlog")
                         (specification->package "libreoffice")
                         (specification->package "ncmpcpp")
                         (specification->package "ncurses")
                         (specification->package "nushell")
                         (specification->package "obs")
                         (specification->package "okular")
                         (specification->package "pinentry-qt")
                         (specification->package "plasma-browser-integration")
                         (specification->package "prettypst")
                         (specification->package "qbittorrent")
                         (specification->package "recutils")
                         (specification->package "rmpc")
                         (specification->package "spectacle")
                         (specification->package "speedcrunch")
                         (specification->package "texlive-collection-latexrecommended")                          (specification->package "texlive-collection-fontsrecommended")                          (specification->package "texlive-collection-luatex")                          (specification->package "texlive-collection-pictures")                          (specification->package "texlive-collection-xetex")
                         (specification->package "texlive-scheme-basic")
                         (specification->package "texlive-texdoc")
                         (specification->package "texstudio")
                         (specification->package "torbrowser")
                         (specification->package "typst")
                         (specification->package "unrar")
                         (specification->package "unzip")
                         (specification->package "ydotool")
                         (transform1 (specification->package "yt-dlp"))
                         (specification->package "zip"))
                        emacs-packages))
 (services
  (append (list (service home-bash-service-type
                         (home-bash-configuration
                          (aliases '())
                          (bashrc (list (local-file
                                         "./.bashrc" "bashrc")))
                          (bash-profile (list (local-file
                                               "./.bash_profile"
                                               "bash_profile")))
(environment-variables '(("EDITOR" . "emacs")))))
                                (service home-pipewire-service-type)
                                (service home-dbus-service-type)
                                (service home-niri-service-type)
                                emacsd-service
                                (simple-service 'channels home-channels-service-type
(list
 (channel
  (name 'nonguix)
  (url "https://gitlab.com/nonguix/nonguix";)
  (introduction
   (make-channel-introduction
      "897c1a470da759236cc11798f4e0a5f7d4d59fbc"
      (openpgp-fingerprint
       "2A39 3FFF 68F4 EF7A 3D29  12AF 6F51 20A0 22FB B2D5"))))
 (channel
  (name 'guix-science)
  (url "https://codeberg.org/guix-science/guix-science.git";)
  (introduction
   (make-channel-introduction
      "b1fe5aaff3ab48e798a4cce02f0212bc91f423dc"
      (openpgp-fingerprint
       "CA4F 8CF4 37D7 478F DA05  5FD4 4213 7701 1A37 8446"))))
 (channel
  (name 'dev-channel)
  (url "https://codeberg.org/gerogaga/dev-channel.git";)))))
          %base-home-services)))

(begin (use-modules (srfi srfi-34) (system repl error-handling)) (define (make-user-module) (let ((m (make-fresh-user-module))) (module-use! m (resolve-interface (quote (shepherd service)))) m)) (register-services (map (lambda (file) (save-module-excursion (lambda () (set-current-module (make-user-module)) (load file)))) (quote ("/gnu/store/hjjf61pj1k0irrdi2zfyizl1cjpwmjii-shepherd-transient.scm" "/gnu/store/qr7sj60ys24j0schcisbazx3v0w6arzq-shepherd-timer.scm" "/gnu/store/kjdgvlacm04pdclb0k6mshxxjaa2nnnd-shepherd-log-rotation.scm" "/gnu/store/2bm3pvhqkbyrchpzmlhbwn11a30fm1w4-shepherd-emacs-emacsd-emacs-daemon.scm" "/gnu/store/mjhr4f17h5xhpg3jk6isnhjwd0bb6i2a-shepherd-niri.scm" "/gnu/store/js1cv24pcwi114yk78cza4k8nv6b0vc9-shepherd-dbus.scm" "/gnu/store/fllbw4a7xi1z1h836v27z2avd90rnlx4-shepherd-pipewire.scm" "/gnu/store/x07lrvv8gqx7lh1z7pp5p3bwnfg0gn1w-shepherd-wireplumber.scm" "/gnu/store/kj27f4ww3lqxm962ncsp4g47ar2l0dzn-shepherd-pipewire-pulseaudio.scm")))) (perform-service-action root-service (quote daemonize)) (format #t "Starting services...~%") (let ((services-to-start (quote (transient timer log-rotation emacs emacsd emacs-daemon niri dbus pipewire wireplumber pipewire-pulseaudio)))) (start-in-the-background services-to-start) (redirect-port (open-input-file "/dev/null") (current-input-port))))

I have edited the shepherd.conf file by mistake a little while ago, but only added whitespaces and indentation, and the changes don't seem to have stuck.

Appreciate the help,

Gábor Gerő


Reply via email to