[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
How to set outline-level in the first line?
From: |
Heinz Tuechler |
Subject: |
How to set outline-level in the first line? |
Date: |
Sun, 06 May 2007 12:40:12 +0100 |
Dear All,
To adapt outline-minor-mode to the comment form I use in R, I tried to
adjust the outline-regexp and the outline-level.
The outline-level should be:
(setq outline-level (defun outline-level ()
"adjust outline-level to R-comments"
(interactive)
(cond ((looking-at "#\\{5\\} ") 1)
((looking-at "#### ") 2)
((looking-at "### ") 3)
((looking-at "## ") 4)
(t 1000))))
I tried to do this in the first line by something like
outline-level: (defun outline-level () (interactive) (cond ((looking-at
"##### ") 1)((looking-at "#### ") 2)((looking-at "### ") 3)((looking-at "##
") 4) (t 1000)))
but I did not find the right way.
Only if I use eval: (setq outline-level ... it does what I want.
So finally my first line looks as follows:
-*- mode: text; mode:outline-minor; outline-regexp:"#\\{2,5\\} "; eval:
(setq outline-level (defun outline-level () (interactive) (cond
((looking-at "##### ") 1)((looking-at "#### ") 2)((looking-at "### ")
3)((looking-at "## ") 4) (t 1000)))) -*-
What I would like to know is, how to set the outline-level without "eval:"?
version information:
GNU Emacs 21.3.1 (i386-mingw-nt5.1.2600) of 2004-03-10 on NYAUMO
Thanks,
Heinz
- How to set outline-level in the first line?,
Heinz Tuechler <=