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

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b562b09184144e9e5ad6c71d372b028e6810bea1..14d5c6a61b7a4b8d360b66738f63e3f262170ab5 100644 (file)
--- 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 d82c71c263df0c0b1615c6185bf0e67c616f87cc..6905fcb39da702568d014791a8f318db9a354903 100644 (file)
--- 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 ())