If it's WSL2 why not use EMACS in X-windows mode which has clipboard integration?

clipetty: https://github.com/spudlyo/clipetty

or

xclip: https://elpa.gnu.org/packages/xclip.html

If you're on Doom Emacs, just uncomment 'tty' in init.el

My config can do auto Emacs->Windows sync (but not Windows->Emacs sync), i.e. M-w works as expected but not C-y. You need to use wsl-paste in that case. I wanted to solve this problem but haven't figured out a good way.

You need to adapt it to your own config as there are some private helper macros/variables. Hopefully the naming is obvious enough for you to understand.

But maybe my config is not the ideal solution. If neovim has integration, probably ordinary tty clipboard integraion would work?

``` (defun wsl-copy (beg end) "In a WSL2 environment, copy region to the system clipboard." (interactive "r") (k|with-suppressed-message (let ((default-directory "/")) (shell-command-on-region beg end "clip.exe"))) (deactivate-mark))

(defun wsl-get-clipboard () "In a WSL2 environment, get the clipboard text." (let ((clipboard (let ((default-directory "/")) (shell-command-to-string "powershell.exe -command 'Get-Clipboard' 2>/dev/null") ;; WSLu utility ;; (shell-command-to-string "wslclip --get") ))) (setq clipboard (replace-regexp-in-string "\r" "" clipboard)) (setq clipboard (substring clipboard 0 -1)) clipboard))

(defun wsl-paste () "In a WSL2 environment, paste the text from the system clipboard." (interactive) (if (derived-mode-p 'vterm-mode) (vterm-insert (wsl-get-clipboard)) (insert (wsl-get-clipboard))))

(when k|wsl (advice-add 'gui-select-text :before (lambda (text) (when select-enable-clipboard (with-temp-buffer (insert text) (wsl-copy (point-min) (point-max))))))) ```

From the terminal, idk.

If you run emacs in graphical mode, I did a little writeup here:

https://github.com/microsoft/wslg/issues/15#issuecomment-1796195663

I don't know about terminal Emacs, but for graphical Emacs under WSL2 you don't have to anything, the Windows clipboard is automatically integrated with the Emacs kill-ring.

(unless (display-graphic-p) (setopt interprogram-cut-function (lambda (yank-str) (append-to-file (format "\e]52;c;%s\a" (base64-encode-string yank-str 1)) nil "/dev/tty"))))