summaryrefslogtreecommitdiff
path: root/nrepl-client.el
diff options
context:
space:
mode:
authorBozhidar Batsov <bozhidar@batsov.com>2017-03-06 10:01:03 +0200
committerBozhidar Batsov <bozhidar@batsov.com>2017-03-06 10:01:03 +0200
commit52e69c102f2e6438196e223483a388115809bbc1 (patch)
tree126bf977353ee2332f366ae6ca6759e7aad7d1d6 /nrepl-client.el
parente5854479032536efc27cd28aa94dd36434731787 (diff)
Improve some connection messages
Diffstat (limited to 'nrepl-client.el')
-rw-r--r--nrepl-client.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/nrepl-client.el b/nrepl-client.el
index ed08a54b..29358120 100644
--- a/nrepl-client.el
+++ b/nrepl-client.el
@@ -533,6 +533,7 @@ key-values depending on the connection type."
;; direct connection failed
;; fallback to ssh tunneling if enabled
(and nrepl-use-ssh-fallback-for-remote-hosts
+ (message "[nREPL] Falling back to SSH tunneled connection ...")
(nrepl--ssh-tunnel-connect host port))
;; fallback is either not enabled or it failed as well
(error "[nREPL] Cannot connect to %s:%s" host port))
@@ -561,7 +562,7 @@ If NO-ERROR is non-nil, show messages instead of throwing an error."
(defun nrepl--ssh-tunnel-connect (host port)
"Connect to a remote machine identified by HOST and PORT through SSH tunnel."
- (message "[nREPL] Establishing SSH tunneled connection ...")
+ (message "[nREPL] Establishing SSH tunneled connection to %s:%s ..." host port)
(let* ((remote-dir (if host (format "/ssh:%s:" host) default-directory))
(ssh (or (executable-find "ssh")
(error "[nREPL] Cannot locate 'ssh' executable")))