diff options
| -rw-r--r-- | lisp/simple.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index 735c65948bf..565a6cba8ee 100644 --- a/lisp/simple.el +++ b/lisp/simple.el | |||
| @@ -3590,7 +3590,7 @@ With argument, do this that many times." | |||
| 3590 | The place mark goes is the same place \\[forward-word] would | 3590 | The place mark goes is the same place \\[forward-word] would |
| 3591 | move to with the same argument. | 3591 | move to with the same argument. |
| 3592 | Interactively, if this command is repeated | 3592 | Interactively, if this command is repeated |
| 3593 | or (in Transient Mark mode) if the mark is active, | 3593 | or (in Transient Mark mode) if the mark is active, |
| 3594 | it marks the next ARG words after the ones already marked." | 3594 | it marks the next ARG words after the ones already marked." |
| 3595 | (interactive "P\np") | 3595 | (interactive "P\np") |
| 3596 | (cond ((and allow-extend | 3596 | (cond ((and allow-extend |
| @@ -4328,6 +4328,7 @@ With a prefix argument, set VARIABLE to VALUE buffer-locally." | |||
| 4328 | (or completion-list-mode-map | 4328 | (or completion-list-mode-map |
| 4329 | (let ((map (make-sparse-keymap))) | 4329 | (let ((map (make-sparse-keymap))) |
| 4330 | (define-key map [mouse-2] 'mouse-choose-completion) | 4330 | (define-key map [mouse-2] 'mouse-choose-completion) |
| 4331 | (define-key map [follow-link] 'mouse-face) | ||
| 4331 | (define-key map [down-mouse-2] nil) | 4332 | (define-key map [down-mouse-2] nil) |
| 4332 | (define-key map "\C-m" 'choose-completion) | 4333 | (define-key map "\C-m" 'choose-completion) |
| 4333 | (define-key map "\e\e\e" 'delete-completion-window) | 4334 | (define-key map "\e\e\e" 'delete-completion-window) |