From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Juri Linkov Newsgroups: gmane.emacs.bugs Subject: bug#14438: 24.3.50; Honor `hi-lock-auto-select-face' for non-interactive use Date: Wed, 22 May 2013 23:57:10 +0300 Organization: JURTA Message-ID: <878v36ka1g.fsf@mail.jurta.org> References: <87wqqr1lyf.fsf@gmail.com> NNTP-Posting-Host: plane.gmane.org Mime-Version: 1.0 Content-Type: text/plain X-Trace: ger.gmane.org 1369256787 6892 80.91.229.3 (22 May 2013 21:06:27 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Wed, 22 May 2013 21:06:27 +0000 (UTC) Cc: 14438@debbugs.gnu.org To: Jambunathan K Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Wed May 22 23:06:24 2013 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by plane.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1UfGEn-0006ar-Dw for geb-bug-gnu-emacs@m.gmane.org; Wed, 22 May 2013 23:06:21 +0200 Original-Received: from localhost ([::1]:44920 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1UfGEm-00007j-WC for geb-bug-gnu-emacs@m.gmane.org; Wed, 22 May 2013 17:06:21 -0400 Original-Received: from eggs.gnu.org ([208.118.235.92]:33780) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1UfGEj-00007N-Ik for bug-gnu-emacs@gnu.org; Wed, 22 May 2013 17:06:18 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1UfGEi-000854-Mm for bug-gnu-emacs@gnu.org; Wed, 22 May 2013 17:06:17 -0400 Original-Received: from debbugs.gnu.org ([140.186.70.43]:40201) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1UfGEi-000850-JX for bug-gnu-emacs@gnu.org; Wed, 22 May 2013 17:06:16 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.72) (envelope-from ) id 1UfGFS-0002oR-Gs for bug-gnu-emacs@gnu.org; Wed, 22 May 2013 17:07:02 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Juri Linkov Original-Sender: debbugs-submit-bounces@debbugs.gnu.org Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Wed, 22 May 2013 21:07:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 14438 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: Original-Received: via spool by 14438-submit@debbugs.gnu.org id=B14438.136925677510742 (code B ref 14438); Wed, 22 May 2013 21:07:02 +0000 Original-Received: (at 14438) by debbugs.gnu.org; 22 May 2013 21:06:15 +0000 Original-Received: from localhost ([127.0.0.1]:56790 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1UfGEg-0002n8-Nw for submit@debbugs.gnu.org; Wed, 22 May 2013 17:06:14 -0400 Original-Received: from ps18281.dreamhost.com ([69.163.218.105]:35351 helo=ps18281.dreamhostps.com) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1UfGEe-0002mr-AC for 14438@debbugs.gnu.org; Wed, 22 May 2013 17:06:13 -0400 Original-Received: from localhost (ps18281.dreamhostps.com [69.163.218.105]) by ps18281.dreamhostps.com (Postfix) with ESMTP id F1F51258B9E939; Wed, 22 May 2013 14:05:24 -0700 (PDT) In-Reply-To: <87wqqr1lyf.fsf@gmail.com> (Jambunathan K.'s message of "Wed, 22 May 2013 13:32:32 +0530") User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.3.50 (x86_64-pc-linux-gnu) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.13 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6.x X-Received-From: 140.186.70.43 X-BeenThere: bug-gnu-emacs@gnu.org List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Original-Sender: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.bugs:74463 Archived-At: > (add-hook 'occur-mode-find-occurrence-hook > (lambda nil (highlight-regexp > (find-tag-default-as-regexp)))) You could use (add-hook 'occur-mode-find-occurrence-hook (lambda nil (highlight-regexp (find-tag-default-as-regexp) (let ((hi-lock-auto-select-face t)) (hi-lock-read-face-name))))) like I proposed to do in bug#14427 to get the next face automatically. BTW, what do you think about bug#14405 that adds a new defcustom `read-regexp-defaults-function' that is more user-friendly to customize than changing the values of several functions like `occur-read-regexp-defaults-function' and `hi-lock-read-regexp-defaults-function'?