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¨>IJ˚!Ç" [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´=Ĉ!)Ç" [outline-regexp beginning-of-line 10 looking-at] 3))
(defun outline-next-visible-heading (arg) "\
Move to the next visible heading line.
With argument, repeats or can move backward if negative.
A heading line is one that starts with a `*' (or that outline-regexp matches)." (interactive "p") (byte-code "´ÈˆW˜ Á¯ È˘˙ ¨Q´´$Ș Ç" [arg outline-regexp nil 0 beginning-of-line end-of-line re-search-forward "^\\(" "\\)"] 7))
(defun outline-previous-visible-heading (arg) "\
Move to the previous heading line.
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))
