oreodave/dotfiles
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

(Emacs/core)~Use standard windowing system now

Browse Source 
I've reached a level of complexity where I'd rather use Emacs to
manage windows than my window manager.
This commit is contained in:
Aryadev Chavali
2024-05-06 02:24:33 +05:30
parent 2986c04c2f
commit 1a7a3670c1
1 changed files with 7 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
Emacs/.config/emacs/core.org
View File

@@ -33,6 +33,7 @@ code.
:states '(normal motion) :states '(normal motion)
"SPC" 'nil "SPC" 'nil
"\\" '(nil :which-key "Local leader") "\\" '(nil :which-key "Local leader")
"SPC ;" '(nil :which-key "Shell")
"SPC a" '(nil :which-key "Applications") "SPC a" '(nil :which-key "Applications")
"SPC b" '(nil :which-key "Buffers") "SPC b" '(nil :which-key "Buffers")
"SPC c" '(nil :which-key "Code") "SPC c" '(nil :which-key "Code")
@@ -40,9 +41,9 @@ code.
"SPC f" '(nil :which-key "Files") "SPC f" '(nil :which-key "Files")
"SPC i" '(nil :which-key "Insert") "SPC i" '(nil :which-key "Insert")
"SPC m" '(nil :which-key "Modes") "SPC m" '(nil :which-key "Modes")
"SPC q" '(nil :which-key "Quit/Literate")
"SPC s" '(nil :which-key "Search") "SPC s" '(nil :which-key "Search")
"SPC t" '(nil :which-key "Shell")) "SPC t" '(nil :which-key "Shell"))
"SPC q" '(nil :which-key "Quit/Literate"))
(general-create-definer leader (general-create-definer leader
:states '(normal motion) :states '(normal motion)
@@ -135,7 +136,6 @@ Some bindings that I couldn't fit elsewhere easily.
(leader (leader
"SPC" '(execute-extended-command :which-key "M-x") "SPC" '(execute-extended-command :which-key "M-x")
"'" '(browse-url-emacs :which-key "Download URL to Emacs") "'" '(browse-url-emacs :which-key "Download URL to Emacs")
";" 'eval-expression
":" `(,(proc (interactive) (switch-to-buffer "*scratch*")) ":" `(,(proc (interactive) (switch-to-buffer "*scratch*"))
:which-key "Switch to *scratch*") :which-key "Switch to *scratch*")
"!" '(async-shell-command :which-key "Async shell command") "!" '(async-shell-command :which-key "Async shell command")
@@ -156,8 +156,8 @@ Some bindings that I couldn't fit elsewhere easily.
(quit-leader (quit-leader
"q" #'save-buffers-kill-terminal "q" #'save-buffers-kill-terminal
"c" #'+literate/compile-config "c" #'+literate/compile-config
"l" #'+literate/load-config "C" #'+literate/clean-config
"d" #'delete-frame) "l" #'+literate/load-config)
(search-leader "i" #'imenu)) (search-leader "i" #'imenu))
#+end_src #+end_src
@@ -185,8 +185,8 @@ Setup the evil package, with some opinionated keybindings:
:general :general
(leader (leader
"w" '(evil-window-map :which-key "Window") "w" '(evil-window-map :which-key "Window")
"wT" #'window-swap-states ; transpose two windows "wT" #'window-swap-states
"wd" #'delete-frame) "wd" #'evil-window-delete)
(nmmap (nmmap
"K" #'man "K" #'man
@@ -214,9 +214,7 @@ Setup the evil package, with some opinionated keybindings:
evil-split-window-below t evil-split-window-below t
evil-vsplit-window-right t evil-vsplit-window-right t
evil-want-abbrev-expand-on-insert-exit t evil-want-abbrev-expand-on-insert-exit t
evil-undo-system #'undo-tree) evil-undo-system #'undo-tree))
:config
(fset #'evil-window-vsplit #'make-frame))
#+end_src #+end_src
** Evil surround ** Evil surround
Evil surround is a port for vim-surround. Evil surround is a port for vim-surround.