Mercurial > emacs
comparison lisp/emacs-lisp/lisp-mode.el @ 584:4cd7543be581
*** empty log message ***
author | Jim Blandy <jimb@redhat.com> |
---|---|
date | Mon, 16 Mar 1992 20:39:07 +0000 |
parents | 5abb8aac7c6b |
children | 505130d1ddf8 |
comparison
equal
deleted
inserted
replaced
583:3c0c1cd8428a | 584:4cd7543be581 |
---|---|
14 ;; GNU General Public License for more details. | 14 ;; GNU General Public License for more details. |
15 | 15 |
16 ;; You should have received a copy of the GNU General Public License | 16 ;; You should have received a copy of the GNU General Public License |
17 ;; along with GNU Emacs; see the file COPYING. If not, write to | 17 ;; along with GNU Emacs; see the file COPYING. If not, write to |
18 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. | 18 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. |
19 | |
20 (provide 'lisp-mode) | |
21 | 19 |
22 (defvar lisp-mode-syntax-table nil "") | 20 (defvar lisp-mode-syntax-table nil "") |
23 (defvar emacs-lisp-mode-syntax-table nil "") | 21 (defvar emacs-lisp-mode-syntax-table nil "") |
24 (defvar lisp-mode-abbrev-table nil "") | 22 (defvar lisp-mode-abbrev-table nil "") |
25 | 23 |
611 (indent-to (max 0 (+ indent arg)) 0)))) | 609 (indent-to (max 0 (+ indent arg)) 0)))) |
612 (setq state (parse-partial-sexp (point) | 610 (setq state (parse-partial-sexp (point) |
613 (progn | 611 (progn |
614 (forward-line 1) (point)) | 612 (forward-line 1) (point)) |
615 nil nil state)))))) | 613 nil nil state)))))) |
614 | |
615 (provide 'lisp-mode) | |
616 |