       (replace-match (format " %s"
                              (downcase (match-string 0)))
                      t nil))))
-(global-set-key (kbd "C-c l") 'ar/split-camel-region)
+(global-set-key (kbd "C-c l") #'ar/split-camel-region)
 
 ;; M-. elisp navigation.
 (use-package elisp-slime-nav :ensure t)

                 (progn
                   (backward-word arg)
                   (point))))
(global-set-key (kbd "M-DEL") 'ar/backward-delete-word)
(global-set-key (kbd "<C-backspace>") 'ar/backward-delete-word)

(use-package helm-dash :ensure t :demand)
(bind-key "C-h y" 'helm-dash-at-point)
(setq helm-dash-browser-func 'eww)

(global-set-key (kbd "M-C-s") 'helm-multi-swoop-all)
(global-set-key (kbd "C-c i") 'helm-imenu)
(define-key helm-map (kbd "<tab>") 'helm-execute-persistent-action) ; rebind tab to do persistent action
(define-key helm-map (kbd "C-i") 'helm-execute-persistent-action) ; make TAB works in terminal
(define-key helm-map (kbd "C-z")  'helm-select-action) ; list actions using C-z
(global-set-key (kbd "M-x") 'helm-M-x)
(global-set-key (kbd "M-y") 'helm-show-kill-ring)
(global-set-key (kbd "C-x b") 'helm-buffers-list)
(global-set-key (kbd "C-h a") 'helm-apropos)
;; Duplicate line.
(global-set-key "\C-x\C-d" "\C-a\C- \C-e\M-w\C-j\C-y")
;; On Mac, this is effectively fn-M-backspace.
(global-set-key (kbd "M-(") 'kill-word)
(global-set-key (kbd "C-q") 'previous-buffer)
(global-set-key (kbd "C-z") 'next-buffer)

(define-key helm-grep-mode-map (kbd "<return>")  'helm-grep-mode-jump-other-window)
(define-key helm-grep-mode-map (kbd "n")  'helm-grep-mode-jump-other-window-forward)
(define-key helm-grep-mode-map (kbd "p")  'helm-grep-mode-jump-other-window-backward)

(setq
 helm-google-suggest-use-curl-p t

(use-package discover :ensure t)

(use-package drag-stuff :ensure t)
(global-set-key (kbd "M-<up>") #'drag-stuff-up)
(global-set-key (kbd "M-<down>") #'drag-stuff-down)

;; Avoid creating lock files (ie. .#some-file.el)
(setq create-lockfiles nil)
