Mercurial > emacs
comparison lisp/subr.el @ 17612:beaac591604a
(make-syntax-table): Doc fix.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Thu, 01 May 1997 06:47:29 +0000 |
parents | f95fbf6f1234 |
children | 857918bf965f |
comparison
equal
deleted
inserted
replaced
17611:1b2afa6391ca | 17612:beaac591604a |
---|---|
885 start (1+ end))) | 885 start (1+ end))) |
886 (concat result (substring argument start))))))) | 886 (concat result (substring argument start))))))) |
887 | 887 |
888 (defun make-syntax-table (&optional oldtable) | 888 (defun make-syntax-table (&optional oldtable) |
889 "Return a new syntax table. | 889 "Return a new syntax table. |
890 It inherits all letters and control characters from the standard | 890 If OLDTABLE is non-nil, copy OLDTABLE. |
891 syntax table; other characters are copied from the standard syntax table." | 891 Otherwise, create a syntax table which inherits |
892 all letters and control characters from the standard syntax table; | |
893 other characters are copied from the standard syntax table." | |
892 (if oldtable | 894 (if oldtable |
893 (copy-syntax-table oldtable) | 895 (copy-syntax-table oldtable) |
894 (let ((table (copy-syntax-table)) | 896 (let ((table (copy-syntax-table)) |
895 i) | 897 i) |
896 (setq i 0) | 898 (setq i 0) |