Parent Directory | Revision Log | Patch
revision 1.342 by cyd, Sun Nov 20 22:35:48 2005 UTC | revision 1.343 by eliz, Sat Nov 26 11:06:53 2005 UTC | |
---|---|---|
# | Line 4687 DEFUN ("internal-set-lisp-face-attribute | Line 4687 DEFUN ("internal-set-lisp-face-attribute |
4687 | if (SYMBOLP (boolean_value)) | if (SYMBOLP (boolean_value)) |
4688 | value = boolean_value; | value = boolean_value; |
4689 | } | } |
4690 | else if (EQ (attr, QCbox)) | else if (EQ (attr, QCbox) || EQ (attr, QCinherit)) |
4691 | value = Fcar (Fread_from_string (value, Qnil, Qnil)); | value = Fcar (Fread_from_string (value, Qnil, Qnil)); |
4692 | ||
4693 | return Finternal_set_lisp_face_attribute (face, attr, value, frame); | return Finternal_set_lisp_face_attribute (face, attr, value, frame); |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |