358 |
("@\\(anchor\\){\\([^}]+\\)" 2 font-lock-type-face) |
("@\\(anchor\\){\\([^}]+\\)" 2 font-lock-type-face) |
359 |
("@\\(dmn\\|acronym\\|value\\){\\([^}]+\\)" 2 font-lock-builtin-face) |
("@\\(dmn\\|acronym\\|value\\){\\([^}]+\\)" 2 font-lock-builtin-face) |
360 |
("@\\(end\\|itemx?\\) +\\(.+\\)" 2 font-lock-keyword-face keep) |
("@\\(end\\|itemx?\\) +\\(.+\\)" 2 font-lock-keyword-face keep) |
361 |
(,texinfo-environment-regexp |
;; (,texinfo-environment-regexp |
362 |
1 (texinfo-clone-environment (match-beginning 1) (match-end 1)) keep) |
;; 1 (texinfo-clone-environment (match-beginning 1) (match-end 1)) keep) |
363 |
(,(concat "^@" (regexp-opt (mapcar 'car texinfo-section-list) t) |
(,(concat "^@" (regexp-opt (mapcar 'car texinfo-section-list) t) |
364 |
".*\n") 0 texinfo-heading-face t)) |
".*\n") 0 texinfo-heading-face t)) |
365 |
"Additional expressions to highlight in TeXinfo mode.") |
"Additional expressions to highlight in TeXinfo mode.") |
377 |
(forward-word 1) |
(forward-word 1) |
378 |
(texinfo-next-unmatched-end)) |
(texinfo-next-unmatched-end)) |
379 |
(skip-syntax-forward "^w") |
(skip-syntax-forward "^w") |
380 |
(when (looking-at (regexp-quote (buffer-substring start end))) |
(when (looking-at |
381 |
|
(concat (regexp-quote (buffer-substring start end)) "\\>")) |
382 |
(text-clone-create start end 'spread "\\w*"))))))) |
(text-clone-create start end 'spread "\\w*"))))))) |
383 |
|
|
384 |
(defun texinfo-outline-level () |
(defun texinfo-outline-level () |