unofficial mirror of bug-gnu-emacs@gnu.org 
 help / color / mirror / code / Atom feed
From: Dave Abrahams <dave@boostpro.com>
To: 8454@debbugs.gnu.org
Subject: bug#8454: I can't reproduce this
Date: Sun, 23 Oct 2011 12:58:48 -0400	[thread overview]
Message-ID: <m2ehy38x13.fsf@pluto.luannocracy.com> (raw)
In-Reply-To: <867hb45bh2.fsf@gmail.com>

[-- Attachment #1: Type: text/plain, Size: 321 bytes --]


In emacs 23.3, I tried to build a minimal test case that would exhibit
some of the problems cited here, and failed.  What I wrote is below, and
loading it with `emacs -Q -l test.el' seems to produce the expected
results.  If there *is* a real problem, it seems to me, some simple
variation on this code should show it.


[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: test.el --]
[-- Type: text/emacs-lisp, Size: 725 bytes --]

;; define a couple of faces to be used in the theme
(defface face1
    '((t :background "pink"))
    "first test face")
(defface face2
    '((t :background "yellow"))
    "second test face")

;; simulate (load 'theme1)
(deftheme theme1
  "1st test theme")
(custom-theme-set-faces
 'theme1
 '(face2 ((t (:slant italic :inherit (face1)))))
 '(face3 ((t (:background "yellow"))))
 '(face4 ((t (:inherit (face3))))))
(provide-theme 'theme1)
;; done loading theme1

;; define some more faces used in the theme
(defface face3
    '((t :background "pink"))
    "3rd test face")
(defface face4
    '((t :slant italic))
    "4th test face")

;; inspect the faces
(setq inhibit-startup-screen t)
(customize-apropos-faces "^face[0-9]")

  reply	other threads:[~2011-10-23 16:58 UTC|newest]

Thread overview: 6+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2011-04-09  3:51 bug#8454: 24.0; Emacs does not apply additional custom faces from theme Christoph Scholtes
2011-10-23 16:58 ` Dave Abrahams [this message]
2011-12-05  6:54 ` bug#8454: Themes can't work right due to design Chris Hanson
2011-12-05 17:52   ` Drew Adams
2011-12-05 19:03   ` Stefan Monnier
2011-12-06  2:22     ` Chong Yidong

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://www.gnu.org/software/emacs/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=m2ehy38x13.fsf@pluto.luannocracy.com \
    --to=dave@boostpro.com \
    --cc=8454@debbugs.gnu.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).