diff options
Diffstat (limited to '.config/emacs')
| -rw-r--r-- | .config/emacs/init.el | 15 |
1 files changed, 8 insertions, 7 deletions
diff --git a/.config/emacs/init.el b/.config/emacs/init.el index c5290cf..0a57979 100644 --- a/.config/emacs/init.el +++ b/.config/emacs/init.el @@ -1,6 +1,6 @@ ;;; init.el --- Emacs configuration -*- lexical-binding: t; -*- -;; Copyright (C) 2023 Thanos Apollo +;; Copyright (C) 2023-2069 Thanos Apollo ;; Author: Thanos Apollo <[email protected]> @@ -36,9 +36,9 @@ user-mail-address "[email protected]") -(defvar is-zeus (equal (system-name) "zeus")) -(defvar is-hermes (equal (system-name) "hermes")) -(defvar is-phone (equal (system-name) "localhost")) +(defvar is-zeus (string= (system-name) "zeus")) +(defvar is-hermes (string= (system-name) "hermes")) +(defvar is-phone (string= (system-name) "localhost")) ;; Font (custom-set-faces @@ -92,7 +92,6 @@ (setf straight-recipe-overrides '((transmission :type git :host nil :repo "[email protected]:/var/git/transmission.git") - ;; (yeetube :type git :host nil :repo "[email protected]:/var/git/yeetube.git") (gnosis :type git :host nil :repo "[email protected]:/var/git/gnosis.git") (pcmpl-emerge :type git :host nil :repo "[email protected]:/var/git/pcmpl-emerge.git") (pcmpl-rc :type git :host nil :repo "[email protected]:/var/git/pcmpl-rc.git"))) @@ -102,7 +101,7 @@ :config (setf browse-url-browser-function 'browse-url-generic - browse-url-generic-program "icecat" + browse-url-generic-program "librewolf" backup-directory-alist '((".*" . "~/.Trash")) sentence-end-double-space t default-input-method "bulgarian-phonetic" @@ -126,7 +125,8 @@ ("C-z" . nil) ("C-c r" . 'rename-visited-file)) :hook ((emacs-lisp-mode . prettify-symbols-mode) - (lisp-mode . prettify-symbols-mode))) + (lisp-mode . prettify-symbols-mode) + (scheme-mode . prettify-symbols-mode))) (use-package dired :straight nil @@ -454,6 +454,7 @@ ("C-x r b" . 'consult-bookmark) ("C-c m" . 'consult-imenu) ("C-x b" . 'consult-buffer) + ("C-x C-b" . 'switch-to-prev-buffer) ("M-y" . 'consult-yank-from-kill-ring) ("C-s" . 'thanos/search) :map thanos/search |