From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: Heime Newsgroups: gmane.emacs.help Subject: Re: Changing highlight colours of headings when using outline-minor-mode Date: Wed, 14 Jun 2023 23:38:49 +0000 Message-ID: References: <83a5x2ug6m.fsf@gnu.org> 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="27096"; mail-complaints-to="usenet@ciao.gmane.io" Cc: Eli Zaretskii , help-gnu-emacs@gnu.org To: Heime Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane-mx.org@gnu.org Thu Jun 15 01:39:30 2023 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 1q9a5J-0006vj-Kx for geh-help-gnu-emacs@m.gmane-mx.org; Thu, 15 Jun 2023 01:39:29 +0200 Original-Received: from localhost ([::1] helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1q9a4o-0002Ob-Nd; Wed, 14 Jun 2023 19:38:58 -0400 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1q9a4n-0002OT-Jx for help-gnu-emacs@gnu.org; Wed, 14 Jun 2023 19:38:57 -0400 Original-Received: from mail-4325.protonmail.ch ([185.70.43.25]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1q9a4l-0001EU-E7 for help-gnu-emacs@gnu.org; Wed, 14 Jun 2023 19:38:57 -0400 DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=protonmail.com; s=protonmail3; t=1686785933; x=1687045133; bh=IbWvrcgK2GNFse69+fT4RY3wsq38YRsIeGT61MjofGM=; h=Date:To:From:Cc:Subject:Message-ID:In-Reply-To:References: Feedback-ID:From:To:Cc:Date:Subject:Reply-To:Feedback-ID: Message-ID:BIMI-Selector; b=hNgFVRggUbTHavPE5G/YwFXl9i6sYY+mqyEPD17y7Rm9MGBrFSOUtZpwm3xrZCZBt Z0MY98VhcgKfJTbPeNa6j57KYK1FtYQKCFxlO8CwfF5QGdGxwoyj66eueVYKO+ipo9 N5t+Btp9IZ3P1E7Z60JMon/WiGYw+Z21Y9hWkicUqCSk7z+FO+SvpUW56qXcmgZUgn zcxDExWdu4WobMIpU4osM1zQnrOPYax1MYerfcfqhek+Jm9WVs7VkTFxG8dQyDRPrs RQNaLbIJUr6UVuuiS5+6S3jDes/vZEXkzRiDpSJlxNm70mnTUVN44A5Aurr14fAmg6 eu8q58AYWBuuA== In-Reply-To: Feedback-ID: 57735886:user:proton Received-SPF: pass client-ip=185.70.43.25; envelope-from=heimeborgia@protonmail.com; helo=mail-4325.protonmail.ch X-Spam_score_int: -16 X-Spam_score: -1.7 X-Spam_bar: - X-Spam_report: (-1.7 / 5.0 requ) BAYES_00=-1.9, DKIM_SIGNED=0.1, DKIM_VALID=-0.1, DKIM_VALID_AU=-0.1, DKIM_VALID_EF=-0.1, FREEMAIL_FROM=0.001, RCVD_IN_MSPIKE_H5=0.001, RCVD_IN_MSPIKE_WL=0.001, SPF_HELO_PASS=-0.001, SPF_PASS=-0.001, TO_EQ_FM_DIRECT_MX=0.428, T_SCC_BODY_TEXT_LINE=-0.01 autolearn=no autolearn_force=no X-Spam_action: no action X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1.29 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-bounces+geh-help-gnu-emacs=m.gmane-mx.org@gnu.org Xref: news.gmane.io gmane.emacs.help:143939 Archived-At: ------- Original Message ------- On Thursday, June 15th, 2023 at 11:20 AM, Heime wrote: > ------- Original Message ------- > On Thursday, June 15th, 2023 at 5:06 AM, Eli Zaretskii eliz@gnu.org wrote= : >=20 >=20 >=20 > > > Date: Wed, 14 Jun 2023 16:13:26 +0000 > > > From: Heime heimeborgia@protonmail.com > > >=20 > > > I want to change highlight foreground colours of headings to be more = vibrant when using outline-minor-mode > > > How can the colour levels be changed ? > >=20 > > By customizing the relevant faces. >=20 >=20 > Right, but I am looking to customise them via the construction of an elis= p function. > But I do not know how the specific function would like. Have initiated with this attempt (defun heading-tyface () "Set foreground colour for headings in `outline-minor-mode'." (interactive) (outline-map-region (lambda () (let* ( ($hglevl (funcall outline-level)) ($tyface (cond ((=3D hglevl 1) '(:foreground "red")) ((=3D hglevl 2) '(:foreground "blue")) ((=3D hglevl 3) '(:foreground "green")) (t '(:foreground "white")))) ) ;;-------------------------- (when (looking-at outline-regexp) (put-text-property (point-at-bol) (point-at-eol) '$tyface $tyface))))))