>>> "AE" == Arash Esbati <arash@gnu.org> writes:

> 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?

Sorry, unexpected increase in my workload, I hope to test it in the afternoon, sorry.