;;; M-x shell
(setq shell-switcher-new-shell-function 'shell-switcher-make-shell)
;;; M-x ansi-term
(setq shell-switcher-new-shell-function 'shell-switcher-make-ansi-term)
;;; M-x eshell
(setq shell-switcher-new-shell-function 'shell-switcher-make-eshell)
(shell-switcher-mode 1)