2787 |
(if (looking-at "..\\c>") |
(if (looking-at "..\\c>") |
2788 |
(forward-char 1) |
(forward-char 1) |
2789 |
(forward-char 2))) |
(forward-char 2))) |
2790 |
|
;; Cater for Japanese Macro |
2791 |
|
(when (and (boundp 'japanese-TeX-mode) japanese-TeX-mode |
2792 |
|
(aref (char-category-set (char-after)) ?j) |
2793 |
|
(TeX-looking-at-backward (concat (regexp-quote TeX-esc) TeX-token-char "+") |
2794 |
|
(1- (- (point) (line-beginning-position)))) |
2795 |
|
(save-excursion |
2796 |
|
(goto-char (match-beginning 0)) |
2797 |
|
(zerop (logand 1 (skip-chars-backward "\\\\"))))) |
2798 |
|
(goto-char (match-beginning 0))) |
2799 |
;; Cater for \verb|...| (and similar) contructs which should not be |
;; Cater for \verb|...| (and similar) contructs which should not be |
2800 |
;; broken. (FIXME: Make it work with shortvrb.sty (also loaded by |
;; broken. (FIXME: Make it work with shortvrb.sty (also loaded by |
2801 |
;; doc.sty) where |...| is allowed. Arbitrary delimiters may be |
;; doc.sty) where |...| is allowed. Arbitrary delimiters may be |