From unknown Sat Aug 09 09:34:01 2025 X-Loop: help-debbugs@gnu.org Subject: bug#13892: 24.3.50; Provide for customizing default regexp in hi-lock commands Resent-From: Jambunathan K Original-Sender: debbugs-submit-bounces@debbugs.gnu.org Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Wed, 06 Mar 2013 17:57:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 13892 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: To: 13892@debbugs.gnu.org X-Debbugs-Original-To: bug-gnu-emacs@gnu.org Received: via spool by submit@debbugs.gnu.org id=B.136259262017530 (code B ref -1); Wed, 06 Mar 2013 17:57:01 +0000 Received: (at submit) by debbugs.gnu.org; 6 Mar 2013 17:57:00 +0000 Received: from localhost ([127.0.0.1]:34611 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1UDIaJ-0004Yh-WD for submit@debbugs.gnu.org; Wed, 06 Mar 2013 12:57:00 -0500 Received: from eggs.gnu.org ([208.118.235.92]:57793) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1UDIaG-0004YU-8N for submit@debbugs.gnu.org; Wed, 06 Mar 2013 12:56:58 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1UDIZi-0006Ob-IO for submit@debbugs.gnu.org; Wed, 06 Mar 2013 12:56:23 -0500 X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org X-Spam-Level: X-Spam-Status: No, score=-102.6 required=5.0 tests=BAYES_00,FREEMAIL_FROM, RCVD_IN_DNSWL_LOW, T_DKIM_INVALID, USER_IN_WHITELIST autolearn=unavailable version=3.3.2 Received: from lists.gnu.org ([208.118.235.17]:32981) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1UDIZi-0006OW-Dy for submit@debbugs.gnu.org; Wed, 06 Mar 2013 12:56:22 -0500 Received: from eggs.gnu.org ([208.118.235.92]:40903) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1UDIZh-0007pl-8x for bug-gnu-emacs@gnu.org; Wed, 06 Mar 2013 12:56:22 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1UDIZf-0006Nw-Cu for bug-gnu-emacs@gnu.org; Wed, 06 Mar 2013 12:56:21 -0500 Received: from mail-pb0-f42.google.com ([209.85.160.42]:39760) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1UDIZe-0006NX-Nq for bug-gnu-emacs@gnu.org; Wed, 06 Mar 2013 12:56:19 -0500 Received: by mail-pb0-f42.google.com with SMTP id xb4so6317314pbc.1 for ; Wed, 06 Mar 2013 09:56:17 -0800 (PST) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20120113; h=x-received:from:to:subject:date:message-id:mime-version :content-type; bh=P+IUjw55lNaMDlNWBFhYo0M9sKIhCMNHzCcVRa/Bgys=; b=H9kafnfoE8SWI+1Y1bjg5BQOTjwPmJhGRQsNXb7crj8HwXBSyx3Gf3Uuk+JPjWGNEG Gmt8/rKIb/De0LvUlQmdQ2P1aeJXSeennzRZPIuA001JmKDRt3Z+eU1TABRBsKOt7ZTA TpftLT7xaKpqJNVRRwbTbx1C/YQC4rjzdsv5YNCaCg9cL76wUkE7eOWQtq3O2Ued3Nw9 rFsxtiYdlXOPEaT39ZexgUjdVEsmF4iL2W72ytiEEVU+tdQLLiLe+fbJJYU5fI7ERIWG 1/JJ5dJP0eqErUPbkWJ77rb34yGS/iCguPeQRoQQ10W1+WCKr6QKUo0hYs+H+e9UXTX5 p9KQ== X-Received: by 10.68.189.8 with SMTP id ge8mr28073678pbc.166.1362592577779; Wed, 06 Mar 2013 09:56:17 -0800 (PST) Received: from debian-6.05 ([115.241.90.1]) by mx.google.com with ESMTPS id gf6sm32247562pbc.24.2013.03.06.09.56.12 (version=TLSv1.1 cipher=RC4-SHA bits=128/128); Wed, 06 Mar 2013 09:56:16 -0800 (PST) From: Jambunathan K Date: Wed, 06 Mar 2013 23:26:09 +0530 Message-ID: <87fw08za2u.fsf@gmail.com> MIME-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" X-detected-operating-system: by eggs.gnu.org: GNU/Linux 3.x [fuzzy] X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6.x X-Received-From: 208.118.235.17 X-Spam-Score: -4.2 (----) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.13 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: debbugs-submit-bounces@debbugs.gnu.org Errors-To: debbugs-submit-bounces@debbugs.gnu.org X-Spam-Score: -6.1 (------) --=-=-= Content-Type: text/plain Provide for customizing default regexp in hi-lock commands See bug#13687 & Co. disussion surrounding this feature-let. Let me know if the patch is OK, so that I can install it in trunk. --=-=-= Content-Type: diff Content-Disposition: attachment Content-Transfer-Encoding: base64 Content-Description: hi-lock.el.diff PT09IG1vZGlmaWVkIGZpbGUgJ2xpc3AvQ2hhbmdlTG9nJwotLS0gbGlzcC9DaGFuZ2VMb2cJMjAx My0wMy0wNiAxNDoyNDozOSArMDAwMAorKysgbGlzcC9DaGFuZ2VMb2cJMjAxMy0wMy0wNiAxNzoz Nzo1MiArMDAwMApAQCAtMSwzICsxLDEyIEBACisyMDEzLTAzLTA2ICBKYW1idW5hdGhhbiBLICA8 a2phbWJ1bmF0aGFuQGdtYWlsLmNvbT4KKworCSogaGktbG9jay5lbCAoaGktbG9jay1yZWFkLXJl Z2V4cC1kZWZhdWx0cy1mdW5jdGlvbik6IE5ldworCXZhcmlhYmxlLgorCShoaS1sb2NrLXJlYWQt cmVnZXhwLWRlZmF1bHRzKTogTmV3IGRlZnVuLgorCShoaS1sb2NrLWxpbmUtZmFjZS1idWZmZXIs IGhpLWxvY2stZmFjZS1idWZmZXIpCisJKGhpLWxvY2stZmFjZS1waHJhc2UtYnVmZmVyKTogVXNl CisJYGhpLWxvY2stcmVhZC1yZWdleHAtZGVmYXVsdHMtZnVuY3Rpb24nLiAgVXBkYXRlIGRvY3N0 cmluZy4KKwogMjAxMy0wMy0wNiAgQWxhbiBNYWNrZW56aWUgIDxhY21AbXVjLmRlPgogCiAJQ29y cmVjdCB0aGUgcG9zaXRpb24gb2YgcG9pbnQgaW4gc29tZSBsaW5lLXVwIGZ1bmN0aW9ucy4KCj09 PSBtb2RpZmllZCBmaWxlICdsaXNwL2hpLWxvY2suZWwnCi0tLSBsaXNwL2hpLWxvY2suZWwJMjAx My0wMS0yOCAyMDowMDozNSArMDAwMAorKysgbGlzcC9oaS1sb2NrLmVsCTIwMTMtMDMtMDYgMTc6 MjU6MjkgKzAwMDAKQEAgLTI3OSw2ICsyNzksMTkgQEAgYSBsaWJyYXJ5IGlzIGJlaW5nIGxvYWRl ZC4iKQogICAgIG1hcCkKICAgIktleSBtYXAgZm9yIGhpLWxvY2suIikKIAorKGRlZnZhciBoaS1s b2NrLXJlYWQtcmVnZXhwLWRlZmF1bHRzLWZ1bmN0aW9uCisgICdoaS1sb2NrLXJlYWQtcmVnZXhw LWRlZmF1bHRzCisgICJGdW5jdGlvbiB0aGF0IHByb3ZpZGVzIGRlZmF1bHQgcmVnZXhwKHMpIGZv ciBoaWdobGlnaHRpbmcgY29tbWFuZHMuCitUaGlzIGZ1bmN0aW9uIHNob3VsZCB0YWtlIG9uZSBh cmd1bWVudCBPUCBhbmQgcmV0dXJuIG9uZSBvZiBuaWwsCithIHJlZ2V4cCBvciBhIGxpc3Qgb2Yg cmVnZXhwcyBmb3IgdXNlIHdpdGggaGlnaGxpZ2h0aW5nIGNvbW1hbmQKK09QLiAgT1AsIGEgc3lt Ym9sLCBjYW4gYmUgb25lIG9mIGBwaHJhc2UnLCBgbGluZScgb3IgYG5pbCcKK3NpZ25pZnlpbmcg Y29tbWFuZHMgYGhpLWxvY2stZmFjZS1waHJhc2UtYnVmZmVyJywKK2BoaS1sb2NrLWxpbmUtZmFj ZS1idWZmZXInIGFuZCBgaGktbG9jay1mYWNlLWJ1ZmZlcicKK3Jlc3BlY3RpdmVseS4KKworVGhl IHJldHVybiB2YWx1ZSBvZiB0aGlzIGZ1bmN0aW9uIGlzIHVzZWQgYXMgREVGQVVMVFMgcGFyYW0g b2YKK2ByZWFkLXJlZ2V4cCcgd2hpbGUgZXhlY3V0aW5nIGNvbW1hbmQgZGVub3RlZCBieSBPUC4i KQorCiA7OyBWaXNpYmxlIEZ1bmN0aW9ucwogCiA7OzsjIyNhdXRvbG9hZApAQCAtMzk5LDE3ICs0 MTIsMTggQEAgdmVyc2lvbnMgYmVmb3JlIDIyIHVzZSB0aGUgZm9sbG93aW5nIGluCiA7OzsjIyNh dXRvbG9hZAogKGRlZnVuIGhpLWxvY2stbGluZS1mYWNlLWJ1ZmZlciAocmVnZXhwICZvcHRpb25h bCBmYWNlKQogICAiU2V0IGZhY2Ugb2YgYWxsIGxpbmVzIGNvbnRhaW5pbmcgYSBtYXRjaCBvZiBS RUdFWFAgdG8gRkFDRS4KLUludGVyYWN0aXZlbHksIHByb21wdCBmb3IgUkVHRVhQIHRoZW4gRkFD RSwgdXNpbmcgYSBidWZmZXItbG9jYWwKLWhpc3RvcnkgbGlzdCBmb3IgUkVHRVhQIGFuZCBhIGds b2JhbCBoaXN0b3J5IGxpc3QgZm9yIEZBQ0UuCi0KLUlmIEZvbnQgTG9jayBtb2RlIGlzIGVuYWJs ZWQgaW4gdGhlIGJ1ZmZlciwgaXQgaXMgdXNlZCB0bwotaGlnaGxpZ2h0IFJFR0VYUC4gIElmIEZv bnQgTG9jayBtb2RlIGlzIGRpc2FibGVkLCBvdmVybGF5cyBhcmUKLXVzZWQgZm9yIGhpZ2hsaWdo dGluZzsgaW4gdGhpcyBjYXNlLCB0aGUgaGlnaGxpZ2h0aW5nIHdpbGwgbm90IGJlCi11cGRhdGVk IGFzIHlvdSB0eXBlLiIKK0ludGVyYWN0aXZlbHksIHByb21wdCBmb3IgUkVHRVhQIHRoZW4gRkFD RS4gIFVzZQorYGhpLWxvY2stcmVhZC1yZWdleHAtZGVmYXVsdHMtZnVuY3Rpb24nIHRvIHJldHJp ZXZlIGRlZmF1bHQKK3ZhbHVlKHMpIG9mIFJFR0VYUC4gIFVzZSB0aGUgZ2xvYmFsIGhpc3Rvcnkg bGlzdCBmb3IgRkFDRS4KKworVXNlIEZvbnQgbG9jayBtb2RlLCBpZiBlbmFibGVkLCB0byBoaWdo bGlnaHQgUkVHRVhQLiAgT3RoZXJ3aXNlLAordXNlIG92ZXJsYXlzIGZvciBoaWdobGlnaHRpbmcu ICBJZiBvdmVybGF5cyBhcmUgdXNlZCwgdGhlCitoaWdobGlnaHRpbmcgd2lsbCBub3QgdXBkYXRl IGFzIHlvdSB0eXBlLiIKICAgKGludGVyYWN0aXZlCiAgICAobGlzdAogICAgIChoaS1sb2NrLXJl Z2V4cC1va2F5Ci0gICAgIChyZWFkLXJlZ2V4cCAiUmVnZXhwIHRvIGhpZ2hsaWdodCBsaW5lIiAo Y2FyIHJlZ2V4cC1oaXN0b3J5KSkpCisgICAgIChyZWFkLXJlZ2V4cCAiUmVnZXhwIHRvIGhpZ2hs aWdodCBsaW5lIgorCQkgIChmdW5jYWxsIGhpLWxvY2stcmVhZC1yZWdleHAtZGVmYXVsdHMtZnVu Y3Rpb24gJ2xpbmUpKSkKICAgICAoaGktbG9jay1yZWFkLWZhY2UtbmFtZSkpKQogICAob3IgKGZh Y2VwIGZhY2UpIChzZXRxIGZhY2UgJ2hpLXllbGxvdykpCiAgICh1bmxlc3MgaGktbG9jay1tb2Rl IChoaS1sb2NrLW1vZGUgMSkpCkBAIC00MjQsMTcgKzQzOCwxOCBAQCB1cGRhdGVkIGFzIHlvdSB0 eXBlLiIKIDs7OyMjI2F1dG9sb2FkCiAoZGVmdW4gaGktbG9jay1mYWNlLWJ1ZmZlciAocmVnZXhw ICZvcHRpb25hbCBmYWNlKQogICAiU2V0IGZhY2Ugb2YgZWFjaCBtYXRjaCBvZiBSRUdFWFAgdG8g RkFDRS4KLUludGVyYWN0aXZlbHksIHByb21wdCBmb3IgUkVHRVhQIHRoZW4gRkFDRSwgdXNpbmcg YSBidWZmZXItbG9jYWwKLWhpc3RvcnkgbGlzdCBmb3IgUkVHRVhQIGFuZCBhIGdsb2JhbCBoaXN0 b3J5IGxpc3QgZm9yIEZBQ0UuCi0KLUlmIEZvbnQgTG9jayBtb2RlIGlzIGVuYWJsZWQgaW4gdGhl IGJ1ZmZlciwgaXQgaXMgdXNlZCB0bwotaGlnaGxpZ2h0IFJFR0VYUC4gIElmIEZvbnQgTG9jayBt b2RlIGlzIGRpc2FibGVkLCBvdmVybGF5cyBhcmUKLXVzZWQgZm9yIGhpZ2hsaWdodGluZzsgaW4g dGhpcyBjYXNlLCB0aGUgaGlnaGxpZ2h0aW5nIHdpbGwgbm90IGJlCi11cGRhdGVkIGFzIHlvdSB0 eXBlLiIKK0ludGVyYWN0aXZlbHksIHByb21wdCBmb3IgUkVHRVhQIHRoZW4gRkFDRS4gIFVzZQor YGhpLWxvY2stcmVhZC1yZWdleHAtZGVmYXVsdHMtZnVuY3Rpb24nIHRvIHJldHJpZXZlIGRlZmF1 bHQKK3ZhbHVlKHMpIFJFR0VYUC4gIFVzZSB0aGUgZ2xvYmFsIGhpc3RvcnkgbGlzdCBmb3IgRkFD RS4KKworVXNlIEZvbnQgbG9jayBtb2RlLCBpZiBlbmFibGVkLCB0byBoaWdobGlnaHQgUkVHRVhQ LiAgT3RoZXJ3aXNlLAordXNlIG92ZXJsYXlzIGZvciBoaWdobGlnaHRpbmcuICBJZiBvdmVybGF5 cyBhcmUgdXNlZCwgdGhlCitoaWdobGlnaHRpbmcgd2lsbCBub3QgdXBkYXRlIGFzIHlvdSB0eXBl LiIKICAgKGludGVyYWN0aXZlCiAgICAobGlzdAogICAgIChoaS1sb2NrLXJlZ2V4cC1va2F5Ci0g ICAgIChyZWFkLXJlZ2V4cCAiUmVnZXhwIHRvIGhpZ2hsaWdodCIgKGNhciByZWdleHAtaGlzdG9y eSkpKQorICAgICAocmVhZC1yZWdleHAgIlJlZ2V4cCB0byBoaWdobGlnaHQiCisJCSAgKGZ1bmNh bGwgaGktbG9jay1yZWFkLXJlZ2V4cC1kZWZhdWx0cy1mdW5jdGlvbiBuaWwpKSkKICAgICAoaGkt bG9jay1yZWFkLWZhY2UtbmFtZSkpKQogICAob3IgKGZhY2VwIGZhY2UpIChzZXRxIGZhY2UgJ2hp LXllbGxvdykpCiAgICh1bmxlc3MgaGktbG9jay1tb2RlIChoaS1sb2NrLW1vZGUgMSkpCkBAIC00 NDUsMTggKzQ2MCwyMiBAQCB1cGRhdGVkIGFzIHlvdSB0eXBlLiIKIDs7OyMjI2F1dG9sb2FkCiAo ZGVmdW4gaGktbG9jay1mYWNlLXBocmFzZS1idWZmZXIgKHJlZ2V4cCAmb3B0aW9uYWwgZmFjZSkK ICAgIlNldCBmYWNlIG9mIGVhY2ggbWF0Y2ggb2YgcGhyYXNlIFJFR0VYUCB0byBGQUNFLgotSWYg Y2FsbGVkIGludGVyYWN0aXZlbHksIHJlcGxhY2VzIHdoaXRlc3BhY2UgaW4gUkVHRVhQIHdpdGgK LWFyYml0cmFyeSB3aGl0ZXNwYWNlIGFuZCBtYWtlcyBpbml0aWFsIGxvd2VyLWNhc2UgbGV0dGVy cyBjYXNlLWluc2Vuc2l0aXZlLgotCi1JZiBGb250IExvY2sgbW9kZSBpcyBlbmFibGVkIGluIHRo ZSBidWZmZXIsIGl0IGlzIHVzZWQgdG8KLWhpZ2hsaWdodCBSRUdFWFAuICBJZiBGb250IExvY2sg bW9kZSBpcyBkaXNhYmxlZCwgb3ZlcmxheXMgYXJlCi11c2VkIGZvciBoaWdobGlnaHRpbmc7IGlu IHRoaXMgY2FzZSwgdGhlIGhpZ2hsaWdodGluZyB3aWxsIG5vdCBiZQotdXBkYXRlZCBhcyB5b3Ug dHlwZS4iCitJbnRlcmFjdGl2ZWx5LCBwcm9tcHQgZm9yIFJFR0VYUCB0aGVuIEZBQ0UuICBVc2UK K2BoaS1sb2NrLXJlYWQtcmVnZXhwLWRlZmF1bHRzLWZ1bmN0aW9uJyB0byByZXRyaWV2ZSBkZWZh dWx0Cit2YWx1ZShzKSBvZiBSRUdFWFAuICBVc2UgdGhlIGdsb2JhbCBoaXN0b3J5IGxpc3QgZm9y IEZBQ0UuICBXaGVuCitjYWxsZWQgaW50ZXJhY3RpdmVseSwgcmVwbGFjZSB3aGl0ZXNwYWNlIGlu IHVzZXIgcHJvdmlkZWQgcmVnZXhwCit3aXRoIGFyYml0cmFyeSB3aGl0ZXNwYWNlIGFuZCBtYWtl IGluaXRpYWwgbG93ZXItY2FzZSBsZXR0ZXJzCitjYXNlLWluc2Vuc2l0aXZlIGJlZm9yZSBoaWdo bGlnaHRpbmcgd2l0aCBgaGktbG9jay1zZXQtcGF0dGVybicuCisKK1VzZSBGb250IGxvY2sgbW9k ZSwgaWYgZW5hYmxlZCwgdG8gaGlnaGxpZ2h0IFJFR0VYUC4gIE90aGVyd2lzZSwKK3VzZSBvdmVy bGF5cyBmb3IgaGlnaGxpZ2h0aW5nLiAgSWYgb3ZlcmxheXMgYXJlIHVzZWQsIHRoZQoraGlnaGxp Z2h0aW5nIHdpbGwgbm90IHVwZGF0ZSBhcyB5b3UgdHlwZS4iCiAgIChpbnRlcmFjdGl2ZQogICAg KGxpc3QKICAgICAoaGktbG9jay1yZWdleHAtb2theQogICAgICAoaGktbG9jay1wcm9jZXNzLXBo cmFzZQotICAgICAgKHJlYWQtcmVnZXhwICJQaHJhc2UgdG8gaGlnaGxpZ2h0IiAoY2FyIHJlZ2V4 cC1oaXN0b3J5KSkpKQorICAgICAgKHJlYWQtcmVnZXhwICJQaHJhc2UgdG8gaGlnaGxpZ2h0Igor CQkgICAoZnVuY2FsbCBoaS1sb2NrLXJlYWQtcmVnZXhwLWRlZmF1bHRzLWZ1bmN0aW9uICdwaHJh c2UpKSkpCiAgICAgKGhpLWxvY2stcmVhZC1mYWNlLW5hbWUpKSkKICAgKG9yIChmYWNlcCBmYWNl KSAoc2V0cSBmYWNlICdoaS15ZWxsb3cpKQogICAodW5sZXNzIGhpLWxvY2stbW9kZSAoaGktbG9j ay1tb2RlIDEpKQpAQCAtNjIyLDYgKzY0MSwxMyBAQCBub3Qgc3VpdGFibGUuIgogICAgICAgKGVy cm9yICJSZWdleHAgY2Fubm90IG1hdGNoIGFuIGVtcHR5IHN0cmluZyIpCiAgICAgcmVnZXhwKSkK IAorKGRlZnVuIGhpLWxvY2stcmVhZC1yZWdleHAtZGVmYXVsdHMgKG9wKQorICAiUmV0dXJuIHRo ZSBsYXRlc3QgcmVnZXhwIGZyb20gYHJlZ2V4cC1oaXN0b3J5Jy4KK1NlZSBgaGktbG9jay1yZWFk LXJlZ2V4cC1kZWZhdWx0cy1mdW5jdGlvbicgZm9yIGRldGFpbHMuIgorICAoY2FzZSBvcAkJCQk7 IEtlZXAgY29tcGlsZXIgaGFwcHkuCisgICAgKChwaHJhc2UgbGluZSBuaWwpCisgICAgIChjYXIg cmVnZXhwLWhpc3RvcnkpKSkpCisKIChkZWZ1biBoaS1sb2NrLXJlYWQtZmFjZS1uYW1lICgpCiAg ICJSZXR1cm4gZmFjZSBmb3IgaW50ZXJhY3RpdmUgaGlnaGxpZ2h0aW5nLgogV2hlbiBgaGktbG9j ay1hdXRvLXNlbGVjdC1mYWNlJyBpcyBub24tbmlsLCBqdXN0IHJldHVybiB0aGUgbmV4dCBmYWNl LgoK --=-=-= Content-Type: text/plain I also need a ready-made function for retrieving the regexp for symbol at point. I can install this as a new defun in subr.el (defun find-tag-default-as-regexp () (let* ((tagf (or find-tag-default-function (get major-mode 'find-tag-default-function) 'find-tag-default)) (tag (funcall tagf))) (cond ((not tag)) ((eq tagf 'find-tag-default) (format "\\_<%s\\_>" (regexp-quote tag))) (t (regexp-quote tag))))) or Augment existing `find-tag-default' to take an optional argument like so --=-=-= Content-Type: diff Content-Disposition: attachment Content-Transfer-Encoding: base64 Content-Description: subr.el.diff PT09IG1vZGlmaWVkIGZpbGUgJ2xpc3Avc3Vici5lbCcKLS0tIGxpc3Avc3Vici5lbAkyMDEzLTAy LTA5IDE2OjIwOjI5ICswMDAwCisrKyBsaXNwL3N1YnIuZWwJMjAxMy0wMy0wNiAxNzo1MTo0MyAr MDAwMApAQCAtMjY3MCw5ICsyNjcwLDEyIEBAIGRpcmVjdG9yeSBpZiBpdCBkb2VzIG5vdCBleGlz dC4iCiAgICJSZXR1cm4gbm9uLW5pbCBpZiB0aGUgY3VycmVudCBidWZmZXIgaXMgbmFycm93ZWQu IgogICAoLz0gKC0gKHBvaW50LW1heCkgKHBvaW50LW1pbikpIChidWZmZXItc2l6ZSkpKQogCi0o ZGVmdW4gZmluZC10YWctZGVmYXVsdCAoKQorKGRlZnVuIGZpbmQtdGFnLWRlZmF1bHQgKCZvcHRp b25hbCByZWdleHAtcCkKICAgIkRldGVybWluZSBkZWZhdWx0IHRhZyB0byBzZWFyY2ggZm9yLCBi YXNlZCBvbiB0ZXh0IGF0IHBvaW50LgotSWYgdGhlcmUgaXMgbm8gcGxhdXNpYmxlIGRlZmF1bHQs IHJldHVybiBuaWwuIgorSWYgdGhlcmUgaXMgbm8gcGxhdXNpYmxlIGRlZmF1bHQsIHJldHVybiBu aWwuCisKK1doZW4gb3B0aW9uYWwgYXJndW1lbnQgUkVHRVhQLVAgaXMgbmlsLCByZXR1cm4gYSBy ZWdleHAgdGhhdAorbWF0Y2hlcyB0YWcgYXMgYSBzeW1ib2wuIgogICAobGV0IChmcm9tIHRvIGJv dW5kKQogICAgICh3aGVuIChvciAocHJvZ24KIAkJOzsgTG9vayBhdCB0ZXh0IGFyb3VuZCBgcG9p bnQnLgpAQCAtMjY5NSw3ICsyNjk4LDkgQEAgSWYgdGhlcmUgaXMgbm8gcGxhdXNpYmxlIGRlZmF1 bHQsIHJldHVybgogCQkgICAgICg8IChzZXRxIGZyb20gKHBvaW50KSkgYm91bmQpCiAJCSAgICAg KHNraXAtc3ludGF4LWZvcndhcmQgIndfIikKIAkJICAgICAoc2V0cSB0byAocG9pbnQpKSkpKQot ICAgICAgKGJ1ZmZlci1zdWJzdHJpbmctbm8tcHJvcGVydGllcyBmcm9tIHRvKSkpKQorICAgICAg KGxldCAoKHRhZyAoYnVmZmVyLXN1YnN0cmluZy1uby1wcm9wZXJ0aWVzIGZyb20gdG8pKSkKKwko aWYgKG5vdCByZWdleHAtcCkgdGFnCisJICAoZm9ybWF0ICJcXF88JXNcXF8+IiAocmVnZXhwLXF1 b3RlIHRhZykpKSkpKSkKIAogKGRlZnVuIHBsYXktc291bmQgKHNvdW5kKQogICAiU09VTkQgaXMg YSBsaXN0IG9mIHRoZSBmb3JtIGAoc291bmQgS0VZV09SRCBWQUxVRS4uLiknLgoK --=-=-=-- From unknown Sat Aug 09 09:34:01 2025 X-Loop: help-debbugs@gnu.org Subject: bug#13892: 24.3.50; Provide for customizing default regexp in hi-lock commands Resent-From: Juri Linkov Original-Sender: debbugs-submit-bounces@debbugs.gnu.org Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Thu, 07 Mar 2013 09:22:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 13892 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: To: Jambunathan K Cc: 13892@debbugs.gnu.org Received: via spool by 13892-submit@debbugs.gnu.org id=B13892.13626480655860 (code B ref 13892); Thu, 07 Mar 2013 09:22:02 +0000 Received: (at 13892) by debbugs.gnu.org; 7 Mar 2013 09:21:05 +0000 Received: from localhost ([127.0.0.1]:35441 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1UDX0Z-0001WR-TJ for submit@debbugs.gnu.org; Thu, 07 Mar 2013 04:21:04 -0500 Received: from ps18281.dreamhost.com ([69.163.218.105]:57040 helo=ps18281.dreamhostps.com) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1UDX0W-0001Vw-1a for 13892@debbugs.gnu.org; Thu, 07 Mar 2013 04:21:01 -0500 Received: from localhost (ps18281.dreamhostps.com [69.163.218.105]) by ps18281.dreamhostps.com (Postfix) with ESMTP id 7D5BC258B92902; Thu, 7 Mar 2013 01:20:27 -0800 (PST) From: Juri Linkov Organization: JURTA References: <87fw08za2u.fsf@gmail.com> Date: Thu, 07 Mar 2013 11:09:29 +0200 In-Reply-To: <87fw08za2u.fsf@gmail.com> (Jambunathan K.'s message of "Wed, 06 Mar 2013 23:26:09 +0530") Message-ID: <87ehfrmv92.fsf@mail.jurta.org> User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.3.50 (x86_64-pc-linux-gnu) MIME-Version: 1.0 Content-Type: text/plain X-Spam-Score: 0.8 (/) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.13 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: debbugs-submit-bounces@debbugs.gnu.org Errors-To: debbugs-submit-bounces@debbugs.gnu.org X-Spam-Score: -0.0 (/) > +(defvar hi-lock-read-regexp-defaults-function > + 'hi-lock-read-regexp-defaults > + "Function that provides default regexp(s) for highlighting commands. > +This function should take one argument OP and return one of nil, > +a regexp or a list of regexps for use with highlighting command > +OP. OP, a symbol, can be one of `phrase', `line' or `nil' > +signifying commands `hi-lock-face-phrase-buffer', > +`hi-lock-line-face-buffer' and `hi-lock-face-buffer' > +respectively. Requiring an additional argument `op' means that we wouldn't be able to customize `hi-lock-read-regexp-defaults-function' to just `find-tag-default' or `find-tag-default-as-regexp'. I think there is no need to distinguish between different hi-lock commands since one user would very likely prefer the one way to get the default for all hi-lock commands, so you could call `hi-lock-read-regexp-defaults-function' without arguments. From unknown Sat Aug 09 09:34:01 2025 X-Loop: help-debbugs@gnu.org Subject: bug#13892: 24.3.50; Provide for customizing default regexp in hi-lock commands Resent-From: Jambunathan K Original-Sender: debbugs-submit-bounces@debbugs.gnu.org Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Thu, 07 Mar 2013 10:33:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 13892 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: To: Juri Linkov Cc: 13892@debbugs.gnu.org Received: via spool by 13892-submit@debbugs.gnu.org id=B13892.136265236315615 (code B ref 13892); Thu, 07 Mar 2013 10:33:02 +0000 Received: (at 13892) by debbugs.gnu.org; 7 Mar 2013 10:32:43 +0000 Received: from localhost ([127.0.0.1]:35567 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1UDY7v-00043o-5h for submit@debbugs.gnu.org; Thu, 07 Mar 2013 05:32:43 -0500 Received: from mail-pa0-f43.google.com ([209.85.220.43]:45072) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1UDY7q-00043Y-7Y for 13892@debbugs.gnu.org; Thu, 07 Mar 2013 05:32:41 -0500 Received: by mail-pa0-f43.google.com with SMTP id bh2so375275pad.16 for <13892@debbugs.gnu.org>; Thu, 07 Mar 2013 02:32:01 -0800 (PST) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20120113; h=x-received:from:to:cc:subject:references:date:in-reply-to :message-id:user-agent:mime-version:content-type; bh=4pTxryESy54KYt1tuQX9PJWNqctYM96IzZX4uUOs6pE=; b=TnTYOFelcpIqLTBlJR6Jz/YQg2Bz9tH1lhSbuT4kDz0+UbU89B6zc69FTJvGouNs30 7T8UIWIaatKrmUbzNQ1vLlKY/Ovec6rqkMATg3yFdL3T9gIPEwZ1otkUXzEXNnNd/q24 afZgSQV0DB0oy2f4LHKvAlZY10rx5ZSEMC0LCNlmluZZRYz3WXorGaHLvFCEBj7K5HVM OYgYNjTCtXYf8zOwWH+xwSZQNW+b6pXiZiBYOdc9vTZuLi802NV7sESaq5WqtA7w9PV0 YThhgaMm2H1H4U13wJLtmLYwxGD886KYeWXg3BM3D4xwT2APtwJkZEWVydx5G87K6bAQ UM8w== X-Received: by 10.68.116.169 with SMTP id jx9mr52126954pbb.94.1362652321289; Thu, 07 Mar 2013 02:32:01 -0800 (PST) Received: from debian-6.05 ([101.63.208.188]) by mx.google.com with ESMTPS id wm3sm1275366pbc.4.2013.03.07.02.31.57 (version=TLSv1.1 cipher=RC4-SHA bits=128/128); Thu, 07 Mar 2013 02:32:00 -0800 (PST) From: Jambunathan K References: <87fw08za2u.fsf@gmail.com> <87ehfrmv92.fsf@mail.jurta.org> Date: Thu, 07 Mar 2013 16:01:57 +0530 In-Reply-To: <87ehfrmv92.fsf@mail.jurta.org> (Juri Linkov's message of "Thu, 07 Mar 2013 11:09:29 +0200") Message-ID: <87wqtjwleq.fsf@gmail.com> User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.3.50 (gnu/linux) MIME-Version: 1.0 Content-Type: text/plain X-Spam-Score: 0.1 (/) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.13 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: debbugs-submit-bounces@debbugs.gnu.org Errors-To: debbugs-submit-bounces@debbugs.gnu.org X-Spam-Score: -2.6 (--) Juri Linkov writes: >> +(defvar hi-lock-read-regexp-defaults-function >> + 'hi-lock-read-regexp-defaults >> + "Function that provides default regexp(s) for highlighting commands. >> +This function should take one argument OP and return one of nil, >> +a regexp or a list of regexps for use with highlighting command >> +OP. OP, a symbol, can be one of `phrase', `line' or `nil' >> +signifying commands `hi-lock-face-phrase-buffer', >> +`hi-lock-line-face-buffer' and `hi-lock-face-buffer' >> +respectively. > > Requiring an additional argument `op' means that we wouldn't > be able to customize `hi-lock-read-regexp-defaults-function' > to just `find-tag-default' or `find-tag-default-as-regexp'. > I think there is no need to distinguish between different > hi-lock commands since one user would very likely prefer > the one way to get the default for all hi-lock commands, > so you could call `hi-lock-read-regexp-defaults-function' > without arguments. I had the same thought but ended up with having an OP. If we want to remove OP but still want the ability to choose the regexp based on the highlighting command, then may be `this-command' can take the place of OP. ps: Does EmacsLisp have notion of function pointers (as in C). Here the function pointer is not declared and the function pointer could well be set in a .emacs file. So there is no way the byte-compiler can complain based on arity. Does runtime check for arity? (I don't think so). May be (i.e., technically) it is OK to call a function that takes no argument with a single argument? I don't know. Let's see what others think. From unknown Sat Aug 09 09:34:01 2025 MIME-Version: 1.0 X-Mailer: MIME-tools 5.428 (Entity 5.428) X-Loop: help-debbugs@gnu.org From: help-debbugs@gnu.org (GNU bug Tracking System) To: Jambunathan K Subject: bug#13892: closed (Re: bug#13892: 24.3.50; Provide for customizing default regexp in hi-lock commands) Message-ID: References: <871ubqecp5.fsf@gmail.com> <87fw08za2u.fsf@gmail.com> X-Gnu-PR-Message: they-closed 13892 X-Gnu-PR-Package: emacs Reply-To: 13892@debbugs.gnu.org Date: Fri, 08 Mar 2013 04:31:02 +0000 Content-Type: multipart/mixed; boundary="----------=_1362717062-2143-1" This is a multi-part message in MIME format... ------------=_1362717062-2143-1 Content-Disposition: inline Content-Transfer-Encoding: quoted-printable Content-Type: text/plain; charset="utf-8" Your bug report #13892: 24.3.50; Provide for customizing default regexp in hi-lock commands which was filed against the emacs package, has been closed. The explanation is attached below, along with your original report. If you require more details, please reply to 13892@debbugs.gnu.org. --=20 13892: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=3D13892 GNU Bug Tracking System Contact help-debbugs@gnu.org with problems ------------=_1362717062-2143-1 Content-Type: message/rfc822 Content-Disposition: inline Content-Transfer-Encoding: 7bit Received: (at 13892-done) by debbugs.gnu.org; 8 Mar 2013 04:30:28 +0000 Received: from localhost ([127.0.0.1]:37803 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1UDowt-0000Xr-8V for submit@debbugs.gnu.org; Thu, 07 Mar 2013 23:30:27 -0500 Received: from mail-pa0-f41.google.com ([209.85.220.41]:45830) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1UDowr-0000Xe-MK for 13892-done@debbugs.gnu.org; Thu, 07 Mar 2013 23:30:26 -0500 Received: by mail-pa0-f41.google.com with SMTP id fb11so1011140pad.14 for <13892-done@debbugs.gnu.org>; Thu, 07 Mar 2013 20:29:44 -0800 (PST) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20120113; h=x-received:from:to:cc:subject:references:date:in-reply-to :message-id:user-agent:mime-version:content-type; bh=5E3kQr9fmmvVDaS8YBVp+ghPXOQK//wtm1DMNcWoWps=; b=j+DnydV8clKmzwKgQvlYuEpeUB2MpjLwHmfcaFV6T+UCCEcJc0nEUwfgcEPZzP0jci 3GtVfSrkdTC3YAV07RqdT+V4c9qAZcbBZf0HrP+Cwg5W3/HQBUGbjP6bz8E4sEJHAI7Y nkQl8y2ik6QOwKgFkEbGkYPHrrrpg236DVyNnqQyO02EwOIu2gaf8BJxXKA/3tHy5Na5 6kbLBnqPl5k+1XtP4mbD9F+1Jnlo1gdGu6hGjHGHTMn/x91xMCZX6R/MRpOmrfbaiQbD 28rEeH+uWfb6d3wdMIOIEftX5cAM5dCVCvzEcMHJvWKi24bU1/cPfaL/YNVyq+ODt/V7 hvyg== X-Received: by 10.66.233.102 with SMTP id tv6mr2029676pac.99.1362716984801; Thu, 07 Mar 2013 20:29:44 -0800 (PST) Received: from debian-6.05 ([115.241.126.42]) by mx.google.com with ESMTPS id xr3sm4044919pbc.46.2013.03.07.20.29.41 (version=TLSv1.1 cipher=RC4-SHA bits=128/128); Thu, 07 Mar 2013 20:29:43 -0800 (PST) From: Jambunathan K To: Juri Linkov Subject: Re: bug#13892: 24.3.50; Provide for customizing default regexp in hi-lock commands References: <87fw08za2u.fsf@gmail.com> <87ehfrmv92.fsf@mail.jurta.org> Date: Fri, 08 Mar 2013 09:59:42 +0530 In-Reply-To: <87ehfrmv92.fsf@mail.jurta.org> (Juri Linkov's message of "Thu, 07 Mar 2013 11:09:29 +0200") Message-ID: <871ubqecp5.fsf@gmail.com> User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.3.50 (gnu/linux) MIME-Version: 1.0 Content-Type: text/plain X-Spam-Score: -0.7 (/) X-Debbugs-Envelope-To: 13892-done Cc: 13892-done@debbugs.gnu.org X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.13 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: debbugs-submit-bounces@debbugs.gnu.org Errors-To: debbugs-submit-bounces@debbugs.gnu.org X-Spam-Score: -2.6 (--) Juri Linkov writes: >> +(defvar hi-lock-read-regexp-defaults-function >> + 'hi-lock-read-regexp-defaults >> + "Function that provides default regexp(s) for highlighting commands. >> +This function should take one argument OP and return one of nil, >> +a regexp or a list of regexps for use with highlighting command >> +OP. OP, a symbol, can be one of `phrase', `line' or `nil' >> +signifying commands `hi-lock-face-phrase-buffer', >> +`hi-lock-line-face-buffer' and `hi-lock-face-buffer' >> +respectively. > > Requiring an additional argument `op' means that we wouldn't > be able to customize `hi-lock-read-regexp-defaults-function' > to just `find-tag-default' or `find-tag-default-as-regexp'. > I think there is no need to distinguish between different > hi-lock commands since one user would very likely prefer > the one way to get the default for all hi-lock commands, > so you could call `hi-lock-read-regexp-defaults-function' > without arguments. Committed as bzr revision 111971. I have removed OP, updated the docstring. I have also introduced `find-tag-default-as-regexp' in subr.el. ------------=_1362717062-2143-1 Content-Type: message/rfc822 Content-Disposition: inline Content-Transfer-Encoding: 7bit Received: (at submit) by debbugs.gnu.org; 6 Mar 2013 17:57:00 +0000 Received: from localhost ([127.0.0.1]:34611 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1UDIaJ-0004Yh-WD for submit@debbugs.gnu.org; Wed, 06 Mar 2013 12:57:00 -0500 Received: from eggs.gnu.org ([208.118.235.92]:57793) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1UDIaG-0004YU-8N for submit@debbugs.gnu.org; Wed, 06 Mar 2013 12:56:58 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1UDIZi-0006Ob-IO for submit@debbugs.gnu.org; Wed, 06 Mar 2013 12:56:23 -0500 X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org X-Spam-Level: X-Spam-Status: No, score=-102.6 required=5.0 tests=BAYES_00,FREEMAIL_FROM, RCVD_IN_DNSWL_LOW, T_DKIM_INVALID, USER_IN_WHITELIST autolearn=unavailable version=3.3.2 Received: from lists.gnu.org ([208.118.235.17]:32981) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1UDIZi-0006OW-Dy for submit@debbugs.gnu.org; Wed, 06 Mar 2013 12:56:22 -0500 Received: from eggs.gnu.org ([208.118.235.92]:40903) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1UDIZh-0007pl-8x for bug-gnu-emacs@gnu.org; Wed, 06 Mar 2013 12:56:22 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1UDIZf-0006Nw-Cu for bug-gnu-emacs@gnu.org; Wed, 06 Mar 2013 12:56:21 -0500 Received: from mail-pb0-f42.google.com ([209.85.160.42]:39760) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1UDIZe-0006NX-Nq for bug-gnu-emacs@gnu.org; Wed, 06 Mar 2013 12:56:19 -0500 Received: by mail-pb0-f42.google.com with SMTP id xb4so6317314pbc.1 for ; Wed, 06 Mar 2013 09:56:17 -0800 (PST) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20120113; h=x-received:from:to:subject:date:message-id:mime-version :content-type; bh=P+IUjw55lNaMDlNWBFhYo0M9sKIhCMNHzCcVRa/Bgys=; b=H9kafnfoE8SWI+1Y1bjg5BQOTjwPmJhGRQsNXb7crj8HwXBSyx3Gf3Uuk+JPjWGNEG Gmt8/rKIb/De0LvUlQmdQ2P1aeJXSeennzRZPIuA001JmKDRt3Z+eU1TABRBsKOt7ZTA TpftLT7xaKpqJNVRRwbTbx1C/YQC4rjzdsv5YNCaCg9cL76wUkE7eOWQtq3O2Ued3Nw9 rFsxtiYdlXOPEaT39ZexgUjdVEsmF4iL2W72ytiEEVU+tdQLLiLe+fbJJYU5fI7ERIWG 1/JJ5dJP0eqErUPbkWJ77rb34yGS/iCguPeQRoQQ10W1+WCKr6QKUo0hYs+H+e9UXTX5 p9KQ== X-Received: by 10.68.189.8 with SMTP id ge8mr28073678pbc.166.1362592577779; Wed, 06 Mar 2013 09:56:17 -0800 (PST) Received: from debian-6.05 ([115.241.90.1]) by mx.google.com with ESMTPS id gf6sm32247562pbc.24.2013.03.06.09.56.12 (version=TLSv1.1 cipher=RC4-SHA bits=128/128); Wed, 06 Mar 2013 09:56:16 -0800 (PST) From: Jambunathan K To: bug-gnu-emacs@gnu.org Subject: 24.3.50; Provide for customizing default regexp in hi-lock commands Date: Wed, 06 Mar 2013 23:26:09 +0530 Message-ID: <87fw08za2u.fsf@gmail.com> MIME-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" X-detected-operating-system: by eggs.gnu.org: GNU/Linux 3.x [fuzzy] X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6.x X-Received-From: 208.118.235.17 X-Spam-Score: -4.2 (----) X-Debbugs-Envelope-To: submit X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.13 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: debbugs-submit-bounces@debbugs.gnu.org Errors-To: debbugs-submit-bounces@debbugs.gnu.org X-Spam-Score: -6.1 (------) --=-=-= Content-Type: text/plain Provide for customizing default regexp in hi-lock commands See bug#13687 & Co. disussion surrounding this feature-let. Let me know if the patch is OK, so that I can install it in trunk. --=-=-= Content-Type: diff Content-Disposition: attachment Content-Transfer-Encoding: base64 Content-Description: hi-lock.el.diff PT09IG1vZGlmaWVkIGZpbGUgJ2xpc3AvQ2hhbmdlTG9nJwotLS0gbGlzcC9DaGFuZ2VMb2cJMjAx My0wMy0wNiAxNDoyNDozOSArMDAwMAorKysgbGlzcC9DaGFuZ2VMb2cJMjAxMy0wMy0wNiAxNzoz Nzo1MiArMDAwMApAQCAtMSwzICsxLDEyIEBACisyMDEzLTAzLTA2ICBKYW1idW5hdGhhbiBLICA8 a2phbWJ1bmF0aGFuQGdtYWlsLmNvbT4KKworCSogaGktbG9jay5lbCAoaGktbG9jay1yZWFkLXJl Z2V4cC1kZWZhdWx0cy1mdW5jdGlvbik6IE5ldworCXZhcmlhYmxlLgorCShoaS1sb2NrLXJlYWQt cmVnZXhwLWRlZmF1bHRzKTogTmV3IGRlZnVuLgorCShoaS1sb2NrLWxpbmUtZmFjZS1idWZmZXIs IGhpLWxvY2stZmFjZS1idWZmZXIpCisJKGhpLWxvY2stZmFjZS1waHJhc2UtYnVmZmVyKTogVXNl CisJYGhpLWxvY2stcmVhZC1yZWdleHAtZGVmYXVsdHMtZnVuY3Rpb24nLiAgVXBkYXRlIGRvY3N0 cmluZy4KKwogMjAxMy0wMy0wNiAgQWxhbiBNYWNrZW56aWUgIDxhY21AbXVjLmRlPgogCiAJQ29y cmVjdCB0aGUgcG9zaXRpb24gb2YgcG9pbnQgaW4gc29tZSBsaW5lLXVwIGZ1bmN0aW9ucy4KCj09 PSBtb2RpZmllZCBmaWxlICdsaXNwL2hpLWxvY2suZWwnCi0tLSBsaXNwL2hpLWxvY2suZWwJMjAx My0wMS0yOCAyMDowMDozNSArMDAwMAorKysgbGlzcC9oaS1sb2NrLmVsCTIwMTMtMDMtMDYgMTc6 MjU6MjkgKzAwMDAKQEAgLTI3OSw2ICsyNzksMTkgQEAgYSBsaWJyYXJ5IGlzIGJlaW5nIGxvYWRl ZC4iKQogICAgIG1hcCkKICAgIktleSBtYXAgZm9yIGhpLWxvY2suIikKIAorKGRlZnZhciBoaS1s b2NrLXJlYWQtcmVnZXhwLWRlZmF1bHRzLWZ1bmN0aW9uCisgICdoaS1sb2NrLXJlYWQtcmVnZXhw LWRlZmF1bHRzCisgICJGdW5jdGlvbiB0aGF0IHByb3ZpZGVzIGRlZmF1bHQgcmVnZXhwKHMpIGZv ciBoaWdobGlnaHRpbmcgY29tbWFuZHMuCitUaGlzIGZ1bmN0aW9uIHNob3VsZCB0YWtlIG9uZSBh cmd1bWVudCBPUCBhbmQgcmV0dXJuIG9uZSBvZiBuaWwsCithIHJlZ2V4cCBvciBhIGxpc3Qgb2Yg cmVnZXhwcyBmb3IgdXNlIHdpdGggaGlnaGxpZ2h0aW5nIGNvbW1hbmQKK09QLiAgT1AsIGEgc3lt Ym9sLCBjYW4gYmUgb25lIG9mIGBwaHJhc2UnLCBgbGluZScgb3IgYG5pbCcKK3NpZ25pZnlpbmcg Y29tbWFuZHMgYGhpLWxvY2stZmFjZS1waHJhc2UtYnVmZmVyJywKK2BoaS1sb2NrLWxpbmUtZmFj ZS1idWZmZXInIGFuZCBgaGktbG9jay1mYWNlLWJ1ZmZlcicKK3Jlc3BlY3RpdmVseS4KKworVGhl IHJldHVybiB2YWx1ZSBvZiB0aGlzIGZ1bmN0aW9uIGlzIHVzZWQgYXMgREVGQVVMVFMgcGFyYW0g b2YKK2ByZWFkLXJlZ2V4cCcgd2hpbGUgZXhlY3V0aW5nIGNvbW1hbmQgZGVub3RlZCBieSBPUC4i KQorCiA7OyBWaXNpYmxlIEZ1bmN0aW9ucwogCiA7OzsjIyNhdXRvbG9hZApAQCAtMzk5LDE3ICs0 MTIsMTggQEAgdmVyc2lvbnMgYmVmb3JlIDIyIHVzZSB0aGUgZm9sbG93aW5nIGluCiA7OzsjIyNh dXRvbG9hZAogKGRlZnVuIGhpLWxvY2stbGluZS1mYWNlLWJ1ZmZlciAocmVnZXhwICZvcHRpb25h bCBmYWNlKQogICAiU2V0IGZhY2Ugb2YgYWxsIGxpbmVzIGNvbnRhaW5pbmcgYSBtYXRjaCBvZiBS RUdFWFAgdG8gRkFDRS4KLUludGVyYWN0aXZlbHksIHByb21wdCBmb3IgUkVHRVhQIHRoZW4gRkFD RSwgdXNpbmcgYSBidWZmZXItbG9jYWwKLWhpc3RvcnkgbGlzdCBmb3IgUkVHRVhQIGFuZCBhIGds b2JhbCBoaXN0b3J5IGxpc3QgZm9yIEZBQ0UuCi0KLUlmIEZvbnQgTG9jayBtb2RlIGlzIGVuYWJs ZWQgaW4gdGhlIGJ1ZmZlciwgaXQgaXMgdXNlZCB0bwotaGlnaGxpZ2h0IFJFR0VYUC4gIElmIEZv bnQgTG9jayBtb2RlIGlzIGRpc2FibGVkLCBvdmVybGF5cyBhcmUKLXVzZWQgZm9yIGhpZ2hsaWdo dGluZzsgaW4gdGhpcyBjYXNlLCB0aGUgaGlnaGxpZ2h0aW5nIHdpbGwgbm90IGJlCi11cGRhdGVk IGFzIHlvdSB0eXBlLiIKK0ludGVyYWN0aXZlbHksIHByb21wdCBmb3IgUkVHRVhQIHRoZW4gRkFD RS4gIFVzZQorYGhpLWxvY2stcmVhZC1yZWdleHAtZGVmYXVsdHMtZnVuY3Rpb24nIHRvIHJldHJp ZXZlIGRlZmF1bHQKK3ZhbHVlKHMpIG9mIFJFR0VYUC4gIFVzZSB0aGUgZ2xvYmFsIGhpc3Rvcnkg bGlzdCBmb3IgRkFDRS4KKworVXNlIEZvbnQgbG9jayBtb2RlLCBpZiBlbmFibGVkLCB0byBoaWdo bGlnaHQgUkVHRVhQLiAgT3RoZXJ3aXNlLAordXNlIG92ZXJsYXlzIGZvciBoaWdobGlnaHRpbmcu ICBJZiBvdmVybGF5cyBhcmUgdXNlZCwgdGhlCitoaWdobGlnaHRpbmcgd2lsbCBub3QgdXBkYXRl IGFzIHlvdSB0eXBlLiIKICAgKGludGVyYWN0aXZlCiAgICAobGlzdAogICAgIChoaS1sb2NrLXJl Z2V4cC1va2F5Ci0gICAgIChyZWFkLXJlZ2V4cCAiUmVnZXhwIHRvIGhpZ2hsaWdodCBsaW5lIiAo Y2FyIHJlZ2V4cC1oaXN0b3J5KSkpCisgICAgIChyZWFkLXJlZ2V4cCAiUmVnZXhwIHRvIGhpZ2hs aWdodCBsaW5lIgorCQkgIChmdW5jYWxsIGhpLWxvY2stcmVhZC1yZWdleHAtZGVmYXVsdHMtZnVu Y3Rpb24gJ2xpbmUpKSkKICAgICAoaGktbG9jay1yZWFkLWZhY2UtbmFtZSkpKQogICAob3IgKGZh Y2VwIGZhY2UpIChzZXRxIGZhY2UgJ2hpLXllbGxvdykpCiAgICh1bmxlc3MgaGktbG9jay1tb2Rl IChoaS1sb2NrLW1vZGUgMSkpCkBAIC00MjQsMTcgKzQzOCwxOCBAQCB1cGRhdGVkIGFzIHlvdSB0 eXBlLiIKIDs7OyMjI2F1dG9sb2FkCiAoZGVmdW4gaGktbG9jay1mYWNlLWJ1ZmZlciAocmVnZXhw ICZvcHRpb25hbCBmYWNlKQogICAiU2V0IGZhY2Ugb2YgZWFjaCBtYXRjaCBvZiBSRUdFWFAgdG8g RkFDRS4KLUludGVyYWN0aXZlbHksIHByb21wdCBmb3IgUkVHRVhQIHRoZW4gRkFDRSwgdXNpbmcg YSBidWZmZXItbG9jYWwKLWhpc3RvcnkgbGlzdCBmb3IgUkVHRVhQIGFuZCBhIGdsb2JhbCBoaXN0 b3J5IGxpc3QgZm9yIEZBQ0UuCi0KLUlmIEZvbnQgTG9jayBtb2RlIGlzIGVuYWJsZWQgaW4gdGhl IGJ1ZmZlciwgaXQgaXMgdXNlZCB0bwotaGlnaGxpZ2h0IFJFR0VYUC4gIElmIEZvbnQgTG9jayBt b2RlIGlzIGRpc2FibGVkLCBvdmVybGF5cyBhcmUKLXVzZWQgZm9yIGhpZ2hsaWdodGluZzsgaW4g dGhpcyBjYXNlLCB0aGUgaGlnaGxpZ2h0aW5nIHdpbGwgbm90IGJlCi11cGRhdGVkIGFzIHlvdSB0 eXBlLiIKK0ludGVyYWN0aXZlbHksIHByb21wdCBmb3IgUkVHRVhQIHRoZW4gRkFDRS4gIFVzZQor YGhpLWxvY2stcmVhZC1yZWdleHAtZGVmYXVsdHMtZnVuY3Rpb24nIHRvIHJldHJpZXZlIGRlZmF1 bHQKK3ZhbHVlKHMpIFJFR0VYUC4gIFVzZSB0aGUgZ2xvYmFsIGhpc3RvcnkgbGlzdCBmb3IgRkFD RS4KKworVXNlIEZvbnQgbG9jayBtb2RlLCBpZiBlbmFibGVkLCB0byBoaWdobGlnaHQgUkVHRVhQ LiAgT3RoZXJ3aXNlLAordXNlIG92ZXJsYXlzIGZvciBoaWdobGlnaHRpbmcuICBJZiBvdmVybGF5 cyBhcmUgdXNlZCwgdGhlCitoaWdobGlnaHRpbmcgd2lsbCBub3QgdXBkYXRlIGFzIHlvdSB0eXBl LiIKICAgKGludGVyYWN0aXZlCiAgICAobGlzdAogICAgIChoaS1sb2NrLXJlZ2V4cC1va2F5Ci0g ICAgIChyZWFkLXJlZ2V4cCAiUmVnZXhwIHRvIGhpZ2hsaWdodCIgKGNhciByZWdleHAtaGlzdG9y eSkpKQorICAgICAocmVhZC1yZWdleHAgIlJlZ2V4cCB0byBoaWdobGlnaHQiCisJCSAgKGZ1bmNh bGwgaGktbG9jay1yZWFkLXJlZ2V4cC1kZWZhdWx0cy1mdW5jdGlvbiBuaWwpKSkKICAgICAoaGkt bG9jay1yZWFkLWZhY2UtbmFtZSkpKQogICAob3IgKGZhY2VwIGZhY2UpIChzZXRxIGZhY2UgJ2hp LXllbGxvdykpCiAgICh1bmxlc3MgaGktbG9jay1tb2RlIChoaS1sb2NrLW1vZGUgMSkpCkBAIC00 NDUsMTggKzQ2MCwyMiBAQCB1cGRhdGVkIGFzIHlvdSB0eXBlLiIKIDs7OyMjI2F1dG9sb2FkCiAo ZGVmdW4gaGktbG9jay1mYWNlLXBocmFzZS1idWZmZXIgKHJlZ2V4cCAmb3B0aW9uYWwgZmFjZSkK ICAgIlNldCBmYWNlIG9mIGVhY2ggbWF0Y2ggb2YgcGhyYXNlIFJFR0VYUCB0byBGQUNFLgotSWYg Y2FsbGVkIGludGVyYWN0aXZlbHksIHJlcGxhY2VzIHdoaXRlc3BhY2UgaW4gUkVHRVhQIHdpdGgK LWFyYml0cmFyeSB3aGl0ZXNwYWNlIGFuZCBtYWtlcyBpbml0aWFsIGxvd2VyLWNhc2UgbGV0dGVy cyBjYXNlLWluc2Vuc2l0aXZlLgotCi1JZiBGb250IExvY2sgbW9kZSBpcyBlbmFibGVkIGluIHRo ZSBidWZmZXIsIGl0IGlzIHVzZWQgdG8KLWhpZ2hsaWdodCBSRUdFWFAuICBJZiBGb250IExvY2sg bW9kZSBpcyBkaXNhYmxlZCwgb3ZlcmxheXMgYXJlCi11c2VkIGZvciBoaWdobGlnaHRpbmc7IGlu IHRoaXMgY2FzZSwgdGhlIGhpZ2hsaWdodGluZyB3aWxsIG5vdCBiZQotdXBkYXRlZCBhcyB5b3Ug dHlwZS4iCitJbnRlcmFjdGl2ZWx5LCBwcm9tcHQgZm9yIFJFR0VYUCB0aGVuIEZBQ0UuICBVc2UK K2BoaS1sb2NrLXJlYWQtcmVnZXhwLWRlZmF1bHRzLWZ1bmN0aW9uJyB0byByZXRyaWV2ZSBkZWZh dWx0Cit2YWx1ZShzKSBvZiBSRUdFWFAuICBVc2UgdGhlIGdsb2JhbCBoaXN0b3J5IGxpc3QgZm9y IEZBQ0UuICBXaGVuCitjYWxsZWQgaW50ZXJhY3RpdmVseSwgcmVwbGFjZSB3aGl0ZXNwYWNlIGlu IHVzZXIgcHJvdmlkZWQgcmVnZXhwCit3aXRoIGFyYml0cmFyeSB3aGl0ZXNwYWNlIGFuZCBtYWtl IGluaXRpYWwgbG93ZXItY2FzZSBsZXR0ZXJzCitjYXNlLWluc2Vuc2l0aXZlIGJlZm9yZSBoaWdo bGlnaHRpbmcgd2l0aCBgaGktbG9jay1zZXQtcGF0dGVybicuCisKK1VzZSBGb250IGxvY2sgbW9k ZSwgaWYgZW5hYmxlZCwgdG8gaGlnaGxpZ2h0IFJFR0VYUC4gIE90aGVyd2lzZSwKK3VzZSBvdmVy bGF5cyBmb3IgaGlnaGxpZ2h0aW5nLiAgSWYgb3ZlcmxheXMgYXJlIHVzZWQsIHRoZQoraGlnaGxp Z2h0aW5nIHdpbGwgbm90IHVwZGF0ZSBhcyB5b3UgdHlwZS4iCiAgIChpbnRlcmFjdGl2ZQogICAg KGxpc3QKICAgICAoaGktbG9jay1yZWdleHAtb2theQogICAgICAoaGktbG9jay1wcm9jZXNzLXBo cmFzZQotICAgICAgKHJlYWQtcmVnZXhwICJQaHJhc2UgdG8gaGlnaGxpZ2h0IiAoY2FyIHJlZ2V4 cC1oaXN0b3J5KSkpKQorICAgICAgKHJlYWQtcmVnZXhwICJQaHJhc2UgdG8gaGlnaGxpZ2h0Igor CQkgICAoZnVuY2FsbCBoaS1sb2NrLXJlYWQtcmVnZXhwLWRlZmF1bHRzLWZ1bmN0aW9uICdwaHJh c2UpKSkpCiAgICAgKGhpLWxvY2stcmVhZC1mYWNlLW5hbWUpKSkKICAgKG9yIChmYWNlcCBmYWNl KSAoc2V0cSBmYWNlICdoaS15ZWxsb3cpKQogICAodW5sZXNzIGhpLWxvY2stbW9kZSAoaGktbG9j ay1tb2RlIDEpKQpAQCAtNjIyLDYgKzY0MSwxMyBAQCBub3Qgc3VpdGFibGUuIgogICAgICAgKGVy cm9yICJSZWdleHAgY2Fubm90IG1hdGNoIGFuIGVtcHR5IHN0cmluZyIpCiAgICAgcmVnZXhwKSkK IAorKGRlZnVuIGhpLWxvY2stcmVhZC1yZWdleHAtZGVmYXVsdHMgKG9wKQorICAiUmV0dXJuIHRo ZSBsYXRlc3QgcmVnZXhwIGZyb20gYHJlZ2V4cC1oaXN0b3J5Jy4KK1NlZSBgaGktbG9jay1yZWFk LXJlZ2V4cC1kZWZhdWx0cy1mdW5jdGlvbicgZm9yIGRldGFpbHMuIgorICAoY2FzZSBvcAkJCQk7 IEtlZXAgY29tcGlsZXIgaGFwcHkuCisgICAgKChwaHJhc2UgbGluZSBuaWwpCisgICAgIChjYXIg cmVnZXhwLWhpc3RvcnkpKSkpCisKIChkZWZ1biBoaS1sb2NrLXJlYWQtZmFjZS1uYW1lICgpCiAg ICJSZXR1cm4gZmFjZSBmb3IgaW50ZXJhY3RpdmUgaGlnaGxpZ2h0aW5nLgogV2hlbiBgaGktbG9j ay1hdXRvLXNlbGVjdC1mYWNlJyBpcyBub24tbmlsLCBqdXN0IHJldHVybiB0aGUgbmV4dCBmYWNl LgoK --=-=-= Content-Type: text/plain I also need a ready-made function for retrieving the regexp for symbol at point. I can install this as a new defun in subr.el (defun find-tag-default-as-regexp () (let* ((tagf (or find-tag-default-function (get major-mode 'find-tag-default-function) 'find-tag-default)) (tag (funcall tagf))) (cond ((not tag)) ((eq tagf 'find-tag-default) (format "\\_<%s\\_>" (regexp-quote tag))) (t (regexp-quote tag))))) or Augment existing `find-tag-default' to take an optional argument like so --=-=-= Content-Type: diff Content-Disposition: attachment Content-Transfer-Encoding: base64 Content-Description: subr.el.diff PT09IG1vZGlmaWVkIGZpbGUgJ2xpc3Avc3Vici5lbCcKLS0tIGxpc3Avc3Vici5lbAkyMDEzLTAy LTA5IDE2OjIwOjI5ICswMDAwCisrKyBsaXNwL3N1YnIuZWwJMjAxMy0wMy0wNiAxNzo1MTo0MyAr MDAwMApAQCAtMjY3MCw5ICsyNjcwLDEyIEBAIGRpcmVjdG9yeSBpZiBpdCBkb2VzIG5vdCBleGlz dC4iCiAgICJSZXR1cm4gbm9uLW5pbCBpZiB0aGUgY3VycmVudCBidWZmZXIgaXMgbmFycm93ZWQu IgogICAoLz0gKC0gKHBvaW50LW1heCkgKHBvaW50LW1pbikpIChidWZmZXItc2l6ZSkpKQogCi0o ZGVmdW4gZmluZC10YWctZGVmYXVsdCAoKQorKGRlZnVuIGZpbmQtdGFnLWRlZmF1bHQgKCZvcHRp b25hbCByZWdleHAtcCkKICAgIkRldGVybWluZSBkZWZhdWx0IHRhZyB0byBzZWFyY2ggZm9yLCBi YXNlZCBvbiB0ZXh0IGF0IHBvaW50LgotSWYgdGhlcmUgaXMgbm8gcGxhdXNpYmxlIGRlZmF1bHQs IHJldHVybiBuaWwuIgorSWYgdGhlcmUgaXMgbm8gcGxhdXNpYmxlIGRlZmF1bHQsIHJldHVybiBu aWwuCisKK1doZW4gb3B0aW9uYWwgYXJndW1lbnQgUkVHRVhQLVAgaXMgbmlsLCByZXR1cm4gYSBy ZWdleHAgdGhhdAorbWF0Y2hlcyB0YWcgYXMgYSBzeW1ib2wuIgogICAobGV0IChmcm9tIHRvIGJv dW5kKQogICAgICh3aGVuIChvciAocHJvZ24KIAkJOzsgTG9vayBhdCB0ZXh0IGFyb3VuZCBgcG9p bnQnLgpAQCAtMjY5NSw3ICsyNjk4LDkgQEAgSWYgdGhlcmUgaXMgbm8gcGxhdXNpYmxlIGRlZmF1 bHQsIHJldHVybgogCQkgICAgICg8IChzZXRxIGZyb20gKHBvaW50KSkgYm91bmQpCiAJCSAgICAg KHNraXAtc3ludGF4LWZvcndhcmQgIndfIikKIAkJICAgICAoc2V0cSB0byAocG9pbnQpKSkpKQot ICAgICAgKGJ1ZmZlci1zdWJzdHJpbmctbm8tcHJvcGVydGllcyBmcm9tIHRvKSkpKQorICAgICAg KGxldCAoKHRhZyAoYnVmZmVyLXN1YnN0cmluZy1uby1wcm9wZXJ0aWVzIGZyb20gdG8pKSkKKwko aWYgKG5vdCByZWdleHAtcCkgdGFnCisJICAoZm9ybWF0ICJcXF88JXNcXF8+IiAocmVnZXhwLXF1 b3RlIHRhZykpKSkpKSkKIAogKGRlZnVuIHBsYXktc291bmQgKHNvdW5kKQogICAiU09VTkQgaXMg YSBsaXN0IG9mIHRoZSBmb3JtIGAoc291bmQgS0VZV09SRCBWQUxVRS4uLiknLgoK --=-=-=-- ------------=_1362717062-2143-1-- From unknown Sat Aug 09 09:34:01 2025 X-Loop: help-debbugs@gnu.org Subject: bug#13892: 24.3.50; Provide for customizing default regexp in hi-lock commands Resent-From: Juri Linkov Original-Sender: debbugs-submit-bounces@debbugs.gnu.org Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Sun, 10 Mar 2013 18:33:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 13892 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: To: Jambunathan K Cc: 13892@debbugs.gnu.org Received: via spool by 13892-submit@debbugs.gnu.org id=B13892.136294037612327 (code B ref 13892); Sun, 10 Mar 2013 18:33:02 +0000 Received: (at 13892) by debbugs.gnu.org; 10 Mar 2013 18:32:56 +0000 Received: from localhost ([127.0.0.1]:44312 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1UEl3H-0003Cl-B0 for submit@debbugs.gnu.org; Sun, 10 Mar 2013 14:32:56 -0400 Received: from ps18281.dreamhost.com ([69.163.218.105]:53771 helo=ps18281.dreamhostps.com) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1UEl3C-0003CK-Fd for 13892@debbugs.gnu.org; Sun, 10 Mar 2013 14:32:51 -0400 Received: from localhost (ps18281.dreamhostps.com [69.163.218.105]) by ps18281.dreamhostps.com (Postfix) with ESMTP id 305CC258B92901; Sun, 10 Mar 2013 11:31:58 -0700 (PDT) From: Juri Linkov Organization: JURTA References: <87fw08za2u.fsf@gmail.com> <87ehfrmv92.fsf@mail.jurta.org> <871ubqecp5.fsf@gmail.com> Date: Sun, 10 Mar 2013 20:31:03 +0200 In-Reply-To: <871ubqecp5.fsf@gmail.com> (Jambunathan K.'s message of "Fri, 08 Mar 2013 09:59:42 +0530") Message-ID: <87hakjruom.fsf@mail.jurta.org> User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.3.50 (x86_64-pc-linux-gnu) MIME-Version: 1.0 Content-Type: text/plain X-Spam-Score: 0.8 (/) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.13 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: debbugs-submit-bounces@debbugs.gnu.org Errors-To: debbugs-submit-bounces@debbugs.gnu.org X-Spam-Score: -0.0 (/) > Provide for customizing default regexp in hi-lock commands Actually it's possible do the same for hi-lock commands that read faces. I mean moving the following part of `hi-lock-read-face-name': (defaults (append hi-lock--unused-faces (cdr (member last-used-face hi-lock-face-defaults)) hi-lock-face-defaults)) to a new function with a name like `hi-lock-read-face-name-defaults' where you could implement your wishes for hi-lock face auto-rotation and auto-selection of the next default face value. In a separate function the users would be able to modify its default behavior easily.