[Message Prev][Message Next][Thread Prev][Thread Next][Message Index][Thread Index]

Re: outline-mode での質問です



On 01 Jul 1998 10:50:42 -0700
Keisuke Mori <ksk@xxxxxxxx> wrote:

> ところで、HTML を書くときにアウトラインしたいときには、みなさん
> どうなさっているのでしょう?
> 
> 私の知ってる限りでは、outline-regexp はマッチした「長さ」で深さ
> が決まるので HTML では使えないと思ってたのですが。

こんな設定ではどうでしょう。  とりあえず動作しているようですが、
不備がありましたらご指摘をお願いします。

# なにぶん、emacs lisp をろくに触ったことが無いので…。

; html-helper モードで outline-minor-mode
(add-hook 'html-helper-mode-hook
          (function (lambda ()
                      (outline-minor-mode t)
                      (make-local-variable 'outline-regexp)
                      (setq outline-regexp "<[Hh][1-6]")
                      (make-local-variable 'outline-level)
                      (setq outline-level 'outline-level-html) )))
;          
(defun outline-level-html ()
  (save-excursion
    (looking-at outline-regexp)
    (string-to-number
     (buffer-substring (1- (match-end 0)) (match-end 0)) )))

-- 
  Yoshihiro Tsukamoto