[Emacs-diffs] Changes to emacs/lisp/facemenu.el [emacs-unicode-2]

[Miles Bader]

Index: emacs/lisp/facemenu.el
diff -c emacs/lisp/facemenu.el:1.70.6.2 emacs/lisp/facemenu.el:1.70.6.3
*** emacs/lisp/facemenu.el:1.70.6.2     Mon Jun 28 07:28:39 2004
--- emacs/lisp/facemenu.el      Thu Sep  9 09:36:31 2004
***************
*** 617,623 ****
                       (check-face (car face-list)))))
                (i mask-len)
                (useful nil))
!           (while (> (setq i (1- i)) 1)
              (and (not (memq (aref face-atts i) '(nil unspecified)))
                   (memq (aref mask-atts i) '(nil unspecified))
                   (aset mask-atts i (setq useful t))))
--- 617,623 ----
                       (check-face (car face-list)))))
                (i mask-len)
                (useful nil))
!           (while (>= (setq i (1- i)) 0)
              (and (not (memq (aref face-atts i) '(nil unspecified)))
                   (memq (aref mask-atts i) '(nil unspecified))
                   (aset mask-atts i (setq useful t))))