| ofs | hex dump | ascii |
|---|---|---|
| 0000 | 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 32 30 32 34 30 36 32 39 2e 31 38 35 39 2f 00 00 00 00 | dired-subtree-20240629.1859/.... |
| 0020 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0040 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0060 | 00 00 00 00 30 30 30 30 37 35 35 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 | ....0000755.0000000.0000000.0000 |
| 0080 | 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 33 35 36 36 00 20 35 00 00 00 | 0000000.00000000000.013566..5... |
| 00a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 00c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 00e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0100 | 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .ustar...root................... |
| 0120 | 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .........root................... |
| 0140 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0160 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0180 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 01a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 01c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 01e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0200 | 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 32 30 32 34 30 36 32 39 2e 31 38 35 39 2f 64 69 72 65 | dired-subtree-20240629.1859/dire |
| 0220 | 64 2d 73 75 62 74 72 65 65 2d 70 6b 67 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | d-subtree-pkg.el................ |
| 0240 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0260 | 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 | ....0000644.0000000.0000000.0000 |
| 0280 | 30 30 30 31 30 30 37 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 37 34 32 33 00 20 30 00 00 00 | 0001007.00000000000.017423..0... |
| 02a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 02c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 02e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0300 | 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .ustar...root................... |
| 0320 | 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .........root................... |
| 0340 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0360 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0380 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 03a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 03c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 03e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0400 | 3b 3b 20 2d 2a 2d 20 6e 6f 2d 62 79 74 65 2d 63 6f 6d 70 69 6c 65 3a 20 74 3b 20 6c 65 78 69 63 | ;;.-*-.no-byte-compile:.t;.lexic |
| 0420 | 61 6c 2d 62 69 6e 64 69 6e 67 3a 20 6e 69 6c 20 2d 2a 2d 0a 28 64 65 66 69 6e 65 2d 70 61 63 6b | al-binding:.nil.-*-.(define-pack |
| 0440 | 61 67 65 20 22 64 69 72 65 64 2d 73 75 62 74 72 65 65 22 20 22 32 30 32 34 30 36 32 39 2e 31 38 | age."dired-subtree"."20240629.18 |
| 0460 | 35 39 22 0a 20 20 22 49 6e 73 65 72 74 20 73 75 62 64 69 72 65 63 74 6f 72 69 65 73 20 69 6e 20 | 59"..."Insert.subdirectories.in. |
| 0480 | 61 20 74 72 65 65 2d 6c 69 6b 65 20 66 61 73 68 69 6f 6e 2e 22 0a 20 20 27 28 28 64 61 73 68 20 | a.tree-like.fashion."...'((dash. |
| 04a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 22 32 2e 35 2e 30 22 29 0a 20 20 20 20 28 64 69 72 65 64 | ............."2.5.0").....(dired |
| 04c0 | 2d 68 61 63 6b 73 2d 75 74 69 6c 73 20 22 30 2e 30 2e 31 22 29 0a 20 20 20 20 28 65 6d 61 63 73 | -hacks-utils."0.0.1").....(emacs |
| 04e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 22 32 34 2e 33 22 29 29 0a 20 20 3a 75 72 6c 20 22 68 74 | ............."24.3"))...:url."ht |
| 0500 | 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 46 75 63 6f 31 2f 64 69 72 65 64 2d 68 61 63 | tps://github.com/Fuco1/dired-hac |
| 0520 | 6b 73 22 0a 20 20 3a 63 6f 6d 6d 69 74 20 22 62 37 36 39 63 37 64 65 39 63 38 63 35 64 63 37 30 | ks"...:commit."b769c7de9c8c5dc70 |
| 0540 | 65 34 64 63 64 62 62 33 32 36 37 63 37 30 66 61 65 33 63 62 39 62 37 22 0a 20 20 3a 72 65 76 64 | e4dcdbb3267c70fae3cb9b7"...:revd |
| 0560 | 65 73 63 20 22 62 37 36 39 63 37 64 65 39 63 38 63 22 0a 20 20 3a 6b 65 79 77 6f 72 64 73 20 27 | esc."b769c7de9c8c"...:keywords.' |
| 0580 | 28 22 66 69 6c 65 73 22 29 0a 20 20 3a 61 75 74 68 6f 72 73 20 27 28 28 22 4d 61 74 c3 ba c5 a1 | ("files")...:authors.'(("Mat.... |
| 05a0 | 20 47 6f 6c 6a 65 72 22 20 2e 20 22 6d 61 74 75 73 2e 67 6f 6c 6a 65 72 40 67 6d 61 69 6c 2e 63 | .Goljer"..."matus.goljer@gmail.c |
| 05c0 | 6f 6d 22 29 29 0a 20 20 3a 6d 61 69 6e 74 61 69 6e 65 72 73 20 27 28 28 22 4d 61 74 c3 ba c5 a1 | om"))...:maintainers.'(("Mat.... |
| 05e0 | 20 47 6f 6c 6a 65 72 22 20 2e 20 22 6d 61 74 75 73 2e 67 6f 6c 6a 65 72 40 67 6d 61 69 6c 2e 63 | .Goljer"..."matus.goljer@gmail.c |
| 0600 | 6f 6d 22 29 29 29 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | om"))).......................... |
| 0620 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0640 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0660 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0680 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 06a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 06c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 06e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0700 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0720 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0740 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0760 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0780 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 07a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 07c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 07e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0800 | 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 32 30 32 34 30 36 32 39 2e 31 38 35 39 2f 64 69 72 65 | dired-subtree-20240629.1859/dire |
| 0820 | 64 2d 73 75 62 74 72 65 65 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | d-subtree.el.................... |
| 0840 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0860 | 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 | ....0000644.0000000.0000000.0000 |
| 0880 | 30 30 36 36 37 34 34 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 36 36 36 37 00 20 30 00 00 00 | 0066744.00000000000.016667..0... |
| 08a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 08c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 08e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0900 | 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .ustar...root................... |
| 0920 | 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .........root................... |
| 0940 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0960 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0980 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 09a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 09c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 09e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0a00 | 3b 3b 3b 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2e 65 6c 20 2d 2d 2d 20 49 6e 73 65 72 74 20 | ;;;.dired-subtree.el.---.Insert. |
| 0a20 | 73 75 62 64 69 72 65 63 74 6f 72 69 65 73 20 69 6e 20 61 20 74 72 65 65 2d 6c 69 6b 65 20 66 61 | subdirectories.in.a.tree-like.fa |
| 0a40 | 73 68 69 6f 6e 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 34 2d 32 30 31 | shion..;;.Copyright.(C).2014-201 |
| 0a60 | 35 20 4d 61 74 c3 ba c5 a1 20 47 6f 6c 6a 65 72 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 4d 61 74 | 5.Mat.....Goljer..;;.Author:.Mat |
| 0a80 | c3 ba c5 a1 20 47 6f 6c 6a 65 72 20 3c 6d 61 74 75 73 2e 67 6f 6c 6a 65 72 40 67 6d 61 69 6c 2e | .....Goljer.<matus.goljer@gmail. |
| 0aa0 | 63 6f 6d 3e 0a 3b 3b 20 4d 61 69 6e 74 61 69 6e 65 72 3a 20 4d 61 74 c3 ba c5 a1 20 47 6f 6c 6a | com>.;;.Maintainer:.Mat.....Golj |
| 0ac0 | 65 72 20 3c 6d 61 74 75 73 2e 67 6f 6c 6a 65 72 40 67 6d 61 69 6c 2e 63 6f 6d 3e 0a 3b 3b 20 4b | er.<matus.goljer@gmail.com>.;;.K |
| 0ae0 | 65 79 77 6f 72 64 73 3a 20 66 69 6c 65 73 0a 3b 3b 20 50 61 63 6b 61 67 65 2d 56 65 72 73 69 6f | eywords:.files.;;.Package-Versio |
| 0b00 | 6e 3a 20 32 30 32 34 30 36 32 39 2e 31 38 35 39 0a 3b 3b 20 50 61 63 6b 61 67 65 2d 52 65 76 69 | n:.20240629.1859.;;.Package-Revi |
| 0b20 | 73 69 6f 6e 3a 20 62 37 36 39 63 37 64 65 39 63 38 63 0a 3b 3b 20 43 72 65 61 74 65 64 3a 20 32 | sion:.b769c7de9c8c.;;.Created:.2 |
| 0b40 | 35 74 68 20 46 65 62 72 75 61 72 79 20 32 30 31 34 0a 3b 3b 20 50 61 63 6b 61 67 65 2d 52 65 71 | 5th.February.2014.;;.Package-Req |
| 0b60 | 75 69 72 65 73 3a 20 28 28 64 61 73 68 20 22 32 2e 35 2e 30 22 29 20 28 64 69 72 65 64 2d 68 61 | uires:.((dash."2.5.0").(dired-ha |
| 0b80 | 63 6b 73 2d 75 74 69 6c 73 20 22 30 2e 30 2e 31 22 29 20 28 65 6d 61 63 73 20 22 32 34 2e 33 22 | cks-utils."0.0.1").(emacs."24.3" |
| 0ba0 | 29 29 0a 3b 3b 20 55 52 4c 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 46 75 | )).;;.URL:.https://github.com/Fu |
| 0bc0 | 63 6f 31 2f 64 69 72 65 64 2d 68 61 63 6b 73 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d | co1/dired-hacks..;;.This.program |
| 0be0 | 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3b 20 79 6f 75 20 63 61 6e 20 72 65 64 69 73 | .is.free.software;.you.can.redis |
| 0c00 | 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 66 79 0a 3b 3b 20 69 74 20 75 | tribute.it.and/or.modify.;;.it.u |
| 0c20 | 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 | nder.the.terms.of.the.GNU.Genera |
| 0c40 | 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 62 6c 69 73 68 65 64 20 62 79 | l.Public.License.as.published.by |
| 0c60 | 0a 3b 3b 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e | .;;.the.Free.Software.Foundation |
| 0c80 | 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 | ,.either.version.3.of.the.Licens |
| 0ca0 | 65 2c 20 6f 72 0a 3b 3b 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f 6e 29 20 61 6e 79 20 6c 61 | e,.or.;;.(at.your.option).any.la |
| 0cc0 | 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 | ter.version...;;.This.program.is |
| 0ce0 | 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 6f 70 65 20 74 68 61 74 20 69 74 | .distributed.in.the.hope.that.it |
| 0d00 | 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b 3b 20 62 75 74 20 57 49 54 48 4f 55 54 20 | .will.be.useful,.;;.but.WITHOUT. |
| 0d20 | 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 76 65 6e 20 74 68 65 20 69 | ANY.WARRANTY;.without.even.the.i |
| 0d40 | 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d 45 52 43 48 41 4e 54 41 42 | mplied.warranty.of.;;.MERCHANTAB |
| 0d60 | 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 50 41 52 54 49 43 55 4c 41 | ILITY.or.FITNESS.FOR.A.PARTICULA |
| 0d80 | 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 0a 3b 3b 20 47 4e 55 20 47 65 6e 65 72 | R.PURPOSE...See.the.;;.GNU.Gener |
| 0da0 | 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 | al.Public.License.for.more.detai |
| 0dc0 | 6c 73 2e 0a 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 | ls...;;.You.should.have.received |
| 0de0 | 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 | .a.copy.of.the.GNU.General.Publi |
| 0e00 | 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 74 68 20 74 68 69 73 20 70 72 6f | c.License.;;.along.with.this.pro |
| 0e20 | 67 72 61 6d 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 70 3a 2f 2f 77 77 77 2e 67 | gram...If.not,.see.<http://www.g |
| 0e40 | 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 | nu.org/licenses/>...;;;.Commenta |
| 0e60 | 72 79 3a 0a 0a 3b 3b 20 49 6e 74 72 6f 64 75 63 74 69 6f 6e 0a 3b 3b 20 2d 2d 2d 2d 2d 2d 2d 2d | ry:..;;.Introduction.;;.-------- |
| 0e80 | 2d 2d 2d 2d 0a 0a 3b 3b 20 54 68 65 20 62 61 73 69 63 20 63 6f 6d 6d 61 6e 64 20 74 6f 20 77 6f | ----..;;.The.basic.command.to.wo |
| 0ea0 | 72 6b 20 77 69 74 68 20 73 75 62 64 69 72 65 63 74 6f 72 69 65 73 20 69 6e 20 64 69 72 65 64 20 | rk.with.subdirectories.in.dired. |
| 0ec0 | 69 73 20 60 69 27 2c 0a 3b 3b 20 77 68 69 63 68 20 69 6e 73 65 72 74 73 20 74 68 65 20 73 75 62 | is.`i',.;;.which.inserts.the.sub |
| 0ee0 | 64 69 72 65 63 74 6f 72 79 20 61 73 20 61 20 73 65 70 61 72 61 74 65 20 6c 69 73 74 69 6e 67 20 | directory.as.a.separate.listing. |
| 0f00 | 69 6e 20 74 68 65 20 61 63 74 69 76 65 0a 3b 3b 20 64 69 72 65 64 20 62 75 66 66 65 72 2e 0a 0a | in.the.active.;;.dired.buffer... |
| 0f20 | 3b 3b 20 54 68 69 73 20 70 61 63 6b 61 67 65 20 64 65 66 69 6e 65 73 20 66 75 6e 63 74 69 6f 6e | ;;.This.package.defines.function |
| 0f40 | 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 69 6e 73 65 72 74 27 20 77 68 69 63 68 20 69 6e | .`dired-subtree-insert'.which.in |
| 0f60 | 73 74 65 61 64 0a 3b 3b 20 69 6e 73 65 72 74 73 20 74 68 65 20 73 75 62 64 69 72 65 63 74 6f 72 | stead.;;.inserts.the.subdirector |
| 0f80 | 79 20 64 69 72 65 63 74 6c 79 20 62 65 6c 6f 77 20 69 74 73 20 6c 69 6e 65 20 69 6e 20 74 68 65 | y.directly.below.its.line.in.the |
| 0fa0 | 20 6f 72 69 67 69 6e 61 6c 0a 3b 3b 20 6c 69 73 74 69 6e 67 2c 20 61 6e 64 20 69 6e 64 65 6e 74 | .original.;;.listing,.and.indent |
| 0fc0 | 20 74 68 65 20 6c 69 73 74 69 6e 67 20 6f 66 20 73 75 62 64 69 72 65 63 74 6f 72 79 20 74 6f 20 | .the.listing.of.subdirectory.to. |
| 0fe0 | 72 65 73 65 6d 62 6c 65 20 61 0a 3b 3b 20 74 72 65 65 2d 6c 69 6b 65 20 73 74 72 75 63 74 75 72 | resemble.a.;;.tree-like.structur |
| 1000 | 65 20 28 73 6f 6d 65 77 68 61 74 20 73 69 6d 69 6c 61 72 20 74 6f 20 74 72 65 65 28 31 29 20 65 | e.(somewhat.similar.to.tree(1).e |
| 1020 | 78 63 65 70 74 20 74 68 65 20 70 72 65 74 74 79 0a 3b 3b 20 67 72 61 70 68 69 63 73 29 2e 20 20 | xcept.the.pretty.;;.graphics)... |
| 1040 | 54 68 65 20 74 72 65 65 20 64 69 73 70 6c 61 79 20 69 73 20 73 6f 6d 65 77 68 61 74 20 6d 6f 72 | The.tree.display.is.somewhat.mor |
| 1060 | 65 20 69 6e 74 75 69 74 69 76 65 20 74 68 61 6e 20 74 68 65 0a 3b 3b 20 64 65 66 61 75 6c 74 20 | e.intuitive.than.the.;;.default. |
| 1080 | 22 66 6c 61 74 22 20 73 75 62 64 69 72 65 63 74 6f 72 79 20 6d 61 6e 69 70 75 6c 61 74 69 6f 6e | "flat".subdirectory.manipulation |
| 10a0 | 20 70 72 6f 76 69 64 65 64 20 62 79 20 60 69 27 2e 0a 0a 3b 3b 20 54 68 65 72 65 20 61 72 65 20 | .provided.by.`i'...;;.There.are. |
| 10c0 | 73 65 76 65 72 61 6c 20 70 72 65 73 65 6e 74 61 74 69 6f 6e 20 6f 70 74 69 6f 6e 73 20 61 6e 64 | several.presentation.options.and |
| 10e0 | 20 66 61 63 65 73 20 79 6f 75 20 63 61 6e 20 63 75 73 74 6f 6d 69 7a 65 0a 3b 3b 20 74 6f 20 63 | .faces.you.can.customize.;;.to.c |
| 1100 | 68 61 6e 67 65 20 74 68 65 20 77 61 79 20 73 75 62 74 72 65 65 73 20 61 72 65 20 64 69 73 70 6c | hange.the.way.subtrees.are.displ |
| 1120 | 61 79 65 64 2e 0a 0a 3b 3b 20 59 6f 75 20 63 61 6e 20 66 75 72 74 68 65 72 20 72 65 6d 6f 76 65 | ayed...;;.You.can.further.remove |
| 1140 | 20 74 68 65 20 75 6e 77 61 6e 74 65 64 20 6c 69 6e 65 73 20 66 72 6f 6d 20 74 68 65 20 73 75 62 | .the.unwanted.lines.from.the.sub |
| 1160 | 74 72 65 65 20 62 79 20 75 73 69 6e 67 0a 3b 3b 20 60 6b 27 20 63 6f 6d 6d 61 6e 64 20 6f 72 20 | tree.by.using.;;.`k'.command.or. |
| 1180 | 73 6f 6d 65 20 6f 66 20 74 68 65 20 62 75 69 6c 74 2d 69 6e 20 22 66 6f 63 75 73 69 6e 67 22 20 | some.of.the.built-in."focusing". |
| 11a0 | 66 75 6e 63 74 69 6f 6e 73 2c 20 73 75 63 68 20 61 73 0a 3b 3b 20 60 64 69 72 65 64 2d 73 75 62 | functions,.such.as.;;.`dired-sub |
| 11c0 | 74 72 65 65 2d 6f 6e 6c 79 2d 2a 27 20 28 73 65 65 20 6c 69 73 74 20 62 65 6c 6f 77 29 2e 0a 0a | tree-only-*'.(see.list.below)... |
| 11e0 | 3b 3b 20 49 66 20 79 6f 75 20 68 61 76 65 20 74 68 65 20 70 61 63 6b 61 67 65 20 60 64 69 72 65 | ;;.If.you.have.the.package.`dire |
| 1200 | 64 2d 66 69 6c 74 65 72 27 2c 20 79 6f 75 20 63 61 6e 20 61 64 64 69 74 69 6f 6e 61 6c 6c 79 20 | d-filter',.you.can.additionally. |
| 1220 | 66 69 6c 74 65 72 0a 3b 3b 20 74 68 65 20 73 75 62 74 72 65 65 73 20 77 69 74 68 20 67 6c 6f 62 | filter.;;.the.subtrees.with.glob |
| 1240 | 61 6c 20 6f 72 20 6c 6f 63 61 6c 20 66 69 6c 74 65 72 73 2e 0a 0a 3b 3b 20 41 20 64 65 6d 6f 20 | al.or.local.filters...;;.A.demo. |
| 1260 | 6f 66 20 62 61 73 69 63 20 66 75 6e 63 74 69 6f 6e 61 6c 69 74 79 20 69 73 20 61 76 61 69 6c 61 | of.basic.functionality.is.availa |
| 1280 | 62 6c 65 20 6f 6e 20 79 6f 75 74 75 62 65 3a 0a 3b 3b 20 68 74 74 70 73 3a 2f 2f 77 77 77 2e 79 | ble.on.youtube:.;;.https://www.y |
| 12a0 | 6f 75 74 75 62 65 2e 63 6f 6d 2f 77 61 74 63 68 3f 76 3d 7a 32 36 62 38 48 4b 46 73 4e 45 0a 0a | outube.com/watch?v=z26b8HKFsNE.. |
| 12c0 | 3b 3b 20 49 6e 74 65 72 61 63 74 69 76 65 20 66 75 6e 63 74 69 6f 6e 73 0a 3b 3b 20 2d 2d 2d 2d | ;;.Interactive.functions.;;.---- |
| 12e0 | 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a 3b 3b 20 48 65 72 65 27 73 20 61 20 6c | -----------------..;;.Here's.a.l |
| 1300 | 69 73 74 20 6f 66 20 61 76 61 69 6c 61 62 6c 65 20 69 6e 74 65 72 61 63 74 69 76 65 20 66 75 6e | ist.of.available.interactive.fun |
| 1320 | 63 74 69 6f 6e 73 2e 20 20 59 6f 75 20 63 61 6e 20 72 65 61 64 0a 3b 3b 20 6d 6f 72 65 20 61 62 | ctions...You.can.read.;;.more.ab |
| 1340 | 6f 75 74 20 65 61 63 68 20 6f 6e 65 20 62 79 20 75 73 69 6e 67 20 74 68 65 20 62 75 69 6c 74 2d | out.each.one.by.using.the.built- |
| 1360 | 69 6e 20 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 66 61 63 69 6c 69 74 69 65 73 0a 3b 3b 20 6f | in.documentation.facilities.;;.o |
| 1380 | 66 20 45 6d 61 63 73 2e 20 20 49 74 20 69 73 20 61 64 76 69 63 65 64 20 74 6f 20 70 6c 61 63 65 | f.Emacs...It.is.adviced.to.place |
| 13a0 | 20 62 69 6e 64 69 6e 67 73 20 66 6f 72 20 74 68 65 73 65 20 69 6e 74 6f 20 61 0a 3b 3b 20 63 6f | .bindings.for.these.into.a.;;.co |
| 13c0 | 6e 76 65 6e 69 65 6e 74 20 70 72 65 66 69 78 20 6b 65 79 20 6d 61 70 2c 20 66 6f 72 20 65 78 61 | nvenient.prefix.key.map,.for.exa |
| 13e0 | 6d 70 6c 65 20 43 2d 2c 0a 0a 3b 3b 20 2a 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 69 6e | mple.C-,..;;.*.`dired-subtree-in |
| 1400 | 73 65 72 74 27 0a 3b 3b 20 2a 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 72 65 6d 6f 76 65 | sert'.;;.*.`dired-subtree-remove |
| 1420 | 27 0a 3b 3b 20 2a 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 74 6f 67 67 6c 65 27 0a 3b 3b | '.;;.*.`dired-subtree-toggle'.;; |
| 1440 | 20 2a 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 63 79 63 6c 65 27 0a 3b 3b 20 2a 20 60 64 | .*.`dired-subtree-cycle'.;;.*.`d |
| 1460 | 69 72 65 64 2d 73 75 62 74 72 65 65 2d 72 65 76 65 72 74 27 0a 3b 3b 20 2a 20 60 64 69 72 65 64 | ired-subtree-revert'.;;.*.`dired |
| 1480 | 2d 73 75 62 74 72 65 65 2d 6e 61 72 72 6f 77 27 0a 3b 3b 20 2a 20 60 64 69 72 65 64 2d 73 75 62 | -subtree-narrow'.;;.*.`dired-sub |
| 14a0 | 74 72 65 65 2d 75 70 27 0a 3b 3b 20 2a 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 64 6f 77 | tree-up'.;;.*.`dired-subtree-dow |
| 14c0 | 6e 27 0a 3b 3b 20 2a 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6e 65 78 74 2d 73 69 62 6c | n'.;;.*.`dired-subtree-next-sibl |
| 14e0 | 69 6e 67 27 0a 3b 3b 20 2a 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 70 72 65 76 69 6f 75 | ing'.;;.*.`dired-subtree-previou |
| 1500 | 73 2d 73 69 62 6c 69 6e 67 27 0a 3b 3b 20 2a 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 62 | s-sibling'.;;.*.`dired-subtree-b |
| 1520 | 65 67 69 6e 6e 69 6e 67 27 0a 3b 3b 20 2a 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 65 6e | eginning'.;;.*.`dired-subtree-en |
| 1540 | 64 27 0a 3b 3b 20 2a 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6d 61 72 6b 2d 73 75 62 74 | d'.;;.*.`dired-subtree-mark-subt |
| 1560 | 72 65 65 27 0a 3b 3b 20 2a 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 75 6e 6d 61 72 6b 2d | ree'.;;.*.`dired-subtree-unmark- |
| 1580 | 73 75 62 74 72 65 65 27 0a 3b 3b 20 2a 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6f 6e 6c | subtree'.;;.*.`dired-subtree-onl |
| 15a0 | 79 2d 74 68 69 73 2d 66 69 6c 65 27 0a 3b 3b 20 2a 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 | y-this-file'.;;.*.`dired-subtree |
| 15c0 | 2d 6f 6e 6c 79 2d 74 68 69 73 2d 64 69 72 65 63 74 6f 72 79 27 0a 0a 3b 3b 20 49 66 20 79 6f 75 | -only-this-directory'..;;.If.you |
| 15e0 | 20 68 61 76 65 20 70 61 63 6b 61 67 65 20 60 64 69 72 65 64 2d 66 69 6c 74 65 72 27 2c 20 61 64 | .have.package.`dired-filter',.ad |
| 1600 | 64 69 74 69 6f 6e 61 6c 20 63 6f 6d 6d 61 6e 64 0a 3b 3b 20 60 64 69 72 65 64 2d 73 75 62 74 72 | ditional.command.;;.`dired-subtr |
| 1620 | 65 65 2d 61 70 70 6c 79 2d 66 69 6c 74 65 72 27 20 69 73 20 61 76 61 69 6c 61 62 6c 65 2e 0a 0a | ee-apply-filter'.is.available... |
| 1640 | 3b 3b 20 53 65 65 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 46 75 63 6f 31 2f | ;;.See.https://github.com/Fuco1/ |
| 1660 | 64 69 72 65 64 2d 68 61 63 6b 73 20 66 6f 72 20 74 68 65 20 65 6e 74 69 72 65 20 63 6f 6c 6c 65 | dired-hacks.for.the.entire.colle |
| 1680 | 63 74 69 6f 6e 2e 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 64 69 72 | ction...;;;.Code:..(require.'dir |
| 16a0 | 65 64 2d 68 61 63 6b 73 2d 75 74 69 6c 73 29 0a 28 72 65 71 75 69 72 65 20 27 64 61 73 68 29 0a | ed-hacks-utils).(require.'dash). |
| 16c0 | 28 72 65 71 75 69 72 65 20 27 63 6c 2d 6c 69 62 29 0a 0a 28 64 65 66 67 72 6f 75 70 20 64 69 72 | (require.'cl-lib)..(defgroup.dir |
| 16e0 | 65 64 2d 73 75 62 74 72 65 65 20 28 29 0a 20 20 22 49 6e 73 65 72 74 20 73 75 62 64 69 72 65 63 | ed-subtree.()..."Insert.subdirec |
| 1700 | 74 6f 72 69 65 73 20 69 6e 20 61 20 74 72 65 65 2d 6c 69 6b 65 20 66 61 73 68 69 6f 6e 2e 22 0a | tories.in.a.tree-like.fashion.". |
| 1720 | 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 68 61 63 6b 73 0a 20 20 3a 70 72 65 66 69 78 20 | ..:group.'dired-hacks...:prefix. |
| 1740 | 22 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 22 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 | "dired-subtree-")..(defcustom.di |
| 1760 | 72 65 64 2d 73 75 62 74 72 65 65 2d 6c 69 6e 65 2d 70 72 65 66 69 78 20 22 20 20 22 0a 20 20 22 | red-subtree-line-prefix.".."..." |
| 1780 | 41 20 70 72 65 66 69 78 20 70 75 74 20 69 6e 74 6f 20 65 61 63 68 20 6e 65 73 74 65 64 20 73 75 | A.prefix.put.into.each.nested.su |
| 17a0 | 62 74 72 65 65 2e 0a 0a 54 68 65 20 70 72 65 66 69 78 20 69 73 20 72 65 70 65 61 74 65 64 20 5c | btree...The.prefix.is.repeated.\ |
| 17c0 | 22 64 65 70 74 68 5c 22 20 74 69 6d 65 73 2e 0a 0a 41 6c 74 65 72 6e 61 74 69 76 65 6c 79 2c 20 | "depth\".times...Alternatively,. |
| 17e0 | 69 74 20 63 61 6e 20 62 65 20 61 20 66 75 6e 63 74 69 6f 6e 20 74 61 6b 69 6e 67 20 6f 6e 65 20 | it.can.be.a.function.taking.one. |
| 1800 | 61 72 67 75 6d 65 6e 74 2d 2d 2d 74 68 65 0a 64 65 70 74 68 2d 2d 2d 74 68 61 74 20 63 72 65 61 | argument---the.depth---that.crea |
| 1820 | 74 65 73 20 74 68 65 20 70 72 65 66 69 78 2e 22 0a 20 20 3a 74 79 70 65 20 27 28 63 68 6f 69 63 | tes.the.prefix."...:type.'(choic |
| 1840 | 65 20 73 74 72 69 6e 67 20 66 75 6e 63 74 69 6f 6e 29 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 | e.string.function)...:group.'dir |
| 1860 | 65 64 2d 73 75 62 74 72 65 65 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 65 64 2d 73 75 | ed-subtree)..(defcustom.dired-su |
| 1880 | 62 74 72 65 65 2d 6c 69 6e 65 2d 70 72 65 66 69 78 2d 66 61 63 65 20 27 70 61 72 65 6e 74 73 0a | btree-line-prefix-face.'parents. |
| 18a0 | 20 20 22 53 70 65 63 69 66 69 65 73 20 68 6f 77 20 74 68 65 20 70 72 65 66 69 78 20 69 73 20 66 | .."Specifies.how.the.prefix.is.f |
| 18c0 | 6f 6e 74 69 66 69 65 64 2e 22 0a 20 20 3a 74 79 70 65 20 27 28 72 61 64 69 6f 0a 20 20 20 20 20 | ontified."...:type.'(radio...... |
| 18e0 | 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 4e 6f 20 66 61 63 65 20 61 70 70 6c 69 65 | .....(const.:tag."No.face.applie |
| 1900 | 64 22 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 49 | d".nil)...........(const.:tag."I |
| 1920 | 6e 68 65 72 69 74 20 66 72 6f 6d 20 63 75 72 72 65 6e 74 20 73 75 62 74 72 65 65 22 20 73 75 62 | nherit.from.current.subtree".sub |
| 1940 | 74 72 65 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 49 6e 68 | tree)...........(const.:tag."Inh |
| 1960 | 65 72 69 74 20 66 72 6f 6d 20 61 6c 6c 20 70 61 72 65 6e 74 73 22 20 70 61 72 65 6e 74 73 29 29 | erit.from.all.parents".parents)) |
| 1980 | 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 29 0a 0a 28 64 65 66 63 | ...:group.'dired-subtree)..(defc |
| 19a0 | 75 73 74 6f 6d 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 75 73 65 2d 62 61 63 6b 67 72 6f 75 | ustom.dired-subtree-use-backgrou |
| 19c0 | 6e 64 73 20 74 0a 20 20 22 57 68 65 6e 20 6e 6f 6e 2d 6e 69 6c 2c 20 61 64 64 20 61 20 62 61 63 | nds.t..."When.non-nil,.add.a.bac |
| 19e0 | 6b 67 72 6f 75 6e 64 20 66 61 63 65 20 74 6f 20 61 20 73 75 62 74 72 65 65 20 6c 69 73 74 69 6e | kground.face.to.a.subtree.listin |
| 1a00 | 67 2e 22 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 0a 20 20 3a 67 72 6f 75 70 20 27 64 | g."...:type.'boolean...:group.'d |
| 1a20 | 69 72 65 64 2d 73 75 62 74 72 65 65 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 65 64 2d | ired-subtree)..(defcustom.dired- |
| 1a40 | 73 75 62 74 72 65 65 2d 61 66 74 65 72 2d 69 6e 73 65 72 74 2d 68 6f 6f 6b 20 28 29 0a 20 20 22 | subtree-after-insert-hook.()..." |
| 1a60 | 48 6f 6f 6b 20 72 75 6e 20 61 74 20 74 68 65 20 65 6e 64 20 6f 66 20 60 64 69 72 65 64 2d 73 75 | Hook.run.at.the.end.of.`dired-su |
| 1a80 | 62 74 72 65 65 2d 69 6e 73 65 72 74 27 2e 22 0a 20 20 3a 74 79 70 65 20 27 68 6f 6f 6b 0a 20 20 | btree-insert'."...:type.'hook... |
| 1aa0 | 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 29 0a 0a 28 64 65 66 63 75 73 74 | :group.'dired-subtree)..(defcust |
| 1ac0 | 6f 6d 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 61 66 74 65 72 2d 72 65 6d 6f 76 65 2d 68 6f | om.dired-subtree-after-remove-ho |
| 1ae0 | 6f 6b 20 28 29 0a 20 20 22 48 6f 6f 6b 20 72 75 6e 20 61 74 20 74 68 65 20 65 6e 64 20 6f 66 20 | ok.()..."Hook.run.at.the.end.of. |
| 1b00 | 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 72 65 6d 6f 76 65 27 2e 22 0a 20 20 3a 74 79 70 65 | `dired-subtree-remove'."...:type |
| 1b20 | 20 27 68 6f 6f 6b 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 29 0a | .'hook...:group.'dired-subtree). |
| 1b40 | 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 63 79 63 6c 65 2d | .(defcustom.dired-subtree-cycle- |
| 1b60 | 64 65 70 74 68 20 33 0a 20 20 22 44 65 66 61 75 6c 74 20 64 65 70 74 68 20 65 78 70 61 6e 64 65 | depth.3..."Default.depth.expande |
| 1b80 | 64 20 62 79 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 63 79 63 6c 65 27 2e 22 0a 20 20 3a | d.by.`dired-subtree-cycle'."...: |
| 1ba0 | 74 79 70 65 20 27 6e 61 74 6e 75 6d 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 75 62 | type.'natnum...:group.'dired-sub |
| 1bc0 | 74 72 65 65 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d | tree)..(defcustom.dired-subtree- |
| 1be0 | 69 67 6e 6f 72 65 64 2d 72 65 67 65 78 70 0a 20 20 28 63 6f 6e 63 61 74 20 22 5e 22 20 28 72 65 | ignored-regexp...(concat."^".(re |
| 1c00 | 67 65 78 70 2d 6f 70 74 20 76 63 2d 64 69 72 65 63 74 6f 72 79 2d 65 78 63 6c 75 73 69 6f 6e 2d | gexp-opt.vc-directory-exclusion- |
| 1c20 | 6c 69 73 74 29 20 22 24 22 29 0a 20 20 22 4d 61 74 63 68 69 6e 67 20 64 69 72 65 63 74 6f 72 69 | list)."$")..."Matching.directori |
| 1c40 | 65 73 20 77 69 6c 6c 20 6e 6f 74 20 62 65 20 65 78 70 61 6e 64 65 64 20 69 6e 20 60 64 69 72 65 | es.will.not.be.expanded.in.`dire |
| 1c60 | 64 2d 73 75 62 74 72 65 65 2d 63 79 63 6c 65 27 2e 22 0a 20 20 3a 74 79 70 65 20 27 72 65 67 65 | d-subtree-cycle'."...:type.'rege |
| 1c80 | 78 70 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 29 0a 0a 28 64 65 | xp...:group.'dired-subtree)..(de |
| 1ca0 | 66 67 72 6f 75 70 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 66 61 63 65 73 20 28 29 0a 20 20 | fgroup.dired-subtree-faces.()... |
| 1cc0 | 22 46 61 63 65 73 20 75 73 65 64 20 69 6e 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 27 2e 22 | "Faces.used.in.`dired-subtree'." |
| 1ce0 | 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 29 0a 0a 28 64 65 66 66 | ...:group.'dired-subtree)..(deff |
| 1d00 | 61 63 65 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 64 65 70 74 68 2d 31 2d 66 61 63 65 0a 20 | ace.dired-subtree-depth-1-face.. |
| 1d20 | 20 27 28 28 74 20 28 3a 62 61 63 6b 67 72 6f 75 6e 64 20 22 23 32 35 32 65 33 30 22 29 29 29 0a | .'((t.(:background."#252e30"))). |
| 1d40 | 20 20 22 42 61 63 6b 67 72 6f 75 6e 64 20 66 6f 72 20 64 65 70 74 68 20 31 20 73 75 62 74 72 65 | .."Background.for.depth.1.subtre |
| 1d60 | 65 73 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 66 61 63 65 | es"...:group.'dired-subtree-face |
| 1d80 | 73 29 0a 0a 28 64 65 66 66 61 63 65 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 64 65 70 74 68 | s)..(defface.dired-subtree-depth |
| 1da0 | 2d 32 2d 66 61 63 65 0a 20 20 27 28 28 74 20 28 3a 62 61 63 6b 67 72 6f 75 6e 64 20 22 23 32 33 | -2-face...'((t.(:background."#23 |
| 1dc0 | 32 61 32 62 22 29 29 29 0a 20 20 22 42 61 63 6b 67 72 6f 75 6e 64 20 66 6f 72 20 64 65 70 74 68 | 2a2b")))..."Background.for.depth |
| 1de0 | 20 32 20 73 75 62 74 72 65 65 73 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 75 62 | .2.subtrees"...:group.'dired-sub |
| 1e00 | 74 72 65 65 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 64 69 72 65 64 2d 73 75 62 74 | tree-faces)..(defface.dired-subt |
| 1e20 | 72 65 65 2d 64 65 70 74 68 2d 33 2d 66 61 63 65 0a 20 20 27 28 28 74 20 28 3a 62 61 63 6b 67 72 | ree-depth-3-face...'((t.(:backgr |
| 1e40 | 6f 75 6e 64 20 22 23 32 31 32 36 32 37 22 29 29 29 0a 20 20 22 42 61 63 6b 67 72 6f 75 6e 64 20 | ound."#212627")))..."Background. |
| 1e60 | 66 6f 72 20 64 65 70 74 68 20 33 20 73 75 62 74 72 65 65 73 22 0a 20 20 3a 67 72 6f 75 70 20 27 | for.depth.3.subtrees"...:group.' |
| 1e80 | 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 64 | dired-subtree-faces)..(defface.d |
| 1ea0 | 69 72 65 64 2d 73 75 62 74 72 65 65 2d 64 65 70 74 68 2d 34 2d 66 61 63 65 0a 20 20 27 28 28 74 | ired-subtree-depth-4-face...'((t |
| 1ec0 | 20 28 3a 62 61 63 6b 67 72 6f 75 6e 64 20 22 23 31 65 32 32 32 33 22 29 29 29 0a 20 20 22 42 61 | .(:background."#1e2223")))..."Ba |
| 1ee0 | 63 6b 67 72 6f 75 6e 64 20 66 6f 72 20 64 65 70 74 68 20 34 20 73 75 62 74 72 65 65 73 22 0a 20 | ckground.for.depth.4.subtrees".. |
| 1f00 | 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 66 61 63 65 73 29 0a 0a 28 | .:group.'dired-subtree-faces)..( |
| 1f20 | 64 65 66 66 61 63 65 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 64 65 70 74 68 2d 35 2d 66 61 | defface.dired-subtree-depth-5-fa |
| 1f40 | 63 65 0a 20 20 27 28 28 74 20 28 3a 62 61 63 6b 67 72 6f 75 6e 64 20 22 23 31 63 31 64 31 65 22 | ce...'((t.(:background."#1c1d1e" |
| 1f60 | 29 29 29 0a 20 20 22 42 61 63 6b 67 72 6f 75 6e 64 20 66 6f 72 20 64 65 70 74 68 20 35 20 73 75 | )))..."Background.for.depth.5.su |
| 1f80 | 62 74 72 65 65 73 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d | btrees"...:group.'dired-subtree- |
| 1fa0 | 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 64 | faces)..(defface.dired-subtree-d |
| 1fc0 | 65 70 74 68 2d 36 2d 66 61 63 65 0a 20 20 27 28 28 74 20 28 3a 62 61 63 6b 67 72 6f 75 6e 64 20 | epth-6-face...'((t.(:background. |
| 1fe0 | 22 23 31 61 31 39 31 61 22 29 29 29 0a 20 20 22 42 61 63 6b 67 72 6f 75 6e 64 20 66 6f 72 20 64 | "#1a191a")))..."Background.for.d |
| 2000 | 65 70 74 68 20 36 20 73 75 62 74 72 65 65 73 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 | epth.6.subtrees"...:group.'dired |
| 2020 | 2d 73 75 62 74 72 65 65 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 76 61 72 20 64 69 72 65 64 2d 73 | -subtree-faces)..(defvar.dired-s |
| 2040 | 75 62 74 72 65 65 2d 6f 76 65 72 6c 61 79 73 20 6e 69 6c 0a 20 20 22 53 75 62 74 72 65 65 20 6f | ubtree-overlays.nil..."Subtree.o |
| 2060 | 76 65 72 6c 61 79 73 20 69 6e 20 74 68 69 73 20 62 75 66 66 65 72 2e 22 29 0a 28 6d 61 6b 65 2d | verlays.in.this.buffer.").(make- |
| 2080 | 76 61 72 69 61 62 6c 65 2d 62 75 66 66 65 72 2d 6c 6f 63 61 6c 20 27 64 69 72 65 64 2d 73 75 62 | variable-buffer-local.'dired-sub |
| 20a0 | 74 72 65 65 2d 6f 76 65 72 6c 61 79 73 29 0a 0a 0c 0a 3b 3b 3b 20 4f 76 65 72 6c 61 79 20 6d 61 | tree-overlays)....;;;.Overlay.ma |
| 20c0 | 6e 69 70 75 6c 61 74 69 6f 6e 0a 3b 3b 20 4d 61 79 62 65 20 77 65 20 73 68 6f 75 6c 64 20 61 62 | nipulation.;;.Maybe.we.should.ab |
| 20e0 | 73 74 72 61 63 74 20 74 68 65 20 6f 76 65 72 6c 61 79 2d 66 6f 6f 20 69 6e 74 6f 20 73 6f 6d 65 | stract.the.overlay-foo.into.some |
| 2100 | 20 73 75 62 74 72 65 65 0a 3b 3b 20 66 75 6e 63 74 69 6f 6e 73 20 69 6e 73 74 65 61 64 21 21 21 | .subtree.;;.functions.instead!!! |
| 2120 | 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 72 65 6d 6f 76 65 2d 6f | ..(defun.dired-subtree--remove-o |
| 2140 | 76 65 72 6c 61 79 20 28 6f 76 29 0a 20 20 22 52 65 6d 6f 76 65 20 64 69 72 65 64 2d 73 75 62 74 | verlay.(ov)..."Remove.dired-subt |
| 2160 | 72 65 65 20 6f 76 65 72 6c 61 79 20 4f 56 2e 22 0a 20 20 28 73 65 74 71 20 64 69 72 65 64 2d 73 | ree.overlay.OV."...(setq.dired-s |
| 2180 | 75 62 74 72 65 65 2d 6f 76 65 72 6c 61 79 73 0a 20 20 20 20 20 20 20 20 28 2d 2d 72 65 6d 6f 76 | ubtree-overlays.........(--remov |
| 21a0 | 65 20 28 65 71 75 61 6c 20 69 74 20 6f 76 29 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6f 76 | e.(equal.it.ov).dired-subtree-ov |
| 21c0 | 65 72 6c 61 79 73 29 29 0a 20 20 28 64 65 6c 65 74 65 2d 6f 76 65 72 6c 61 79 20 6f 76 29 29 0a | erlays))...(delete-overlay.ov)). |
| 21e0 | 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 72 65 6d 6f 76 65 2d 6f 76 | .(defun.dired-subtree--remove-ov |
| 2200 | 65 72 6c 61 79 73 20 28 6f 76 73 29 0a 20 20 22 52 65 6d 6f 76 65 20 64 69 72 65 64 2d 73 75 62 | erlays.(ovs)..."Remove.dired-sub |
| 2220 | 74 72 65 65 20 6f 76 65 72 6c 61 79 73 20 4f 56 53 2e 22 0a 20 20 28 6d 61 70 63 20 27 64 69 72 | tree.overlays.OVS."...(mapc.'dir |
| 2240 | 65 64 2d 73 75 62 74 72 65 65 2d 2d 72 65 6d 6f 76 65 2d 6f 76 65 72 6c 61 79 20 6f 76 73 29 29 | ed-subtree--remove-overlay.ovs)) |
| 2260 | 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 63 6c 65 61 6e 75 70 2d | ..(defun.dired-subtree--cleanup- |
| 2280 | 6f 76 65 72 6c 61 79 73 20 28 29 0a 20 20 22 52 65 6d 6f 76 65 20 74 68 65 20 6e 69 6c 20 76 61 | overlays.()..."Remove.the.nil.va |
| 22a0 | 6c 75 65 73 20 66 72 6f 6d 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6f 76 65 72 6c 61 79 | lues.from.`dired-subtree-overlay |
| 22c0 | 73 27 2e 22 0a 20 20 28 73 65 74 71 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6f 76 65 72 6c | s'."...(setq.dired-subtree-overl |
| 22e0 | 61 79 73 0a 20 20 20 20 20 20 20 20 28 2d 2d 72 65 6d 6f 76 65 20 28 6e 6f 74 20 28 6f 76 65 72 | ays.........(--remove.(not.(over |
| 2300 | 6c 61 79 2d 62 75 66 66 65 72 20 69 74 29 29 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6f 76 | lay-buffer.it)).dired-subtree-ov |
| 2320 | 65 72 6c 61 79 73 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d | erlays)))..(defun.dired-subtree- |
| 2340 | 2d 67 65 74 2d 61 6c 6c 2d 6f 76 73 20 28 29 0a 20 20 22 47 65 74 20 61 6c 6c 20 64 69 72 65 64 | -get-all-ovs.()..."Get.all.dired |
| 2360 | 2d 73 75 62 74 72 65 65 20 6f 76 65 72 6c 61 79 73 20 69 6e 20 74 68 69 73 20 62 75 66 66 65 72 | -subtree.overlays.in.this.buffer |
| 2380 | 2e 22 0a 20 20 28 2d 2d 66 69 6c 74 65 72 20 28 6f 76 65 72 6c 61 79 2d 67 65 74 20 69 74 20 27 | ."...(--filter.(overlay-get.it.' |
| 23a0 | 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 64 65 70 74 68 29 20 28 6f 76 65 72 6c 61 79 73 2d 69 | dired-subtree-depth).(overlays-i |
| 23c0 | 6e 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 29 0a 0a 28 64 | n.(point-min).(point-max))))..(d |
| 23e0 | 65 66 75 6e 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 67 65 74 2d 61 6c 6c 2d 6f 76 73 2d | efun.dired-subtree--get-all-ovs- |
| 2400 | 61 74 2d 70 6f 69 6e 74 20 28 26 6f 70 74 69 6f 6e 61 6c 20 70 29 0a 20 20 22 47 65 74 20 61 6c | at-point.(&optional.p)..."Get.al |
| 2420 | 6c 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 20 6f 76 65 72 6c 61 79 73 20 61 74 20 70 6f 69 6e | l.dired-subtree.overlays.at.poin |
| 2440 | 74 20 50 2e 22 0a 20 20 28 73 65 74 71 20 70 20 28 6f 72 20 70 20 28 70 6f 69 6e 74 29 29 29 0a | t.P."...(setq.p.(or.p.(point))). |
| 2460 | 20 20 28 2d 2d 66 69 6c 74 65 72 20 28 6f 76 65 72 6c 61 79 2d 67 65 74 20 69 74 20 27 64 69 72 | ..(--filter.(overlay-get.it.'dir |
| 2480 | 65 64 2d 73 75 62 74 72 65 65 2d 64 65 70 74 68 29 20 28 6f 76 65 72 6c 61 79 73 2d 61 74 20 28 | ed-subtree-depth).(overlays-at.( |
| 24a0 | 70 6f 69 6e 74 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d | point))))..(defun.dired-subtree- |
| 24c0 | 2d 67 65 74 2d 6f 76 73 2d 69 6e 20 28 26 6f 70 74 69 6f 6e 61 6c 20 62 65 67 20 65 6e 64 29 0a | -get-ovs-in.(&optional.beg.end). |
| 24e0 | 20 20 22 47 65 74 20 61 6c 6c 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 20 6f 76 65 72 6c 61 79 | .."Get.all.dired-subtree.overlay |
| 2500 | 73 20 62 65 74 77 65 65 6e 20 42 45 47 20 61 6e 64 20 45 4e 44 2e 0a 0a 42 45 47 20 61 6e 64 20 | s.between.BEG.and.END...BEG.and. |
| 2520 | 45 4e 44 20 64 65 66 61 75 6c 74 20 74 6f 20 74 68 65 20 72 65 67 69 6f 6e 20 73 70 61 6e 6e 65 | END.default.to.the.region.spanne |
| 2540 | 64 20 62 79 20 6f 76 65 72 6c 61 79 20 61 74 20 70 6f 69 6e 74 2e 22 0a 20 20 28 77 68 65 6e 20 | d.by.overlay.at.point."...(when. |
| 2560 | 28 6e 6f 74 20 62 65 67 29 0a 20 20 20 20 28 6c 65 74 20 28 28 6f 76 20 28 64 69 72 65 64 2d 73 | (not.beg).....(let.((ov.(dired-s |
| 2580 | 75 62 74 72 65 65 2d 2d 67 65 74 2d 6f 76 29 29 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 62 65 | ubtree--get-ov))).......(setq.be |
| 25a0 | 67 20 28 6f 76 65 72 6c 61 79 2d 73 74 61 72 74 20 6f 76 29 29 0a 20 20 20 20 20 20 28 73 65 74 | g.(overlay-start.ov)).......(set |
| 25c0 | 71 20 65 6e 64 20 28 6f 76 65 72 6c 61 79 2d 65 6e 64 20 6f 76 29 29 29 29 0a 20 20 28 2d 2d 66 | q.end.(overlay-end.ov))))...(--f |
| 25e0 | 69 6c 74 65 72 20 28 61 6e 64 20 28 6f 76 65 72 6c 61 79 2d 67 65 74 20 69 74 20 27 64 69 72 65 | ilter.(and.(overlay-get.it.'dire |
| 2600 | 64 2d 73 75 62 74 72 65 65 2d 64 65 70 74 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | d-subtree-depth)................ |
| 2620 | 20 20 28 3e 3d 20 28 6f 76 65 72 6c 61 79 2d 73 74 61 72 74 20 69 74 29 20 62 65 67 29 0a 20 20 | ..(>=.(overlay-start.it).beg)... |
| 2640 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3c 3d 20 28 6f 76 65 72 6c 61 79 2d 65 6e 64 20 | ...............(<=.(overlay-end. |
| 2660 | 69 74 29 20 65 6e 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 73 2d | it).end)).............(overlays- |
| 2680 | 69 6e 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 29 0a 0a 28 | in.(point-min).(point-max))))..( |
| 26a0 | 64 65 66 75 6e 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 67 65 74 2d 6f 76 20 28 26 6f 70 | defun.dired-subtree--get-ov.(&op |
| 26c0 | 74 69 6f 6e 61 6c 20 70 29 0a 20 20 22 47 65 74 20 74 68 65 20 70 61 72 65 6e 74 20 73 75 62 74 | tional.p)..."Get.the.parent.subt |
| 26e0 | 72 65 65 20 6f 76 65 72 6c 61 79 20 61 74 20 70 6f 69 6e 74 2e 22 0a 20 20 28 73 65 74 71 20 70 | ree.overlay.at.point."...(setq.p |
| 2700 | 20 28 6f 72 20 70 20 28 70 6f 69 6e 74 29 29 29 0a 20 20 28 63 61 72 20 28 2d 2d 73 6f 72 74 20 | .(or.p.(point)))...(car.(--sort. |
| 2720 | 28 3e 20 28 6f 76 65 72 6c 61 79 2d 67 65 74 20 69 74 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 | (>.(overlay-get.it.'dired-subtre |
| 2740 | 65 2d 64 65 70 74 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 76 65 72 | e-depth)...................(over |
| 2760 | 6c 61 79 2d 67 65 74 20 6f 74 68 65 72 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 64 65 70 | lay-get.other.'dired-subtree-dep |
| 2780 | 74 68 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 | th))................(dired-subtr |
| 27a0 | 65 65 2d 2d 67 65 74 2d 61 6c 6c 2d 6f 76 73 2d 61 74 2d 70 6f 69 6e 74 20 70 29 29 29 29 0a 0a | ee--get-all-ovs-at-point.p)))).. |
| 27c0 | 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 67 65 74 2d 64 65 70 74 68 20 | (defun.dired-subtree--get-depth. |
| 27e0 | 28 6f 76 29 0a 20 20 22 47 65 74 20 73 75 62 74 72 65 65 20 64 65 70 74 68 2e 22 0a 20 20 28 6f | (ov)..."Get.subtree.depth."...(o |
| 2800 | 72 20 28 61 6e 64 20 6f 76 20 28 6f 76 65 72 6c 61 79 2d 67 65 74 20 6f 76 20 27 64 69 72 65 64 | r.(and.ov.(overlay-get.ov.'dired |
| 2820 | 2d 73 75 62 74 72 65 65 2d 64 65 70 74 68 29 29 20 30 29 29 0a 0a 0a 0c 0a 3b 3b 3b 20 68 65 6c | -subtree-depth)).0)).....;;;.hel |
| 2840 | 70 65 72 73 0a 28 64 65 66 76 61 72 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 70 72 65 73 65 | pers.(defvar.dired-subtree-prese |
| 2860 | 72 76 65 2d 70 72 6f 70 65 72 74 69 65 73 20 27 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 66 | rve-properties.'(dired-subtree-f |
| 2880 | 69 6c 74 65 72 29 0a 20 20 22 50 72 6f 70 65 72 74 69 65 73 20 74 68 61 74 20 73 68 6f 75 6c 64 | ilter)..."Properties.that.should |
| 28a0 | 20 62 65 20 70 72 65 73 65 72 76 65 64 20 62 65 74 77 65 65 6e 20 72 65 61 64 2d 69 6e 73 2e 22 | .be.preserved.between.read-ins." |
| 28c0 | 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 61 66 74 65 72 2d 72 | )..(defun.dired-subtree--after-r |
| 28e0 | 65 61 64 69 6e 20 28 26 6f 70 74 69 6f 6e 61 6c 20 73 75 62 74 72 65 65 73 29 0a 20 20 22 49 6e | eadin.(&optional.subtrees)..."In |
| 2900 | 73 65 72 74 20 74 68 65 20 53 55 42 54 52 45 45 53 20 61 67 61 69 6e 20 61 66 74 65 72 20 64 69 | sert.the.SUBTREES.again.after.di |
| 2920 | 72 65 64 20 62 75 66 66 65 72 20 68 61 73 20 62 65 65 6e 20 72 65 76 65 72 74 65 64 2e 0a 0a 49 | red.buffer.has.been.reverted...I |
| 2940 | 66 20 6e 6f 20 53 55 42 54 52 45 45 53 20 61 72 65 20 73 70 65 63 69 66 69 65 64 2c 20 75 73 65 | f.no.SUBTREES.are.specified,.use |
| 2960 | 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6f 76 65 72 6c 61 79 73 27 2e 22 0a 20 20 28 2d | .`dired-subtree-overlays'."...(- |
| 2980 | 77 68 65 6e 2d 6c 65 74 20 28 73 75 62 74 72 65 65 73 2d 74 6f 2d 70 72 6f 63 65 73 73 20 28 6f | when-let.(subtrees-to-process.(o |
| 29a0 | 72 20 73 75 62 74 72 65 65 73 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6f 76 65 72 6c 61 79 | r.subtrees.dired-subtree-overlay |
| 29c0 | 73 29 29 0a 20 20 20 20 28 6c 65 74 2a 20 28 28 6f 76 73 2d 62 79 2d 64 65 70 74 68 20 28 2d 2d | s)).....(let*.((ovs-by-depth.(-- |
| 29e0 | 73 6f 72 74 20 28 3c 20 28 63 61 72 20 69 74 29 20 28 63 61 72 20 6f 74 68 65 72 29 29 0a 20 20 | sort.(<.(car.it).(car.other))... |
| 2a00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | ...............................( |
| 2a20 | 2d 2d 67 72 6f 75 70 2d 62 79 20 28 6f 76 65 72 6c 61 79 2d 67 65 74 20 69 74 20 27 64 69 72 65 | --group-by.(overlay-get.it.'dire |
| 2a40 | 64 2d 73 75 62 74 72 65 65 2d 64 65 70 74 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | d-subtree-depth)................ |
| 2a60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 75 | ..............................su |
| 2a80 | 62 74 72 65 65 73 2d 74 6f 2d 70 72 6f 63 65 73 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | btrees-to-process)))............ |
| 2aa0 | 28 73 6f 72 74 65 64 2d 6f 76 73 20 28 2d 2d 6d 61 70 20 28 63 6f 6e 73 20 28 63 61 72 20 69 74 | (sorted-ovs.(--map.(cons.(car.it |
| 2ac0 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | )............................... |
| 2ae0 | 20 20 20 20 20 20 28 2d 2d 6d 61 70 20 28 2d 63 6f 6e 73 2a 20 69 74 0a 20 20 20 20 20 20 20 20 | ......(--map.(-cons*.it......... |
| 2b00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 2b20 | 20 20 20 20 20 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 67 65 74 20 69 74 20 27 64 69 72 65 | ...........(overlay-get.it.'dire |
| 2b40 | 64 2d 73 75 62 74 72 65 65 2d 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | d-subtree-name)................. |
| 2b60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 2b80 | 20 20 20 28 2d 6d 61 70 20 28 6c 61 6d 62 64 61 20 28 78 29 20 28 63 6f 6e 73 20 78 20 28 6f 76 | ...(-map.(lambda.(x).(cons.x.(ov |
| 2ba0 | 65 72 6c 61 79 2d 67 65 74 20 69 74 20 78 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | erlay-get.it.x)))............... |
| 2bc0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 2be0 | 20 20 20 20 20 20 20 20 20 20 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 70 72 65 73 65 72 76 | ...........dired-subtree-preserv |
| 2c00 | 65 2d 70 72 6f 70 65 72 74 69 65 73 29 29 20 28 63 64 72 20 69 74 29 29 29 0a 20 20 20 20 20 20 | e-properties)).(cdr.it)))....... |
| 2c20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6f 76 73 2d 62 79 2d 64 | ........................ovs-by-d |
| 2c40 | 65 70 74 68 29 29 29 0a 20 20 20 20 20 20 3b 3b 20 28 64 65 70 74 68 20 28 70 61 74 68 31 20 6f | epth))).......;;.(depth.(path1.o |
| 2c60 | 76 31 20 28 70 72 6f 70 31 20 2e 20 76 61 6c 75 65 31 29 20 28 70 72 6f 70 32 20 2e 20 76 61 6c | v1.(prop1...value1).(prop2...val |
| 2c80 | 75 65 32 29 29 20 28 70 61 74 68 32 20 2e 2e 2e 29 29 0a 20 20 20 20 20 20 28 2d 2d 65 61 63 68 | ue2)).(path2....)).......(--each |
| 2ca0 | 20 73 6f 72 74 65 64 2d 6f 76 73 0a 20 20 20 20 20 20 20 20 28 2d 2d 65 61 63 68 20 28 63 64 72 | .sorted-ovs.........(--each.(cdr |
| 2cc0 | 20 69 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 64 69 72 65 64 2d 75 74 69 6c | .it)...........(when.(dired-util |
| 2ce0 | 73 2d 67 6f 74 6f 2d 6c 69 6e 65 20 28 63 61 64 72 20 69 74 29 29 0a 20 20 20 20 20 20 20 20 20 | s-goto-line.(cadr.it)).......... |
| 2d00 | 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 72 65 6d 6f 76 65 2d 6f 76 65 72 6c 61 | ...(dired-subtree--remove-overla |
| 2d20 | 79 20 28 63 61 72 20 69 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 | y.(car.it)).............(dired-s |
| 2d40 | 75 62 74 72 65 65 2d 69 6e 73 65 72 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 | ubtree-insert).............(let. |
| 2d60 | 28 28 6f 76 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 67 65 74 2d 6f 76 29 29 29 0a 20 | ((ov.(dired-subtree--get-ov))).. |
| 2d80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2d 2d 65 61 63 68 20 28 63 64 64 72 20 69 74 29 0a 20 | .............(--each.(cddr.it).. |
| 2da0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 76 20 28 | ...............(overlay-put.ov.( |
| 2dc0 | 63 61 72 20 69 74 29 20 28 63 64 72 20 69 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | car.it).(cdr.it))).............. |
| 2de0 | 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 66 69 6c 74 65 72 2d 73 75 62 74 72 65 65 20 | .(dired-subtree--filter-subtree. |
| 2e00 | 6f 76 29 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 | ov))))))))..(defun.dired-subtree |
| 2e20 | 2d 2d 61 66 74 65 72 2d 69 6e 73 65 72 74 20 28 29 0a 20 20 22 41 66 74 65 72 20 69 6e 73 65 72 | --after-insert.()..."After.inser |
| 2e40 | 74 69 6e 67 20 74 68 65 20 73 75 62 74 72 65 65 2c 20 73 65 74 75 70 20 64 69 72 65 64 2d 64 65 | ting.the.subtree,.setup.dired-de |
| 2e60 | 74 61 69 6c 73 2f 64 69 72 65 64 2d 68 69 64 65 2d 64 65 74 61 69 6c 73 2d 6d 6f 64 65 2e 22 0a | tails/dired-hide-details-mode.". |
| 2e80 | 20 20 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 64 69 72 65 64 2d 69 6e 73 65 72 74 2d 73 65 74 | ..(if.(fboundp.'dired-insert-set |
| 2ea0 | 2d 70 72 6f 70 65 72 74 69 65 73 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 69 6e 68 69 62 69 | -properties).......(let.((inhibi |
| 2ec0 | 74 2d 72 65 61 64 2d 6f 6e 6c 79 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 76 20 28 | t-read-only.t).............(ov.( |
| 2ee0 | 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 67 65 74 2d 6f 76 29 29 29 0a 20 20 20 20 20 20 20 | dired-subtree--get-ov)))........ |
| 2f00 | 20 28 64 69 72 65 64 2d 69 6e 73 65 72 74 2d 73 65 74 2d 70 72 6f 70 65 72 74 69 65 73 20 28 6f | .(dired-insert-set-properties.(o |
| 2f20 | 76 65 72 6c 61 79 2d 73 74 61 72 74 20 6f 76 29 20 28 6f 76 65 72 6c 61 79 2d 65 6e 64 20 6f 76 | verlay-start.ov).(overlay-end.ov |
| 2f40 | 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 66 65 61 74 75 72 65 70 20 27 64 69 72 65 64 2d 64 | ))).....(when.(featurep.'dired-d |
| 2f60 | 65 74 61 69 6c 73 29 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 64 65 74 61 69 6c 73 2d 64 65 6c | etails).......(dired-details-del |
| 2f80 | 65 74 65 2d 6f 76 65 72 6c 61 79 73 29 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 64 65 74 61 69 | ete-overlays).......(dired-detai |
| 2fa0 | 6c 73 2d 61 63 74 69 76 61 74 65 29 29 29 29 0a 0a 28 61 64 64 2d 68 6f 6f 6b 20 27 64 69 72 65 | ls-activate))))..(add-hook.'dire |
| 2fc0 | 64 2d 61 66 74 65 72 2d 72 65 61 64 69 6e 2d 68 6f 6f 6b 20 27 64 69 72 65 64 2d 73 75 62 74 72 | d-after-readin-hook.'dired-subtr |
| 2fe0 | 65 65 2d 2d 61 66 74 65 72 2d 72 65 61 64 69 6e 29 0a 0a 28 61 64 64 2d 68 6f 6f 6b 20 27 64 69 | ee--after-readin)..(add-hook.'di |
| 3000 | 72 65 64 2d 73 75 62 74 72 65 65 2d 61 66 74 65 72 2d 69 6e 73 65 72 74 2d 68 6f 6f 6b 20 27 64 | red-subtree-after-insert-hook.'d |
| 3020 | 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 61 66 74 65 72 2d 69 6e 73 65 72 74 29 0a 0a 28 64 65 | ired-subtree--after-insert)..(de |
| 3040 | 66 75 6e 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 75 6e 6d 61 72 6b 20 28 29 0a 20 20 22 | fun.dired-subtree--unmark.()..." |
| 3060 | 55 6e 6d 61 72 6b 20 61 20 66 69 6c 65 20 77 69 74 68 6f 75 74 20 6d 6f 76 69 6e 67 20 70 6f 69 | Unmark.a.file.without.moving.poi |
| 3080 | 6e 74 2e 22 0a 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 20 28 64 69 72 65 64 2d 75 6e | nt."...(save-excursion.(dired-un |
| 30a0 | 6d 61 72 6b 20 31 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d | mark.1)))..(defun.dired-subtree- |
| 30c0 | 2d 64 69 72 65 64 2d 6c 69 6e 65 2d 69 73 2d 64 69 72 65 63 74 6f 72 79 2d 6f 72 2d 6c 69 6e 6b | -dired-line-is-directory-or-link |
| 30e0 | 2d 70 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 6e 6f 6e 2d 6e 69 6c 20 69 66 20 6c 69 6e 65 20 | -p.()..."Return.non-nil.if.line. |
| 3100 | 75 6e 64 65 72 20 70 6f 69 6e 74 20 69 73 20 61 20 64 69 72 65 63 74 6f 72 79 20 6f 72 20 73 79 | under.point.is.a.directory.or.sy |
| 3120 | 6d 6c 69 6e 6b 2e 22 0a 20 20 3b 3b 20 57 65 27 76 65 20 72 65 70 6c 61 63 65 64 20 60 66 69 6c | mlink."...;;.We've.replaced.`fil |
| 3140 | 65 2d 64 69 72 65 63 74 6f 72 79 2d 70 27 20 77 69 74 68 20 74 68 65 20 72 65 67 65 78 70 20 74 | e-directory-p'.with.the.regexp.t |
| 3160 | 65 73 74 20 74 6f 0a 20 20 3b 3b 20 73 70 65 65 64 20 75 70 20 66 69 6c 74 65 72 73 20 6f 76 65 | est.to...;;.speed.up.filters.ove |
| 3180 | 72 20 54 52 41 4d 50 2e 20 20 53 6f 20 6c 6f 6e 67 20 61 73 20 64 69 72 65 64 2f 6c 73 20 66 6f | r.TRAMP...So.long.as.dired/ls.fo |
| 31a0 | 72 6d 61 74 0a 20 20 3b 3b 20 64 6f 65 73 6e 27 74 20 63 68 61 6e 67 65 2c 20 77 65 27 72 65 20 | rmat...;;.doesn't.change,.we're. |
| 31c0 | 67 6f 6f 64 2e 0a 20 20 3b 3b 20 27 64 27 20 66 6f 72 20 64 69 72 65 63 74 6f 72 69 65 73 2c 20 | good....;;.'d'.for.directories,. |
| 31e0 | 27 6c 27 20 66 6f 72 20 70 6f 74 65 6e 74 69 61 6c 20 73 79 6d 6c 69 6e 6b 73 20 74 6f 20 64 69 | 'l'.for.potential.symlinks.to.di |
| 3200 | 72 65 63 74 6f 72 69 65 73 2e 0a 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 20 28 62 65 | rectories....(save-excursion.(be |
| 3220 | 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 29 20 28 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 2e 2e | ginning-of-line).(looking-at.".. |
| 3240 | 5b 64 6c 5d 22 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d | [dl]")))..(defun.dired-subtree-- |
| 3260 | 69 73 2d 65 78 70 61 6e 64 65 64 2d 70 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 6e 6f 6e 2d 6e | is-expanded-p.()..."Return.non-n |
| 3280 | 69 6c 20 69 66 20 64 69 72 65 63 74 6f 72 79 20 75 6e 64 65 72 20 70 6f 69 6e 74 20 69 73 20 65 | il.if.directory.under.point.is.e |
| 32a0 | 78 70 61 6e 64 65 64 2e 22 0a 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 | xpanded."...(save-excursion..... |
| 32c0 | 28 77 68 65 6e 20 28 64 69 72 65 64 2d 75 74 69 6c 73 2d 67 65 74 2d 66 69 6c 65 6e 61 6d 65 29 | (when.(dired-utils-get-filename) |
| 32e0 | 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 64 65 70 74 68 20 28 64 69 72 65 64 2d 73 75 62 74 72 | .......(let.((depth.(dired-subtr |
| 3300 | 65 65 2d 2d 67 65 74 2d 64 65 70 74 68 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 67 65 | ee--get-depth.(dired-subtree--ge |
| 3320 | 74 2d 6f 76 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 6e 65 78 74 2d 6c 69 6e | t-ov)))).........(dired-next-lin |
| 3340 | 65 20 31 29 0a 20 20 20 20 20 20 20 20 28 3c 20 64 65 70 74 68 20 28 64 69 72 65 64 2d 73 75 62 | e.1).........(<.depth.(dired-sub |
| 3360 | 74 72 65 65 2d 2d 67 65 74 2d 64 65 70 74 68 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d | tree--get-depth.(dired-subtree-- |
| 3380 | 67 65 74 2d 6f 76 29 29 29 29 29 29 29 0a 0a 28 64 65 66 6d 61 63 72 6f 20 64 69 72 65 64 2d 73 | get-ov)))))))..(defmacro.dired-s |
| 33a0 | 75 62 74 72 65 65 2d 77 69 74 68 2d 73 75 62 74 72 65 65 20 28 26 72 65 73 74 20 66 6f 72 6d 73 | ubtree-with-subtree.(&rest.forms |
| 33c0 | 29 0a 20 20 22 52 75 6e 20 46 4f 52 4d 53 20 6f 6e 20 65 61 63 68 20 66 69 6c 65 20 69 6e 20 74 | )..."Run.FORMS.on.each.file.in.t |
| 33e0 | 68 69 73 20 73 75 62 74 72 65 65 2e 22 0a 20 20 28 64 65 63 6c 61 72 65 20 28 64 65 62 75 67 20 | his.subtree."...(declare.(debug. |
| 3400 | 28 62 6f 64 79 29 29 29 0a 20 20 60 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 | (body)))...`(save-excursion..... |
| 3420 | 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 62 65 67 69 6e 6e 69 6e 67 29 0a 20 20 20 20 20 | .(dired-subtree-beginning)...... |
| 3440 | 2c 40 66 6f 72 6d 73 0a 20 20 20 20 20 28 77 68 69 6c 65 20 28 64 69 72 65 64 2d 73 75 62 74 72 | ,@forms......(while.(dired-subtr |
| 3460 | 65 65 2d 6e 65 78 74 2d 73 69 62 6c 69 6e 67 29 0a 20 20 20 20 20 20 20 2c 40 66 6f 72 6d 73 29 | ee-next-sibling)........,@forms) |
| 3480 | 29 29 0a 0a 0c 0a 3b 3b 3b 3b 20 49 6e 74 65 72 61 63 74 69 76 65 0a 0a 3b 3b 3b 23 23 23 61 75 | ))....;;;;.Interactive..;;;###au |
| 34a0 | 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6e 61 72 72 | toload.(defun.dired-subtree-narr |
| 34c0 | 6f 77 20 28 29 0a 20 20 22 4e 61 72 72 6f 77 20 74 68 65 20 62 75 66 66 65 72 20 74 6f 20 74 68 | ow.()..."Narrow.the.buffer.to.th |
| 34e0 | 69 73 20 73 75 62 74 72 65 65 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 | is.subtree."...(interactive)...( |
| 3500 | 2d 77 68 65 6e 2d 6c 65 74 20 28 6f 76 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 67 65 | -when-let.(ov.(dired-subtree--ge |
| 3520 | 74 2d 6f 76 29 29 0a 20 20 20 20 28 6e 61 72 72 6f 77 2d 74 6f 2d 72 65 67 69 6f 6e 20 28 6f 76 | t-ov)).....(narrow-to-region.(ov |
| 3540 | 65 72 6c 61 79 2d 73 74 61 72 74 20 6f 76 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | erlay-start.ov)................. |
| 3560 | 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 65 6e 64 20 6f 76 29 29 29 29 0a 0a 3b 3b 3b 20 4e | ......(overlay-end.ov))))..;;;.N |
| 3580 | 61 76 69 67 61 74 69 6f 6e 0a 0a 3b 3b 20 6d 61 6b 65 20 74 68 65 20 61 72 67 75 6d 65 6e 74 73 | avigation..;;.make.the.arguments |
| 35a0 | 20 61 63 74 75 61 6c 6c 79 20 64 6f 20 73 6f 6d 65 74 68 69 6e 67 0a 3b 3b 3b 23 23 23 61 75 74 | .actually.do.something.;;;###aut |
| 35c0 | 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 75 70 20 28 26 | oload.(defun.dired-subtree-up.(& |
| 35e0 | 6f 70 74 69 6f 6e 61 6c 20 61 72 67 29 0a 20 20 22 4a 75 6d 70 20 75 70 20 6f 6e 65 20 64 69 72 | optional.arg)..."Jump.up.one.dir |
| 3600 | 65 63 74 6f 72 79 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 70 22 29 0a 20 20 28 | ectory."...(interactive."p")...( |
| 3620 | 2d 77 68 65 6e 2d 6c 65 74 20 28 6f 76 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 67 65 | -when-let.(ov.(dired-subtree--ge |
| 3640 | 74 2d 6f 76 29 29 0a 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 6f 76 65 72 6c 61 79 2d 73 | t-ov)).....(goto-char.(overlay-s |
| 3660 | 74 61 72 74 20 6f 76 29 29 0a 20 20 20 20 28 64 69 72 65 64 2d 70 72 65 76 69 6f 75 73 2d 6c 69 | tart.ov)).....(dired-previous-li |
| 3680 | 6e 65 20 31 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 | ne.1)))..;;;###autoload.(defun.d |
| 36a0 | 69 72 65 64 2d 73 75 62 74 72 65 65 2d 64 6f 77 6e 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 | ired-subtree-down.(&optional.arg |
| 36c0 | 29 0a 20 20 22 4a 75 6d 70 20 64 6f 77 6e 20 6f 6e 65 20 64 69 72 65 63 74 6f 72 79 2e 22 0a 20 | )..."Jump.down.one.directory.".. |
| 36e0 | 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 70 22 29 0a 20 20 28 2d 77 68 65 6e 2d 6c 65 74 2a | .(interactive."p")...(-when-let* |
| 3700 | 20 28 28 70 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 76 | .((p.(point))................(ov |
| 3720 | 20 28 63 61 72 20 28 2d 2d 73 6f 72 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .(car.(--sort................... |
| 3740 | 20 20 20 20 20 20 20 28 3c 20 28 6f 76 65 72 6c 61 79 2d 73 74 61 72 74 20 69 74 29 0a 20 20 20 | .......(<.(overlay-start.it).... |
| 3760 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 76 65 72 6c 61 | .........................(overla |
| 3780 | 79 2d 73 74 61 72 74 20 6f 74 68 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | y-start.other))................. |
| 37a0 | 20 20 20 20 20 20 20 20 20 28 2d 2d 72 65 6d 6f 76 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | .........(--remove.............. |
| 37c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3c 20 28 6f 76 65 72 6c 61 79 2d 73 74 61 72 74 20 69 | .............(<.(overlay-start.i |
| 37e0 | 74 29 20 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | t).p)........................... |
| 3800 | 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 67 65 74 2d 61 6c 6c 2d 6f 76 73 29 29 29 29 29 | (dired-subtree--get-all-ovs))))) |
| 3820 | 29 0a 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 6f 76 65 72 6c 61 79 2d 73 74 61 72 74 20 | ).....(goto-char.(overlay-start. |
| 3840 | 6f 76 29 29 0a 20 20 20 20 28 64 69 72 65 64 2d 6d 6f 76 65 2d 74 6f 2d 66 69 6c 65 6e 61 6d 65 | ov)).....(dired-move-to-filename |
| 3860 | 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 65 64 | )))..;;;###autoload.(defun.dired |
| 3880 | 2d 73 75 62 74 72 65 65 2d 6e 65 78 74 2d 73 69 62 6c 69 6e 67 20 28 26 6f 70 74 69 6f 6e 61 6c | -subtree-next-sibling.(&optional |
| 38a0 | 20 61 72 67 29 0a 20 20 22 47 6f 20 74 6f 20 74 68 65 20 6e 65 78 74 20 73 69 62 6c 69 6e 67 2e | .arg)..."Go.to.the.next.sibling. |
| 38c0 | 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 70 22 29 0a 20 20 28 6c 65 74 20 28 28 63 | "...(interactive."p")...(let.((c |
| 38e0 | 75 72 72 65 6e 74 2d 6f 76 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 67 65 74 2d 6f 76 | urrent-ov.(dired-subtree--get-ov |
| 3900 | 29 29 29 0a 20 20 20 20 28 64 69 72 65 64 2d 6e 65 78 74 2d 6c 69 6e 65 20 31 29 0a 20 20 20 20 | ))).....(dired-next-line.1)..... |
| 3920 | 28 6c 65 74 20 28 28 6e 65 77 2d 6f 76 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 67 65 | (let.((new-ov.(dired-subtree--ge |
| 3940 | 74 2d 6f 76 29 29 29 0a 20 20 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 20 20 28 28 6e 6f 74 | t-ov))).......(cond........((not |
| 3960 | 20 28 64 69 72 65 64 2d 75 74 69 6c 73 2d 69 73 2d 66 69 6c 65 2d 70 29 29 0a 20 20 20 20 20 20 | .(dired-utils-is-file-p))....... |
| 3980 | 20 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 28 28 3c 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 | ..nil)........((<.(dired-subtree |
| 39a0 | 2d 2d 67 65 74 2d 64 65 70 74 68 20 63 75 72 72 65 6e 74 2d 6f 76 29 0a 20 20 20 20 20 20 20 20 | --get-depth.current-ov)......... |
| 39c0 | 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 67 65 74 2d 64 65 70 74 68 20 6e 65 77 | ...(dired-subtree--get-depth.new |
| 39e0 | 2d 6f 76 29 29 0a 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 6f 76 65 72 6c 61 | -ov)).........(goto-char.(overla |
| 3a00 | 79 2d 65 6e 64 20 6e 65 77 2d 6f 76 29 29 0a 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 6d 6f | y-end.new-ov)).........(dired-mo |
| 3a20 | 76 65 2d 74 6f 2d 66 69 6c 65 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 74 29 0a 20 20 20 20 20 | ve-to-filename).........t)...... |
| 3a40 | 20 20 28 28 3e 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 67 65 74 2d 64 65 70 74 68 20 | ..((>.(dired-subtree--get-depth. |
| 3a60 | 63 75 72 72 65 6e 74 2d 6f 76 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 | current-ov)............(dired-su |
| 3a80 | 62 74 72 65 65 2d 2d 67 65 74 2d 64 65 70 74 68 20 6e 65 77 2d 6f 76 29 29 0a 20 20 20 20 20 20 | btree--get-depth.new-ov))....... |
| 3aa0 | 20 20 3b 3b 20 61 64 64 20 6f 70 74 69 6f 6e 20 74 6f 20 65 69 74 68 65 72 20 67 6f 20 74 6f 20 | ..;;.add.option.to.either.go.to. |
| 3ac0 | 74 6f 70 20 6f 72 20 73 74 61 79 20 61 74 20 74 68 65 20 65 6e 64 0a 20 20 20 20 20 20 20 20 28 | top.or.stay.at.the.end.........( |
| 3ae0 | 64 69 72 65 64 2d 70 72 65 76 69 6f 75 73 2d 6c 69 6e 65 20 31 29 0a 20 20 20 20 20 20 20 20 6e | dired-previous-line.1).........n |
| 3b00 | 69 6c 29 0a 20 20 20 20 20 20 20 28 74 20 74 29 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f | il)........(t.t)))))..;;;###auto |
| 3b20 | 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 70 72 65 76 69 6f | load.(defun.dired-subtree-previo |
| 3b40 | 75 73 2d 73 69 62 6c 69 6e 67 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 29 0a 20 20 22 47 6f | us-sibling.(&optional.arg)..."Go |
| 3b60 | 20 74 6f 20 74 68 65 20 70 72 65 76 69 6f 75 73 20 73 69 62 6c 69 6e 67 2e 22 0a 20 20 28 69 6e | .to.the.previous.sibling."...(in |
| 3b80 | 74 65 72 61 63 74 69 76 65 20 22 70 22 29 0a 20 20 28 6c 65 74 20 28 28 63 75 72 72 65 6e 74 2d | teractive."p")...(let.((current- |
| 3ba0 | 6f 76 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 67 65 74 2d 6f 76 29 29 29 0a 20 20 20 | ov.(dired-subtree--get-ov))).... |
| 3bc0 | 20 28 64 69 72 65 64 2d 70 72 65 76 69 6f 75 73 2d 6c 69 6e 65 20 31 29 0a 20 20 20 20 28 6c 65 | .(dired-previous-line.1).....(le |
| 3be0 | 74 20 28 28 6e 65 77 2d 6f 76 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 67 65 74 2d 6f | t.((new-ov.(dired-subtree--get-o |
| 3c00 | 76 29 29 29 0a 20 20 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 20 20 3b 3b 20 74 68 69 73 20 | v))).......(cond........;;.this. |
| 3c20 | 77 69 6c 6c 20 6e 65 65 64 20 62 65 74 74 65 72 20 68 61 6e 64 6c 69 67 6e 20 69 66 20 77 65 20 | will.need.better.handlign.if.we. |
| 3c40 | 68 61 76 65 20 69 6e 73 65 72 74 65 64 0a 20 20 20 20 20 20 20 3b 3b 20 73 75 62 64 69 72 65 63 | have.inserted........;;.subdirec |
| 3c60 | 74 6f 72 69 65 73 0a 20 20 20 20 20 20 20 28 28 6e 6f 74 20 28 64 69 72 65 64 2d 75 74 69 6c 73 | tories........((not.(dired-utils |
| 3c80 | 2d 69 73 2d 66 69 6c 65 2d 70 29 29 0a 20 20 20 20 20 20 20 20 6e 69 6c 29 0a 20 20 20 20 20 20 | -is-file-p)).........nil)....... |
| 3ca0 | 20 28 28 3c 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 67 65 74 2d 64 65 70 74 68 20 63 | .((<.(dired-subtree--get-depth.c |
| 3cc0 | 75 72 72 65 6e 74 2d 6f 76 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 | urrent-ov)............(dired-sub |
| 3ce0 | 74 72 65 65 2d 2d 67 65 74 2d 64 65 70 74 68 20 6e 65 77 2d 6f 76 29 29 0a 20 20 20 20 20 20 20 | tree--get-depth.new-ov))........ |
| 3d00 | 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 6f 76 65 72 6c 61 79 2d 73 74 61 72 74 20 6e 65 77 2d 6f | .(goto-char.(overlay-start.new-o |
| 3d20 | 76 29 29 0a 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 70 72 65 76 69 6f 75 73 2d 6c 69 6e 65 | v)).........(dired-previous-line |
| 3d40 | 20 31 29 0a 20 20 20 20 20 20 20 20 74 29 0a 20 20 20 20 20 20 20 28 28 3e 20 28 64 69 72 65 64 | .1).........t)........((>.(dired |
| 3d60 | 2d 73 75 62 74 72 65 65 2d 2d 67 65 74 2d 64 65 70 74 68 20 63 75 72 72 65 6e 74 2d 6f 76 29 0a | -subtree--get-depth.current-ov). |
| 3d80 | 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 67 65 74 2d 64 | ...........(dired-subtree--get-d |
| 3da0 | 65 70 74 68 20 6e 65 77 2d 6f 76 29 29 0a 20 20 20 20 20 20 20 20 3b 3b 20 61 64 64 20 6f 70 74 | epth.new-ov)).........;;.add.opt |
| 3dc0 | 69 6f 6e 20 74 6f 20 65 69 74 68 65 72 20 67 6f 20 74 6f 20 74 6f 70 20 6f 72 20 73 74 61 79 20 | ion.to.either.go.to.top.or.stay. |
| 3de0 | 61 74 20 74 68 65 20 65 6e 64 0a 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 6e 65 78 74 2d 6c | at.the.end.........(dired-next-l |
| 3e00 | 69 6e 65 20 31 29 0a 20 20 20 20 20 20 20 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 28 74 20 74 29 | ine.1).........nil)........(t.t) |
| 3e20 | 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 65 | ))))..;;;###autoload.(defun.dire |
| 3e40 | 64 2d 73 75 62 74 72 65 65 2d 62 65 67 69 6e 6e 69 6e 67 20 28 29 0a 20 20 22 47 6f 20 74 6f 20 | d-subtree-beginning.()..."Go.to. |
| 3e60 | 74 68 65 20 66 69 72 73 74 20 66 69 6c 65 20 69 6e 20 74 68 69 73 20 73 75 62 74 72 65 65 2e 22 | the.first.file.in.this.subtree." |
| 3e80 | 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 20 28 28 6f 76 20 28 64 69 | ...(interactive)...(let.((ov.(di |
| 3ea0 | 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 67 65 74 2d 6f 76 29 29 29 0a 20 20 20 20 28 69 66 20 28 | red-subtree--get-ov))).....(if.( |
| 3ec0 | 6e 6f 74 20 6f 76 29 0a 20 20 20 20 20 20 20 20 3b 3b 20 64 6f 20 73 6f 6d 65 74 68 69 6e 67 20 | not.ov).........;;.do.something. |
| 3ee0 | 77 68 65 6e 20 6e 6f 74 20 69 6e 20 73 75 62 74 72 65 65 0a 20 20 20 20 20 20 20 20 74 0a 20 20 | when.not.in.subtree.........t... |
| 3f00 | 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 6f 76 65 72 6c 61 79 2d 73 74 61 72 74 20 6f 76 | ....(goto-char.(overlay-start.ov |
| 3f20 | 29 29 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 6d 6f 76 65 2d 74 6f 2d 66 69 6c 65 6e 61 6d 65 | )).......(dired-move-to-filename |
| 3f40 | 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 65 | ))))..;;;###autoload.(defun.dire |
| 3f60 | 64 2d 73 75 62 74 72 65 65 2d 65 6e 64 20 28 29 0a 20 20 22 47 6f 20 74 6f 20 74 68 65 20 66 69 | d-subtree-end.()..."Go.to.the.fi |
| 3f80 | 72 73 74 20 66 69 6c 65 20 69 6e 20 74 68 69 73 20 73 75 62 74 72 65 65 2e 22 0a 20 20 28 69 6e | rst.file.in.this.subtree."...(in |
| 3fa0 | 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 20 28 28 6f 76 20 28 64 69 72 65 64 2d 73 75 | teractive)...(let.((ov.(dired-su |
| 3fc0 | 62 74 72 65 65 2d 2d 67 65 74 2d 6f 76 29 29 29 0a 20 20 20 20 28 69 66 20 28 6e 6f 74 20 6f 76 | btree--get-ov))).....(if.(not.ov |
| 3fe0 | 29 0a 20 20 20 20 20 20 20 20 3b 3b 20 64 6f 20 73 6f 6d 65 74 68 69 6e 67 20 77 68 65 6e 20 6e | ).........;;.do.something.when.n |
| 4000 | 6f 74 20 69 6e 20 73 75 62 74 72 65 65 0a 20 20 20 20 20 20 20 20 74 0a 20 20 20 20 20 20 28 67 | ot.in.subtree.........t.......(g |
| 4020 | 6f 74 6f 2d 63 68 61 72 20 28 6f 76 65 72 6c 61 79 2d 65 6e 64 20 6f 76 29 29 0a 20 20 20 20 20 | oto-char.(overlay-end.ov))...... |
| 4040 | 20 28 64 69 72 65 64 2d 70 72 65 76 69 6f 75 73 2d 6c 69 6e 65 20 31 29 29 29 29 0a 0a 3b 3b 3b | .(dired-previous-line.1))))..;;; |
| 4060 | 20 4d 61 72 6b 69 6e 67 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 | .Marking..;;;###autoload.(defun. |
| 4080 | 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6d 61 72 6b 2d 73 75 62 74 72 65 65 20 28 26 6f 70 74 | dired-subtree-mark-subtree.(&opt |
| 40a0 | 69 6f 6e 61 6c 20 61 6c 6c 29 0a 20 20 22 4d 61 72 6b 20 61 6c 6c 20 66 69 6c 65 73 20 69 6e 20 | ional.all)..."Mark.all.files.in. |
| 40c0 | 74 68 69 73 20 73 75 62 74 72 65 65 2e 0a 0a 57 69 74 68 20 70 72 65 66 69 78 20 61 72 67 75 6d | this.subtree...With.prefix.argum |
| 40e0 | 65 6e 74 20 6d 61 72 6b 20 61 6c 6c 20 74 68 65 20 66 69 6c 65 73 20 69 6e 20 73 75 62 64 69 72 | ent.mark.all.the.files.in.subdir |
| 4100 | 65 63 74 6f 72 69 65 73 0a 72 65 63 75 72 73 69 76 65 6c 79 2e 22 0a 20 20 28 69 6e 74 65 72 61 | ectories.recursively."...(intera |
| 4120 | 63 74 69 76 65 20 22 50 22 29 0a 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 | ctive."P")...(save-excursion.... |
| 4140 | 20 28 69 66 20 61 6c 6c 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 62 65 67 20 28 73 61 76 | .(if.all.........(let.((beg.(sav |
| 4160 | 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | e-excursion..................... |
| 4180 | 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 62 65 67 69 6e 6e 69 6e 67 29 0a 20 20 20 20 20 | .(dired-subtree-beginning)...... |
| 41a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 20 20 | ................(point)))....... |
| 41c0 | 20 20 20 20 20 20 20 20 28 65 6e 64 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 | ........(end.(save-excursion.... |
| 41e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 | ..................(dired-subtree |
| 4200 | 2d 65 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6f 69 6e | -end)......................(poin |
| 4220 | 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 6d 61 72 6b 2d 66 69 6c 65 | t))))...........(dired-mark-file |
| 4240 | 73 2d 69 6e 2d 72 65 67 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 20 28 67 | s-in-region............(progn.(g |
| 4260 | 6f 74 6f 2d 63 68 61 72 20 62 65 67 29 20 28 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f | oto-char.beg).(line-beginning-po |
| 4280 | 73 69 74 69 6f 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 20 28 67 6f 74 6f | sition))............(progn.(goto |
| 42a0 | 2d 63 68 61 72 20 65 6e 64 29 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 29 29 29 | -char.end).(line-end-position))) |
| 42c0 | 29 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 62 65 67 69 6e 6e 69 6e 67 | ).......(dired-subtree-beginning |
| 42e0 | 29 0a 20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 20 28 64 69 72 65 64 2d 6d | ).......(save-excursion.(dired-m |
| 4300 | 61 72 6b 20 31 29 29 0a 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 64 69 72 65 64 2d 73 75 62 74 | ark.1)).......(while.(dired-subt |
| 4320 | 72 65 65 2d 6e 65 78 74 2d 73 69 62 6c 69 6e 67 29 0a 20 20 20 20 20 20 20 20 28 73 61 76 65 2d | ree-next-sibling).........(save- |
| 4340 | 65 78 63 75 72 73 69 6f 6e 20 28 64 69 72 65 64 2d 6d 61 72 6b 20 31 29 29 29 29 29 29 0a 0a 3b | excursion.(dired-mark.1))))))..; |
| 4360 | 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 75 62 74 72 | ;;###autoload.(defun.dired-subtr |
| 4380 | 65 65 2d 75 6e 6d 61 72 6b 2d 73 75 62 74 72 65 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 6c 6c | ee-unmark-subtree.(&optional.all |
| 43a0 | 29 0a 20 20 22 55 6e 6d 61 72 6b 20 61 6c 6c 20 66 69 6c 65 73 20 69 6e 20 74 68 69 73 20 73 75 | )..."Unmark.all.files.in.this.su |
| 43c0 | 62 74 72 65 65 2e 0a 0a 57 69 74 68 20 70 72 65 66 69 78 20 61 72 67 75 6d 65 6e 74 20 75 6e 6d | btree...With.prefix.argument.unm |
| 43e0 | 61 72 6b 20 61 6c 6c 20 74 68 65 20 66 69 6c 65 73 20 69 6e 20 73 75 62 64 69 72 65 63 74 6f 72 | ark.all.the.files.in.subdirector |
| 4400 | 69 65 73 0a 72 65 63 75 72 73 69 76 65 6c 79 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 | ies.recursively."...(interactive |
| 4420 | 29 0a 20 20 28 6c 65 74 20 28 28 64 69 72 65 64 2d 6d 61 72 6b 65 72 2d 63 68 61 72 20 3f 20 29 | )...(let.((dired-marker-char.?.) |
| 4440 | 29 0a 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6d 61 72 6b 2d 73 75 62 74 72 65 | ).....(dired-subtree-mark-subtre |
| 4460 | 65 20 61 6c 6c 29 29 29 0a 0a 3b 3b 3b 20 49 6e 73 65 72 74 69 6f 6e 2f 64 65 6c 65 74 69 6f 6e | e.all)))..;;;.Insertion/deletion |
| 4480 | 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 75 62 | .;;;###autoload.(defun.dired-sub |
| 44a0 | 74 72 65 65 2d 72 65 76 65 72 74 20 28 29 0a 20 20 22 52 65 76 65 72 74 20 74 68 65 20 73 75 62 | tree-revert.()..."Revert.the.sub |
| 44c0 | 74 72 65 65 2e 0a 0a 54 68 69 73 20 6d 65 61 6e 73 20 72 65 69 6e 73 65 72 74 69 6e 67 20 74 68 | tree...This.means.reinserting.th |
| 44e0 | 65 20 63 6f 6e 74 65 6e 74 20 6f 66 20 74 68 69 73 20 73 75 62 74 72 65 65 20 61 6e 64 20 61 6c | e.content.of.this.subtree.and.al |
| 4500 | 6c 20 69 74 73 0a 63 68 69 6c 64 72 65 6e 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 | l.its.children."...(interactive) |
| 4520 | 0a 20 20 28 6c 65 74 20 28 28 69 6e 68 69 62 69 74 2d 72 65 61 64 2d 6f 6e 6c 79 20 74 29 0a 20 | ...(let.((inhibit-read-only.t).. |
| 4540 | 20 20 20 20 20 20 20 28 66 69 6c 65 2d 6e 61 6d 65 20 28 64 69 72 65 64 2d 75 74 69 6c 73 2d 67 | .......(file-name.(dired-utils-g |
| 4560 | 65 74 2d 66 69 6c 65 6e 61 6d 65 29 29 29 0a 20 20 20 20 28 2d 77 68 65 6e 2d 6c 65 74 2a 20 28 | et-filename))).....(-when-let*.( |
| 4580 | 28 6f 76 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 67 65 74 2d 6f 76 29 29 0a 20 20 20 | (ov.(dired-subtree--get-ov)).... |
| 45a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 76 73 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 | ..............(ovs.(dired-subtre |
| 45c0 | 65 2d 2d 67 65 74 2d 6f 76 73 2d 69 6e 29 29 29 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 | e--get-ovs-in))).......(dired-su |
| 45e0 | 62 74 72 65 65 2d 75 70 29 0a 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 72 65 67 69 6f 6e 20 28 | btree-up).......(delete-region.( |
| 4600 | 6f 76 65 72 6c 61 79 2d 73 74 61 72 74 20 6f 76 29 20 28 6f 76 65 72 6c 61 79 2d 65 6e 64 20 6f | overlay-start.ov).(overlay-end.o |
| 4620 | 76 29 29 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 61 66 74 65 72 2d | v)).......(dired-subtree--after- |
| 4640 | 72 65 61 64 69 6e 20 6f 76 73 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 66 69 6c 65 2d 6e 61 6d | readin.ovs).......(when.file-nam |
| 4660 | 65 0a 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 75 74 69 6c 73 2d 67 6f 74 6f 2d 6c 69 6e 65 | e.........(dired-utils-goto-line |
| 4680 | 20 66 69 6c 65 2d 6e 61 6d 65 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 75 | .file-name)))))..(defun.dired-su |
| 46a0 | 62 74 72 65 65 2d 2d 72 65 61 64 69 6e 20 28 64 69 72 2d 6e 61 6d 65 29 0a 20 20 22 52 65 61 64 | btree--readin.(dir-name)..."Read |
| 46c0 | 20 69 6e 20 74 68 65 20 64 69 72 65 63 74 6f 72 79 2e 0a 0a 52 65 74 75 72 6e 20 61 20 73 74 72 | .in.the.directory...Return.a.str |
| 46e0 | 69 6e 67 20 73 75 69 74 61 62 6c 65 20 66 6f 72 20 69 6e 73 65 72 74 69 6f 6e 20 69 6e 20 60 64 | ing.suitable.for.insertion.in.`d |
| 4700 | 69 72 65 64 27 20 62 75 66 66 65 72 2e 22 0a 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 | ired'.buffer."...(with-temp-buff |
| 4720 | 65 72 0a 20 20 20 20 28 69 6e 73 65 72 74 2d 64 69 72 65 63 74 6f 72 79 20 64 69 72 2d 6e 61 6d | er.....(insert-directory.dir-nam |
| 4740 | 65 20 64 69 72 65 64 2d 6c 69 73 74 69 6e 67 2d 73 77 69 74 63 68 65 73 20 6e 69 6c 20 74 29 0a | e.dired-listing-switches.nil.t). |
| 4760 | 20 20 20 20 28 64 65 6c 65 74 65 2d 63 68 61 72 20 2d 31 29 0a 20 20 20 20 28 67 6f 74 6f 2d 63 | ....(delete-char.-1).....(goto-c |
| 4780 | 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20 28 64 65 6c 65 74 65 2d 72 65 67 | har.(point-min)).....(delete-reg |
| 47a0 | 69 6f 6e 0a 20 20 20 20 20 28 70 72 6f 67 6e 20 28 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 | ion......(progn.(beginning-of-li |
| 47c0 | 6e 65 29 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 28 70 72 6f 67 6e 20 28 66 6f 72 77 61 72 | ne).(point))......(progn.(forwar |
| 47e0 | 64 2d 6c 69 6e 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 73 61 76 65 2d 65 78 | d-line..............(if.(save-ex |
| 4800 | 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 77 | cursion....................(forw |
| 4820 | 61 72 64 2d 6c 69 6e 65 20 31 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | ard-line.1)....................( |
| 4840 | 65 6e 64 2d 6f 66 2d 6c 69 6e 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | end-of-line).................... |
| 4860 | 28 6c 6f 6f 6b 69 6e 67 2d 62 61 63 6b 20 22 5c 5c 2e 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 | (looking-back."\\."))........... |
| 4880 | 20 20 20 20 20 20 20 33 20 31 29 29 20 28 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 28 69 6e 73 65 | .......3.1)).(point))).....(inse |
| 48a0 | 72 74 20 22 20 20 22 29 0a 20 20 20 20 28 77 68 69 6c 65 20 28 3d 20 28 66 6f 72 77 61 72 64 2d | rt."..").....(while.(=.(forward- |
| 48c0 | 6c 69 6e 65 29 20 30 29 0a 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 20 20 22 29 29 0a 20 20 | line).0).......(insert.".."))... |
| 48e0 | 20 20 28 64 65 6c 65 74 65 2d 63 68 61 72 20 2d 32 29 0a 20 20 20 20 28 62 75 66 66 65 72 2d 73 | ..(delete-char.-2).....(buffer-s |
| 4900 | 74 72 69 6e 67 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 | tring)))..;;;###autoload.(defun. |
| 4920 | 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 69 6e 73 65 72 74 20 28 29 0a 20 20 22 49 6e 73 65 72 | dired-subtree-insert.()..."Inser |
| 4940 | 74 20 73 75 62 74 72 65 65 20 75 6e 64 65 72 20 74 68 69 73 20 64 69 72 65 63 74 6f 72 79 2e 22 | t.subtree.under.this.directory." |
| 4960 | 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 64 | ...(interactive)...(when.(and.(d |
| 4980 | 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 64 69 72 65 64 2d 6c 69 6e 65 2d 69 73 2d 64 69 72 65 | ired-subtree--dired-line-is-dire |
| 49a0 | 63 74 6f 72 79 2d 6f 72 2d 6c 69 6e 6b 2d 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e | ctory-or-link-p)..............(n |
| 49c0 | 6f 74 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 69 73 2d 65 78 70 61 6e 64 65 64 2d 70 | ot.(dired-subtree--is-expanded-p |
| 49e0 | 29 29 29 0a 20 20 20 20 28 6c 65 74 2a 20 28 28 64 69 72 2d 6e 61 6d 65 20 28 64 69 72 65 64 2d | ))).....(let*.((dir-name.(dired- |
| 4a00 | 67 65 74 2d 66 69 6c 65 6e 61 6d 65 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c | get-filename.nil))............(l |
| 4a20 | 69 73 74 69 6e 67 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 72 65 61 64 69 6e 20 28 66 | isting.(dired-subtree--readin.(f |
| 4a40 | 69 6c 65 2d 6e 61 6d 65 2d 61 73 2d 64 69 72 65 63 74 6f 72 79 20 64 69 72 2d 6e 61 6d 65 29 29 | ile-name-as-directory.dir-name)) |
| 4a60 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 62 65 67 20 65 6e 64 29 0a 20 20 20 20 20 20 28 72 65 61 | )............beg.end).......(rea |
| 4a80 | 64 2d 6f 6e 6c 79 2d 6d 6f 64 65 20 2d 31 29 0a 20 20 20 20 20 20 28 6d 6f 76 65 2d 65 6e 64 2d | d-only-mode.-1).......(move-end- |
| 4aa0 | 6f 66 2d 6c 69 6e 65 20 31 29 0a 20 20 20 20 20 20 3b 3b 20 74 68 69 73 20 69 73 20 70 72 65 74 | of-line.1).......;;.this.is.pret |
| 4ac0 | 74 79 20 75 67 6c 79 2c 20 49 27 6d 20 73 75 72 65 20 69 74 20 63 61 6e 20 62 65 20 64 6f 6e 65 | ty.ugly,.I'm.sure.it.can.be.done |
| 4ae0 | 20 62 65 74 74 65 72 0a 20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 | .better.......(save-excursion... |
| 4b00 | 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 6c 69 73 74 69 6e 67 29 0a 20 20 20 20 20 20 20 20 28 | ......(insert.listing).........( |
| 4b20 | 73 65 74 71 20 65 6e 64 20 28 2b 20 28 70 6f 69 6e 74 29 20 32 29 29 29 0a 20 20 20 20 20 20 28 | setq.end.(+.(point).2))).......( |
| 4b40 | 69 6e 73 65 72 74 20 22 5c 6e 22 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 62 65 67 20 28 70 6f | insert."\n").......(setq.beg.(po |
| 4b60 | 69 6e 74 29 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 69 6e 68 69 62 69 74 2d 72 65 61 64 2d | int)).......(let.((inhibit-read- |
| 4b80 | 6f 6e 6c 79 20 74 29 29 0a 20 20 20 20 20 20 20 20 28 72 65 6d 6f 76 65 2d 74 65 78 74 2d 70 72 | only.t)).........(remove-text-pr |
| 4ba0 | 6f 70 65 72 74 69 65 73 20 28 31 2d 20 62 65 67 29 20 62 65 67 20 27 28 64 69 72 65 64 2d 66 69 | operties.(1-.beg).beg.'(dired-fi |
| 4bc0 | 6c 65 6e 61 6d 65 29 29 29 0a 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 6f 76 20 28 6d 61 6b 65 | lename))).......(let*.((ov.(make |
| 4be0 | 2d 6f 76 65 72 6c 61 79 20 62 65 67 20 65 6e 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | -overlay.beg.end)).............. |
| 4c00 | 28 70 61 72 65 6e 74 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 67 65 74 2d 6f 76 20 28 | (parent.(dired-subtree--get-ov.( |
| 4c20 | 31 2d 20 62 65 67 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 70 74 68 20 28 6f | 1-.beg)))..............(depth.(o |
| 4c40 | 72 20 28 61 6e 64 20 70 61 72 65 6e 74 20 28 31 2b 20 28 6f 76 65 72 6c 61 79 2d 67 65 74 20 70 | r.(and.parent.(1+.(overlay-get.p |
| 4c60 | 61 72 65 6e 74 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 64 65 70 74 68 29 29 29 0a 20 20 | arent.'dired-subtree-depth)))... |
| 4c80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 29 29 0a 20 20 20 20 20 20 | ......................1))....... |
| 4ca0 | 20 20 20 20 20 20 20 28 66 61 63 65 20 28 69 6e 74 65 72 6e 20 28 66 6f 72 6d 61 74 20 22 64 69 | .......(face.(intern.(format."di |
| 4cc0 | 72 65 64 2d 73 75 62 74 72 65 65 2d 64 65 70 74 68 2d 25 64 2d 66 61 63 65 22 20 64 65 70 74 68 | red-subtree-depth-%d-face".depth |
| 4ce0 | 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 | )))).........(when.dired-subtree |
| 4d00 | 2d 75 73 65 2d 62 61 63 6b 67 72 6f 75 6e 64 73 0a 20 20 20 20 20 20 20 20 20 20 28 6f 76 65 72 | -use-backgrounds...........(over |
| 4d20 | 6c 61 79 2d 70 75 74 20 6f 76 20 27 66 61 63 65 20 66 61 63 65 29 29 0a 20 20 20 20 20 20 20 20 | lay-put.ov.'face.face))......... |
| 4d40 | 3b 3b 20 72 65 66 61 63 74 6f 72 20 74 68 69 73 20 74 6f 20 73 6f 6d 65 20 66 75 6e 63 74 69 6f | ;;.refactor.this.to.some.functio |
| 4d60 | 6e 0a 20 20 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 76 20 27 6c 69 6e 65 2d | n.........(overlay-put.ov.'line- |
| 4d80 | 70 72 65 66 69 78 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 | prefix......................(if. |
| 4da0 | 28 73 74 72 69 6e 67 70 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6c 69 6e 65 2d 70 72 65 66 | (stringp.dired-subtree-line-pref |
| 4dc0 | 69 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 | ix)..........................(if |
| 4de0 | 20 28 6e 6f 74 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 75 73 65 2d 62 61 63 6b 67 72 6f 75 | .(not.dired-subtree-use-backgrou |
| 4e00 | 6e 64 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | nds)............................ |
| 4e20 | 20 20 28 61 70 70 6c 79 20 27 63 6f 6e 63 61 74 20 28 2d 72 65 70 65 61 74 20 64 65 70 74 68 20 | ..(apply.'concat.(-repeat.depth. |
| 4e40 | 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6c 69 6e 65 2d 70 72 65 66 69 78 29 29 0a 20 20 20 20 | dired-subtree-line-prefix))..... |
| 4e60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 | .......................(cond.... |
| 4e80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 65 71 20 6e 69 | .........................((eq.ni |
| 4ea0 | 6c 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6c 69 6e 65 2d 70 72 65 66 69 78 2d 66 61 63 65 | l.dired-subtree-line-prefix-face |
| 4ec0 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | )..............................( |
| 4ee0 | 61 70 70 6c 79 20 27 63 6f 6e 63 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | apply.'concat................... |
| 4f00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2d 72 65 70 65 61 74 20 64 65 70 74 68 | ..................(-repeat.depth |
| 4f20 | 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6c 69 6e 65 2d 70 72 65 66 69 78 29 29 29 0a 20 20 | .dired-subtree-line-prefix)))... |
| 4f40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 65 71 20 27 | ..........................((eq.' |
| 4f60 | 73 75 62 74 72 65 65 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6c 69 6e 65 2d 70 72 65 66 69 | subtree.dired-subtree-line-prefi |
| 4f80 | 78 2d 66 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | x-face)......................... |
| 4fa0 | 20 20 20 20 20 28 63 6f 6e 63 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .....(concat.................... |
| 4fc0 | 20 20 20 20 20 20 20 20 20 20 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6c 69 6e 65 2d 70 72 | ...........dired-subtree-line-pr |
| 4fe0 | 65 66 69 78 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | efix............................ |
| 5000 | 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ...(propertize.................. |
| 5020 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 70 70 6c 79 20 27 63 6f 6e 63 61 74 0a 20 20 20 | ..............(apply.'concat.... |
| 5040 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 5060 | 20 20 20 28 2d 72 65 70 65 61 74 20 28 31 2d 20 64 65 70 74 68 29 20 64 69 72 65 64 2d 73 75 62 | ...(-repeat.(1-.depth).dired-sub |
| 5080 | 74 72 65 65 2d 6c 69 6e 65 2d 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | tree-line-prefix)).............. |
| 50a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 66 61 63 65 29 29 29 0a | ..................'face.face))). |
| 50c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 65 71 | ............................((eq |
| 50e0 | 20 27 70 61 72 65 6e 74 73 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6c 69 6e 65 2d 70 72 65 | .'parents.dired-subtree-line-pre |
| 5100 | 66 69 78 2d 66 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | fix-face)....................... |
| 5120 | 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .......(concat.................. |
| 5140 | 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6c 69 6e 65 2d | .............dired-subtree-line- |
| 5160 | 70 72 65 66 69 78 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | prefix.......................... |
| 5180 | 20 20 20 20 20 28 61 70 70 6c 79 20 27 63 6f 6e 63 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 | .....(apply.'concat............. |
| 51a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2d 2d 6d 61 70 0a | .........................(--map. |
| 51c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 51e0 | 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d | ......(propertize.dired-subtree- |
| 5200 | 6c 69 6e 65 2d 70 72 65 66 69 78 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | line-prefix..................... |
| 5220 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 | ..............................'f |
| 5240 | 61 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ace............................. |
| 5260 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 74 65 72 6e 20 28 66 | ......................(intern.(f |
| 5280 | 6f 72 6d 61 74 20 22 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 64 65 70 74 68 2d 25 64 2d 66 61 | ormat."dired-subtree-depth-%d-fa |
| 52a0 | 63 65 22 20 69 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ce".it)))....................... |
| 52c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 75 6d 62 65 72 2d 73 65 71 75 65 6e 63 65 | ................(number-sequence |
| 52e0 | 20 31 20 28 31 2d 20 64 65 70 74 68 29 29 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | .1.(1-.depth))))))))............ |
| 5300 | 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 64 69 72 65 64 2d 73 75 62 74 72 | ............(funcall.dired-subtr |
| 5320 | 65 65 2d 6c 69 6e 65 2d 70 72 65 66 69 78 20 64 65 70 74 68 29 29 29 0a 20 20 20 20 20 20 20 20 | ee-line-prefix.depth)))......... |
| 5340 | 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 76 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6e | (overlay-put.ov.'dired-subtree-n |
| 5360 | 61 6d 65 20 64 69 72 2d 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 | ame.dir-name).........(overlay-p |
| 5380 | 75 74 20 6f 76 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 70 61 72 65 6e 74 20 70 61 72 65 | ut.ov.'dired-subtree-parent.pare |
| 53a0 | 6e 74 29 0a 20 20 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 76 20 27 64 69 72 | nt).........(overlay-put.ov.'dir |
| 53c0 | 65 64 2d 73 75 62 74 72 65 65 2d 64 65 70 74 68 20 64 65 70 74 68 29 0a 20 20 20 20 20 20 20 20 | ed-subtree-depth.depth)......... |
| 53e0 | 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 76 20 27 65 76 61 70 6f 72 61 74 65 20 74 29 0a 20 20 | (overlay-put.ov.'evaporate.t)... |
| 5400 | 20 20 20 20 20 20 28 70 75 73 68 20 6f 76 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6f 76 65 | ......(push.ov.dired-subtree-ove |
| 5420 | 72 6c 61 79 73 29 29 0a 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 62 65 67 29 0a 20 20 | rlays)).......(goto-char.beg)... |
| 5440 | 20 20 20 20 28 64 69 72 65 64 2d 6d 6f 76 65 2d 74 6f 2d 66 69 6c 65 6e 61 6d 65 29 0a 20 20 20 | ....(dired-move-to-filename).... |
| 5460 | 20 20 20 28 72 65 61 64 2d 6f 6e 6c 79 2d 6d 6f 64 65 20 31 29 0a 20 20 20 20 20 20 28 77 68 65 | ...(read-only-mode.1).......(whe |
| 5480 | 6e 20 28 62 6f 75 6e 64 2d 61 6e 64 2d 74 72 75 65 2d 70 20 64 69 72 65 64 2d 66 69 6c 74 65 72 | n.(bound-and-true-p.dired-filter |
| 54a0 | 2d 6d 6f 64 65 29 20 28 64 69 72 65 64 2d 66 69 6c 74 65 72 2d 6d 6f 64 65 20 31 29 29 0a 20 20 | -mode).(dired-filter-mode.1))... |
| 54c0 | 20 20 20 20 28 72 75 6e 2d 68 6f 6f 6b 73 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 61 66 | ....(run-hooks.'dired-subtree-af |
| 54e0 | 74 65 72 2d 69 6e 73 65 72 74 2d 68 6f 6f 6b 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c | ter-insert-hook))))..;;;###autol |
| 5500 | 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 72 65 6d 6f 76 65 20 | oad.(defun.dired-subtree-remove. |
| 5520 | 28 29 0a 20 20 22 52 65 6d 6f 76 65 20 73 75 62 74 72 65 65 20 61 74 20 70 6f 69 6e 74 2e 22 0a | ()..."Remove.subtree.at.point.". |
| 5540 | 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 2d 77 68 65 6e 2d 6c 65 74 2a 20 28 28 | ..(interactive)...(-when-let*.(( |
| 5560 | 6f 76 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 67 65 74 2d 6f 76 29 29 0a 20 20 20 20 | ov.(dired-subtree--get-ov))..... |
| 5580 | 20 20 20 20 20 20 20 20 20 20 20 28 6f 76 73 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d | ...........(ovs.(dired-subtree-- |
| 55a0 | 67 65 74 2d 6f 76 73 2d 69 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | get-ovs-in...................... |
| 55c0 | 28 6f 76 65 72 6c 61 79 2d 73 74 61 72 74 20 6f 76 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | (overlay-start.ov).............. |
| 55e0 | 20 20 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 65 6e 64 20 6f 76 29 29 29 29 0a 20 20 20 20 | ........(overlay-end.ov))))..... |
| 5600 | 28 6c 65 74 20 28 28 69 6e 68 69 62 69 74 2d 72 65 61 64 2d 6f 6e 6c 79 20 74 29 29 0a 20 20 20 | (let.((inhibit-read-only.t)).... |
| 5620 | 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 75 70 29 0a 20 20 20 20 20 20 28 64 65 6c | ...(dired-subtree-up).......(del |
| 5640 | 65 74 65 2d 72 65 67 69 6f 6e 20 28 6f 76 65 72 6c 61 79 2d 73 74 61 72 74 20 6f 76 29 0a 20 20 | ete-region.(overlay-start.ov)... |
| 5660 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 65 6e 64 20 | ...................(overlay-end. |
| 5680 | 6f 76 29 29 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 72 65 6d 6f 76 | ov)).......(dired-subtree--remov |
| 56a0 | 65 2d 6f 76 65 72 6c 61 79 73 20 6f 76 73 29 29 29 0a 20 20 28 72 75 6e 2d 68 6f 6f 6b 73 20 27 | e-overlays.ovs)))...(run-hooks.' |
| 56c0 | 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 61 66 74 65 72 2d 72 65 6d 6f 76 65 2d 68 6f 6f 6b 29 | dired-subtree-after-remove-hook) |
| 56e0 | 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 | )..;;;###autoload.(defun.dired-s |
| 5700 | 75 62 74 72 65 65 2d 74 6f 67 67 6c 65 20 28 29 0a 20 20 22 49 6e 73 65 72 74 20 73 75 62 74 72 | ubtree-toggle.()..."Insert.subtr |
| 5720 | 65 65 20 61 74 20 70 6f 69 6e 74 20 6f 72 20 72 65 6d 6f 76 65 20 69 74 20 69 66 20 69 74 20 77 | ee.at.point.or.remove.it.if.it.w |
| 5740 | 61 73 20 6e 6f 74 20 70 72 65 73 65 6e 74 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 | as.not.present."...(interactive) |
| 5760 | 0a 20 20 28 69 66 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 69 73 2d 65 78 70 61 6e 64 | ...(if.(dired-subtree--is-expand |
| 5780 | 65 64 2d 70 29 0a 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 28 64 69 72 65 | ed-p).......(progn.........(dire |
| 57a0 | 64 2d 6e 65 78 74 2d 6c 69 6e 65 20 31 29 0a 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 | d-next-line.1).........(dired-su |
| 57c0 | 62 74 72 65 65 2d 72 65 6d 6f 76 65 29 0a 20 20 20 20 20 20 20 20 3b 3b 20 23 31 37 35 20 66 69 | btree-remove).........;;.#175.fi |
| 57e0 | 78 65 73 20 74 68 65 20 63 61 73 65 20 6f 66 20 74 68 65 20 66 69 72 73 74 20 6c 69 6e 65 20 69 | xes.the.case.of.the.first.line.i |
| 5800 | 6e 20 64 69 72 65 64 20 77 68 65 6e 20 74 68 65 0a 20 20 20 20 20 20 20 20 3b 3b 20 63 75 72 73 | n.dired.when.the.........;;.curs |
| 5820 | 6f 72 20 6a 75 6d 70 73 20 74 6f 20 74 68 65 20 68 65 61 64 65 72 20 69 6e 20 64 69 72 65 64 20 | or.jumps.to.the.header.in.dired. |
| 5840 | 72 61 74 68 65 72 20 74 68 65 6e 20 74 6f 20 74 68 65 0a 20 20 20 20 20 20 20 20 3b 3b 20 66 69 | rather.then.to.the.........;;.fi |
| 5860 | 72 73 74 20 66 69 6c 65 20 69 6e 20 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e | rst.file.in.buffer.........(when |
| 5880 | 20 28 62 6f 62 70 29 0a 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 6e 65 78 74 2d 6c 69 | .(bobp)...........(dired-next-li |
| 58a0 | 6e 65 20 31 29 29 29 0a 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 20 28 64 69 72 | ne.1))).....(save-excursion.(dir |
| 58c0 | 65 64 2d 73 75 62 74 72 65 65 2d 69 6e 73 65 72 74 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 | ed-subtree-insert))))..(defun.di |
| 58e0 | 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 69 6e 73 65 72 74 2d 72 65 63 75 72 73 69 76 65 20 28 64 | red-subtree--insert-recursive.(d |
| 5900 | 65 70 74 68 20 6d 61 78 2d 64 65 70 74 68 29 0a 20 20 22 49 6e 73 65 72 74 20 66 75 6c 6c 20 73 | epth.max-depth)..."Insert.full.s |
| 5920 | 75 62 74 72 65 65 20 61 74 20 70 6f 69 6e 74 2e 22 0a 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 | ubtree.at.point."...(save-excurs |
| 5940 | 69 6f 6e 0a 20 20 20 20 28 6c 65 74 20 28 28 6e 61 6d 65 20 28 64 69 72 65 64 2d 67 65 74 2d 66 | ion.....(let.((name.(dired-get-f |
| 5960 | 69 6c 65 6e 61 6d 65 20 6e 69 6c 20 74 29 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e | ilename.nil.t))).......(when.(an |
| 5980 | 64 20 6e 61 6d 65 20 28 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 6e 61 6d 65 29 0a 20 | d.name.(file-directory-p.name).. |
| 59a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3c 3d 20 64 65 70 74 68 20 28 6f 72 20 6d 61 | ................(<=.depth.(or.ma |
| 59c0 | 78 2d 64 65 70 74 68 20 64 65 70 74 68 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | x-depth.depth))................. |
| 59e0 | 20 28 6f 72 20 28 3d 20 31 20 64 65 70 74 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .(or.(=.1.depth)................ |
| 5a00 | 20 20 20 20 20 20 28 6e 6f 74 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 64 69 72 65 64 | ......(not.(string-match-p.dired |
| 5a20 | 2d 73 75 62 74 72 65 65 2d 69 67 6e 6f 72 65 64 2d 72 65 67 65 78 70 0a 20 20 20 20 20 20 20 20 | -subtree-ignored-regexp......... |
| 5a40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 5a60 | 20 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 72 65 63 74 6f 72 79 20 6e 61 6d 65 29 29 | ..(file-name-nondirectory.name)) |
| 5a80 | 29 29 29 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d | ))).........(if.(dired-subtree-- |
| 5aa0 | 69 73 2d 65 78 70 61 6e 64 65 64 2d 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 | is-expanded-p).............(dire |
| 5ac0 | 64 2d 6e 65 78 74 2d 6c 69 6e 65 20 31 29 0a 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d | d-next-line.1)...........(dired- |
| 5ae0 | 73 75 62 74 72 65 65 2d 69 6e 73 65 72 74 29 29 0a 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d | subtree-insert)).........(dired- |
| 5b00 | 73 75 62 74 72 65 65 2d 65 6e 64 29 0a 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 | subtree-end).........(dired-subt |
| 5b20 | 72 65 65 2d 2d 69 6e 73 65 72 74 2d 72 65 63 75 72 73 69 76 65 20 28 31 2b 20 64 65 70 74 68 29 | ree--insert-recursive.(1+.depth) |
| 5b40 | 20 6d 61 78 2d 64 65 70 74 68 29 0a 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 64 69 72 65 | .max-depth).........(while.(dire |
| 5b60 | 64 2d 73 75 62 74 72 65 65 2d 70 72 65 76 69 6f 75 73 2d 73 69 62 6c 69 6e 67 29 0a 20 20 20 20 | d-subtree-previous-sibling)..... |
| 5b80 | 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 69 6e 73 65 72 74 2d 72 65 63 | ......(dired-subtree--insert-rec |
| 5ba0 | 75 72 73 69 76 65 20 28 31 2b 20 64 65 70 74 68 29 20 6d 61 78 2d 64 65 70 74 68 29 29 29 29 29 | ursive.(1+.depth).max-depth))))) |
| 5bc0 | 29 0a 0a 28 64 65 66 76 61 72 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 63 79 63 6c 65 2d | )..(defvar.dired-subtree--cycle- |
| 5be0 | 70 72 65 76 69 6f 75 73 20 6e 69 6c 0a 20 20 22 52 65 6d 65 6d 62 65 72 20 70 72 65 76 69 6f 75 | previous.nil..."Remember.previou |
| 5c00 | 73 20 61 63 74 69 6f 6e 20 66 6f 72 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 63 79 63 6c | s.action.for.`dired-subtree-cycl |
| 5c20 | 65 27 22 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 65 | e'")..;;;###autoload.(defun.dire |
| 5c40 | 64 2d 73 75 62 74 72 65 65 2d 63 79 63 6c 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20 6d 61 78 2d 64 | d-subtree-cycle.(&optional.max-d |
| 5c60 | 65 70 74 68 29 0a 20 20 22 4f 72 67 2d 6d 6f 64 65 20 6c 69 6b 65 20 63 79 63 6c 65 20 76 69 73 | epth)..."Org-mode.like.cycle.vis |
| 5c80 | 69 62 69 6c 69 74 79 3a 0a 0a 31 29 20 53 68 6f 77 20 73 75 62 74 72 65 65 0a 32 29 20 53 68 6f | ibility:..1).Show.subtree.2).Sho |
| 5ca0 | 77 20 73 75 62 74 72 65 65 20 72 65 63 75 72 73 69 76 65 6c 79 20 28 69 66 20 70 72 65 76 69 6f | w.subtree.recursively.(if.previo |
| 5cc0 | 75 73 20 63 6f 6d 6d 61 6e 64 20 77 61 73 20 63 79 63 6c 65 29 0a 33 29 20 52 65 6d 6f 76 65 20 | us.command.was.cycle).3).Remove. |
| 5ce0 | 73 75 62 74 72 65 65 0a 0a 4e 75 6d 65 72 69 63 20 70 72 65 66 69 78 20 77 69 6c 6c 20 73 65 74 | subtree..Numeric.prefix.will.set |
| 5d00 | 20 6d 61 78 20 64 65 70 74 68 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 50 22 29 0a | .max.depth"...(interactive."P"). |
| 5d20 | 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 | ..(save-excursion.....(cond..... |
| 5d40 | 20 3b 3b 20 70 72 65 66 69 78 20 2d 20 73 68 6f 77 20 73 75 62 74 72 65 65 73 20 75 70 20 74 6f | .;;.prefix.-.show.subtrees.up.to |
| 5d60 | 20 6d 61 78 2d 64 65 70 74 68 0a 20 20 20 20 20 28 6d 61 78 2d 64 65 70 74 68 0a 20 20 20 20 20 | .max-depth......(max-depth...... |
| 5d80 | 20 28 77 68 65 6e 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 69 73 2d 65 78 70 61 6e 64 | .(when.(dired-subtree--is-expand |
| 5da0 | 65 64 2d 70 29 0a 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 6e 65 78 74 2d 6c 69 6e 65 20 31 | ed-p).........(dired-next-line.1 |
| 5dc0 | 29 0a 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 72 65 6d 6f 76 65 29 | ).........(dired-subtree-remove) |
| 5de0 | 29 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 69 6e 73 65 72 74 2d 72 | ).......(dired-subtree--insert-r |
| 5e00 | 65 63 75 72 73 69 76 65 20 31 20 28 69 66 20 28 69 6e 74 65 67 65 72 70 20 6d 61 78 2d 64 65 70 | ecursive.1.(if.(integerp.max-dep |
| 5e20 | 74 68 29 20 6d 61 78 2d 64 65 70 74 68 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 | th).max-depth.nil)).......(setq. |
| 5e40 | 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 63 79 63 6c 65 2d 70 72 65 76 69 6f 75 73 20 3a 66 | dired-subtree--cycle-previous.:f |
| 5e60 | 75 6c 6c 29 29 0a 20 20 20 20 20 3b 3b 20 69 66 20 64 69 72 65 63 74 6f 72 79 20 69 73 20 6e 6f | ull))......;;.if.directory.is.no |
| 5e80 | 74 20 65 78 70 61 6e 64 65 64 2c 20 65 78 70 61 6e 64 20 6f 6e 65 20 6c 65 76 65 6c 0a 20 20 20 | t.expanded,.expand.one.level.... |
| 5ea0 | 20 20 28 28 6e 6f 74 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 69 73 2d 65 78 70 61 6e | ..((not.(dired-subtree--is-expan |
| 5ec0 | 64 65 64 2d 70 29 29 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 69 6e 73 | ded-p)).......(dired-subtree-ins |
| 5ee0 | 65 72 74 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d | ert).......(setq.dired-subtree-- |
| 5f00 | 63 79 63 6c 65 2d 70 72 65 76 69 6f 75 73 20 3a 69 6e 73 65 72 74 29 29 0a 20 20 20 20 20 3b 3b | cycle-previous.:insert))......;; |
| 5f20 | 20 68 69 64 65 20 69 66 20 70 72 65 76 69 6f 75 73 20 63 6f 6d 6d 61 6e 64 20 77 61 73 20 6e 6f | .hide.if.previous.command.was.no |
| 5f40 | 74 20 63 79 63 6c 65 20 6f 72 20 74 72 65 65 20 77 61 73 20 66 75 6c 6c 79 20 65 78 70 61 6e 64 | t.cycle.or.tree.was.fully.expand |
| 5f60 | 65 64 0a 20 20 20 20 20 28 28 6f 72 20 28 6e 6f 74 20 28 65 71 20 6c 61 73 74 2d 63 6f 6d 6d 61 | ed......((or.(not.(eq.last-comma |
| 5f80 | 6e 64 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 63 79 63 6c 65 29 29 0a 20 20 20 20 20 20 | nd.'dired-subtree-cycle))....... |
| 5fa0 | 20 20 20 20 28 65 71 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 63 79 63 6c 65 2d 70 72 65 | ....(eq.dired-subtree--cycle-pre |
| 5fc0 | 76 69 6f 75 73 20 3a 66 75 6c 6c 29 29 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 6e 65 78 74 2d | vious.:full)).......(dired-next- |
| 5fe0 | 6c 69 6e 65 20 31 29 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 72 65 6d | line.1).......(dired-subtree-rem |
| 6000 | 6f 76 65 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d | ove).......(setq.dired-subtree-- |
| 6020 | 63 79 63 6c 65 2d 70 72 65 76 69 6f 75 73 20 3a 72 65 6d 6f 76 65 29 29 0a 20 20 20 20 20 28 74 | cycle-previous.:remove))......(t |
| 6040 | 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 69 6e 73 65 72 74 2d 72 65 | .......(dired-subtree--insert-re |
| 6060 | 63 75 72 73 69 76 65 20 31 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 63 79 63 6c 65 2d 64 65 | cursive.1.dired-subtree-cycle-de |
| 6080 | 70 74 68 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d | pth).......(setq.dired-subtree-- |
| 60a0 | 63 79 63 6c 65 2d 70 72 65 76 69 6f 75 73 20 3a 66 75 6c 6c 29 29 29 29 29 0a 0a 28 64 65 66 75 | cycle-previous.:full)))))..(defu |
| 60c0 | 6e 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 66 69 6c 74 65 72 2d 75 70 20 28 6b 65 65 70 | n.dired-subtree--filter-up.(keep |
| 60e0 | 2d 64 69 72 20 6b 69 6c 6c 2d 73 69 62 6c 69 6e 67 73 29 0a 20 20 28 73 61 76 65 2d 65 78 63 75 | -dir.kill-siblings)...(save-excu |
| 6100 | 72 73 69 6f 6e 0a 20 20 20 20 28 6c 65 74 20 28 6f 76 29 0a 20 20 20 20 20 20 28 73 61 76 65 2d | rsion.....(let.(ov).......(save- |
| 6120 | 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 64 69 72 65 64 2d | excursion.........(while.(dired- |
| 6140 | 73 75 62 74 72 65 65 2d 75 70 29 29 0a 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 6e 65 78 74 | subtree-up)).........(dired-next |
| 6160 | 2d 6c 69 6e 65 20 31 29 0a 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d | -line.1).........(dired-subtree- |
| 6180 | 6d 61 72 6b 2d 73 75 62 74 72 65 65 20 74 29 29 0a 20 20 20 20 20 20 28 69 66 20 6b 65 65 70 2d | mark-subtree.t)).......(if.keep- |
| 61a0 | 64 69 72 0a 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 75 6e 6d | dir...........(dired-subtree-unm |
| 61c0 | 61 72 6b 2d 73 75 62 74 72 65 65 29 0a 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 | ark-subtree).........(dired-subt |
| 61e0 | 72 65 65 2d 2d 75 6e 6d 61 72 6b 29 29 0a 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 61 6e 64 20 | ree--unmark)).......(while.(and. |
| 6200 | 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 75 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | (dired-subtree-up).............. |
| 6220 | 20 20 20 20 20 28 3e 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 67 65 74 2d 64 65 70 74 | .....(>.(dired-subtree--get-dept |
| 6240 | 68 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 67 65 74 2d 6f 76 29 29 20 30 29 29 0a 20 | h.(dired-subtree--get-ov)).0)).. |
| 6260 | 20 20 20 20 20 20 20 28 69 66 20 28 6e 6f 74 20 6b 69 6c 6c 2d 73 69 62 6c 69 6e 67 73 29 0a 20 | .......(if.(not.kill-siblings).. |
| 6280 | 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 75 6e 6d 61 72 | ...........(dired-subtree--unmar |
| 62a0 | 6b 29 0a 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 75 6e 6d | k)...........(dired-subtree--unm |
| 62c0 | 61 72 6b 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 68 65 72 65 20 28 70 6f 69 6e | ark)...........(let.((here.(poin |
| 62e0 | 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d | t))).............(dired-subtree- |
| 6300 | 77 69 74 68 2d 73 75 62 74 72 65 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 | with-subtree..............(when. |
| 6320 | 28 61 6e 64 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 69 73 2d 65 78 70 61 6e 64 65 64 | (and.(dired-subtree--is-expanded |
| 6340 | 2d 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2f 3d 20 | -p).........................(/=. |
| 6360 | 28 70 6f 69 6e 74 29 20 68 65 72 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 | (point).here))................(d |
| 6380 | 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 75 6e 6d 61 72 6b 29 0a 20 20 20 20 20 20 20 20 20 20 | ired-subtree--unmark)........... |
| 63a0 | 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 | .....(save-excursion............ |
| 63c0 | 20 20 20 20 20 20 28 64 69 72 65 64 2d 6e 65 78 74 2d 6c 69 6e 65 20 31 29 0a 20 20 20 20 20 20 | ......(dired-next-line.1)....... |
| 63e0 | 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 75 6e 6d 61 72 6b | ...........(dired-subtree-unmark |
| 6400 | 2d 73 75 62 74 72 65 65 20 74 29 29 29 29 29 29 29 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 64 | -subtree.t))))))).......(dired-d |
| 6420 | 6f 2d 6b 69 6c 6c 2d 6c 69 6e 65 73 29 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 | o-kill-lines).......(dired-subtr |
| 6440 | 65 65 2d 2d 63 6c 65 61 6e 75 70 2d 6f 76 65 72 6c 61 79 73 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 | ee--cleanup-overlays))))..;;;### |
| 6460 | 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6f 6e | autoload.(defun.dired-subtree-on |
| 6480 | 6c 79 2d 74 68 69 73 2d 66 69 6c 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 29 0a 20 20 22 | ly-this-file.(&optional.arg)..." |
| 64a0 | 52 65 6d 6f 76 65 20 61 6c 6c 20 74 68 65 20 73 69 62 6c 69 6e 67 73 20 6f 6e 20 74 68 65 20 72 | Remove.all.the.siblings.on.the.r |
| 64c0 | 6f 75 74 65 20 66 72 6f 6d 20 74 68 69 73 20 66 69 6c 65 20 74 6f 20 74 68 65 20 74 6f 70 2d 6d | oute.from.this.file.to.the.top-m |
| 64e0 | 6f 73 74 20 64 69 72 65 63 74 6f 72 79 2e 0a 0a 57 69 74 68 20 41 52 47 20 6e 6f 6e 2d 6e 69 6c | ost.directory...With.ARG.non-nil |
| 6500 | 2c 20 64 6f 20 6e 6f 74 20 72 65 6d 6f 76 65 20 65 78 70 61 6e 64 65 64 20 64 69 72 65 63 74 6f | ,.do.not.remove.expanded.directo |
| 6520 | 72 69 65 73 20 69 6e 20 70 61 72 65 6e 74 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 | ries.in.parents."...(interactive |
| 6540 | 20 22 50 22 29 0a 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 66 69 6c 74 65 72 2d 75 | ."P")...(dired-subtree--filter-u |
| 6560 | 70 20 6e 69 6c 20 61 72 67 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 | p.nil.arg))..;;;###autoload.(def |
| 6580 | 75 6e 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6f 6e 6c 79 2d 74 68 69 73 2d 64 69 72 65 63 | un.dired-subtree-only-this-direc |
| 65a0 | 74 6f 72 79 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 29 0a 20 20 22 52 65 6d 6f 76 65 20 61 | tory.(&optional.arg)..."Remove.a |
| 65c0 | 6c 6c 20 74 68 65 20 73 69 62 6c 69 6e 67 73 20 6f 6e 20 74 68 65 20 72 6f 75 74 65 20 66 72 6f | ll.the.siblings.on.the.route.fro |
| 65e0 | 6d 20 74 68 69 73 20 64 69 72 65 63 74 6f 72 79 20 74 6f 20 74 68 65 20 74 6f 70 2d 6d 6f 73 74 | m.this.directory.to.the.top-most |
| 6600 | 20 64 69 72 65 63 74 6f 72 79 2e 0a 0a 57 69 74 68 20 41 52 47 20 6e 6f 6e 2d 6e 69 6c 2c 20 64 | .directory...With.ARG.non-nil,.d |
| 6620 | 6f 20 6e 6f 74 20 72 65 6d 6f 76 65 20 65 78 70 61 6e 64 65 64 20 64 69 72 65 63 74 6f 72 69 65 | o.not.remove.expanded.directorie |
| 6640 | 73 20 69 6e 20 70 61 72 65 6e 74 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 50 | s.in.parents."...(interactive."P |
| 6660 | 22 29 0a 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 66 69 6c 74 65 72 2d 75 70 20 74 | ")...(dired-subtree--filter-up.t |
| 6680 | 20 61 72 67 29 29 0a 0a 3b 3b 3b 20 66 69 6c 74 65 72 69 6e 67 0a 28 64 65 66 75 6e 20 64 69 72 | .arg))..;;;.filtering.(defun.dir |
| 66a0 | 65 64 2d 73 75 62 74 72 65 65 2d 2d 66 69 6c 74 65 72 2d 75 70 64 61 74 65 2d 62 73 20 28 6f 76 | ed-subtree--filter-update-bs.(ov |
| 66c0 | 29 0a 20 20 22 55 70 64 61 74 65 20 74 68 65 20 6c 6f 63 61 6c 20 66 69 6c 74 65 72 20 6c 69 73 | )..."Update.the.local.filter.lis |
| 66e0 | 74 2e 0a 0a 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 61 73 73 75 6d 65 73 20 74 68 61 74 20 60 | t...This.function.assumes.that.` |
| 6700 | 64 69 72 65 64 2d 66 69 6c 74 65 72 2d 73 74 61 63 6b 27 20 69 73 20 64 79 6e 61 6d 69 63 61 6c | dired-filter-stack'.is.dynamical |
| 6720 | 6c 79 0a 62 6f 75 6e 64 20 74 6f 20 72 65 6c 65 76 61 6e 74 20 76 61 6c 75 65 2e 22 0a 20 20 28 | ly.bound.to.relevant.value."...( |
| 6740 | 6c 65 74 2a 20 28 28 66 69 6c 74 20 28 64 69 72 65 64 2d 66 69 6c 74 65 72 2d 2d 64 65 73 63 72 | let*.((filt.(dired-filter--descr |
| 6760 | 69 62 65 2d 66 69 6c 74 65 72 73 29 29 0a 20 20 20 20 20 20 20 20 20 28 62 65 66 6f 72 65 2d 73 | ibe-filters))..........(before-s |
| 6780 | 74 72 20 28 69 66 20 28 65 71 75 61 6c 20 66 69 6c 74 20 22 22 29 20 6e 69 6c 20 28 63 6f 6e 63 | tr.(if.(equal.filt."").nil.(conc |
| 67a0 | 61 74 20 22 20 20 4c 6f 63 61 6c 20 66 69 6c 74 65 72 73 3a 20 22 20 66 69 6c 74 20 22 5c 6e 22 | at."..Local.filters:.".filt."\n" |
| 67c0 | 29 29 29 29 0a 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 76 20 27 62 65 66 6f 72 65 | )))).....(overlay-put.ov.'before |
| 67e0 | 2d 73 74 72 69 6e 67 20 62 65 66 6f 72 65 2d 73 74 72 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 | -string.before-str)))..(defun.di |
| 6800 | 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 66 69 6c 74 65 72 2d 73 75 62 74 72 65 65 20 28 6f 76 29 | red-subtree--filter-subtree.(ov) |
| 6820 | 0a 20 20 22 52 75 6e 20 74 68 65 20 66 69 6c 74 65 72 20 66 6f 72 20 74 68 69 73 20 73 75 62 74 | ..."Run.the.filter.for.this.subt |
| 6840 | 72 65 65 2e 0a 0a 49 74 20 69 73 20 6f 6e 6c 79 20 73 61 66 65 20 74 6f 20 63 61 6c 6c 20 74 68 | ree...It.is.only.safe.to.call.th |
| 6860 | 69 73 20 66 72 6f 6d 20 72 65 61 64 69 6e 2e 0a 0a 54 68 69 73 20 64 65 70 65 6e 64 73 20 6f 6e | is.from.readin...This.depends.on |
| 6880 | 20 60 64 69 72 65 64 2d 66 69 6c 74 65 72 27 20 70 61 63 6b 61 67 65 2e 22 0a 20 20 28 77 68 65 | .`dired-filter'.package."...(whe |
| 68a0 | 6e 20 28 66 65 61 74 75 72 65 70 20 27 64 69 72 65 64 2d 66 69 6c 74 65 72 29 0a 20 20 20 20 28 | n.(featurep.'dired-filter).....( |
| 68c0 | 6c 65 74 20 28 28 64 69 72 65 64 2d 66 69 6c 74 65 72 2d 73 74 61 63 6b 20 28 6f 76 65 72 6c 61 | let.((dired-filter-stack.(overla |
| 68e0 | 79 2d 67 65 74 20 6f 76 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 66 69 6c 74 65 72 29 29 | y-get.ov.'dired-subtree-filter)) |
| 6900 | 29 0a 20 20 20 20 20 20 28 73 61 76 65 2d 72 65 73 74 72 69 63 74 69 6f 6e 0a 20 20 20 20 20 20 | ).......(save-restriction....... |
| 6920 | 20 20 28 77 69 64 65 6e 29 0a 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 | ..(widen).........(dired-subtree |
| 6940 | 2d 6e 61 72 72 6f 77 29 0a 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 66 69 6c 74 65 72 2d 2d | -narrow).........(dired-filter-- |
| 6960 | 65 78 70 75 6e 67 65 29 0a 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d | expunge).........(dired-subtree- |
| 6980 | 2d 66 69 6c 74 65 72 2d 75 70 64 61 74 65 2d 62 73 20 6f 76 29 29 29 29 29 0a 0a 3b 3b 3b 23 23 | -filter-update-bs.ov)))))..;;;## |
| 69a0 | 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 61 | #autoload.(defun.dired-subtree-a |
| 69c0 | 70 70 6c 79 2d 66 69 6c 74 65 72 20 28 29 0a 20 20 22 50 75 73 68 20 61 20 6c 6f 63 61 6c 20 66 | pply-filter.()..."Push.a.local.f |
| 69e0 | 69 6c 74 65 72 20 66 6f 72 20 74 68 69 73 20 73 75 62 74 72 65 65 2e 0a 0a 54 68 69 73 20 64 65 | ilter.for.this.subtree...This.de |
| 6a00 | 70 65 6e 64 73 20 6f 6e 20 60 64 69 72 65 64 2d 66 69 6c 74 65 72 27 20 70 61 63 6b 61 67 65 2e | pends.on.`dired-filter'.package. |
| 6a20 | 0a 0a 49 74 20 77 6f 72 6b 73 20 65 78 61 63 74 6c 79 20 74 68 65 20 73 61 6d 65 20 61 73 20 67 | ..It.works.exactly.the.same.as.g |
| 6a40 | 6c 6f 62 61 6c 20 64 69 72 65 64 20 66 69 6c 74 65 72 73 2c 20 6f 6e 6c 79 0a 72 65 73 74 72 69 | lobal.dired.filters,.only.restri |
| 6a60 | 63 74 65 64 20 74 6f 20 61 20 73 75 62 74 72 65 65 2e 20 20 54 68 65 20 67 6c 6f 62 61 6c 20 66 | cted.to.a.subtree...The.global.f |
| 6a80 | 69 6c 74 65 72 20 69 73 20 61 6c 73 6f 20 61 70 70 6c 69 65 64 20 74 6f 0a 74 68 65 20 73 75 62 | ilter.is.also.applied.to.the.sub |
| 6aa0 | 74 72 65 65 2e 20 20 54 68 65 20 66 69 6c 74 65 72 20 61 63 74 69 6f 6e 20 69 73 20 72 65 61 64 | tree...The.filter.action.is.read |
| 6ac0 | 20 66 72 6f 6d 20 60 64 69 72 65 64 2d 66 69 6c 74 65 72 2d 6d 61 70 27 2e 22 0a 20 20 28 69 6e | .from.`dired-filter-map'."...(in |
| 6ae0 | 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 77 68 65 6e 20 28 66 65 61 74 75 72 65 70 20 27 64 69 | teractive)...(when.(featurep.'di |
| 6b00 | 72 65 64 2d 66 69 6c 74 65 72 29 0a 20 20 20 20 28 2d 77 68 65 6e 2d 6c 65 74 20 28 6f 76 20 28 | red-filter).....(-when-let.(ov.( |
| 6b20 | 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 67 65 74 2d 6f 76 29 29 0a 20 20 20 20 20 20 28 6c | dired-subtree--get-ov)).......(l |
| 6b40 | 65 74 20 28 28 64 69 72 65 64 2d 66 69 6c 74 65 72 2d 73 74 61 63 6b 20 28 6f 76 65 72 6c 61 79 | et.((dired-filter-stack.(overlay |
| 6b60 | 2d 67 65 74 20 6f 76 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 66 69 6c 74 65 72 29 29 0a | -get.ov.'dired-subtree-filter)). |
| 6b80 | 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6c 6f 62 20 28 63 75 72 72 65 6e 74 2d 67 6c 6f 62 61 | ............(glob.(current-globa |
| 6ba0 | 6c 2d 6d 61 70 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 63 20 28 63 75 72 72 65 6e | l-map)).............(loc.(curren |
| 6bc0 | 74 2d 6c 6f 63 61 6c 2d 6d 61 70 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 63 6d 64 29 0a 20 | t-local-map)).............cmd).. |
| 6be0 | 20 20 20 20 20 20 20 28 63 6c 2d 66 6c 65 74 20 28 28 64 69 72 65 64 2d 66 69 6c 74 65 72 2d 2d | .......(cl-flet.((dired-filter-- |
| 6c00 | 75 70 64 61 74 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 29 0a 20 20 20 | update....................().... |
| 6c20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 61 76 65 2d 72 65 73 74 72 69 63 74 69 6f | ................(save-restrictio |
| 6c40 | 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 2d | n......................(overlay- |
| 6c60 | 70 75 74 20 6f 76 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 66 69 6c 74 65 72 20 64 69 72 | put.ov.'dired-subtree-filter.dir |
| 6c80 | 65 64 2d 66 69 6c 74 65 72 2d 73 74 61 63 6b 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ed-filter-stack)................ |
| 6ca0 | 20 20 20 20 20 20 28 77 69 64 65 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ......(widen)................... |
| 6cc0 | 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 72 65 76 65 72 74 29 0a 20 20 20 20 20 20 | ...(dired-subtree-revert)....... |
| 6ce0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 66 | ...............(dired-subtree--f |
| 6d00 | 69 6c 74 65 72 2d 75 70 64 61 74 65 2d 62 73 20 6f 76 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 | ilter-update-bs.ov)))).......... |
| 6d20 | 20 28 75 6e 77 69 6e 64 2d 70 72 6f 74 65 63 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | .(unwind-protect...............( |
| 6d40 | 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 73 65 2d 67 6c 6f 62 61 | progn.................(use-globa |
| 6d60 | 6c 2d 6d 61 70 20 64 69 72 65 64 2d 66 69 6c 74 65 72 2d 6d 61 70 29 0a 20 20 20 20 20 20 20 20 | l-map.dired-filter-map)......... |
| 6d80 | 20 20 20 20 20 20 20 20 28 75 73 65 2d 6c 6f 63 61 6c 2d 6d 61 70 20 6e 69 6c 29 0a 20 20 20 20 | ........(use-local-map.nil)..... |
| 6da0 | 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 6d 64 20 28 6b 65 79 2d 62 69 6e 64 69 | ............(setq.cmd.(key-bindi |
| 6dc0 | 6e 67 20 28 72 65 61 64 2d 6b 65 79 2d 73 65 71 75 65 6e 63 65 20 22 43 68 6f 6f 73 65 20 66 69 | ng.(read-key-sequence."Choose.fi |
| 6de0 | 6c 74 65 72 20 61 63 74 69 6f 6e 3a 20 22 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 | lter.action:.")))).............( |
| 6e00 | 75 73 65 2d 67 6c 6f 62 61 6c 2d 6d 61 70 20 67 6c 6f 62 29 0a 20 20 20 20 20 20 20 20 20 20 20 | use-global-map.glob)............ |
| 6e20 | 20 28 75 73 65 2d 6c 6f 63 61 6c 2d 6d 61 70 20 6c 6f 63 29 29 0a 20 20 20 20 20 20 20 20 20 20 | .(use-local-map.loc))........... |
| 6e40 | 28 6c 65 74 20 28 28 70 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | (let.((p.(point))............... |
| 6e60 | 20 20 28 62 65 67 20 28 6f 76 65 72 6c 61 79 2d 73 74 61 72 74 20 6f 76 29 29 0a 20 20 20 20 20 | ..(beg.(overlay-start.ov))...... |
| 6e80 | 20 20 20 20 20 20 20 20 20 20 20 28 63 75 72 72 65 6e 74 2d 66 69 6c 65 20 28 64 69 72 65 64 2d | ...........(current-file.(dired- |
| 6ea0 | 75 74 69 6c 73 2d 67 65 74 2d 66 69 6c 65 6e 61 6d 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 | utils-get-filename)))........... |
| 6ec0 | 20 20 28 75 6e 77 69 6e 64 2d 70 72 6f 74 65 63 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ..(unwind-protect............... |
| 6ee0 | 20 20 28 63 61 6c 6c 2d 69 6e 74 65 72 61 63 74 69 76 65 6c 79 20 63 6d 64 29 0a 20 20 20 20 20 | ..(call-interactively.cmd)...... |
| 6f00 | 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 64 69 72 65 64 2d 75 74 69 6c 73 2d 67 6f | .........(unless.(dired-utils-go |
| 6f20 | 74 6f 2d 6c 69 6e 65 20 63 75 72 72 65 6e 74 2d 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 | to-line.current-file)........... |
| 6f40 | 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 62 65 67 29 0a 20 20 20 20 20 20 20 20 20 20 | ......(goto-char.beg)........... |
| 6f60 | 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 | ......(forward-line)............ |
| 6f80 | 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 6d 69 6e 20 70 20 28 31 2d 20 28 6f 76 65 72 | .....(goto-char.(min.p.(1-.(over |
| 6fa0 | 6c 61 79 2d 65 6e 64 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 67 65 74 2d 6f 76 29 29 | lay-end.(dired-subtree--get-ov)) |
| 6fc0 | 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 6d 6f 76 65 2d | ))).................(dired-move- |
| 6fe0 | 74 6f 2d 66 69 6c 65 6e 61 6d 65 29 29 29 29 29 29 29 29 29 0a 0a 0c 0a 3b 3b 3b 20 48 65 72 65 | to-filename)))))))))....;;;.Here |
| 7000 | 20 77 65 20 72 65 64 65 66 69 6e 65 20 61 20 63 6f 75 70 6c 65 20 6f 66 20 66 75 6e 63 74 69 6f | .we.redefine.a.couple.of.functio |
| 7020 | 6e 73 20 66 72 6f 6d 20 64 69 72 65 64 2e 65 6c 20 74 6f 20 6d 61 6b 65 20 74 68 65 6d 0a 3b 3b | ns.from.dired.el.to.make.them.;; |
| 7040 | 3b 20 73 75 62 74 72 65 65 2d 61 77 61 72 65 0a 0a 3b 3b 20 49 66 20 74 68 65 20 70 6f 69 6e 74 | ;.subtree-aware..;;.If.the.point |
| 7060 | 20 69 73 20 69 6e 20 61 20 73 75 62 74 72 65 65 2c 20 77 65 20 6e 65 65 64 20 74 6f 20 70 72 6f | .is.in.a.subtree,.we.need.to.pro |
| 7080 | 76 69 64 65 20 61 20 70 72 6f 70 65 72 0a 3b 3b 20 64 69 72 65 63 74 6f 72 79 2c 20 6e 6f 74 20 | vide.a.proper.;;.directory,.not. |
| 70a0 | 74 68 65 20 6f 6e 65 20 74 68 61 74 20 77 6f 75 6c 64 20 63 6f 6d 65 20 66 72 6f 6d 20 60 64 69 | the.one.that.would.come.from.`di |
| 70c0 | 72 65 64 2d 73 75 62 64 69 72 2d 61 6c 69 73 74 27 2e 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d | red-subdir-alist'..(defun.dired- |
| 70e0 | 63 75 72 72 65 6e 74 2d 64 69 72 65 63 74 6f 72 79 20 28 26 6f 70 74 69 6f 6e 61 6c 20 6c 6f 63 | current-directory.(&optional.loc |
| 7100 | 61 6c 70 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 6e 61 6d 65 20 6f 66 20 74 68 65 20 73 | alp)..."Return.the.name.of.the.s |
| 7120 | 75 62 64 69 72 65 63 74 6f 72 79 20 74 6f 20 77 68 69 63 68 20 74 68 69 73 20 6c 69 6e 65 20 62 | ubdirectory.to.which.this.line.b |
| 7140 | 65 6c 6f 6e 67 73 2e 0a 54 68 69 73 20 72 65 74 75 72 6e 73 20 61 20 73 74 72 69 6e 67 20 77 69 | elongs..This.returns.a.string.wi |
| 7160 | 74 68 20 74 72 61 69 6c 69 6e 67 20 73 6c 61 73 68 2c 20 6c 69 6b 65 20 60 64 65 66 61 75 6c 74 | th.trailing.slash,.like.`default |
| 7180 | 2d 64 69 72 65 63 74 6f 72 79 27 2e 0a 4f 70 74 69 6f 6e 61 6c 20 61 72 67 75 6d 65 6e 74 20 6d | -directory'..Optional.argument.m |
| 71a0 | 65 61 6e 73 20 72 65 74 75 72 6e 20 61 20 66 69 6c 65 20 6e 61 6d 65 20 72 65 6c 61 74 69 76 65 | eans.return.a.file.name.relative |
| 71c0 | 20 74 6f 20 60 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 27 2e 22 0a 20 20 28 6c 65 74 | .to.`default-directory'."...(let |
| 71e0 | 20 28 28 68 65 72 65 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 28 61 6c 69 73 74 20 | .((here.(point)).........(alist. |
| 7200 | 28 6f 72 20 64 69 72 65 64 2d 73 75 62 64 69 72 2d 61 6c 69 73 74 0a 20 20 20 20 20 20 20 20 20 | (or.dired-subdir-alist.......... |
| 7220 | 20 20 20 20 20 20 20 20 20 20 3b 3b 20 70 72 6f 62 61 62 6c 79 20 62 65 63 61 75 73 65 20 63 61 | ..........;;.probably.because.ca |
| 7240 | 6c 6c 65 64 20 69 6e 20 61 20 6e 6f 6e 2d 64 69 72 65 64 20 62 75 66 66 65 72 0a 20 20 20 20 20 | lled.in.a.non-dired.buffer...... |
| 7260 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 4e 6f 20 73 75 62 64 69 72 2d | ..............(error."No.subdir- |
| 7280 | 61 6c 69 73 74 20 69 6e 20 25 73 22 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 29 | alist.in.%s".(current-buffer)))) |
| 72a0 | 0a 20 20 20 20 20 20 20 20 65 6c 74 20 64 69 72 29 0a 20 20 20 20 28 77 68 69 6c 65 20 61 6c 69 | .........elt.dir).....(while.ali |
| 72c0 | 73 74 0a 20 20 20 20 20 20 28 73 65 74 71 20 65 6c 74 20 28 63 61 72 20 61 6c 69 73 74 29 0a 20 | st.......(setq.elt.(car.alist).. |
| 72e0 | 20 20 20 20 20 20 20 20 20 20 20 64 69 72 20 28 63 61 72 20 65 6c 74 29 0a 20 20 20 20 20 20 20 | ...........dir.(car.elt)........ |
| 7300 | 20 20 20 20 20 3b 3b 20 75 73 65 20 60 3c 3d 27 20 28 6e 6f 74 20 60 3c 27 29 20 61 73 20 73 75 | .....;;.use.`<='.(not.`<').as.su |
| 7320 | 62 64 69 72 20 6c 69 6e 65 20 69 73 20 70 61 72 74 20 6f 66 20 73 75 62 64 69 72 0a 20 20 20 20 | bdir.line.is.part.of.subdir..... |
| 7340 | 20 20 20 20 20 20 20 20 61 6c 69 73 74 20 28 69 66 20 28 3c 3d 20 28 64 69 72 65 64 2d 67 65 74 | ........alist.(if.(<=.(dired-get |
| 7360 | 2d 73 75 62 64 69 72 2d 6d 69 6e 20 65 6c 74 29 20 68 65 72 65 29 0a 20 20 20 20 20 20 20 20 20 | -subdir-min.elt).here).......... |
| 7380 | 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 20 20 20 20 20 20 20 3b 20 66 6f 75 6e 64 0a 20 | .............nil.......;.found.. |
| 73a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 64 72 20 61 6c 69 73 74 29 29 29 | ...................(cdr.alist))) |
| 73c0 | 29 0a 20 20 20 20 3b 3b 20 64 69 72 65 64 2d 73 75 62 64 69 72 3a 20 6d 6f 64 69 66 79 20 64 69 | ).....;;.dired-subdir:.modify.di |
| 73e0 | 72 20 68 65 72 65 20 69 66 20 77 65 20 61 72 65 20 69 6e 20 61 20 22 73 75 62 74 72 65 65 22 20 | r.here.if.we.are.in.a."subtree". |
| 7400 | 76 69 65 77 0a 20 20 20 20 28 2d 77 68 65 6e 2d 6c 65 74 20 28 70 61 72 65 6e 74 20 28 64 69 72 | view.....(-when-let.(parent.(dir |
| 7420 | 65 64 2d 73 75 62 74 72 65 65 2d 2d 67 65 74 2d 6f 76 29 29 0a 20 20 20 20 20 20 28 73 65 74 71 | ed-subtree--get-ov)).......(setq |
| 7440 | 20 64 69 72 20 28 63 6f 6e 63 61 74 20 28 6f 76 65 72 6c 61 79 2d 67 65 74 20 70 61 72 65 6e 74 | .dir.(concat.(overlay-get.parent |
| 7460 | 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6e 61 6d 65 29 20 22 2f 22 29 29 29 0a 20 20 20 | .'dired-subtree-name)."/"))).... |
| 7480 | 20 3b 3b 20 65 6e 64 0a 20 20 20 20 28 69 66 20 6c 6f 63 61 6c 70 0a 20 20 20 20 20 20 20 20 28 | .;;.end.....(if.localp.........( |
| 74a0 | 64 69 72 65 64 2d 6d 61 6b 65 2d 72 65 6c 61 74 69 76 65 20 64 69 72 20 64 65 66 61 75 6c 74 2d | dired-make-relative.dir.default- |
| 74c0 | 64 69 72 65 63 74 6f 72 79 29 0a 20 20 20 20 20 20 64 69 72 29 29 29 0a 0a 3b 3b 20 53 69 6e 63 | directory).......dir)))..;;.Sinc |
| 74e0 | 65 20 74 68 65 20 74 72 65 65 2d 69 6e 73 65 72 74 65 64 20 64 69 72 65 63 74 6f 72 79 20 69 73 | e.the.tree-inserted.directory.is |
| 7500 | 20 6e 6f 74 20 69 6e 20 74 68 65 20 64 69 72 65 64 2d 73 75 62 64 69 72 2d 61 6c 69 73 74 2c 0a | .not.in.the.dired-subdir-alist,. |
| 7520 | 3b 3b 20 77 65 20 6e 65 65 64 20 74 6f 20 67 75 61 72 64 20 61 67 61 69 6e 73 74 20 6e 69 6c 2e | ;;.we.need.to.guard.against.nil. |
| 7540 | 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 67 65 74 2d 73 75 62 64 69 72 20 28 29 0a 20 20 22 52 | .(defun.dired-get-subdir.()..."R |
| 7560 | 65 74 75 72 6e 20 74 68 65 20 73 75 62 64 69 72 20 6e 61 6d 65 20 6f 6e 20 74 68 69 73 20 6c 69 | eturn.the.subdir.name.on.this.li |
| 7580 | 6e 65 2c 20 6f 72 20 6e 69 6c 20 69 66 20 6e 6f 74 20 6f 6e 20 61 20 68 65 61 64 65 72 6c 69 6e | ne,.or.nil.if.not.on.a.headerlin |
| 75a0 | 65 2e 22 0a 20 20 3b 3b 20 4c 6f 6f 6b 20 75 70 20 69 6e 20 74 68 65 20 61 6c 69 73 74 20 77 68 | e."...;;.Look.up.in.the.alist.wh |
| 75c0 | 65 74 68 65 72 20 74 68 69 73 20 69 73 20 61 20 68 65 61 64 65 72 6c 69 6e 65 2e 0a 20 20 28 73 | ether.this.is.a.headerline....(s |
| 75e0 | 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 28 6c 65 74 20 28 28 63 75 72 2d 64 69 72 | ave-excursion.....(let.((cur-dir |
| 7600 | 20 28 64 69 72 65 64 2d 63 75 72 72 65 6e 74 2d 64 69 72 65 63 74 6f 72 79 29 29 29 0a 20 20 20 | .(dired-current-directory))).... |
| 7620 | 20 20 20 28 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 29 20 20 20 20 20 20 20 3b 20 61 | ...(beginning-of-line).......;.a |
| 7640 | 6c 69 73 74 20 73 74 6f 72 65 73 20 62 2d 6f 2d 6c 20 70 6f 73 69 74 69 6f 6e 73 0a 20 20 20 20 | list.stores.b-o-l.positions..... |
| 7660 | 20 20 28 61 6e 64 20 28 7a 65 72 6f 70 20 28 2d 20 28 70 6f 69 6e 74 29 0a 20 20 20 20 20 20 20 | ..(and.(zerop.(-.(point)........ |
| 7680 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 64 69 72 65 64 2d 67 65 74 2d 73 75 62 | ..............(or.(dired-get-sub |
| 76a0 | 64 69 72 2d 6d 69 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | dir-min......................... |
| 76c0 | 20 20 28 61 73 73 6f 63 20 63 75 72 2d 64 69 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ..(assoc.cur-dir................ |
| 76e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 65 64 2d 73 75 62 64 69 72 2d 61 | ..................dired-subdir-a |
| 7700 | 6c 69 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | list)).......................... |
| 7720 | 30 29 29 29 20 3b 3b 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 3a 20 72 65 74 75 72 6e 20 7a 65 | 0))).;;.dired-subtree:.return.ze |
| 7740 | 72 6f 20 69 66 20 63 75 72 72 65 6e 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ro.if.current................... |
| 7760 | 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 64 69 72 20 69 73 20 6e 6f 74 20 69 6e 20 60 64 69 | ............;;.dir.is.not.in.`di |
| 7780 | 72 65 64 2d 73 75 62 64 69 72 2d 61 6c 69 73 74 27 2e 0a 20 20 20 20 20 20 20 20 20 20 20 63 75 | red-subdir-alist'.............cu |
| 77a0 | 72 2d 64 69 72 29 29 29 29 0a 0a 28 70 72 6f 76 69 64 65 20 27 64 69 72 65 64 2d 73 75 62 74 72 | r-dir))))..(provide.'dired-subtr |
| 77c0 | 65 65 29 0a 0a 3b 3b 3b 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2e 65 6c 20 65 6e 64 73 20 68 | ee)..;;;.dired-subtree.el.ends.h |
| 77e0 | 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ere............................. |
| 7800 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7820 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7840 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7860 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7880 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 78a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 78c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 78e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7900 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7920 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7940 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7960 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7980 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 79a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 79c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 79e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7a00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7a20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7a40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7a60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7a80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7aa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7ac0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7ae0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7b00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7b20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7b40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7b60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7b80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7ba0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7bc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7be0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7c00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7c20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7c40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7c60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7c80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7ca0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7cc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7ce0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7d00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7d20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7d40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7d60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7d80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7da0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7dc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7de0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7e00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7e20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7e40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7e60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7e80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7ea0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7ec0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7ee0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7f00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7f20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7f40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7f60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7f80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7fa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7fc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7fe0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8000 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8020 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8040 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8060 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8080 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 80a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 80c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 80e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8100 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8120 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8140 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8160 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8180 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 81a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 81c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 81e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8200 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8220 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8240 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8260 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8280 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 82a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 82c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 82e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8300 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8320 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8340 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8360 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8380 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 83a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 83c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 83e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8400 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8420 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8440 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8460 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8480 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 84a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 84c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 84e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8500 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8520 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8540 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8560 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8580 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 85a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 85c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 85e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8600 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8620 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8640 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8660 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8680 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 86a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 86c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 86e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8700 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8720 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8740 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8760 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8780 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 87a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 87c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 87e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8800 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8820 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8840 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8860 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8880 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 88a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 88c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 88e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8900 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8920 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8940 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8960 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8980 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 89a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 89c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 89e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8a00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8a20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8a40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8a60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8a80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8aa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8ac0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8ae0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8b00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8b20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8b40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8b60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8b80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8ba0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8bc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8be0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8c00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8c20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8c40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8c60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8c80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8ca0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8cc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8ce0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8d00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8d20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8d40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8d60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8d80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8da0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8dc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8de0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8e00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8e20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8e40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8e60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8e80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8ea0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8ec0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8ee0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8f00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8f20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8f40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8f60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8f80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8fa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8fc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 8fe0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9000 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9020 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9040 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9060 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9080 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 90a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 90c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 90e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9100 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9120 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9140 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9160 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9180 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 91a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 91c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 91e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9200 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9220 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9240 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9260 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9280 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 92a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 92c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 92e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9300 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9320 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9340 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9360 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9380 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 93a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 93c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 93e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9400 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9420 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9440 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9460 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9480 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 94a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 94c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 94e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9500 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9520 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9540 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9560 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9580 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 95a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 95c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 95e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9600 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9620 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9640 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9660 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9680 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 96a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 96c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 96e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9700 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9720 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9740 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9760 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9780 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 97a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 97c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 97e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9800 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9820 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9840 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9860 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9880 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 98a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 98c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 98e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9900 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9920 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9940 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9960 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9980 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 99a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 99c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 99e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9a00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9a20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9a40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9a60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9a80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9aa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9ac0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9ae0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9b00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9b20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9b40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9b60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9b80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9ba0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9bc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9be0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9c00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9c20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9c40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9c60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9c80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9ca0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9cc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9ce0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9d00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9d20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9d40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9d60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9d80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9da0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9dc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9de0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9e00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9e20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9e40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9e60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9e80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9ea0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9ec0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9ee0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9f00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9f20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9f40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9f60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9f80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9fa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9fc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9fe0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
 |
index : dotemacs.git | |
| my Emacs configuration | Craig Jennings |
| summaryrefslogtreecommitdiff |
blob: 560d9a3a968cfe8d748e04f19756ef4e01c5d70d (plain)