Как связать CMD+W, чтобы уничтожить текущий буфер в Emacs на OSX?

Question

Как связать CMD+W, чтобы уничтожить текущий буфер в Emacs на OSX? Cx k RET является неестественным и сравнительно длительным связыванием по сравнению с CMD+W.

Answer 1

(defun kill-current-buffer ()
  (interactive)
  (kill-buffer (current-buffer)))
(global-set-key (kbd "s-w") 'kill-current-buffer)

(Кредит идет в jlf на #emacs)