Copiar el nombre de archivo actual en emacs

(global-set-key (kbd "C-c w") (lambda () (interactive) (kill-new buffer-file-name)))
Dragonfly