removing moom mode because i am adoptimg moom at the os level. a few other tweaks
This commit is contained in:
parent
a183abf37d
commit
1711f8088f
5 changed files with 55 additions and 43 deletions
33
bindings.el
33
bindings.el
|
@ -34,6 +34,39 @@
|
||||||
:desc "Find file in project" "SPC" #'projectile-find-file
|
:desc "Find file in project" "SPC" #'projectile-find-file
|
||||||
:desc "Jump to bookmark" "RET" #'bookmark-jump
|
:desc "Jump to bookmark" "RET" #'bookmark-jump
|
||||||
|
|
||||||
|
;;; <leader> b --- buffer
|
||||||
|
(:prefix-map ("b" . "buffer")
|
||||||
|
:desc "Toggle narrowing" "-" #'doom/toggle-narrow-buffer
|
||||||
|
:desc "Previous buffer" "[" #'previous-buffer
|
||||||
|
:desc "Next buffer" "]" #'next-buffer
|
||||||
|
(:when (modulep! :ui workspaces)
|
||||||
|
:desc "Switch workspace buffer" "b" #'persp-switch-to-buffer
|
||||||
|
:desc "Switch buffer" "B" #'switch-to-buffer
|
||||||
|
:desc "ibuffer workspace" "I" #'+ibuffer/open-for-current-workspace)
|
||||||
|
(:unless (modulep! :ui workspaces)
|
||||||
|
:desc "Switch buffer" "b" #'switch-to-buffer)
|
||||||
|
:desc "Clone buffer" "c" #'clone-indirect-buffer
|
||||||
|
:desc "Clone buffer other window" "C" #'clone-indirect-buffer-other-window
|
||||||
|
:desc "Kill buffer" "d" #'kill-current-buffer
|
||||||
|
:desc "ibuffer" "i" #'ibuffer
|
||||||
|
:desc "Kill buffer" "k" #'kill-current-buffer
|
||||||
|
:desc "Kill all buffers" "K" #'doom/kill-all-buffers
|
||||||
|
:desc "Set bookmark" "m" #'bookmark-set
|
||||||
|
:desc "Delete bookmark" "M" #'bookmark-delete
|
||||||
|
:desc "Next buffer" "n" #'next-buffer
|
||||||
|
:desc "New empty buffer" "N" #'+default/new-buffer
|
||||||
|
:desc "Kill other buffers" "O" #'doom/kill-other-buffers
|
||||||
|
:desc "Previous buffer" "p" #'previous-buffer
|
||||||
|
:desc "Revert buffer" "r" #'revert-buffer
|
||||||
|
:desc "Rename buffer" "R" #'rename-buffer
|
||||||
|
:desc "Save buffer" "s" #'basic-save-buffer
|
||||||
|
:desc "Save buffer as root" "u" #'doom/sudo-save-buffer
|
||||||
|
:desc "Pop up scratch buffer" "x" #'doom/open-scratch-buffer
|
||||||
|
:desc "Switch to scratch buffer" "X" #'doom/switch-to-scratch-buffer
|
||||||
|
:desc "Yank buffer" "y" #'+default/yank-buffer-contents
|
||||||
|
:desc "Bury buffer" "z" #'bury-buffer
|
||||||
|
:desc "Kill buried buffers" "Z" #'doom/kill-buried-buffers)
|
||||||
|
|
||||||
(:prefix-map ("TAB" . "workspace")
|
(:prefix-map ("TAB" . "workspace")
|
||||||
:desc "Display tab bar" "TAB" #'+workspace/display
|
:desc "Display tab bar" "TAB" #'+workspace/display
|
||||||
:desc "Switch workspace" "." #'+workspace/switch-to
|
:desc "Switch workspace" "." #'+workspace/switch-to
|
||||||
|
|
30
config.el
30
config.el
|
@ -126,26 +126,6 @@
|
||||||
"s-M-<right>" 'centaur-tabs-forward
|
"s-M-<right>" 'centaur-tabs-forward
|
||||||
"s-M-<left>" 'centaur-tabs-backward))
|
"s-M-<left>" 'centaur-tabs-backward))
|
||||||
|
|
||||||
;; configure moom for easy frame management
|
|
||||||
(use-package! moom
|
|
||||||
:load-path "/Users/emenel/Source/_src/moom"
|
|
||||||
:after-call doom-after-init-hook
|
|
||||||
:config
|
|
||||||
(setq moom-use-font-module nil)
|
|
||||||
(moom-recommended-keybindings '(all wof))
|
|
||||||
(setq moom-user-margin '(50 50 50 50))
|
|
||||||
(setq moom-command-with-centering '(single double delete split))
|
|
||||||
(map! :leader
|
|
||||||
:prefix "t"
|
|
||||||
:desc "Moom Mode"
|
|
||||||
"m" #'moom-mode)
|
|
||||||
(when (display-graphic-p)
|
|
||||||
(defun my-moom-default-frame-size ()
|
|
||||||
(set-frame-width (selected-frame) 150)
|
|
||||||
(set-frame-height (selected-frame) 48)
|
|
||||||
(moom-move-frame-to-center))
|
|
||||||
(add-hook! 'moom-mode-hook #'my-moom-default-frame-size)))
|
|
||||||
|
|
||||||
(setq default-frame-alist '( (left . 0) (top . 0) (height . 48) (width . 150) ))
|
(setq default-frame-alist '( (left . 0) (top . 0) (height . 48) (width . 150) ))
|
||||||
|
|
||||||
;; use kitty for terminal-here
|
;; use kitty for terminal-here
|
||||||
|
@ -172,6 +152,10 @@
|
||||||
|
|
||||||
;; better completions for sly
|
;; better completions for sly
|
||||||
(after! sly
|
(after! sly
|
||||||
|
(setq sly-lisp-implementations
|
||||||
|
'((sbcl ("sbcl"))
|
||||||
|
(ciel ("sbcl" "--core" "/Users/emenel/quicklisp/local-projects/CIEL/ciel-core" "--eval" "(in-package :ciel-user)"))))
|
||||||
|
(setq sly-default-lisp 'ciel)
|
||||||
(setq sly-complete-symbol-function 'sly-flex-completions))
|
(setq sly-complete-symbol-function 'sly-flex-completions))
|
||||||
|
|
||||||
;; make esc close completion from corfu
|
;; make esc close completion from corfu
|
||||||
|
@ -194,10 +178,4 @@
|
||||||
;; tidal cycles!
|
;; tidal cycles!
|
||||||
(setq tidal-boot-script-path "~/.cabal/share/aarch64-osx-ghc-9.4.2/tidal-1.9.3/BootTidal.hs")
|
(setq tidal-boot-script-path "~/.cabal/share/aarch64-osx-ghc-9.4.2/tidal-1.9.3/BootTidal.hs")
|
||||||
|
|
||||||
;; TODO update this for sly to use ciel by default
|
|
||||||
;; (setq slime-lisp-implementations
|
|
||||||
;; `((sbcl ("sbcl")) ;; default. Adapt if needed.
|
|
||||||
;; (ciel-sbcl ("sbcl" "--core" "/path/to/ciel/ciel-core" "--eval" "(in-package :ciel-user)"))))
|
|
||||||
;; (setq slime-default-lisp 'ciel-sbcl)
|
|
||||||
|
|
||||||
(load! "obsidian-config.el")
|
(load! "obsidian-config.el")
|
||||||
|
|
4
init.el
4
init.el
|
@ -60,7 +60,7 @@
|
||||||
fold ; (nigh) universal code folding
|
fold ; (nigh) universal code folding
|
||||||
format ; automated prettiness
|
format ; automated prettiness
|
||||||
;;god ; run Emacs commands without modifier keys
|
;;god ; run Emacs commands without modifier keys
|
||||||
lispy ; vim for lisp, for people who don't like vim
|
;; lispy ; vim for lisp, for people who don't like vim
|
||||||
;; multiple-cursors ; editing in many places at once
|
;; multiple-cursors ; editing in many places at once
|
||||||
;; objed ; text object editing for the innocent
|
;; objed ; text object editing for the innocent
|
||||||
parinfer ; turn lisp into python, sort of
|
parinfer ; turn lisp into python, sort of
|
||||||
|
@ -142,7 +142,7 @@
|
||||||
(haskell +lsp) ; a language that's lazier than I am
|
(haskell +lsp) ; a language that's lazier than I am
|
||||||
;;hy ; readability of scheme w/ speed of python
|
;;hy ; readability of scheme w/ speed of python
|
||||||
;;idris ; a language you can depend on
|
;;idris ; a language you can depend on
|
||||||
(json) ; At least it ain't XML
|
(json +lsp) ; At least it ain't XML
|
||||||
(java +lsp) ; the poster child for carpal tunnel syndrome
|
(java +lsp) ; the poster child for carpal tunnel syndrome
|
||||||
(javascript +lsp) ; all(hope(abandon(ye(who(enter(here))))))
|
(javascript +lsp) ; all(hope(abandon(ye(who(enter(here))))))
|
||||||
;;julia ; a better, faster MATLAB
|
;;julia ; a better, faster MATLAB
|
||||||
|
|
|
@ -326,6 +326,7 @@
|
||||||
doom-leader-key nil)
|
doom-leader-key nil)
|
||||||
(meow/setup-leader))
|
(meow/setup-leader))
|
||||||
(t (meow/setup-keypad)))
|
(t (meow/setup-keypad)))
|
||||||
|
(pushnew! meow-mode-state-list '(sly-db-mode . motion))
|
||||||
(map! :map meow-keymap [remap describe-key] #'helpful-key))
|
(map! :map meow-keymap [remap describe-key] #'helpful-key))
|
||||||
|
|
||||||
(if (modulep! :editor evil)
|
(if (modulep! :editor evil)
|
||||||
|
|
|
@ -7,9 +7,9 @@
|
||||||
|
|
||||||
;; (unpin! compat)
|
;; (unpin! compat)
|
||||||
;; (:host github :repo "emacs-compat/compat")
|
;; (:host github :repo "emacs-compat/compat")
|
||||||
;; (unpin! doom-themes)
|
(unpin! doom-themes)
|
||||||
;; (unpin! lsp-mode)
|
(unpin! lsp-mode)
|
||||||
;; (unpin! sly)
|
(unpin! sly)
|
||||||
;; (unpin! corfu)
|
;; (unpin! corfu)
|
||||||
;; (unpin! cape)
|
;; (unpin! cape)
|
||||||
;; (unpin! markdown-mode)
|
;; (unpin! markdown-mode)
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue