diff options
| author | Thanos Apollo <[email protected]> | 2023-03-23 08:01:02 +0200 |
|---|---|---|
| committer | Thanos Apollo <[email protected]> | 2023-03-23 08:01:02 +0200 |
| commit | 11016ec0188ddcee6400e1dd488d99689418d7a2 (patch) | |
| tree | 626b449996b7c61ff3fc6b1fc6c669f29d9a0928 /.emacs.d | |
| parent | 8a85f0b234d66fee8e7e9b5dab45785d54411c97 (diff) | |
emacs: Add variables for each one of my machines
Add var to check for zeus and hephaestus devices with (system-name)
Diffstat (limited to '.emacs.d')
| -rw-r--r-- | .emacs.d/init.el | 12 |
1 files changed, 7 insertions, 5 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 |