/[emacs]/emacs/lisp/facemenu.el
ViewVC logotype

Diff of /emacs/lisp/facemenu.el

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

revision 1.67.2.3 by miles, Tue Jul 6 09:23:35 2004 UTC revision 1.67.2.4 by miles, Thu Sep 16 00:12:21 2004 UTC
# Line 617  use the selected frame.  If t, then the Line 617  use the selected frame.  If t, then the
617                         (check-face (car face-list)))))                         (check-face (car face-list)))))
618                  (i mask-len)                  (i mask-len)
619                  (useful nil))                  (useful nil))
620              (while (> (setq i (1- i)) 1)              (while (>= (setq i (1- i)) 0)
621                (and (not (memq (aref face-atts i) '(nil unspecified)))                (and (not (memq (aref face-atts i) '(nil unspecified)))
622                     (memq (aref mask-atts i) '(nil unspecified))                     (memq (aref mask-atts i) '(nil unspecified))
623                     (aset mask-atts i (setq useful t))))                     (aset mask-atts i (setq useful t))))

Legend:
Removed from v.1.67.2.3  
changed lines
  Added in v.1.67.2.4

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