;; http://stackoverflow.com/questions/13517910/yank-does-not-paste-text-when-using-emacs-over-ssh
(defun copy-from-osx ()
"Handle copy/paste intelligently on osx."
(let ((pbpaste (purecopy "/usr/bin/pbpaste")))
(if (and (eq system-type 'darwin)
(file-exists-p pbpaste))
(let ((tramp-mode nil)
(default-directory "~"))
(shell-command-to-string pbpaste)))))
(defun paste-to-osx (text &optional push)
"paste to osx"
(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)
本来用得好好的,然后突然今天就卡死了(每次操作大概10秒,但是使用没问题),注释掉就好了 很不科学啊:flushed:
是 copy-from-osx
的问题,加个图,更新系统去了
(Mac 10.11.5 自带终端 emacs 24.5 运行 emacs -Q -nw ; cmd-v ; eval-buffer ; ctrl-y)
解决方案:把默认的 fish shell
换掉