comparison lisp/progmodes/sh-script.el @ 20385:e1ea41eba8be

(sh-mode): Set `comment-start-skip' always.
author Dave Love <fx@gnu.org>
date Sun, 30 Nov 1997 12:21:42 +0000
parents 53f502cfd081
children 2bd6621697d5
comparison
equal deleted inserted replaced
20384:931b472be076 20385:e1ea41eba8be
729 (goto-char (point-min)) 729 (goto-char (point-min))
730 (if (looking-at "#![ \t]?\\([^ \t\n]*/bin/env[ \t]\\)?\\([^ \t\n]+\\)") 730 (if (looking-at "#![ \t]?\\([^ \t\n]*/bin/env[ \t]\\)?\\([^ \t\n]+\\)")
731 (match-string 2))))) 731 (match-string 2)))))
732 (if interpreter 732 (if interpreter
733 (sh-set-shell interpreter nil nil) 733 (sh-set-shell interpreter nil nil)
734 ;; If we don't know the shell for this file, 734 (progn
735 ;; set the syntax table anyway, for the user's normal choice of shell. 735 ;; If we don't know the shell for this file, set the syntax
736 (set-syntax-table (sh-feature sh-mode-syntax-table)))) 736 ;; table anyway, for the user's normal choice of shell.
737 (set-syntax-table (sh-feature sh-mode-syntax-table))
738 ;; And avoid indent-new-comment-line (at least) losing.
739 (setq comment-start-skip "#+[\t ]*"))))
737 (run-hooks 'sh-mode-hook)) 740 (run-hooks 'sh-mode-hook))
738 ;;;###autoload 741 ;;;###autoload
739 (defalias 'shell-script-mode 'sh-mode) 742 (defalias 'shell-script-mode 'sh-mode)
740 743
741 744