maciej/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Add gleam lang support

Browse source
This commit is contained in:
Maciej 2021-03-07 15:40:27 +02:00
parent d1fb4a661c
commit da8b5653c6
Signed by: maciej
GPG key ID: 41D62D42D3B0D765
5 changed files with 62 additions and 13 deletions
Download patch file Download diff file Expand all files Collapse all files

8
pkg/deft.el
View file

@ -4,6 +4,7 @@
;;; Code:
(require 'icejam-pkg-keys-mode "$HOME/.emacs.d/pkg/keys-mode.el")
(require 'icejam-pkg-hydra "$HOME/.emacs.d/pkg/hydra.el")
(use-package deft
:straight t
@ -13,7 +14,12 @@
deft-default-extension "md"
deft-auto-save-interval 30.0))
(define-key icejam-keys-mode-map (kbd "C-c d d") 'deft)
(defhydra +hydra-deft-menu (:color teal)
"Start Deft"
("d" deft "Deft")
("q" cancel "quit"))
(define-key icejam-keys-mode-map (kbd "C-c d") '+hydra-deft-menu/body)
(provide 'icejam-pkg-deft)
;;; deft.el ends here

47
pkg/hydra.el
View file

@ -14,7 +14,7 @@
:straight t
:defer t
:config
(defhydra hydra-file-switcher-menu (:color teal :hint nil)
(defhydra +hydra-file-switcher-menu (:color teal :hint nil)
"
^ General actions
^^^^^^^^--------------------------------------------------------------------------------------------
@ -57,7 +57,7 @@
("C" magit-checkout)
("M" magit-blame))
(defhydra hydra-programming-menu (:color teal :hint nil)
(defhydra +hydra-programming-menu (:color teal :hint nil)
"
^ Code actions
^^^^^^^^--------------------------------------------------------------------------------------------
@ -78,7 +78,7 @@ Find: _s_: Swiper _u_: Undo tree
("y" company-yasnippet)
("m" company-complete))
(defhydra hydra-window-menu (:color teal :hint nil)
(defhydra +hydra-window-menu (:color teal :hint nil)
"
^ Buffer actions
^^^^^^^^--------------------------------------------------------------------------------------------
@ -98,7 +98,7 @@ Split: _h_: Horizontally _v_: Vertically
("<up>" windmove-up)
("<down>" windmove-down))
(defhydra hydra-language-context-menu (:color teal :hint nil)
(defhydra +hydra-language-context-menu (:color teal :hint nil)
"
^ Language-specific actions
^^^^^^^^--------------------------------------------------------------------------------------------
@ -114,19 +114,42 @@ Other: _m_: iMenu
("f" lsp-format-buffer)
("m" lsp-ui-imenu))
(defhydra hydra-move-menu (:color teal)
(defhydra +hydra-move-menu (:color teal)
"Buffer history"
("<left>" previous-buffer "Previous buffer")
("<right>" next-buffer "Next buffer")
("[" previous-buffer "Previous buffer")
("]" next-buffer "Next buffer")
("q" cancel "quit"))
:bind ("C-c p" . hydra-file-switcher-menu/body)
("C-c c" . hydra-programming-menu/body)
("C-c w" . hydra-window-menu/body)
("C-c s" . hydra-move-menu/body)
("C-c l" . hydra-language-context-menu/body))
(defhydra +hydra-bufmove (:color teal :hint nil)
"
^ Move current buffer
^^^^^^^^--------------------------------------------------------------------------------------------
^ _{_: Up
^_[_: Left _]_: Right
^ _{_: Down
^^
"
("[" buf-move-left)
("]" buf-move-right)
("{" buf-move-up)
("}" buf-move-down)
("q" cancel "quit"))
(defhydra +hydra-font-menu (:color teal)
"Buffer history"
("i" (text-scale-increase 1) "Bigger font in this buffer")
("d" (text-scale-decrease 1) "Smaller font in this buffer")
("r" (text-scale-adjust 0) "Reset font in this buffer")
("R" set-font-to-screen "Reload font to screen")
("q" cancel "quit"))
:bind ("C-c p" . +hydra-file-switcher-menu/body)
("C-c c" . +hydra-programming-menu/body)
("C-c w" . +hydra-window-menu/body)
("C-c s" . +hydra-move-menu/body)
("C-c f" . +hydra-font-menu/body)
("C-c m" . +hydra-bufmove/body)
("C-c l" . +hydra-language-context-menu/body))
(provide 'icejam-pkg-hydra)
;;; hydra.el ends here