aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman1997-07-24 04:21:34 +0000
committerRichard M. Stallman1997-07-24 04:21:34 +0000
commit2be5fefb8655a1349c9c6a0b03a8bf2da0df1d07 (patch)
tree92c93361c69dd5dd08b49f0ffd7cfd58f9511b6a
parentecf38857f9959775d7baa4b8d064e1c55676f078 (diff)
downloademacs-2be5fefb8655a1349c9c6a0b03a8bf2da0df1d07.tar.gz
emacs-2be5fefb8655a1349c9c6a0b03a8bf2da0df1d07.zip
(tex-categorize-whitespace): Use eq, not eql.
-rw-r--r--lisp/textmodes/tex-mode.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/textmodes/tex-mode.el b/lisp/textmodes/tex-mode.el
index 606205404e9..509b7fd4556 100644
--- a/lisp/textmodes/tex-mode.el
+++ b/lisp/textmodes/tex-mode.el
@@ -723,10 +723,10 @@ Entering SliTeX mode runs the hook `text-mode-hook', then the hook
723 (while not-finished 723 (while not-finished
724 (cond ((looking-at "[ \t]+") 724 (cond ((looking-at "[ \t]+")
725 (goto-char (match-end 0)) 725 (goto-char (match-end 0))
726 (if (eql category 'null) 726 (if (eq category 'null)
727 (setq category 'space))) 727 (setq category 'space)))
728 ((looking-at "\n") 728 ((looking-at "\n")
729 (cond ((eql category 'newline) 729 (cond ((eq category 'newline)
730 (setq category 'par) 730 (setq category 'par)
731 (setq not-finished nil)) 731 (setq not-finished nil))
732 (t 732 (t
@@ -738,7 +738,7 @@ Entering SliTeX mode runs the hook `text-mode-hook', then the hook
738 (t 738 (t
739 (setq not-finished nil)))) 739 (setq not-finished nil))))
740 (skip-chars-forward " \t\n\f") 740 (skip-chars-forward " \t\n\f")
741 (if (eql category 'newline) 741 (if (eq category 'newline)
742 'space ;TeX doesn't distinguish 742 'space ;TeX doesn't distinguish
743 category))) 743 category)))
744 744