summary |
shortlog |
log |
commit | commitdiff |
tree
raw |
patch |
inline | side by side (from parent 1:
3e639bf)
so we get the correct entry for a name.
(defun multishell-history-entries (name)
"Return `multishell-history' entry that starts with NAME, or nil if none."
(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)
got)
(dolist (entry multishell-history)
(when (and (string-match match-expr entry)