I showed you my source code, pls respond
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

58 lines
1.6 KiB

4 years ago
4 years ago
4 years ago
  1. (defvar dotfiles/font
  2. "Fira Code"
  3. "Unified system font family, used on all font faces.")
  4. (defvar dotfiles/font-size
  5. 96
  6. "Unified font size, of which all variations are relative to.")
  7. (defvar dotfiles/browser
  8. (getenv "BROWSER")
  9. "The default browser used by the system.")
  10. (defconst dotfiles/modules-available
  11. '(core desktop writing projects interface)
  12. "All of the available modules for hosts to load.")
  13. (defvar dotfiles/modules
  14. dotfiles/modules-available
  15. "Enabled modules, modify this in your host configuration.")
  16. (defvar dotfiles/home
  17. user-emacs-directory
  18. "Original value of `user-emacs-directory'.")
  19. (defvar dotfiles/cache
  20. (expand-file-name "~/.cache/emacs")
  21. "Where `user-emacs-directory' will be redirected.")
  22. (defvar dotfiles/idle
  23. 0.0
  24. "Length of time to wait before offering completions.")
  25. (defvar dotfiles/leader-key
  26. "SPC"
  27. "Custom leader key for custom actions.")
  28. (defvar dotfiles/leader-key-global
  29. (concat "C-" dotfiles/leader-key)
  30. "Global leader key available everywhere.")
  31. (defvar dotfiles/projects
  32. (expand-file-name "~/.local/source/")
  33. "Location where source code projects are stored.")
  34. (defvar dotfiles/passwords
  35. (expand-file-name "~/.password-store/")
  36. "Directory containing the password store.")
  37. ;; Load the host configuration.
  38. (let ((host-file (concat dotfiles/home "/hosts/" system-name ".el")))
  39. (when (file-exists-p host-file)
  40. (load-file host-file)))
  41. ;; Load the enabled modules.
  42. (dolist (m dotfiles/modules)
  43. (let ((mod-file (concat dotfiles/home "/modules/" (symbol-name m) ".el")))
  44. (when (file-exists-p mod-file)
  45. (load-file mod-file))))