|
DataMuseum.dkPresents historical artifacts from the history of: DKUUG/EUUG Conference tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about DKUUG/EUUG Conference tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - downloadIndex: ┃ o ┃
Length: 9473 (0x2501)
Names: »outline.elc«
└─⟦a0efdde77⟧ Bits:30001252 EUUGD11 Tape, 1987 Spring Conference Helsinki
└─ ⟦this⟧ »EUUGD11/gnu-31mar87/emacs/lisp/outline.elc«
0x0000…0020 0a 28 64 65 66 76 61 72 20 6f 75 74 6c 69 6e 65 2d 72 65 67 65 78 70 20 22 5b 2a 0c 5d 2b 22 20 ┆ (defvar outline-regexp "[* ]+" ┆
0x0020…0040 22 5c 0a 2a 52 65 67 75 6c 61 72 20 65 78 70 72 65 73 73 69 6f 6e 20 74 6f 20 6d 61 74 63 68 20 ┆"\ *Regular expression to match ┆
0x0040…0060 74 68 65 20 62 65 67 69 6e 6e 69 6e 67 20 6f 66 20 61 20 68 65 61 64 69 6e 67 20 6c 69 6e 65 2e ┆the beginning of a heading line.┆
0x0060…0080 0a 41 6e 79 20 6c 69 6e 65 20 77 68 6f 73 65 20 62 65 67 69 6e 6e 69 6e 67 20 6d 61 74 63 68 65 ┆ Any line whose beginning matche┆
0x0080…00a0 73 20 74 68 69 73 20 72 65 67 65 78 70 20 69 73 20 63 6f 6e 73 69 64 65 72 65 64 20 61 20 68 65 ┆s this regexp is considered a he┆
0x00a0…00c0 61 64 69 6e 67 2e 0a 54 68 65 20 72 65 63 6f 6d 6d 65 6e 64 65 64 20 77 61 79 20 74 6f 20 73 65 ┆ading. The recommended way to se┆
0x00c0…00e0 74 20 74 68 69 73 20 69 73 20 77 69 74 68 20 61 20 4c 6f 63 61 6c 20 56 61 72 69 61 62 6c 65 73 ┆t this is with a Local Variables┆
0x00e0…0100 3a 20 6c 69 73 74 0a 69 6e 20 74 68 65 20 66 69 6c 65 20 69 74 20 61 70 70 6c 69 65 73 20 74 6f ┆: list in the file it applies to┆
0x0100…0120 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 6f 75 74 6c 69 6e 65 2d 6d 6f 64 65 2d 6d 61 70 20 6e 69 ┆.") (defvar outline-mode-map ni┆
0x0120…0140 6c 20 22 5c 0a 22 29 0a 0a 28 69 66 20 6f 75 74 6c 69 6e 65 2d 6d 6f 64 65 2d 6d 61 70 20 6e 69 ┆l "\ ") (if outline-mode-map ni┆
0x0140…0160 6c 20 28 73 65 74 71 20 6f 75 74 6c 69 6e 65 2d 6d 6f 64 65 2d 6d 61 70 20 28 63 6f 70 79 2d 6b ┆l (setq outline-mode-map (copy-k┆
0x0160…0180 65 79 6d 61 70 20 74 65 78 74 2d 6d 6f 64 65 2d 6d 61 70 29 29 20 28 64 65 66 69 6e 65 2d 6b 65 ┆eymap text-mode-map)) (define-ke┆
0x0180…01a0 79 20 6f 75 74 6c 69 6e 65 2d 6d 6f 64 65 2d 6d 61 70 20 22 03 0e 22 20 28 71 75 6f 74 65 20 6f ┆y outline-mode-map " " (quote o┆
0x01a0…01c0 75 74 6c 69 6e 65 2d 6e 65 78 74 2d 76 69 73 69 62 6c 65 2d 68 65 61 64 69 6e 67 29 29 20 28 64 ┆utline-next-visible-heading)) (d┆
0x01c0…01e0 65 66 69 6e 65 2d 6b 65 79 20 6f 75 74 6c 69 6e 65 2d 6d 6f 64 65 2d 6d 61 70 20 22 03 10 22 20 ┆efine-key outline-mode-map " " ┆
0x01e0…0200 28 71 75 6f 74 65 20 6f 75 74 6c 69 6e 65 2d 70 72 65 76 69 6f 75 73 2d 76 69 73 69 62 6c 65 2d ┆(quote outline-previous-visible-┆
0x0200…0220 68 65 61 64 69 6e 67 29 29 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6f 75 74 6c 69 6e 65 2d 6d 6f ┆heading)) (define-key outline-mo┆
0x0220…0240 64 65 2d 6d 61 70 20 22 03 09 22 20 28 71 75 6f 74 65 20 73 68 6f 77 2d 63 68 69 6c 64 72 65 6e ┆de-map " " (quote show-children┆
0x0240…0260 29 29 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6f 75 74 6c 69 6e 65 2d 6d 6f 64 65 2d 6d 61 70 20 ┆)) (define-key outline-mode-map ┆
0x0260…0280 22 03 13 22 20 28 71 75 6f 74 65 20 73 68 6f 77 2d 73 75 62 74 72 65 65 29 29 20 28 64 65 66 69 ┆" " (quote show-subtree)) (defi┆
0x0280…02a0 6e 65 2d 6b 65 79 20 6f 75 74 6c 69 6e 65 2d 6d 6f 64 65 2d 6d 61 70 20 22 03 08 22 20 28 71 75 ┆ne-key outline-mode-map " " (qu┆
0x02a0…02c0 6f 74 65 20 68 69 64 65 2d 73 75 62 74 72 65 65 29 29 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6f ┆ote hide-subtree)) (define-key o┆
0x02c0…02e0 75 74 6c 69 6e 65 2d 6d 6f 64 65 2d 6d 61 70 20 22 03 15 22 20 28 71 75 6f 74 65 20 6f 75 74 6c ┆utline-mode-map " " (quote outl┆
0x02e0…0300 69 6e 65 2d 75 70 2d 68 65 61 64 69 6e 67 29 29 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6f 75 74 ┆ine-up-heading)) (define-key out┆
0x0300…0320 6c 69 6e 65 2d 6d 6f 64 65 2d 6d 61 70 20 22 03 06 22 20 28 71 75 6f 74 65 20 6f 75 74 6c 69 6e ┆line-mode-map " " (quote outlin┆
0x0320…0340 65 2d 66 6f 72 77 61 72 64 2d 73 61 6d 65 2d 6c 65 76 65 6c 29 29 20 28 64 65 66 69 6e 65 2d 6b ┆e-forward-same-level)) (define-k┆
0x0340…0360 65 79 20 6f 75 74 6c 69 6e 65 2d 6d 6f 64 65 2d 6d 61 70 20 22 03 02 22 20 28 71 75 6f 74 65 20 ┆ey outline-mode-map " " (quote ┆
0x0360…0380 6f 75 74 6c 69 6e 65 2d 62 61 63 6b 77 61 72 64 2d 73 61 6d 65 2d 6c 65 76 65 6c 29 29 29 0a 0a ┆outline-backward-same-level))) ┆
0x0380…03a0 28 64 65 66 75 6e 20 6f 75 74 6c 69 6e 65 2d 6d 6f 64 65 20 6e 69 6c 20 22 5c 0a 53 65 74 20 6d ┆(defun outline-mode nil "\ Set m┆
0x03a0…03c0 61 6a 6f 72 20 6d 6f 64 65 20 66 6f 72 20 65 64 69 74 69 6e 67 20 6f 75 74 6c 69 6e 65 73 20 77 ┆ajor mode for editing outlines w┆
0x03c0…03e0 69 74 68 20 73 65 6c 65 63 74 69 76 65 20 64 69 73 70 6c 61 79 2e 0a 48 65 61 64 69 6e 67 73 20 ┆ith selective display. Headings ┆
0x03e0…0400 61 72 65 20 6c 69 6e 65 73 20 77 68 69 63 68 20 73 74 61 72 74 20 77 69 74 68 20 61 73 74 65 72 ┆are lines which start with aster┆
0x0400…0420 69 73 6b 73 3a 20 6f 6e 65 20 66 6f 72 20 6d 61 6a 6f 72 20 68 65 61 64 69 6e 67 73 2c 0a 74 77 ┆isks: one for major headings, tw┆
0x0420…0440 6f 20 66 6f 72 20 73 75 62 68 65 61 64 69 6e 67 73 2c 20 65 74 63 2e 20 20 4c 69 6e 65 73 20 6e ┆o for subheadings, etc. Lines n┆
0x0440…0460 6f 74 20 73 74 61 72 74 69 6e 67 20 77 69 74 68 20 61 73 74 65 72 69 73 6b 73 20 61 72 65 20 62 ┆ot starting with asterisks are b┆
0x0460…0480 6f 64 79 20 6c 69 6e 65 73 2e 20 0a 0a 42 6f 64 79 20 74 65 78 74 20 6f 72 20 73 75 62 68 65 61 ┆ody lines. Body text or subhea┆
0x0480…04a0 64 69 6e 67 73 20 75 6e 64 65 72 20 61 20 68 65 61 64 69 6e 67 20 63 61 6e 20 62 65 20 6d 61 64 ┆dings under a heading can be mad┆
0x04a0…04c0 65 20 74 65 6d 70 6f 72 61 72 69 6c 79 0a 69 6e 76 69 73 69 62 6c 65 2c 20 6f 72 20 76 69 73 69 ┆e temporarily invisible, or visi┆
0x04c0…04e0 62 6c 65 20 61 67 61 69 6e 2e 20 20 49 6e 76 69 73 69 62 6c 65 20 6c 69 6e 65 73 20 61 72 65 20 ┆ble again. Invisible lines are ┆
0x04e0…0500 61 74 74 61 63 68 65 64 20 74 6f 20 74 68 65 20 65 6e 64 20 0a 6f 66 20 74 68 65 20 68 65 61 64 ┆attached to the end of the head┆
0x0500…0520 69 6e 67 2c 20 73 6f 20 74 68 65 79 20 6d 6f 76 65 20 77 69 74 68 20 69 74 2c 20 69 66 20 74 68 ┆ing, so they move with it, if th┆
0x0520…0540 65 20 6c 69 6e 65 20 69 73 20 6b 69 6c 6c 65 64 20 61 6e 64 20 79 61 6e 6b 65 64 0a 62 61 63 6b ┆e line is killed and yanked back┆
0x0540…0560 2e 20 20 41 20 68 65 61 64 69 6e 67 20 77 69 74 68 20 74 65 78 74 20 68 69 64 64 65 6e 20 75 6e ┆. A heading with text hidden un┆
0x0560…0580 64 65 72 20 69 74 20 69 73 20 6d 61 72 6b 65 64 20 77 69 74 68 20 61 6e 20 65 6c 6c 69 70 73 69 ┆der it is marked with an ellipsi┆
0x0580…05a0 73 20 28 2e 2e 2e 29 2e 0a 0a 43 6f 6d 6d 61 6e 64 73 3a 0a 43 2d 63 20 43 2d 6e 20 20 20 6f 75 ┆s (...). Commands: C-c C-n ou┆
0x05a0…05c0 74 6c 69 6e 65 2d 6e 65 78 74 2d 76 69 73 69 62 6c 65 2d 68 65 61 64 69 6e 67 20 20 20 20 20 20 ┆tline-next-visible-heading ┆
0x05c0…05e0 6d 6f 76 65 20 62 79 20 76 69 73 69 62 6c 65 20 68 65 61 64 69 6e 67 73 0a 43 2d 63 20 43 2d 70 ┆move by visible headings C-c C-p┆
0x05e0…0600 20 20 20 6f 75 74 6c 69 6e 65 2d 70 72 65 76 69 6f 75 73 2d 76 69 73 69 62 6c 65 2d 68 65 61 64 ┆ outline-previous-visible-head┆
0x0600…0620 69 6e 67 0a 43 2d 63 20 43 2d 66 20 20 20 6f 75 74 6c 69 6e 65 2d 66 6f 72 77 61 72 64 2d 73 61 ┆ing C-c C-f outline-forward-sa┆
0x0620…0640 6d 65 2d 6c 65 76 65 6c 20 20 20 20 20 20 20 20 73 69 6d 69 6c 61 72 20 62 75 74 20 73 6b 69 70 ┆me-level similar but skip┆
0x0640…0660 20 73 75 62 68 65 61 64 69 6e 67 73 0a 43 2d 63 20 43 2d 62 20 20 20 6f 75 74 6c 69 6e 65 2d 62 ┆ subheadings C-c C-b outline-b┆
0x0660…0680 61 63 6b 77 61 72 64 2d 73 61 6d 65 2d 6c 65 76 65 6c 0a 43 2d 63 20 43 2d 75 20 20 20 6f 75 74 ┆ackward-same-level C-c C-u out┆
0x0680…06a0 6c 69 6e 65 2d 75 70 2d 68 65 61 64 69 6e 67 09 09 20 20 20 20 6d 6f 76 65 20 66 72 6f 6d 20 73 ┆line-up-heading move from s┆
0x06a0…06c0 75 62 68 65 61 64 69 6e 67 20 74 6f 20 68 65 61 64 69 6e 67 0a 0a 4d 65 74 61 2d 78 20 68 69 64 ┆ubheading to heading Meta-x hid┆
0x06c0…06e0 65 2d 62 6f 64 79 09 6d 61 6b 65 20 61 6c 6c 20 74 65 78 74 20 69 6e 76 69 73 69 62 6c 65 20 28 ┆e-body make all text invisible (┆
0x06e0…0700 6e 6f 74 20 68 65 61 64 69 6e 67 73 29 2e 0a 4d 65 74 61 2d 78 20 73 68 6f 77 2d 61 6c 6c 09 09 ┆not headings). Meta-x show-all ┆
0x0700…0720 6d 61 6b 65 20 65 76 65 72 79 74 68 69 6e 67 20 69 6e 20 62 75 66 66 65 72 20 76 69 73 69 62 6c ┆make everything in buffer visibl┆
0x0720…0740 65 2e 0a 0a 54 68 65 20 72 65 6d 61 69 6e 69 6e 67 20 63 6f 6d 6d 61 6e 64 73 20 61 72 65 20 75 ┆e. The remaining commands are u┆
0x0740…0760 73 65 64 20 77 68 65 6e 20 70 6f 69 6e 74 20 69 73 20 6f 6e 20 61 20 68 65 61 64 69 6e 67 20 6c ┆sed when point is on a heading l┆
0x0760…0780 69 6e 65 2e 0a 54 68 65 79 20 61 70 70 6c 79 20 74 6f 20 73 6f 6d 65 20 6f 66 20 74 68 65 20 62 ┆ine. They apply to some of the b┆
0x0780…07a0 6f 64 79 20 6f 72 20 73 75 62 68 65 61 64 69 6e 67 73 20 6f 66 20 74 68 61 74 20 68 65 61 64 69 ┆ody or subheadings of that headi┆
0x07a0…07c0 6e 67 2e 0a 43 2d 63 20 43 2d 68 20 20 20 68 69 64 65 2d 73 75 62 74 72 65 65 09 6d 61 6b 65 20 ┆ng. C-c C-h hide-subtree make ┆
0x07c0…07e0 62 6f 64 79 20 61 6e 64 20 73 75 62 68 65 61 64 69 6e 67 73 20 69 6e 76 69 73 69 62 6c 65 2e 0a ┆body and subheadings invisible. ┆
0x07e0…0800 43 2d 63 20 43 2d 73 20 20 20 73 68 6f 77 2d 73 75 62 74 72 65 65 09 6d 61 6b 65 20 62 6f 64 79 ┆C-c C-s show-subtree make body┆
0x0800…0820 20 61 6e 64 20 73 75 62 68 65 61 64 69 6e 67 73 20 76 69 73 69 62 6c 65 2e 0a 43 2d 63 20 43 2d ┆ and subheadings visible. C-c C-┆
0x0820…0840 69 20 20 20 73 68 6f 77 2d 63 68 69 6c 64 72 65 6e 09 6d 61 6b 65 20 64 69 72 65 63 74 20 73 75 ┆i show-children make direct su┆
0x0840…0860 62 68 65 61 64 69 6e 67 73 20 76 69 73 69 62 6c 65 2e 0a 09 09 20 4e 6f 20 65 66 66 65 63 74 20 ┆bheadings visible. No effect ┆
0x0860…0880 6f 6e 20 62 6f 64 79 2c 20 6f 72 20 73 75 62 68 65 61 64 69 6e 67 73 20 32 20 6f 72 20 6d 6f 72 ┆on body, or subheadings 2 or mor┆
0x0880…08a0 65 20 6c 65 76 65 6c 73 20 64 6f 77 6e 2e 0a 09 09 20 57 69 74 68 20 61 72 67 20 4e 2c 20 61 66 ┆e levels down. With arg N, af┆
0x08a0…08c0 66 65 63 74 73 20 73 75 62 68 65 61 64 69 6e 67 73 20 4e 20 6c 65 76 65 6c 73 20 64 6f 77 6e 2e ┆fects subheadings N levels down.┆
0x08c0…08e0 0a 4d 2d 78 20 68 69 64 65 2d 65 6e 74 72 79 09 20 20 20 6d 61 6b 65 20 69 6d 6d 65 64 69 61 74 ┆ M-x hide-entry make immediat┆
0x08e0…0900 65 6c 79 20 66 6f 6c 6c 6f 77 69 6e 67 20 62 6f 64 79 20 69 6e 76 69 73 69 62 6c 65 2e 0a 4d 2d ┆ely following body invisible. M-┆
0x0900…0920 78 20 73 68 6f 77 2d 65 6e 74 72 79 09 20 20 20 6d 61 6b 65 20 69 74 20 76 69 73 69 62 6c 65 2e ┆x show-entry make it visible.┆
0x0920…0940 0a 4d 2d 78 20 68 69 64 65 2d 6c 65 61 76 65 73 09 20 20 20 6d 61 6b 65 20 62 6f 64 79 20 75 6e ┆ M-x hide-leaves make body un┆
0x0940…0960 64 65 72 20 68 65 61 64 69 6e 67 20 61 6e 64 20 75 6e 64 65 72 20 69 74 73 20 73 75 62 68 65 61 ┆der heading and under its subhea┆
0x0960…0980 64 69 6e 67 73 20 69 6e 76 69 73 69 62 6c 65 2e 0a 09 09 20 20 20 20 20 54 68 65 20 73 75 62 68 ┆dings invisible. The subh┆
0x0980…09a0 65 61 64 69 6e 67 73 20 72 65 6d 61 69 6e 20 76 69 73 69 62 6c 65 2e 0a 4d 2d 78 20 73 68 6f 77 ┆eadings remain visible. M-x show┆
0x09a0…09c0 2d 62 72 61 6e 63 68 65 73 20 20 6d 61 6b 65 20 61 6c 6c 20 73 75 62 68 65 61 64 69 6e 67 73 20 ┆-branches make all subheadings ┆
0x09c0…09e0 61 74 20 61 6c 6c 20 6c 65 76 65 6c 73 20 76 69 73 69 62 6c 65 2e 0a 0a 54 68 65 20 76 61 72 69 ┆at all levels visible. The vari┆
0x09e0…0a00 61 62 6c 65 20 6f 75 74 6c 69 6e 65 2d 72 65 67 65 78 70 20 63 61 6e 20 62 65 20 63 68 61 6e 67 ┆able outline-regexp can be chang┆
0x0a00…0a20 65 64 20 74 6f 20 63 6f 6e 74 72 6f 6c 20 77 68 61 74 20 69 73 20 61 20 68 65 61 64 69 6e 67 2e ┆ed to control what is a heading.┆
0x0a20…0a40 0a 41 20 6c 69 6e 65 20 69 73 20 61 20 68 65 61 64 69 6e 67 20 69 66 20 6f 75 74 6c 69 6e 65 2d ┆ A line is a heading if outline-┆
0x0a40…0a60 72 65 67 65 78 70 20 6d 61 74 63 68 65 73 20 73 6f 6d 65 74 68 69 6e 67 20 61 74 20 74 68 65 0a ┆regexp matches something at the ┆
0x0a60…0a80 62 65 67 69 6e 6e 69 6e 67 20 6f 66 20 74 68 65 20 6c 69 6e 65 2e 20 20 54 68 65 20 6c 6f 6e 67 ┆beginning of the line. The long┆
0x0a80…0aa0 65 72 20 74 68 65 20 6d 61 74 63 68 2c 20 74 68 65 20 64 65 65 70 65 72 20 74 68 65 20 6c 65 76 ┆er the match, the deeper the lev┆
0x0aa0…0ac0 65 6c 2e 0a 0a 54 75 72 6e 69 6e 67 20 6f 6e 20 6f 75 74 6c 69 6e 65 20 6d 6f 64 65 20 63 61 6c ┆el. Turning on outline mode cal┆
0x0ac0…0ae0 6c 73 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 74 65 78 74 2d 6d 6f 64 65 2d 68 6f 6f 6b 20 61 ┆ls the value of text-mode-hook a┆
0x0ae0…0b00 6e 64 20 74 68 65 6e 20 6f 66 0a 6f 75 74 6c 69 6e 65 2d 6d 6f 64 65 2d 68 6f 6f 6b 2c 20 69 66 ┆nd then of outline-mode-hook, if┆
0x0b00…0b20 20 74 68 65 79 20 61 72 65 20 6e 6f 6e 2d 6e 69 6c 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 ┆ they are non-nil." (interactive┆
0x0b20…0b40 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c5 88 cc 20 88 c1 89 10 88 cd 0a 21 88 ce 89 13 88 cf ┆) (byte-code " ! ┆
0x0b40…0b60 89 14 88 d0 c7 c5 5c 22 88 0e 07 89 16 06 88 d1 0e 08 21 88 d2 c9 21 88 0e 09 d3 0e 0a d4 52 89 ┆ \" ! ! R ┆
0x0b60…0b80 16 09 88 d2 cb 21 88 0e 0b d3 0e 0a d4 52 89 16 0b 88 d5 d6 d7 5c 22 87 22 20 5b 73 65 6c 65 63 ┆ ! R \" " [selec┆
0x0b80…0ba0 74 69 76 65 2d 64 69 73 70 6c 61 79 20 74 20 6f 75 74 6c 69 6e 65 2d 6d 6f 64 65 2d 6d 61 70 20 ┆tive-display t outline-mode-map ┆
0x0ba0…0bc0 6d 6f 64 65 2d 6e 61 6d 65 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 6e 69 6c 20 6c 6f 63 61 6c 2d 61 ┆mode-name major-mode nil local-a┆
0x0bc0…0be0 62 62 72 65 76 2d 74 61 62 6c 65 20 74 65 78 74 2d 6d 6f 64 65 2d 61 62 62 72 65 76 2d 74 61 62 ┆bbrev-table text-mode-abbrev-tab┆
0x0be0…0c00 6c 65 20 74 65 78 74 2d 6d 6f 64 65 2d 73 79 6e 74 61 78 2d 74 61 62 6c 65 20 70 61 72 61 67 72 ┆le text-mode-syntax-table paragr┆
0x0c00…0c20 61 70 68 2d 73 74 61 72 74 20 6f 75 74 6c 69 6e 65 2d 72 65 67 65 78 70 20 70 61 72 61 67 72 61 ┆aph-start outline-regexp paragra┆
0x0c20…0c40 70 68 2d 73 65 70 61 72 61 74 65 20 6b 69 6c 6c 2d 61 6c 6c 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 ┆ph-separate kill-all-local-varia┆
0x0c40…0c60 62 6c 65 73 20 75 73 65 2d 6c 6f 63 61 6c 2d 6d 61 70 20 22 4f 75 74 6c 69 6e 65 22 20 6f 75 74 ┆bles use-local-map "Outline" out┆
0x0c60…0c80 6c 69 6e 65 2d 6d 6f 64 65 20 64 65 66 69 6e 65 2d 61 62 62 72 65 76 2d 74 61 62 6c 65 20 73 65 ┆line-mode define-abbrev-table se┆
0x0c80…0ca0 74 2d 73 79 6e 74 61 78 2d 74 61 62 6c 65 20 6d 61 6b 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 ┆t-syntax-table make-local-variab┆
0x0ca0…0cc0 6c 65 20 22 5c 5c 7c 5e 5c 5c 28 22 20 22 5c 5c 29 22 20 72 75 6e 2d 68 6f 6f 6b 73 20 74 65 78 ┆le "\\|^\\(" "\\)" run-hooks tex┆
0x0cc0…0ce0 74 2d 6d 6f 64 65 2d 68 6f 6f 6b 20 6f 75 74 6c 69 6e 65 2d 6d 6f 64 65 2d 68 6f 6f 6b 5d 20 31 ┆t-mode-hook outline-mode-hook] 1┆
0x0ce0…0d00 30 29 29 0a 0a 28 64 65 66 75 6e 20 6f 75 74 6c 69 6e 65 2d 6c 65 76 65 6c 20 6e 69 6c 20 22 5c ┆0)) (defun outline-level nil "\┆
0x0d00…0d20 0a 52 65 74 75 72 6e 20 74 68 65 20 64 65 70 74 68 20 74 6f 20 77 68 69 63 68 20 61 20 73 74 61 ┆ Return the depth to which a sta┆
0x0d20…0d40 74 65 6d 65 6e 74 20 69 73 20 6e 65 73 74 65 64 20 69 6e 20 74 68 65 20 6f 75 74 6c 69 6e 65 2e ┆tement is nested in the outline.┆
0x0d40…0d60 0a 50 6f 69 6e 74 20 6d 75 73 74 20 62 65 20 61 74 20 74 68 65 20 62 65 67 69 6e 6e 69 6e 67 20 ┆ Point must be at the beginning ┆
0x0d60…0d80 6f 66 20 61 20 68 65 61 64 65 72 20 6c 69 6e 65 2e 0a 54 68 69 73 20 69 73 20 61 63 74 75 61 6c ┆of a header line. This is actual┆
0x0d80…0da0 6c 79 20 74 68 65 20 6c 65 6e 67 74 68 20 6f 66 20 77 68 61 74 65 76 65 72 20 6f 75 74 6c 69 6e ┆ly the length of whatever outlin┆
0x0da0…0dc0 65 2d 72 65 67 65 78 70 20 6d 61 74 63 68 65 73 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 8a ┆e-regexp matches." (byte-code " ┆
0x0dc0…0de0 c1 08 21 88 c2 c3 21 c4 c3 21 5a 29 87 22 20 5b 6f 75 74 6c 69 6e 65 2d 72 65 67 65 78 70 20 6c ┆ ! ! !Z) " [outline-regexp l┆
0x0de0…0e00 6f 6f 6b 69 6e 67 2d 61 74 20 6d 61 74 63 68 2d 65 6e 64 20 30 20 6d 61 74 63 68 2d 62 65 67 69 ┆ooking-at match-end 0 match-begi┆
0x0e00…0e20 6e 6e 69 6e 67 5d 20 35 29 29 0a 0a 28 64 65 66 75 6e 20 6f 75 74 6c 69 6e 65 2d 6e 65 78 74 2d ┆nning] 5)) (defun outline-next-┆
0x0e20…0e40 70 72 65 66 61 63 65 20 6e 69 6c 20 22 5c 0a 53 6b 69 70 20 66 6f 72 77 61 72 64 20 74 6f 20 6a ┆preface nil "\ Skip forward to j┆
0x0e40…0e60 75 73 74 20 62 65 66 6f 72 65 20 74 68 65 20 6e 65 78 74 20 68 65 61 64 69 6e 67 20 6c 69 6e 65 ┆ust before the next heading line┆
0x0e60…0e80 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c2 c3 08 50 c1 c4 23 85 0e 00 c5 c6 21 62 88 68 c7 ┆." (byte-code " P # !b h ┆
0x0e80…0ea0 3e 85 18 00 c8 c9 21 87 22 20 5b 6f 75 74 6c 69 6e 65 2d 72 65 67 65 78 70 20 6e 69 6c 20 72 65 ┆> ! " [outline-regexp nil re┆
0x0ea0…0ec0 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 5b 0a 0d 5d 22 20 6d 6f 76 65 20 6d 61 74 63 ┆-search-forward "[ ]" move matc┆
0x0ec0…0ee0 68 2d 62 65 67 69 6e 6e 69 6e 67 20 30 20 28 31 30 20 31 33 29 20 66 6f 72 77 61 72 64 2d 63 68 ┆h-beginning 0 (10 13) forward-ch┆
0x0ee0…0f00 61 72 20 2d 31 5d 20 34 29 29 0a 0a 28 64 65 66 75 6e 20 6f 75 74 6c 69 6e 65 2d 6e 65 78 74 2d ┆ar -1] 4)) (defun outline-next-┆
0x0f00…0f20 68 65 61 64 69 6e 67 20 6e 69 6c 20 22 5c 0a 4d 6f 76 65 20 74 6f 20 74 68 65 20 6e 65 78 74 20 ┆heading nil "\ Move to the next ┆
0x0f20…0f40 28 70 6f 73 73 69 62 6c 79 20 69 6e 76 69 73 69 62 6c 65 29 20 68 65 61 64 69 6e 67 20 6c 69 6e ┆(possibly invisible) heading lin┆
0x0f40…0f60 65 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 88 ┆e." (interactive) (byte-code " ┆
0x0f60…0f80 c2 c3 08 50 c1 c4 23 85 11 00 c5 c6 21 54 62 87 22 20 5b 6f 75 74 6c 69 6e 65 2d 72 65 67 65 78 ┆ P # !Tb " [outline-regex┆
0x0f80…0fa0 70 20 6e 69 6c 20 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 5b 0a 0d 5d 22 20 6d ┆p nil re-search-forward "[ ]" m┆
0x0fa0…0fc0 6f 76 65 20 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 30 5d 20 34 29 29 0a 0a 28 64 65 66 ┆ove match-beginning 0] 4)) (def┆
0x0fc0…0fe0 75 6e 20 6f 75 74 6c 69 6e 65 2d 62 61 63 6b 2d 74 6f 2d 68 65 61 64 69 6e 67 20 6e 69 6c 20 22 ┆un outline-back-to-heading nil "┆
0x0fe0…1000 5c 0a 4d 6f 76 65 20 74 6f 20 70 72 65 76 69 6f 75 73 20 28 70 6f 73 73 69 62 6c 79 20 69 6e 76 ┆\ Move to previous (possibly inv┆
0x1000…1020 69 73 69 62 6c 65 29 20 68 65 61 64 69 6e 67 20 6c 69 6e 65 2c 0a 6f 72 20 74 6f 20 62 65 67 69 ┆isible) heading line, or to begi┆
0x1020…1040 6e 6e 69 6e 67 20 6f 66 20 74 68 69 73 20 6c 69 6e 65 20 69 66 20 69 74 20 69 73 20 61 20 68 65 ┆nning of this line if it is a he┆
0x1040…1060 61 64 69 6e 67 20 6c 69 6e 65 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c2 20 88 c3 20 86 0f ┆ading line." (byte-code " ┆
0x1060…1080 00 c4 c5 08 50 c1 c6 23 87 22 20 5b 6f 75 74 6c 69 6e 65 2d 72 65 67 65 78 70 20 6e 69 6c 20 62 ┆ P # " [outline-regexp nil b┆
0x1080…10a0 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 20 6f 75 74 6c 69 6e 65 2d 6f 6e 2d 68 65 61 64 ┆eginning-of-line outline-on-head┆
0x10a0…10c0 69 6e 67 2d 70 20 72 65 2d 73 65 61 72 63 68 2d 62 61 63 6b 77 61 72 64 20 22 5e 22 20 6d 6f 76 ┆ing-p re-search-backward "^" mov┆
0x10c0…10e0 65 5d 20 36 29 29 0a 0a 28 64 65 66 75 6e 20 6f 75 74 6c 69 6e 65 2d 6f 6e 2d 68 65 61 64 69 6e ┆e] 6)) (defun outline-on-headin┆
0x10e0…1100 67 2d 70 20 6e 69 6c 20 22 5c 0a 52 65 74 75 72 6e 20 54 20 69 66 20 70 6f 69 6e 74 20 69 73 20 ┆g-p nil "\ Return T if point is ┆
0x1100…1120 6f 6e 20 61 20 68 65 61 64 65 72 20 6c 69 6e 65 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 8a ┆on a header line." (byte-code " ┆
0x1120…1140 c1 20 88 68 c2 3d 85 0d 00 c3 08 21 29 87 22 20 5b 6f 75 74 6c 69 6e 65 2d 72 65 67 65 78 70 20 ┆ h = !) " [outline-regexp ┆
0x1140…1160 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 20 31 30 20 6c 6f 6f 6b 69 6e 67 2d 61 74 5d ┆beginning-of-line 10 looking-at]┆
0x1160…1180 20 33 29 29 0a 0a 28 64 65 66 75 6e 20 6f 75 74 6c 69 6e 65 2d 6e 65 78 74 2d 76 69 73 69 62 6c ┆ 3)) (defun outline-next-visibl┆
0x1180…11a0 65 2d 68 65 61 64 69 6e 67 20 28 61 72 67 29 20 22 5c 0a 4d 6f 76 65 20 74 6f 20 74 68 65 20 6e ┆e-heading (arg) "\ Move to the n┆
0x11a0…11c0 65 78 74 20 76 69 73 69 62 6c 65 20 68 65 61 64 69 6e 67 20 6c 69 6e 65 2e 0a 57 69 74 68 20 61 ┆ext visible heading line. With a┆
0x11c0…11e0 72 67 75 6d 65 6e 74 2c 20 72 65 70 65 61 74 73 20 6f 72 20 63 61 6e 20 6d 6f 76 65 20 62 61 63 ┆rgument, repeats or can move bac┆
0x11e0…1200 6b 77 61 72 64 20 69 66 20 6e 65 67 61 74 69 76 65 2e 0a 41 20 68 65 61 64 69 6e 67 20 6c 69 6e ┆kward if negative. A heading lin┆
0x1200…1220 65 20 69 73 20 6f 6e 65 20 74 68 61 74 20 73 74 61 72 74 73 20 77 69 74 68 20 61 20 60 2a 27 20 ┆e is one that starts with a `*' ┆
0x1220…1240 28 6f 72 20 74 68 61 74 20 6f 75 74 6c 69 6e 65 2d 72 65 67 65 78 70 20 6d 61 74 63 68 65 73 29 ┆(or that outline-regexp matches)┆
0x1240…1260 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 70 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 ┆." (interactive "p") (byte-code ┆
0x1260…1280 22 c2 88 08 c3 57 83 0d 00 c4 20 82 0f 00 c5 20 88 c6 c7 09 50 c2 c2 08 24 88 c4 20 87 22 20 5b ┆" W P $ " [┆
0x1280…12a0 61 72 67 20 6f 75 74 6c 69 6e 65 2d 72 65 67 65 78 70 20 6e 69 6c 20 30 20 62 65 67 69 6e 6e 69 ┆arg outline-regexp nil 0 beginni┆
0x12a0…12c0 6e 67 2d 6f 66 2d 6c 69 6e 65 20 65 6e 64 2d 6f 66 2d 6c 69 6e 65 20 72 65 2d 73 65 61 72 63 68 ┆ng-of-line end-of-line re-search┆
0x12c0…12e0 2d 66 6f 72 77 61 72 64 20 22 5e 22 5d 20 37 29 29 0a 0a 28 64 65 66 75 6e 20 6f 75 74 6c 69 6e ┆-forward "^"] 7)) (defun outlin┆
0x12e0…1300 65 2d 70 72 65 76 69 6f 75 73 2d 76 69 73 69 62 6c 65 2d 68 65 61 64 69 6e 67 20 28 61 72 67 29 ┆e-previous-visible-heading (arg)┆
0x1300…1320 20 22 5c 0a 4d 6f 76 65 20 74 6f 20 74 68 65 20 70 72 65 76 69 6f 75 73 20 68 65 61 64 69 6e 67 ┆ "\ Move to the previous heading┆
0x1320…1340 20 6c 69 6e 65 2e 0a 57 69 74 68 20 61 72 67 75 6d 65 6e 74 2c 20 72 65 70 65 61 74 73 20 6f 72 ┆ line. With argument, repeats or┆
0x1340…1360 20 63 61 6e 20 6d 6f 76 65 20 66 6f 72 77 61 72 64 20 69 66 20 6e 65 67 61 74 69 76 65 2e 0a 41 ┆ can move forward if negative. A┆
0x1360…1380 20 68 65 61 64 69 6e 67 20 6c 69 6e 65 20 69 73 20 6f 6e 65 20 74 68 61 74 20 73 74 61 72 74 73 ┆ heading line is one that starts┆
0x1380…13a0 20 77 69 74 68 20 61 20 60 2a 27 20 28 6f 72 20 74 68 61 74 20 6f 75 74 6c 69 6e 65 2d 72 65 67 ┆ with a `*' (or that outline-reg┆
0x13a0…13c0 65 78 70 20 6d 61 74 63 68 65 73 29 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 70 22 29 ┆exp matches)." (interactive "p")┆
0x13c0…13e0 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 88 c2 08 5b 21 87 22 20 5b 61 72 67 20 6e 69 6c 20 6f ┆ (byte-code " [! " [arg nil o┆
0x13e0…1400 75 74 6c 69 6e 65 2d 6e 65 78 74 2d 76 69 73 69 62 6c 65 2d 68 65 61 64 69 6e 67 5d 20 32 29 29 ┆utline-next-visible-heading] 2))┆
0x1400…1420 0a 0a 28 64 65 66 75 6e 20 6f 75 74 6c 69 6e 65 2d 66 6c 61 67 2d 72 65 67 69 6f 6e 20 28 66 72 ┆ (defun outline-flag-region (fr┆
0x1420…1440 6f 6d 20 74 6f 20 66 6c 61 67 29 20 22 5c 0a 48 69 64 65 73 20 6f 72 20 73 68 6f 77 73 20 6c 69 ┆om to flag) "\ Hides or shows li┆
0x1440…1460 6e 65 73 20 66 72 6f 6d 20 46 52 4f 4d 20 74 6f 20 54 4f 2c 20 61 63 63 6f 72 64 69 6e 67 20 74 ┆nes from FROM to TO, according t┆
0x1460…1480 6f 20 46 4c 41 47 2e 20 20 49 66 20 46 4c 41 47 0a 69 73 20 5c 5c 6e 20 28 6e 65 77 6c 69 6e 65 ┆o FLAG. If FLAG is \\n (newline┆
0x1480…14a0 20 63 68 61 72 61 63 74 65 72 29 20 74 68 65 6e 20 74 65 78 74 20 69 73 20 68 69 64 64 65 6e 2c ┆ character) then text is hidden,┆
0x14a0…14c0 20 77 68 69 6c 65 20 69 66 20 46 4c 41 47 20 69 73 20 5c 5c 5e 4d 0a 28 63 6f 6e 74 72 6f 6c 2d ┆ while if FLAG is \\^M (control-┆
0x14c0…14e0 4d 29 20 74 68 65 20 74 65 78 74 20 69 73 20 73 68 6f 77 6e 2e 22 20 28 62 79 74 65 2d 63 6f 64 ┆M) the text is shown." (byte-cod┆
0x14e0…1500 65 20 22 c5 20 18 c6 8e c7 09 0a 0b c8 55 83 12 00 c9 82 13 00 c8 0b c4 25 29 29 87 22 20 5b 6d ┆e " U %)) " [m┆
0x1500…1520 6f 64 70 20 66 72 6f 6d 20 74 6f 20 66 6c 61 67 20 74 20 62 75 66 66 65 72 2d 6d 6f 64 69 66 69 ┆odp from to flag t buffer-modifi┆
0x1520…1540 65 64 2d 70 20 28 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 08 21 87 22 20 5b 6d 6f 64 70 20 73 65 ┆ed-p ((byte-code " ! " [modp se┆
0x1540…1560 74 2d 62 75 66 66 65 72 2d 6d 6f 64 69 66 69 65 64 2d 70 5d 20 32 29 29 20 73 75 62 73 74 2d 63 ┆t-buffer-modified-p] 2)) subst-c┆
0x1560…1580 68 61 72 2d 69 6e 2d 72 65 67 69 6f 6e 20 31 30 20 31 33 5d 20 37 29 29 0a 0a 28 64 65 66 75 6e ┆har-in-region 10 13] 7)) (defun┆
0x1580…15a0 20 68 69 64 65 2d 65 6e 74 72 79 20 6e 69 6c 20 22 5c 0a 48 69 64 65 20 74 68 65 20 62 6f 64 79 ┆ hide-entry nil "\ Hide the body┆
0x15a0…15c0 20 64 69 72 65 63 74 6c 79 20 66 6f 6c 6c 6f 77 69 6e 67 20 74 68 69 73 20 68 65 61 64 69 6e 67 ┆ directly following this heading┆
0x15c0…15e0 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c0 88 c1 ┆." (interactive) (byte-code " ┆
0x15e0…1600 20 88 8a c2 60 c3 20 88 60 c4 23 29 87 22 20 5b 6e 69 6c 20 6f 75 74 6c 69 6e 65 2d 62 61 63 6b ┆ ` ` #) " [nil outline-back┆
0x1600…1620 2d 74 6f 2d 68 65 61 64 69 6e 67 20 6f 75 74 6c 69 6e 65 2d 66 6c 61 67 2d 72 65 67 69 6f 6e 20 ┆-to-heading outline-flag-region ┆
0x1620…1640 6f 75 74 6c 69 6e 65 2d 6e 65 78 74 2d 70 72 65 66 61 63 65 20 31 33 5d 20 36 29 29 0a 0a 28 64 ┆outline-next-preface 13] 6)) (d┆
0x1640…1660 65 66 75 6e 20 73 68 6f 77 2d 65 6e 74 72 79 20 6e 69 6c 20 22 5c 0a 53 68 6f 77 20 74 68 65 20 ┆efun show-entry nil "\ Show the ┆
0x1660…1680 62 6f 64 79 20 64 69 72 65 63 74 6c 79 20 66 6f 6c 6c 6f 77 69 6e 67 20 74 68 69 73 20 68 65 61 ┆body directly following this hea┆
0x1680…16a0 64 69 6e 67 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 62 79 74 65 2d 63 6f 64 65 20 ┆ding." (interactive) (byte-code ┆
0x16a0…16c0 22 c0 88 8a c1 60 c2 20 88 60 c3 23 29 87 22 20 5b 6e 69 6c 20 6f 75 74 6c 69 6e 65 2d 66 6c 61 ┆" ` ` #) " [nil outline-fla┆
0x16c0…16e0 67 2d 72 65 67 69 6f 6e 20 6f 75 74 6c 69 6e 65 2d 6e 65 78 74 2d 70 72 65 66 61 63 65 20 31 30 ┆g-region outline-next-preface 10┆
0x16e0…1700 5d 20 35 29 29 0a 0a 28 64 65 66 75 6e 20 68 69 64 65 2d 62 6f 64 79 20 6e 69 6c 20 22 5c 0a 48 ┆] 5)) (defun hide-body nil "\ H┆
0x1700…1720 69 64 65 20 61 6c 6c 20 6f 66 20 62 75 66 66 65 72 20 65 78 63 65 70 74 20 68 65 61 64 69 6e 67 ┆ide all of buffer except heading┆
0x1720…1740 73 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c0 88 ┆s." (interactive) (byte-code " ┆
0x1740…1760 c1 65 64 5c 22 87 22 20 5b 6e 69 6c 20 68 69 64 65 2d 72 65 67 69 6f 6e 2d 62 6f 64 79 5d 20 33 ┆ ed\" " [nil hide-region-body] 3┆
0x1760…1780 29 29 0a 0a 28 64 65 66 75 6e 20 68 69 64 65 2d 72 65 67 69 6f 6e 2d 62 6f 64 79 20 28 73 74 61 ┆)) (defun hide-region-body (sta┆
0x1780…17a0 72 74 20 65 6e 64 29 20 22 5c 0a 48 69 64 65 20 61 6c 6c 20 62 6f 64 79 20 6c 69 6e 65 73 20 69 ┆rt end) "\ Hide all body lines i┆
0x17a0…17c0 6e 20 74 68 65 20 72 65 67 69 6f 6e 2c 20 62 75 74 20 6e 6f 74 20 68 65 61 64 69 6e 67 73 2e 22 ┆n the region, but not headings."┆
0x17c0…17e0 20 28 62 79 74 65 2d 63 6f 64 65 20 22 8a 8c c2 08 09 5c 22 88 65 62 88 6d 3f 85 2e 00 c3 60 c4 ┆ (byte-code " \" eb m? . ` ┆
0x17e0…1800 20 88 60 c5 23 88 6d 3f 85 2a 00 c6 c7 c8 21 83 28 00 c9 82 29 00 ca 21 88 82 0a 00 29 29 87 22 ┆ ` # m? * ! ( ) ! )) "┆
0x1800…1820 20 5b 73 74 61 72 74 20 65 6e 64 20 6e 61 72 72 6f 77 2d 74 6f 2d 72 65 67 69 6f 6e 20 6f 75 74 ┆ [start end narrow-to-region out┆
0x1820…1840 6c 69 6e 65 2d 66 6c 61 67 2d 72 65 67 69 6f 6e 20 6f 75 74 6c 69 6e 65 2d 6e 65 78 74 2d 70 72 ┆line-flag-region outline-next-pr┆
0x1840…1860 65 66 61 63 65 20 31 33 20 66 6f 72 77 61 72 64 2d 63 68 61 72 20 6c 6f 6f 6b 69 6e 67 2d 61 74 ┆eface 13 forward-char looking-at┆
0x1860…1880 20 22 5b 0a 0d 5d 5b 0a 0d 5d 22 20 32 20 31 5d 20 37 29 29 0a 0a 28 64 65 66 75 6e 20 73 68 6f ┆ "[ ][ ]" 2 1] 7)) (defun sho┆
0x1880…18a0 77 2d 61 6c 6c 20 6e 69 6c 20 22 5c 0a 53 68 6f 77 20 61 6c 6c 20 6f 66 20 74 68 65 20 74 65 78 ┆w-all nil "\ Show all of the tex┆
0x18a0…18c0 74 20 69 6e 20 74 68 65 20 62 75 66 66 65 72 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 ┆t in the buffer." (interactive) ┆
0x18c0…18e0 28 62 79 74 65 2d 63 6f 64 65 20 22 c0 88 c1 65 64 c2 23 87 22 20 5b 6e 69 6c 20 6f 75 74 6c 69 ┆(byte-code " ed # " [nil outli┆
0x18e0…1900 6e 65 2d 66 6c 61 67 2d 72 65 67 69 6f 6e 20 31 30 5d 20 34 29 29 0a 0a 28 64 65 66 75 6e 20 68 ┆ne-flag-region 10] 4)) (defun h┆
0x1900…1920 69 64 65 2d 73 75 62 74 72 65 65 20 6e 69 6c 20 22 5c 0a 48 69 64 65 20 65 76 65 72 79 74 68 69 ┆ide-subtree nil "\ Hide everythi┆
[…truncated at 200 lines…]