From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: Christopher Dimech Newsgroups: gmane.emacs.help Subject: Re: custom-set-faces for various file types Date: Sun, 22 Nov 2020 23:53:47 +0100 Message-ID: References: <87sg91cdpd.fsf@web.de> <87im9xcbr7.fsf@web.de> Mime-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: quoted-printable Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="19026"; mail-complaints-to="usenet@ciao.gmane.io" Cc: Michael Heerdegen , help-gnu-emacs@gnu.org To: Christopher Dimech Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane-mx.org@gnu.org Sun Nov 22 23:55:56 2020 Return-path: Envelope-to: geh-help-gnu-emacs@m.gmane-mx.org Original-Received: from lists.gnu.org ([209.51.188.17]) by ciao.gmane.io with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.92) (envelope-from ) id 1kgyGy-0004pr-6W for geh-help-gnu-emacs@m.gmane-mx.org; Sun, 22 Nov 2020 23:55:56 +0100 Original-Received: from localhost ([::1]:55794 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1kgyGx-0001Cm-2t for geh-help-gnu-emacs@m.gmane-mx.org; Sun, 22 Nov 2020 17:55:55 -0500 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]:39234) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1kgyEx-0001Cc-D0 for help-gnu-emacs@gnu.org; Sun, 22 Nov 2020 17:53:51 -0500 Original-Received: from mout.gmx.net ([212.227.17.20]:56725) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1kgyEv-00062V-7b for help-gnu-emacs@gnu.org; Sun, 22 Nov 2020 17:53:51 -0500 DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=gmx.net; s=badeba3b8450; t=1606085627; bh=CoCy0zWM1WLibdxCWpbTHCeRVjS1DNk/rCAElWeTDIU=; h=X-UI-Sender-Class:From:To:Cc:Subject:Date:In-Reply-To:References; b=OjTG224izpVFPZg/vCLDNLrQJZdlFfuwEJwibRME/2wXrmb4diovaomWKxmXWlc/i VsYm3zjYqDyJefBw3Ho1HMgVLwcc99dpAu9GJXK3wc8n158xqOicbawRvvEef9j+Vu 0AyQDvqdvTnAxpSBsPs0Svsfyi0DKiByptKRdK8w= X-UI-Sender-Class: 01bb95c1-4bf8-414a-932a-4f6e2808ef9c Original-Received: from [213.165.168.94] ([213.165.168.94]) by web-mail.gmx.net (3c-app-mailcom-bs01.server.lan [172.19.170.58]) (via HTTP); Sun, 22 Nov 2020 23:53:47 +0100 Importance: normal Sensitivity: Normal In-Reply-To: X-UI-Message-Type: mail X-Priority: 3 X-Provags-ID: V03:K1:4Z2WMSJafJunzqdVFt7CbiixvKFGjMdlLC7yntM/mm+C/9TYso9QCiiMpxq1Bjx796pj0 55g7gabqveYgHIzlaYkB9Li7nPU7aJ+MkTJSRNpVo2FUvsH1yOSGpfhO1U0gRlpdTrmax49ii7Gq Ol1svxYaV/RHS8xUByIQ7ypU55FPQ8TW08ZcAi1jWL1/hN63vhlZVrS0mf60sR2yZCdj0ibKonTO CkwSHNmeTXxafCNUPIRJxr3LcXycbXgJEw7wi5+8lFisz6uKMOgnzBeYTuluPgllJs9VqXmHDUDK gk= X-UI-Out-Filterresults: notjunk:1;V03:K0:E8LcWiN73FU=:fYnWwfo9t6LmMbA7EqjOzQ c6za3leHkNO8wcvRuhqr/FZybySglY0jHFLrPXUcmLWZv93fGimF/rLA+rpWhUiSgECAR5GLN U7i/L5xrZ54DDlB96fWjXDyrrUva9hDOVx6dYu4365kFSv9wdyG2LSGUmtgITHjoowphusLwW DiGQG0SYwyXlPpROYwBjmIeX1LSyZUTepiUCEo9GwiyVgc8NxvylXo507ZUJe2YaIlKyXcXKR v9cx/ThQn9R6u5UrJzDdrx42JouvqJBcUltIyuCz+OT0+ktFcIwdKVhWho08HyOxm1nDijVyx z2geV79sFGJuVtGSHh9bqh/yDRiFu06k8n1SiP8QJhwQ/982gYJs/ozDox0XJuj26TKO/VJmo VZdu0nnN9wg6liRy/G3oXj/fanV2UaXkeIPZk66CYdUvmz6gGhJUmAfMy0oyWIuvRW7tpS5XL BWPyct00TG8StJPDVctEqTT9SDGcvBa96UM7a0pFnacszaRpRUNlz2BUHNEhEwaOeywBqDy+z X1Wq5GckuAPjAzOH59DMBVu13Okd2kxDz714KwHXt8MWZ4N1AeHRrJ+DR0EEUCy/9X7xzZNvm Iy9H3gEjjHFEo= Received-SPF: pass client-ip=212.227.17.20; envelope-from=dimech@gmx.com; helo=mout.gmx.net X-Spam_score_int: -25 X-Spam_score: -2.6 X-Spam_bar: -- X-Spam_report: (-2.6 / 5.0 requ) BAYES_00=-1.9, DKIM_SIGNED=0.1, DKIM_VALID=-0.1, FREEMAIL_FROM=0.001, RCVD_IN_DNSWL_LOW=-0.7, RCVD_IN_MSPIKE_H2=-0.001, SPF_HELO_NONE=0.001, SPF_PASS=-0.001 autolearn=ham autolearn_force=no X-Spam_action: no action X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1.23 Precedence: list List-Id: Users list for the GNU Emacs text editor List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane-mx.org@gnu.org Original-Sender: "help-gnu-emacs" Xref: news.gmane.io gmane.emacs.help:125496 Archived-At: Would this be good (add-hook 'org-mode-hook (lambda () (face-remap-add-relative '(org-level-1 ((t (:foreground "cyan1")))) '(org-level-2 ((t (:foreground "chartreuse")))) '(org-level-3 ((t (:foreground "dark orange")))) '(org-level-4 ((t (:foreground "yellow")))) '(org-level-5 ((t (:foreground "magenta")))) '(org-level-6 ((t (:foreground "tan1")))) '(org-level-7 ((t (:foreground "deep sky blue")))) '(org-level-8 ((t (:foreground "orange red")))) ))) > Sent: Sunday, November 22, 2020 at 11:10 PM > From: "Christopher Dimech" > To: "Michael Heerdegen" > Cc: help-gnu-emacs@gnu.org > Subject: Re: custom-set-faces for various file types > > Could you help me redo the following using face-remap > > (add-hook 'texinfo-mode-hook > (custom-set-faces > '(font-lock-variable-name-face ((t (:foreground "green")))) > '(font-lock-builtin-face ((t (:foreground "green")))) )) > > ;; ---------------------------------------------------------------------= - > ;; Colourise Texinfo Outlines Levels (Chapters, Sections, Headlines) > (custom-set-faces > '(texinfo-heading > ((t (:inherit font-lock-function-name-face > :foreground "#ffdd00"))) )) > > ;; ---------------------------------------------------------------------= - > ;; Colourise Org-Mode Heading Levels > (custom-set-faces > '(org-level-1 ((t (:foreground "cyan1")))) > '(org-level-2 ((t (:foreground "chartreuse")))) > '(org-level-3 ((t (:foreground "dark orange")))) > '(org-level-4 ((t (:foreground "yellow")))) > '(org-level-5 ((t (:foreground "magenta")))) > '(org-level-6 ((t (:foreground "tan1")))) > '(org-level-7 ((t (:foreground "deep sky blue")))) > '(org-level-8 ((t (:foreground "orange red")))) ) > > > > > Sent: Sunday, November 22, 2020 at 10:39 PM > > From: "Michael Heerdegen" > > To: help-gnu-emacs@gnu.org > > Subject: Re: custom-set-faces for various file types > > > > Christopher Dimech writes: > > > > > > What is your goal? Faces looking differently depending on the maj= or > > > > mode? > > > > > > I would like that some special constructs are highligthed so that th= e > > > contrast would be suitable for assistive reasons. For instance, in > > > current texinfo modes, constructs in pure tex do not get highlighted= . > > > So I have some code that uses custom-set-faces in texi-init.el. > > > > > > The Manual says that custom-set-variables must be only called once. > > > [...] > > > > I don't think custom is the right tool for your purpose. Face > > definitions are global. You can switch between settings ("themes"), b= ut > > the effect is always global. > > > > For texinfo, maybe you could instead change the font-locking of the > > mode? It's defined in `texinfo-font-lock-keywords'. Maybe it's enoug= h > > to add an entry to that list? > > > > Emacs also supports per-buffer modifications of faces. The mechanism = is > > called "face-remap". You could use it in the mode's hooks to change h= ow > > a face looks like in buffers using that mode. `face-remap-add-relativ= e' > > is the function to use, takes a face and a list of specs. Using that > > would be a cleaner solution for your case I think. > > > > Michael. > > > > > > > >