contrapunctus
/
dotemacs
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Create SQL hydra

This commit is contained in:
contrapunctus 2022-01-06 11:07:46 +05:30
parent 1c1c5fcc80
commit 766557dbde
1 changed files with 16 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
init.org
View File

@ -2218,6 +2218,8 @@ Don't try to check if there are files with a certain extension...it will lead to
(my-org-hydra/body))
((derived-mode-p 'sh-mode)
(my-shell-hydra/body))
((derived-mode-p 'sql-mode)
(my-sql-hydra/body))
(t (contrapunctus-general-hydra/body))))
(define-key boon-command-map (kbd "m") #'my-dispatch-hydra)
@ -2237,6 +2239,20 @@ Don't try to check if there are files with a certain extension...it will lead to
"Evaluate"
("b" org-babel-execute-src-block "source block"))
#+END_SRC
** sql
#+BEGIN_SRC emacs-lisp
(defhydra my-sql-eval-hydra (:color blue)
"Eval"
("e" sql-send-paragraph "paragraph")
("b" sql-send-buffer "buffer"))
(my-defhydra my-sql-hydra (:color blue)
"SQL"
("r" sql-sqlite "REPL")
("e" my-sql-eval-hydra/body "eval"))
#+END_SRC
* eshell
#+BEGIN_SRC emacs-lisp
(use-package eshell