Make eshell-clear a separate function.

* eshell-conf.el (eshell-clear): Refactor into a standalone function.

1 files changed, 8 insertions, 5 deletions

diff --git a/eshell-conf.el b/eshell-conf.el
index 6bb255a..59a0150 100644
--- a/eshell-conf.el
+++ b/eshell-conf.el
@@ -41,11 +41,14 @@
 (defun durand-set-eshell-keys ()
   "Set my key-bindings."
   (define-key eshell-mode-map (vector #xf) ; C-o
-    (lambda ()
-      (interactive)
-      (delete-region eshell-last-output-end (point))
-      (insert "clear t")
-      (eshell-send-input))))
+    #'eshell-clear))
+
+;;;###autoload
+(defun eshell-clear ()
+  (interactive)
+  (delete-region eshell-last-output-end (point))
+  (insert "clear t")
+  (eshell-send-input))
 
 ;;;###autoload
 (defun eshell/j (&rest args)