/[emacs]/emacs/lisp/font-lock.el
ViewVC logotype

Diff of /emacs/lisp/font-lock.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.211.2.7 by miles, Fri Aug 27 07:00:25 2004 UTC revision 1.211.2.8 by miles, Thu Oct 14 08:50:01 2004 UTC
# Line 1324  HIGHLIGHT should be of the form MATCH-HI Line 1324  HIGHLIGHT should be of the form MATCH-HI
1324            (add-text-properties start end (cddr val))            (add-text-properties start end (cddr val))
1325            (setq val (cadr val)))            (setq val (cadr val)))
1326          (cond          (cond
1327             ((not (or val (eq override t)))
1328              ;; If `val' is nil, don't do anything.  It is important to do it
1329              ;; explicitly, because when adding nil via things like
1330              ;; font-lock-append-text-property, the property is actually
1331              ;; changed from <face> to (<face>) which is undesirable.  --Stef
1332              nil)
1333           ((not override)           ((not override)
1334            ;; Cannot override existing fontification.            ;; Cannot override existing fontification.
1335            (or (text-property-not-all start end 'face nil)            (or (text-property-not-all start end 'face nil)

Legend:
Removed from v.1.211.2.7  
changed lines
  Added in v.1.211.2.8

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26