Skopiuj tekst z Emacsa do schowka OS X

Kiedy uruchamiam Emacsa w terminalu tekstowym zamiast w normalnym trybie GUI, mogę kopiować w Emacsie, aktywując początek regionu za pomocą C-SPC, a następnie wybierz to, co chcę, a następnie zrób M-w.

Czy jest jakiś sposób na skopiowanie regionu w ten sposób, aby był dostępny w schowku OSX i wkleić go na stronie internetowej (oczywiście poza uruchomieniem Emacsa w trybie GUI)?

Nie jestem zainteresowany stworzeniem innego skrótu, aby to zrobić i idealnie nie powinno to wymagać instalowania żadnych modułów.

Widziałem ten post i wypróbowałem zaakceptowaną odpowiedź, ale nie działa ona tak, jak oczekuję powyżej.

Jakieś inne pomysły?

Skopiuj ze schowka Emacsa do OS X:

następnie wybierz region M-| pbcopy RET

Wklej ze schowka OS X do Emacsa:

C-u M-| pbpaste RET (zastępuje bieżący region, jeśli istnieje)

Wyjaśnienie:

M-|działa shell-command-on-region, co jak sama nazwa wskazuje potokuje bieżący region do polecenia powłoki. C-u M-|robi to samo, ale zastępuje bieżący region stdouturuchomionym poleceniem.

pbcopyi pbpastesą narzędziami OS X do uzyskiwania dostępu do schowka systemowego.

Poniższe po prostu działa, skopiowane stąd

(defun copy-from-osx ()
  (shell-command-to-string "pbpaste"))

(defun paste-to-osx (text &optional push)
  (let ((process-connection-type nil))
    (let ((proc (start-process "pbcopy" "*Messages*" "pbcopy")))
      (process-send-string proc text)
      (process-send-eof proc))))

(setq interprogram-cut-function 'paste-to-osx)
(setq interprogram-paste-function 'copy-from-osx)

Jeśli używasz Emacsa „w normalny sposób” (tj. Jako aplikację GUI), powinien już to zrobić domyślnie. Jeśli używasz Emacsa w emulatorze terminali, to rzeczywiście nie wie, jak to zrobić domyślnie, ale możesz zainstalować xclippakiet z GNU ELPA, a następnie włączyć program, xclip-modektóry uczy Emacsa, jak to zrobić zarówno dla GNU / Linux, jak i dla OSX.

Jak powiedział Stefan, aplikacje graficzne Emacsa powinny to robić domyślnie.

W terminalu tekstowym inną opcją jest użycie takich funkcji:

(defun pbcopy ()
  (interactive)
  (let ((deactivate-mark t))
    (call-process-region (point) (mark) "pbcopy")))

(defun pbpaste ()
  (interactive)
  (call-process-region (point) (if mark-active (mark) (point)) "pbpaste" t t))

(defun pbcut ()
  (interactive)
  (pbcopy)
  (delete-region (region-beginning) (region-end)))

Oto prosta funkcja elisp, którą możesz umieścić w pliku .emacs, który kopiuje zawartość bufora, który znajdujesz się do schowka. Nie musisz nic wybierać, to wszystko kopiuje. Kod jest krótki i dość zrozumiały.

(defun xclip ()
(interactive)
(shell-command (concat "cat " (buffer-file-name (window-buffer (minibuffer-selected-window))) " | pbcopy")))

Sprawdź clipboard-kill-regioni clipboard-yank. Te pochodzą z menu-bar.el.

Po podświetleniu regionu możesz użyć schowka-kill-region, aby zabić region zarówno do bufora wklejania, jak i schowka systemowego. clipboard-yank „wkleja” wszystko, co jest aktualnie w schowku systemowym.

Odpowiedź Galdera Zamarreño jest świetna, jednak łamie złe putzachowanie w trybie zła. Dlatego zaadaptowałem to nieco poniżej - jestem pewien, że może być lepiej, ale dla mnie to działa. Możesz zaproponować ulepszenia:

(defun copy-from-osx ()
  (shell-command-to-string "pbpaste"))

(defun paste-to-osx (text &optional push)
  (let ((process-connection-type nil))
    (let ((proc (start-process "pbcopy" "*Messages*" "pbcopy")))
      (process-send-string proc text)
      (process-send-eof proc))))

----> Nowy kod

  (defun clipboard-on ()
    (interactive)
    (setq interprogram-cut-function 'paste-to-osx)
    (setq interprogram-paste-function 'copy-from-osx))
  (defun clipboard-off ()
    (interactive)
    (setq interprogram-cut-function 'gui-select-text)
    (setq interprogram-paste-function 'gui-selection-value))
  (global-set-key (kbd "C-c C-p") 'clipboard-on)
  (global-set-key (kbd "C-c C-y") 'clipboard-off))