bug#27815: 26.0.50; Misindentation in cl-labels

[Lars Ingebrigtsen]

Kaushal Modi <kaushal.modi@gmail.com> writes:

> I am able to reproduce with mis-indentation on emacs -Q:
>
> Here is an example code:
>
> (require 'cl-lib)
> (cl-labels ((categoryp (tag)
>       (string-match-p "\\`@" tag)))
>   (categoryp "@a"))
>
> Above is the result of selecting the whole code and C-M-\ (indent-region).
> Notice that the body of `categoryp' gets indented by the name of that fn.

This has apparently changed between when this was reported and now (in
Emacs 28).  But it's still wrong:

(require 'cl-lib)
(cl-labels ((categoryp (tag) 
                       (string-match-p "\\`@" tag)))
  (categoryp "@a"))

-- 
(domestic pets only, the antidote for overdose, milk.)
   bloggy blog: http://lars.ingebrigtsen.no