 (transient-mark-mode t)
 (which-function-mode)
 ;; (semantic-mode 1)
-;; (iswitchb-mode t)   ;; substring buffer switch
 (setq-default indent-tabs-mode nil)
 (setq-default tab-width 4)
 (setq-default py-indent-offset 4)

;;       company-require-match nil
;;       company-dabbrev-downcase nil)
;; ;; (setq company-idle-delay 0.1)
;; (add-hook 'prog-mode-hook (lambda () (company-mode 1)))

(setq message-send-mail-function 'smtpmail-send-it
      smtpmail-auth-credentials "~/.authinfo"

(with-eval-after-load 'racket-mode
  (define-key racket-mode-map (kbd "C-c r") 'racket-run))

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

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

