From: Amin Bandali Date: Thu, 30 Aug 2018 03:03:20 +0000 (-0400) Subject: [emacs] C-l eshell clear binding and magit-dispatch-popup on bottom X-Git-Url: https://git.shemshak.org/gitweb.cgi/~bandali/configs/commitdiff_plain/a8702c0393a06887ad82331033be79f984ab31ce [emacs] C-l eshell clear binding and magit-dispatch-popup on bottom --- diff --git a/init.org b/init.org index 058401a..a74d8df 100644 --- a/init.org +++ b/init.org @@ -766,9 +766,16 @@ There's no way I could top that, so I won't attempt to. (eshell-life-is-too-much) (delete-char arg))) + (defun amin/eshell-clear () + (interactive) + (let ((inhibit-read-only t)) + (erase-buffer)) + (eshell-send-input)) + (defun amin|eshell-setup () (bind-keys :map eshell-mode-map - ("C-d" . amin/eshell-quit-or-delete-char))) + ("C-d" . amin/eshell-quit-or-delete-char) + ("C-l" . amin/eshell-clear))) :hook (eshell-mode . amin|eshell-setup)) #+end_src @@ -1189,6 +1196,7 @@ Emacs package that displays available keybindings in popup '(("*Help*" :align right :select t :size 0.5) ("\\`\\*helm.*?\\*\\'" :regexp t :align t) ((compilation-mode "\\`\\*magit-diff: .*?\\'") :regexp t :noselect t) + ("*magit-dispatch-popup*" :align bottom) ((inferior-scheme-mode "*shell*" "*eshell*") :popup t)) shackle-default-rule '(:select t) shackle-default-size 0.4