| Subject: | Add outline-minor-mode support |
The following lines add support for outline-minor-mode together with
pod-mode. Just add the following lines to the pod-mode function:
(make-local-variable 'outline-regexp)
(setq outline-regexp "=head[1234] ")
(make-local-variable 'outline-level)
(setq outline-level
(function (lambda ()
(save-excursion
(string-to-int (buffer-substring (+ (point) 5) (+ (point) 6)))
))))
Then open a .pod document with pod-mode, enter M-x outline-minor-mode
and enjoy the additional menus.
It's debatable to treat "=item" entries also as sub-sub-sub-subheadlines.
Regards,
Slaven