From a24de4a6cbebc4ae847cdea9e982c7321ec53a79 Mon Sep 17 00:00:00 2001
From: Curt Spark <sparksman@disroot.org>
Date: Wed, 3 Mar 2021 20:54:29 +0000
Subject: [PATCH] Disable EXWM, EXWM Keybinding twaks

---
 bookmarks  | 11 ++++++++---
 config.org | 23 +++++++++++++----------
 2 files changed, 21 insertions(+), 13 deletions(-)

diff --git a/bookmarks b/bookmarks
index 8c67a49..e46ba32 100644
--- a/bookmarks
+++ b/bookmarks
@@ -1,10 +1,15 @@
-;;;; Emacs Bookmark Format Version 1 ;;;; -*- coding: utf-8-emacs -*- 
+;;;; Emacs Bookmark Format Version 1 ;;;; -*- coding: utf-8-emacs -*-
 ;;; This format is meant to be slightly human-readable;
 ;;; nevertheless, you probably don't want to edit it.
 ;;; -*- End Of Bookmark File Format Version Stamp -*-
-(("Schoolwork"
+(("BloxieSHDD"
+ (filename . "/run/media/cspark/BloxieSHDD/")
+ (front-context-string . ".\n  drwxr-x---+ ")
+ (rear-context-string . "88 Mar  1 20:13 ")
+ (position . 200))
+("Schoolwork"
  (filename . "~/Documents/Schoolwork/")
  (front-context-string . "English\n  drwxr-")
  (rear-context-string . "96 Apr 11 05:07 ")
  (position . 246))
-)
\ No newline at end of file
+)
diff --git a/config.org b/config.org
index e1cebac..51cca74 100644
--- a/config.org
+++ b/config.org
@@ -613,7 +613,7 @@ on how to install the Programming Language Servers that you want.
     :commands lsp)
 
   ;; set prefix for lsp-command-keymap (few alternatives - "C-l", "C-c l")
-  (setq lsp-keymap-prefix "s-l")
+  (setq lsp-keymap-prefix "C-l")
 #+END_SRC
 
 *** Configuration
@@ -641,14 +641,14 @@ on how to install the Programming Language Servers that you want.
 Edwina is a dynamic window manager for Emacs. It automatically arranges your Emacs panes (called “windows” in Emacs parlance) into predefined layouts, dwm-style.
 
 Install the package, enable it and ensure that it always is installed, and then configure:
-#+BEGIN_SRC emacs-lisp
++BEGIN_SRC emacs-lisp
   (use-package edwina
     :ensure t
     :config
     (setq display-buffer-base-action '(display-buffer-below-selected))
     ;;(edwina-setup-dwm-keys)
     (edwina-mode 1))
-#+END_SRC
++END_SRC
 ** EXWM
 EXWM, The Emacs X Window Manager. As it says, it is an Emacs window
 manager for the X display server. The benefits include using all your
@@ -658,15 +658,15 @@ For more information on setup, you should check out `https://github.com/ch11ng/e
 
 Install the package, enable it and ensure that it always is installed, and then configure:
 *** EXWM
-#+BEGIN_SRC emacs-lisp
++BEGIN_SRC emacs-lisp
   (use-package exwm
     :ensure t
     :config
     (require 'exwm-config)
     (exwm-config-default))
-#+END_SRC
++END_SRC
 **** Configuration
-#+BEGIN_SRC emacs-lisp
++BEGIN_SRC emacs-lisp
   ;; Systemtray
   (require 'exwm-systemtray)
   (exwm-systemtray-enable)
@@ -752,7 +752,10 @@ Install the package, enable it and ensure that it always is installed, and then
           ([?\s-P] . edwina-swap-previous-window)
 
           ;; Make a new window in the stack
-          ([?\s-b] . edwina-clone-window)
+          ([?\s-b] . (lambda ()
+                       (interactive)
+                       (edwina-clone-window)
+                       (edwina-select-next-window)))
 
           ))
 
@@ -782,14 +785,14 @@ Install the package, enable it and ensure that it always is installed, and then
 
   ;; Ido mode seems to be enabled in the default configuration, turn it back off as we are using Ivy completion instead.
   (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
++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)
@@ -801,4 +804,4 @@ Install the package, enable it and ensure that it always is installed, and then
                (propertize name 'face 'font-lock-builtin-face)
                (or comment "")))
      (setq counsel-linux-app-format-function #'ds/counsel-linux-app-format-function)
-#+END_SRC
++END_SRC