 (setq company-show-numbers t)
 (global-company-mode)
 (add-to-list 'company-backends 'company-c-headers)
-(global-set-key (kbd "<backtab>")
-                #'company-complete)
+(bind-key "<backtab>" #'company-complete)
 
 ;; (add-to-list 'load-path
 ;;              (concat (getenv "HOME") "/.emacs.d/downloads/rtags/src"))

    (if command
        (shell-command command)
      (message "Unrecognized platform."))))
(global-set-key (kbd "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
  :bind (("C-c n" . mc/mark-next-like-this)
         ("C-c a" . mc/mark-all-like-this)))
(multiple-cursors-mode)

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