emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] master f01cf3f 3/8: multishell-start-shell-in-buffer - consolidat


From: ken manheimer
Subject: [elpa] master f01cf3f 3/8: multishell-start-shell-in-buffer - consolidate conditions better
Date: Fri, 29 Jan 2016 06:41:43 +0000

branch: master
commit f01cf3f72d5aa35dfdbe2a7f59e93f370a0949c2
Author: Ken Manheimer <address@hidden>
Commit: Ken Manheimer <address@hidden>

    multishell-start-shell-in-buffer - consolidate conditions better
---
 multishell.el |   10 ++++------
 1 files changed, 4 insertions(+), 6 deletions(-)

diff --git a/multishell.el b/multishell.el
index c9b1050..50035c0 100644
--- a/multishell.el
+++ b/multishell.el
@@ -558,16 +558,14 @@ and path nil if none resolved."
     (set-buffer buffer)
     (setq is-active (comint-check-proc buffer))
 
-    (when (and path (file-remote-p path))
+    (when (and path (not is-active))
 
-      (when (and (derived-mode-p 'shell-mode)
-                 (not is-active))
-        ;; Returning to disconnected remote shell. Do some tidying:
+      (when (and (derived-mode-p 'shell-mode) (file-remote-p path))
+        ;; Returning to disconnected remote shell - do some tidying:
         (tramp-cleanup-connection
          (tramp-dissect-file-name default-directory 'noexpand)
-         'keep-debug 'keep-password)))
+         'keep-debug 'keep-password))
 
-    (when (and path (not is-active))
       (message "Connecting to %s" path)
       (cd path))
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]