diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/comint.el | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/lisp/comint.el b/lisp/comint.el index f66e40b150b..82c547c9760 100644 --- a/lisp/comint.el +++ b/lisp/comint.el | |||
| @@ -2705,9 +2705,6 @@ is the last argument. This command is like `M-.' in bash and zsh." | |||
| 2705 | (set-marker comint-insert-previous-argument-last-start-pos (point)) | 2705 | (set-marker comint-insert-previous-argument-last-start-pos (point)) |
| 2706 | ;; Insert the argument. | 2706 | ;; Insert the argument. |
| 2707 | (let ((input-string (comint-previous-input-string 0))) | 2707 | (let ((input-string (comint-previous-input-string 0))) |
| 2708 | (when (string-match "[ \t\n]*&" input-string) | ||
| 2709 | ;; strip terminating '&' | ||
| 2710 | (setq input-string (substring input-string 0 (match-beginning 0)))) | ||
| 2711 | (insert (comint-arguments input-string index index))) | 2708 | (insert (comint-arguments input-string index index))) |
| 2712 | ;; Make next invocation return arg from previous input | 2709 | ;; Make next invocation return arg from previous input |
| 2713 | (setq comint-input-ring-index (1+ (or comint-input-ring-index 0))) | 2710 | (setq comint-input-ring-index (1+ (or comint-input-ring-index 0))) |