Mercurial > hg > xemacs-beta

comparison lisp/x-faces.el @ 4194:4f2243a0dc04

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2007-09-30 11:59:34 by aidan] Provide x-resource, msprinter as specifier tags on all builds.
author aidan
date Sun, 30 Sep 2007 11:59:36 +0000
parents cef5f57bb9e2
children de99c4dbad18
comparison
equal deleted inserted replaced
4193:6438d53aabcf 4194:4f2243a0dc04
652 ;;; This had better not signal an error. The frame is in an intermediate 652 ;;; This had better not signal an error. The frame is in an intermediate
653 ;;; state where signalling an error or entering the debugger would likely 653 ;;; state where signalling an error or entering the debugger would likely
654 ;;; result in a crash. 654 ;;; result in a crash.
655 655
656 ;; When we initialise a face from an X resource, note that we did so. 656 ;; When we initialise a face from an X resource, note that we did so.
657 (define-specifier-tag 'x-resource) 657 ;;
658 ;; Now in specifier.el so run-time checks for it on non-X builds don't
659 ;; error.
660
661 ; (define-specifier-tag 'x-resource)
658 662
659 (defun x-init-face-from-resources (face &optional locale set-anyway) 663 (defun x-init-face-from-resources (face &optional locale set-anyway)
660 664
661 ;; 665 ;;
662 ;; These are things like "attributeForeground" instead of simply 666 ;; These are things like "attributeForeground" instead of simply