yatex

view yatexm-o.el @ 13:eafae54794a0

find changesets by author, revision, files, or words in the commit message
Show message at comment-region on begin/end mode. Greek letters completion in yatexmth. YaTeX-mark environment and YaTeX-%-menu added. Erase cursor at the execution of dviout(DOS). Enable recursive completion at section-type completion.
author yuuji
date Sat, 29 Jan 1994 07:59:59 +0000
parents 390df0e505da
children cb9afa9c1213
line source
1 ;;; -*- Emacs-Lisp -*-
2 ;;; Sample startup file to invoke yatex-mode with outline-minor mode.
3 ;;; (c )1993 by HIROSE Yuuji [yuuji@ae.keio.ac.jp]
4 ;;; Last modified Sat Jan 29 16:55:05 1994 on gloria
5
6 ;;;
7 ;; outline-minor-mode(使用しない場合は不要です)
8 ;;;
9 (autoload 'outline-minor-mode "min-out" t)
10 (make-variable-buffer-local 'outline-prefix-char)
11 (make-variable-buffer-local 'outline-regexp)
12 (setq default-outline-regexp "[*\^l]+")
13 (make-variable-buffer-local 'outline-level-function)
14 (setq-default outline-level-function 'outline-level-default)
15 (defvar LaTeX-outline-regexp
16 (concat "[ \t]*" (regexp-quote "\\")
17 "\\(appendix\\|documentstyle\\|part\\|chapter\\|section\\|"
18 "subsection\\|subsubsection\\|paragraph\\|subparagraph\\)"))
19
20 ;;;
21 ;; yatex-mode
22 ;;;
23 (setq auto-mode-alist (cons '("\\.tex$" . yatex-mode) auto-mode-alist))
24 (autoload 'yatex-mode "yatex" "Yet Another LaTeX mode" t)
25 ;;↓min-outを使用しない場合、;;@ の行は不要です。
26 (defvar yatex-mode-hook
27 '(lambda ()
28 (setq outline-regexp LaTeX-outline-regexp) ;;@
29 (outline-minor-mode) ;;@
30 (YaTeX-define-begend-key "ba" "abstract")))
31 (defvar yatex-mode-load-hook
32 '(lambda ()
33 (setq-default outline-prefix-char (concat YaTeX-prefix "\C-o"));;@
34 (require 'min-out) ;;@
35 (define-key outline-minor-keymap "\C-?" 'hide-subtree) ;;@
36 ))