move vanilla to doom emacs configuration

.doom.d/config.el

@@ -0,0 +1,149 @@
+;;; $DOOMDIR/config.el -*- lexical-binding: t; -*-
+
+;; Place your private configuration here! Remember, you do not need to run 'doom
+;; sync' after modifying this file!
+
+
+;; Some functionality uses this to identify you, e.g. GPG configuration, email
+;; clients, file templates and snippets.
+;; Initial Setup
+(setq user-full-name "JaeYoo,Im"
+      user-mail-address "cpu3792@gmail.com")
+(set-default-coding-systems 'utf-8)
+
+;; UI
+(set-frame-parameter (selected-frame) 'alpha '(80 . 80))
+(add-to-list 'default-frame-alist '(alpha . (80 . 80)))
+;(set-frame-parameter (selected-frame) 'fullscreen 'maximized)
+;(add-to-list 'default-frame-alist '(fullscreen . maximized))
+(scroll-bar-mode 1)
+(setq doom-modeline-major-mode-icon t)
+(setq doom-modeline-major-mode-color-icon t)
+
+;; Doom exposes five (optional) variables for controlling fonts in Doom. Here
+;; are the three important ones:
+;;
+;; + `doom-font'
+;; + `doom-variable-pitch-font'
+;; + `doom-big-font' -- used for `doom-big-font-mode'; use this for
+;;   presentations or streaming.
+;;
+;; They all accept either a font-spec, font string ("Input Mono-12"), or xlfd
+;; font string. You generally only need these two:
+;; (setq doom-font (font-spec :family "monospace" :size 12 :weight 'semi-light)
+;;       doom-variable-pitch-font (font-spec :family "sans" :size 13))
+
+;; There are two ways to load a theme. Both assume the theme is installed and
+;; available. You can either set `doom-theme' or manually load a theme with the
+;; `load-theme' function. This is the default:
+(setq doom-theme 'doom-palenight)
+
+;; If you use `org' and don't want your org files in the default location below,
+;; change `org-directory'. It must be set before org loads!
+(setq org-directory "~/Org/")
+;;(setq org-roam-directory "~/Roam/")
+
+;; This determines the style of line numbers in effect. If set to `nil', line
+;; numbers are disabled. For relative line numbers, set this to `relative'.
+(setq display-line-numbers-type t)
+(after! org
+  (add-hook 'org-mode-hook (lambda () (display-line-numbers-mode 0)))
+  (require 'org-tempo)
+  (add-to-list 'org-structure-template-alist '("sh" . "src shell"))
+  (add-to-list 'org-structure-template-alist '("el" . "src emacs-lisp"))
+  (add-to-list 'org-structure-template-alist '("py" . "src python"))
+  (add-to-list 'org-structure-template-alist '("hk" . "src haskell")))
+
+
+;; Roam
+;;(use-package org-roam-server
+;;  :ensure t
+;;  :config
+;;  (setq org-roam-server-host "127.0.0.1"
+;;        org-roam-server-port 8080
+;;        org-roam-server-authenticate nil
+;;        org-roam-server-export-inline-images t
+;;        org-roam-server-serve-files nil
+;;        org-roam-server-served-file-extensions '("pdf" "mp4" "ogv")
+;;        org-roam-server-network-poll t
+;;        org-roam-server-network-arrows nil
+;;        org-roam-server-network-label-truncate t
+;;        org-roam-server-network-label-truncate-length 60
+;;        org-roam-server-network-label-wrap-length 20))
+;;
+;;(defun org-roam-server-open ()
+;;    "Ensure the server is active, then open the roam graph."
+;;    (interactive)
+;;    (smartparens-global-mode -1)
+;;    (org-roam-server-mode 1)
+;;    (browse-url-xdg-open (format "http://localhost:%d" org-roam-server-port))
+;;    (smartparens-global-mode 1))
+;;
+;;;; automatically enable server-mode
+;;(after! org-roam
+;;  (smartparens-global-mode -1)
+;;  (org-roam-server-mode)
+;;  (smartparens-global-mode 1))
+
+;; Dired
+(evil-define-key 'normal dired-mode-map
+  (kbd "h") 'dired-up-directory
+  (kbd "l") 'dired-find-file)
+(add-hook 'dired-mode-hook 'dired-hide-dotfiles-mode)
+(evil-define-key 'normal 'dired-mode-map
+  (kbd "H") 'dired-hide-dotfiles-mode)
+
+;; Tramp
+(setq tramp-default-method "ssh")
+(customize-set-variable 'tramp-inline-compress-start-size nil)
+(customize-set-variable 'tramp-copy-size-limit nil)
+
+;; Open with
+(require 'openwith)
+(setq large-file-warning-threshold nil)
+(after! dired
+  (openwith-mode t)
+  (setq openwith-associations
+        (list (list (openwith-make-extension-regexp
+                     '("mpg" "mpeg" "mp3" "mp4" "m4v"
+                       "avi" "wmv" "wav" "mov" "flv"
+                       "ogm" "ogg" "mkv"))
+                    "mpv"
+                    '(file)))))
+;; Nov mode
+(add-to-list 'auto-mode-alist '("\\.epub\\'" . nov-mode))
+
+;; Very large file
+(use-package! vlf-setup
+  :defer-incrementally vlf-tune vlf-base vlf-write vlf-search vlf-occur vlf-follow vlf-ediff vlf)
+
+;; Key binding
+(global-unset-key (kbd "C-j"))
+(global-unset-key (kbd "C-k"))
+
+;; Time
+(setq display-time-world-list
+      '(("Etc/UTC" "UTC")
+        ("Asia/Seoul" "Seoul")
+        ("Asia/Shanghai" "Shanghai")))
+(setq display-time-world-time-format "%a, %d %b %I:%M %p %Z")
+
+
+
+
+;; Here are some additional functions/macros that could help you configure Doom:
+;;
+;; - `load!' for loading external *.el files relative to this one
+;; - `use-package!' for configuring packages
+;; - `after!' for running code after a package has loaded
+;; - `add-load-path!' for adding directories to the `load-path', relative to
+;;   this file. Emacs searches the `load-path' when you load packages with
+;;   `require' or `use-package'.
+;; - `map!' for binding new keys
+;;
+;; To get information about any of these functions/macros, move the cursor over
+;; the highlighted symbol at press 'K' (non-evil users must press 'C-c c k').
+;; This will open documentation for it, including demos of how they are used.
+;;
+;; You can also try 'gd' (or 'C-c c d') to jump to their definition and see how
+;; they are implemented.

.doom.d/init.el

@@ -0,0 +1,204 @@
+;;; init.el -*- lexical-binding: t; -*-
+
+;; This file controls what Doom modules are enabled and what order they load
+;; in. Remember to run 'doom sync' after modifying it!
+
+;; NOTE Press 'SPC h d h' (or 'C-h d h' for non-vim users) to access Doom's
+;;      documentation. There you'll find a "Module Index" link where you'll find
+;;      a comprehensive list of Doom's modules and what flags they support.
+
+;; NOTE Move your cursor over a module's name (or its flags) and press 'K' (or
+;;      'C-c c k' for non-vim users) to view its documentation. This works on
+;;      flags as well (those symbols that start with a plus).
+;;
+;;      Alternatively, press 'gd' (or 'C-c c d') on a module to browse its
+;;      directory (for easy access to its source code).
+
+(doom! :input
+       ;;chinese
+       ;;japanese
+       ;;layout            ; auie,ctsrnm is the superior home row
+
+       :completion
+       company           ; the ultimate code completion backend
+       ;;helm              ; the *other* search engine for love and life
+       ;;ido               ; the other *other* search engine...
+       ;;ivy               ; a search engine for love and life
+       vertico           ; the search engine of the future
+
+       :ui
+       ;;deft              ; notational velocity for Emacs
+       doom              ; what makes DOOM look the way it does
+       doom-dashboard    ; a nifty splash screen for Emacs
+       doom-quit         ; DOOM quit-message prompts when you quit Emacs
+       (emoji +unicode)  ; 🙂
+       hl-todo           ; highlight TODO/FIXME/NOTE/DEPRECATED/HACK/REVIEW
+       ;;hydra
+       ;;indent-guides     ; highlighted indent columns
+       ;;ligatures         ; ligatures and symbols to make your code pretty again
+       ;;minimap           ; show a map of the code on the side
+       modeline          ; snazzy, Atom-inspired modeline, plus API
+       ;;nav-flash         ; blink cursor line after big motions
+       ;;neotree           ; a project drawer, like NERDTree for vim
+       ophints           ; highlight the region an operation acts on
+       (popup +defaults)   ; tame sudden yet inevitable temporary windows
+       ;;tabs              ; a tab bar for Emacs
+       ;;treemacs          ; a project drawer, like neotree but cooler
+       unicode           ; extended unicode support for various languages
+       vc-gutter         ; vcs diff in the fringe
+       vi-tilde-fringe   ; fringe tildes to mark beyond EOB
+       ;;window-select     ; visually switch windows
+       workspaces        ; tab emulation, persistence & separate workspaces
+       ;;zen               ; distraction-free coding or writing
+
+       :editor
+       (evil +everywhere); come to the dark side, we have cookies
+       file-templates    ; auto-snippets for empty files
+       fold              ; (nigh) universal code folding
+       ;;(format +onsave)  ; automated prettiness
+       ;;god               ; run Emacs commands without modifier keys
+       ;;lispy             ; vim for lisp, for people who don't like vim
+       ;;multiple-cursors  ; editing in many places at once
+       ;;objed             ; text object editing for the innocent
+       ;;parinfer          ; turn lisp into python, sort of
+       ;;rotate-text       ; cycle region at point between text candidates
+       snippets          ; my elves. They type so I don't have to
+       ;;word-wrap         ; soft wrapping with language-aware indent
+
+       :emacs
+       (dired +icons)    ; making dired pretty [functional]
+       electric          ; smarter, keyword-based electric-indent
+       (ibuffer +icons)  ; interactive buffer management
+       undo              ; persistent, smarter undo for your inevitable mistakes
+       vc                ; version-control and Emacs, sitting in a tree
+
+       :term
+       eshell            ; the elisp shell that works everywhere
+       ;;shell             ; simple shell REPL for Emacs
+       ;;term              ; basic terminal emulator for Emacs
+       ;;vterm             ; the best terminal emulation in Emacs
+
+       :checkers
+       syntax              ; tasing you for every semicolon you forget
+       ;;(spell +flyspell) ; tasing you for misspelling mispelling
+       ;;grammar           ; tasing grammar mistake every you make
+
+       :tools
+       ;;ansible
+       ;;debugger          ; FIXME stepping through code, to help you add bugs
+       ;;direnv
+       ;;docker
+       ;;editorconfig      ; let someone else argue about tabs vs spaces
+       ;;ein               ; tame Jupyter notebooks with emacs
+       (eval +overlay)     ; run code, run (also, repls)
+       ;;gist              ; interacting with github gists
+       lookup              ; navigate your code and its documentation
+       lsp               ; M-x vscode
+       magit             ; a git porcelain for Emacs
+       ;;make              ; run make tasks from Emacs
+       ;;pass              ; password manager for nerds
+       pdf               ; pdf enhancements
+       ;;prodigy           ; FIXME managing external services & code builders
+       ;;rgb               ; creating color strings
+       ;;taskrunner        ; taskrunner for all your projects
+       ;;terraform         ; infrastructure as code
+       ;;tmux              ; an API for interacting with tmux
+       ;;upload            ; map local to remote projects via ssh/ftp
+
+       :os
+       (:if IS-MAC macos)  ; improve compatibility with macOS
+       ;;tty               ; improve the terminal Emacs experience
+
+       :lang
+       ;;agda              ; types of types of types of types...
+       ;;beancount         ; mind the GAAP
+       (cc +lsp)                ; C > C++ == 1
+       ;;clojure           ; java with a lisp
+       ;;common-lisp       ; if you've seen one lisp, you've seen them all
+       ;;coq               ; proofs-as-programs
+       ;;crystal           ; ruby at the speed of c
+       ;;csharp            ; unity, .NET, and mono shenanigans
+       ;;data              ; config/data formats
+       ;;(dart +flutter)   ; paint ui and not much else
+       ;;dhall
+       ;;elixir            ; erlang done right
+       ;;elm               ; care for a cup of TEA?
+       emacs-lisp        ; drown in parentheses
+       ;;erlang            ; an elegant language for a more civilized age
+       ;;ess               ; emacs speaks statistics
+       ;;factor
+       ;;faust             ; dsp, but you get to keep your soul
+       ;;fsharp            ; ML stands for Microsoft's Language
+       ;;fstar             ; (dependent) types and (monadic) effects and Z3
+       ;;gdscript          ; the language you waited for
+       ;;(go +lsp)         ; the hipster dialect
+       (haskell +dante)  ; a language that's lazier than I am
+       ;;hy                ; readability of scheme w/ speed of python
+       ;;idris             ; a language you can depend on
+       json              ; At least it ain't XML
+       ;;(java +meghanada) ; the poster child for carpal tunnel syndrome
+       ;;javascript        ; all(hope(abandon(ye(who(enter(here))))))
+       ;;julia             ; a better, faster MATLAB
+       ;;kotlin            ; a better, slicker Java(Script)
+       (latex             ; writing papers in Emacs has never been so fun
+        +cdlatex        ; Enable cdlatex for fast math insertion.
+        +fold)          ; Use TeX-fold (from auctex) to fold LaTeX macros to unicode, and make folding hook-based and less manual.
+       ;;lean              ; for folks with too much to prove
+       ;;ledger            ; be audit you can be
+       ;;lua               ; one-based indices? one-based indices
+       markdown          ; writing docs for people to ignore
+       ;;nim               ; python + lisp at the speed of c
+       ;;nix               ; I hereby declare "nix geht mehr!"
+       ;;ocaml             ; an objective camel
+       (org              ; organize your plain life in plain text
+        ;;+brain           ; Enables org-brain integration.
+        +dragndrop       ; Enables drag-and-drop support for images and files; inserts inline previews for images and an icon+link for other media types.
+        +gnuplot         ; Installs gnuplot & gnuplot-mode, which enables rendering images from gnuplot src blocks or plotting tables with org-plot/gnuplot (bound to SPC m b p, by default).
+        ;;+hugo            ; Enables integration with hugo to export from Emacs well-formed (blackfriday) markdown.
+        ;;+journal         ; Enables org-journal integration.
+        ;;+jupyter         ; Enables Jupyter integration for babel.
+        +noter             ; Enables org-noter integration. Keeps notes in sync with a document. Requires pdf-tools (:tools pdf) or DocView or nov.el to be enabled.
+        +pandoc            ; Enables pandoc integration into the Org exporter.
+        ;;+pomodoro          ; Enables a pomodoro timer for clocking time on tasks.
+        ;;+present           ; Enables integration with reveal.js, beamer and org-tree-slide, so Emacs can be used for presentations. It automatically downloads reveal.js.
+        +pretty            ; Enables pretty unicode symbols for bullets and priorities, and better syntax highlighting for latex. Keep in mind: this can be expensive. If org becomes too slow, it’d be wise to disable this flag.
+        +roam2              ; Enables org-roam integration. This requires sqlite3 to be installed on your system.
+       )
+       ;;php               ; perl's insecure younger brother
+       ;;plantuml          ; diagrams for confusing people more
+       ;;purescript        ; javascript, but functional
+       python            ; beautiful is better than ugly
+       ;;qt                ; the 'cutest' gui framework ever
+       ;;racket            ; a DSL for DSLs
+       ;;raku              ; the artist formerly known as perl6
+       ;;rest              ; Emacs as a REST client
+       ;;rst               ; ReST in peace
+       ;;(ruby +rails)     ; 1.step {|i| p "Ruby is #{i.even? ? 'love' : 'life'}"}
+       (rust +lsp)              ; Fe2O3.unwrap().unwrap().unwrap().unwrap()
+       ;;scala             ; java, but good
+       ;;(scheme +guile)   ; a fully conniving family of lisps
+       sh                ; she sells {ba,z,fi}sh shells on the C xor
+       ;;sml
+       ;;solidity          ; do you need a blockchain? No.
+       ;;swift             ; who asked for emoji variables?
+       ;;terra             ; Earth and Moon in alignment for performance.
+       ;;web               ; the tubes
+       ;;yaml              ; JSON, but readable
+       ;;zig               ; C, but simpler
+
+       :email
+       (mu4e +org +gmail)
+       ;;notmuch
+       ;;(wanderlust +gmail)
+
+       :app
+       ;;calendar
+       ;;emms
+       ;;everywhere        ; *leave* Emacs!? You must be joking
+       ;;irc               ; how neckbeards socialize
+       ;;(rss +org)        ; emacs as an RSS reader
+       ;;twitter           ; twitter client https://twitter.com/vnought
+
+       :config
+       ;;literate
+       (default +bindings +smartparens))

.doom.d/packages.el

@@ -0,0 +1,57 @@
+;; -*- no-byte-compile: t; -*-
+;;; $DOOMDIR/packages.el
+
+;; To install a package with Doom you must declare them here and run 'doom sync'
+;; on the command line, then restart Emacs for the changes to take effect -- or
+;; use 'M-x doom/reload'.
+
+
+;; To install SOME-PACKAGE from MELPA, ELPA or emacsmirror:
+;(package! some-package)
+
+;; To install a package directly from a remote git repo, you must specify a
+;; `:recipe'. You'll find documentation on what `:recipe' accepts here:
+;; https://github.com/raxod502/straight.el#the-recipe-format
+;(package! another-package
+;  :recipe (:host github :repo "username/repo"))
+
+;; If the package you are trying to install does not contain a PACKAGENAME.el
+;; file, or is located in a subdirectory of the repo, you'll need to specify
+;; `:files' in the `:recipe':
+;(package! this-package
+;  :recipe (:host github :repo "username/repo"
+;           :files ("some-file.el" "src/lisp/*.el")))
+
+;; If you'd like to disable a package included with Doom, you can do so here
+;; with the `:disable' property:
+;(package! builtin-package :disable t)
+
+;; You can override the recipe of a built in package without having to specify
+;; all the properties for `:recipe'. These will inherit the rest of its recipe
+;; from Doom or MELPA/ELPA/Emacsmirror:
+;(package! builtin-package :recipe (:nonrecursive t))
+;(package! builtin-package-2 :recipe (:repo "myfork/package"))
+
+;; Specify a `:branch' to install a package from a particular branch or tag.
+;; This is required for some packages whose default branch isn't 'master' (which
+;; our package manager can't deal with; see raxod502/straight.el#279)
+;(package! builtin-package :recipe (:branch "develop"))
+
+;; Use `:pin' to specify a particular commit to install.
+;(package! builtin-package :pin "1a2b3c4d5e")
+
+
+;; Doom's packages are pinned to a specific commit and updated from release to
+;; release. The `unpin!' macro allows you to unpin single packages...
+;(unpin! pinned-package)
+;; ...or multiple packages
+;(unpin! pinned-package another-pinned-package)
+;; ...Or *all* packages (NOT RECOMMENDED; will likely break things)
+;(unpin! t)
+
+
+;;(package! org-roam-server)
+(package! dired-hide-dotfiles)
+(package! openwith)
+(package! nov)
+(package! vlf)

.emacs.d.vanilla/desktop.org

@@ -0,0 +1,283 @@
+#+TITLE: Desktop
+
+* Exwm Desktop
+#+begin_src config :tangle ~/.emacs.d/exwm/EXWM.desktop :mkdirp yes
+[Desktop Entry]
+Name=EXWM
+Comment=Emacs Window Manager
+Exec=sh /home/jaeus/.emacs.d/exwm/start-exwm.sh
+TryExec=sh
+Type=Application
+X-LightDM-DesktopName=exwm
+DesktopNames=exwm
+#+end_src
+
+#+begin_src shell :tangle ~/.emacs.d/exwm/start-exwm.sh :mkdirp yes
+#!/bin/sh
+# Set the screen DPI (uncomment this if needed!)
+# xrdb ~/.emacs.d/exwm/Xresources
+
+# Run the screen compositor
+#picom &
+#picom -b --config /home/jaeus/.config/i3/picom.conf &
+# Enable screen locking on suspend
+xss-lock -- slock &
+
+# Fire it up
+exec dbus-launch --exit-with-session emacs -mm --debug-init -l ~/.emacs.d/desktop.el
+
+#+end_src
+
+
+* Configuration
+#+begin_src emacs-lisp :tangle ~/.emacs.d/desktop.el
+    (defun efs/run-in-background (command)
+      (let ((command-parts (split-string command "[ ]+")))
+        (apply #'call-process `(,(car command-parts) nil 0 nil ,@(cdr command-parts)))))
+
+    (defun efs/set-wallpaper ()
+      (interactive)
+      ;; NOTE: You will need to update this to a valid background path!
+      (start-process-shell-command
+          "dwall" nil  "dwall -s colony"))
+
+    (defun efs/exwm-init-hook ()
+      ;; Make workspace 1 be the one where we land at startup
+      (exwm-workspace-switch-create 1)
+
+      ;; Open eshell by default
+      ;;(eshell)
+
+      ;; NOTE: The next two are disabled because we now use Polybar!
+
+      ;; Show battery status in the mode line
+      ;;(display-battery-mode 1)
+
+      ;; Show the time and date in modeline
+      ;;(setq display-time-day-and-date t)
+      ;;(display-time-mode 1)
+      ;; Also take a look at display-time-format and format-time-string
+
+      ;; Start the Polybar panel
+      (efs/start-panel)
+
+      ;; Launch apps that will run in the background
+      ;;(efs/run-in-background "dunst")
+      (efs/run-in-background "nm-applet")
+      ;(efs/run-in-background "xmobar -x 0 /home/jaeus/.config/xmobar/xmobarrc0")
+      ;(efs/run-in-background "xmobar -x 1 /home/jaeus/.config/xmobar/xmobarrc1")
+      (efs/run-in-background "picom -b --config /home/jaeus/.config/i3/picom.conf")
+      (efs/run-in-background "dwall -s firewatch")
+      (efs/run-in-background "volumeicon")
+      (efs/run-in-background "blueberry-tray")
+      (efs/run-in-background "seafile-applet")
+      (efs/run-in-background "green-tunnel -s")
+      (efs/run-in-background "/home/jaeus/.emacs.d/exwm/run_xmodmap.sh")
+      (efs/run-in-background "/home/jaeus/.emacs.d/exwm/run_fcitx.sh"))
+
+    (defun efs/exwm-update-class ()
+      (exwm-workspace-rename-buffer exwm-class-name))
+
+    (defun efs/exwm-update-title ()
+      (pcase exwm-class-name
+        ("Firefox" (exwm-workspace-rename-buffer (format "Firefox: %s" exwm-title)))))
+
+    ;; This function isn't currently used, only serves as an example how to
+    ;; position a window
+    (defun efs/position-window ()
+      (let* ((pos (frame-position))
+             (pos-x (car pos))
+              (pos-y (cdr pos)))
+
+        (exwm-floating-move (- pos-x) (- pos-y))))
+
+    (defun efs/configure-window-by-class ()
+      (interactive)
+      (pcase exwm-class-name
+        ("vivaldi-stable" (exwm-workspace-move-window 2))
+        ("Sol" (exwm-workspace-move-window 3))
+        ("mpv" (exwm-floating-toggle-floating)
+               (exwm-layout-toggle-mode-line))))
+
+    ;; This function should be used only after configuring autorandr!
+    (defun efs/update-displays ()
+      (efs/run-in-background "autorandr --change --force")
+      (efs/set-wallpaper)
+      (message "Display config: %s"
+               (string-trim (shell-command-to-string "autorandr --current"))))
+
+    (use-package exwm
+      :config
+      ;; Set the default number of workspaces
+      (setq exwm-workspace-number 10)
+
+      ;; When window "class" updates, use it to set the buffer name
+      (add-hook 'exwm-update-class-hook #'efs/exwm-update-class)
+
+      ;; When window title updates, use it to set the buffer name
+      (add-hook 'exwm-update-title-hook #'efs/exwm-update-title)
+
+      ;; Configure windows as they're created
+      (add-hook 'exwm-manage-finish-hook #'efs/configure-window-by-class)
+
+      ;; When EXWM starts up, do some extra confifuration
+      (add-hook 'exwm-init-hook #'efs/exwm-init-hook)
+
+      ;; Rebind CapsLock to Ctrl
+      ;;(start-process-shell-command "xmodmap" nil "xmodmap /home/jaeus/.emacs.d/exwm/Xmodmap")
+
+      ;; NOTE: Uncomment the following two options if you want window buffers
+      ;;       to be available on all workspaces!
+
+      ;; Automatically move EXWM buffer to current workspace when selected
+      ;; (setq exwm-layout-show-all-buffers t)
+
+      ;; Display all EXWM buffers in every workspace buffer list
+      ;; (setq exwm-workspace-show-all-buffers t)
+
+      ;; NOTE: Uncomment this option if you want to detach the minibuffer!
+      ;; Detach the minibuffer (show it with exwm-workspace-toggle-minibuffer)
+      ;;(setq exwm-workspace-minibuffer-position 'top)
+
+      ;; Set the screen resolution (update this to be the correct resolution for your screen!)
+     (require 'exwm-randr)
+     (exwm-randr-enable)
+     (start-process-shell-command "xrandr" nil "xrandr --output DP-4 --primary --mode 2560x1440 --pos 0x0 --rotate normal --output HDMI-0 --mode 1920x1080 --pos 2560x0 --rotate normal")
+
+      ;; This will need to be updated to the name of a display!  You can find
+      ;; the names of your displays by looking at arandr or the output of xrandr
+     (setq exwm-randr-workspace-monitor-plist '(2 "HDMI-0" 3 "HDMI-0"))
+
+      ;; NOTE: Uncomment these lines after setting up autorandr!
+      ;; React to display connectivity changes, do initial display update
+      ;; (add-hook 'exwm-randr-screen-change-hook #'efs/update-displays)
+      ;; (efs/update-displays)
+
+      ;; Set the wallpaper after changing the resolution
+      (efs/set-wallpaper)
+
+      ;; NOTE: This is disabled because we now use Polybar!
+      ;; Load the system tray before exwm-init
+      ;(require 'exwm-systemtray)
+      ;(setq exwm-systemtray-height 32)
+      ;(exwm-systemtray-enable)
+
+      ;; Automatically send the mouse cursor to the selected workspace's display
+      (setq exwm-workspace-warp-cursor t)
+
+      ;; Window focus should follow the mouse pointer
+      (setq mouse-autoselect-window t
+            focus-follows-mouse t)
+
+      ;; These keys should always pass through to Emacs
+      (setq exwm-input-prefix-keys
+        '(?\C-x
+          ?\C-u
+          ?\C-h
+          ?\M-x
+          ?\M-`
+          ?\M-&
+          ?\M-:
+          ?\C-\M-j  ;; Buffer list
+          ?\C-\ ))  ;; Ctrl+Space
+
+      ;; Ctrl+Q will enable the next key to be sent directly
+      (define-key exwm-mode-map [?\C-q] 'exwm-input-send-next-key)
+
+      ;; Set up global key bindings.  These always work, no matter the input state!
+      ;; Keep in mind that changing this list after EXWM initializes has no effect.
+      (setq exwm-input-global-keys
+            `(
+              ;; Reset to line-mode (C-c C-k switches to char-mode via exwm-input-release-keyboard)
+              ([?\s-r] . exwm-reset)
+
+              ;; Move between windows
+              ([?\s-h] . windmove-left)
+              ([?\s-l] . windmove-right)
+              ([?\s-k] . windmove-up)
+              ([?\s-j] . windmove-down)
+
+              ;; Launch applications via shell command
+              ([?\s-&] . (lambda (command)
+                           (interactive (list (read-shell-command "$ ")))
+                           (start-process-shell-command command nil command)))
+
+              ;; Switch workspace
+              ([?\s-w] . exwm-workspace-switch)
+              ([?\s-`] . (lambda () (interactive) (exwm-workspace-switch-create 0)))
+
+              ;; 's-N': Switch to certain workspace with Super (Win) plus a number key (0 - 9)
+              ,@(mapcar (lambda (i)
+                          `(,(kbd (format "s-%d" i)) .
+                            (lambda ()
+                              (interactive)
+                              (exwm-workspace-switch-create ,i))))
+                        (number-sequence 0 9))))
+
+      (exwm-input-set-key (kbd "s-SPC") 'counsel-linux-app)
+
+      (exwm-enable))
+
+    (use-package desktop-environment
+      :after exwm
+      :config (desktop-environment-mode)
+      :custom
+      (desktop-environment-brightness-small-increment "2%+")
+      (desktop-environment-brightness-small-decrement "2%-")
+      (desktop-environment-brightness-normal-increment "5%+")
+      (desktop-environment-brightness-normal-decrement "5%-"))
+
+    ;; Make sure the server is started (better to do this in your main Emacs config!)
+    (server-start)
+
+    (defvar efs/polybar-process nil
+      "Holds the process of the running Polybar instance, if any")
+
+
+  (defun dw/polybar-exwm-workspace ()
+    (pcase exwm-workspace-current-index
+      (0 "👿")
+      (1 "💻")
+      (2 "🏻")
+      (3 "🎈")
+      (4 "👀")))
+
+  (defun dw/polybar-exwm-workspace-path ()
+    (let ((workspace-path (frame-parameter nil 'bufler-workspace-path-formatted)))
+      (if workspace-path
+          (substring-no-properties workspace-path)
+        "")))
+
+    (defun efs/kill-panel ()
+      (interactive)
+      (when efs/polybar-process
+        (ignore-errors
+          (kill-process efs/polybar-process)))
+      (setq efs/polybar-process nil))
+
+    (defun efs/start-panel ()
+      (interactive)
+      (efs/kill-panel)
+      (setq efs/polybar-process (start-process-shell-command "polybar" nil "polybar panel")))
+
+    (defun efs/send-polybar-hook (module-name hook-index)
+      (start-process-shell-command "polybar-msg" nil (format "polybar-msg hook %s %s" module-name hook-index)))
+
+    (defun efs/send-polybar-exwm-workspace ()
+      (efs/send-polybar-hook "exwm-workspace" 1))
+
+    ;; Update panel indicator when workspace changes
+    (add-hook 'exwm-workspace-switch-hook #'efs/send-polybar-exwm-workspace)
+
+    (defun efs/disable-desktop-notifications ()
+      (interactive)
+      (start-process-shell-command "notify-send" nil "notify-send \"DUNST_COMMAND_PAUSE\""))
+
+    (defun efs/enable-desktop-notifications ()
+      (interactive)
+      (start-process-shell-command "notify-send" nil "notify-send \"DUNST_COMMAND_RESUME\""))
+
+    (defun efs/toggle-desktop-notifications ()
+      (interactive)
+      (start-process-shell-command "notify-send" nil "notify-send \"DUNST_COMMAND_TOGGLE\""))
+#+end_src

.emacs.d.vanilla/exwm/EXWM.desktop

@@ -0,0 +1,8 @@
+[Desktop Entry]
+Name=EXWM
+Comment=Emacs Window Manager
+Exec=sh /home/jaeus/.emacs.d/exwm/start-exwm.sh
+TryExec=sh
+Type=Application
+X-LightDM-DesktopName=exwm
+DesktopNames=exwm

.emacs.d.vanilla/exwm/start-exwm.sh

@@ -0,0 +1,12 @@
+#!/bin/sh
+# Set the screen DPI (uncomment this if needed!)
+# xrdb ~/.emacs.d/exwm/Xresources
+
+# Run the screen compositor
+#picom &
+#picom -b --config /home/jaeus/.config/i3/picom.conf &
+# Enable screen locking on suspend
+xss-lock -- slock &
+
+# Fire it up
+exec dbus-launch --exit-with-session emacs -mm --debug-init -l ~/.emacs.d/desktop.el

.emacs.d.vanilla/init.el

@@ -0,0 +1,34 @@
+(setq vc-follow-symlinks t)
+(with-eval-after-load 'ox-latex
+(add-to-list 'org-latex-classes
+             '("org-plain-latex"
+               "\\documentclass{article}
+           [NO-DEFAULT-PACKAGES]
+           [PACKAGES]
+           [EXTRA]"
+               ("\\section{%s}" . "\\section*{%s}")
+               ("\\subsection{%s}" . "\\subsection*{%s}")
+               ("\\subsubsection{%s}" . "\\subsubsection*{%s}")
+               ("\\paragraph{%s}" . "\\paragraph*{%s}")
+               ("\\subparagraph{%s}" . "\\subparagraph*{%s}"))))
+(org-babel-load-file
+ (expand-file-name
+  "emacs.org"
+  user-emacs-directory))
+(setq-default indent-tabs-mode t)
+(setq tab-width 4) ; or any other preferred value
+(defvaralias 'c-basic-offset 'tab-width)
+(defvaralias 'cperl-indent-level 'tab-width)
+(custom-set-variables
+ ;; custom-set-variables was added by Custom.
+ ;; If you edit it by hand, you could mess it up, so be careful.
+ ;; Your init file should contain only one such instance.
+ ;; If there is more than one, they won't work right.
+ '(org-agenda-files nil)
+ '(package-selected-packages '(no-littering doom-themes evil-numbers use-package)))
+(custom-set-faces
+ ;; custom-set-faces was added by Custom.
+ ;; If you edit it by hand, you could mess it up, so be careful.
+ ;; Your init file should contain only one such instance.
+ ;; If there is more than one, they won't work right.
+ )