(define-module (oni home config data)
  #:use-module (gnu home services desktop)
  #:use-module (gnu home services)
  #:use-module (gnu home services gnupg)
  #:use-module (gnu home services niri)
  #:use-module (gnu home)
  #:use-module (gnu packages admin)
  #:use-module (gnu packages emacs)
  #:use-module ((gnu packages emacs-xyz)
                #:select (emacs-guix
                          emacs-org-contacts))
  #:use-module ((gnu packages fonts)
                #:select (font-dosis))
  #:use-module ((gnu packages forth)
                #:select (gforth))
  #:use-module (gnu packages shellutils)
  #:use-module (gnu packages wm)
  #:use-module (gnu packages xdisorg)
  #:use-module (gnu packages)
  #:use-module (gnu services)
  #:use-module (guix gexp)
  #:use-module (oni home config common)
  #:use-module ((oni home services emacs)
                #:select (home-emacs-service-type
                          home-emacs-configuration
                          home-emacs-helpful-configuration
                          home-emacs-yasnippet-capf-configuration
                          home-emacs-eros-service-type
                          home-emacs-ace-link-service-type
                          home-emacs-ace-link-configuration
                          home-emacs-golden-ratio-service-type
                          home-emacs-pinentry-service-type
                          home-emacs-org-caldav-service-type
                          home-emacs-envrc-configuration))
  #:use-module (oni home services environment)
  #:use-module (oni home services git)
  #:use-module (oni home services kdeconnect)
  #:use-module ((oni home services mail)
                #:select (home-mbsync-service-type))
  #:use-module (oni home services syncthing)
  #:use-module (oni home services wm)
  #:use-module ((oni packages emacs)
                #:select (emacs-outli
                          emacs-syncthing-status))
  #:use-module (oni packages emacs-config)
  #:use-module (oni packages pick-random-wallpaper))

(home-environment
 (packages (append
            foreign-distro-compatibility-packages
            (map specification->package '("font-fantasque-sans"
                                          "font-comic-neue"
                                          "fuzzel"
                                          "wezterm"
                                          "signal-desktop"
                                          "openssh"
                                          "keepassxc"
                                          "font-dosis"
                                          "swaybg"))
            (list
                  pick-random-wallpaper
                  emacs-org-contacts
                  emacs-syncthing-status
                  emacs-outli
                  emacs-guix

                  (emacs-oni-org-roam emacs-pgtk)
                  emacs-oni-vterm
                  emacs-oni-elisp
                  emacs-oni-core
                  emacs-oni-eshell
                  emacs-oni-compilation
                  emacs-oni-common-lisp
                  emacs-oni-gui
                  emacs-oni-magit
                  emacs-oni-project
                  emacs-oni-bookmark
                  emacs-oni-dired
                  emacs-oni-browse-url
                  emacs-oni-c
                  emacs-oni-conf
                  emacs-oni-css
                  emacs-oni-diff-hl
                  emacs-oni-ediff
                  emacs-oni-embrace
                  emacs-oni-eww
                  emacs-oni-grep
                  emacs-oni-highlight-indent-guides
                  emacs-oni-html
                  emacs-oni-json
                  emacs-oni-log-edit
                  emacs-oni-lua
                  emacs-oni-makefile
                  emacs-oni-nxml
                  emacs-oni-package
                  emacs-oni-projectile
                  emacs-oni-scheme
                  emacs-oni-sh
                  emacs-oni-shr
                  emacs-oni-tramp
                  emacs-oni-git-commit
                  emacs-oni-python
                  emacs-oni-yaml
                  emacs-oni-gnus
                  emacs-oni-elfeed

                  gforth)))

 (services
  (append
   home-zsh-services
   (list
    home-channels-service
    home-environment-service
    home-redshift-service
    home-guile-service
    home-openssh-service
    home-kitty-service

    (service home-gpg-agent-service-type
             (home-gpg-agent-configuration
              (ssh-support? #t)
              (extra-content
               "allow-emacs-pinentry\n")))

    (service home-kdeconnect-service-type)

    (service home-syncthing-service-type)

    (service home-emacs-service-type
             (home-emacs-configuration
              (helpful-configuration
               (home-emacs-helpful-configuration
                (configurations
                 (list
                  (local-file "../services/emacs/oni-helpful.el")))))
              (yasnippet-capf
               (home-emacs-yasnippet-capf-configuration))
              (envrc
               (home-emacs-envrc-configuration))
              (package emacs-pgtk)
              (configurations
               (list
                (local-file "../services/emacs/init.el")
                (mixed-text-file
                 "init.el"
                 "(with-eval-after-load 'project (require 'oni-project))\n"
                 "(projectile-mode)\n"
                 "(setq custom-file \"~/.config/emacs/custom.el\")\n"
                 "(load custom-file)\n"
                 "(provide 'init)\n"
                 ";;; init.el ends here\n")))))
    (service home-emacs-eros-service-type)
    (service home-emacs-ace-link-service-type
             (home-emacs-ace-link-configuration
              (default-key "C-S-e")
              (goto-address-key "C-S-e")
              (org-mode-key "C-S-e")))
    (service home-emacs-golden-ratio-service-type)
    (service home-emacs-pinentry-service-type)
    (service home-emacs-org-caldav-service-type)
    (service home-emacs-org-mem-service-type)

    (service home-mbsync-service-type)

    (service home-git-service-type
             (home-git-configuration
              (user-name "Tom Willemse")
              (user-email "tom@ryuslash.org")
              (sendemail-sendmailcmd "/usr/bin/msmtp")
              (init-default-branch "main")
              (init-default-branchname "main")
              (advice-detached-head #f)
              (extra "
[diff \"org\"]
    xfuncname = \"^\\\\*+ +(.+)\"
[diff \"lisp\"]
    xfuncname = \"^[[:space:]]*?\\\\(def\\\\w+? ((\\\\w|-|'|:|=|<|>)+)\"
")))

    (service home-niri-service-type)))))