       ad-do-it))
 )
 ;; align current region
-(global-set-key (kbd "C-c =") 'align-region-or-current)
+(global-set-key (kbd "C-c =")   'align-region-or-current)
 (global-set-key (kbd "C-c C-=") 'align-repeat)
 
 ;; diff- mode (better colors)

  (setq show-paren-style 'parenthesis)
  (setq show-paren-delay 0)
  ;; sp keys
  (define-key sp-keymap (kbd "C-M-f") 'sp-forward-sexp)
  (define-key sp-keymap (kbd "C-M-b") 'sp-backward-sexp)
  (define-key sp-keymap (kbd "M-f") 'sp-forward-symbol)
  (define-key sp-keymap (kbd "M-b") 'sp-backward-symbol)
  (define-key sp-keymap (kbd "C-S-a") 'sp-beginning-of-sexp)
  (define-key sp-keymap (kbd "C-S-d") 'sp-end-of-sexp)
  (define-key sp-keymap (kbd "C-M-k") 'sp-kill-sexp)
  (define-key sp-keymap (kbd "C-M-w") 'sp-copy-sexp)
  (define-key sp-keymap (kbd "C-<left>") 'sp-add-to-next-sexp)
  (define-key sp-keymap (kbd "C-<right>") 'sp-add-to-previous-sexp)
  (define-key sp-keymap (kbd "M-<delete>") 'sp-unwrap-sexp)
  (define-key sp-keymap (kbd "M-<backspace>") 'sp-backward-unwrap-sexp)
  (define-key sp-keymap (kbd "C-c k") 'sp-splice-sexp)
  (define-key sp-keymap (kbd "C-c C-k") 'sp-rewrap-sexp)
  (define-key sp-keymap (kbd "S-<left>") 'sp-select-previous-thing)
  (define-key sp-keymap (kbd "S-<right>") 'sp-select-next-thing)
  (define-key sp-keymap (kbd "C-c |") 'sp-split-sexp)
  (define-key sp-keymap (kbd "C-c C-|") 'sp-join-sexp)
  )

(setup-after "smartparens"

      (set-mark (point))
      (sp-beginning-of-sexp)
      (kill-ring-save (mark) (point))))
  (define-key sp-keymap (kbd "C-c a")   'sp-beginning-of-sexp)
  (define-key sp-keymap (kbd "C-c e")   'sp-end-of-sexp)
  (define-key sp-keymap (kbd "C-c C-a") 'sp-kill-to-beginning-of-sexp)
  (define-key sp-keymap (kbd "C-c C-e") 'sp-kill-to-end-of-sexp)
  (define-key sp-keymap (kbd "C-c M-a") 'sp-copy-to-beginning-of-sexp)
