diff options
| author | Karl Heuer | 1996-01-04 23:48:07 +0000 |
|---|---|---|
| committer | Karl Heuer | 1996-01-04 23:48:07 +0000 |
| commit | f29601ad4dce289b5f58add8b517578301a04f2f (patch) | |
| tree | 47acec966d240a0363f89b9f92333e8a0c48a393 | |
| parent | 22cc6690e717501adc7dcbb19ec910a4009e92ca (diff) | |
| download | emacs-f29601ad4dce289b5f58add8b517578301a04f2f.tar.gz emacs-f29601ad4dce289b5f58add8b517578301a04f2f.zip | |
(sh-mode-syntax-table): Doc fix.
| -rw-r--r-- | lisp/progmodes/sh-script.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/progmodes/sh-script.el b/lisp/progmodes/sh-script.el index 5d6ebbbf6b1..8b03187f2e1 100644 --- a/lisp/progmodes/sh-script.el +++ b/lisp/progmodes/sh-script.el | |||
| @@ -53,7 +53,7 @@ | |||
| 53 | (setq auto-mode-alist | 53 | (setq auto-mode-alist |
| 54 | ;; matches files | 54 | ;; matches files |
| 55 | ;; - that have a suffix .sh, .csh or .shar (shell archive) | 55 | ;; - that have a suffix .sh, .csh or .shar (shell archive) |
| 56 | ;; - that contain ressources for the various shells | 56 | ;; - that contain resources for the various shells |
| 57 | ;; - startup files for X11 | 57 | ;; - startup files for X11 |
| 58 | (cons '("\\.c?sh\\'\\|\\.shar\\'\\|/\\.\\(z?profile\\|bash_profile\\|z?login\\|bash_login\\|z?logout\\|bash_logout\\|[kz]shrc\\|bashrc\\|t?cshrc\\|esrc\\|rcrc\\|[kz]shenv\\|xinitrc\\|startxrc\\|xsession\\)\\'" . sh-mode) | 58 | (cons '("\\.c?sh\\'\\|\\.shar\\'\\|/\\.\\(z?profile\\|bash_profile\\|z?login\\|bash_login\\|z?logout\\|bash_logout\\|[kz]shrc\\|bashrc\\|t?cshrc\\|esrc\\|rcrc\\|[kz]shenv\\|xinitrc\\|startxrc\\|xsession\\)\\'" . sh-mode) |
| 59 | auto-mode-alist) | 59 | auto-mode-alist) |
| @@ -842,7 +842,7 @@ EXPANSION may be either a string or a skeleton command." | |||
| 842 | 842 | ||
| 843 | 843 | ||
| 844 | (defun sh-mode-syntax-table (table &rest list) | 844 | (defun sh-mode-syntax-table (table &rest list) |
| 845 | "Copy TABLE and set syntax for succesive CHARs according to strings S." | 845 | "Copy TABLE and set syntax for successive CHARs according to strings S." |
| 846 | (setq table (copy-syntax-table table)) | 846 | (setq table (copy-syntax-table table)) |
| 847 | (while list | 847 | (while list |
| 848 | (modify-syntax-entry (car list) (car (cdr list)) table) | 848 | (modify-syntax-entry (car list) (car (cdr list)) table) |