dotfiles/emacs/.emacs.d/package-settings/multi-term.el

;;-*-mode: emacs-lisp; coding: utf-8;-*-

;; multi-term only on non-windows, stupid windows command line
(unless mswindows-p
  ;; multi-term setup
  (autoload 'multi-term "multi-term" nil t)
  (autoload 'multi-term-next "multi-term" nil t)

  ;; fuck you audible beeps
  (setq ring-bell-function (lambda () (message "*beep beep imma jeep*")))

  ;; try and use zsh when we can, cause bourne/bourne-again are the suck
  (setq multi-term-program (cond
                            ((file-exists-p "/bin/zsh") "/bin/zsh")
                            ((file-exists-p "/usr/bin/zsh") "/usr/bin/zsh")
                            ((t) "/bin/sh");; fine use whatever the hell /bin/sh is
                            ))

  ;; allow switching to the next terminal in line
  (global-set-key (kbd "C-c C-t") 'multi-term-next)

  ;; zomg annoying, term-unbind-key-list is what it unbinds, not what you want
  ;; to unbind. bit of a logic weirdout in my mind.
  ;; aka, what is in the term-unbind-key-list is what you can type to the terminal
  (setq term-unbind-key-list '("C-x" "C-y" "M-x"))
  )