diff options
| author | Gerd Moellmann | 1999-12-16 13:21:37 +0000 |
|---|---|---|
| committer | Gerd Moellmann | 1999-12-16 13:21:37 +0000 |
| commit | f2d20357bb1763d0900c5e22fddeed78bc9e709c (patch) | |
| tree | e76601ea26c6f7a579fa8ee327df2782ab313847 | |
| parent | 340fe50f3b5fe8b00fb5c4a6fd51b7fbd5bb140b (diff) | |
| download | emacs-f2d20357bb1763d0900c5e22fddeed78bc9e709c.tar.gz emacs-f2d20357bb1763d0900c5e22fddeed78bc9e709c.zip | |
(sh-mode): If there is no #!-line, use the shell
from sh-shell-file.
| -rw-r--r-- | lisp/progmodes/sh-script.el | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/lisp/progmodes/sh-script.el b/lisp/progmodes/sh-script.el index 5d00037484a..e26bd48beab 100644 --- a/lisp/progmodes/sh-script.el +++ b/lisp/progmodes/sh-script.el | |||
| @@ -1297,12 +1297,7 @@ with your script for an edit-interpret-debug cycle." | |||
| 1297 | "rpm"))))) | 1297 | "rpm"))))) |
| 1298 | (if interpreter | 1298 | (if interpreter |
| 1299 | (sh-set-shell interpreter nil nil) | 1299 | (sh-set-shell interpreter nil nil) |
| 1300 | (progn | 1300 | (sh-set-shell sh-shell-file nil t)) |
| 1301 | ;; If we don't know the shell for this file, set the syntax | ||
| 1302 | ;; table anyway, for the user's normal choice of shell. | ||
| 1303 | (set-syntax-table (sh-feature sh-mode-syntax-table)) | ||
| 1304 | ;; And avoid indent-new-comment-line (at least) losing. | ||
| 1305 | (setq comment-start-skip "#+[\t ]*")))) | ||
| 1306 | (run-hooks 'sh-mode-hook)) | 1301 | (run-hooks 'sh-mode-hook)) |
| 1307 | ;;;###autoload | 1302 | ;;;###autoload |
| 1308 | (defalias 'shell-script-mode 'sh-mode) | 1303 | (defalias 'shell-script-mode 'sh-mode) |