Re: cl-functions do not honor common-lisp-indent-function

[Thierry Volpiatto]

Stefan Monnier <address@hidden> writes:

>> Hi, some cl-functions are not indented correctly when
>> `lisp-indent-function' is set to `common-lisp-indent-function'
>
>> --8<---------------cut here---------------start------------->8---
>> (setq lisp-indent-function 'common-lisp-indent-function)
>
>> (defun foo ()
>>   (cl-flet ((test ()
>>                   (ignore)))
>>     (test)))
>
>> (defun foo ()
>>   (flet ((test ()
>>            (ignore)))
>>     (test)))
>> --8<---------------cut here---------------end--------------->8---
>
>> is this wanted?
>
> No, but it's not a surprise either, since `cl-flet' is not defined in
> common-lisp ;-).
The prefix 'cl-' mean common lisp no ? ;-) 
so the cl-* family should be added to cl-indent.el, isn't it ?

(let ((l '((cl-flet . flet)
           (cl-labels . flet)
           (cl-macrolet . flet)
           etc...etc...)))
  (dolist (el l)
       [...]

-- 
  Thierry
Get my Gnupg key:
gpg --keyserver pgp.mit.edu --recv-keys 59F29997