bug#14438: 24.3.50; Honor `hi-lock-auto-select-face' for non-interactive use

[Jambunathan K]

Enable `hi-lock-auto-select-face''

    (custom-set-variables
     '(hi-lock-auto-select-face t))

Install the following occur specific customizations.  

  (0) Always lookup symbol at point

      (setq occur-read-regexp-defaults-function 'find-tag-default-as-regexp)

  (1) Delete occur window 

      (add-hook 'occur-hook (lambda nil (next-error)
                              (delete-other-windows)))

  (2) Highlight the regexp that was looked up.

      (add-hook 'occur-mode-find-occurrence-hook
                (lambda nil (highlight-regexp
                             (find-tag-default-as-regexp))))

Current behaviour

  1. Run M-x occur twice on two different symbols
  2. Note that both the symbols are highlighted in hi-yellow

Expected behaviour

Since face auto-selection is on, I would prefer that the two symbols be
highlighted with two *different* colors.


In GNU Emacs 24.3.50.1 (i686-pc-linux-gnu, GTK+ Version 2.20.1)
 of 2013-05-20 on debian-6.05
Bzr revision: 112643 
mituharu@math.s.chiba-u.ac.jp-20130520031520-pq1c1qjertan94kq
Windowing system distributor `The X.Org Foundation', version 11.0.10707000
Important settings:
  value of $LANG: en_IN
  locale-coding-system: iso-latin-1-unix
  default enable-multibyte-characters: t