texinfo.elc 1.4 KB

1234567891011121314151617
  1. (defvar texinfo-mode-syntax-table nil)
  2. (if texinfo-mode-syntax-table nil (setq texinfo-mode-syntax-table (make-syntax-table)) (modify-syntax-entry 34 " " texinfo-mode-syntax-table) (modify-syntax-entry 92 " " texinfo-mode-syntax-table) (modify-syntax-entry 64 "\\" texinfo-mode-syntax-table) (modify-syntax-entry 17 "\\" texinfo-mode-syntax-table) (modify-syntax-entry 91 "(]" texinfo-mode-syntax-table) (modify-syntax-entry 93 ")[" texinfo-mode-syntax-table) (modify-syntax-entry 123 "(}" texinfo-mode-syntax-table) (modify-syntax-entry 125 "){" texinfo-mode-syntax-table) (modify-syntax-entry 39 "w" texinfo-mode-syntax-table))
  3. (defun texinfo-mode nil "\
  4. Major mode for editing texinfo files.
  5. These are files that are input for TEX and also to be turned
  6. into Info files by \\[texinfo-format-buffer].
  7. These files must be written in a very restricted and
  8. modified version of TEX input format.
  9. As for editing commands, like text-mode except for syntax table,
  10. which is set up so expression commands skip texinfo bracket groups." (interactive) (byte-code "ÈˆÉ ˆÊ‰ˆË‰ˆÌ
  11. !ˆÍÃ!ˆÄ‰ˆÍÅ!ˆÎ P‰ˆÍÆ!ˆÎP‰ˆÍÇ!ˆÏ‰ˆÐÑÒ\"‡" [mode-name major-mode texinfo-mode-syntax-table require-final-newline t paragraph-separate paragraph-start fill-column nil text-mode "Texinfo" texinfo-mode set-syntax-table make-local-variable "^\\|^@[a-z]*[
  12. ]\\|" 75 run-hooks text-mode-hook texinfo-mode-hook] 9))