branch: externals/ssh-deploy commit 9107addc7ea4f5ec71dcd0b3ad5e778dfa6a687d Author: Christian Johansson <christ...@cvj.se> Commit: Christian Johansson <christ...@cvj.se>
Fixed code notices in new code related to eshell integration --- ssh-deploy.el | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/ssh-deploy.el b/ssh-deploy.el index 84aaeef..a0b209e 100644 --- a/ssh-deploy.el +++ b/ssh-deploy.el @@ -3,8 +3,8 @@ ;; Author: Christian Johansson <github.com/cjohansson> ;; Maintainer: Christian Johansson <github.com/cjohansson> ;; Created: 5 Jul 2016 -;; Modified: 3 Aug 2017 -;; Version: 1.61 +;; Modified: 4 Sep 2017 +;; Version: 1.62 ;; Keywords: tools, convenience ;; URL: https://github.com/cjohansson/emacs-ssh-deploy @@ -537,13 +537,14 @@ (let ((old-directory default-directory)) (require 'eshell) (message "Opening eshell on '%s'.." command) + (defvar eshell-buffer-name) (setq eshell-buffer-name (alist-get 'server remote-root)) (let ((eshell-buffer (eshell))) - (end-of-buffer) + (goto-char (point-max)) (eshell-kill-input) (insert (concat "cd " command)) (eshell-send-input) - (end-of-buffer)))))))) + (goto-char (point-max))))))))) ;;;### autoload (defun ssh-deploy-remote-terminal (remote-host-string)