prefs.el

C-up>") 'xah-backward-block)
(global-set-key (kbd "<C-down>") 'xah-forward-block)
;;Use M-{ and M-} to activate the abbove(opt+shift+{)

(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)
(setq save-interprogram-paste-before-kill t)
;;(setq x-select-enable-clipboard t)