From: Ken Manheimer <ken.manheimer@gmail.com>
Date: Thu, 21 Jan 2016 18:21:41 +0000 (-0500)
Subject: multishell - remove mistaken (and deadly) residual kill-buffer!
X-Git-Url: https://code.delx.au/gnu-emacs-elpa/commitdiff_plain/47fe1077bb26cffa742e0b75408e8430dbc99be3

multishell - remove mistaken (and deadly) residual kill-buffer!
---

diff --git a/multishell.el b/multishell.el
index 62c9d3e85..00a9b171a 100644
--- a/multishell.el
+++ b/multishell.el
@@ -319,11 +319,7 @@ customize the savehist group to activate savehist."
          (curr-buff-proc (get-buffer-process from-buffer))
          (target-buffer (if from-buffer-is-shell
                             from-buffer
-                          (let ((got (get-buffer target-shell-buffer-name)))
-                            (if (buffer-live-p got)
-                                got
-                              (kill-buffer got)
-                              (get-buffer target-shell-buffer-name)))))
+                          (get-buffer target-shell-buffer-name)))
          inwin
          already-there)