# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 869718094 0
# Node ID 43b52e6a35c2ffce75dadf5e8aeadc3daa8ec1d9
# Parent  0a32de9b638786183872c6502a2e6b83770f3f5a
(tex-categorize-whitespace): Use eq, not eql.

diff -r 0a32de9b6387 -r 43b52e6a35c2 lisp/textmodes/tex-mode.el
--- a/lisp/textmodes/tex-mode.el	Thu Jul 24 04:06:12 1997 +0000
+++ b/lisp/textmodes/tex-mode.el	Thu Jul 24 04:21:34 1997 +0000
@@ -723,10 +723,10 @@
     (while not-finished
       (cond ((looking-at "[ \t]+")
 	     (goto-char (match-end 0))
-	     (if (eql category 'null)
+	     (if (eq category 'null)
 		 (setq category 'space)))
 	    ((looking-at "\n")
-	     (cond ((eql category 'newline)
+	     (cond ((eq category 'newline)
 		    (setq category 'par)
 		    (setq not-finished nil))
 		   (t
@@ -738,7 +738,7 @@
 	    (t
 	     (setq not-finished nil))))
     (skip-chars-forward " \t\n\f")
-    (if (eql category 'newline)
+    (if (eq category 'newline)
 	'space				;TeX doesn't distinguish
       category)))