.emacs-my
changeset 203 47d088c870f7
parent 202 a89804893475
child 204 4545865a64c3
equal deleted inserted replaced
202:a89804893475 203:47d088c870f7
   581 
   581 
   582 ;; Setup Emacs to run bash as its primary shell.
   582 ;; Setup Emacs to run bash as its primary shell.
   583 ;; (setq binary-process-input t)
   583 ;; (setq binary-process-input t)
   584 ;; (setq shell-file-name "bash")
   584 ;; (setq shell-file-name "bash")
   585 ;; (setq shell-command-switch "-c")
   585 ;; (setq shell-command-switch "-c")
   586 ;; (setq explicit-shell-file-name shell-file-name)
       
   587 ;; (setenv "SHELL" shell-file-name)
   586 ;; (setenv "SHELL" shell-file-name)
   588 ;; (if (boundp 'w32-quote-process-args)
   587 ;; (if (boundp 'w32-quote-process-args)
   589 ;;     (setq w32-quote-process-args ?\")) ;; Include only for MS Windows.
   588 ;;     (setq w32-quote-process-args ?\")) ;; Include only for MS Windows.
   590 
   589 
   591 (setq explicit-sh-args '("-login" "-i"))
   590 (when (eq window-system 'w32)
   592 (setq explicit-bash-args (quote ("-login" "-i")))
   591   (setq explicit-shell-file-name "bash")
       
   592   (setq explicit-bash-args '("-login" "-i"))
       
   593   (setq explicit-sh-args '("-login" "-i")) )
   593 
   594 
   594 (when (provide 'bat-mode)
   595 (when (provide 'bat-mode)
   595   (progn
   596   (progn
   596     (add-to-list 'auto-mode-alist '("\\.[bB][aA][tT]\\'" . bat-mode))
   597     (add-to-list 'auto-mode-alist '("\\.[bB][aA][tT]\\'" . bat-mode))
   597     (add-to-list 'auto-mode-alist '("\\.[cC][mM][dD]\\'" . bat-mode))
   598     (add-to-list 'auto-mode-alist '("\\.[cC][mM][dD]\\'" . bat-mode))