X-Git-Url: http://47.100.26.94:8080/?a=blobdiff_plain;f=emacs.d%2Fconfig.org;h=e62f388abe271b60779d7d0b2860a989a1040eee;hb=9d100553ca852b46023e20c58224bf95e77405ae;hp=b73f0f04145b7dad410fd1259721c1c3c216e046;hpb=4d1f00e10fd2cd84eb7ed18d154f93307bdb867b;p=dotfiles.git diff --git a/emacs.d/config.org b/emacs.d/config.org index b73f0f0..e62f388 100644 --- a/emacs.d/config.org +++ b/emacs.d/config.org @@ -1237,17 +1237,9 @@ set default eshell history folder ** Eshell erase buffer #+BEGIN_SRC emacs-lisp :tangle yes :results silent - (defun sd/eshell-clear-buffer () - "Clear eshell buffer" - (interactive) - (let ((inhibit-read-only t) - (current-point (- (point-max) (point)))) - (beginning-of-line) - (delete-region (point-min) (point)) - (goto-char (- (point-max) current-point)))) - + (require 'utilities) - (add-hook 'eshell-mode-hook (lambda () + (add-hook 'eshell-mode-hook (lambda () (local-set-key (kbd "C-l") 'sd/eshell-clear-buffer))) #+END_SRC