   (setq interprogram-cut-function 'pipe-to-pbcopy))
 
 (defun get-pbpaste ()
-  "Execute `pbpaste`.  This function is meant to be assigned to 'interprogram-paste-function'."
-  (shell-command-to-string "pbpaste"))
-(if (eq system-type 'darwin)
-  (setq interprogram-paste-function 'get-pbpaste))
+  "Execute `pbpaste`."
+  (interactive)
+  (insert (shell-command-to-string "pbpaste")))
 
 ;; https://github.com/sellout/emacs-color-theme-solarized/issues/141#issuecomment-71862293
 (add-to-list 'custom-theme-load-path (concat --homebrew-prefix "share/emacs/site-lisp/solarized"))

(global-set-key "\C-x\C-b" 'ibuffer)
(global-set-key "\C-co" 'browse-url-at-point)

;; I never want `ido-list-directory'
(global-set-key "\C-x\C-d" 'ido-dired)


(global-set-key "\C-ck" 'insert-kbd)
(global-set-key "\C-cz" 'new-shell)
(define-key global-map "\M-Q" 'unfill-paragraph)

;; mimic native Mac OS behavior
(global-set-key "\M-_" 'mdash)
