# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 945350497 0
# Node ID 3d9aa6cec283d9dbbaf77ff0cf6955608bfa0c67
# Parent  1255a8a95f46e50122c0a4e15f28285167da0f15
(sh-mode): If there is no #!-line, use the shell
from sh-shell-file.

diff -r 1255a8a95f46 -r 3d9aa6cec283 lisp/progmodes/sh-script.el
--- a/lisp/progmodes/sh-script.el	Thu Dec 16 12:11:18 1999 +0000
+++ b/lisp/progmodes/sh-script.el	Thu Dec 16 13:21:37 1999 +0000
@@ -1297,12 +1297,7 @@
 		  "rpm")))))
     (if interpreter
 	(sh-set-shell interpreter nil nil)
-      (progn
-        ;; If we don't know the shell for this file, set the syntax
-        ;; table anyway, for the user's normal choice of shell.
-        (set-syntax-table (sh-feature sh-mode-syntax-table))
-        ;; And avoid indent-new-comment-line (at least) losing.
-        (setq comment-start-skip "#+[\t ]*"))))
+      (sh-set-shell sh-shell-file nil t))
   (run-hooks 'sh-mode-hook))
 ;;;###autoload
 (defalias 'shell-script-mode 'sh-mode)