     (mapconcat 'identity lines "\n")))
 
 
+(after 'em-term
+  (add-to-list 'eshell-visual-commands "ssh"))
+
+
 (eval-when-compile (require 'cl))
 (lexical-let ((count 0))
   (defun my-new-eshell-split ()

(setq eshell-history-size (* 10 1024))
(setq eshell-hist-ignoredups t)
(setq eshell-cmpl-ignore-case t)
(setq eshell-last-dir-ring-size 512)
(setq eshell-prompt-function
      (lambda ()
        (concat (propertize (abbreviate-file-name (eshell/pwd)) 'face 'eshell-prompt)

  (when (not (null args))
    (mapc #'find-file (mapcar #'expand-file-name (eshell-flatten-list (reverse args))))))


(defun eshell/h ()
  "Quickly run a previous command."
