From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 22 Jan 2002 21:05:13 +0000 (+0000)
Subject: (sh-set-shell): Doc fix.
X-Git-Tag: ttn-vms-21-2-B4~17013
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=57270c909c0351aee4005b12bd13dae53a948def;p=emacs.git

(sh-set-shell): Doc fix.
---

diff --git a/lisp/progmodes/sh-script.el b/lisp/progmodes/sh-script.el
index e2fa205872b..aa65ebda37c 100644
--- a/lisp/progmodes/sh-script.el
+++ b/lisp/progmodes/sh-script.el
@@ -1442,8 +1442,15 @@ This adds rules for comments and assignments."
 
 (defun sh-set-shell (shell &optional no-query-flag insert-flag)
   "Set this buffer's shell to SHELL (a string).
-Makes this script executable via `executable-set-magic', and sets up the
-proper starting #!-line, if INSERT-FLAG is non-nil.
+When used interactively, insert the proper starting #!-line,
+and make the visited file executable via `executable-set-magic',
+perhaps querying depending on the value of `executable-query'.
+
+When this function is called noninteractively, INSERT-FLAG (the third
+argument) controls whether to insert a #!-line and think about making
+the visited file executable, and NO-QUERY-FLAG (the second argument)
+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