bug#47699: [PATCH] Improve completion-list-mode-map

[Gregory Heytings]

> Right here, I think.

;-)

Okay, so what do you and others think of the following:

1. bind M-g in minibuffer-local-completion-map to switch-to-completions

2. bind M-g in completion-list-mode-map to switch-to-minibuffer, defined as 
follows:

(defun switch-to-minibuffer ()
  "Select the minibuffer window."
  (interactive)
  (when (active-minibuffer-window)
    (select-window (active-minibuffer-window))))

3. bind M-g in read-expression-map to read-expression-switch-to-completion, 
defined as follows:

(defun read-expression-switch-to-completions ()
  "Select the completion list window."
  (interactive)
  (let ((completion-auto-help t)
        (minibuffer-message-timeout 0))
    (completion-at-point)
    (switch-to-completions)))