Hi Arash,
> I'm not aware of any way to fix this *only* by tweaking the regexp here:
> (re-search-backward "\\\\\\\\\\|&" beg-pos t)
> Any idea?
> Otherwise, I suggest the following change in `LaTeX-indent-tabular':
> (cond (...
> (t
> (+ 2
> (let ((any-col (save-excursion
> (when (re-search-backward "\\\\\\\\\\|[^\\]&"
> beg-pos t)
> (current-column)))))
> (if (and any-col (string= "&" (substring
> (match-string-no-properties 0) -1)))
> (1+ any-col)
> beg-col)))))))
> Comments welcome.
I think the form `(string= ...)' can be replaced with
`(= ?& (char-before (match-end 0)))'.
And here is another solution keeping the regexp untouched:
(cond (...
(t
(+ 2
(let ((any-col (save-excursion
(when (and
(re-search-backward "\\\\\\\\\\|&"
beg-pos t)
(= ?& (char-after))
(not (TeX-escaped-p)))
(current-column)))))
(or any-col
beg-col))))))))
Using `TeX-escaped-p' might be overkilling since we allow loose usages of
(looking-at "\\\\\\\\") and (re-search-backward "\\\\\\\\... ) in this
function.
Bye,
Ikumi Keita
_______________________________________________
bug-auctex mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/bug-auctex
