     (if command
         (shell-command command)
       (message "Unrecognized platform."))))
-(global-set-key (kbd "C-x t")
-                #'ar/new-browser-tab)
+(bind-key "C-x t" #'ar/new-browser-tab)
 
 (defun ar/init-for-osx ()
   "Perform initializations for Mac OS X."

;; Ensure clipboard makes it into kill ring even if killing other text.
(setq save-interprogram-paste-before-kill t)

(use-package multiple-cursors :ensure t)
(multiple-cursors-mode)
(global-set-key (kbd "C-c n")
                #'mc/mark-next-like-this)
(global-set-key (kbd "C-c a")
                #'mc/mark-all-like-this)

(defun ar/org-blog-custom-id-from-title (title)
  "Create an org CUSTOM_ID from a TITLE."

;; Duplicate line.
(global-set-key "\C-x\C-d" "\C-a\C- \C-e\M-w\C-j\C-y")

(bind-key "C-q" #'previous-buffer)
(bind-key "C-z" #'next-buffer)

;; Save current position to mark ring when jumping to a different place
(add-hook 'helm-goto-line-before-hook 'helm-save-current-pos-to-mark-ring)
