Add exwm configs and tools

2 files changed, 27 insertions, 7 deletions

diff --git a/.config/doom/config.el b/.config/doom/config.el
index cf386f8..6a25c69 100644
--- a/.config/doom/config.el
+++ b/.config/doom/config.el
@@ -131,6 +131,24 @@
     ad-do-it))
 (ad-activate 'linum-update)
 
+;; EXWM
+(require 'exwm-randr)
+(setq exwm-randr-workspace-monitor-plist '(0 "DisplayPort-2" 1 "HDMI-A-0"))
+(add-hook 'exwm-randr-screen-change-hook
+          (lambda ()
+            (start-process-shell-command
+             "xrandr" nil "xrandr --output DisplayPort-0 --off --output DisplayPort-1 --off --output DisplayPort-2 --primary --mode 2560x1440 --pos 1920x0 --rotate normal --output HDMI-A-0 --mode 1920x1080 --pos 0x0 --rotate normal")))
+(exwm-randr-enable)
+(require 'exwm)
+(require 'exwm-config)
+(exwm-enable)
+(require 'exwm-systemtray)
+(exwm-systemtray-enable)
+(map! :desc "Change workspaces" :n "s-SPC" #'exwm-workspace-switch)
+
+
+;; (start-process-shell-command
+;; "setxkbmap -option caps:swapescape")
 ;;Vterm
 ;;(require 'vterm)
 ;; (map! :leader
@@ -272,8 +290,7 @@
              "TODO(t)"           ; A task that is ready to be tackled
              "BLOG(b)"           ; Blog writing assignments
              "GYM(g)"            ; Things to accomplish at the gym
-             "PROJ(p)"           ; A project that contains other tasks
-             "VIDEO(v)"          ; Video assignments
+             "IMPR(p)"           ; Needs improvements
              "WAIT(w)"           ; Something is holding up this task
              "|"                 ; The pipe necessary to separate "active" states and "inactive" states
              "DONE(d)"           ; Task has been completed
@@ -313,4 +330,3 @@
     (set-face-attribute 'org-table nil :font doom-font :weight 'normal :height 1.0 :foreground "#bfafdf"))
 
 (apollo/org-colors-primary)
-
diff --git a/.config/doom/init.el b/.config/doom/init.el
index d3fcd36..862029d 100644
--- a/.config/doom/init.el
+++ b/.config/doom/init.el
@@ -114,7 +114,7 @@
        :lang
        ;;agda              ; types of types of types of types...
        ;;beancount         ; mind the GAAP
-       (cc +lsp)         ; C > C++ == 1
+       ;;(cc :tools 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
@@ -134,14 +134,18 @@
        ;;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
+       (go :tools lsp)         ; the hipster dialect
        ;;(graphql +lsp)    ; Give queries a REST
-       (haskell +lsp)    ; a language that's lazier than I am
+       (haskell :tools lsp)    ; 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 +lsp)       ; the poster child for carpal tunnel syndrome
-       javascript          ; all(hope(abandon(ye(who(enter(here))))))
+       (javascript
+        :tools lsp
+        :tools tree-sitter
+        )
+                                        ; 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