diff options
| -rw-r--r-- | .emacs.d/init.el | 12 | ||||
| -rwxr-xr-x | emacs.org | 19 |
2 files changed, 19 insertions, 12 deletions
diff --git a/.emacs.d/init.el b/.emacs.d/init.el index 32b46c1..38a9597 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -1,6 +1,9 @@ +(defvar is-zeus (equal (system-name) "zeus")) +(defvar is-hephaestus (equal (system-name) "hephaestus")) + ;; When guix t, load emacs packages -(when (or (equal (system-name) "hephaestus") - (equal (system-name) "zeus")) +(when (or is-zeus + is-hephaestus (add-to-list 'load-path "~/.guix-profile/share/emacs/site-lisp") (guix-emacs-autoload-packages)) @@ -101,8 +104,8 @@ Contains the list of packages that need to be installed.") (add-to-list 'default-frame-alist '(alpha 100 100)) (add-hook 'dired-mode-hook 'all-the-icons-dired-mode) -(when (equal (system-name) "hephaestus") - (display-battery-mode 1)) +(when is-hephaestus + (display-battery-mode 0)) (scroll-bar-mode -1) (tool-bar-mode -1) @@ -651,7 +654,6 @@ you have the correctly set the OPENAI_API_KEY variable" (general-define-key "C-d" 'kill-region "C-k" 'copy-region-as-kill - "C-c v" 'multi-vterm-next "C-x 9" 'make-mini-buffer "C-c l e" 'apollo/emacs-keys ;;Change keyboard layouts/language @@ -5,6 +5,7 @@ #+STARTUP: overview * Table of contents :TOC: +- [[#system-information][System information]] - [[#setting-up-packages][Setting up Packages]] - [[#setup-for-guixsd-machines][Setup for GuixSD machines]] - [[#define-and-install-packages][Define and install packages]] @@ -47,15 +48,20 @@ - [[#mu4e--email-configuration][mu4e | Email Configuration]] - [[#exwm][EXWM]] +* System information +Check the ~$HOSTNAME~, if it's one of my devices running GuixSD. +#+begin_src emacs-lisp + (defvar is-zeus (equal (system-name) "zeus")) + (defvar is-hephaestus (equal (system-name) "hephaestus")) +#+end_src * Setting up Packages + ** Setup for GuixSD machines -We check the ~$HOSTNAME~, if it's one of my devices running GuixSD. -we use ~guix-emacs-autoload-packages~ to load emacs packages installed using guix if ~t~ + If you are running GuixSD, replace the following hostnames ~fsociety~ or ~heisenberg~ with your own ~$HOSTNAME~ #+begin_src emacs-lisp ;; When guix t, load emacs packages - (when (or (equal (system-name) "hephaestus") - (equal (system-name) "zeus")) + (when (or is-zeus + is-hephaestus (add-to-list 'load-path "~/.guix-profile/share/emacs/site-lisp") (guix-emacs-autoload-packages)) @@ -168,8 +174,8 @@ Fonts and basic appearance settings (add-to-list 'default-frame-alist '(alpha 100 100)) (add-hook 'dired-mode-hook 'all-the-icons-dired-mode) - (when (equal (system-name) "hephaestus") - (display-battery-mode 1)) + (when is-hephaestus + (display-battery-mode 0)) (scroll-bar-mode -1) (tool-bar-mode -1) @@ -752,7 +758,6 @@ Hook with ~dired-mode~ (general-define-key "C-d" 'kill-region "C-k" 'copy-region-as-kill - "C-c v" 'multi-vterm-next "C-x 9" 'make-mini-buffer "C-c l e" 'apollo/emacs-keys ;;Change keyboard layouts/language |