[Emacs-diffs] Changes to emacs/lisp/progmodes/sh-script.el

[Juanma Barranquero]

Index: emacs/lisp/progmodes/sh-script.el
diff -c emacs/lisp/progmodes/sh-script.el:1.116 
emacs/lisp/progmodes/sh-script.el:1.117
*** emacs/lisp/progmodes/sh-script.el:1.116     Sun Oct 27 18:00:42 2002
--- emacs/lisp/progmodes/sh-script.el   Fri Jan 10 03:07:26 2003
***************
*** 1447,1455 ****
  controls whether to query about making the visited file executable.
  
  Calls the value of `sh-set-shell-hook' if set."
!   (interactive (list (completing-read "Name or path of shell: "
!                                     interpreter-mode-alist
!                                     (lambda (x) (eq (cdr x) 'sh-mode)))
                     (eq executable-query 'function)
                     t))
    (if (string-match "\\.exe\\'" shell)
--- 1447,1457 ----
  controls whether to query about making the visited file executable.
  
  Calls the value of `sh-set-shell-hook' if set."
!   (interactive (list (completing-read (format "Shell \(default %s\): "
!                                             sh-shell-file)
!                                     interpreter-mode-alist
!                                     (lambda (x) (eq (cdr x) 'sh-mode))
!                                     nil nil nil sh-shell-file)
                     (eq executable-query 'function)
                     t))
    (if (string-match "\\.exe\\'" shell)