 (setenv "PAGER" (executable-find "cat"))
 (bind-key "C-c t" '(lambda ()
                      (interactive)
-                     (crux-start-or-switch-to 'shell "*shell*")))
+                     (crux-start-or-switch-to 'eshell "*eshell*")))
 
 (require 'volatile-highlights)
 (volatile-highlights-mode t)

  (setq scheme-program-name "s7")
  (if (not (comint-check-proc "*scheme*"))
      (let ((cmdlist (list '("localhost" . 5555))))
	    (set-buffer (apply 'make-comint "scheme" (car cmdlist) nil nil))
	    (inferior-scheme-mode)))
  (setq scheme-buffer "*scheme*")
  (pop-to-buffer-same-window "*scheme*"))


                     ;; mu4e-alert
                     ;; lsp-mode
                     ;; cquery
                     parinfer
                     elm-mode))

(setq *rtags* (file-exists-p "~/rtags/src"))
(when *rtags* (add-to-list 'load-path "~/rtags/src"))
