您最多选择25个主题 主题必须以字母或数字开头,可以包含连字符 (-),并且长度不得超过35个字符
 
 
 
 

27 行
1.1 KiB

  1. ;;-*-mode: emacs-lisp; coding: utf-8;-*-
  2. ;; multi-term only on non-windows, stupid windows command line
  3. (unless mswindows-p
  4. ;; multi-term setup
  5. (autoload 'multi-term "multi-term" nil t)
  6. (autoload 'multi-term-next "multi-term" nil t)
  7. ;; fuck you audible beeps
  8. (setq ring-bell-function (lambda () (message "*beep beep imma jeep*")))
  9. ;; try and use zsh when we can, cause bourne/bourne-again are the suck
  10. (setq multi-term-program (cond
  11. ((file-exists-p "/bin/zsh") "/bin/zsh")
  12. ((file-exists-p "/usr/bin/zsh") "/usr/bin/zsh")
  13. ((t) "/bin/sh");; fine use whatever the hell /bin/sh is
  14. ))
  15. ;; allow switching to the next terminal in line
  16. (global-set-key (kbd "C-c C-t") 'multi-term-next)
  17. ;; zomg annoying, term-unbind-key-list is what it unbinds, not what you want
  18. ;; to unbind. bit of a logic weirdout in my mind.
  19. ;; aka, what is in the term-unbind-key-list is what you can type to the terminal
  20. (setq term-unbind-key-list '("C-x" "C-y" "M-x"))
  21. )