# HG changeset patch
# User yuuji
# Date 736520560 0
# Node ID 796a929a7b139f7b14f15aef9edd72915aa7cec6
# Parent  7becca042f809b644753a0ba8ece9dc23d36c6ec
Initial revision

diff -r 7becca042f80 -r 796a929a7b13 yatexm-o.el
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/yatexm-o.el	Tue May 04 13:02:40 1993 +0000
@@ -0,0 +1,37 @@
+;;; -*- Emacs-Lisp -*-
+;;; Sample startup file to invoke yatex-mode with outline-minor mode.
+;;; (C)1993 by HIROSE Yuuji [yuuji@ae.keio.ac.jp]
+;;; Last modified Tue May  4 22:02:41 1993 on figaro
+;;; $Id$
+
+;;;
+;; outline-minor-mode(使用しない場合は不要です)
+;;; 
+(autoload 'outline-minor-mode "min-out" t)
+(make-variable-buffer-local 'outline-prefix-char)
+(make-variable-buffer-local 'outline-regexp)
+(setq  default-outline-regexp "[*\^l]+")
+(make-variable-buffer-local 'outline-level-function)
+(setq-default outline-level-function 'outline-level-default)
+(defvar LaTeX-outline-regexp
+  (concat "[ \t]*" (regexp-quote "\\")
+	  "\\(appendix\\|documentstyle\\|part\\|chapter\\|section\\|"
+	  "subsection\\|subsubsection\\|paragraph\\|subparagraph\\)"))
+
+;;;
+;; yatex-mode
+;;;
+(setq auto-mode-alist (cons '("\\.tex$" . yatex-mode) auto-mode-alist))
+(autoload 'yatex-mode "yatex" "Yet Another LaTeX mode" t)
+;;↓min-outを使用しない場合、;;@ の行は不要です。
+(defvar yatex-mode-hook
+  '(lambda ()
+     (setq outline-regexp LaTeX-outline-regexp)			    ;;@
+     (outline-minor-mode)					    ;;@
+     (YaTeX-define-begend-key "ba" "abstract")))
+(defvar yatex-mode-load-hook
+  '(lambda ()
+     (setq-default outline-prefix-char (concat YaTeX-prefix "\C-o"));;@
+     (require 'min-out)						    ;;@
+     (define-key outline-minor-keymap "\C-?" 'hide-subtree)	    ;;@
+     ))