bug#48610: texinfo heading levels not highlighted by outline-minor-mode

[pauline-galea]

> Sent: Wednesday, May 26, 2021 at 8:23 AM
> From: "Juri Linkov" <juri@linkov.net>
> To: pauline-galea@gmx.com
> Cc: 48610@debbugs.gnu.org
> Subject: Re: bug#48610: texinfo heading levels not highlighted by 
> outline-minor-mode
>
> > I cannot see that texinfo heading levels get highlighted with different 
> > colours
> > when using outline-minor-mode.
>
> Do you see texinfo heading levels highlighted with different colours
> when using outline-mode instead of outline-minor-mode?
>
> If not, then outline-regexp is incorrectly specified in texinfo-mode.

This is what I am using

(defvar hdlevels
   '( ("@chapter" . 1)
      ("@section" . 1)
      ("@subsection" . 2)
      ("@subsubsection" . 3)
      ;; ---------------------------------------------------------
      ("@unnumbered" . 1)
      ("@unnumberedsec" . 1)
      ("@unnumberedsubsec" . 2)
      ("@unnumberedsubsubsec" . 3)
      ;; ---------------------------------------------------------
      ("@appendix" . 1)
      ("@appendixsec" . 1)
      ("@appendixsubsec" . 2)
      ("@appendixsubsubsec" . 3)
      ;; ---------------------------------------------------------
      ("@majorheading" . 1)
      ("@chapheading" . 1)
      ("@heading" . 1)
      ("@subheading" . 2)
      ("@subsubheading" . 3) )
   "Sets heading names and levels for texinfo files." )

(defun my-outline ()
   "todo"
   (interactive)

   (setq outline-regexp
      (concat
         (regexp-opt (mapcar 'car hdlevels)) "\\>"))

   (setq outline-heading-alist hdlevels) )

(defun my-outline-hook ()
   "todo"
   (add-hook 'texinfo-mode-hook #'my-outline) )

> If yes, then could you try to customize outline-minor-mode-highlight.
>