From: Dave Love <fx@gnu.org>
Date: Wed, 1 Mar 2000 21:02:37 +0000 (+0000)
Subject: (lisp-mode-syntax-table): Fix syntax of |.
X-Git-Tag: emacs-pretest-21.0.90~4821
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e5f597f0bfd8218482b8c6fba3621d96d5ad3155;p=emacs.git

(lisp-mode-syntax-table): Fix syntax of |.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b562b091841..14d5c6a61b7 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2000-03-01  Dave Love  <fx@gnu.org>
 
+	* emacs-lisp/lisp-mode.el (lisp-mode-syntax-table): Fix syntax of |.
+
 	* help.el (help-xref-button): Add help-echo arg.
 	(describe-function-1, describe-variable, help-make-xrefs): Use it.
 
diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el
index d82c71c263d..6905fcb39da 100644
--- a/lisp/emacs-lisp/lisp-mode.el
+++ b/lisp/emacs-lisp/lisp-mode.el
@@ -72,11 +72,10 @@
 
 (defvar lisp-mode-syntax-table
   (let ((table (copy-syntax-table emacs-lisp-mode-syntax-table)))
-    (modify-syntax-entry ?\| "\"   " table)
     (modify-syntax-entry ?\[ "_   " table)
     (modify-syntax-entry ?\] "_   " table)
     (modify-syntax-entry ?# "' 14bn" table)
-    (modify-syntax-entry ?| "' 23b" table)
+    (modify-syntax-entry ?| "\" 23b" table)
     table))
 
 (define-abbrev-table 'lisp-mode-abbrev-table ())