aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/emacs-lisp/lisp-mode.el
diff options
context:
space:
mode:
authorJim Blandy <[email protected]>1991-05-24 01:03:48 +0000
committerJim Blandy <[email protected]>1991-05-24 01:03:48 +0000
commitecca85de5679824b489852bade75738310a7fcba (patch)
tree8a36d728cb0c11003c564e9f8aa72779d3973d4a /lisp/emacs-lisp/lisp-mode.el
parentf927c5aedf17f6c37acc624fda99aef0f31f1a19 (diff)
*** empty log message ***
Diffstat (limited to 'lisp/emacs-lisp/lisp-mode.el')
-rw-r--r--lisp/emacs-lisp/lisp-mode.el17
1 files changed, 8 insertions, 9 deletions
diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el
index 75a35d56cd..54c31c3c78 100644
--- a/lisp/emacs-lisp/lisp-mode.el
+++ b/lisp/emacs-lisp/lisp-mode.el
@@ -17,6 +17,7 @@
;; along with GNU Emacs; see the file COPYING. If not, write to
;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
+(provide 'lisp-mode)
(defvar lisp-mode-syntax-table nil "")
(defvar emacs-lisp-mode-syntax-table nil "")
@@ -58,19 +59,17 @@
(modify-syntax-entry ?\[ "(] " emacs-lisp-mode-syntax-table)
(modify-syntax-entry ?\] ")[ " emacs-lisp-mode-syntax-table)))
+(if (not lisp-mode-syntax-table)
+ (progn (setq lisp-mode-syntax-table
+ (copy-syntax-table emacs-lisp-mode-syntax-table))
+ (modify-syntax-entry ?\| "\" " lisp-mode-syntax-table)
+ (modify-syntax-entry ?\[ "_ " lisp-mode-syntax-table)
+ (modify-syntax-entry ?\] "_ " lisp-mode-syntax-table)))
+
(define-abbrev-table 'lisp-mode-abbrev-table ())
(defun lisp-mode-variables (lisp-syntax)
(cond (lisp-syntax
- (if (not lisp-mode-syntax-table)
- (progn (setq lisp-mode-syntax-table
- (copy-syntax-table emacs-lisp-mode-syntax-table))
- (modify-syntax-entry ?\| "\" "
- lisp-mode-syntax-table)
- (modify-syntax-entry ?\[ "_ "
- lisp-mode-syntax-table)
- (modify-syntax-entry ?\] "_ "
- lisp-mode-syntax-table)))
(set-syntax-table lisp-mode-syntax-table)))
(setq local-abbrev-table lisp-mode-abbrev-table)
(make-local-variable 'paragraph-start)