/[emacs]/emacs/lisp/cus-face.el
ViewVC logotype

Diff of /emacs/lisp/cus-face.el

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

revision 1.41 by ttn, Sat Aug 6 22:13:42 2005 UTC revision 1.42 by mituharu, Fri Oct 21 08:26:37 2005 UTC
# Line 47  Line 47 
47            (dolist (frame (frame-list))            (dolist (frame (frame-list))
48              (face-spec-set face value frame)))              (face-spec-set face value frame)))
49          ;; When making a face after frames already exist          ;; When making a face after frames already exist
50          (if (memq window-system '(x w32))          (if (memq window-system '(x w32 mac))
51              (make-face-x-resource-internal face))))              (make-face-x-resource-internal face))))
52      ;; Don't record SPEC until we see it causes no errors.      ;; Don't record SPEC until we see it causes no errors.
53      (put face 'face-defface-spec spec)      (put face 'face-defface-spec spec)

Legend:
Removed from v.1.41  
changed lines
  Added in v.1.42

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