summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2005-10-05 14:07:18 +0000
committerStefan Monnier <monnier@iro.umontreal.ca>2005-10-05 14:07:18 +0000
commitefbbcafbbecd28a962fe20b9afc45c353c0d7245 (patch)
tree573332357d35b96f705248f02c75d0f23f326c15 /lisp/emacs-lisp
parentec79de1002fba0e1d0c12a44816dc8e6b9a75da9 (diff)
downloademacs-efbbcafbbecd28a962fe20b9afc45c353c0d7245.tar.gz
emacs-efbbcafbbecd28a962fe20b9afc45c353c0d7245.tar.bz2
emacs-efbbcafbbecd28a962fe20b9afc45c353c0d7245.zip
(lisp-font-lock-syntactic-face-function):
Don't mark as docstring the 3rd elem of an unknown toplevel form.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/lisp-mode.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el
index e50d5bd125c..b347c136adf 100644
--- a/lisp/emacs-lisp/lisp-mode.el
+++ b/lisp/emacs-lisp/lisp-mode.el
@@ -163,7 +163,7 @@
(let ((sym (intern-soft
(buffer-substring
(point) (progn (forward-sexp 1) (point))))))
- (eq n (or (get sym 'doc-string-elt) 3)))))))
+ (eq n (get sym 'doc-string-elt)))))))
font-lock-doc-face
font-lock-string-face)
font-lock-comment-face))