     (add-hook 'emacs-lisp-mode-hook (lambda ()
                                       (add-to-list (make-local-variable 'company-backends)
                                                    '(company-elisp
+                                                     company-capf
                                                      company-abbrev
+                                                     company-yasnippet
                                                      company-dabbrev-code
                                                      company-dabbrev
                                                      company-keywords
                                                      company-files
-                                                     company-capf
-                                                     company-semantic
-                                                     company-yasnippet
                                                      company-ispell)))))
   (use-package flycheck
     :config

   ("s-<left>" . lispy-backward-slurp-sexp)
   ("S-s-<left>" . lispy-backward-barf-sexp)))

(use-package geiser
  :ensure t
  :bind
  (:map racket-mode-map
        ("C-c C-c" . geiser-eval-last-sexp))

  :ensure t
  :mode ("\\.rkt\\'" . racket-mode)
  :interpreter ("racket" . racket-mode)
  :init
  (add-hook 'racket-mode-hook 'config-common)
  (use-package company
    :config
    (add-hook 'racket-mode-hook (lambda ()
                                      (add-to-list (make-local-variable 'company-backends)
                                                   '(company-capf
                                                     company-abbrev
                                                     company-dabbrev-code
                                                     company-dabbrev
                                                     company-keywords
                                                     company-files
                                                     company-ispell))))))

(use-package lispy
  :ensure t
