yatex
changeset 10:796a929a7b13
Initial revision
author | yuuji |
---|---|
date | Tue, 04 May 1993 13:02:40 +0000 |
parents | 7becca042f80 |
children | 390df0e505da |
files | yatexm-o.el |
diffstat | 1 files changed, 37 insertions(+), 0 deletions(-) [+] |
line diff
1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000 1.2 +++ b/yatexm-o.el Tue May 04 13:02:40 1993 +0000 1.3 @@ -0,0 +1,37 @@ 1.4 +;;; -*- Emacs-Lisp -*- 1.5 +;;; Sample startup file to invoke yatex-mode with outline-minor mode. 1.6 +;;; (C)1993 by HIROSE Yuuji [yuuji@ae.keio.ac.jp] 1.7 +;;; Last modified Tue May 4 22:02:41 1993 on figaro 1.8 +;;; $Id$ 1.9 + 1.10 +;;; 1.11 +;; outline-minor-mode(使用しない場合は不要です) 1.12 +;;; 1.13 +(autoload 'outline-minor-mode "min-out" t) 1.14 +(make-variable-buffer-local 'outline-prefix-char) 1.15 +(make-variable-buffer-local 'outline-regexp) 1.16 +(setq default-outline-regexp "[*\^l]+") 1.17 +(make-variable-buffer-local 'outline-level-function) 1.18 +(setq-default outline-level-function 'outline-level-default) 1.19 +(defvar LaTeX-outline-regexp 1.20 + (concat "[ \t]*" (regexp-quote "\\") 1.21 + "\\(appendix\\|documentstyle\\|part\\|chapter\\|section\\|" 1.22 + "subsection\\|subsubsection\\|paragraph\\|subparagraph\\)")) 1.23 + 1.24 +;;; 1.25 +;; yatex-mode 1.26 +;;; 1.27 +(setq auto-mode-alist (cons '("\\.tex$" . yatex-mode) auto-mode-alist)) 1.28 +(autoload 'yatex-mode "yatex" "Yet Another LaTeX mode" t) 1.29 +;;↓min-outを使用しない場合、;;@ の行は不要です。 1.30 +(defvar yatex-mode-hook 1.31 + '(lambda () 1.32 + (setq outline-regexp LaTeX-outline-regexp) ;;@ 1.33 + (outline-minor-mode) ;;@ 1.34 + (YaTeX-define-begend-key "ba" "abstract"))) 1.35 +(defvar yatex-mode-load-hook 1.36 + '(lambda () 1.37 + (setq-default outline-prefix-char (concat YaTeX-prefix "\C-o"));;@ 1.38 + (require 'min-out) ;;@ 1.39 + (define-key outline-minor-keymap "\C-?" 'hide-subtree) ;;@ 1.40 + ))