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.

141 lines
3.0 KiB

4 years ago
  1. ;; Options
  2. ;; Here's a complete list of all of the options configurable for each host, and their default values. If a host configuration does not exist, the default values will remain.
  3. ;; Configure the system font with a single ~font-family~ and define the size, of which variations to the font size are relative to this value.
  4. (defvar dotfiles/font
  5. "Fira Code"
  6. "Unified system font family, used on all font faces.")
  7. (defvar dotfiles/font-size
  8. 96
  9. "Unified font size, of which all variations are relative to.")
  10. ;; Used by the desktop module to find the appropriate browser.
  11. (defvar dotfiles/browser
  12. (getenv "BROWSER")
  13. "The default browser used by the system.")
  14. ;; Used by the writing module to determine the system language.
  15. (defvar dotfiles/language
  16. (getenv "LANG")
  17. "The default system language.")
  18. ;; All of the available modules defined in the ~dotfiles/modules-available~ constant.
  19. (defconst dotfiles/modules-available
  20. '(core editor desktop writing projects interface)
  21. "All of the available modules for hosts to load.")
  22. ;; Add the modules you want to initialize to the ~dotfiles/modules~ variable.
  23. (defvar dotfiles/modules
  24. dotfiles/modules-available
  25. "Enabled modules, modify this in your host configuration.")
  26. ;; Specify the emacs home, and the cache directory.
  27. (defvar dotfiles/home
  28. user-emacs-directory
  29. "Original value of `user-emacs-directory'.")
  30. ;; Used to seperate the immutable configuration from the stateful package files.
  31. (defvar dotfiles/cache
  32. (expand-file-name "~/.cache/emacs")
  33. "Where `user-emacs-directory' redirects to.")
  34. ;; Functionality like =completion= and =hints= delayed to avoid popups for common manuevers.
  35. (defvar dotfiles/idle
  36. 0.0
  37. "Length of time to wait before offering completions.")
  38. ;; Required for the all powerful leader key.
  39. (defvar dotfiles/leader-key
  40. "SPC"
  41. "Custom leader key for custom actions.")
  42. ;; The desktop module requires the global leader key set.
  43. (defvar dotfiles/leader-key-global
  44. (concat "C-" dotfiles/leader-key)
  45. "Global leader key available everywhere.")
  46. ;; Define where the source repositories exist on disk, for integration with the projects module.
  47. (defvar dotfiles/projects
  48. (expand-file-name "~/.local/source/")
  49. "Location where source code projects exist on disk.")
  50. ;; Where the password store exists on disk.
  51. (defvar dotfiles/passwords
  52. (expand-file-name "~/.password-store/")
  53. "Directory containing the password store.")
  54. ;; Configure the public GPG key that Emacs will encrypt files to.
  55. (defvar dotfiles/public-key
  56. "37AB1CB72B741E478CA026D43025DCBD46F81C0F"
  57. "Public PGP key that Emacs will encrypt files to.")
  58. ;; Startup
  59. ;; The host configuration loads (if it exist) using the systems name.
  60. (let ((host-file (concat dotfiles/home "/hosts/" system-name ".el")))
  61. (when (file-exists-p host-file)
  62. (load-file host-file)))
  63. ;; Load all of the enabled modules:
  64. (dolist (m dotfiles/modules)
  65. (let ((mod-file (concat dotfiles/home "/modules/" (symbol-name m) ".el")))
  66. (when (file-exists-p mod-file)
  67. (load-file mod-file))))