                          unkillable-scratch
                          geiser
                          slime
+                         slime-company
                          ))
 
 (setq package-pinned-packages

      use-dialog-box nil
      uniquify-buffer-name-style 'forward
      ediff-window-setup-function 'ediff-setup-windows-plain
      font-lock-maximum-decoration '((racket-mode . t) (t . 1))
      vc-diff-switches "-u"
      search-highlight t
      isearch-allow-scroll t

(setq geiser-active-implementations '(chicken)
      geiser-mode-start-repl-p t)

(setq inferior-lisp-program (executable-find "sbcl"))
(slime-setup '(slime-fancy slime-asdf slime-sbcl-exts slime-company))
(setq slime-repl-history-remove-duplicates t
      slime-repl-history-trim-whitespaces t)

(when (not (kelly?))
  (setq compile-command "scons"))
