From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: Newsgroups: gmane.emacs.help Subject: Re: New function: rcd-highlight-list Date: Wed, 19 May 2021 09:52:54 +0200 Message-ID: <20210519075254.GF7028@tuxteam.de> References: <20210518172721.GL11623@tuxteam.de> <20210518184748.GA9116@tuxteam.de> Mime-Version: 1.0 Content-Type: multipart/signed; micalg=pgp-sha1; protocol="application/pgp-signature"; boundary="eVzOFob/8UvintSX" Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="13941"; mail-complaints-to="usenet@ciao.gmane.io" User-Agent: Mutt/1.5.21 (2010-09-15) Cc: help-gnu-emacs@gnu.org To: Stefan Monnier Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane-mx.org@gnu.org Wed May 19 09:53:45 2021 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 1ljH1V-0003U0-0u for geh-help-gnu-emacs@m.gmane-mx.org; Wed, 19 May 2021 09:53:45 +0200 Original-Received: from localhost ([::1]:51146 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1ljH1U-0000aI-3j for geh-help-gnu-emacs@m.gmane-mx.org; Wed, 19 May 2021 03:53:44 -0400 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]:47266) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1ljH0l-0000Zz-S9 for help-gnu-emacs@gnu.org; Wed, 19 May 2021 03:52:59 -0400 Original-Received: from mail.tuxteam.de ([5.199.139.25]:34511) by eggs.gnu.org with esmtps (TLS1.2:DHE_RSA_AES_128_CBC_SHA1:128) (Exim 4.90_1) (envelope-from ) id 1ljH0j-0002jI-NU for help-gnu-emacs@gnu.org; Wed, 19 May 2021 03:52:59 -0400 DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; d=tuxteam.de; s=mail; h=From:In-Reply-To:Content-Type:MIME-Version:References:Message-ID:Subject:Cc:To:Date; bh=qcS4o1/6WsKPVfJPC6NAA2uJgaCED3jlC8VB4cJXDWY=; b=qr0f3Vop2KIlj8bqiFqV1AqUe68CJiE10N4Z4R0VrU4lPIi7zFQ1ibc0ery0ipjaMyTnujor9beJcz/Bx4wHvOR3Kt4XmB8ALKKSaVAVa7Pe4S+gxiS/VRAjNv7VDtB6SsaZxt3wBoJHCKRN07Q0p49JpQYww1EvTwz05tiBCYHCQT/XPuCCcCzHPeDkG9ew4KSg14wVwwgvdR1hd+tcOszSa4evJrEmoFFP6F8Vywevz1iR2NQjnNusXlNm8FfVxC+dsFHzHJffHdZfukEh/E7xBBuHngYp5TAhFIJigq3dK4cbkdcZ+boBO1gf0bBuHwAAXiV+VmlhTFjJg0t7lA==; Original-Received: from tomas by mail.tuxteam.de with local (Exim 4.80) (envelope-from ) id 1ljH0g-0002RH-Nk; Wed, 19 May 2021 09:52:54 +0200 Content-Disposition: inline In-Reply-To: Received-SPF: pass client-ip=5.199.139.25; envelope-from=tomas@tuxteam.de; helo=mail.tuxteam.de X-Spam_score_int: -20 X-Spam_score: -2.1 X-Spam_bar: -- X-Spam_report: (-2.1 / 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, 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:129918 Archived-At: --eVzOFob/8UvintSX Content-Type: text/plain; charset=utf-8 Content-Disposition: inline Content-Transfer-Encoding: quoted-printable On Tue, May 18, 2021 at 04:13:56PM -0400, Stefan Monnier via Users list for= the GNU Emacs text editor wrote: > tomas@tuxteam.de [2021-05-18 20:47:48] wrote: > > On Tue, May 18, 2021 at 08:43:21PM +0300, Jean Louis wrote: > >> * tomas@tuxteam.de [2021-05-18 20:28]: > >> > On Tue, May 18, 2021 at 08:08:29PM +0300, Jean Louis wrote: > >> > >=20 > >> > > (defun rcd-highlight-list (list) > >> > > "Uses LIST to highlight strings in buffer." > >> > > (hi-lock-mode) > >> > > (let* ((list (delete "" list)) > >> > > (highlights hi-lock-face-defaults)) > >> > > (while list > >> > > (highlight-regexp (pop list) (pop highlights))))) > >> > >=20 > >> > > Just feed to this function a list of strings to highlight: > >> >=20 > >> > What happens if one of the strings is ".*"? > >>=20 > >> Yes, it is not for all circumstances. It will also not support too > >> many keywords as it uses hi-lock-face-defaults list > > > > Perhaps the function `regexp-quote' is built for you :) >=20 > I think you mistyped `regexp-opt`. Always taking things to the next level. But yes, you're right: the whole while loop above would collapse in a puff of pink smoke or something ;-) Cheers - t --eVzOFob/8UvintSX Content-Type: application/pgp-signature; name="signature.asc" Content-Description: Digital signature -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.12 (GNU/Linux) iEYEARECAAYFAmCkw9YACgkQBcgs9XrR2kYbSACfUy4nNbiqffCQdiZBAe0XlL/a YsUAn033S1i+T6/u0Xy8d1ixtrdbqY1f =vmoU -----END PGP SIGNATURE----- --eVzOFob/8UvintSX--