bug#59638: 13.0.9; reftex-toc counts incorrectly if section is commented out

[Arash Esbati]

Uwe Brauer <oub@mat.ucm.es> writes:

>>>> "AE" == Arash Esbati <arash@gnu.org> writes:
>
>> diff --git a/lisp/textmodes/reftex.el b/lisp/textmodes/reftex.el
>> index e72576cdc7..c72dd5fa07 100644
>> --- a/lisp/textmodes/reftex.el
>> +++ b/lisp/textmodes/reftex.el
>> @@ -1005,9 +1005,13 @@ reftex-compile-variables
>
>>      ;; Calculate the regular expressions
>>      (let* (
>> -;          (wbol "\\(\\`\\|[\n\r]\\)[ \t]*")
>> -           (wbol "\\(^\\)%?[ \t]*") ; Need to keep the empty group because
>> -                                    ; match numbers are hard coded
>> +           ;; (wbol "\\(\\`\\|[\n\r]\\)[ \t]*")
>> +           ;; Need to keep the empty group because match numbers are
>> +           ;; hard coded
>> +           (wbol (concat "\\(^\\)"
>> +                         (when (string-suffix-p ".dtx" (buffer-file-name) t)
>> +                           "%")
>> +                         "[ \t]*"))
>>             (label-re (concat "\\(?:"
>>                              (mapconcat #'identity reftex-label-regexps 
>> "\\|")
>>                              "\\)"))
>
> I can try to test this later

Ping!  Gentlemen, any comment on this proposal?

Best, Arash