comparison lisp/faces.el @ 5470:0af042a0c116

Merge with trunk.
author Mats Lidell <matsl@xemacs.org>
date Mon, 07 Feb 2011 21:22:17 +0100
parents b9167d522a9a 2a54dfbe434f
children ac37a5f7e5be
comparison
equal deleted inserted replaced
5469:2a8a04f73c15 5470:0af042a0c116
414 (mapc (lambda (x) 414 (mapc (lambda (x)
415 (set-face-property face x (vector parent) locale tag-set 415 (set-face-property face x (vector parent) locale tag-set
416 how-to-add)) 416 how-to-add))
417 (set-difference built-in-face-specifiers 417 (set-difference built-in-face-specifiers
418 '(display-table background-pixmap inherit))) 418 '(display-table background-pixmap inherit)))
419 (set-face-background-pixmap face (vector 'inherit ':face parent) 419 (set-face-background-pixmap face (vector 'inherit :face parent)
420 locale tag-set how-to-add) 420 locale tag-set how-to-add)
421 nil) 421 nil)
422 422
423 (defun face-doc-string (face) 423 (defun face-doc-string (face)
424 "Return the documentation string for FACE." 424 "Return the documentation string for FACE."