Re: lisp-outline-level.

[Lute Kamstra]

Stefan Monnier <address@hidden> writes:

>> (defun lisp-outline-level ()
>>   "Lisp mode `outline-level' function."
>>   (if (looking-at "(\\|;;;###autoload")
>>       1000
>>     (looking-at outline-regexp)
>>     (- (match-end 0) (match-beginning 0))))
>
>> This is a bit strange as outline-regexp doesn't match
>> ";;;###autoload".  Shall I commit the patch below?
>
> Why did you assume that the ;;;###autoload thingy got there by
> mistake?

Ah, I see you put it in.

> Wouldn't it be better to fix outline-regexp?

I figured that an ;;;###autoload line is not a heading.  If you do
make it a heading, then a thus autoloaded function would become a
two-headed monster.  But maybe I was too rigid in my thinking.  I
suppose you want it added as a heading so that hiding the body of the
previous function doesn't hide the fact that the current function is
autoloaded?  Should I change outline-regexp into 
";;;;*\\( [^ \t\n]\\|###autoload\\)\\|("?


Lute.