   :defer t
   :diminish litable-mode " Ⓣ")
 
-(use-package geiser
-  :ensure t
-  :defer t
-  :diminish geiser-mode " Ⓖ"
-  :bind
-  (:map geiser-mode-map
-        ("C-c C-c" . geiser-eval-last-sexp))
-  :config
-  (setq geiser-racket-binary "/usr/bin/racket"))
-
 (provide 'mds-lisp-pl)
 ;;; mds-lisp-pl ends here

                                  (set (make-local-variable 'company-backends)
                                       '((company-capf
                                          company-keywords
                                          ;; company-yasnippet
                                          company-abbrev
                                          company-dabbrev-code
                                          company-dabbrev


  (setq lisp-prettify-symbols-alist
        '(("lambda" . ?λ)
          ("->"     . ?→)
          ("=>"     . ?⇒)
          ("map"    . ?↦)
          ("."      . ?•))
        prettify-symbols-alist lisp-prettify-symbols-alist
        prettify-symbols-unprettify-at-point 'right-edge)

