| ofs | hex dump | ascii |
|---|
| 0000 | 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 32 30 32 33 30 35 31 32 2e 31 31 30 37 2f 00 00 00 00 | dired-subtree-20230512.1107/.... |
| 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 33 36 00 20 35 00 00 00 | 0000000.00000000000.013536..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 33 30 35 31 32 2e 31 31 30 37 2f 64 69 72 65 | dired-subtree-20230512.1107/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 30 37 32 31 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 37 33 37 35 00 20 30 00 00 00 | 0000721.00000000000.017375..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 | 28 64 65 66 69 6e 65 2d 70 61 63 6b 61 67 65 20 22 64 69 72 65 64 2d 73 75 62 74 72 65 65 22 20 | (define-package."dired-subtree". |
| 0420 | 22 32 30 32 33 30 35 31 32 2e 31 31 30 37 22 20 22 49 6e 73 65 72 74 20 73 75 62 64 69 72 65 63 | "20230512.1107"."Insert.subdirec |
| 0440 | 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 22 0a 20 | tories.in.a.tree-like.fashion".. |
| 0460 | 20 27 28 28 64 61 73 68 20 22 32 2e 35 2e 30 22 29 0a 20 20 20 20 28 64 69 72 65 64 2d 68 61 63 | .'((dash."2.5.0").....(dired-hac |
| 0480 | 6b 73 2d 75 74 69 6c 73 20 22 30 2e 30 2e 31 22 29 29 0a 20 20 3a 63 6f 6d 6d 69 74 20 22 35 32 | ks-utils."0.0.1"))...:commit."52 |
| 04a0 | 33 66 35 31 62 34 31 35 32 61 33 62 66 34 65 36 30 66 65 35 37 66 35 31 32 37 33 32 63 36 39 38 | 3f51b4152a3bf4e60fe57f512732c698 |
| 04c0 | 62 35 63 39 36 66 22 20 3a 61 75 74 68 6f 72 73 0a 20 20 27 28 28 22 4d 61 74 c3 ba c5 a1 20 47 | b5c96f".:authors...'(("Mat.....G |
| 04e0 | 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 6f 6d | oljer"..."matus.goljer@gmail.com |
| 0500 | 22 29 29 0a 20 20 3a 6d 61 69 6e 74 61 69 6e 65 72 73 0a 20 20 27 28 28 22 4d 61 74 c3 ba c5 a1 | "))...:maintainers...'(("Mat.... |
| 0520 | 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 |
| 0540 | 6f 6d 22 29 29 0a 20 20 3a 6d 61 69 6e 74 61 69 6e 65 72 0a 20 20 27 28 22 4d 61 74 c3 ba c5 a1 | om"))...:maintainer...'("Mat.... |
| 0560 | 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 |
| 0580 | 6f 6d 22 29 0a 20 20 3a 6b 65 79 77 6f 72 64 73 0a 20 20 27 28 22 66 69 6c 65 73 22 29 29 0a 3b | om")...:keywords...'("files")).; |
| 05a0 | 3b 20 4c 6f 63 61 6c 20 56 61 72 69 61 62 6c 65 73 3a 0a 3b 3b 20 6e 6f 2d 62 79 74 65 2d 63 6f | ;.Local.Variables:.;;.no-byte-co |
| 05c0 | 6d 70 69 6c 65 3a 20 74 0a 3b 3b 20 45 6e 64 3a 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | mpile:.t.;;.End:................ |
| 05e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0600 | 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 32 30 32 33 30 35 31 32 2e 31 31 30 37 2f 64 69 72 65 | dired-subtree-20230512.1107/dire |
| 0620 | 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.................... |
| 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 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 |
| 0680 | 30 30 36 36 35 36 35 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 36 36 34 30 00 20 30 00 00 00 | 0066565.00000000000.016640..0... |
| 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 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................... |
| 0720 | 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................... |
| 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 | 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. |
| 0820 | 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 |
| 0840 | 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 |
| 0860 | 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 |
| 0880 | 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. |
| 08a0 | 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 |
| 08c0 | 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 |
| 08e0 | 65 79 77 6f 72 64 73 3a 20 66 69 6c 65 73 0a 3b 3b 20 56 65 72 73 69 6f 6e 3a 20 30 2e 30 2e 31 | eywords:.files.;;.Version:.0.0.1 |
| 0900 | 0a 3b 3b 20 43 72 65 61 74 65 64 3a 20 32 35 74 68 20 46 65 62 72 75 61 72 79 20 32 30 31 34 0a | .;;.Created:.25th.February.2014. |
| 0920 | 3b 3b 20 50 61 63 6b 61 67 65 2d 52 65 71 75 69 72 65 73 3a 20 28 28 64 61 73 68 20 22 32 2e 35 | ;;.Package-Requires:.((dash."2.5 |
| 0940 | 2e 30 22 29 20 28 64 69 72 65 64 2d 68 61 63 6b 73 2d 75 74 69 6c 73 20 22 30 2e 30 2e 31 22 29 | .0").(dired-hacks-utils."0.0.1") |
| 0960 | 29 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 | )..;;.This.program.is.free.softw |
| 0980 | 61 72 65 3b 20 79 6f 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 | are;.you.can.redistribute.it.and |
| 09a0 | 2f 6f 72 20 6d 6f 64 69 66 79 0a 3b 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 | /or.modify.;;.it.under.the.terms |
| 09c0 | 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 63 20 4c 69 63 65 6e | .of.the.GNU.General.Public.Licen |
| 09e0 | 73 65 20 61 73 20 70 75 62 6c 69 73 68 65 64 20 62 79 0a 3b 3b 20 74 68 65 20 46 72 65 65 20 53 | se.as.published.by.;;.the.Free.S |
| 0a00 | 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 | oftware.Foundation,.either.versi |
| 0a20 | 6f 6e 20 33 20 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 2c 20 6f 72 0a 3b 3b 20 28 61 74 20 79 | on.3.of.the.License,.or.;;.(at.y |
| 0a40 | 6f 75 72 20 6f 70 74 69 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 0a | our.option).any.later.version... |
| 0a60 | 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 | ;;.This.program.is.distributed.i |
| 0a80 | 6e 20 74 68 65 20 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 | n.the.hope.that.it.will.be.usefu |
| 0aa0 | 6c 2c 0a 3b 3b 20 62 75 74 20 57 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 | l,.;;.but.WITHOUT.ANY.WARRANTY;. |
| 0ac0 | 77 69 74 68 6f 75 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 | without.even.the.implied.warrant |
| 0ae0 | 79 20 6f 66 0a 3b 3b 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 | y.of.;;.MERCHANTABILITY.or.FITNE |
| 0b00 | 53 53 20 46 4f 52 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 | SS.FOR.A.PARTICULAR.PURPOSE...Se |
| 0b20 | 65 20 74 68 65 0a 3b 3b 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 | e.the.;;.GNU.General.Public.Lice |
| 0b40 | 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 0a 3b 3b 20 59 6f 75 20 73 68 | nse.for.more.details...;;.You.sh |
| 0b60 | 6f 75 6c 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 | ould.have.received.a.copy.of.the |
| 0b80 | 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 | .GNU.General.Public.License.;;.a |
| 0ba0 | 6c 6f 6e 67 20 77 69 74 68 20 74 68 69 73 20 70 72 6f 67 72 61 6d 2e 20 20 49 66 20 6e 6f 74 2c | long.with.this.program...If.not, |
| 0bc0 | 20 73 65 65 20 3c 68 74 74 70 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 | .see.<http://www.gnu.org/license |
| 0be0 | 73 2f 3e 2e 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 20 49 6e 74 72 6f 64 | s/>...;;;.Commentary:..;;.Introd |
| 0c00 | 75 63 74 69 6f 6e 0a 3b 3b 20 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a 3b 3b 20 54 68 65 20 62 | uction.;;.------------..;;.The.b |
| 0c20 | 61 73 69 63 20 63 6f 6d 6d 61 6e 64 20 74 6f 20 77 6f 72 6b 20 77 69 74 68 20 73 75 62 64 69 72 | asic.command.to.work.with.subdir |
| 0c40 | 65 63 74 6f 72 69 65 73 20 69 6e 20 64 69 72 65 64 20 69 73 20 60 69 27 2c 0a 3b 3b 20 77 68 69 | ectories.in.dired.is.`i',.;;.whi |
| 0c60 | 63 68 20 69 6e 73 65 72 74 73 20 74 68 65 20 73 75 62 64 69 72 65 63 74 6f 72 79 20 61 73 20 61 | ch.inserts.the.subdirectory.as.a |
| 0c80 | 20 73 65 70 61 72 61 74 65 20 6c 69 73 74 69 6e 67 20 69 6e 20 74 68 65 20 61 63 74 69 76 65 0a | .separate.listing.in.the.active. |
| 0ca0 | 3b 3b 20 64 69 72 65 64 20 62 75 66 66 65 72 2e 0a 0a 3b 3b 20 54 68 69 73 20 70 61 63 6b 61 67 | ;;.dired.buffer...;;.This.packag |
| 0cc0 | 65 20 64 65 66 69 6e 65 73 20 66 75 6e 63 74 69 6f 6e 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 | e.defines.function.`dired-subtre |
| 0ce0 | 65 2d 69 6e 73 65 72 74 27 20 77 68 69 63 68 20 69 6e 73 74 65 61 64 0a 3b 3b 20 69 6e 73 65 72 | e-insert'.which.instead.;;.inser |
| 0d00 | 74 73 20 74 68 65 20 73 75 62 64 69 72 65 63 74 6f 72 79 20 64 69 72 65 63 74 6c 79 20 62 65 6c | ts.the.subdirectory.directly.bel |
| 0d20 | 6f 77 20 69 74 73 20 6c 69 6e 65 20 69 6e 20 74 68 65 20 6f 72 69 67 69 6e 61 6c 0a 3b 3b 20 6c | ow.its.line.in.the.original.;;.l |
| 0d40 | 69 73 74 69 6e 67 2c 20 61 6e 64 20 69 6e 64 65 6e 74 20 74 68 65 20 6c 69 73 74 69 6e 67 20 6f | isting,.and.indent.the.listing.o |
| 0d60 | 66 20 73 75 62 64 69 72 65 63 74 6f 72 79 20 74 6f 20 72 65 73 65 6d 62 6c 65 20 61 0a 3b 3b 20 | f.subdirectory.to.resemble.a.;;. |
| 0d80 | 74 72 65 65 2d 6c 69 6b 65 20 73 74 72 75 63 74 75 72 65 20 28 73 6f 6d 65 77 68 61 74 20 73 69 | tree-like.structure.(somewhat.si |
| 0da0 | 6d 69 6c 61 72 20 74 6f 20 74 72 65 65 28 31 29 20 65 78 63 65 70 74 20 74 68 65 20 70 72 65 74 | milar.to.tree(1).except.the.pret |
| 0dc0 | 74 79 0a 3b 3b 20 67 72 61 70 68 69 63 73 29 2e 20 20 54 68 65 20 74 72 65 65 20 64 69 73 70 6c | ty.;;.graphics)...The.tree.displ |
| 0de0 | 61 79 20 69 73 20 73 6f 6d 65 77 68 61 74 20 6d 6f 72 65 20 69 6e 74 75 69 74 69 76 65 20 74 68 | ay.is.somewhat.more.intuitive.th |
| 0e00 | 61 6e 20 74 68 65 0a 3b 3b 20 64 65 66 61 75 6c 74 20 22 66 6c 61 74 22 20 73 75 62 64 69 72 65 | an.the.;;.default."flat".subdire |
| 0e20 | 63 74 6f 72 79 20 6d 61 6e 69 70 75 6c 61 74 69 6f 6e 20 70 72 6f 76 69 64 65 64 20 62 79 20 60 | ctory.manipulation.provided.by.` |
| 0e40 | 69 27 2e 0a 0a 3b 3b 20 54 68 65 72 65 20 61 72 65 20 73 65 76 65 72 61 6c 20 70 72 65 73 65 6e | i'...;;.There.are.several.presen |
| 0e60 | 74 61 74 69 6f 6e 20 6f 70 74 69 6f 6e 73 20 61 6e 64 20 66 61 63 65 73 20 79 6f 75 20 63 61 6e | tation.options.and.faces.you.can |
| 0e80 | 20 63 75 73 74 6f 6d 69 7a 65 0a 3b 3b 20 74 6f 20 63 68 61 6e 67 65 20 74 68 65 20 77 61 79 20 | .customize.;;.to.change.the.way. |
| 0ea0 | 73 75 62 74 72 65 65 73 20 61 72 65 20 64 69 73 70 6c 61 79 65 64 2e 0a 0a 3b 3b 20 59 6f 75 20 | subtrees.are.displayed...;;.You. |
| 0ec0 | 63 61 6e 20 66 75 72 74 68 65 72 20 72 65 6d 6f 76 65 20 74 68 65 20 75 6e 77 61 6e 74 65 64 20 | can.further.remove.the.unwanted. |
| 0ee0 | 6c 69 6e 65 73 20 66 72 6f 6d 20 74 68 65 20 73 75 62 74 72 65 65 20 62 79 20 75 73 69 6e 67 0a | lines.from.the.subtree.by.using. |
| 0f00 | 3b 3b 20 60 6b 27 20 63 6f 6d 6d 61 6e 64 20 6f 72 20 73 6f 6d 65 20 6f 66 20 74 68 65 20 62 75 | ;;.`k'.command.or.some.of.the.bu |
| 0f20 | 69 6c 74 2d 69 6e 20 22 66 6f 63 75 73 69 6e 67 22 20 66 75 6e 63 74 69 6f 6e 73 2c 20 73 75 63 | ilt-in."focusing".functions,.suc |
| 0f40 | 68 20 61 73 0a 3b 3b 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6f 6e 6c 79 2d 2a 27 20 28 | h.as.;;.`dired-subtree-only-*'.( |
| 0f60 | 73 65 65 20 6c 69 73 74 20 62 65 6c 6f 77 29 2e 0a 0a 3b 3b 20 49 66 20 79 6f 75 20 68 61 76 65 | see.list.below)...;;.If.you.have |
| 0f80 | 20 74 68 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 79 6f 75 | .the.package.`dired-filter',.you |
| 0fa0 | 20 63 61 6e 20 61 64 64 69 74 69 6f 6e 61 6c 6c 79 20 66 69 6c 74 65 72 0a 3b 3b 20 74 68 65 20 | .can.additionally.filter.;;.the. |
| 0fc0 | 73 75 62 74 72 65 65 73 20 77 69 74 68 20 67 6c 6f 62 61 6c 20 6f 72 20 6c 6f 63 61 6c 20 66 69 | subtrees.with.global.or.local.fi |
| 0fe0 | 6c 74 65 72 73 2e 0a 0a 3b 3b 20 41 20 64 65 6d 6f 20 6f 66 20 62 61 73 69 63 20 66 75 6e 63 74 | lters...;;.A.demo.of.basic.funct |
| 1000 | 69 6f 6e 61 6c 69 74 79 20 69 73 20 61 76 61 69 6c 61 62 6c 65 20 6f 6e 20 79 6f 75 74 75 62 65 | ionality.is.available.on.youtube |
| 1020 | 3a 0a 3b 3b 20 68 74 74 70 73 3a 2f 2f 77 77 77 2e 79 6f 75 74 75 62 65 2e 63 6f 6d 2f 77 61 74 | :.;;.https://www.youtube.com/wat |
| 1040 | 63 68 3f 76 3d 7a 32 36 62 38 48 4b 46 73 4e 45 0a 0a 3b 3b 20 49 6e 74 65 72 61 63 74 69 76 65 | ch?v=z26b8HKFsNE..;;.Interactive |
| 1060 | 20 66 75 6e 63 74 69 6f 6e 73 0a 3b 3b 20 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d | .functions.;;.------------------ |
| 1080 | 2d 2d 2d 0a 0a 3b 3b 20 48 65 72 65 27 73 20 61 20 6c 69 73 74 20 6f 66 20 61 76 61 69 6c 61 62 | ---..;;.Here's.a.list.of.availab |
| 10a0 | 6c 65 20 69 6e 74 65 72 61 63 74 69 76 65 20 66 75 6e 63 74 69 6f 6e 73 2e 20 20 59 6f 75 20 63 | le.interactive.functions...You.c |
| 10c0 | 61 6e 20 72 65 61 64 0a 3b 3b 20 6d 6f 72 65 20 61 62 6f 75 74 20 65 61 63 68 20 6f 6e 65 20 62 | an.read.;;.more.about.each.one.b |
| 10e0 | 79 20 75 73 69 6e 67 20 74 68 65 20 62 75 69 6c 74 2d 69 6e 20 64 6f 63 75 6d 65 6e 74 61 74 69 | y.using.the.built-in.documentati |
| 1100 | 6f 6e 20 66 61 63 69 6c 69 74 69 65 73 0a 3b 3b 20 6f 66 20 65 6d 61 63 73 2e 20 20 49 74 20 69 | on.facilities.;;.of.emacs...It.i |
| 1120 | 73 20 61 64 76 69 63 65 64 20 74 6f 20 70 6c 61 63 65 20 62 69 6e 64 69 6e 67 73 20 66 6f 72 20 | s.adviced.to.place.bindings.for. |
| 1140 | 74 68 65 73 65 20 69 6e 74 6f 20 61 0a 3b 3b 20 63 6f 6e 76 65 6e 69 65 6e 74 20 70 72 65 66 69 | these.into.a.;;.convenient.prefi |
| 1160 | 78 20 6b 65 79 20 6d 61 70 2c 20 66 6f 72 20 65 78 61 6d 70 6c 65 20 43 2d 2c 0a 0a 3b 3b 20 2a | x.key.map,.for.example.C-,..;;.* |
| 1180 | 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 69 6e 73 65 72 74 27 0a 3b 3b 20 2a 20 60 64 69 | .`dired-subtree-insert'.;;.*.`di |
| 11a0 | 72 65 64 2d 73 75 62 74 72 65 65 2d 72 65 6d 6f 76 65 27 0a 3b 3b 20 2a 20 60 64 69 72 65 64 2d | red-subtree-remove'.;;.*.`dired- |
| 11c0 | 73 75 62 74 72 65 65 2d 74 6f 67 67 6c 65 27 0a 3b 3b 20 2a 20 60 64 69 72 65 64 2d 73 75 62 74 | subtree-toggle'.;;.*.`dired-subt |
| 11e0 | 72 65 65 2d 63 79 63 6c 65 27 0a 3b 3b 20 2a 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 72 | ree-cycle'.;;.*.`dired-subtree-r |
| 1200 | 65 76 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 6e 61 72 72 6f | evert'.;;.*.`dired-subtree-narro |
| 1220 | 77 27 0a 3b 3b 20 2a 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 75 70 27 0a 3b 3b 20 2a 20 | w'.;;.*.`dired-subtree-up'.;;.*. |
| 1240 | 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 64 6f 77 6e 27 0a 3b 3b 20 2a 20 60 64 69 72 65 64 | `dired-subtree-down'.;;.*.`dired |
| 1260 | 2d 73 75 62 74 72 65 65 2d 6e 65 78 74 2d 73 69 62 6c 69 6e 67 27 0a 3b 3b 20 2a 20 60 64 69 72 | -subtree-next-sibling'.;;.*.`dir |
| 1280 | 65 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 27 0a 3b 3b 20 | ed-subtree-previous-sibling'.;;. |
| 12a0 | 2a 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 62 65 67 69 6e 6e 69 6e 67 27 0a 3b 3b 20 2a | *.`dired-subtree-beginning'.;;.* |
| 12c0 | 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 65 6e 64 27 0a 3b 3b 20 2a 20 60 64 69 72 65 64 | .`dired-subtree-end'.;;.*.`dired |
| 12e0 | 2d 73 75 62 74 72 65 65 2d 6d 61 72 6b 2d 73 75 62 74 72 65 65 27 0a 3b 3b 20 2a 20 60 64 69 72 | -subtree-mark-subtree'.;;.*.`dir |
| 1300 | 65 64 2d 73 75 62 74 72 65 65 2d 75 6e 6d 61 72 6b 2d 73 75 62 74 72 65 65 27 0a 3b 3b 20 2a 20 | ed-subtree-unmark-subtree'.;;.*. |
| 1320 | 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6f 6e 6c 79 2d 74 68 69 73 2d 66 69 6c 65 27 0a 3b | `dired-subtree-only-this-file'.; |
| 1340 | 3b 20 2a 20 60 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 | ;.*.`dired-subtree-only-this-dir |
| 1360 | 65 63 74 6f 72 79 27 0a 0a 3b 3b 20 49 66 20 79 6f 75 20 68 61 76 65 20 70 61 63 6b 61 67 65 20 | ectory'..;;.If.you.have.package. |
| 1380 | 60 64 69 72 65 64 2d 66 69 6c 74 65 72 27 2c 20 61 64 64 69 74 69 6f 6e 61 6c 20 63 6f 6d 6d 61 | `dired-filter',.additional.comma |
| 13a0 | 6e 64 0a 3b 3b 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 61 70 70 6c 79 2d 66 69 6c 74 65 | nd.;;.`dired-subtree-apply-filte |
| 13c0 | 72 27 20 69 73 20 61 76 61 69 6c 61 62 6c 65 2e 0a 0a 3b 3b 20 53 65 65 20 68 74 74 70 73 3a 2f | r'.is.available...;;.See.https:/ |
| 13e0 | 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 6b 73 20 66 6f | /github.com/Fuco1/dired-hacks.fo |
| 1400 | 72 20 74 68 65 20 65 6e 74 69 72 65 20 63 6f 6c 6c 65 63 74 69 6f 6e 2e 0a 0a 3b 3b 3b 20 43 6f | r.the.entire.collection...;;;.Co |
| 1420 | 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 64 69 72 65 64 2d 68 61 63 6b 73 2d 75 74 69 6c 73 | de:..(require.'dired-hacks-utils |
| 1440 | 29 0a 28 72 65 71 75 69 72 65 20 27 64 61 73 68 29 0a 28 72 65 71 75 69 72 65 20 27 63 6c 2d 6c | ).(require.'dash).(require.'cl-l |
| 1460 | 69 62 29 0a 0a 28 64 65 66 67 72 6f 75 70 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 20 28 29 0a | ib)..(defgroup.dired-subtree.(). |
| 1480 | 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 61 20 74 72 | .."Insert.subdirectories.in.a.tr |
| 14a0 | 65 65 2d 6c 69 6b 65 20 66 61 73 68 69 6f 6e 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 | ee-like.fashion."...:group.'dire |
| 14c0 | 64 2d 68 61 63 6b 73 0a 20 20 3a 70 72 65 66 69 78 20 22 64 69 72 65 64 2d 73 75 62 74 72 65 65 | d-hacks...:prefix."dired-subtree |
| 14e0 | 2d 22 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 6c 69 | -")..(defcustom.dired-subtree-li |
| 1500 | 6e 65 2d 70 72 65 66 69 78 20 22 20 20 22 0a 20 20 22 41 20 70 72 65 66 69 78 20 70 75 74 20 69 | ne-prefix.".."..."A.prefix.put.i |
| 1520 | 6e 74 6f 20 65 61 63 68 20 6e 65 73 74 65 64 20 73 75 62 74 72 65 65 2e 0a 0a 54 68 65 20 70 72 | nto.each.nested.subtree...The.pr |
| 1540 | 65 66 69 78 20 69 73 20 72 65 70 65 61 74 65 64 20 5c 22 64 65 70 74 68 5c 22 20 74 69 6d 65 73 | efix.is.repeated.\"depth\".times |
| 1560 | 2e 0a 0a 41 6c 74 65 72 6e 61 74 69 76 65 6c 79 2c 20 69 74 20 63 61 6e 20 62 65 20 61 20 66 75 | ...Alternatively,.it.can.be.a.fu |
| 1580 | 6e 63 74 69 6f 6e 20 74 61 6b 69 6e 67 20 6f 6e 65 20 61 72 67 75 6d 65 6e 74 2d 2d 2d 74 68 65 | nction.taking.one.argument---the |
| 15a0 | 0a 64 65 70 74 68 2d 2d 2d 74 68 61 74 20 63 72 65 61 74 65 73 20 74 68 65 20 70 72 65 66 69 78 | .depth---that.creates.the.prefix |
| 15c0 | 2e 22 0a 20 20 3a 74 79 70 65 20 27 28 63 68 6f 69 63 65 20 73 74 72 69 6e 67 20 66 75 6e 63 74 | ."...:type.'(choice.string.funct |
| 15e0 | 69 6f 6e 29 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 | ion)...:group.'dired-subtree)..( |
| 1600 | 64 65 66 63 75 73 74 6f 6d 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6c 69 6e 65 2d 70 72 65 | defcustom.dired-subtree-line-pre |
| 1620 | 66 69 78 2d 66 61 63 65 20 27 70 61 72 65 6e 74 73 0a 20 20 22 53 70 65 63 69 66 69 65 73 20 68 | fix-face.'parents..."Specifies.h |
| 1640 | 6f 77 20 74 68 65 20 70 72 65 66 69 78 20 69 73 20 66 6f 6e 74 69 66 69 65 64 2e 22 0a 20 20 3a | ow.the.prefix.is.fontified."...: |
| 1660 | 74 79 70 65 20 27 28 72 61 64 69 6f 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 | type.'(radio...........(const.:t |
| 1680 | 61 67 20 22 4e 6f 20 66 61 63 65 20 61 70 70 6c 69 65 64 22 20 6e 69 6c 29 0a 20 20 20 20 20 20 | ag."No.face.applied".nil)....... |
| 16a0 | 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 49 6e 68 65 72 69 74 20 66 72 6f 6d 20 63 75 | ....(const.:tag."Inherit.from.cu |
| 16c0 | 72 72 65 6e 74 20 73 75 62 74 72 65 65 22 20 73 75 62 74 72 65 65 29 0a 20 20 20 20 20 20 20 20 | rrent.subtree".subtree)......... |
| 16e0 | 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 49 6e 68 65 72 69 74 20 66 72 6f 6d 20 61 6c 6c 20 | ..(const.:tag."Inherit.from.all. |
| 1700 | 70 61 72 65 6e 74 73 22 20 70 61 72 65 6e 74 73 29 29 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 | parents".parents))...:group.'dir |
| 1720 | 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 |
| 1740 | 62 74 72 65 65 2d 75 73 65 2d 62 61 63 6b 67 72 6f 75 6e 64 73 20 74 0a 20 20 22 57 68 65 6e 20 | btree-use-backgrounds.t..."When. |
| 1760 | 6e 6f 6e 2d 6e 69 6c 2c 20 61 64 64 20 61 20 62 61 63 6b 67 72 6f 75 6e 64 20 66 61 63 65 20 74 | non-nil,.add.a.background.face.t |
| 1780 | 6f 20 61 20 73 75 62 74 72 65 65 20 6c 69 73 74 69 6e 67 2e 22 0a 20 20 3a 74 79 70 65 20 27 62 | o.a.subtree.listing."...:type.'b |
| 17a0 | 6f 6f 6c 65 61 6e 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 | oolean...:group.'dired-subtree). |
| 17c0 | 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 61 66 74 65 72 2d | .(defcustom.dired-subtree-after- |
| 17e0 | 69 6e 73 65 72 74 2d 68 6f 6f 6b 20 28 29 0a 20 20 22 48 6f 6f 6b 20 72 75 6e 20 61 74 20 74 68 | insert-hook.()..."Hook.run.at.th |
| 1800 | 65 20 65 6e 64 20 6f 66 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 69 6e 73 65 72 74 27 2e | e.end.of.`dired-subtree-insert'. |
| 1820 | 22 0a 20 20 3a 74 79 70 65 20 27 68 6f 6f 6b 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d | "...:type.'hook...:group.'dired- |
| 1840 | 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 62 74 72 | subtree)..(defcustom.dired-subtr |
| 1860 | 65 65 2d 61 66 74 65 72 2d 72 65 6d 6f 76 65 2d 68 6f 6f 6b 20 28 29 0a 20 20 22 48 6f 6f 6b 20 | ee-after-remove-hook.()..."Hook. |
| 1880 | 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 62 74 72 65 65 | run.at.the.end.of.`dired-subtree |
| 18a0 | 2d 72 65 6d 6f 76 65 27 2e 22 0a 20 20 3a 74 79 70 65 20 27 68 6f 6f 6b 0a 20 20 3a 67 72 6f 75 | -remove'."...:type.'hook...:grou |
| 18c0 | 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 6f 6d 20 64 69 | p.'dired-subtree)..(defcustom.di |
| 18e0 | 72 65 64 2d 73 75 62 74 72 65 65 2d 63 79 63 6c 65 2d 64 65 70 74 68 20 33 0a 20 20 22 44 65 66 | red-subtree-cycle-depth.3..."Def |
| 1900 | 61 75 6c 74 20 64 65 70 74 68 20 65 78 70 61 6e 64 65 64 20 62 79 20 60 64 69 72 65 64 2d 73 75 | ault.depth.expanded.by.`dired-su |
| 1920 | 62 74 72 65 65 2d 63 79 63 6c 65 27 2e 22 0a 20 20 3a 74 79 70 65 20 27 6e 61 74 6e 75 6d 0a 20 | btree-cycle'."...:type.'natnum.. |
| 1940 | 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 75 73 | .:group.'dired-subtree)..(defcus |
| 1960 | 74 6f 6d 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 69 67 6e 6f 72 65 64 2d 72 65 67 65 78 70 | tom.dired-subtree-ignored-regexp |
| 1980 | 0a 20 20 28 63 6f 6e 63 61 74 20 22 5e 22 20 28 72 65 67 65 78 70 2d 6f 70 74 20 76 63 2d 64 69 | ...(concat."^".(regexp-opt.vc-di |
| 19a0 | 72 65 63 74 6f 72 79 2d 65 78 63 6c 75 73 69 6f 6e 2d 6c 69 73 74 29 20 22 24 22 29 0a 20 20 22 | rectory-exclusion-list)."$")..." |
| 19c0 | 4d 61 74 63 68 69 6e 67 20 64 69 72 65 63 74 6f 72 69 65 73 20 77 69 6c 6c 20 6e 6f 74 20 62 65 | Matching.directories.will.not.be |
| 19e0 | 20 65 78 70 61 6e 64 65 64 20 69 6e 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 63 79 63 6c | .expanded.in.`dired-subtree-cycl |
| 1a00 | 65 27 2e 22 0a 20 20 3a 74 79 70 65 20 27 72 65 67 65 78 70 0a 20 20 3a 67 72 6f 75 70 20 27 64 | e'."...:type.'regexp...:group.'d |
| 1a20 | 69 72 65 64 2d 73 75 62 74 72 65 65 29 0a 0a 28 64 65 66 67 72 6f 75 70 20 64 69 72 65 64 2d 73 | ired-subtree)..(defgroup.dired-s |
| 1a40 | 75 62 74 72 65 65 2d 66 61 63 65 73 20 28 29 0a 20 20 22 46 61 63 65 73 20 75 73 65 64 20 69 6e | ubtree-faces.()..."Faces.used.in |
| 1a60 | 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 27 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 | .`dired-subtree'."...:group.'dir |
| 1a80 | 65 64 2d 73 75 62 74 72 65 65 29 0a 0a 28 64 65 66 66 61 63 65 20 64 69 72 65 64 2d 73 75 62 74 | ed-subtree)..(defface.dired-subt |
| 1aa0 | 72 65 65 2d 64 65 70 74 68 2d 31 2d 66 61 63 65 0a 20 20 27 28 28 74 20 28 3a 62 61 63 6b 67 72 | ree-depth-1-face...'((t.(:backgr |
| 1ac0 | 6f 75 6e 64 20 22 23 32 35 32 65 33 30 22 29 29 29 0a 20 20 22 42 61 63 6b 67 72 6f 75 6e 64 20 | ound."#252e30")))..."Background. |
| 1ae0 | 66 6f 72 20 64 65 70 74 68 20 31 20 73 75 62 74 72 65 65 73 22 0a 20 20 3a 67 72 6f 75 70 20 27 | for.depth.1.subtrees"...:group.' |
| 1b00 | 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 |
| 1b20 | 69 72 65 64 2d 73 75 62 74 72 65 65 2d 64 65 70 74 68 2d 32 2d 66 61 63 65 0a 20 20 27 28 28 74 | ired-subtree-depth-2-face...'((t |
| 1b40 | 20 28 3a 62 61 63 6b 67 72 6f 75 6e 64 20 22 23 32 33 32 61 32 62 22 29 29 29 0a 20 20 22 42 61 | .(:background."#232a2b")))..."Ba |
| 1b60 | 63 6b 67 72 6f 75 6e 64 20 66 6f 72 20 64 65 70 74 68 20 32 20 73 75 62 74 72 65 65 73 22 0a 20 | ckground.for.depth.2.subtrees".. |
| 1b80 | 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)..( |
| 1ba0 | 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 33 2d 66 61 | defface.dired-subtree-depth-3-fa |
| 1bc0 | 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 31 32 36 32 37 22 | ce...'((t.(:background."#212627" |
| 1be0 | 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 33 20 73 75 | )))..."Background.for.depth.3.su |
| 1c00 | 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- |
| 1c20 | 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 |
| 1c40 | 65 70 74 68 2d 34 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-4-face...'((t.(:background. |
| 1c60 | 22 23 31 65 32 32 32 33 22 29 29 29 0a 20 20 22 42 61 63 6b 67 72 6f 75 6e 64 20 66 6f 72 20 64 | "#1e2223")))..."Background.for.d |
| 1c80 | 65 70 74 68 20 34 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.4.subtrees"...:group.'dired |
| 1ca0 | 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 69 72 65 64 2d | -subtree-faces)..(defface.dired- |
| 1cc0 | 73 75 62 74 72 65 65 2d 64 65 70 74 68 2d 35 2d 66 61 63 65 0a 20 20 27 28 28 74 20 28 3a 62 61 | subtree-depth-5-face...'((t.(:ba |
| 1ce0 | 63 6b 67 72 6f 75 6e 64 20 22 23 31 63 31 64 31 65 22 29 29 29 0a 20 20 22 42 61 63 6b 67 72 6f | ckground."#1c1d1e")))..."Backgro |
| 1d00 | 75 6e 64 20 66 6f 72 20 64 65 70 74 68 20 35 20 73 75 62 74 72 65 65 73 22 0a 20 20 3a 67 72 6f | und.for.depth.5.subtrees"...:gro |
| 1d20 | 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 64 65 66 66 61 | up.'dired-subtree-faces)..(deffa |
| 1d40 | 63 65 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 64 65 70 74 68 2d 36 2d 66 61 63 65 0a 20 20 | ce.dired-subtree-depth-6-face... |
| 1d60 | 27 28 28 74 20 28 3a 62 61 63 6b 67 72 6f 75 6e 64 20 22 23 31 61 31 39 31 61 22 29 29 29 0a 20 | '((t.(:background."#1a191a"))).. |
| 1d80 | 20 22 42 61 63 6b 67 72 6f 75 6e 64 20 66 6f 72 20 64 65 70 74 68 20 36 20 73 75 62 74 72 65 65 | ."Background.for.depth.6.subtree |
| 1da0 | 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 73 | s"...:group.'dired-subtree-faces |
| 1dc0 | 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 6f 76 65 72 6c 61 79 | )..(defvar.dired-subtree-overlay |
| 1de0 | 73 20 6e 69 6c 0a 20 20 22 53 75 62 74 72 65 65 20 6f 76 65 72 6c 61 79 73 20 69 6e 20 74 68 69 | s.nil..."Subtree.overlays.in.thi |
| 1e00 | 73 20 62 75 66 66 65 72 2e 22 29 0a 28 6d 61 6b 65 2d 76 61 72 69 61 62 6c 65 2d 62 75 66 66 65 | s.buffer.").(make-variable-buffe |
| 1e20 | 72 2d 6c 6f 63 61 6c 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6f 76 65 72 6c 61 79 73 29 | r-local.'dired-subtree-overlays) |
| 1e40 | 0a 0a 0c 0a 3b 3b 3b 20 4f 76 65 72 6c 61 79 20 6d 61 6e 69 70 75 6c 61 74 69 6f 6e 0a 3b 3b 20 | ....;;;.Overlay.manipulation.;;. |
| 1e60 | 4d 61 79 62 65 20 77 65 20 73 68 6f 75 6c 64 20 61 62 73 74 72 61 63 74 20 74 68 65 20 6f 76 65 | Maybe.we.should.abstract.the.ove |
| 1e80 | 72 6c 61 79 2d 66 6f 6f 20 69 6e 74 6f 20 73 6f 6d 65 20 73 75 62 74 72 65 65 0a 3b 3b 20 66 75 | rlay-foo.into.some.subtree.;;.fu |
| 1ea0 | 6e 63 74 69 6f 6e 73 20 69 6e 73 74 65 61 64 21 21 21 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 | nctions.instead!!!..(defun.dired |
| 1ec0 | 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 28 6f 76 29 0a 20 20 | -subtree--remove-overlay.(ov)... |
| 1ee0 | 22 52 65 6d 6f 76 65 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 20 6f 76 65 72 6c 61 79 20 4f 56 | "Remove.dired-subtree.overlay.OV |
| 1f00 | 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 61 79 | ."...(setq.dired-subtree-overlay |
| 1f20 | 73 0a 20 20 20 20 20 20 20 20 28 2d 2d 72 65 6d 6f 76 65 20 28 65 71 75 61 6c 20 69 74 20 6f 76 | s.........(--remove.(equal.it.ov |
| 1f40 | 29 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6f 76 65 72 6c 61 79 73 29 29 0a 20 20 28 64 65 | ).dired-subtree-overlays))...(de |
| 1f60 | 6c 65 74 65 2d 6f 76 65 72 6c 61 79 20 6f 76 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d | lete-overlay.ov))..(defun.dired- |
| 1f80 | 73 75 62 74 72 65 65 2d 2d 72 65 6d 6f 76 65 2d 6f 76 65 72 6c 61 79 73 20 28 6f 76 73 29 0a 20 | subtree--remove-overlays.(ovs).. |
| 1fa0 | 20 22 52 65 6d 6f 76 65 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 20 6f 76 65 72 6c 61 79 73 20 | ."Remove.dired-subtree.overlays. |
| 1fc0 | 4f 56 53 2e 22 0a 20 20 28 6d 61 70 63 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 72 65 | OVS."...(mapc.'dired-subtree--re |
| 1fe0 | 6d 6f 76 65 2d 6f 76 65 72 6c 61 79 20 6f 76 73 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 | move-overlay.ovs))..(defun.dired |
| 2000 | 2d 73 75 62 74 72 65 65 2d 2d 63 6c 65 61 6e 75 70 2d 6f 76 65 72 6c 61 79 73 20 28 29 0a 20 20 | -subtree--cleanup-overlays.()... |
| 2020 | 22 52 65 6d 6f 76 65 20 74 68 65 20 60 6e 69 6c 27 20 76 61 6c 75 65 73 20 66 72 6f 6d 20 60 64 | "Remove.the.`nil'.values.from.`d |
| 2040 | 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 73 65 74 71 | ired-subtree-overlays'."...(setq |
| 2060 | 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6f 76 65 72 6c 61 79 73 0a 20 20 20 20 20 20 20 20 | .dired-subtree-overlays......... |
| 2080 | 28 2d 2d 72 65 6d 6f 76 65 20 28 6e 6f 74 20 28 6f 76 65 72 6c 61 79 2d 62 75 66 66 65 72 20 69 | (--remove.(not.(overlay-buffer.i |
| 20a0 | 74 29 29 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6f 76 65 72 6c 61 79 73 29 29 29 0a 0a 28 | t)).dired-subtree-overlays)))..( |
| 20c0 | 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 61 6c 6c 2d 6f 76 73 | defun.dired-subtree--get-all-ovs |
| 20e0 | 20 28 29 0a 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 | .()..."Get.all.dired-subtree.ove |
| 2100 | 72 6c 61 79 73 20 69 6e 20 74 68 69 73 20 62 75 66 66 65 72 2e 22 0a 20 20 28 2d 2d 66 69 6c 74 | rlays.in.this.buffer."...(--filt |
| 2120 | 65 72 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 | er.(overlay-get.it.'dired-subtre |
| 2140 | 65 2d 64 65 70 74 68 29 20 28 6f 76 65 72 6c 61 79 73 2d 69 6e 20 28 70 6f 69 6e 74 2d 6d 69 6e | e-depth).(overlays-in.(point-min |
| 2160 | 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 | ).(point-max))))..(defun.dired-s |
| 2180 | 75 62 74 72 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 28 26 6f | ubtree--get-all-ovs-at-point.(&o |
| 21a0 | 70 74 69 6f 6e 61 6c 20 70 29 0a 20 20 22 47 65 74 20 61 6c 6c 20 64 69 72 65 64 2d 73 75 62 74 | ptional.p)..."Get.all.dired-subt |
| 21c0 | 72 65 65 20 6f 76 65 72 6c 61 79 73 20 61 74 20 70 6f 69 6e 74 20 50 2e 22 0a 20 20 28 73 65 74 | ree.overlays.at.point.P."...(set |
| 21e0 | 71 20 70 20 28 6f 72 20 70 20 28 70 6f 69 6e 74 29 29 29 0a 20 20 28 2d 2d 66 69 6c 74 65 72 20 | q.p.(or.p.(point)))...(--filter. |
| 2200 | 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 65 2d 64 | (overlay-get.it.'dired-subtree-d |
| 2220 | 65 70 74 68 29 20 28 6f 76 65 72 6c 61 79 73 2d 61 74 20 28 70 6f 69 6e 74 29 29 29 29 0a 0a 28 | epth).(overlays-at.(point))))..( |
| 2240 | 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 73 2d 69 6e 20 | defun.dired-subtree--get-ovs-in. |
| 2260 | 28 26 6f 70 74 69 6f 6e 61 6c 20 62 65 67 20 65 6e 64 29 0a 20 20 22 47 65 74 20 61 6c 6c 20 64 | (&optional.beg.end)..."Get.all.d |
| 2280 | 69 72 65 64 2d 73 75 62 74 72 65 65 20 6f 76 65 72 6c 61 79 73 20 62 65 74 77 65 65 6e 20 42 45 | ired-subtree.overlays.between.BE |
| 22a0 | 47 20 61 6e 64 20 45 4e 44 2e 0a 0a 42 45 47 20 61 6e 64 20 45 4e 44 20 64 65 66 61 75 6c 74 20 | G.and.END...BEG.and.END.default. |
| 22c0 | 74 6f 20 74 68 65 20 72 65 67 69 6f 6e 20 73 70 61 6e 6e 65 64 20 62 79 20 6f 76 65 72 6c 61 79 | to.the.region.spanned.by.overlay |
| 22e0 | 20 61 74 20 70 6f 69 6e 74 2e 22 0a 20 20 28 77 68 65 6e 20 28 6e 6f 74 20 62 65 67 29 0a 20 20 | .at.point."...(when.(not.beg)... |
| 2300 | 20 20 28 6c 65 74 20 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 | ..(let.((ov.(dired-subtree--get- |
| 2320 | 6f 76 29 29 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 62 65 67 20 28 6f 76 65 72 6c 61 79 2d 73 | ov))).......(setq.beg.(overlay-s |
| 2340 | 74 61 72 74 20 6f 76 29 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 65 6e 64 20 28 6f 76 65 72 6c | tart.ov)).......(setq.end.(overl |
| 2360 | 61 79 2d 65 6e 64 20 6f 76 29 29 29 29 0a 20 20 28 2d 2d 66 69 6c 74 65 72 20 28 61 6e 64 20 28 | ay-end.ov))))...(--filter.(and.( |
| 2380 | 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 65 2d 64 65 | overlay-get.it.'dired-subtree-de |
| 23a0 | 70 74 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3e 3d 20 28 6f 76 65 72 6c | pth)..................(>=.(overl |
| 23c0 | 61 79 2d 73 74 61 72 74 20 69 74 29 20 62 65 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ay-start.it).beg)............... |
| 23e0 | 20 20 20 28 3c 3d 20 28 6f 76 65 72 6c 61 79 2d 65 6e 64 20 69 74 29 20 65 6e 64 29 29 0a 20 20 | ...(<=.(overlay-end.it).end))... |
| 2400 | 20 20 20 20 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 73 2d 69 6e 20 28 70 6f 69 6e 74 2d 6d 69 | ..........(overlays-in.(point-mi |
| 2420 | 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d | n).(point-max))))..(defun.dired- |
| 2440 | 73 75 62 74 72 65 65 2d 2d 67 65 74 2d 6f 76 20 28 26 6f 70 74 69 6f 6e 61 6c 20 70 29 0a 20 20 | subtree--get-ov.(&optional.p)... |
| 2460 | 22 47 65 74 20 74 68 65 20 70 61 72 65 6e 74 20 73 75 62 74 72 65 65 20 6f 76 65 72 6c 61 79 20 | "Get.the.parent.subtree.overlay. |
| 2480 | 61 74 20 70 6f 69 6e 74 2e 22 0a 20 20 28 73 65 74 71 20 70 20 28 6f 72 20 70 20 28 70 6f 69 6e | at.point."...(setq.p.(or.p.(poin |
| 24a0 | 74 29 29 29 0a 20 20 28 63 61 72 20 28 2d 2d 73 6f 72 74 20 28 3e 20 28 6f 76 65 72 6c 61 79 2d | t)))...(car.(--sort.(>.(overlay- |
| 24c0 | 67 65 74 20 69 74 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 64 65 70 74 68 29 0a 20 20 20 | get.it.'dired-subtree-depth).... |
| 24e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 67 65 74 20 6f 74 68 65 | ...............(overlay-get.othe |
| 2500 | 72 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 64 65 70 74 68 29 29 0a 20 20 20 20 20 20 20 | r.'dired-subtree-depth))........ |
| 2520 | 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 61 6c 6c 2d | ........(dired-subtree--get-all- |
| 2540 | 6f 76 73 2d 61 74 2d 70 6f 69 6e 74 20 70 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 | ovs-at-point.p))))..(defun.dired |
| 2560 | 2d 73 75 62 74 72 65 65 2d 2d 67 65 74 2d 64 65 70 74 68 20 28 6f 76 29 0a 20 20 22 47 65 74 20 | -subtree--get-depth.(ov)..."Get. |
| 2580 | 73 75 62 74 72 65 65 20 64 65 70 74 68 2e 22 0a 20 20 28 6f 72 20 28 61 6e 64 20 6f 76 20 28 6f | subtree.depth."...(or.(and.ov.(o |
| 25a0 | 76 65 72 6c 61 79 2d 67 65 74 20 6f 76 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 64 65 70 | verlay-get.ov.'dired-subtree-dep |
| 25c0 | 74 68 29 29 20 30 29 29 0a 0a 0a 0c 0a 3b 3b 3b 20 68 65 6c 70 65 72 73 0a 28 64 65 66 76 61 72 | th)).0)).....;;;.helpers.(defvar |
| 25e0 | 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 70 72 65 73 65 72 76 65 2d 70 72 6f 70 65 72 74 69 | .dired-subtree-preserve-properti |
| 2600 | 65 73 20 27 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 66 69 6c 74 65 72 29 0a 20 20 22 50 72 | es.'(dired-subtree-filter)..."Pr |
| 2620 | 6f 70 65 72 74 69 65 73 20 74 68 61 74 20 73 68 6f 75 6c 64 20 62 65 20 70 72 65 73 65 72 76 65 | operties.that.should.be.preserve |
| 2640 | 64 20 62 65 74 77 65 65 6e 20 72 65 61 64 2d 69 6e 73 2e 22 29 0a 0a 28 64 65 66 75 6e 20 64 69 | d.between.read-ins.")..(defun.di |
| 2660 | 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 61 66 74 65 72 2d 72 65 61 64 69 6e 20 28 26 6f 70 74 69 | red-subtree--after-readin.(&opti |
| 2680 | 6f 6e 61 6c 20 73 75 62 74 72 65 65 73 29 0a 20 20 22 49 6e 73 65 72 74 20 74 68 65 20 53 55 42 | onal.subtrees)..."Insert.the.SUB |
| 26a0 | 54 52 45 45 53 20 61 67 61 69 6e 20 61 66 74 65 72 20 64 69 72 65 64 20 62 75 66 66 65 72 20 68 | TREES.again.after.dired.buffer.h |
| 26c0 | 61 73 20 62 65 65 6e 20 72 65 76 65 72 74 65 64 2e 0a 0a 49 66 20 6e 6f 20 53 55 42 54 52 45 45 | as.been.reverted...If.no.SUBTREE |
| 26e0 | 53 20 61 72 65 20 73 70 65 63 69 66 69 65 64 2c 20 75 73 65 20 60 64 69 72 65 64 2d 73 75 62 74 | S.are.specified,.use.`dired-subt |
| 2700 | 72 65 65 2d 6f 76 65 72 6c 61 79 73 27 2e 22 0a 20 20 28 2d 77 68 65 6e 2d 6c 65 74 20 28 73 75 | ree-overlays'."...(-when-let.(su |
| 2720 | 62 74 72 65 65 73 2d 74 6f 2d 70 72 6f 63 65 73 73 20 28 6f 72 20 73 75 62 74 72 65 65 73 20 64 | btrees-to-process.(or.subtrees.d |
| 2740 | 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6f 76 65 72 6c 61 79 73 29 29 0a 20 20 20 20 28 6c 65 74 | ired-subtree-overlays)).....(let |
| 2760 | 2a 20 28 28 6f 76 73 2d 62 79 2d 64 65 70 74 68 20 28 2d 2d 73 6f 72 74 20 28 3c 20 28 63 61 72 | *.((ovs-by-depth.(--sort.(<.(car |
| 2780 | 20 69 74 29 20 28 63 61 72 20 6f 74 68 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .it).(car.other))............... |
| 27a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2d 2d 67 72 6f 75 70 2d 62 79 20 28 | ...................(--group-by.( |
| 27c0 | 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 65 2d 64 65 | overlay-get.it.'dired-subtree-de |
| 27e0 | 70 74 68 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 | pth)............................ |
| 2800 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 75 62 74 72 65 65 73 2d 74 6f 2d 70 72 | ..................subtrees-to-pr |
| 2820 | 6f 63 65 73 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 6f 72 74 65 64 2d 6f 76 73 20 | ocess)))............(sorted-ovs. |
| 2840 | 28 2d 2d 6d 61 70 20 28 63 6f 6e 73 20 28 63 61 72 20 69 74 29 0a 20 20 20 20 20 20 20 20 20 20 | (--map.(cons.(car.it)........... |
| 2860 | 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 2d 2d 6d 61 70 | ..........................(--map |
| 2880 | 20 28 2d 63 6f 6e 73 2a 20 69 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .(-cons*.it..................... |
| 28a0 | 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 | ...............................( |
| 28c0 | 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 65 2d 6e 61 | overlay-get.it.'dired-subtree-na |
| 28e0 | 6d 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 20 20 20 20 | me)............................. |
| 2900 | 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 6d 61 70 20 28 6c 61 | .......................(-map.(la |
| 2920 | 6d 62 64 61 20 28 78 29 20 28 63 6f 6e 73 20 78 20 28 6f 76 65 72 6c 61 79 2d 67 65 74 20 69 74 | mbda.(x).(cons.x.(overlay-get.it |
| 2940 | 20 78 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 20 20 20 20 | .x)))........................... |
| 2960 | 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 64 | ...............................d |
| 2980 | 69 72 65 64 2d 73 75 62 74 72 65 65 2d 70 72 65 73 65 72 76 65 2d 70 72 6f 70 65 72 74 69 65 73 | ired-subtree-preserve-properties |
| 29a0 | 29 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 20 20 20 20 20 | )).(cdr.it)))................... |
| 29c0 | 20 20 20 20 20 20 20 20 20 20 20 20 6f 76 73 2d 62 79 2d 64 65 70 74 68 29 29 29 0a 20 20 20 20 | ............ovs-by-depth)))..... |
| 29e0 | 20 20 3b 3b 20 28 64 65 70 74 68 20 28 70 61 74 68 31 20 6f 76 31 20 28 70 72 6f 70 31 20 2e 20 | ..;;.(depth.(path1.ov1.(prop1... |
| 2a00 | 76 61 6c 75 65 31 29 20 28 70 72 6f 70 32 20 2e 20 76 61 6c 75 65 32 29 29 20 28 70 61 74 68 32 | value1).(prop2...value2)).(path2 |
| 2a20 | 20 2e 2e 2e 29 29 0a 20 20 20 20 20 20 28 2d 2d 65 61 63 68 20 73 6f 72 74 65 64 2d 6f 76 73 0a | ....)).......(--each.sorted-ovs. |
| 2a40 | 20 20 20 20 20 20 20 20 28 2d 2d 65 61 63 68 20 28 63 64 72 20 69 74 29 0a 20 20 20 20 20 20 20 | ........(--each.(cdr.it)........ |
| 2a60 | 20 20 20 28 77 68 65 6e 20 28 64 69 72 65 64 2d 75 74 69 6c 73 2d 67 6f 74 6f 2d 6c 69 6e 65 20 | ...(when.(dired-utils-goto-line. |
| 2a80 | 28 63 61 64 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 75 | (cadr.it)).............(dired-su |
| 2aa0 | 62 74 72 65 65 2d 2d 72 65 6d 6f 76 65 2d 6f 76 65 72 6c 61 79 20 28 63 61 72 20 69 74 29 29 0a | btree--remove-overlay.(car.it)). |
| 2ac0 | 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 69 6e 73 65 72 | ............(dired-subtree-inser |
| 2ae0 | 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 6f 76 20 28 64 69 72 65 64 2d | t).............(let.((ov.(dired- |
| 2b00 | 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 20 20 20 20 20 20 | subtree--get-ov))).............. |
| 2b20 | 20 28 2d 2d 65 61 63 68 20 28 63 64 64 72 20 69 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | .(--each.(cddr.it).............. |
| 2b40 | 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 76 20 28 63 61 72 20 69 74 29 20 28 63 64 72 | ...(overlay-put.ov.(car.it).(cdr |
| 2b60 | 20 69 74 29 29 29 0a 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 | .it)))...............(dired-subt |
| 2b80 | 72 65 65 2d 2d 66 69 6c 74 65 72 2d 73 75 62 74 72 65 65 20 6f 76 29 29 29 29 29 29 29 29 0a 0a | ree--filter-subtree.ov)))))))).. |
| 2ba0 | 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 69 6e 73 65 | (defun.dired-subtree--after-inse |
| 2bc0 | 72 74 20 28 29 0a 20 20 22 41 66 74 65 72 20 69 6e 73 65 72 74 69 6e 67 20 74 68 65 20 73 75 62 | rt.()..."After.inserting.the.sub |
| 2be0 | 74 72 65 65 2c 20 73 65 74 75 70 20 64 69 72 65 64 2d 64 65 74 61 69 6c 73 2f 64 69 72 65 64 2d | tree,.setup.dired-details/dired- |
| 2c00 | 68 69 64 65 2d 64 65 74 61 69 6c 73 2d 6d 6f 64 65 2e 22 0a 20 20 28 69 66 20 28 66 62 6f 75 6e | hide-details-mode."...(if.(fboun |
| 2c20 | 64 70 20 27 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 29 | dp.'dired-insert-set-properties) |
| 2c40 | 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 6f 6e 6c 79 20 | .......(let.((inhibit-read-only. |
| 2c60 | 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 76 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 | t).............(ov.(dired-subtre |
| 2c80 | 65 2d 2d 67 65 74 2d 6f 76 29 29 29 0a 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 69 6e 73 65 | e--get-ov))).........(dired-inse |
| 2ca0 | 72 74 2d 73 65 74 2d 70 72 6f 70 65 72 74 69 65 73 20 28 6f 76 65 72 6c 61 79 2d 73 74 61 72 74 | rt-set-properties.(overlay-start |
| 2cc0 | 20 6f 76 29 20 28 6f 76 65 72 6c 61 79 2d 65 6e 64 20 6f 76 29 29 29 0a 20 20 20 20 28 77 68 65 | .ov).(overlay-end.ov))).....(whe |
| 2ce0 | 6e 20 28 66 65 61 74 75 72 65 70 20 27 64 69 72 65 64 2d 64 65 74 61 69 6c 73 29 0a 20 20 20 20 | n.(featurep.'dired-details)..... |
| 2d00 | 20 20 28 64 69 72 65 64 2d 64 65 74 61 69 6c 73 2d 64 65 6c 65 74 65 2d 6f 76 65 72 6c 61 79 73 | ..(dired-details-delete-overlays |
| 2d20 | 29 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 64 65 74 61 69 6c 73 2d 61 63 74 69 76 61 74 65 29 | ).......(dired-details-activate) |
| 2d40 | 29 29 29 0a 0a 28 61 64 64 2d 68 6f 6f 6b 20 27 64 69 72 65 64 2d 61 66 74 65 72 2d 72 65 61 64 | )))..(add-hook.'dired-after-read |
| 2d60 | 69 6e 2d 68 6f 6f 6b 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 61 66 74 65 72 2d 72 65 | in-hook.'dired-subtree--after-re |
| 2d80 | 61 64 69 6e 29 0a 0a 28 61 64 64 2d 68 6f 6f 6b 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d | adin)..(add-hook.'dired-subtree- |
| 2da0 | 61 66 74 65 72 2d 69 6e 73 65 72 74 2d 68 6f 6f 6b 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 | after-insert-hook.'dired-subtree |
| 2dc0 | 2d 2d 61 66 74 65 72 2d 69 6e 73 65 72 74 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 75 | --after-insert)..(defun.dired-su |
| 2de0 | 62 74 72 65 65 2d 2d 75 6e 6d 61 72 6b 20 28 29 0a 20 20 22 55 6e 6d 61 72 6b 20 61 20 66 69 6c | btree--unmark.()..."Unmark.a.fil |
| 2e00 | 65 20 77 69 74 68 6f 75 74 20 6d 6f 76 69 6e 67 20 70 6f 69 6e 74 2e 22 0a 20 20 28 73 61 76 65 | e.without.moving.point."...(save |
| 2e20 | 2d 65 78 63 75 72 73 69 6f 6e 20 28 64 69 72 65 64 2d 75 6e 6d 61 72 6b 20 31 29 29 29 0a 0a 28 | -excursion.(dired-unmark.1)))..( |
| 2e40 | 64 65 66 75 6e 20 64 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 | defun.dired-subtree--dired-line- |
| 2e60 | 69 73 2d 64 69 72 65 63 74 6f 72 79 2d 6f 72 2d 6c 69 6e 6b 2d 70 20 28 29 0a 20 20 22 52 65 74 | is-directory-or-link-p.()..."Ret |
| 2e80 | 75 72 6e 20 6e 6f 6e 2d 6e 69 6c 20 69 66 20 6c 69 6e 65 20 75 6e 64 65 72 20 70 6f 69 6e 74 20 | urn.non-nil.if.line.under.point. |
| 2ea0 | 69 73 20 61 20 64 69 72 65 63 74 6f 72 79 20 6f 72 20 73 79 6d 6c 69 6e 6b 22 0a 20 20 3b 3b 20 | is.a.directory.or.symlink"...;;. |
| 2ec0 | 57 65 27 76 65 20 72 65 70 6c 61 63 65 64 20 60 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 2d 70 | We've.replaced.`file-directory-p |
| 2ee0 | 27 20 77 69 74 68 20 74 68 65 20 72 65 67 65 78 70 20 74 65 73 74 20 74 6f 0a 20 20 3b 3b 20 73 | '.with.the.regexp.test.to...;;.s |
| 2f00 | 70 65 65 64 20 75 70 20 66 69 6c 74 65 72 73 20 6f 76 65 72 20 54 52 41 4d 50 2e 20 20 53 6f 20 | peed.up.filters.over.TRAMP...So. |
| 2f20 | 6c 6f 6e 67 20 61 73 20 64 69 72 65 64 2f 6c 73 20 66 6f 72 6d 61 74 0a 20 20 3b 3b 20 64 6f 65 | long.as.dired/ls.format...;;.doe |
| 2f40 | 73 6e 27 74 20 63 68 61 6e 67 65 2c 20 77 65 27 72 65 20 67 6f 6f 64 2e 0a 20 20 3b 3b 20 27 64 | sn't.change,.we're.good....;;.'d |
| 2f60 | 27 20 66 6f 72 20 64 69 72 65 63 74 6f 72 69 65 73 2c 20 27 6c 27 20 66 6f 72 20 70 6f 74 65 6e | '.for.directories,.'l'.for.poten |
| 2f80 | 74 69 61 6c 20 73 79 6d 6c 69 6e 6b 73 20 74 6f 20 64 69 72 65 63 74 6f 72 69 65 73 2e 0a 20 20 | tial.symlinks.to.directories.... |
| 2fa0 | 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 20 28 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 | (save-excursion.(beginning-of-li |
| 2fc0 | 6e 65 29 20 28 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 2e 2e 5b 64 6c 5d 22 29 29 29 0a 0a 28 64 65 | ne).(looking-at."..[dl]")))..(de |
| 2fe0 | 66 75 6e 20 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 | fun.dired-subtree--is-expanded-p |
| 3000 | 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 64 69 72 65 63 74 6f | .()..."Return.non-nil.if.directo |
| 3020 | 72 79 20 75 6e 64 65 72 20 70 6f 69 6e 74 20 69 73 20 65 78 70 61 6e 64 65 64 2e 22 0a 20 20 28 | ry.under.point.is.expanded."...( |
| 3040 | 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 28 77 68 65 6e 20 28 64 69 72 65 64 2d | save-excursion.....(when.(dired- |
| 3060 | 75 74 69 6c 73 2d 67 65 74 2d 66 69 6c 65 6e 61 6d 65 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 | utils-get-filename).......(let.( |
| 3080 | 28 64 65 70 74 68 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 | (depth.(dired-subtree--get-depth |
| 30a0 | 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 29 0a 20 20 20 20 | .(dired-subtree--get-ov))))..... |
| 30c0 | 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 20 20 | ....(dired-next-line.1)......... |
| 30e0 | 28 3c 20 64 65 70 74 68 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 67 65 74 2d 64 65 70 | (<.depth.(dired-subtree--get-dep |
| 3100 | 74 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 29 29 29 29 29 | th.(dired-subtree--get-ov))))))) |
| 3120 | 0a 0a 28 64 65 66 6d 61 63 72 6f 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 77 69 74 68 2d 73 | ..(defmacro.dired-subtree-with-s |
| 3140 | 75 62 74 72 65 65 20 28 26 72 65 73 74 20 66 6f 72 6d 73 29 0a 20 20 22 52 75 6e 20 46 4f 52 4d | ubtree.(&rest.forms)..."Run.FORM |
| 3160 | 53 20 6f 6e 20 65 61 63 68 20 66 69 6c 65 20 69 6e 20 74 68 69 73 20 73 75 62 74 72 65 65 2e 22 | S.on.each.file.in.this.subtree." |
| 3180 | 0a 20 20 28 64 65 63 6c 61 72 65 20 28 64 65 62 75 67 20 28 62 6f 64 79 29 29 29 0a 20 20 60 28 | ...(declare.(debug.(body)))...`( |
| 31a0 | 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 | save-excursion......(dired-subtr |
| 31c0 | 65 65 2d 62 65 67 69 6e 6e 69 6e 67 29 0a 20 20 20 20 20 2c 40 66 6f 72 6d 73 0a 20 20 20 20 20 | ee-beginning)......,@forms...... |
| 31e0 | 28 77 68 69 6c 65 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6e 65 78 74 2d 73 69 62 6c 69 | (while.(dired-subtree-next-sibli |
| 3200 | 6e 67 29 0a 20 20 20 20 20 20 20 2c 40 66 6f 72 6d 73 29 29 29 0a 0a 0c 0a 3b 3b 3b 3b 20 49 6e | ng)........,@forms)))....;;;;.In |
| 3220 | 74 65 72 61 63 74 69 76 65 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e | teractive..;;;###autoload.(defun |
| 3240 | 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6e 61 72 72 6f 77 20 28 29 0a 20 20 22 4e 61 72 72 | .dired-subtree-narrow.()..."Narr |
| 3260 | 6f 77 20 74 68 65 20 62 75 66 66 65 72 20 74 6f 20 74 68 69 73 20 73 75 62 74 72 65 65 2e 22 0a | ow.the.buffer.to.this.subtree.". |
| 3280 | 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 20 28 6f 76 | ..(interactive)...(-when-let.(ov |
| 32a0 | 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 28 6e | .(dired-subtree--get-ov)).....(n |
| 32c0 | 61 72 72 6f 77 2d 74 6f 2d 72 65 67 69 6f 6e 20 28 6f 76 65 72 6c 61 79 2d 73 74 61 72 74 20 6f | arrow-to-region.(overlay-start.o |
| 32e0 | 76 29 0a 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 | v).......................(overla |
| 3300 | 79 2d 65 6e 64 20 6f 76 29 29 29 29 0a 0a 3b 3b 3b 20 4e 61 76 69 67 61 74 69 6f 6e 0a 0a 3b 3b | y-end.ov))))..;;;.Navigation..;; |
| 3320 | 20 6d 61 6b 65 20 74 68 65 20 61 72 67 75 6d 65 6e 74 73 20 61 63 74 75 61 6c 6c 79 20 64 6f 20 | .make.the.arguments.actually.do. |
| 3340 | 73 6f 6d 65 74 68 69 6e 67 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 | something.;;;###autoload.(defun. |
| 3360 | 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 75 70 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 29 | dired-subtree-up.(&optional.arg) |
| 3380 | 0a 20 20 22 4a 75 6d 70 20 75 70 20 6f 6e 65 20 64 69 72 65 63 74 6f 72 79 2e 22 0a 20 20 28 69 | ..."Jump.up.one.directory."...(i |
| 33a0 | 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 20 28 6f 76 | nteractive."p")...(-when-let.(ov |
| 33c0 | 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 28 67 | .(dired-subtree--get-ov)).....(g |
| 33e0 | 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 29 29 0a 20 20 20 | oto-char.(overlay-start.ov)).... |
| 3400 | 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 0a 0a 3b 3b 3b 23 | .(dired-previous-line.1)))..;;;# |
| 3420 | 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 65 65 2d | ##autoload.(defun.dired-subtree- |
| 3440 | 64 6f 77 6e 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 29 0a 20 20 22 4a 75 6d 70 20 64 6f 77 | down.(&optional.arg)..."Jump.dow |
| 3460 | 6e 20 6f 6e 65 20 64 69 72 65 63 74 6f 72 79 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 | n.one.directory."...(interactive |
| 3480 | 20 22 70 22 29 0a 20 20 28 2d 77 68 65 6e 2d 6c 65 74 2a 20 28 28 70 20 28 70 6f 69 6e 74 29 29 | ."p")...(-when-let*.((p.(point)) |
| 34a0 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 76 20 28 63 61 72 20 28 2d 2d 73 6f 72 74 | ................(ov.(car.(--sort |
| 34c0 | 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 3c 20 28 6f 76 | ..........................(<.(ov |
| 34e0 | 65 72 6c 61 79 2d 73 74 61 72 74 20 69 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | erlay-start.it)................. |
| 3500 | 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 73 74 61 72 74 20 6f 74 68 65 72 | ............(overlay-start.other |
| 3520 | 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 28 2d 2d 72 | ))..........................(--r |
| 3540 | 65 6d 6f 76 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 | emove........................... |
| 3560 | 28 3c 20 28 6f 76 65 72 6c 61 79 2d 73 74 61 72 74 20 69 74 29 20 70 29 0a 20 20 20 20 20 20 20 | (<.(overlay-start.it).p)........ |
| 3580 | 20 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 | ...................(dired-subtre |
| 35a0 | 65 2d 2d 67 65 74 2d 61 6c 6c 2d 6f 76 73 29 29 29 29 29 29 0a 20 20 20 20 28 67 6f 74 6f 2d 63 | e--get-all-ovs)))))).....(goto-c |
| 35c0 | 68 61 72 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 28 64 69 72 | har.(overlay-start.ov)).....(dir |
| 35e0 | 65 64 2d 6d 6f 76 65 2d 74 6f 2d 66 69 6c 65 6e 61 6d 65 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 | ed-move-to-filename)))..;;;###au |
| 3600 | 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 65 78 74 | toload.(defun.dired-subtree-next |
| 3620 | 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 20 74 | -sibling.(&optional.arg)..."Go.t |
| 3640 | 6f 20 74 68 65 20 6e 65 78 74 20 73 69 62 6c 69 6e 67 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 | o.the.next.sibling."...(interact |
| 3660 | 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 6f 76 20 28 64 69 | ive."p")...(let.((current-ov.(di |
| 3680 | 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 64 69 72 65 | red-subtree--get-ov))).....(dire |
| 36a0 | 64 2d 6e 65 78 74 2d 6c 69 6e 65 20 31 29 0a 20 20 20 20 28 6c 65 74 20 28 28 6e 65 77 2d 6f 76 | d-next-line.1).....(let.((new-ov |
| 36c0 | 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 20 20 | .(dired-subtree--get-ov)))...... |
| 36e0 | 20 28 63 6f 6e 64 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 | .(cond........((not.(dired-utils |
| 3700 | 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)....... |
| 3720 | 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 |
| 3740 | 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 |
| 3760 | 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))........ |
| 3780 | 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 6f 76 65 72 6c 61 79 2d 65 6e 64 20 6e 65 77 2d 6f 76 29 | .(goto-char.(overlay-end.new-ov) |
| 37a0 | 29 0a 20 20 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 | ).........(dired-move-to-filenam |
| 37c0 | 65 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 2d | e).........t)........((>.(dired- |
| 37e0 | 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 20 | subtree--get-depth.current-ov).. |
| 3800 | 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 65 | ..........(dired-subtree--get-de |
| 3820 | 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 69 | pth.new-ov)).........;;.add.opti |
| 3840 | 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 61 | on.to.either.go.to.top.or.stay.a |
| 3860 | 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 70 72 65 76 69 6f 75 | t.the.end.........(dired-previou |
| 3880 | 73 2d 6c 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 | s-line.1).........nil)........(t |
| 38a0 | 20 74 29 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 | .t)))))..;;;###autoload.(defun.d |
| 38c0 | 69 72 65 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 20 28 26 | ired-subtree-previous-sibling.(& |
| 38e0 | 6f 70 74 69 6f 6e 61 6c 20 61 72 67 29 0a 20 20 22 47 6f 20 74 6f 20 74 68 65 20 70 72 65 76 69 | optional.arg)..."Go.to.the.previ |
| 3900 | 6f 75 73 20 73 69 62 6c 69 6e 67 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 70 22 | ous.sibling."...(interactive."p" |
| 3920 | 29 0a 20 20 28 6c 65 74 20 28 28 63 75 72 72 65 6e 74 2d 6f 76 20 28 64 69 72 65 64 2d 73 75 62 | )...(let.((current-ov.(dired-sub |
| 3940 | 74 72 65 65 2d 2d 67 65 74 2d 6f 76 29 29 29 0a 20 20 20 20 28 64 69 72 65 64 2d 70 72 65 76 69 | tree--get-ov))).....(dired-previ |
| 3960 | 6f 75 73 2d 6c 69 6e 65 20 31 29 0a 20 20 20 20 28 6c 65 74 20 28 28 6e 65 77 2d 6f 76 20 28 64 | ous-line.1).....(let.((new-ov.(d |
| 3980 | 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 28 63 | ired-subtree--get-ov))).......(c |
| 39a0 | 6f 6e 64 0a 20 20 20 20 20 20 20 3b 3b 20 74 68 69 73 20 77 69 6c 6c 20 6e 65 65 64 20 62 65 74 | ond........;;.this.will.need.bet |
| 39c0 | 74 65 72 20 68 61 6e 64 6c 69 67 6e 20 69 66 20 77 65 20 68 61 76 65 20 69 6e 73 65 72 74 65 64 | ter.handlign.if.we.have.inserted |
| 39e0 | 0a 20 20 20 20 20 20 20 3b 3b 20 73 75 62 64 69 72 65 63 74 6f 72 69 65 73 0a 20 20 20 20 20 20 | ........;;.subdirectories....... |
| 3a00 | 20 28 28 6e 6f 74 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 | .((not.(dired-utils-is-file-p)). |
| 3a20 | 20 20 20 20 20 20 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 | ........nil)........((<.(dired-s |
| 3a40 | 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 20 20 | ubtree--get-depth.current-ov)... |
| 3a60 | 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 65 70 | .........(dired-subtree--get-dep |
| 3a80 | 74 68 20 6e 65 77 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 | th.new-ov)).........(goto-char.( |
| 3aa0 | 6f 76 65 72 6c 61 79 2d 73 74 61 72 74 20 6e 65 77 2d 6f 76 29 29 0a 20 20 20 20 20 20 20 20 28 | overlay-start.new-ov)).........( |
| 3ac0 | 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 74 | dired-previous-line.1).........t |
| 3ae0 | 29 0a 20 20 20 20 20 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 | )........((>.(dired-subtree--get |
| 3b00 | 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 20 20 20 28 64 | -depth.current-ov)............(d |
| 3b20 | 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 2d 6f 76 29 29 | ired-subtree--get-depth.new-ov)) |
| 3b40 | 0a 20 20 20 20 20 20 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 | .........;;.add.option.to.either |
| 3b60 | 20 67 6f 20 74 6f 20 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 | .go.to.top.or.stay.at.the.end... |
| 3b80 | 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)....... |
| 3ba0 | 20 20 6e 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 | ..nil)........(t.t)))))..;;;###a |
| 3bc0 | 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 62 65 67 | utoload.(defun.dired-subtree-beg |
| 3be0 | 69 6e 6e 69 6e 67 20 28 29 0a 20 20 22 47 6f 20 74 6f 20 74 68 65 20 66 69 72 73 74 20 66 69 6c | inning.()..."Go.to.the.first.fil |
| 3c00 | 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 74 65 72 61 63 74 69 | e.in.this.subtree."...(interacti |
| 3c20 | 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 62 74 72 65 65 2d 2d | ve)...(let.((ov.(dired-subtree-- |
| 3c40 | 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 29 0a 20 20 20 20 20 | get-ov))).....(if.(not.ov)...... |
| 3c60 | 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 6f 74 20 69 6e 20 73 | ...;;.do.something.when.not.in.s |
| 3c80 | 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 6f 74 6f 2d 63 68 61 | ubtree.........t.......(goto-cha |
| 3ca0 | 72 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 64 69 72 | r.(overlay-start.ov)).......(dir |
| 3cc0 | 65 64 2d 6d 6f 76 65 2d 74 6f 2d 66 69 6c 65 6e 61 6d 65 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 | ed-move-to-filename))))..;;;###a |
| 3ce0 | 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 65 6e 64 | utoload.(defun.dired-subtree-end |
| 3d00 | 20 28 29 0a 20 20 22 47 6f 20 74 6f 20 74 68 65 20 66 69 72 73 74 20 66 69 6c 65 20 69 6e 20 74 | .()..."Go.to.the.first.file.in.t |
| 3d20 | 68 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 | his.subtree."...(interactive)... |
| 3d40 | 28 6c 65 74 20 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 | (let.((ov.(dired-subtree--get-ov |
| 3d60 | 29 29 29 0a 20 20 20 20 28 69 66 20 28 6e 6f 74 20 6f 76 29 0a 20 20 20 20 20 20 20 20 3b 3b 20 | ))).....(if.(not.ov).........;;. |
| 3d80 | 64 6f 20 73 6f 6d 65 74 68 69 6e 67 20 77 68 65 6e 20 6e 6f 74 20 69 6e 20 73 75 62 74 72 65 65 | do.something.when.not.in.subtree |
| 3da0 | 0a 20 20 20 20 20 20 20 20 74 0a 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 6f 76 65 | .........t.......(goto-char.(ove |
| 3dc0 | 72 6c 61 79 2d 65 6e 64 20 6f 76 29 29 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 70 72 65 76 69 | rlay-end.ov)).......(dired-previ |
| 3de0 | 6f 75 73 2d 6c 69 6e 65 20 31 29 29 29 29 0a 0a 3b 3b 3b 20 4d 61 72 6b 69 6e 67 0a 0a 3b 3b 3b | ous-line.1))))..;;;.Marking..;;; |
| 3e00 | 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 65 65 | ###autoload.(defun.dired-subtree |
| 3e20 | 2d 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 29 0a 20 20 | -mark-subtree.(&optional.all)... |
| 3e40 | 22 4d 61 72 6b 20 61 6c 6c 20 66 69 6c 65 73 20 69 6e 20 74 68 69 73 20 73 75 62 74 72 65 65 2e | "Mark.all.files.in.this.subtree. |
| 3e60 | 0a 0a 57 69 74 68 20 70 72 65 66 69 78 20 61 72 67 75 6d 65 6e 74 20 6d 61 72 6b 20 61 6c 6c 20 | ..With.prefix.argument.mark.all. |
| 3e80 | 74 68 65 20 66 69 6c 65 73 20 69 6e 20 73 75 62 64 69 72 65 63 74 6f 72 69 65 73 0a 72 65 63 75 | the.files.in.subdirectories.recu |
| 3ea0 | 72 73 69 76 65 6c 79 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 50 22 29 0a 20 20 | rsively."...(interactive."P")... |
| 3ec0 | 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 28 69 66 20 61 6c 6c 0a 20 20 20 20 | (save-excursion.....(if.all..... |
| 3ee0 | 20 20 20 20 28 6c 65 74 20 28 28 62 65 67 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 | ....(let.((beg.(save-excursion.. |
| 3f00 | 20 20 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 | ....................(dired-subtr |
| 3f20 | 65 65 2d 62 65 67 69 6e 6e 69 6e 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ee-beginning)................... |
| 3f40 | 20 20 20 28 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 6e 64 20 | ...(point)))...............(end. |
| 3f60 | 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 20 20 20 20 20 | (save-excursion................. |
| 3f80 | 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 65 6e 64 29 0a 20 20 20 20 20 20 20 | .....(dired-subtree-end)........ |
| 3fa0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6f 69 6e 74 29 29 29 29 0a 20 20 20 20 20 20 20 | ..............(point))))........ |
| 3fc0 | 20 20 20 28 64 69 72 65 64 2d 6d 61 72 6b 2d 66 69 6c 65 73 2d 69 6e 2d 72 65 67 69 6f 6e 0a 20 | ...(dired-mark-files-in-region.. |
| 3fe0 | 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 20 28 67 6f 74 6f 2d 63 68 61 72 20 62 65 67 29 | ..........(progn.(goto-char.beg) |
| 4000 | 20 28 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 29 29 0a 20 20 20 20 | .(line-beginning-position))..... |
| 4020 | 20 20 20 20 20 20 20 28 70 72 6f 67 6e 20 28 67 6f 74 6f 2d 63 68 61 72 20 65 6e 64 29 20 28 6c | .......(progn.(goto-char.end).(l |
| 4040 | 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 29 29 29 29 0a 20 20 20 20 20 20 28 64 69 72 65 | ine-end-position)))).......(dire |
| 4060 | 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 20 28 73 61 76 65 | d-subtree-beginning).......(save |
| 4080 | 2d 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 0a 20 20 20 20 20 | -excursion.(dired-mark.1))...... |
| 40a0 | 20 28 77 68 69 6c 65 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6e 65 78 74 2d 73 69 62 6c | .(while.(dired-subtree-next-sibl |
| 40c0 | 69 6e 67 29 0a 20 20 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 | ing).........(save-excursion.(di |
| 40e0 | 72 65 64 2d 6d 61 72 6b 20 31 29 29 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 | red-mark.1))))))..;;;###autoload |
| 4100 | 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 75 6e 6d 61 72 6b 2d 73 75 62 | .(defun.dired-subtree-unmark-sub |
| 4120 | 74 72 65 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 6c 6c 29 0a 20 20 22 55 6e 6d 61 72 6b 20 61 | tree.(&optional.all)..."Unmark.a |
| 4140 | 6c 6c 20 66 69 6c 65 73 20 69 6e 20 74 68 69 73 20 73 75 62 74 72 65 65 2e 0a 0a 57 69 74 68 20 | ll.files.in.this.subtree...With. |
| 4160 | 70 72 65 66 69 78 20 61 72 67 75 6d 65 6e 74 20 75 6e 6d 61 72 6b 20 61 6c 6c 20 74 68 65 20 66 | prefix.argument.unmark.all.the.f |
| 4180 | 69 6c 65 73 20 69 6e 20 73 75 62 64 69 72 65 63 74 6f 72 69 65 73 0a 72 65 63 75 72 73 69 76 65 | iles.in.subdirectories.recursive |
| 41a0 | 6c 79 2e 22 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 64 69 | ly."...(interactive)...(let.((di |
| 41c0 | 72 65 64 2d 6d 61 72 6b 65 72 2d 63 68 61 72 20 3f 20 29 29 0a 20 20 20 20 28 64 69 72 65 64 2d | red-marker-char.?.)).....(dired- |
| 41e0 | 73 75 62 74 72 65 65 2d 6d 61 72 6b 2d 73 75 62 74 72 65 65 20 61 6c 6c 29 29 29 0a 0a 3b 3b 3b | subtree-mark-subtree.all)))..;;; |
| 4200 | 20 49 6e 73 65 72 74 69 6f 6e 2f 64 65 6c 65 74 69 6f 6e 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f | .Insertion/deletion.;;;###autolo |
| 4220 | 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 76 65 72 74 20 28 | ad.(defun.dired-subtree-revert.( |
| 4240 | 29 0a 20 20 22 52 65 76 65 72 74 20 74 68 65 20 73 75 62 74 72 65 65 2e 0a 0a 54 68 69 73 20 6d | )..."Revert.the.subtree...This.m |
| 4260 | 65 61 6e 73 20 72 65 69 6e 73 65 72 74 69 6e 67 20 74 68 65 20 63 6f 6e 74 65 6e 74 20 6f 66 20 | eans.reinserting.the.content.of. |
| 4280 | 74 68 69 73 20 73 75 62 74 72 65 65 20 61 6e 64 20 61 6c 6c 20 69 74 73 0a 63 68 69 6c 64 72 65 | this.subtree.and.all.its.childre |
| 42a0 | 6e 2e 22 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 69 6e 68 | n."...(interactive)...(let.((inh |
| 42c0 | 69 62 69 74 2d 72 65 61 64 2d 6f 6e 6c 79 20 74 29 0a 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d | ibit-read-only.t).........(file- |
| 42e0 | 6e 61 6d 65 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 29 | name.(dired-utils-get-filename)) |
| 4300 | 29 0a 20 20 20 20 28 2d 77 68 65 6e 2d 6c 65 74 2a 20 28 28 6f 76 20 28 64 69 72 65 64 2d 73 75 | ).....(-when-let*.((ov.(dired-su |
| 4320 | 62 74 72 65 65 2d 2d 67 65 74 2d 6f 76 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | btree--get-ov))................. |
| 4340 | 20 28 6f 76 73 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 67 65 74 2d 6f 76 73 2d 69 6e | .(ovs.(dired-subtree--get-ovs-in |
| 4360 | 29 29 29 0a 20 20 20 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 | ))).......(dired-subtree-up).... |
| 4380 | 20 20 20 28 64 65 6c 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 | ...(delete-region.(overlay-start |
| 43a0 | 20 6f 76 29 20 28 6f 76 65 72 6c 61 79 2d 65 6e 64 20 6f 76 29 29 0a 20 20 20 20 20 20 28 64 69 | .ov).(overlay-end.ov)).......(di |
| 43c0 | 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 61 66 74 65 72 2d 72 65 61 64 69 6e 20 6f 76 73 29 0a 20 | red-subtree--after-readin.ovs).. |
| 43e0 | 20 20 20 20 20 28 77 68 65 6e 20 66 69 6c 65 2d 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 28 64 69 | .....(when.file-name.........(di |
| 4400 | 72 65 64 2d 75 74 69 6c 73 2d 67 6f 74 6f 2d 6c 69 6e 65 20 66 69 6c 65 2d 6e 61 6d 65 29 29 29 | red-utils-goto-line.file-name))) |
| 4420 | 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 72 65 61 64 69 6e | ))..(defun.dired-subtree--readin |
| 4440 | 20 28 64 69 72 2d 6e 61 6d 65 29 0a 20 20 22 52 65 61 64 20 69 6e 20 74 68 65 20 64 69 72 65 63 | .(dir-name)..."Read.in.the.direc |
| 4460 | 74 6f 72 79 2e 0a 0a 52 65 74 75 72 6e 20 61 20 73 74 72 69 6e 67 20 73 75 69 74 61 62 6c 65 20 | tory...Return.a.string.suitable. |
| 4480 | 66 6f 72 20 69 6e 73 65 72 74 69 6f 6e 20 69 6e 20 60 64 69 72 65 64 27 20 62 75 66 66 65 72 2e | for.insertion.in.`dired'.buffer. |
| 44a0 | 22 0a 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 20 28 69 6e 73 65 72 | "...(with-temp-buffer.....(inser |
| 44c0 | 74 2d 64 69 72 65 63 74 6f 72 79 20 64 69 72 2d 6e 61 6d 65 20 64 69 72 65 64 2d 6c 69 73 74 69 | t-directory.dir-name.dired-listi |
| 44e0 | 6e 67 2d 73 77 69 74 63 68 65 73 20 6e 69 6c 20 74 29 0a 20 20 20 20 28 64 65 6c 65 74 65 2d 63 | ng-switches.nil.t).....(delete-c |
| 4500 | 68 61 72 20 2d 31 29 0a 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 | har.-1).....(goto-char.(point-mi |
| 4520 | 6e 29 29 0a 20 20 20 20 28 64 65 6c 65 74 65 2d 72 65 67 69 6f 6e 0a 20 20 20 20 20 28 70 72 6f | n)).....(delete-region......(pro |
| 4540 | 67 6e 20 28 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 29 20 28 70 6f 69 6e 74 29 29 0a | gn.(beginning-of-line).(point)). |
| 4560 | 20 20 20 20 20 28 70 72 6f 67 6e 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 0a 20 20 20 20 20 20 | .....(progn.(forward-line....... |
| 4580 | 20 20 20 20 20 20 20 28 69 66 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 | .......(if.(save-excursion...... |
| 45a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 31 29 0a 20 | ..............(forward-line.1).. |
| 45c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 6e 64 2d 6f 66 2d 6c 69 6e 65 29 0a | ..................(end-of-line). |
| 45e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 6f 6b 69 6e 67 2d 62 61 63 6b | ...................(looking-back |
| 4600 | 20 22 5c 5c 2e 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 33 20 31 29 29 20 | ."\\."))..................3.1)). |
| 4620 | 28 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 28 69 6e 73 65 72 74 20 22 20 20 22 29 0a 20 20 20 20 | (point))).....(insert."..")..... |
| 4640 | 28 77 68 69 6c 65 20 28 3d 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 29 20 30 29 0a 20 20 20 20 | (while.(=.(forward-line).0)..... |
| 4660 | 20 20 28 69 6e 73 65 72 74 20 22 20 20 22 29 29 0a 20 20 20 20 28 64 65 6c 65 74 65 2d 63 68 61 | ..(insert."..")).....(delete-cha |
| 4680 | 72 20 2d 32 29 0a 20 20 20 20 28 62 75 66 66 65 72 2d 73 74 72 69 6e 67 29 29 29 0a 0a 3b 3b 3b | r.-2).....(buffer-string)))..;;; |
| 46a0 | 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 65 65 | ###autoload.(defun.dired-subtree |
| 46c0 | 2d 69 6e 73 65 72 74 20 28 29 0a 20 20 22 49 6e 73 65 72 74 20 73 75 62 74 72 65 65 20 75 6e 64 | -insert.()..."Insert.subtree.und |
| 46e0 | 65 72 20 74 68 69 73 20 64 69 72 65 63 74 6f 72 79 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 | er.this.directory."...(interacti |
| 4700 | 76 65 29 0a 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d | ve)...(when.(and.(dired-subtree- |
| 4720 | 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 |
| 4740 | 2d 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 64 69 72 65 64 2d 73 75 62 | -p)..............(not.(dired-sub |
| 4760 | 74 72 65 65 2d 2d 69 73 2d 65 78 70 61 6e 64 65 64 2d 70 29 29 29 0a 20 20 20 20 28 6c 65 74 2a | tree--is-expanded-p))).....(let* |
| 4780 | 20 28 28 64 69 72 2d 6e 61 6d 65 20 28 64 69 72 65 64 2d 67 65 74 2d 66 69 6c 65 6e 61 6d 65 20 | .((dir-name.(dired-get-filename. |
| 47a0 | 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 69 6e 67 20 28 64 69 72 65 64 | nil))............(listing.(dired |
| 47c0 | 2d 73 75 62 74 72 65 65 2d 2d 72 65 61 64 69 6e 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 61 73 2d 64 | -subtree--readin.(file-name-as-d |
| 47e0 | 69 72 65 63 74 6f 72 79 20 64 69 72 2d 6e 61 6d 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | irectory.dir-name)))............ |
| 4800 | 62 65 67 20 65 6e 64 29 0a 20 20 20 20 20 20 28 72 65 61 64 2d 6f 6e 6c 79 2d 6d 6f 64 65 20 2d | beg.end).......(read-only-mode.- |
| 4820 | 31 29 0a 20 20 20 20 20 20 28 6d 6f 76 65 2d 65 6e 64 2d 6f 66 2d 6c 69 6e 65 20 31 29 0a 20 20 | 1).......(move-end-of-line.1)... |
| 4840 | 20 20 20 20 3b 3b 20 74 68 69 73 20 69 73 20 70 72 65 74 74 79 20 75 67 6c 79 2c 20 49 27 6d 20 | ....;;.this.is.pretty.ugly,.I'm. |
| 4860 | 73 75 72 65 20 69 74 20 63 61 6e 20 62 65 20 64 6f 6e 65 20 62 65 74 74 65 72 0a 20 20 20 20 20 | sure.it.can.be.done.better...... |
| 4880 | 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 28 69 6e 73 65 72 74 | .(save-excursion.........(insert |
| 48a0 | 20 6c 69 73 74 69 6e 67 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 65 6e 64 20 28 2b 20 28 | .listing).........(setq.end.(+.( |
| 48c0 | 70 6f 69 6e 74 29 20 32 29 29 29 0a 20 20 20 20 20 20 28 6e 65 77 6c 69 6e 65 29 0a 20 20 20 20 | point).2))).......(newline)..... |
| 48e0 | 20 20 28 73 65 74 71 20 62 65 67 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 28 6c 65 74 20 | ..(setq.beg.(point)).......(let. |
| 4900 | 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 20 20 20 20 20 | ((inhibit-read-only.t))......... |
| 4920 | 28 72 65 6d 6f 76 65 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 69 65 73 20 28 31 2d 20 62 65 67 29 | (remove-text-properties.(1-.beg) |
| 4940 | 20 62 65 67 20 27 28 64 69 72 65 64 2d 66 69 6c 65 6e 61 6d 65 29 29 29 0a 20 20 20 20 20 20 28 | .beg.'(dired-filename))).......( |
| 4960 | 6c 65 74 2a 20 28 28 6f 76 20 28 6d 61 6b 65 2d 6f 76 65 72 6c 61 79 20 62 65 67 20 65 6e 64 29 | let*.((ov.(make-overlay.beg.end) |
| 4980 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 72 65 6e 74 20 28 64 69 72 65 64 2d 73 75 | )..............(parent.(dired-su |
| 49a0 | 62 74 72 65 65 2d 2d 67 65 74 2d 6f 76 20 28 31 2d 20 62 65 67 29 29 29 0a 20 20 20 20 20 20 20 | btree--get-ov.(1-.beg)))........ |
| 49c0 | 20 20 20 20 20 20 28 64 65 70 74 68 20 28 6f 72 20 28 61 6e 64 20 70 61 72 65 6e 74 20 28 31 2b | ......(depth.(or.(and.parent.(1+ |
| 49e0 | 20 28 6f 76 65 72 6c 61 79 2d 67 65 74 20 70 61 72 65 6e 74 20 27 64 69 72 65 64 2d 73 75 62 74 | .(overlay-get.parent.'dired-subt |
| 4a00 | 72 65 65 2d 64 65 70 74 68 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ree-depth))).................... |
| 4a20 | 20 20 20 20 20 31 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 61 63 65 20 28 69 6e 74 | .....1))..............(face.(int |
| 4a40 | 65 72 6e 20 28 66 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 | ern.(format."dired-subtree-depth |
| 4a60 | 2d 25 64 2d 66 61 63 65 22 20 64 65 70 74 68 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 | -%d-face".depth)))).........(whe |
| 4a80 | 6e 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 6e 64 73 0a | n.dired-subtree-use-backgrounds. |
| 4aa0 | 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 27 66 61 63 65 20 | ..........(overlay-put.ov.'face. |
| 4ac0 | 66 61 63 65 29 29 0a 20 20 20 20 20 20 20 20 3b 3b 20 72 65 66 61 63 74 6f 72 20 74 68 69 73 20 | face)).........;;.refactor.this. |
| 4ae0 | 74 6f 20 73 6f 6d 65 20 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 28 6f 76 65 72 6c 61 | to.some.function.........(overla |
| 4b00 | 79 2d 70 75 74 20 6f 76 20 27 6c 69 6e 65 2d 70 72 65 66 69 78 0a 20 20 20 20 20 20 20 20 20 20 | y-put.ov.'line-prefix........... |
| 4b20 | 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 73 74 72 69 6e 67 70 20 64 69 72 65 64 2d 73 75 | ...........(if.(stringp.dired-su |
| 4b40 | 62 74 72 65 65 2d 6c 69 6e 65 2d 70 72 65 66 69 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | btree-line-prefix).............. |
| 4b60 | 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 6e 6f 74 20 64 69 72 65 64 2d 73 75 62 74 72 | ............(if.(not.dired-subtr |
| 4b80 | 65 65 2d 75 73 65 2d 62 61 63 6b 67 72 6f 75 6e 64 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | ee-use-backgrounds)............. |
| 4ba0 | 20 20 20 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 20 | .................(apply.'concat. |
| 4bc0 | 28 2d 72 65 70 65 61 74 20 64 65 70 74 68 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6c 69 6e | (-repeat.depth.dired-subtree-lin |
| 4be0 | 65 2d 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | e-prefix))...................... |
| 4c00 | 20 20 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ......(cond..................... |
| 4c20 | 20 20 20 20 20 20 20 20 28 28 65 71 20 6e 69 6c 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6c | ........((eq.nil.dired-subtree-l |
| 4c40 | 69 6e 65 2d 70 72 65 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 | ine-prefix-face)................ |
| 4c60 | 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.... |
| 4c80 | 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 | ................................ |
| 4ca0 | 20 28 2d 72 65 70 65 61 74 20 64 65 70 74 68 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6c 69 | .(-repeat.depth.dired-subtree-li |
| 4cc0 | 6e 65 2d 70 72 65 66 69 78 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ne-prefix))).................... |
| 4ce0 | 20 20 20 20 20 20 20 20 20 28 28 65 71 20 27 73 75 62 74 72 65 65 20 64 69 72 65 64 2d 73 75 62 | .........((eq.'subtree.dired-sub |
| 4d00 | 74 72 65 65 2d 6c 69 6e 65 2d 70 72 65 66 69 78 2d 66 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 | tree-line-prefix-face).......... |
| 4d20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 0a 20 20 20 20 | ....................(concat..... |
| 4d40 | 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 64 69 72 65 64 2d | ..........................dired- |
| 4d60 | 73 75 62 74 72 65 65 2d 6c 69 6e 65 2d 70 72 65 66 69 78 0a 20 20 20 20 20 20 20 20 20 20 20 20 | subtree-line-prefix............. |
| 4d80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 0a 20 20 | ..................(propertize... |
| 4da0 | 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 61 70 | .............................(ap |
| 4dc0 | 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 20 20 | ply.'concat..................... |
| 4de0 | 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 28 31 2d 20 64 | ..................(-repeat.(1-.d |
| 4e00 | 65 70 74 68 29 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 | epth).dired-subtree-line-prefix) |
| 4e20 | 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 | )............................... |
| 4e40 | 20 27 66 61 63 65 20 66 61 63 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .'face.face))).................. |
| 4e60 | 20 20 20 20 20 20 20 20 20 20 20 28 28 65 71 20 27 70 61 72 65 6e 74 73 20 64 69 72 65 64 2d 73 | ...........((eq.'parents.dired-s |
| 4e80 | 75 62 74 72 65 65 2d 6c 69 6e 65 2d 70 72 65 66 69 78 2d 66 61 63 65 29 0a 20 20 20 20 20 20 20 | ubtree-line-prefix-face)........ |
| 4ea0 | 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 63 61 74 0a 20 20 | ......................(concat... |
| 4ec0 | 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 64 69 72 65 | ............................dire |
| 4ee0 | 64 2d 73 75 62 74 72 65 65 2d 6c 69 6e 65 2d 70 72 65 66 69 78 0a 20 20 20 20 20 20 20 20 20 20 | d-subtree-line-prefix........... |
| 4f00 | 20 20 20 20 20 20 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 | ....................(apply.'conc |
| 4f20 | 61 74 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 | at.............................. |
| 4f40 | 20 20 20 20 20 20 20 20 28 2d 2d 6d 61 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ........(--map.................. |
| 4f60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 | .....................(propertize |
| 4f80 | 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 0a 20 20 20 20 20 | .dired-subtree-line-prefix...... |
| 4fa0 | 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 | ................................ |
| 4fc0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | .............'face.............. |
| 4fe0 | 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 | ................................ |
| 5000 | 20 20 20 20 20 28 69 6e 74 65 72 6e 20 28 66 6f 72 6d 61 74 20 22 64 69 72 65 64 2d 73 75 62 74 | .....(intern.(format."dired-subt |
| 5020 | 72 65 65 2d 64 65 70 74 68 2d 25 64 2d 66 61 63 65 22 20 69 74 29 29 29 0a 20 20 20 20 20 20 20 | ree-depth-%d-face".it)))........ |
| 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 28 | ...............................( |
| 5060 | 6e 75 6d 62 65 72 2d 73 65 71 75 65 6e 63 65 20 31 20 28 31 2d 20 64 65 70 74 68 29 29 29 29 29 | number-sequence.1.(1-.depth))))) |
| 5080 | 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 20 28 66 75 6e 63 | )))........................(func |
| 50a0 | 61 6c 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 20 64 65 | all.dired-subtree-line-prefix.de |
| 50c0 | 70 74 68 29 29 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 | pth))).........(overlay-put.ov.' |
| 50e0 | 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6e 61 6d 65 20 64 69 72 2d 6e 61 6d 65 29 0a 20 20 20 | dired-subtree-name.dir-name).... |
| 5100 | 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 65 64 2d 73 75 62 74 | .....(overlay-put.ov.'dired-subt |
| 5120 | 72 65 65 2d 70 61 72 65 6e 74 20 70 61 72 65 6e 74 29 0a 20 20 20 20 20 20 20 20 28 6f 76 65 72 | ree-parent.parent).........(over |
| 5140 | 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 64 65 70 74 68 20 | lay-put.ov.'dired-subtree-depth. |
| 5160 | 64 65 70 74 68 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 | depth).........(overlay-put.ov.' |
| 5180 | 65 76 61 70 6f 72 61 74 65 20 74 29 0a 20 20 20 20 20 20 20 20 28 70 75 73 68 20 6f 76 20 64 69 | evaporate.t).........(push.ov.di |
| 51a0 | 72 65 64 2d 73 75 62 74 72 65 65 2d 6f 76 65 72 6c 61 79 73 29 29 0a 20 20 20 20 20 20 28 67 6f | red-subtree-overlays)).......(go |
| 51c0 | 74 6f 2d 63 68 61 72 20 62 65 67 29 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 6d 6f 76 65 2d 74 | to-char.beg).......(dired-move-t |
| 51e0 | 6f 2d 66 69 6c 65 6e 61 6d 65 29 0a 20 20 20 20 20 20 28 72 65 61 64 2d 6f 6e 6c 79 2d 6d 6f 64 | o-filename).......(read-only-mod |
| 5200 | 65 20 31 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 62 6f 75 6e 64 2d 61 6e 64 2d 74 72 75 65 | e.1).......(when.(bound-and-true |
| 5220 | 2d 70 20 64 69 72 65 64 2d 66 69 6c 74 65 72 2d 6d 6f 64 65 29 20 28 64 69 72 65 64 2d 66 69 6c | -p.dired-filter-mode).(dired-fil |
| 5240 | 74 65 72 2d 6d 6f 64 65 20 31 29 29 0a 20 20 20 20 20 20 28 72 75 6e 2d 68 6f 6f 6b 73 20 27 64 | ter-mode.1)).......(run-hooks.'d |
| 5260 | 69 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 29 29 | ired-subtree-after-insert-hook)) |
| 5280 | 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 2d | ))..;;;###autoload.(defun.dired- |
| 52a0 | 73 75 62 74 72 65 65 2d 72 65 6d 6f 76 65 20 28 29 0a 20 20 22 52 65 6d 6f 76 65 20 73 75 62 74 | subtree-remove.()..."Remove.subt |
| 52c0 | 72 65 65 20 61 74 20 70 6f 69 6e 74 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 | ree.at.point."...(interactive).. |
| 52e0 | 20 28 2d 77 68 65 6e 2d 6c 65 74 2a 20 28 28 6f 76 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 | .(-when-let*.((ov.(dired-subtree |
| 5300 | 2d 2d 67 65 74 2d 6f 76 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 76 73 20 28 | --get-ov))................(ovs.( |
| 5320 | 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 67 65 74 2d 6f 76 73 2d 69 6e 0a 20 20 20 20 20 20 | dired-subtree--get-ovs-in....... |
| 5340 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 73 74 61 72 74 20 6f 76 | ...............(overlay-start.ov |
| 5360 | 29 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 | )......................(overlay- |
| 5380 | 65 6e 64 20 6f 76 29 29 29 29 0a 20 20 20 20 28 6c 65 74 20 28 28 69 6e 68 69 62 69 74 2d 72 65 | end.ov)))).....(let.((inhibit-re |
| 53a0 | 61 64 2d 6f 6e 6c 79 20 74 29 29 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 | ad-only.t)).......(dired-subtree |
| 53c0 | 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 6f 76 65 72 6c | -up).......(delete-region.(overl |
| 53e0 | 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 20 20 20 | ay-start.ov).................... |
| 5400 | 20 20 28 6f 76 65 72 6c 61 79 2d 65 6e 64 20 6f 76 29 29 0a 20 20 20 20 20 20 28 64 69 72 65 64 | ..(overlay-end.ov)).......(dired |
| 5420 | 2d 73 75 62 74 72 65 65 2d 2d 72 65 6d 6f 76 65 2d 6f 76 65 72 6c 61 79 73 20 6f 76 73 29 29 29 | -subtree--remove-overlays.ovs))) |
| 5440 | 0a 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 74 | ...(run-hooks.'dired-subtree-aft |
| 5460 | 65 72 2d 72 65 6d 6f 76 65 2d 68 6f 6f 6b 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 | er-remove-hook))..;;;###autoload |
| 5480 | 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 74 6f 67 67 6c 65 20 28 29 0a | .(defun.dired-subtree-toggle.(). |
| 54a0 | 20 20 22 49 6e 73 65 72 74 20 73 75 62 74 72 65 65 20 61 74 20 70 6f 69 6e 74 20 6f 72 20 72 65 | .."Insert.subtree.at.point.or.re |
| 54c0 | 6d 6f 76 65 20 69 74 20 69 66 20 69 74 20 77 61 73 20 6e 6f 74 20 70 72 65 73 65 6e 74 2e 22 0a | move.it.if.it.was.not.present.". |
| 54e0 | 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 69 66 20 28 64 69 72 65 64 2d 73 75 62 | ..(interactive)...(if.(dired-sub |
| 5500 | 74 72 65 65 2d 2d 69 73 2d 65 78 70 61 6e 64 65 64 2d 70 29 0a 20 20 20 20 20 20 28 70 72 6f 67 | tree--is-expanded-p).......(prog |
| 5520 | 6e 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 29 0a 20 20 | n.........(dired-next-line.1)... |
| 5540 | 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 0a 20 20 20 | ......(dired-subtree-remove).... |
| 5560 | 20 20 20 20 20 3b 3b 20 23 31 37 35 20 66 69 78 65 73 20 74 68 65 20 63 61 73 65 20 6f 66 20 74 | .....;;.#175.fixes.the.case.of.t |
| 5580 | 68 65 20 66 69 72 73 74 20 6c 69 6e 65 20 69 6e 20 64 69 72 65 64 20 77 68 65 6e 20 74 68 65 0a | he.first.line.in.dired.when.the. |
| 55a0 | 20 20 20 20 20 20 20 20 3b 3b 20 63 75 72 73 6f 72 20 6a 75 6d 70 73 20 74 6f 20 74 68 65 20 68 | ........;;.cursor.jumps.to.the.h |
| 55c0 | 65 61 64 65 72 20 69 6e 20 64 69 72 65 64 20 72 61 74 68 65 72 20 74 68 65 6e 20 74 6f 20 74 68 | eader.in.dired.rather.then.to.th |
| 55e0 | 65 0a 20 20 20 20 20 20 20 20 3b 3b 20 66 69 72 73 74 20 66 69 6c 65 20 69 6e 20 62 75 66 66 65 | e.........;;.first.file.in.buffe |
| 5600 | 72 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 62 6f 62 70 29 0a 20 20 20 20 20 20 20 20 20 | r.........(when.(bobp).......... |
| 5620 | 20 28 64 69 72 65 64 2d 6e 65 78 74 2d 6c 69 6e 65 20 31 29 29 29 0a 20 20 20 20 28 73 61 76 65 | .(dired-next-line.1))).....(save |
| 5640 | 2d 65 78 63 75 72 73 69 6f 6e 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 69 6e 73 65 72 74 | -excursion.(dired-subtree-insert |
| 5660 | 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 2d 69 6e 73 65 | ))))..(defun.dired-subtree--inse |
| 5680 | 72 74 2d 72 65 63 75 72 73 69 76 65 20 28 64 65 70 74 68 20 6d 61 78 2d 64 65 70 74 68 29 0a 20 | rt-recursive.(depth.max-depth).. |
| 56a0 | 20 22 49 6e 73 65 72 74 20 66 75 6c 6c 20 73 75 62 74 72 65 65 20 61 74 20 70 6f 69 6e 74 2e 22 | ."Insert.full.subtree.at.point." |
| 56c0 | 0a 20 20 28 73 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 6e 61 | ...(save-excursion.....(let.((na |
| 56e0 | 6d 65 20 28 64 69 72 65 64 2d 67 65 74 2d 66 69 6c 65 6e 61 6d 65 20 6e 69 6c 20 74 29 29 29 0a | me.(dired-get-filename.nil.t))). |
| 5700 | 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 6e 61 6d 65 20 28 66 69 6c 65 2d 64 69 72 65 | ......(when.(and.name.(file-dire |
| 5720 | 63 74 6f 72 79 2d 70 20 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | ctory-p.name)..................( |
| 5740 | 3c 3d 20 64 65 70 74 68 20 28 6f 72 20 6d 61 78 2d 64 65 70 74 68 20 64 65 70 74 68 29 29 0a 20 | <=.depth.(or.max-depth.depth)).. |
| 5760 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 3d 20 31 20 64 65 70 74 68 29 0a | ................(or.(=.1.depth). |
| 5780 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 73 74 72 69 6e | .....................(not.(strin |
| 57a0 | 67 2d 6d 61 74 63 68 2d 70 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 69 67 6e 6f 72 65 64 2d | g-match-p.dired-subtree-ignored- |
| 57c0 | 72 65 67 65 78 70 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 | regexp.......................... |
| 57e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 | .................(file-name-nond |
| 5800 | 69 72 65 63 74 6f 72 79 20 6e 61 6d 65 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 | irectory.name))))).........(if.( |
| 5820 | 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 29 0a 20 20 | dired-subtree--is-expanded-p)... |
| 5840 | 20 20 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 29 0a 20 20 | ..........(dired-next-line.1)... |
| 5860 | 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 69 6e 73 65 72 74 29 29 0a | ........(dired-subtree-insert)). |
| 5880 | 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 65 6e 64 29 0a 20 20 20 20 | ........(dired-subtree-end)..... |
| 58a0 | 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 75 72 | ....(dired-subtree--insert-recur |
| 58c0 | 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 0a 20 20 20 20 20 | sive.(1+.depth).max-depth)...... |
| 58e0 | 20 20 20 28 77 68 69 6c 65 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 70 72 65 76 69 6f 75 | ...(while.(dired-subtree-previou |
| 5900 | 73 2d 73 69 62 6c 69 6e 67 29 0a 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 | s-sibling)...........(dired-subt |
| 5920 | 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) |
| 5940 | 20 6d 61 78 2d 64 65 70 74 68 29 29 29 29 29 29 0a 0a 28 64 65 66 76 61 72 20 64 69 72 65 64 2d | .max-depth))))))..(defvar.dired- |
| 5960 | 73 75 62 74 72 65 65 2d 2d 63 79 63 6c 65 2d 70 72 65 76 69 6f 75 73 20 6e 69 6c 0a 20 20 22 52 | subtree--cycle-previous.nil..."R |
| 5980 | 65 6d 65 6d 62 65 72 20 70 72 65 76 69 6f 75 73 20 61 63 74 69 6f 6e 20 66 6f 72 20 60 64 69 72 | emember.previous.action.for.`dir |
| 59a0 | 65 64 2d 73 75 62 74 72 65 65 2d 63 79 63 6c 65 27 22 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c | ed-subtree-cycle'")..;;;###autol |
| 59c0 | 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 63 79 63 6c 65 20 28 | oad.(defun.dired-subtree-cycle.( |
| 59e0 | 26 6f 70 74 69 6f 6e 61 6c 20 6d 61 78 2d 64 65 70 74 68 29 0a 20 20 22 4f 72 67 2d 6d 6f 64 65 | &optional.max-depth)..."Org-mode |
| 5a00 | 20 6c 69 6b 65 20 63 79 63 6c 65 20 76 69 73 69 62 69 6c 69 74 79 3a 0a 0a 31 29 20 53 68 6f 77 | .like.cycle.visibility:..1).Show |
| 5a20 | 20 73 75 62 74 72 65 65 0a 32 29 20 53 68 6f 77 20 73 75 62 74 72 65 65 20 72 65 63 75 72 73 69 | .subtree.2).Show.subtree.recursi |
| 5a40 | 76 65 6c 79 20 28 69 66 20 70 72 65 76 69 6f 75 73 20 63 6f 6d 6d 61 6e 64 20 77 61 73 20 63 79 | vely.(if.previous.command.was.cy |
| 5a60 | 63 6c 65 29 0a 33 29 20 52 65 6d 6f 76 65 20 73 75 62 74 72 65 65 0a 0a 4e 75 6d 65 72 69 63 20 | cle).3).Remove.subtree..Numeric. |
| 5a80 | 70 72 65 66 69 78 20 77 69 6c 6c 20 73 65 74 20 6d 61 78 20 64 65 70 74 68 22 0a 20 20 28 69 6e | prefix.will.set.max.depth"...(in |
| 5aa0 | 74 65 72 61 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 | teractive."P")...(save-excursion |
| 5ac0 | 0a 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 3b 3b 20 70 72 65 66 69 78 20 2d 20 73 68 6f 77 | .....(cond......;;.prefix.-.show |
| 5ae0 | 20 73 75 62 74 72 65 65 73 20 75 70 20 74 6f 20 6d 61 78 2d 64 65 70 74 68 0a 20 20 20 20 20 28 | .subtrees.up.to.max-depth......( |
| 5b00 | 6d 61 78 2d 64 65 70 74 68 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 64 69 72 65 64 2d 73 75 62 | max-depth.......(when.(dired-sub |
| 5b20 | 74 72 65 65 2d 2d 69 73 2d 65 78 70 61 6e 64 65 64 2d 70 29 0a 20 20 20 20 20 20 20 20 28 64 69 | tree--is-expanded-p).........(di |
| 5b40 | 72 65 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 | red-next-line.1).........(dired- |
| 5b60 | 73 75 62 74 72 65 65 2d 72 65 6d 6f 76 65 29 29 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 | subtree-remove)).......(dired-su |
| 5b80 | 62 74 72 65 65 2d 2d 69 6e 73 65 72 74 2d 72 65 63 75 72 73 69 76 65 20 31 20 28 69 66 20 28 69 | btree--insert-recursive.1.(if.(i |
| 5ba0 | 6e 74 65 67 65 72 70 20 6d 61 78 2d 64 65 70 74 68 29 20 6d 61 78 2d 64 65 70 74 68 20 6e 69 6c | ntegerp.max-depth).max-depth.nil |
| 5bc0 | 29 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 63 79 | )).......(setq.dired-subtree--cy |
| 5be0 | 63 6c 65 2d 70 72 65 76 69 6f 75 73 20 3a 66 75 6c 6c 29 29 0a 20 20 20 20 20 3b 3b 20 69 66 20 | cle-previous.:full))......;;.if. |
| 5c00 | 64 69 72 65 63 74 6f 72 79 20 69 73 20 6e 6f 74 20 65 78 70 61 6e 64 65 64 2c 20 65 78 70 61 6e | directory.is.not.expanded,.expan |
| 5c20 | 64 20 6f 6e 65 20 6c 65 76 65 6c 0a 20 20 20 20 20 28 28 6e 6f 74 20 28 64 69 72 65 64 2d 73 75 | d.one.level......((not.(dired-su |
| 5c40 | 62 74 72 65 65 2d 2d 69 73 2d 65 78 70 61 6e 64 65 64 2d 70 29 29 0a 20 20 20 20 20 20 28 64 69 | btree--is-expanded-p)).......(di |
| 5c60 | 72 65 64 2d 73 75 62 74 72 65 65 2d 69 6e 73 65 72 74 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 | red-subtree-insert).......(setq. |
| 5c80 | 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 69 | dired-subtree--cycle-previous.:i |
| 5ca0 | 6e 73 65 72 74 29 29 0a 20 20 20 20 20 3b 3b 20 68 69 64 65 20 69 66 20 70 72 65 76 69 6f 75 73 | nsert))......;;.hide.if.previous |
| 5cc0 | 20 63 6f 6d 6d 61 6e 64 20 77 61 73 20 6e 6f 74 20 63 79 63 6c 65 20 6f 72 20 74 72 65 65 20 77 | .command.was.not.cycle.or.tree.w |
| 5ce0 | 61 73 20 66 75 6c 6c 79 20 65 78 70 61 6e 64 65 64 0a 20 20 20 20 20 28 28 6f 72 20 28 6e 6f 74 | as.fully.expanded......((or.(not |
| 5d00 | 20 28 65 71 20 6c 61 73 74 2d 63 6f 6d 6d 61 6e 64 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 | .(eq.last-command.'dired-subtree |
| 5d20 | 2d 63 79 63 6c 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 65 71 20 64 69 72 65 64 2d 73 75 62 | -cycle))...........(eq.dired-sub |
| 5d40 | 74 72 65 65 2d 2d 63 79 63 6c 65 2d 70 72 65 76 69 6f 75 73 20 3a 66 75 6c 6c 29 29 0a 20 20 20 | tree--cycle-previous.:full)).... |
| 5d60 | 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 28 64 69 | ...(dired-next-line.1).......(di |
| 5d80 | 72 65 64 2d 73 75 62 74 72 65 65 2d 72 65 6d 6f 76 65 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 | red-subtree-remove).......(setq. |
| 5da0 | 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 72 | dired-subtree--cycle-previous.:r |
| 5dc0 | 65 6d 6f 76 65 29 29 0a 20 20 20 20 20 28 74 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 | emove))......(t.......(dired-sub |
| 5de0 | 74 72 65 65 2d 2d 69 6e 73 65 72 74 2d 72 65 63 75 72 73 69 76 65 20 31 20 64 69 72 65 64 2d 73 | tree--insert-recursive.1.dired-s |
| 5e00 | 75 62 74 72 65 65 2d 63 79 63 6c 65 2d 64 65 70 74 68 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 | ubtree-cycle-depth).......(setq. |
| 5e20 | 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 |
| 5e40 | 75 6c 6c 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 2d 2d | ull)))))..(defun.dired-subtree-- |
| 5e60 | 66 69 6c 74 65 72 2d 75 70 20 28 6b 65 65 70 2d 64 69 72 20 6b 69 6c 6c 2d 73 69 62 6c 69 6e 67 | filter-up.(keep-dir.kill-sibling |
| 5e80 | 73 29 0a 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 28 6c 65 74 20 28 6f | s)...(save-excursion.....(let.(o |
| 5ea0 | 76 29 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 20 20 20 20 20 | v).......(save-excursion........ |
| 5ec0 | 20 28 77 68 69 6c 65 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 75 70 29 29 0a 20 20 20 20 | .(while.(dired-subtree-up))..... |
| 5ee0 | 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 20 20 | ....(dired-next-line.1)......... |
| 5f00 | 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 65 20 74 29 29 0a | (dired-subtree-mark-subtree.t)). |
| 5f20 | 20 20 20 20 20 20 28 69 66 20 6b 65 65 70 2d 64 69 72 0a 20 20 20 20 20 20 20 20 20 20 28 64 69 | ......(if.keep-dir...........(di |
| 5f40 | 72 65 64 2d 73 75 62 74 72 65 65 2d 75 6e 6d 61 72 6b 2d 73 75 62 74 72 65 65 29 0a 20 20 20 20 | red-subtree-unmark-subtree)..... |
| 5f60 | 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 6b 29 29 0a 20 20 20 | ....(dired-subtree--unmark)).... |
| 5f80 | 20 20 20 28 77 68 69 6c 65 20 28 61 6e 64 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 75 70 | ...(while.(and.(dired-subtree-up |
| 5fa0 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3e 20 28 64 69 72 65 64 2d 73 75 | )...................(>.(dired-su |
| 5fc0 | 62 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 | btree--get-depth.(dired-subtree- |
| 5fe0 | 2d 67 65 74 2d 6f 76 29 29 20 30 29 29 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 6e 6f 74 20 6b | -get-ov)).0)).........(if.(not.k |
| 6000 | 69 6c 6c 2d 73 69 62 6c 69 6e 67 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 | ill-siblings).............(dired |
| 6020 | 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 28 64 69 72 | -subtree--unmark)...........(dir |
| 6040 | 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 28 6c | ed-subtree--unmark)...........(l |
| 6060 | 65 74 20 28 28 68 65 72 65 20 28 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | et.((here.(point)))............. |
| 6080 | 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 77 69 74 68 2d 73 75 62 74 72 65 65 0a 20 20 20 20 | (dired-subtree-with-subtree..... |
| 60a0 | 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 64 69 72 65 64 2d 73 75 62 74 72 | .........(when.(and.(dired-subtr |
| 60c0 | 65 65 2d 2d 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 20 | ee--is-expanded-p).............. |
| 60e0 | 20 20 20 20 20 20 20 20 20 20 20 28 2f 3d 20 28 70 6f 69 6e 74 29 20 68 65 72 65 29 29 0a 20 20 | ...........(/=.(point).here))... |
| 6100 | 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 75 6e 6d | .............(dired-subtree--unm |
| 6120 | 61 72 6b 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 | ark)................(save-excurs |
| 6140 | 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 6e 65 78 74 | ion..................(dired-next |
| 6160 | 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 28 64 69 72 65 64 | -line.1)..................(dired |
| 6180 | 2d 73 75 62 74 72 65 65 2d 75 6e 6d 61 72 6b 2d 73 75 62 74 72 65 65 20 74 29 29 29 29 29 29 29 | -subtree-unmark-subtree.t))))))) |
| 61a0 | 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 64 6f 2d 6b 69 6c 6c 2d 6c 69 6e 65 73 29 0a 20 20 20 | .......(dired-do-kill-lines).... |
| 61c0 | 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 63 6c 65 61 6e 75 70 2d 6f 76 65 72 6c | ...(dired-subtree--cleanup-overl |
| 61e0 | 61 79 73 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 | ays))))..;;;###autoload.(defun.d |
| 6200 | 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6f 6e 6c 79 2d 74 68 69 73 2d 66 69 6c 65 20 28 26 6f 70 | ired-subtree-only-this-file.(&op |
| 6220 | 74 69 6f 6e 61 6c 20 61 72 67 29 0a 20 20 22 52 65 6d 6f 76 65 20 61 6c 6c 20 74 68 65 20 73 69 | tional.arg)..."Remove.all.the.si |
| 6240 | 62 6c 69 6e 67 73 20 6f 6e 20 74 68 65 20 72 6f 75 74 65 20 66 72 6f 6d 20 74 68 69 73 20 66 69 | blings.on.the.route.from.this.fi |
| 6260 | 6c 65 20 74 6f 20 74 68 65 20 74 6f 70 2d 6d 6f 73 74 20 64 69 72 65 63 74 6f 72 79 2e 0a 0a 57 | le.to.the.top-most.directory...W |
| 6280 | 69 74 68 20 41 52 47 20 6e 6f 6e 2d 6e 69 6c 2c 20 64 6f 20 6e 6f 74 20 72 65 6d 6f 76 65 20 65 | ith.ARG.non-nil,.do.not.remove.e |
| 62a0 | 78 70 61 6e 64 65 64 20 64 69 72 65 63 74 6f 72 69 65 73 20 69 6e 20 70 61 72 65 6e 74 73 2e 22 | xpanded.directories.in.parents." |
| 62c0 | 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 50 22 29 0a 20 20 28 64 69 72 65 64 2d 73 75 | ...(interactive."P")...(dired-su |
| 62e0 | 62 74 72 65 65 2d 2d 66 69 6c 74 65 72 2d 75 70 20 6e 69 6c 20 61 72 67 29 29 0a 0a 3b 3b 3b 23 | btree--filter-up.nil.arg))..;;;# |
| 6300 | 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 65 65 2d | ##autoload.(defun.dired-subtree- |
| 6320 | 6f 6e 6c 79 2d 74 68 69 73 2d 64 69 72 65 63 74 6f 72 79 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 | only-this-directory.(&optional.a |
| 6340 | 72 67 29 0a 20 20 22 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 | rg)..."Remove.all.the.siblings.o |
| 6360 | 6e 20 74 68 65 20 72 6f 75 74 65 20 66 72 6f 6d 20 74 68 69 73 20 64 69 72 65 63 74 6f 72 79 20 | n.the.route.from.this.directory. |
| 6380 | 74 6f 20 74 68 65 20 74 6f 70 2d 6d 6f 73 74 20 64 69 72 65 63 74 6f 72 79 2e 0a 0a 57 69 74 68 | to.the.top-most.directory...With |
| 63a0 | 20 41 52 47 20 6e 6f 6e 2d 6e 69 6c 2c 20 64 6f 20 6e 6f 74 20 72 65 6d 6f 76 65 20 65 78 70 61 | .ARG.non-nil,.do.not.remove.expa |
| 63c0 | 6e 64 65 64 20 64 69 72 65 63 74 6f 72 69 65 73 20 69 6e 20 70 61 72 65 6e 74 73 2e 22 0a 20 20 | nded.directories.in.parents."... |
| 63e0 | 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 50 22 29 0a 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 | (interactive."P")...(dired-subtr |
| 6400 | 65 65 2d 2d 66 69 6c 74 65 72 2d 75 70 20 74 20 61 72 67 29 29 0a 0a 3b 3b 3b 20 66 69 6c 74 65 | ee--filter-up.t.arg))..;;;.filte |
| 6420 | 72 69 6e 67 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 66 69 6c 74 65 | ring.(defun.dired-subtree--filte |
| 6440 | 72 2d 75 70 64 61 74 65 2d 62 73 20 28 6f 76 29 0a 20 20 22 55 70 64 61 74 65 20 74 68 65 20 6c | r-update-bs.(ov)..."Update.the.l |
| 6460 | 6f 63 61 6c 20 66 69 6c 74 65 72 20 6c 69 73 74 2e 0a 0a 54 68 69 73 20 66 75 6e 63 74 69 6f 6e | ocal.filter.list...This.function |
| 6480 | 20 61 73 73 75 6d 65 73 20 74 68 61 74 20 60 64 69 72 65 64 2d 66 69 6c 74 65 72 2d 73 74 61 63 | .assumes.that.`dired-filter-stac |
| 64a0 | 6b 27 20 69 73 20 64 79 6e 61 6d 69 63 61 6c 6c 79 0a 62 6f 75 6e 64 20 74 6f 20 72 65 6c 65 76 | k'.is.dynamically.bound.to.relev |
| 64c0 | 61 6e 74 20 76 61 6c 75 65 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 66 69 6c 74 20 28 64 69 72 65 | ant.value."...(let*.((filt.(dire |
| 64e0 | 64 2d 66 69 6c 74 65 72 2d 2d 64 65 73 63 72 69 62 65 2d 66 69 6c 74 65 72 73 29 29 0a 20 20 20 | d-filter--describe-filters)).... |
| 6500 | 20 20 20 20 20 20 28 62 65 66 6f 72 65 2d 73 74 72 20 28 69 66 20 28 65 71 75 61 6c 20 66 69 6c | ......(before-str.(if.(equal.fil |
| 6520 | 74 20 22 22 29 20 6e 69 6c 20 28 63 6f 6e 63 61 74 20 22 20 20 4c 6f 63 61 6c 20 66 69 6c 74 65 | t."").nil.(concat."..Local.filte |
| 6540 | 72 73 3a 20 22 20 66 69 6c 74 20 22 5c 6e 22 29 29 29 29 0a 20 20 20 20 28 6f 76 65 72 6c 61 79 | rs:.".filt."\n")))).....(overlay |
| 6560 | 2d 70 75 74 20 6f 76 20 27 62 65 66 6f 72 65 2d 73 74 72 69 6e 67 20 62 65 66 6f 72 65 2d 73 74 | -put.ov.'before-string.before-st |
| 6580 | 72 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 66 69 6c 74 | r)))..(defun.dired-subtree--filt |
| 65a0 | 65 72 2d 73 75 62 74 72 65 65 20 28 6f 76 29 0a 20 20 22 52 75 6e 20 74 68 65 20 66 69 6c 74 65 | er-subtree.(ov)..."Run.the.filte |
| 65c0 | 72 20 66 6f 72 20 74 68 69 73 20 73 75 62 74 72 65 65 2e 0a 0a 49 74 20 69 73 20 6f 6e 6c 79 20 | r.for.this.subtree...It.is.only. |
| 65e0 | 73 61 66 65 20 74 6f 20 63 61 6c 6c 20 74 68 69 73 20 66 72 6f 6d 20 72 65 61 64 69 6e 2e 0a 0a | safe.to.call.this.from.readin... |
| 6600 | 54 68 69 73 20 64 65 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 | This.depends.on.`dired-filter'.p |
| 6620 | 61 63 6b 61 67 65 2e 22 0a 20 20 28 77 68 65 6e 20 28 66 65 61 74 75 72 65 70 20 27 64 69 72 65 | ackage."...(when.(featurep.'dire |
| 6640 | 64 2d 66 69 6c 74 65 72 29 0a 20 20 20 20 28 6c 65 74 20 28 28 64 69 72 65 64 2d 66 69 6c 74 65 | d-filter).....(let.((dired-filte |
| 6660 | 72 2d 73 74 61 63 6b 20 28 6f 76 65 72 6c 61 79 2d 67 65 74 20 6f 76 20 27 64 69 72 65 64 2d 73 | r-stack.(overlay-get.ov.'dired-s |
| 6680 | 75 62 74 72 65 65 2d 66 69 6c 74 65 72 29 29 29 0a 20 20 20 20 20 20 28 73 61 76 65 2d 72 65 73 | ubtree-filter))).......(save-res |
| 66a0 | 74 72 69 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 28 77 69 64 65 6e 29 0a 20 20 20 20 20 20 20 | triction.........(widen)........ |
| 66c0 | 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6e 61 72 72 6f 77 29 0a 20 20 20 20 20 20 20 20 | .(dired-subtree-narrow)......... |
| 66e0 | 28 64 69 72 65 64 2d 66 69 6c 74 65 72 2d 2d 65 78 70 75 6e 67 65 29 0a 20 20 20 20 20 20 20 20 | (dired-filter--expunge)......... |
| 6700 | 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 64 61 74 65 2d 62 73 | (dired-subtree--filter-update-bs |
| 6720 | 20 6f 76 29 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 | .ov)))))..;;;###autoload.(defun. |
| 6740 | 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 61 70 70 6c 79 2d 66 69 6c 74 65 72 20 28 29 0a 20 20 | dired-subtree-apply-filter.()... |
| 6760 | 22 50 75 73 68 20 61 20 6c 6f 63 61 6c 20 66 69 6c 74 65 72 20 66 6f 72 20 74 68 69 73 20 73 75 | "Push.a.local.filter.for.this.su |
| 6780 | 62 74 72 65 65 2e 0a 0a 54 68 69 73 20 64 65 70 65 6e 64 73 20 6f 6e 20 60 64 69 72 65 64 2d 66 | btree...This.depends.on.`dired-f |
| 67a0 | 69 6c 74 65 72 27 20 70 61 63 6b 61 67 65 2e 0a 0a 49 74 20 77 6f 72 6b 73 20 65 78 61 63 74 6c | ilter'.package...It.works.exactl |
| 67c0 | 79 20 74 68 65 20 73 61 6d 65 20 61 73 20 67 6c 6f 62 61 6c 20 64 69 72 65 64 20 66 69 6c 74 65 | y.the.same.as.global.dired.filte |
| 67e0 | 72 73 2c 20 6f 6e 6c 79 0a 72 65 73 74 72 69 63 74 65 64 20 74 6f 20 61 20 73 75 62 74 72 65 65 | rs,.only.restricted.to.a.subtree |
| 6800 | 2e 20 20 54 68 65 20 67 6c 6f 62 61 6c 20 66 69 6c 74 65 72 20 69 73 20 61 6c 73 6f 20 61 70 70 | ...The.global.filter.is.also.app |
| 6820 | 6c 69 65 64 20 74 6f 0a 74 68 65 20 73 75 62 74 72 65 65 2e 20 20 54 68 65 20 66 69 6c 74 65 72 | lied.to.the.subtree...The.filter |
| 6840 | 20 61 63 74 69 6f 6e 20 69 73 20 72 65 61 64 20 66 72 6f 6d 20 60 64 69 72 65 64 2d 66 69 6c 74 | .action.is.read.from.`dired-filt |
| 6860 | 65 72 2d 6d 61 70 27 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 77 68 65 | er-map'."...(interactive)...(whe |
| 6880 | 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).....( |
| 68a0 | 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 |
| 68c0 | 74 2d 6f 76 29 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 64 69 72 65 64 2d 66 69 6c 74 65 72 | t-ov)).......(let.((dired-filter |
| 68e0 | 2d 73 74 61 63 6b 20 28 6f 76 65 72 6c 61 79 2d 67 65 74 20 6f 76 20 27 64 69 72 65 64 2d 73 75 | -stack.(overlay-get.ov.'dired-su |
| 6900 | 62 74 72 65 65 2d 66 69 6c 74 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6c 6f 62 | btree-filter)).............(glob |
| 6920 | 20 28 63 75 72 72 65 6e 74 2d 67 6c 6f 62 61 6c 2d 6d 61 70 29 29 0a 20 20 20 20 20 20 20 20 20 | .(current-global-map)).......... |
| 6940 | 20 20 20 28 6c 6f 63 20 28 63 75 72 72 65 6e 74 2d 6c 6f 63 61 6c 2d 6d 61 70 29 29 0a 20 20 20 | ...(loc.(current-local-map)).... |
| 6960 | 20 20 20 20 20 20 20 20 20 63 6d 64 29 0a 20 20 20 20 20 20 20 20 28 63 6c 2d 66 6c 65 74 20 28 | .........cmd).........(cl-flet.( |
| 6980 | 28 64 69 72 65 64 2d 66 69 6c 74 65 72 2d 2d 75 70 64 61 74 65 0a 20 20 20 20 20 20 20 20 20 20 | (dired-filter--update........... |
| 69a0 | 20 20 20 20 20 20 20 20 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | .........()....................( |
| 69c0 | 73 61 76 65 2d 72 65 73 74 72 69 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | save-restriction................ |
| 69e0 | 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 65 64 2d 73 75 62 | ......(overlay-put.ov.'dired-sub |
| 6a00 | 74 72 65 65 2d 66 69 6c 74 65 72 20 64 69 72 65 64 2d 66 69 6c 74 65 72 2d 73 74 61 63 6b 29 0a | tree-filter.dired-filter-stack). |
| 6a20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 64 65 6e 29 0a 20 20 20 | .....................(widen).... |
| 6a40 | 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 |
| 6a60 | 2d 72 65 76 65 72 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 | -revert)......................(d |
| 6a80 | 69 72 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 6f | ired-subtree--filter-update-bs.o |
| 6aa0 | 76 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 75 6e 77 69 6e 64 2d 70 72 6f 74 65 63 74 0a | v))))...........(unwind-protect. |
| 6ac0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 20 | ..............(progn............ |
| 6ae0 | 20 20 20 20 20 28 75 73 65 2d 67 6c 6f 62 61 6c 2d 6d 61 70 20 64 69 72 65 64 2d 66 69 6c 74 65 | .....(use-global-map.dired-filte |
| 6b00 | 72 2d 6d 61 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 73 65 2d 6c 6f 63 61 | r-map).................(use-loca |
| 6b20 | 6c 2d 6d 61 70 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 | l-map.nil).................(setq |
| 6b40 | 20 63 6d 64 20 28 6b 65 79 2d 62 69 6e 64 69 6e 67 20 28 72 65 61 64 2d 6b 65 79 2d 73 65 71 75 | .cmd.(key-binding.(read-key-sequ |
| 6b60 | 65 6e 63 65 20 22 43 68 6f 6f 73 65 20 66 69 6c 74 65 72 20 61 63 74 69 6f 6e 3a 20 22 29 29 29 | ence."Choose.filter.action:."))) |
| 6b80 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 75 73 65 2d 67 6c 6f 62 61 6c 2d 6d 61 70 20 67 6c | ).............(use-global-map.gl |
| 6ba0 | 6f 62 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 75 73 65 2d 6c 6f 63 61 6c 2d 6d 61 70 20 6c | ob).............(use-local-map.l |
| 6bc0 | 6f 63 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 70 20 28 70 6f 69 6e 74 29 29 | oc))...........(let.((p.(point)) |
| 6be0 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 65 67 20 28 6f 76 65 72 6c 61 79 2d 73 | .................(beg.(overlay-s |
| 6c00 | 74 61 72 74 20 6f 76 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 75 72 72 65 | tart.ov)).................(curre |
| 6c20 | 6e 74 2d 66 69 6c 65 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 | nt-file.(dired-utils-get-filenam |
| 6c40 | 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 77 69 6e 64 2d 70 72 6f 74 65 63 74 | e))).............(unwind-protect |
| 6c60 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 6c 2d 69 6e 74 65 72 61 63 74 69 | .................(call-interacti |
| 6c80 | 76 65 6c 79 20 63 6d 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 | vely.cmd)...............(unless. |
| 6ca0 | 28 64 69 72 65 64 2d 75 74 69 6c 73 2d 67 6f 74 6f 2d 6c 69 6e 65 20 63 75 72 72 65 6e 74 2d 66 | (dired-utils-goto-line.current-f |
| 6cc0 | 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 | ile).................(goto-char. |
| 6ce0 | 62 65 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 | beg).................(forward-li |
| 6d00 | 6e 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 | ne).................(goto-char.( |
| 6d20 | 6d 69 6e 20 70 20 28 31 2d 20 28 6f 76 65 72 6c 61 79 2d 65 6e 64 20 28 64 69 72 65 64 2d 73 75 | min.p.(1-.(overlay-end.(dired-su |
| 6d40 | 62 74 72 65 65 2d 2d 67 65 74 2d 6f 76 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | btree--get-ov))))).............. |
| 6d60 | 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 29 29 29 29 29 | ...(dired-move-to-filename)))))) |
| 6d80 | 29 29 29 0a 0a 0c 0a 3b 3b 3b 20 48 65 72 65 20 77 65 20 72 65 64 65 66 69 6e 65 20 61 20 63 6f | )))....;;;.Here.we.redefine.a.co |
| 6da0 | 75 70 6c 65 20 6f 66 20 66 75 6e 63 74 69 6f 6e 73 20 66 72 6f 6d 20 64 69 72 65 64 2e 65 6c 20 | uple.of.functions.from.dired.el. |
| 6dc0 | 74 6f 20 6d 61 6b 65 20 74 68 65 6d 0a 3b 3b 3b 20 73 75 62 74 72 65 65 2d 61 77 61 72 65 0a 0a | to.make.them.;;;.subtree-aware.. |
| 6de0 | 3b 3b 20 49 66 20 74 68 65 20 70 6f 69 6e 74 20 69 73 20 69 6e 20 61 20 73 75 62 74 72 65 65 2c | ;;.If.the.point.is.in.a.subtree, |
| 6e00 | 20 77 65 20 6e 65 65 64 20 74 6f 20 70 72 6f 76 69 64 65 20 61 20 70 72 6f 70 65 72 0a 3b 3b 20 | .we.need.to.provide.a.proper.;;. |
| 6e20 | 64 69 72 65 63 74 6f 72 79 2c 20 6e 6f 74 20 74 68 65 20 6f 6e 65 20 74 68 61 74 20 77 6f 75 6c | directory,.not.the.one.that.woul |
| 6e40 | 64 20 63 6f 6d 65 20 66 72 6f 6d 20 60 64 69 72 65 64 2d 73 75 62 64 69 72 2d 61 6c 69 73 74 27 | d.come.from.`dired-subdir-alist' |
| 6e60 | 2e 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 63 75 72 72 65 6e 74 2d 64 69 72 65 63 74 6f 72 79 | ..(defun.dired-current-directory |
| 6e80 | 20 28 26 6f 70 74 69 6f 6e 61 6c 20 6c 6f 63 61 6c 70 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 | .(&optional.localp)..."Return.th |
| 6ea0 | 65 20 6e 61 6d 65 20 6f 66 20 74 68 65 20 73 75 62 64 69 72 65 63 74 6f 72 79 20 74 6f 20 77 68 | e.name.of.the.subdirectory.to.wh |
| 6ec0 | 69 63 68 20 74 68 69 73 20 6c 69 6e 65 20 62 65 6c 6f 6e 67 73 2e 0a 54 68 69 73 20 72 65 74 75 | ich.this.line.belongs..This.retu |
| 6ee0 | 72 6e 73 20 61 20 73 74 72 69 6e 67 20 77 69 74 68 20 74 72 61 69 6c 69 6e 67 20 73 6c 61 73 68 | rns.a.string.with.trailing.slash |
| 6f00 | 2c 20 6c 69 6b 65 20 60 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 27 2e 0a 4f 70 74 69 | ,.like.`default-directory'..Opti |
| 6f20 | 6f 6e 61 6c 20 61 72 67 75 6d 65 6e 74 20 6d 65 61 6e 73 20 72 65 74 75 72 6e 20 61 20 66 69 6c | onal.argument.means.return.a.fil |
| 6f40 | 65 20 6e 61 6d 65 20 72 65 6c 61 74 69 76 65 20 74 6f 20 60 64 65 66 61 75 6c 74 2d 64 69 72 65 | e.name.relative.to.`default-dire |
| 6f60 | 63 74 6f 72 79 27 2e 22 0a 20 20 28 6c 65 74 20 28 28 68 65 72 65 20 28 70 6f 69 6e 74 29 29 0a | ctory'."...(let.((here.(point)). |
| 6f80 | 20 20 20 20 20 20 20 20 28 61 6c 69 73 74 20 28 6f 72 20 64 69 72 65 64 2d 73 75 62 64 69 72 2d | ........(alist.(or.dired-subdir- |
| 6fa0 | 61 6c 69 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 70 72 6f 62 | alist....................;;.prob |
| 6fc0 | 61 62 6c 79 20 62 65 63 61 75 73 65 20 63 61 6c 6c 65 64 20 69 6e 20 61 20 6e 6f 6e 2d 64 69 72 | ably.because.called.in.a.non-dir |
| 6fe0 | 65 64 20 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 72 | ed.buffer....................(er |
| 7000 | 72 6f 72 20 22 4e 6f 20 73 75 62 64 69 72 2d 61 6c 69 73 74 20 69 6e 20 25 73 22 20 28 63 75 72 | ror."No.subdir-alist.in.%s".(cur |
| 7020 | 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 29 0a 20 20 20 20 20 20 20 20 65 6c 74 20 64 69 72 29 | rent-buffer)))).........elt.dir) |
| 7040 | 0a 20 20 20 20 28 77 68 69 6c 65 20 61 6c 69 73 74 0a 20 20 20 20 20 20 28 73 65 74 71 20 65 6c | .....(while.alist.......(setq.el |
| 7060 | 74 20 28 63 61 72 20 61 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 20 28 63 | t.(car.alist).............dir.(c |
| 7080 | 61 72 20 65 6c 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 75 73 65 20 60 3c 3d 27 20 | ar.elt).............;;.use.`<='. |
| 70a0 | 28 6e 6f 74 20 60 3c 27 29 20 61 73 20 73 75 62 64 69 72 20 6c 69 6e 65 20 69 73 20 70 61 72 74 | (not.`<').as.subdir.line.is.part |
| 70c0 | 20 6f 66 20 73 75 62 64 69 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 61 6c 69 73 74 20 28 69 66 | .of.subdir.............alist.(if |
| 70e0 | 20 28 3c 3d 20 28 64 69 72 65 64 2d 67 65 74 2d 73 75 62 64 69 72 2d 6d 69 6e 20 65 6c 74 29 20 | .(<=.(dired-get-subdir-min.elt). |
| 7100 | 68 65 72 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 6e 69 6c 20 | here).......................nil. |
| 7120 | 20 20 20 20 20 20 3b 20 66 6f 75 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ......;.found................... |
| 7140 | 20 20 28 63 64 72 20 61 6c 69 73 74 29 29 29 29 0a 20 20 20 20 3b 3b 20 64 69 72 65 64 2d 73 75 | ..(cdr.alist)))).....;;.dired-su |
| 7160 | 62 64 69 72 3a 20 6d 6f 64 69 66 79 20 64 69 72 20 68 65 72 65 20 69 66 20 77 65 20 61 72 65 20 | bdir:.modify.dir.here.if.we.are. |
| 7180 | 69 6e 20 61 20 22 73 75 62 74 72 65 65 22 20 76 69 65 77 0a 20 20 20 20 28 2d 77 68 65 6e 2d 6c | in.a."subtree".view.....(-when-l |
| 71a0 | 65 74 20 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 | et.(parent.(dired-subtree--get-o |
| 71c0 | 76 29 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 64 69 72 20 28 63 6f 6e 63 61 74 20 28 6f 76 65 | v)).......(setq.dir.(concat.(ove |
| 71e0 | 72 6c 61 79 2d 67 65 74 20 70 61 72 65 6e 74 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6e | rlay-get.parent.'dired-subtree-n |
| 7200 | 61 6d 65 29 20 22 2f 22 29 29 29 0a 20 20 20 20 3b 3b 20 65 6e 64 0a 20 20 20 20 28 69 66 20 6c | ame)."/"))).....;;.end.....(if.l |
| 7220 | 6f 63 61 6c 70 0a 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 6d 61 6b 65 2d 72 65 6c 61 74 69 | ocalp.........(dired-make-relati |
| 7240 | 76 65 20 64 69 72 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 0a 20 20 20 20 20 20 | ve.dir.default-directory)....... |
| 7260 | 64 69 72 29 29 29 0a 0a 3b 3b 20 53 69 6e 63 65 20 74 68 65 20 74 72 65 65 2d 69 6e 73 65 72 74 | dir)))..;;.Since.the.tree-insert |
| 7280 | 65 64 20 64 69 72 65 63 74 6f 72 79 20 69 73 20 6e 6f 74 20 69 6e 20 74 68 65 20 64 69 72 65 64 | ed.directory.is.not.in.the.dired |
| 72a0 | 2d 73 75 62 64 69 72 2d 61 6c 69 73 74 2c 0a 3b 3b 20 77 65 20 6e 65 65 64 20 74 6f 20 67 75 61 | -subdir-alist,.;;.we.need.to.gua |
| 72c0 | 72 64 20 61 67 61 69 6e 73 74 20 6e 69 6c 2e 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 67 65 74 | rd.against.nil..(defun.dired-get |
| 72e0 | 2d 73 75 62 64 69 72 20 28 29 0a 20 20 3b 3b 22 52 65 74 75 72 6e 20 74 68 65 20 73 75 62 64 69 | -subdir.()...;;"Return.the.subdi |
| 7300 | 72 20 6e 61 6d 65 20 6f 6e 20 74 68 69 73 20 6c 69 6e 65 2c 20 6f 72 20 6e 69 6c 20 69 66 20 6e | r.name.on.this.line,.or.nil.if.n |
| 7320 | 6f 74 20 6f 6e 20 61 20 68 65 61 64 65 72 6c 69 6e 65 2e 22 0a 20 20 3b 3b 20 4c 6f 6f 6b 20 75 | ot.on.a.headerline."...;;.Look.u |
| 7340 | 70 20 69 6e 20 74 68 65 20 61 6c 69 73 74 20 77 68 65 74 68 65 72 20 74 68 69 73 20 69 73 20 61 | p.in.the.alist.whether.this.is.a |
| 7360 | 20 68 65 61 64 65 72 6c 69 6e 65 2e 0a 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 | .headerline....(save-excursion.. |
| 7380 | 20 20 20 28 6c 65 74 20 28 28 63 75 72 2d 64 69 72 20 28 64 69 72 65 64 2d 63 75 72 72 65 6e 74 | ...(let.((cur-dir.(dired-current |
| 73a0 | 2d 64 69 72 65 63 74 6f 72 79 29 29 29 0a 20 20 20 20 20 20 28 62 65 67 69 6e 6e 69 6e 67 2d 6f | -directory))).......(beginning-o |
| 73c0 | 66 2d 6c 69 6e 65 29 20 20 20 20 20 20 20 3b 20 61 6c 69 73 74 20 73 74 6f 72 65 73 20 62 2d 6f | f-line).......;.alist.stores.b-o |
| 73e0 | 2d 6c 20 70 6f 73 69 74 69 6f 6e 73 0a 20 20 20 20 20 20 28 61 6e 64 20 28 7a 65 72 6f 70 20 28 | -l.positions.......(and.(zerop.( |
| 7400 | 2d 20 28 70 6f 69 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | -.(point)......................( |
| 7420 | 6f 72 20 28 64 69 72 65 64 2d 67 65 74 2d 73 75 62 64 69 72 2d 6d 69 6e 0a 20 20 20 20 20 20 20 | or.(dired-get-subdir-min........ |
| 7440 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 73 73 6f 63 20 63 75 72 2d 64 69 | ...................(assoc.cur-di |
| 7460 | 72 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 | r............................... |
| 7480 | 20 20 20 64 69 72 65 64 2d 73 75 62 64 69 72 2d 61 6c 69 73 74 29 29 0a 20 20 20 20 20 20 20 20 | ...dired-subdir-alist))......... |
| 74a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 29 29 29 20 3b 3b 20 64 69 72 65 64 2d 73 | .................0))).;;.dired-s |
| 74c0 | 75 62 74 72 65 65 3a 20 72 65 74 75 72 6e 20 7a 65 72 6f 20 69 66 20 63 75 72 72 65 6e 74 0a 20 | ubtree:.return.zero.if.current.. |
| 74e0 | 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 3b 3b 20 | .............................;;. |
| 7500 | 64 69 72 20 69 73 20 6e 6f 74 20 69 6e 20 60 64 69 72 65 64 2d 73 75 62 64 69 72 2d 61 6c 69 73 | dir.is.not.in.`dired-subdir-alis |
| 7520 | 74 27 2e 0a 20 20 20 20 20 20 20 20 20 20 20 63 75 72 2d 64 69 72 29 29 29 29 0a 0a 28 70 72 6f | t'.............cur-dir))))..(pro |
| 7540 | 76 69 64 65 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 29 0a 0a 3b 3b 3b 20 64 69 72 65 64 2d | vide.'dired-subtree)..;;;.dired- |
| 7560 | 73 75 62 74 72 65 65 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 | subtree.el.ends.here............ |
| 7580 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 75a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 75c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 75e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7600 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7620 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7640 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7660 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7680 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 76a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 76c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 76e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7700 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7720 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7740 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7760 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7780 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 77a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 77c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 77e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 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 | ................................ |