Это будет сделано, хотя это не так сложно, как Cw в isearch, потому что вы не можете нажимать эту клавишу, чтобы расширить выбор:
(defun my-minibuffer-insert-word-at-point ()
"Get word at point in original buffer and insert it to minibuffer."
(interactive)
(let (word beg)
(with-current-buffer (window-buffer (minibuffer-selected-window))
(save-excursion
(skip-syntax-backward "w_")
(setq beg (point))
(skip-syntax-forward "w_")
(setq word (buffer-substring-no-properties beg (point)))))
(when word
(insert word))))
(defun my-minibuffer-setup-hook ()
(local-set-key (kbd "C-w") 'my-minibuffer-insert-word-at-point))
(add-hook 'minibuffer-setup-hook 'my-minibuffer-setup-hook)
РЕДАКТИРОВАТЬ: Обратите внимание, что это в стандартном минибуфере, так что вы можете использовать его в любом месте, где у вас есть приглашение минибуфера, например, в grep, Встречайте, и т.д.