Return the depth to which a statement is nested in the outline.
Point must be at the beginning of a header line.
This is actually the length of whatever outline-regexp matches." (byte-code "è┴!ê┬├!─├!Z)ç" [outline-regexp looking-at match-end 0 match-beginning] 5))
(defun outline-next-preface nil "\
Skip forward to just before the next heading line." (byte-code "┬├─Q┴┼#à╞╟!bêh╚>à╔╩!ç" [outline-regexp nil re-search-forward "[
Move to the next (possibly invisible) heading line." (interactive) (byte-code "┴ê┬├─Q┴┼#à╞╟!Tbç" [outline-regexp nil re-search-forward "[
]\\(" "\\)" move match-beginning 0] 4))
(defun outline-back-to-heading nil "\
Move to previous (possibly invisible) heading line,
or to beginning of this line if it is a heading line." (byte-code "┬ ê├ å─┼╞Q┴╟#ç" [outline-regexp nil beginning-of-line outline-on-heading-p re-search-backward "^\\(" "\\)" move] 6))
(defun outline-on-heading-p nil "\
Return T if point is on a header line." (byte-code "è┴ êh┬=à
With argument, repeats or can move forward if negative.
A heading line is one that starts with a `*' (or that outline-regexp matches)." (interactive "p") (byte-code "┴ê┬[!ç" [arg nil outline-next-visible-heading] 2))
(defun outline-flag-region (from to flag) "\
Hides or shows lines from FROM to TO, according to FLAG.
If FLAG is `\\n' (newline character) then text is shown,
while if FLAG is `\\^M' (control-M) the text is hidden." (byte-code "┼ ╞Ä╟
╚Uâ╔é╚ ─%))ç" [modp from to flag t buffer-modified-p ((byte-code "┴!ç" [modp set-buffer-modified-p] 2)) subst-char-in-region 10 13] 7))
(defun hide-entry nil "\
Hide the body directly following this heading." (interactive) (byte-code "└ê┴ êè┬`├ ê`─#)ç" [nil outline-back-to-heading outline-flag-region outline-next-preface 13] 6))
(defun show-entry nil "\
Show the body directly following this heading." (interactive) (byte-code "└êè┴`┬ ê`├#)ç" [nil outline-flag-region outline-next-preface 10] 5))
(defun hide-body nil "\
Hide all of buffer except headings." (interactive) (byte-code "└ê┴ed\"ç" [nil hide-region-body] 3))
(defun hide-region-body (start end) "\
Hide all body lines in the region, but not headings." (byte-code "èî┬ \"êebêm?à.├`─ ê`┼#êm?à*╞╟╚!â(╔é)╩!êé
))ç" [start end narrow-to-region outline-flag-region outline-next-preface 13 forward-char looking-at "[
][
]" 2 1] 7))
(defun show-all nil "\
Show all of the text in the buffer." (interactive) (byte-code "└ê┴ed┬#ç" [nil outline-flag-region 10] 4))
(defun hide-subtree nil "\
Hide everything after this heading at deeper levels." (interactive) (byte-code "└ê┴┬!ç" [nil outline-flag-subtree 13] 2))
(defun hide-leaves nil "\
Hide all body after this heading at deeper levels." (interactive) (byte-code "└ê┴ ê┬`├ ê`\"ç" [nil outline-back-to-heading hide-region-body outline-end-of-subtree] 5))
(defun show-subtree nil "\
Show everything after this heading at deeper levels." (interactive) (byte-code "└ê┴┬!ç" [nil outline-flag-subtree 10] 2))
Move forward to the ARG'th subheading from here of the same level as the
present one. It stops at the first and last subheadings of a superior heading." (interactive "p") (byte-code "┬ê├ ê─Và*è┼ ) â bêSëé%─ëê╞╟!)êéç" [arg point-to-move-to nil outline-back-to-heading 0 outline-get-next-sibling error ""] 5))
(defun outline-get-next-sibling nil "\
Position the point at the next heading of the same level,
and return that position or nil if it cannot be found." (byte-code "┬ ├─!ê┬ Vàm?à├─!êéê┬ Wâ&┴é'`)ç" [level nil outline-level outline-next-visible-heading 1] 7))
(defun outline-backward-same-level (arg) "\
Move backward to the ARG'th subheading from here of the same level as the
present one. It stops at the first and last subheadings of a superior heading." (interactive "p") (byte-code "┬ê├ ê─Và*è┼ ) â bêSëé%─ëê╞╟!)êéç" [arg point-to-move-to nil outline-back-to-heading 0 outline-get-last-sibling error ""] 5))
(defun outline-get-last-sibling nil "\
Position the point at the previous heading of the same level,
and return that position or nil if it cannot be found." (byte-code "┬ ├─!ê┬ Vào?à├─!êéê┬ Wâ&┴é'`)ç" [level nil outline-level outline-previous-visible-heading 1] 7))
