Kopieren Sie Text von Emacs in die OS X-Zwischenablage

Wenn ich Emacs in einem Textterminal anstelle des normalen GUI-Modus ausführe, kann ich in Emacs kopieren, indem ich den Start einer Region mit aktiviere C-SPCund dann auswähle, was ich will, und dann mache M-w.

Gibt es eine Möglichkeit, eine Region auf diese Weise kopieren zu lassen, die in der OSX-Zwischenablage verfügbar ist, um sie beispielsweise in eine Webseite einzufügen (außer natürlich, indem Emacs im GUI-Modus ausgeführt wird)?

Ich bin nicht daran interessiert, eine andere Verknüpfung zu erstellen, und im Idealfall sollten keine Module installiert werden.

Ich habe diesen Beitrag gesehen und die akzeptierte Antwort ausprobiert, aber es scheint nicht so zu funktionieren, wie ich es oben erwarte.

Irgendwelche anderen Ideen?

Kopieren von Emacs in die OS X-Zwischenablage:

Wählen Sie dann die Region aus M-| pbcopy RET

Einfügen aus der OS X-Zwischenablage in Emacs:

C-u M-| pbpaste RET (ersetzt die aktuelle Region, falls vorhanden)

Erläuterung:

M-|Läuft shell-command-on-region, was, wie der Name schon sagt, bedeutet, dass die aktuelle Region an einen Shell-Befehl weitergeleitet wird. C-u M-|tut dasselbe, ersetzt jedoch die aktuelle Region durch die stdoutdes ausgeführten Befehls.

pbcopyund pbpastesind OS X-Dienstprogramme für den Zugriff auf die Systemzwischenablage.

Das Folgende funktioniert einfach, kopiert von hier

(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)

Wenn Sie Emacs "auf die normale Weise" (dh als GUI-Anwendung) verwenden, sollte dies standardmäßig bereits geschehen. Wenn Sie Emacs in einem Terminal-Emulator verwenden, weiß es zwar nicht, wie das standardmäßig gemacht wird, aber Sie können das xclipPaket von GNU ELPA installieren und dann das aktivieren, xclip-modedas Emacs beibringt, wie das sowohl für GNU / Linux als auch für Linux gemacht wird OSX.

Wie Stefan sagte, sollten die grafischen Emacs-Anwendungen dies standardmäßig tun.

In einem Textterminal können Sie auch Funktionen wie die folgenden verwenden:

(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)))

Hier ist eine einfache Elisp-Funktion, die Sie in Ihre .emacs-Datei einfügen können, um den Inhalt des Puffers, in dem Sie sich befinden, in die Zwischenablage zu kopieren. Sie müssen nichts auswählen, es kopiert alles. Der Code ist kurz und ziemlich selbsterklärend.

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

Check out clipboard-kill-regionund clipboard-yank. Diese kommen aus menu-bar.el.

Sobald eine Region markiert ist, können Sie mit Clipboard-Kill-Region die Region sowohl in Ihrem Einfügepuffer als auch in der System-Zwischenablage löschen. clipboard-yank "fügt" ein, was sich gerade in der Zwischenablage des Systems befindet.

Die Antwort von Galder Zamarreño ist großartig, sie bricht jedoch das böse putVerhalten im bösen Modus. Ich habe es daher weiter unten etwas angepasst - ich bin sicher, es könnte besser sein, aber es macht den Job für mich. Fühlen Sie sich frei, Verbesserungen vorzuschlagen:

(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))))

----> Neuer Code

  (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))