From: Ken Manheimer <ken.manheimer@gmail.com>
Date: Fri, 22 Jan 2016 08:53:48 +0000 (-0500)
Subject: multishell - tie down multishell-history-entries matches
X-Git-Url: https://code.delx.au/gnu-emacs-elpa/commitdiff_plain/8d70b90b6f5b326749fbd1b8597ecf5cfc9b47d0?hp=3e639bfbf6f22149abb8b828a4b35f688d45b4a6

multishell - tie down multishell-history-entries matches

so we get the correct entry for a name.
---

diff --git a/multishell.el b/multishell.el
index 7295aa1ea..a748b38d3 100644
--- a/multishell.el
+++ b/multishell.el
@@ -201,7 +201,7 @@ Promote added/changed entry to the front of the list."
 
 (defun multishell-history-entries (name)
   "Return `multishell-history' entry that starts with NAME, or nil if none."
-  (let ((match-expr (concat "^" name "\\\(/.*$\\\)?"))
+  (let ((match-expr (concat "^" name "\\\(/.*$\\\)?$"))
         got)
     (dolist (entry multishell-history)
       (when (and (string-match match-expr entry)