Mercurial > emacs
comparison lisp/emacs-lisp/easy-mmode.el @ 37406:3886350a8826
(easy-mmode-defsyntax): Unquote `doc'.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Thu, 19 Apr 2001 22:44:57 +0000 |
| parents | 6b8b7796f28b |
| children | ce45998cedf2 |
comparison
equal
deleted
inserted
replaced
| 37405:36711f1790e0 | 37406:3886350a8826 |
|---|---|
| 372 st)) | 372 st)) |
| 373 | 373 |
| 374 ;;;###autoload | 374 ;;;###autoload |
| 375 (defmacro easy-mmode-defsyntax (st css doc &rest args) | 375 (defmacro easy-mmode-defsyntax (st css doc &rest args) |
| 376 "Define variable ST as a syntax-table. | 376 "Define variable ST as a syntax-table. |
| 377 CSS contains a list of syntax specifications of the form (CHAR . SYNTAX). | 377 CSS contains a list of syntax specifications of the form (CHAR . SYNTAX)." |
| 378 " | |
| 379 `(progn | 378 `(progn |
| 380 (autoload 'easy-mmode-define-syntax "easy-mmode") | 379 (autoload 'easy-mmode-define-syntax "easy-mmode") |
| 381 (defconst ,st (easy-mmode-define-syntax ,css ,(cons 'list args)) doc))) | 380 (defconst ,st (easy-mmode-define-syntax ,css ,(cons 'list args)) ,doc))) |
| 382 | 381 |
| 383 | 382 |
| 384 | 383 |
| 385 ;;; | 384 ;;; |
| 386 ;;; easy-mmode-define-navigation | 385 ;;; easy-mmode-define-navigation |