mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-20 18:17:20 +00:00
Code Issues Releases Activity

(tex-categorize-whitespace): Use eq, not eql.

Browse Source
This commit is contained in:
Richard M. Stallman 1997-07-24 04:21:34 +00:00
parent ecf38857f9
commit 2be5fefb86
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/textmodes/tex-mode.el
View File

@ -723,10 +723,10 @@ Entering SliTeX mode runs the hook `text-mode-hook', then the hook
(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 @@ Entering SliTeX mode runs the hook `text-mode-hook', then the hook
(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)))