   ("f" ar/find-dired-current-dir "find file")
   ("a" ar/find-all-dired-current-dir "find all files")
   ("q" nil "quit"))
-(global-set-key (kbd "C-c s")
-                #'hydra-search/body)
+(bind-key "C-c s" #'hydra-search/body)
 
 (defhydra hydra-git-gutter (:pre (git-gutter-mode 1))
   "

;; 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."

(setq company-show-numbers t)
(global-company-mode)
(add-to-list 'company-backends 'company-c-headers)
(bind-key "<backtab>" #'company-complete)

;; (add-to-list 'load-path
;;              (concat (getenv "HOME") "/.emacs.d/downloads/rtags/src"))
