Add: [keys] delete-other-windows to SPC 1

2 files changed, 15 insertions, 1 deletions

diff --git a/shoshin-config.el b/shoshin-config.el
index 8a393fc..599c28f 100644
--- a/shoshin-config.el
+++ b/shoshin-config.el
@@ -19,6 +19,8 @@
 (xah-fly-keys-set-layout "qwerty")
 (xah-fly-keys t)
 
+(define-key 'xah-fly-leader-key-map (kbd "1") #'delete-other-windows)
+
 ;;; Completion
 (setq completion-styles '(flex basic partial-completion emacs22)
       completion-cycle-threshold 3
diff --git a/shoshin-config.org b/shoshin-config.org
index 1b5eb16..429c75c 100644
--- a/shoshin-config.org
+++ b/shoshin-config.org
@@ -151,6 +151,9 @@ have to worry about it, though you may see some compilation warnings at times.
 #+end_src
 
 * Keybinding
+:PROPERTIES:
+:header-args:emacs-lisp+: :noweb-ref keybinding :noweb-sep "\n\n" :results silent
+:END:
 
 Keybindings are the key to playing Emacs like an instrument. no matter
 what you choose, keep in mind that you can always bind keys to your
@@ -166,7 +169,6 @@ and keep organized.
 This is what I adopted to combat RSI. my muscle memory is tied into it
 tightly right now. you may have other opinions about keybindings
 
-#+name: keybinding
 #+begin_src emacs-lisp
   ;; these need to be set before requiring the package
   (setq xah-fly-use-control-key nil
@@ -180,6 +182,16 @@ tightly right now. you may have other opinions about keybindings
 i'm setting it up early in the config so that its keymaps are available
 to modify / integrate with other packages.
 
+*** adding some custom commands to xah maps
+**** SPC 1 delete-other-windows
+
+i want this often, feels as if i'm constantly wanting that other window
+to go away.
+
+#+begin_src emacs-lisp
+  (define-key 'xah-fly-leader-key-map (kbd "1") #'delete-other-windows)
+#+end_src
+
 * Completion
 :PROPERTIES:
 :header-args:emacs-lisp: :noweb-ref completion :noweb-sep "\n\n" :results silent