From: Ken Manheimer <ken.manheimer@gmail.com>
Date: Thu, 21 Jan 2016 18:35:41 +0000 (-0500)
Subject: multishell - don't swallow connection errors besides tramp homedir prob
X-Git-Url: https://code.delx.au/gnu-emacs-elpa/commitdiff_plain/3e639bfbf6f22149abb8b828a4b35f688d45b4a6

multishell - don't swallow connection errors besides tramp homedir prob

In arranging special provisions to recognize homedir prob, we were
swallowing other, regular errors.
---

diff --git a/multishell.el b/multishell.el
index 00a9b171a..7295aa1ea 100644
--- a/multishell.el
+++ b/multishell.el
@@ -535,15 +535,16 @@ Return them as a list (name dir), with dir nil if none given."
         (cd default-directory)
       (error
        ;; Aargh. Need to isolate this tramp bug.
-       (when (and (stringp (cadr err))
-                  (string-equal (cadr err)
-                                "Selecting deleted buffer"))
-         (signal (car err)
-                 (list
-                  (format "%s, %s (\"%s\")"
-                          "Tramp shell can fail on empty (homedir) path"
-                          "please try again with an explicit path"
-                          (cadr err)))))))
+       (if (and (stringp (cadr err))
+                (string-equal (cadr err)
+                              "Selecting deleted buffer"))
+           (signal (car err)
+                   (list
+                    (format "%s, %s (\"%s\")"
+                            "Tramp shell can fail on empty (homedir) path"
+                            "please try again with an explicit path"
+                            (cadr err))))
+         (signal (car err)(cdr err)))))
     (setq buffer (set-buffer (apply 'make-comint
                                     (multishell-unbracket-asterisks buffer-name)
                                     prog