(match-string 2)))))
(if interpreter
(sh-set-shell interpreter nil nil)
- ;; 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))))
+ (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 ]*"))))
(run-hooks 'sh-mode-hook))
;;;###autoload
(defalias 'shell-script-mode 'sh-mode)