This commit is contained in:
Curt Spark 2021-03-02 00:20:41 +00:00
parent 99bf5de8d2
commit cbbd461d7f
2 changed files with 54 additions and 5 deletions

View File

@ -95,12 +95,28 @@ Old theme for if you'd like to follow Xresources
;; Corrects (and improves) org-mode's native fontification. ;; Corrects (and improves) org-mode's native fontification.
(doom-themes-org-config)) (doom-themes-org-config))
#+END_SRC #+END_SRC
*** Custom Modeline
A custom sleek modeline which is also used in Centaur Emacs, Doom Emacs and Spacemacs.
Install and set the modeline, ensuring that it is always installed:
#+BEGIN_SRC emacs-lisp
(use-package doom-modeline
:ensure t
:init (doom-modeline-mode 1))
;; Display the current time on the modeline
(display-time 1)
#+END_SRC
*** All The Icons *** All The Icons
All The Icons is a package to display cool icons within Emacs. All The Icons is a package to display cool icons within Emacs.
Install the package, enable it and ensure that it always is installed: Install the package, enable it and ensure that it always is installed:
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp
(use-package all-the-icons (use-package all-the-icons
:ensure t) :ensure t)
(setq inhibit-compacting-font-caches t) ; Dont compact font caches during GC. Fixes lag on doom modeline
#+END_SRC #+END_SRC
All The Icons Support for Ivy/Counsel. Which are autocompletion tools in emacs All The Icons Support for Ivy/Counsel. Which are autocompletion tools in emacs
@ -604,7 +620,7 @@ Install the package, enable it and ensure that it always is installed, and then
(require 'exwm-config) (require 'exwm-config)
(exwm-config-default)) (exwm-config-default))
#+END_SRC #+END_SRC
*** Configuration **** Configuration
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp
;; Systemtray ;; Systemtray
(require 'exwm-systemtray) (require 'exwm-systemtray)
@ -615,17 +631,50 @@ Install the package, enable it and ensure that it always is installed, and then
;; Keybindings ;; Keybindings
(setq exwm-input-global-keys (setq exwm-input-global-keys
`(([?\s-r] . exwm-reset) `(;; Reset EXWM
([?\s-r] . exwm-reset)
;; EXWM Workspace Switcher
([?\s-w] . exwm-workspace-switch) ([?\s-w] . exwm-workspace-switch)
,@(mapcar (lambda (i) ,@(mapcar (lambda (i)
`(,(kbd (format "s-%d" i)) . `(,(kbd (format "s-%d" i)) .
(lambda () (lambda ()
(interactive) (interactive)
(exwm-workspace-switch-create ,i)))) (exwm-workspace-switch-create ,i))))
(number-sequence 0 9)))) (number-sequence 0 9))
;; Switch between char and line mode mode switcher
;; Char mode allows for practically all keybindings to be passed to the application aside from a few essential keybindings, line mode allows for emacs keybindings
([?\s-i] . exwm-input-toggle-keyboard)
;; Application Launcher
([?\s-d] . counsel-linux-app)))
;; Set all windows to open in char mode by default, allowing to pass through all key combinations
;; (add-hook 'exwm-manage-finish-hook
;; (lambda () (call-interactively #'exwm-input-release-keyboard)
;; (exwm-layout-hide-mode-line)))
;; Ido mode seems to be enabled in the default configuration, turn it back off as we are using Ivy completion instead. ;; Ido mode seems to be enabled in the default configuration, turn it back off as we are using Ivy completion instead.
(ido-mode -1) (ido-mode -1)
#+END_SRC #+END_SRC
*** Counsel Linux Application
Counsel Linux Application is an application launcher for emacs using counsel (which is ivy).
Install the package, enable it and ensure that it always is installed, and then configure:
#+BEGIN_SRC emacs-lisp
;; some customization to make the display "nicer" and include any user local .desktop files
(push (concat (getenv "HOME") "/.local/share/applications/") counsel-linux-apps-directories)
(defun ds/counsel-linux-app-format-function (name comment exec)
"Default Linux application name formatter.
NAME is the name of the application, COMMENT its comment and EXEC
the command to launch it."
(format "% -45s %s"
(propertize name 'face 'font-lock-builtin-face)
(or comment "")))
(setq counsel-linux-app-format-function #'ds/counsel-linux-app-format-function)
#+END_SRC

View File

@ -1 +1 @@
("~/.emacs.d/elpa/xelb-0.18/" "~/.emacs.d/") ("~/.emacs.d/" "~/.emacs.d/elpa/xelb-0.18/")