# HG changeset patch # User Richard M. Stallman # Date 1160406521 0 # Node ID 194b79b77de3aad414f707de0ff51df665e04e0a # Parent 719af03ef2470674e35145050c3ccd519448c428 Comment change. diff -r 719af03ef247 -r 194b79b77de3 lisp/shell.el --- a/lisp/shell.el Mon Oct 09 15:08:13 2006 +0000 +++ b/lisp/shell.el Mon Oct 09 15:08:41 2006 +0000 @@ -288,11 +288,12 @@ ;; Note: There are no explicit references to the variable `explicit-bash-args'. ;; It is used implicitly by M-x shell when the interactive shell is `bash'. (defcustom explicit-bash-args - ;; Tell bash not to use readline, except for bash 1.x which doesn't grook --noediting. - ;; Bash 1.x has -nolineediting, but process-send-eof cannot terminate bash if we use it. (let* ((prog (or (and (boundp 'explicit-shell-file-name) explicit-shell-file-name) (getenv "ESHELL") shell-file-name)) (name (file-name-nondirectory prog))) + ;; Tell bash not to use readline, except for bash 1.x which + ;; doesn't grook --noediting. Bash 1.x has -nolineediting, but + ;; process-send-eof cannot terminate bash if we use it. (if (and (not purify-flag) (equal name "bash") (file-executable-p prog)