     (erase-buffer)
     (insert clipboard-content)
     (prog-mode)))
-(global-set-key (kbd "C-c y")
-                #'ar/view-clipboard-buffer)
+(bind-key "C-c y" #'ar/view-clipboard-buffer)
 
 ;;  Save Emacs state from one session to another.
 ;;  Disabling. Trial without it.

                   ar/helm-source-local-hotspots
                   ar/helm-source-web-hotspots
                   ar/helm-source-blog)))
(global-set-key (kbd "C-c h")
                #'ar/helm-my-hotspots)

(require 'profiler)
(defun ar/profiler-start-cpu ()
  "Start cpu profiler."
  (interactive)

;; 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)
