summaryrefslogtreecommitdiff
path: root/localrepo/dired-sidebar-20240320.1952.tar
blob: 1ba22c4c16b12de6bb499a732990908974c45571 (plain)
ofshex dumpascii
0000 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 32 30 32 34 30 33 32 30 2e 31 39 35 32 2f 00 00 00 00 dired-sidebar-20240320.1952/....
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 30 34 00 20 35 00 00 00 0000000.00000000000.013504..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 69 64 65 62 61 72 2d 32 30 32 34 30 33 32 30 2e 31 39 35 32 2f 64 69 72 65 dired-sidebar-20240320.1952/dire
0220 64 2d 73 69 64 65 62 61 72 2d 70 6b 67 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 d-sidebar-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 36 33 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 37 33 31 31 00 20 30 00 00 00 0000763.00000000000.017311..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 69 64 65 62 61 72 22 20 (define-package."dired-sidebar".
0420 22 32 30 32 34 30 33 32 30 2e 31 39 35 32 22 20 22 54 72 65 65 20 62 72 6f 77 73 65 72 20 6c 65 "20240320.1952"."Tree.browser.le
0440 76 65 72 61 67 69 6e 67 20 64 69 72 65 64 22 0a 20 20 27 28 28 65 6d 61 63 73 20 22 32 35 2e 31 veraging.dired"...'((emacs."25.1
0460 22 29 0a 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 20 22 30 2e 30 2e 31 22 29 29 0a ").....(dired-subtree."0.0.1")).
0480 20 20 3a 63 6f 6d 6d 69 74 20 22 35 37 33 36 35 38 30 32 31 66 64 36 65 36 63 66 30 33 32 64 37 ..:commit."573658021fd6e6cf032d7
04a0 38 39 64 65 32 39 61 63 61 34 65 35 64 64 32 35 38 66 64 22 20 3a 61 75 74 68 6f 72 73 0a 20 20 89de29aca4e5dd258fd".:authors...
04c0 27 28 28 22 4a 61 6d 65 73 20 4e 67 75 79 65 6e 22 20 2e 20 22 6a 61 6d 65 73 40 6a 6f 6a 6f 6a '(("James.Nguyen"..."james@jojoj
04e0 61 6d 65 73 2e 63 6f 6d 22 29 29 0a 20 20 3a 6d 61 69 6e 74 61 69 6e 65 72 73 0a 20 20 27 28 28 ames.com"))...:maintainers...'((
0500 22 4a 61 6d 65 73 20 4e 67 75 79 65 6e 22 20 2e 20 22 6a 61 6d 65 73 40 6a 6f 6a 6f 6a 61 6d 65 "James.Nguyen"..."james@jojojame
0520 73 2e 63 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 4a 61 6d 65 s.com"))...:maintainer...'("Jame
0540 73 20 4e 67 75 79 65 6e 22 20 2e 20 22 6a 61 6d 65 73 40 6a 6f 6a 6f 6a 61 6d 65 73 2e 63 6f 6d s.Nguyen"..."james@jojojames.com
0560 22 29 0a 20 20 3a 6b 65 79 77 6f 72 64 73 0a 20 20 27 28 22 64 69 72 65 64 22 20 22 66 69 6c 65 ")...:keywords...'("dired"."file
0580 73 22 20 22 74 6f 6f 6c 73 22 29 0a 20 20 3a 75 72 6c 20 22 68 74 74 70 73 3a 2f 2f 67 69 74 68 s"."tools")...:url."https://gith
05a0 75 62 2e 63 6f 6d 2f 6a 6f 6a 6f 6a 61 6d 65 73 2f 64 69 72 65 64 2d 73 69 64 65 62 61 72 22 29 ub.com/jojojames/dired-sidebar")
05c0 0a 3b 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 .;;.Local.Variables:.;;.no-byte-
05e0 63 6f 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 compile:.t.;;.End:..............
0600 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 32 30 32 34 30 33 32 30 2e 31 39 35 32 2f 64 69 72 65 dired-sidebar-20240320.1952/dire
0620 64 2d 73 69 64 65 62 61 72 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 d-sidebar.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 31 33 35 33 33 33 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 36 35 33 34 00 20 30 00 00 00 0135333.00000000000.016534..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 69 64 65 62 61 72 2e 65 6c 20 2d 2d 2d 20 54 72 65 65 20 62 72 ;;;.dired-sidebar.el.---.Tree.br
0820 6f 77 73 65 72 20 6c 65 76 65 72 61 67 69 6e 67 20 64 69 72 65 64 20 2d 2a 2d 20 6c 65 78 69 63 owser.leveraging.dired.-*-.lexic
0840 61 6c 2d 62 69 6e 64 69 6e 67 3a 20 74 20 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 al-binding:.t.-*-..;;.Copyright.
0860 28 43 29 20 32 30 32 31 20 4a 61 6d 65 73 20 4e 67 75 79 65 6e 0a 0a 3b 3b 20 41 75 74 68 6f 72 (C).2021.James.Nguyen..;;.Author
0880 3a 20 4a 61 6d 65 73 20 4e 67 75 79 65 6e 20 3c 6a 61 6d 65 73 40 6a 6f 6a 6f 6a 61 6d 65 73 2e :.James.Nguyen.<james@jojojames.
08a0 63 6f 6d 3e 0a 3b 3b 20 4d 61 69 6e 74 61 69 6e 65 72 3a 20 4a 61 6d 65 73 20 4e 67 75 79 65 6e com>.;;.Maintainer:.James.Nguyen
08c0 20 3c 6a 61 6d 65 73 40 6a 6f 6a 6f 6a 61 6d 65 73 2e 63 6f 6d 3e 0a 3b 3b 20 55 52 4c 3a 20 68 .<james@jojojames.com>.;;.URL:.h
08e0 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 6a 6f 6a 6f 6a 61 6d 65 73 2f 64 69 72 65 ttps://github.com/jojojames/dire
0900 64 2d 73 69 64 65 62 61 72 0a 3b 3b 20 56 65 72 73 69 6f 6e 3a 20 30 2e 30 2e 31 0a 3b 3b 20 50 d-sidebar.;;.Version:.0.0.1.;;.P
0920 61 63 6b 61 67 65 2d 52 65 71 75 69 72 65 73 3a 20 28 28 65 6d 61 63 73 20 22 32 35 2e 31 22 29 ackage-Requires:.((emacs."25.1")
0940 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 20 22 30 2e 30 2e 31 22 29 29 0a 3b 3b 20 4b 65 79 .(dired-subtree."0.0.1")).;;.Key
0960 77 6f 72 64 73 3a 20 64 69 72 65 64 2c 20 66 69 6c 65 73 2c 20 74 6f 6f 6c 73 0a 3b 3b 20 48 6f words:.dired,.files,.tools.;;.Ho
0980 6d 65 50 61 67 65 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 6a 6f 6a 6f 6a mePage:.https://github.com/jojoj
09a0 61 6d 65 73 2f 64 69 72 65 64 2d 73 69 64 65 62 61 72 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 ames/dired-sidebar..;;.This.prog
09c0 72 61 6d 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3b 20 79 6f 75 20 63 61 6e 20 72 65 ram.is.free.software;.you.can.re
09e0 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 66 79 0a 3b 3b 20 69 distribute.it.and/or.modify.;;.i
0a00 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e t.under.the.terms.of.the.GNU.Gen
0a20 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 62 6c 69 73 68 65 64 eral.Public.License.as.published
0a40 20 62 79 0a 3b 3b 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 .by.;;.the.Free.Software.Foundat
0a60 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 6f 66 20 74 68 65 20 4c 69 63 ion,.either.version.3.of.the.Lic
0a80 65 6e 73 65 2c 20 6f 72 0a 3b 3b 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f 6e 29 20 61 6e 79 ense,.or.;;.(at.your.option).any
0aa0 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d .later.version...;;.This.program
0ac0 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 6f 70 65 20 74 68 61 74 .is.distributed.in.the.hope.that
0ae0 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b 3b 20 62 75 74 20 57 49 54 48 4f .it.will.be.useful,.;;.but.WITHO
0b00 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 76 65 6e 20 74 68 UT.ANY.WARRANTY;.without.even.th
0b20 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d 45 52 43 48 41 4e e.implied.warranty.of.;;.MERCHAN
0b40 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 50 41 52 54 49 43 TABILITY.or.FITNESS.FOR.A.PARTIC
0b60 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 0a 3b 3b 20 47 4e 55 20 47 65 ULAR.PURPOSE...See.the.;;.GNU.Ge
0b80 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 neral.Public.License.for.more.de
0ba0 74 61 69 6c 73 2e 0a 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 76 65 20 72 65 63 65 69 tails...;;.You.should.have.recei
0bc0 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 ved.a.copy.of.the.GNU.General.Pu
0be0 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 74 68 20 74 68 69 73 20 blic.License.;;.along.with.this.
0c00 70 72 6f 67 72 61 6d 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 70 3a 2f 2f 77 77 program...If.not,.see.<http://ww
0c20 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 w.gnu.org/licenses/>...;;;.Comme
0c40 6e 74 61 72 79 3a 0a 3b 3b 20 54 68 69 73 20 70 61 63 6b 61 67 65 20 70 72 6f 76 69 64 65 73 20 ntary:.;;.This.package.provides.
0c60 61 20 74 72 65 65 20 62 72 6f 77 73 65 72 20 73 69 6d 69 6c 61 72 20 74 6f 20 60 6e 65 6f 74 72 a.tree.browser.similar.to.`neotr
0c80 65 65 27 20 6f 72 20 60 74 72 65 65 6d 61 63 73 27 0a 3b 3b 20 62 75 74 20 6c 65 76 65 72 61 67 ee'.or.`treemacs'.;;.but.leverag
0ca0 65 73 20 60 64 69 72 65 64 27 20 74 6f 20 64 6f 20 74 68 65 20 6a 6f 62 20 6f 66 20 64 69 73 70 es.`dired'.to.do.the.job.of.disp
0cc0 6c 61 79 2e 0a 0a 3b 3b 20 28 75 73 65 2d 70 61 63 6b 61 67 65 20 64 69 72 65 64 2d 73 69 64 65 lay...;;.(use-package.dired-side
0ce0 62 61 72 0a 3b 3b 20 20 20 3a 62 69 6e 64 20 28 28 22 43 2d 78 20 43 2d 6e 22 20 2e 20 64 69 72 bar.;;...:bind.(("C-x.C-n"...dir
0d00 65 64 2d 73 69 64 65 62 61 72 2d 74 6f 67 67 6c 65 2d 73 69 64 65 62 61 72 29 29 0a 3b 3b 20 20 ed-sidebar-toggle-sidebar)).;;..
0d20 20 3a 65 6e 73 75 72 65 20 6e 69 6c 0a 3b 3b 20 20 20 3a 63 6f 6d 6d 61 6e 64 73 20 28 64 69 72 .:ensure.nil.;;...:commands.(dir
0d40 65 64 2d 73 69 64 65 62 61 72 2d 74 6f 67 67 6c 65 2d 73 69 64 65 62 61 72 29 29 0a 0a 3b 3b 3b ed-sidebar-toggle-sidebar))..;;;
0d60 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 64 69 72 65 64 29 0a 28 72 65 71 75 69 72 .Code:..(require.'dired).(requir
0d80 65 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 29 0a 28 65 76 61 6c 2d 77 68 65 6e 2d 63 6f 6d e.'dired-subtree).(eval-when-com
0da0 70 69 6c 65 20 28 72 65 71 75 69 72 65 20 27 73 75 62 72 2d 78 29 29 20 3b 20 60 69 66 2d 6c 65 pile.(require.'subr-x)).;.`if-le
0dc0 74 2a 27 20 61 6e 64 20 60 77 68 65 6e 2d 6c 65 74 2a 27 0a 0a 28 64 65 63 6c 61 72 65 2d 66 75 t*'.and.`when-let*'..(declare-fu
0de0 6e 63 74 69 6f 6e 20 62 75 66 66 65 72 2d 66 61 63 65 2d 6d 6f 64 65 2d 69 6e 76 6f 6b 65 20 22 nction.buffer-face-mode-invoke."
0e00 66 61 63 65 2d 72 65 6d 61 70 22 29 0a 0a 3b 3b 20 43 6f 6d 70 61 74 69 62 69 6c 69 74 79 0a 0a face-remap")..;;.Compatibility..
0e20 28 65 76 61 6c 2d 61 6e 64 2d 63 6f 6d 70 69 6c 65 0a 20 20 28 77 69 74 68 2d 6e 6f 2d 77 61 72 (eval-and-compile...(with-no-war
0e40 6e 69 6e 67 73 0a 20 20 20 20 28 69 66 20 28 76 65 72 73 69 6f 6e 3c 20 65 6d 61 63 73 2d 76 65 nings.....(if.(version<.emacs-ve
0e60 72 73 69 6f 6e 20 22 32 36 22 29 0a 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 rsion."26").........(progn......
0e80 20 20 20 20 20 28 64 65 66 61 6c 69 61 73 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 69 66 .....(defalias.'dired-sidebar-if
0ea0 2d 6c 65 74 2a 20 23 27 69 66 2d 6c 65 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 64 65 66 61 6c -let*.#'if-let)...........(defal
0ec0 69 61 73 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 77 68 65 6e 2d 6c 65 74 2a 20 23 27 77 ias.'dired-sidebar-when-let*.#'w
0ee0 68 65 6e 2d 6c 65 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 74 69 6f 6e 2d 70 75 74 hen-let)...........(function-put
0f00 20 23 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 69 66 2d 6c 65 74 2a 20 27 6c 69 73 70 2d 69 .#'dired-sidebar-if-let*.'lisp-i
0f20 6e 64 65 6e 74 2d 66 75 6e 63 74 69 6f 6e 20 32 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 75 6e ndent-function.2)...........(fun
0f40 63 74 69 6f 6e 2d 70 75 74 20 23 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 77 68 65 6e 2d 6c ction-put.#'dired-sidebar-when-l
0f60 65 74 2a 20 27 6c 69 73 70 2d 69 6e 64 65 6e 74 2d 66 75 6e 63 74 69 6f 6e 20 31 29 29 0a 20 20 et*.'lisp-indent-function.1))...
0f80 20 20 20 20 28 64 65 66 61 6c 69 61 73 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 69 66 2d ....(defalias.'dired-sidebar-if-
0fa0 6c 65 74 2a 20 23 27 69 66 2d 6c 65 74 2a 29 0a 20 20 20 20 20 20 28 64 65 66 61 6c 69 61 73 20 let*.#'if-let*).......(defalias.
0fc0 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 77 68 65 6e 2d 6c 65 74 2a 20 23 27 77 68 65 6e 2d 'dired-sidebar-when-let*.#'when-
0fe0 6c 65 74 2a 29 29 29 29 0a 0a 3b 3b 20 43 75 73 74 6f 6d 69 7a 61 74 69 6f 6e 73 0a 0a 28 64 65 let*))))..;;.Customizations..(de
1000 66 67 72 6f 75 70 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 20 6e 69 6c 0a 20 20 22 41 20 6d 61 fgroup.dired-sidebar.nil..."A.ma
1020 6a 6f 72 20 6d 6f 64 65 20 6c 65 76 65 72 61 67 69 6e 67 20 60 64 69 72 65 64 2d 6d 6f 64 65 27 jor.mode.leveraging.`dired-mode'
1040 20 74 6f 20 64 69 73 70 6c 61 79 20 61 20 66 69 6c 65 73 79 73 74 65 6d 20 69 6e 20 61 20 74 72 .to.display.a.filesystem.in.a.tr
1060 65 65 0a 6c 61 79 6f 75 74 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 66 69 6c 65 73 29 0a 0a 28 64 ee.layout."...:group.'files)..(d
1080 65 66 63 75 73 74 6f 6d 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 75 73 65 2d 63 75 73 74 6f efcustom.dired-sidebar-use-custo
10a0 6d 2d 66 6f 6e 74 20 6e 69 6c 0a 20 20 22 53 68 6f 77 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 m-font.nil..."Show.`dired-sideba
10c0 72 27 20 77 69 74 68 20 63 75 73 74 6f 6d 20 66 6f 6e 74 2e 0a 0a 54 68 69 73 20 66 61 63 65 20 r'.with.custom.font...This.face.
10e0 63 61 6e 20 62 65 20 63 75 73 74 6f 6d 69 7a 65 64 20 75 73 69 6e 67 20 60 64 69 72 65 64 2d 73 can.be.customized.using.`dired-s
1100 69 64 65 62 61 72 2d 66 61 63 65 27 2e 22 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 0a idebar-face'."...:type.'boolean.
1120 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 29 0a 0a 28 64 65 66 66 61 ..:group.'dired-sidebar)..(deffa
1140 63 65 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 66 61 63 65 20 6e 69 6c 0a 20 20 22 46 61 63 ce.dired-sidebar-face.nil..."Fac
1160 65 20 75 73 65 64 20 62 79 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 27 20 66 6f 72 20 63 75 e.used.by.`dired-sidebar'.for.cu
1180 73 74 6f 6d 20 66 6f 6e 74 2e 0a 0a 54 68 69 73 20 6f 6e 6c 79 20 74 61 6b 65 73 20 65 66 66 65 stom.font...This.only.takes.effe
11a0 63 74 20 69 66 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 75 73 65 2d 63 75 73 74 6f 6d 2d ct.if.`dired-sidebar-use-custom-
11c0 66 6f 6e 74 27 20 69 73 20 74 72 75 65 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d font'.is.true."...:group.'dired-
11e0 73 69 64 65 62 61 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 65 64 2d 73 69 64 65 62 sidebar)..(defcustom.dired-sideb
1200 61 72 2d 75 73 65 2d 63 75 73 74 6f 6d 2d 6d 6f 64 65 6c 69 6e 65 20 74 0a 20 20 22 53 68 6f 77 ar-use-custom-modeline.t..."Show
1220 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 27 20 77 69 74 68 20 63 75 73 74 6f 6d 20 6d 6f 64 .`dired-sidebar'.with.custom.mod
1240 65 6c 69 6e 65 2e 0a 0a 54 68 69 73 20 75 73 65 73 20 66 6f 72 6d 61 74 20 73 70 65 63 69 66 69 eline...This.uses.format.specifi
1260 65 64 20 62 79 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 6d 6f 64 65 2d 6c 69 6e 65 2d 66 ed.by.`dired-sidebar-mode-line-f
1280 6f 72 6d 61 74 27 2e 22 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 0a 20 20 3a 67 72 6f ormat'."...:type.'boolean...:gro
12a0 75 70 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 up.'dired-sidebar)..(defcustom.d
12c0 69 72 65 64 2d 73 69 64 65 62 61 72 2d 6d 6f 64 65 2d 6c 69 6e 65 2d 66 6f 72 6d 61 74 0a 20 20 ired-sidebar-mode-line-format...
12e0 27 28 22 25 65 22 20 6d 6f 64 65 2d 6c 69 6e 65 2d 66 72 6f 6e 74 2d 73 70 61 63 65 0a 20 20 20 '("%e".mode-line-front-space....
1300 20 6d 6f 64 65 2d 6c 69 6e 65 2d 62 75 66 66 65 72 2d 69 64 65 6e 74 69 66 69 63 61 74 69 6f 6e .mode-line-buffer-identification
1320 0a 20 20 20 20 22 20 22 20 20 6d 6f 64 65 2d 6c 69 6e 65 2d 65 6e 64 2d 73 70 61 63 65 73 29 0a ....."."..mode-line-end-spaces).
1340 20 20 22 4d 6f 64 65 20 6c 69 6e 65 20 66 6f 72 6d 61 74 20 66 6f 72 20 60 64 69 72 65 64 2d 73 .."Mode.line.format.for.`dired-s
1360 69 64 65 62 61 72 27 2e 22 0a 20 20 3a 74 79 70 65 20 27 6c 69 73 74 0a 20 20 3a 67 72 6f 75 70 idebar'."...:type.'list...:group
1380 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 .'dired-sidebar)..(defcustom.dir
13a0 65 64 2d 73 69 64 65 62 61 72 2d 74 68 65 6d 65 20 27 69 63 6f 6e 73 0a 20 20 22 2a 54 68 65 20 ed-sidebar-theme.'icons..."*The.
13c0 74 72 65 65 20 73 74 79 6c 65 20 74 6f 20 64 69 73 70 6c 61 79 2e 0a 60 61 73 63 69 69 27 20 69 tree.style.to.display..`ascii'.i
13e0 73 20 74 68 65 20 73 69 6d 70 6c 65 73 74 20 73 74 79 6c 65 2c 20 69 74 20 77 69 6c 6c 20 75 73 s.the.simplest.style,.it.will.us
1400 65 20 2b 2f 2d 20 74 6f 20 64 69 73 70 6c 61 79 20 74 68 65 20 66 6f 6c 64 20 73 74 61 74 65 2c e.+/-.to.display.the.fold.state,
1420 0a 69 74 20 69 73 20 73 75 69 74 61 62 6c 65 20 66 6f 72 20 74 65 72 6d 69 6e 61 6c 2e 0a 60 69 .it.is.suitable.for.terminal..`i
1440 63 6f 6e 73 27 20 75 73 65 20 60 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 27 2e 0a 60 6e 65 72 64 cons'.use.`all-the-icons'..`nerd
1460 27 20 75 73 65 20 74 68 65 20 6e 65 72 64 74 72 65 65 20 69 6e 64 65 6e 74 61 74 69 6f 6e 20 6d '.use.the.nerdtree.indentation.m
1480 6f 64 65 20 61 6e 64 20 61 72 72 6f 77 2e 0a 60 6e 6f 6e 65 27 20 75 73 65 20 6e 6f 20 74 68 65 ode.and.arrow..`none'.use.no.the
14a0 6d 65 2e 0a 60 76 73 63 6f 64 65 27 20 75 73 65 20 60 76 73 63 6f 64 65 27 20 69 63 6f 6e 73 2e me..`vscode'.use.`vscode'.icons.
14c0 0a 0a 54 68 69 73 20 6f 6e 6c 79 20 74 61 6b 65 73 20 65 66 66 65 63 74 20 69 66 20 6f 6e 20 61 ..This.only.takes.effect.if.on.a
14e0 20 6c 6f 63 61 6c 20 63 6f 6e 6e 65 63 74 69 6f 6e 2e 20 28 65 2e 67 2e 20 4e 6f 74 20 54 72 61 .local.connection..(e.g..Not.Tra
1500 6d 70 29 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 0a 20 20 3a mp)"...:group.'dired-sidebar...:
1520 74 79 70 65 20 27 28 63 68 6f 69 63 65 20 28 63 6f 6e 73 74 20 61 73 63 69 69 29 0a 20 20 20 20 type.'(choice.(const.ascii).....
1540 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 69 63 6f 6e 73 29 0a 20 20 20 20 20 .............(const.icons)......
1560 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 6e 65 72 64 29 0a 20 20 20 20 20 20 20 ............(const.nerd)........
1580 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 6e 6f 6e 65 29 0a 20 20 20 20 20 20 20 20 20 ..........(const.none)..........
15a0 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 76 73 63 6f 64 65 29 29 29 0a 0a 28 64 65 66 63 75 ........(const.vscode)))..(defcu
15c0 73 74 6f 6d 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 77 69 64 74 68 20 33 35 0a 20 20 22 57 stom.dired-sidebar-width.35..."W
15e0 69 64 74 68 20 6f 66 20 74 68 65 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 27 20 62 75 66 66 idth.of.the.`dired-sidebar'.buff
1600 65 72 2e 0a 54 68 69 73 20 6f 70 74 69 6f 6e 20 64 6f 65 73 20 6e 6f 74 20 68 61 76 65 20 65 66 er..This.option.does.not.have.ef
1620 66 65 63 74 20 69 66 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 72 65 73 69 7a 65 2d 6f 6e fect.if.`dired-sidebar-resize-on
1640 2d 6f 70 65 6e 27 20 69 73 20 6e 69 6c 2e 0a 49 66 20 79 6f 75 20 73 65 74 20 60 64 69 72 65 64 -open'.is.nil..If.you.set.`dired
1660 2d 73 69 64 65 62 61 72 2d 72 65 73 69 7a 65 2d 6f 6e 2d 6f 70 65 6e 27 20 74 6f 20 6e 69 6c 2c -sidebar-resize-on-open'.to.nil,
1680 20 79 6f 75 20 63 61 6e 20 63 75 73 74 6f 6d 69 7a 65 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 .you.can.customize.`dired-sideba
16a0 72 2d 64 69 73 70 6c 61 79 2d 61 6c 69 73 74 27 0a 74 6f 20 63 6f 6e 74 72 6f 6c 20 74 68 65 20 r-display-alist'.to.control.the.
16c0 77 69 64 74 68 20 61 6e 79 77 61 79 2e 22 0a 20 20 3a 74 79 70 65 20 27 69 6e 74 65 67 65 72 0a width.anyway."...:type.'integer.
16e0 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 29 0a 0a 28 64 65 66 63 75 ..:group.'dired-sidebar)..(defcu
1700 73 74 6f 6d 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 77 69 6e 64 6f 77 2d 66 69 78 65 64 20 stom.dired-sidebar-window-fixed.
1720 27 77 69 64 74 68 0a 20 20 22 57 68 65 74 68 65 72 20 74 68 65 20 77 69 64 74 68 20 6f 72 20 68 'width..."Whether.the.width.or.h
1740 65 69 67 68 74 20 6f 66 20 74 68 65 20 73 69 64 65 62 61 72 20 77 69 6e 64 6f 77 20 73 68 6f 75 eight.of.the.sidebar.window.shou
1760 6c 64 20 62 65 20 66 69 78 65 64 20 28 74 6f 20 70 72 65 76 65 6e 74 20 66 72 6f 6d 20 72 65 73 ld.be.fixed.(to.prevent.from.res
1780 69 7a 69 6e 67 29 2e 22 0a 20 20 3a 74 79 70 65 20 27 28 63 68 6f 69 63 65 20 28 63 6f 6e 73 74 izing)."...:type.'(choice.(const
17a0 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 77 69 .nil)..................(const.wi
17c0 64 74 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 68 65 69 dth)..................(const.hei
17e0 67 68 74 29 29 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 29 0a 0a ght))...:group.'dired-sidebar)..
1800 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 72 65 66 72 65 73 68 (defcustom.dired-sidebar-refresh
1820 2d 6f 6e 2d 70 72 6f 6a 65 63 74 2d 73 77 69 74 63 68 20 74 0a 20 20 22 52 65 66 72 65 73 68 20 -on-project-switch.t..."Refresh.
1840 73 69 64 65 62 61 72 20 77 68 65 6e 20 60 70 72 6f 6a 65 63 74 69 6c 65 27 20 6f 72 20 60 70 72 sidebar.when.`projectile'.or.`pr
1860 6f 6a 65 63 74 27 20 63 68 61 6e 67 65 73 20 70 72 6f 6a 65 63 74 73 2e 22 0a 20 20 3a 74 79 70 oject'.changes.projects."...:typ
1880 65 20 27 62 6f 6f 6c 65 61 6e 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 69 64 65 62 e.'boolean...:group.'dired-sideb
18a0 61 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 73 68 ar)..(defcustom.dired-sidebar-sh
18c0 6f 75 6c 64 2d 66 6f 6c 6c 6f 77 2d 66 69 6c 65 20 6e 69 6c 0a 20 20 22 52 65 66 72 65 73 68 20 ould-follow-file.nil..."Refresh.
18e0 73 69 64 65 62 61 72 20 74 6f 20 6d 61 74 63 68 20 63 75 72 72 65 6e 74 20 66 69 6c 65 2e 22 0a sidebar.to.match.current.file.".
1900 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 ..:type.'boolean...:group.'dired
1920 2d 73 69 64 65 62 61 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 65 64 2d 73 69 64 65 -sidebar)..(defcustom.dired-side
1940 62 61 72 2d 73 6b 69 70 2d 73 75 62 74 72 65 65 2d 70 61 72 65 6e 74 20 74 0a 20 20 22 57 68 65 bar-skip-subtree-parent.t..."Whe
1960 74 68 65 72 20 74 6f 20 73 6b 69 70 20 73 75 62 74 72 65 65 20 70 61 72 65 6e 74 20 64 69 72 65 ther.to.skip.subtree.parent.dire
1980 63 74 6f 72 79 20 77 68 65 6e 20 6a 75 6d 70 69 6e 67 20 75 70 2e 22 0a 20 20 3a 74 79 70 65 20 ctory.when.jumping.up."...:type.
19a0 27 62 6f 6f 6c 65 61 6e 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 'boolean...:group.'dired-sidebar
19c0 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 70 6f 70 2d )..(defcustom.dired-sidebar-pop-
19e0 74 6f 2d 73 69 64 65 62 61 72 2d 6f 6e 2d 74 6f 67 67 6c 65 2d 6f 70 65 6e 20 74 0a 20 20 22 57 to-sidebar-on-toggle-open.t..."W
1a00 68 65 74 68 65 72 20 74 6f 20 6a 75 6d 70 20 74 6f 20 73 69 64 65 62 61 72 20 75 70 6f 6e 20 74 hether.to.jump.to.sidebar.upon.t
1a20 6f 67 67 6c 69 6e 67 20 6f 70 65 6e 2e 0a 0a 54 68 69 73 20 69 73 20 75 73 65 64 20 69 6e 20 63 oggling.open...This.is.used.in.c
1a40 6f 6e 6a 75 6e 63 74 69 6f 6e 20 77 69 74 68 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 74 onjunction.with.`dired-sidebar-t
1a60 6f 67 67 6c 65 2d 73 69 64 65 62 61 72 27 2e 22 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 oggle-sidebar'."...:type.'boolea
1a80 6e 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 29 0a 0a 28 64 65 66 n...:group.'dired-sidebar)..(def
1aa0 63 75 73 74 6f 6d 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 66 6f 6c 6c 6f 77 2d 66 69 6c 65 custom.dired-sidebar-follow-file
1ac0 2d 61 74 2d 70 6f 69 6e 74 2d 6f 6e 2d 74 6f 67 67 6c 65 2d 6f 70 65 6e 20 74 0a 20 20 22 57 68 -at-point-on-toggle-open.t..."Wh
1ae0 65 74 68 65 72 20 74 6f 20 72 65 63 75 72 73 69 76 65 6c 79 20 63 79 63 6c 65 20 74 68 65 20 73 ether.to.recursively.cycle.the.s
1b00 75 62 74 72 65 65 20 61 6e 64 20 70 75 74 20 70 6f 69 6e 74 20 6f 6e 20 66 69 6c 65 2e 0a 0a 53 ubtree.and.put.point.on.file...S
1b20 69 6d 69 6c 61 72 20 74 6f 20 60 64 69 72 65 64 2d 6a 75 6d 70 27 2e 20 20 54 68 69 73 20 6d 6f imilar.to.`dired-jump'...This.mo
1b40 76 65 73 20 70 6f 69 6e 74 20 69 6e 73 69 64 65 20 73 69 64 65 62 61 72 20 62 75 66 66 65 72 0a ves.point.inside.sidebar.buffer.
1b60 74 6f 20 77 68 65 72 65 20 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 2d 66 69 6c 65 20 69 73 20 to.where.current-buffer-file.is.
1b80 5c 28 69 66 20 69 74 20 65 78 69 73 74 73 5c 29 20 62 75 74 20 64 6f 65 73 20 6e 6f 74 20 6e 65 \(if.it.exists\).but.does.not.ne
1ba0 63 65 73 73 61 72 69 6c 79 0a 73 65 6c 65 63 74 20 74 68 65 20 73 69 64 65 62 61 72 20 77 69 6e cessarily.select.the.sidebar.win
1bc0 64 6f 77 2e 22 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 0a 20 20 3a 67 72 6f 75 70 20 dow."...:type.'boolean...:group.
1be0 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 65 'dired-sidebar)..(defcustom.dire
1c00 64 2d 73 69 64 65 62 61 72 2d 75 73 65 2d 6d 61 67 69 74 2d 69 6e 74 65 67 72 61 74 69 6f 6e 20 d-sidebar-use-magit-integration.
1c20 74 0a 20 20 22 57 68 65 74 68 65 72 20 74 6f 20 69 6e 74 65 67 72 61 74 65 20 77 69 74 68 20 60 t..."Whether.to.integrate.with.`
1c40 6d 61 67 69 74 2d 6d 6f 64 65 27 2e 0a 0a 57 68 65 6e 20 74 72 75 65 3a 0a 0a 57 68 65 6e 20 66 magit-mode'...When.true:..When.f
1c60 69 6e 64 69 6e 67 20 66 69 6c 65 20 74 6f 20 70 6f 69 6e 74 20 61 74 20 66 6f 72 0a 60 64 69 72 inding.file.to.point.at.for.`dir
1c80 65 64 2d 73 69 64 65 62 61 72 2d 66 6f 6c 6c 6f 77 2d 66 69 6c 65 2d 61 74 2d 70 6f 69 6e 74 2d ed-sidebar-follow-file-at-point-
1ca0 6f 6e 2d 74 6f 67 67 6c 65 2d 6f 70 65 6e 27 2c 20 75 73 65 20 66 69 6c 65 20 61 74 20 70 6f 69 on-toggle-open',.use.file.at.poi
1cc0 6e 74 0a 69 6e 20 60 6d 61 67 69 74 27 20 62 75 66 66 65 72 2e 0a 0a 57 68 65 6e 20 66 69 6e 64 nt.in.`magit'.buffer...When.find
1ce0 69 6e 67 20 72 6f 6f 74 20 64 69 72 65 63 74 6f 72 79 20 66 6f 72 20 73 69 64 65 62 61 72 2c 20 ing.root.directory.for.sidebar,.
1d00 75 73 65 20 64 69 72 65 63 74 6f 72 79 20 73 70 65 63 69 66 69 65 64 20 62 79 20 60 6d 61 67 69 use.directory.specified.by.`magi
1d20 74 27 2e 22 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 0a 20 20 3a 67 72 6f 75 70 20 27 t'."...:type.'boolean...:group.'
1d40 64 69 72 65 64 2d 73 69 64 65 62 61 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 65 64 dired-sidebar)..(defcustom.dired
1d60 2d 73 69 64 65 62 61 72 2d 75 73 65 2d 74 65 72 6d 2d 69 6e 74 65 67 72 61 74 69 6f 6e 20 6e 69 -sidebar-use-term-integration.ni
1d80 6c 0a 20 20 22 57 68 65 74 68 65 72 20 74 6f 20 69 6e 74 65 67 72 61 74 65 20 77 69 74 68 20 60 l..."Whether.to.integrate.with.`
1da0 74 65 72 6d 2d 6d 6f 64 65 27 2e 0a 0a 57 68 65 6e 20 74 72 75 65 3a 0a 0a 57 68 65 6e 20 66 69 term-mode'...When.true:..When.fi
1dc0 6e 64 69 6e 67 20 72 6f 6f 74 20 64 69 72 65 63 74 6f 72 79 20 66 6f 72 20 73 69 64 65 62 61 72 nding.root.directory.for.sidebar
1de0 2c 20 75 73 65 20 50 57 44 20 6f 66 20 60 74 65 72 6d 2d 6d 6f 64 65 27 2e 20 54 68 69 73 20 69 ,.use.PWD.of.`term-mode'..This.i
1e00 73 20 74 75 72 6e 65 64 0a 6f 66 66 20 62 79 20 64 65 66 61 75 6c 74 20 64 75 65 20 74 6f 20 74 s.turned.off.by.default.due.to.t
1e20 68 65 20 65 78 70 65 72 69 6d 65 6e 74 61 6c 20 6e 61 74 75 72 65 20 6f 66 20 67 65 74 74 69 6e he.experimental.nature.of.gettin
1e40 67 20 74 68 65 20 50 57 44 20 66 72 6f 6d 20 74 68 65 0a 74 65 72 6d 69 6e 61 6c 2e 0a 0a 4c 6f g.the.PWD.from.the.terminal...Lo
1e60 6f 6b 20 61 74 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 74 65 72 6d 2d 67 65 74 2d 70 77 ok.at.`dired-sidebar-term-get-pw
1e80 64 27 20 66 6f 72 20 69 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 2e 22 0a 20 20 3a 74 79 70 65 20 d'.for.implementation."...:type.
1ea0 27 62 6f 6f 6c 65 61 6e 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 'boolean...:group.'dired-sidebar
1ec0 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 75 73 65 2d )..(defcustom.dired-sidebar-use-
1ee0 77 64 69 72 65 64 2d 69 6e 74 65 67 72 61 74 69 6f 6e 20 74 0a 20 20 22 57 68 65 74 68 65 72 20 wdired-integration.t..."Whether.
1f00 74 6f 20 69 6e 74 65 67 72 61 74 65 20 77 69 74 68 20 60 77 64 69 72 65 64 27 2e 22 0a 20 20 3a to.integrate.with.`wdired'."...:
1f20 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 69 type.'boolean...:group.'dired-si
1f40 64 65 62 61 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 debar)..(defcustom.dired-sidebar
1f60 2d 63 79 63 6c 65 2d 73 75 62 74 72 65 65 2d 6f 6e 2d 63 6c 69 63 6b 20 74 0a 20 20 22 57 68 65 -cycle-subtree-on-click.t..."Whe
1f80 74 68 65 72 20 74 6f 20 63 79 63 6c 65 20 73 75 62 74 72 65 65 20 6f 6e 20 63 6c 69 63 6b 2e 22 ther.to.cycle.subtree.on.click."
1fa0 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 ...:type.'boolean...:group.'dire
1fc0 64 2d 73 69 64 65 62 61 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 65 64 2d 73 69 64 d-sidebar)..(defcustom.dired-sid
1fe0 65 62 61 72 2d 64 65 6c 61 79 2d 61 75 74 6f 2d 72 65 76 65 72 74 2d 75 70 64 61 74 65 73 20 74 ebar-delay-auto-revert-updates.t
2000 0a 20 20 22 57 68 65 74 68 65 72 20 74 6f 20 64 65 6c 61 79 20 61 75 74 6f 6d 61 74 69 63 61 6c ..."Whether.to.delay.automatical
2020 6c 79 20 72 65 76 65 72 74 69 6e 67 20 62 75 66 66 65 72 2e 0a 0a 57 68 65 6e 20 74 72 75 65 2c ly.reverting.buffer...When.true,
2040 20 6f 6e 6c 79 20 61 6c 6c 6f 77 20 66 75 6e 63 74 69 6f 6e 20 60 61 75 74 6f 2d 72 65 76 65 72 .only.allow.function.`auto-rever
2060 74 2d 6d 6f 64 65 27 20 74 6f 20 75 70 64 61 74 65 20 65 76 65 72 79 0a 60 64 69 72 64 2d 73 69 t-mode'.to.update.every.`dird-si
2080 64 65 62 61 72 2d 73 74 61 6c 65 2d 62 75 66 66 65 72 2d 74 69 6d 65 2d 69 64 6c 65 2d 64 65 6c debar-stale-buffer-time-idle-del
20a0 61 79 27 20 73 65 63 6f 6e 64 73 2e 22 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 0a 20 ay'.seconds."...:type.'boolean..
20c0 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 29 0a 0a 28 64 65 66 63 75 73 .:group.'dired-sidebar)..(defcus
20e0 74 6f 6d 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 73 74 61 6c 65 2d 62 75 66 66 65 72 2d 74 tom.dired-sidebar-stale-buffer-t
2100 69 6d 65 2d 69 64 6c 65 2d 64 65 6c 61 79 20 31 2e 35 0a 20 20 22 54 68 65 20 74 69 6d 65 20 69 ime-idle-delay.1.5..."The.time.i
2120 6e 20 69 64 6c 65 20 73 65 63 6f 6e 64 73 20 74 6f 20 77 61 69 74 20 62 65 66 6f 72 65 20 63 68 n.idle.seconds.to.wait.before.ch
2140 65 63 6b 69 6e 67 20 69 66 20 62 75 66 66 65 72 20 69 73 20 73 74 61 6c 65 2e 22 0a 20 20 3a 74 ecking.if.buffer.is.stale."...:t
2160 79 70 65 20 27 6e 75 6d 62 65 72 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 69 64 65 ype.'number...:group.'dired-side
2180 62 61 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 66 bar)..(defcustom.dired-sidebar-f
21a0 6f 6c 6c 6f 77 2d 66 69 6c 65 2d 69 64 6c 65 2d 64 65 6c 61 79 20 32 0a 20 20 22 54 68 65 20 74 ollow-file-idle-delay.2..."The.t
21c0 69 6d 65 20 69 6e 20 69 64 6c 65 20 73 65 63 6f 6e 64 73 20 74 6f 20 77 61 69 74 20 62 65 66 6f ime.in.idle.seconds.to.wait.befo
21e0 72 65 20 63 68 65 63 6b 69 6e 67 20 69 66 20 73 69 64 65 62 61 72 20 73 68 6f 75 6c 64 0a 66 6f re.checking.if.sidebar.should.fo
2200 6c 6c 6f 77 20 66 69 6c 65 2e 22 0a 20 20 3a 74 79 70 65 20 27 6e 75 6d 62 65 72 0a 20 20 3a 67 llow.file."...:type.'number...:g
2220 72 6f 75 70 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d roup.'dired-sidebar)..(defcustom
2240 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 74 75 69 2d 75 70 64 61 74 65 2d 64 65 6c 61 79 20 .dired-sidebar-tui-update-delay.
2260 30 2e 30 32 0a 20 20 22 54 68 65 20 74 69 6d 65 20 69 6e 20 69 64 6c 65 20 73 65 63 6f 6e 64 73 0.02..."The.time.in.idle.seconds
2280 20 74 6f 20 77 61 69 74 20 62 65 66 6f 72 65 20 75 70 64 61 74 69 6e 67 20 74 75 69 20 69 6e 74 .to.wait.before.updating.tui.int
22a0 65 72 66 61 63 65 2e 0a 0a 54 68 69 73 20 6f 6e 6c 79 20 74 61 6b 65 73 20 65 66 66 65 63 74 20 erface...This.only.takes.effect.
22c0 69 66 20 60 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 2d 64 69 72 65 64 27 20 69 73 20 64 69 73 61 if.`all-the-icons-dired'.is.disa
22e0 62 6c 65 64 2e 22 0a 20 20 3a 74 79 70 65 20 27 6e 75 6d 62 65 72 0a 20 20 3a 67 72 6f 75 70 20 bled."...:type.'number...:group.
2300 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 65 'dired-sidebar)..(defcustom.dire
2320 64 2d 73 69 64 65 62 61 72 2d 72 65 66 72 65 73 68 2d 6f 6e 2d 73 70 65 63 69 61 6c 2d 63 6f 6d d-sidebar-refresh-on-special-com
2340 6d 61 6e 64 73 20 74 0a 20 20 22 57 68 65 74 68 65 72 20 6f 72 20 6e 6f 74 20 74 6f 20 74 72 69 mands.t..."Whether.or.not.to.tri
2360 67 67 65 72 20 61 75 74 6f 2d 72 65 76 65 72 74 20 61 66 74 65 72 20 63 65 72 74 61 69 6e 20 66 gger.auto-revert.after.certain.f
2380 75 6e 63 74 69 6f 6e 73 2e 0a 0a 57 61 72 6e 69 6e 67 3a 20 54 68 69 73 20 69 73 20 69 6d 70 6c unctions...Warning:.This.is.impl
23a0 65 6d 65 6e 74 65 64 20 62 79 20 61 64 76 69 73 69 6e 67 20 73 70 65 63 69 66 69 63 20 64 69 72 emented.by.advising.specific.dir
23c0 65 64 20 66 75 6e 63 74 69 6f 6e 73 2e 22 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 0a ed.functions."...:type.'boolean.
23e0 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 29 0a 0a 28 64 65 66 63 75 ..:group.'dired-sidebar)..(defcu
2400 73 74 6f 6d 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 64 69 73 61 62 6c 65 2d 64 69 72 65 64 stom.dired-sidebar-disable-dired
2420 2d 63 6f 6c 6c 61 70 73 65 20 74 0a 20 20 22 57 68 65 74 68 65 72 20 6f 72 20 6e 6f 74 20 74 6f -collapse.t..."Whether.or.not.to
2440 20 64 69 73 61 62 6c 65 20 60 64 69 72 65 64 2d 63 6f 6c 6c 61 70 73 65 27 20 69 66 20 69 74 27 .disable.`dired-collapse'.if.it'
2460 73 20 65 6e 61 62 6c 65 64 2e 22 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 0a 20 20 3a s.enabled."...:type.'boolean...:
2480 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 29 0a 0a 28 64 65 66 63 75 73 74 6f group.'dired-sidebar)..(defcusto
24a0 6d 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 73 70 65 63 69 61 6c 2d 72 65 66 72 65 73 68 2d m.dired-sidebar-special-refresh-
24c0 63 6f 6d 6d 61 6e 64 73 0a 20 20 27 28 64 69 72 65 64 2d 64 6f 2d 64 65 6c 65 74 65 0a 20 20 20 commands...'(dired-do-delete....
24e0 20 64 69 72 65 64 2d 64 6f 2d 72 65 6e 61 6d 65 0a 20 20 20 20 64 69 72 65 64 2d 64 6f 2d 63 6f .dired-do-rename.....dired-do-co
2500 70 79 0a 20 20 20 20 64 69 72 65 64 2d 64 6f 2d 66 6c 61 67 67 65 64 2d 64 65 6c 65 74 65 0a 20 py.....dired-do-flagged-delete..
2520 20 20 20 64 69 72 65 64 2d 63 72 65 61 74 65 2d 64 69 72 65 63 74 6f 72 79 0a 20 20 20 20 28 64 ...dired-create-directory.....(d
2540 65 6c 65 74 65 2d 66 69 6c 65 20 2e 20 35 29 0a 20 20 20 20 28 73 61 76 65 2d 62 75 66 66 65 72 elete-file...5).....(save-buffer
2560 20 2e 20 35 29 0a 20 20 20 20 6d 61 67 69 74 2d 66 6f 72 6d 61 74 2d 70 61 74 63 68 29 0a 20 20 ...5).....magit-format-patch)...
2580 22 41 20 6c 69 73 74 20 6f 66 20 63 6f 6d 6d 61 6e 64 73 20 74 68 61 74 20 77 69 6c 6c 20 74 72 "A.list.of.commands.that.will.tr
25a0 69 67 67 65 72 20 61 20 72 65 66 72 65 73 68 20 6f 66 20 74 68 65 20 73 69 64 65 62 61 72 2e 0a igger.a.refresh.of.the.sidebar..
25c0 0a 54 68 65 20 63 6f 6d 6d 61 6e 64 20 63 61 6e 20 62 65 20 61 6e 20 61 6c 69 73 74 20 77 69 74 .The.command.can.be.an.alist.wit
25e0 68 20 74 68 65 20 43 44 52 20 6f 66 20 74 68 65 20 61 6c 69 73 74 20 62 65 69 6e 67 20 74 68 65 h.the.CDR.of.the.alist.being.the
2600 20 61 6d 6f 75 6e 74 20 6f 66 20 74 69 6d 65 0a 74 6f 20 77 61 69 74 20 74 6f 20 72 65 66 72 65 .amount.of.time.to.wait.to.refre
2620 73 68 20 74 68 65 20 73 69 64 65 62 61 72 20 61 66 74 65 72 20 74 68 65 20 43 41 52 20 6f 66 20 sh.the.sidebar.after.the.CAR.of.
2640 74 68 65 20 61 6c 69 73 74 20 69 73 20 63 61 6c 6c 65 64 2e 0a 0a 53 65 74 20 74 68 69 73 20 74 the.alist.is.called...Set.this.t
2660 6f 20 6e 69 6c 20 6f 72 20 73 65 74 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 72 65 66 72 o.nil.or.set.`dired-sidebar-refr
2680 65 73 68 2d 6f 6e 2d 73 70 65 63 69 61 6c 2d 63 6f 6d 6d 61 6e 64 73 27 20 74 6f 20 6e 69 6c 0a esh-on-special-commands'.to.nil.
26a0 74 6f 20 64 69 73 61 62 6c 65 20 61 75 74 6f 6d 61 74 69 63 20 72 65 66 72 65 73 68 20 77 68 65 to.disable.automatic.refresh.whe
26c0 6e 20 61 20 73 70 65 63 69 61 6c 20 63 6f 6d 6d 61 6e 64 20 69 73 20 74 72 69 67 67 65 72 65 64 n.a.special.command.is.triggered
26e0 2e 22 0a 20 20 3a 74 79 70 65 20 27 6c 69 73 74 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 ."...:type.'list...:group.'dired
2700 2d 73 69 64 65 62 61 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 65 64 2d 73 69 64 65 -sidebar)..(defcustom.dired-side
2720 62 61 72 2d 74 6f 67 67 6c 65 2d 68 69 64 64 65 6e 2d 63 6f 6d 6d 61 6e 64 73 0a 20 20 27 28 62 bar-toggle-hidden-commands...'(b
2740 61 6c 61 6e 63 65 2d 77 69 6e 64 6f 77 73 29 0a 20 20 22 41 20 6c 69 73 74 20 6f 66 20 63 6f 6d alance-windows)..."A.list.of.com
2760 6d 61 6e 64 73 20 74 68 61 74 20 77 6f 6e 27 74 20 77 6f 72 6b 20 77 68 65 6e 20 60 64 69 72 65 mands.that.won't.work.when.`dire
2780 64 2d 73 69 64 65 62 61 72 27 20 69 73 20 76 69 73 69 62 6c 65 2e 0a 0a 57 68 65 6e 20 74 68 65 d-sidebar'.is.visible...When.the
27a0 20 63 6f 6d 6d 61 6e 64 20 69 73 20 74 72 69 67 67 65 72 65 64 2c 20 60 64 69 72 65 64 2d 73 69 .command.is.triggered,.`dired-si
27c0 64 65 62 61 72 27 20 77 69 6c 6c 20 68 69 64 65 20 74 65 6d 70 6f 72 61 72 69 6c 79 20 75 6e 74 debar'.will.hide.temporarily.unt
27e0 69 6c 0a 63 6f 6d 6d 61 6e 64 20 69 73 20 63 6f 6d 70 6c 65 74 65 64 2e 0a 0a 54 68 69 73 20 66 il.command.is.completed...This.f
2800 75 6e 63 74 69 6f 6e 61 6c 69 74 79 20 69 73 20 69 6d 70 6c 65 6d 65 6e 74 65 64 20 75 73 69 6e unctionality.is.implemented.usin
2820 67 20 61 64 76 69 63 65 2e 0a 0a 53 65 74 20 74 68 69 73 20 74 6f 20 6e 69 6c 20 74 6f 20 64 69 g.advice...Set.this.to.nil.to.di
2840 73 61 62 6c 65 20 74 68 69 73 20 61 64 76 69 63 65 2e 22 0a 20 20 3a 74 79 70 65 20 27 6c 69 73 sable.this.advice."...:type.'lis
2860 74 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 29 0a 0a 28 64 65 66 t...:group.'dired-sidebar)..(def
2880 63 75 73 74 6f 6d 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 61 6c 74 65 72 6e 61 74 65 2d 73 custom.dired-sidebar-alternate-s
28a0 65 6c 65 63 74 2d 77 69 6e 64 6f 77 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 23 27 64 69 72 65 64 2d elect-window-function...#'dired-
28c0 73 69 64 65 62 61 72 2d 64 65 66 61 75 6c 74 2d 61 6c 74 65 72 6e 61 74 65 2d 73 65 6c 65 63 74 sidebar-default-alternate-select
28e0 2d 77 69 6e 64 6f 77 0a 20 20 22 46 75 6e 63 74 69 6f 6e 20 74 6f 20 63 61 6c 6c 20 77 68 65 6e -window..."Function.to.call.when
2900 20 75 73 69 6e 67 20 61 6c 74 65 72 6e 61 74 69 76 65 20 77 69 6e 64 6f 77 20 73 65 6c 65 63 74 .using.alternative.window.select
2920 69 6f 6e 2e 0a 0a 41 6c 74 65 72 6e 61 74 69 76 65 20 77 69 6e 64 6f 77 20 73 65 6c 65 63 74 69 ion...Alternative.window.selecti
2940 6f 6e 20 69 73 20 75 73 65 64 20 77 68 65 6e 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 66 on.is.used.when.`dired-sidebar-f
2960 69 6e 64 2d 66 69 6c 65 27 20 69 73 20 63 61 6c 6c 65 64 0a 77 69 74 68 20 61 20 70 72 65 66 69 ind-file'.is.called.with.a.prefi
2980 78 20 61 72 67 20 6f 72 20 77 68 65 6e 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 66 69 6e x.arg.or.when.`dired-sidebar-fin
29a0 64 2d 66 69 6c 65 2d 61 6c 74 27 20 69 73 20 63 61 6c 6c 65 64 2e 22 0a 20 20 3a 74 79 70 65 20 d-file-alt'.is.called."...:type.
29c0 27 66 75 6e 63 74 69 6f 6e 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 'function...:group.'dired-sideba
29e0 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 72 65 63 r)..(defcustom.dired-sidebar-rec
2a00 65 6e 74 65 72 2d 63 75 72 73 6f 72 2d 6f 6e 2d 66 6f 6c 6c 6f 77 2d 66 69 6c 65 20 74 0a 20 20 enter-cursor-on-follow-file.t...
2a20 22 57 68 65 74 68 65 72 20 6f 72 20 6e 6f 74 20 74 6f 20 63 65 6e 74 65 72 20 63 75 72 73 6f 72 "Whether.or.not.to.center.cursor
2a40 20 77 68 65 6e 20 70 6f 69 6e 74 69 6e 67 20 61 74 20 66 69 6c 65 2e 22 0a 20 20 3a 74 79 70 65 .when.pointing.at.file."...:type
2a60 20 27 62 6f 6f 6c 65 61 6e 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 .'boolean...:group.'dired-sideba
2a80 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 72 65 73 r)..(defcustom.dired-sidebar-res
2aa0 69 7a 65 2d 6f 6e 2d 6f 70 65 6e 20 74 0a 20 20 22 57 68 65 6e 20 64 69 72 65 64 20 73 69 64 65 ize-on-open.t..."When.dired.side
2ac0 62 61 72 20 77 69 6e 64 6f 77 20 69 73 20 73 68 6f 77 65 64 2c 20 61 75 74 6f 6d 61 74 69 63 61 bar.window.is.showed,.automatica
2ae0 6c 6c 79 20 61 64 6a 75 73 74 20 69 74 73 20 77 69 64 74 68 20 61 63 63 6f 72 64 69 6e 67 20 74 lly.adjust.its.width.according.t
2b00 6f 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 77 69 64 74 68 27 22 0a 20 20 3a 74 79 70 65 o.`dired-sidebar-width'"...:type
2b20 20 27 62 6f 6f 6c 65 61 6e 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 .'boolean...:group.'dired-sideba
2b40 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 72 65 63 r)..(defcustom.dired-sidebar-rec
2b60 65 6e 74 65 72 2d 63 75 72 73 6f 72 2d 6f 6e 2d 74 75 69 2d 75 70 64 61 74 65 20 6e 69 6c 0a 20 enter-cursor-on-tui-update.nil..
2b80 20 22 57 68 65 74 68 65 72 20 6f 72 20 6e 6f 74 20 74 6f 20 63 65 6e 74 65 72 20 63 75 72 73 6f ."Whether.or.not.to.center.curso
2ba0 72 20 77 68 65 6e 20 75 70 64 61 74 69 6e 67 20 74 75 69 20 69 6e 74 65 72 66 61 63 65 2e 22 0a r.when.updating.tui.interface.".
2bc0 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 ..:type.'boolean...:group.'dired
2be0 2d 73 69 64 65 62 61 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 65 64 2d 73 69 64 65 -sidebar)..(defcustom.dired-side
2c00 62 61 72 2d 64 69 73 70 6c 61 79 2d 61 75 74 6f 72 65 76 65 72 74 2d 6d 65 73 73 61 67 65 73 20 bar-display-autorevert-messages.
2c20 6e 69 6c 0a 20 20 22 57 68 65 74 68 65 72 20 6f 72 20 6e 6f 74 20 74 6f 20 64 69 73 70 6c 61 79 nil..."Whether.or.not.to.display
2c40 20 60 61 75 74 6f 72 65 76 65 72 74 27 20 6d 65 73 73 61 67 65 73 2e 22 0a 20 20 3a 74 79 70 65 .`autorevert'.messages."...:type
2c60 20 27 62 6f 6f 6c 65 61 6e 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 .'boolean...:group.'dired-sideba
2c80 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 6f 70 65 r)..(defcustom.dired-sidebar-ope
2ca0 6e 2d 66 69 6c 65 2d 69 6e 2d 6d 6f 73 74 2d 72 65 63 65 6e 74 6c 79 2d 75 73 65 64 2d 77 69 6e n-file-in-most-recently-used-win
2cc0 64 6f 77 20 74 0a 20 20 22 57 68 65 74 68 65 72 20 6f 72 20 6e 6f 74 20 74 6f 20 6f 70 65 6e 20 dow.t..."Whether.or.not.to.open.
2ce0 66 69 6c 65 73 20 69 6e 20 6d 6f 73 74 20 72 65 63 65 6e 74 6c 79 20 75 73 65 64 20 77 69 6e 64 files.in.most.recently.used.wind
2d00 6f 77 2e 22 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 0a 20 20 3a 67 72 6f 75 70 20 27 ow."...:type.'boolean...:group.'
2d20 64 69 72 65 64 2d 73 69 64 65 62 61 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 65 64 dired-sidebar)..(defcustom.dired
2d40 2d 73 69 64 65 62 61 72 2d 73 75 62 74 72 65 65 2d 6c 69 6e 65 2d 70 72 65 66 69 78 20 64 69 72 -sidebar-subtree-line-prefix.dir
2d60 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 22 54 68 65 20 6c 69 ed-subtree-line-prefix..."The.li
2d80 6e 65 20 70 72 65 66 69 78 20 74 6f 20 75 73 65 20 77 68 65 6e 20 73 75 62 74 72 65 65 20 69 73 ne.prefix.to.use.when.subtree.is
2da0 20 63 79 63 6c 65 64 2e 22 0a 20 20 3a 74 79 70 65 20 27 73 74 72 69 6e 67 0a 20 20 3a 67 72 6f .cycled."...:type.'string...:gro
2dc0 75 70 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 up.'dired-sidebar)..(defcustom.d
2de0 69 72 65 64 2d 73 69 64 65 62 61 72 2d 64 69 73 70 6c 61 79 2d 61 6c 69 73 74 20 27 28 28 73 69 ired-sidebar-display-alist.'((si
2e00 64 65 20 2e 20 6c 65 66 74 29 20 28 73 6c 6f 74 20 2e 20 2d 31 29 29 0a 20 20 22 41 6c 69 73 74 de...left).(slot...-1))..."Alist
2e20 20 75 73 65 64 20 69 6e 20 60 64 69 73 70 6c 61 79 2d 62 75 66 66 65 72 2d 69 6e 2d 73 69 64 65 .used.in.`display-buffer-in-side
2e40 2d 77 69 6e 64 6f 77 27 2e 0a 0a 65 2e 67 2e 20 28 64 69 73 70 6c 61 79 2d 62 75 66 66 65 72 2d -window'...e.g..(display-buffer-
2e60 69 6e 2d 73 69 64 65 2d 77 69 6e 64 6f 77 20 62 75 66 66 65 72 20 27 28 28 73 69 64 65 20 2e 20 in-side-window.buffer.'((side...
2e80 6c 65 66 74 29 20 28 73 6c 6f 74 20 2e 20 2d 31 29 29 29 22 0a 20 20 3a 74 79 70 65 20 27 61 6c left).(slot...-1)))"...:type.'al
2ea0 69 73 74 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 29 0a 0a 28 64 ist...:group.'dired-sidebar)..(d
2ec0 65 66 63 75 73 74 6f 6d 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 63 6c 6f 73 65 2d 73 69 64 efcustom.dired-sidebar-close-sid
2ee0 65 62 61 72 2d 6f 6e 2d 66 69 6c 65 2d 6f 70 65 6e 20 6e 69 6c 0a 20 20 22 57 68 65 74 68 65 72 ebar-on-file-open.nil..."Whether
2f00 20 6f 72 20 6e 6f 74 20 74 6f 20 63 6c 6f 73 65 20 73 69 64 65 62 61 72 20 77 68 65 6e 20 60 64 .or.not.to.close.sidebar.when.`d
2f20 69 72 65 64 2d 73 69 64 65 62 61 72 2d 66 69 6e 64 2d 66 69 6c 65 27 20 69 73 20 63 61 6c 6c 65 ired-sidebar-find-file'.is.calle
2f40 64 2e 0a 0a 54 68 69 73 20 62 65 68 61 76 69 6f 72 20 6f 6e 6c 79 20 74 72 69 67 67 65 72 73 20 d...This.behavior.only.triggers.
2f60 69 66 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 66 69 6e 64 2d 66 69 6c 65 27 20 69 73 20 if.`dired-sidebar-find-file'.is.
2f80 74 72 69 67 67 65 72 65 64 20 6f 6e 0a 61 20 66 69 6c 65 2e 22 0a 20 20 3a 74 79 70 65 20 27 62 triggered.on.a.file."...:type.'b
2fa0 6f 6f 6c 65 61 6e 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 29 0a oolean...:group.'dired-sidebar).
2fc0 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 69 63 6f 6e 2d 73 .(defcustom.dired-sidebar-icon-s
2fe0 63 61 6c 65 20 2e 31 38 0a 20 20 22 54 68 65 20 73 63 61 6c 65 20 6f 66 20 69 63 6f 6e 73 20 5c cale..18..."The.scale.of.icons.\
3000 28 63 75 72 72 65 6e 74 6c 79 20 6f 6e 6c 79 20 61 70 70 6c 69 65 73 20 74 6f 20 76 73 63 6f 64 (currently.only.applies.to.vscod
3020 65 20 74 68 65 6d 65 2e 5c 29 2e 22 0a 20 20 3a 74 79 70 65 20 27 6e 75 6d 62 65 72 0a 20 20 3a e.theme.\)."...:type.'number...:
3040 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 29 0a 0a 28 64 65 66 63 75 73 74 6f group.'dired-sidebar)..(defcusto
3060 6d 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 6e 6f 2d 64 65 6c 65 74 65 2d 6f 74 68 65 72 2d m.dired-sidebar-no-delete-other-
3080 77 69 6e 64 6f 77 73 20 6e 69 6c 0a 20 20 22 57 68 65 74 68 65 72 20 6f 72 20 6e 6f 74 20 74 6f windows.nil..."Whether.or.not.to
30a0 20 61 64 64 20 60 6e 6f 2d 64 65 6c 65 74 65 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 27 20 70 61 .add.`no-delete-other-window'.pa
30c0 72 61 6d 65 74 65 72 20 74 6f 20 77 69 6e 64 6f 77 2e 0a 0a 49 66 20 74 68 69 73 20 69 73 20 74 rameter.to.window...If.this.is.t
30e0 72 75 65 2c 20 77 68 65 6e 20 63 61 6c 6c 69 6e 67 20 60 64 65 6c 65 74 65 2d 6f 74 68 65 72 2d rue,.when.calling.`delete-other-
3100 77 69 6e 64 6f 77 73 27 2c 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 27 20 77 69 6e 64 6f 77 windows',.`dired-sidebar'.window
3120 0a 77 69 6c 6c 20 63 6f 6e 74 69 6e 75 65 20 73 68 6f 77 69 6e 67 2e 0a 0a 46 6f 72 20 6d 6f 72 .will.continue.showing...For.mor
3140 65 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 2c 20 6c 6f 6f 6b 20 75 70 20 60 64 65 6c 65 74 65 2d 6f e.information,.look.up.`delete-o
3160 74 68 65 72 2d 77 69 6e 64 6f 77 73 27 2e 22 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e ther-windows'."...:type.'boolean
3180 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 29 0a 0a 0a 28 64 65 66 ...:group.'dired-sidebar)...(def
31a0 63 75 73 74 6f 6d 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 75 73 65 2d 6f 6e 65 2d 69 6e 73 custom.dired-sidebar-use-one-ins
31c0 74 61 6e 63 65 20 6e 69 6c 0a 20 20 22 4f 6e 6c 79 20 73 68 6f 77 20 6f 6e 65 20 62 75 66 66 65 tance.nil..."Only.show.one.buffe
31e0 72 20 69 6e 73 74 61 6e 63 65 20 66 6f 72 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 20 66 6f 72 r.instance.for.dired-sidebar.for
3200 20 65 61 63 68 20 66 72 61 6d 65 2e 22 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 0a 20 .each.frame."...:type.'boolean..
3220 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 29 0a 0a 28 64 65 66 63 75 73 .:group.'dired-sidebar)..(defcus
3240 74 6f 6d 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 64 69 73 70 6c 61 79 2d 72 65 6d 6f 74 65 tom.dired-sidebar-display-remote
3260 2d 69 63 6f 6e 73 20 6e 69 6c 0a 20 20 22 53 68 6f 77 20 69 63 6f 6e 73 20 66 6f 72 20 72 65 6d -icons.nil..."Show.icons.for.rem
3280 6f 74 65 20 64 69 72 65 63 74 6f 72 69 65 73 2e 20 6e 69 6c 20 62 79 20 64 65 66 61 75 6c 74 20 ote.directories..nil.by.default.
32a0 66 6f 72 20 70 65 72 66 6f 72 6d 61 6e 63 65 20 72 65 61 73 6f 6e 73 2e 22 0a 20 20 3a 74 79 70 for.performance.reasons."...:typ
32c0 65 20 27 62 6f 6f 6c 65 61 6e 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 69 64 65 62 e.'boolean...:group.'dired-sideb
32e0 61 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 62 6c ar)..(defcustom.dired-sidebar-bl
3300 6f 63 6b 2d 69 63 6f 6e 2d 64 69 73 70 6c 61 79 2d 6d 6f 64 65 73 20 27 28 61 6c 6c 2d 74 68 65 ock-icon-display-modes.'(all-the
3320 2d 69 63 6f 6e 73 2d 64 69 72 65 64 2d 6d 6f 64 65 29 0a 20 20 22 4c 69 73 74 20 6f 66 20 6d 6f -icons-dired-mode)..."List.of.mo
3340 64 65 73 20 69 6e 20 60 64 69 72 65 64 2d 6d 6f 64 65 2d 68 6f 6f 6b 27 20 74 68 61 74 20 70 72 des.in.`dired-mode-hook'.that.pr
3360 65 76 65 6e 74 73 20 69 63 6f 6e 20 64 69 73 70 6c 61 79 2e 0a 0a 53 65 65 20 68 74 74 70 73 3a events.icon.display...See.https:
3380 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 6a 6f 6a 6f 6a 61 6d 65 73 2f 64 69 72 65 64 2d 73 69 64 //github.com/jojojames/dired-sid
33a0 65 62 61 72 2f 69 73 73 75 65 73 2f 34 33 2e 22 0a 20 20 3a 74 79 70 65 20 27 6c 69 73 74 0a 20 ebar/issues/43."...:type.'list..
33c0 20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 29 0a 0a 3b 3b 20 49 6e 74 65 .:group.'dired-sidebar)..;;.Inte
33e0 72 6e 61 6c 0a 0a 28 64 65 66 76 61 72 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 62 61 73 65 rnal..(defvar.dired-sidebar-base
3400 64 69 72 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 6c 6f 61 64 2d 66 69 dir.(file-name-directory.load-fi
3420 6c 65 2d 6e 61 6d 65 29 0a 20 20 22 53 74 6f 72 65 20 74 68 65 20 64 69 72 65 63 74 6f 72 79 20 le-name)..."Store.the.directory.
3440 64 69 72 65 64 2d 73 69 64 65 62 61 72 2e 65 6c 20 77 61 73 20 6c 6f 61 64 65 64 20 66 72 6f 6d dired-sidebar.el.was.loaded.from
3460 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 69 63 6f 6e 73 .")..(defvar.dired-sidebar-icons
3480 2d 64 69 72 20 28 66 6f 72 6d 61 74 20 22 25 73 69 63 6f 6e 73 2f 22 20 64 69 72 65 64 2d 73 69 -dir.(format."%sicons/".dired-si
34a0 64 65 62 61 72 2d 62 61 73 65 64 69 72 29 0a 20 20 22 53 74 6f 72 65 20 74 68 65 20 69 63 6f 6e debar-basedir)..."Store.the.icon
34c0 73 20 64 69 72 65 63 74 6f 72 79 20 6f 66 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 27 2e 22 s.directory.of.`dired-sidebar'."
34e0 29 0a 0a 28 64 65 66 76 61 72 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 61 6c 69 73 74 20 27 )..(defvar.dired-sidebar-alist.'
3500 28 29 0a 20 20 22 41 6e 20 61 6c 69 73 74 20 74 68 61 74 20 6d 61 70 73 20 66 72 6f 6d 20 66 72 ()..."An.alist.that.maps.from.fr
3520 61 6d 65 20 74 6f 20 63 75 72 72 65 6e 74 6c 79 20 6f 70 65 6e 65 64 20 60 64 69 72 65 64 2d 73 ame.to.currently.opened.`dired-s
3540 69 64 65 62 61 72 27 20 62 75 66 66 65 72 2e 22 29 0a 0a 28 64 65 66 76 61 72 2d 6c 6f 63 61 6c idebar'.buffer.")..(defvar-local
3560 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 73 74 61 6c 65 2d 62 75 66 66 65 72 2d 74 69 6d 65 .dired-sidebar-stale-buffer-time
3580 72 20 6e 69 6c 0a 20 20 22 54 69 6d 65 72 20 75 73 65 64 20 66 6f 72 20 73 65 74 74 69 6e 67 20 r.nil..."Timer.used.for.setting.
35a0 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 63 68 65 63 6b 2d 66 6f 72 2d 73 74 61 6c 65 2d 62 `dired-sidebar-check-for-stale-b
35c0 75 66 66 65 72 2d 70 27 2e 0a 0a 54 68 69 73 20 69 73 20 62 75 66 66 65 72 20 6c 6f 63 61 6c 2e uffer-p'...This.is.buffer.local.
35e0 22 29 0a 0a 28 64 65 66 76 61 72 2d 6c 6f 63 61 6c 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d ")..(defvar-local.dired-sidebar-
3600 66 6f 6c 6c 6f 77 2d 66 69 6c 65 2d 74 69 6d 65 72 20 6e 69 6c 0a 20 20 22 54 69 6d 65 72 20 75 follow-file-timer.nil..."Timer.u
3620 73 65 64 20 77 68 65 6e 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 73 68 6f 75 6c 64 2d 66 sed.when.`dired-sidebar-should-f
3640 6f 6c 6c 6f 77 2d 66 69 6c 65 27 20 69 73 20 74 72 75 65 2e 22 29 0a 0a 28 64 65 66 76 61 72 2d ollow-file'.is.true.")..(defvar-
3660 6c 6f 63 61 6c 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 63 68 65 63 6b 2d 66 6f 72 2d 73 74 local.dired-sidebar-check-for-st
3680 61 6c 65 2d 62 75 66 66 65 72 2d 70 20 6e 69 6c 0a 20 20 22 57 68 65 74 68 65 72 20 74 6f 20 63 ale-buffer-p.nil..."Whether.to.c
36a0 68 65 63 6b 20 69 66 20 62 75 66 66 65 72 20 69 73 20 73 74 61 6c 65 2e 0a 0a 57 68 65 6e 20 74 heck.if.buffer.is.stale...When.t
36c0 68 69 73 20 69 73 20 74 72 75 65 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 62 75 66 66 65 his.is.true.`dired-sidebar-buffe
36e0 72 2d 73 74 61 6c 65 2d 70 27 0a 77 69 6c 6c 20 63 68 65 63 6b 20 69 66 20 62 75 66 66 65 72 20 r-stale-p'.will.check.if.buffer.
3700 69 73 20 73 74 61 6c 65 20 74 68 72 6f 75 67 68 20 60 61 75 74 6f 2d 72 65 76 65 72 74 2d 6d 6f is.stale.through.`auto-revert-mo
3720 64 65 27 2e 22 29 0a 0a 3b 3b 20 4d 6f 64 65 0a 0a 28 64 65 66 6d 61 63 72 6f 20 64 69 72 65 64 de'.")..;;.Mode..(defmacro.dired
3740 2d 73 69 64 65 62 61 72 2d 77 69 74 68 2d 6e 6f 2d 64 65 64 69 63 61 74 69 6f 6e 20 28 26 72 65 -sidebar-with-no-dedication.(&re
3760 73 74 20 62 6f 64 79 29 0a 20 20 22 52 75 6e 20 42 4f 44 59 20 61 66 74 65 72 20 75 6e 64 65 64 st.body)..."Run.BODY.after.unded
3780 69 63 61 74 69 6e 67 20 77 69 6e 64 6f 77 2e 22 0a 20 20 28 64 65 63 6c 61 72 65 20 28 64 65 62 icating.window."...(declare.(deb
37a0 75 67 20 28 26 72 65 73 74 20 66 6f 72 6d 29 29 29 0a 20 20 60 28 70 72 6f 67 6e 0a 20 20 20 20 ug.(&rest.form)))...`(progn.....
37c0 20 28 6c 65 74 20 28 28 77 69 6e 64 6f 77 20 28 67 65 74 2d 62 75 66 66 65 72 2d 77 69 6e 64 6f .(let.((window.(get-buffer-windo
37e0 77 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 29 0a 20 20 20 20 20 20 20 28 73 65 w.(current-buffer))))........(se
3800 74 2d 77 69 6e 64 6f 77 2d 64 65 64 69 63 61 74 65 64 2d 70 20 77 69 6e 64 6f 77 20 6e 69 6c 29 t-window-dedicated-p.window.nil)
3820 0a 20 20 20 20 20 20 20 2c 40 62 6f 64 79 0a 20 20 20 20 20 20 20 28 73 65 74 2d 77 69 6e 64 6f ........,@body........(set-windo
3840 77 2d 64 65 64 69 63 61 74 65 64 2d 70 20 77 69 6e 64 6f 77 20 74 29 29 29 29 0a 0a 28 64 65 66 w-dedicated-p.window.t))))..(def
3860 76 61 72 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 6d 6f 64 65 2d 6d 61 70 0a 20 20 28 6c 65 var.dired-sidebar-mode-map...(le
3880 74 20 28 28 6d 61 70 20 28 6d 61 6b 65 2d 73 70 61 72 73 65 2d 6b 65 79 6d 61 70 29 29 29 0a 20 t.((map.(make-sparse-keymap)))..
38a0 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 28 6b 62 64 20 22 54 41 42 22 29 20 27 ...(define-key.map.(kbd."TAB").'
38c0 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 73 75 62 74 72 65 65 2d 74 6f 67 67 6c 65 29 0a 20 20 dired-sidebar-subtree-toggle)...
38e0 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 5b 74 61 62 5d 20 27 64 69 72 65 64 2d 73 ..(define-key.map.[tab].'dired-s
3900 69 64 65 62 61 72 2d 73 75 62 74 72 65 65 2d 74 6f 67 67 6c 65 29 0a 20 20 20 20 28 64 65 66 69 idebar-subtree-toggle).....(defi
3920 6e 65 2d 6b 65 79 20 6d 61 70 20 28 6b 62 64 20 22 43 2d 6d 22 29 20 27 64 69 72 65 64 2d 73 69 ne-key.map.(kbd."C-m").'dired-si
3940 64 65 62 61 72 2d 66 69 6e 64 2d 66 69 6c 65 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 debar-find-file).....(define-key
3960 20 6d 61 70 20 28 6b 62 64 20 22 52 45 54 22 29 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d .map.(kbd."RET").'dired-sidebar-
3980 66 69 6e 64 2d 66 69 6c 65 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 28 find-file).....(define-key.map.(
39a0 6b 62 64 20 22 3c 72 65 74 75 72 6e 3e 22 29 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 66 kbd."<return>").'dired-sidebar-f
39c0 69 6e 64 2d 66 69 6c 65 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 5e ind-file).....(define-key.map."^
39e0 22 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 75 70 2d 64 69 72 65 63 74 6f 72 79 29 0a 20 ".'dired-sidebar-up-directory)..
3a00 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 2d 22 20 27 64 69 72 65 64 2d 73 69 ...(define-key.map."-".'dired-si
3a20 64 65 62 61 72 2d 75 70 2d 64 69 72 65 63 74 6f 72 79 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d debar-up-directory).....(define-
3a40 6b 65 79 20 6d 61 70 20 28 6b 62 64 20 22 43 2d 6f 22 29 20 27 64 69 72 65 64 2d 73 69 64 65 62 key.map.(kbd."C-o").'dired-sideb
3a60 61 72 2d 66 69 6e 64 2d 66 69 6c 65 2d 61 6c 74 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 ar-find-file-alt).....(define-ke
3a80 79 20 6d 61 70 20 5b 6d 6f 75 73 65 2d 32 5d 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 6d y.map.[mouse-2].'dired-sidebar-m
3aa0 6f 75 73 65 2d 73 75 62 74 72 65 65 2d 63 79 63 6c 65 2d 6f 72 2d 66 69 6e 64 2d 66 69 6c 65 29 ouse-subtree-cycle-or-find-file)
3ac0 0a 20 20 20 20 6d 61 70 29 0a 20 20 22 4b 65 79 6d 61 70 20 75 73 65 64 20 66 6f 72 20 73 79 6d .....map)..."Keymap.used.for.sym
3ae0 62 6f 6c 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 6d 6f 64 65 27 2e 22 29 0a 0a 28 64 65 bol.`dired-sidebar-mode'.")..(de
3b00 66 69 6e 65 2d 64 65 72 69 76 65 64 2d 6d 6f 64 65 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d fine-derived-mode.dired-sidebar-
3b20 6d 6f 64 65 20 64 69 72 65 64 2d 6d 6f 64 65 0a 20 20 22 44 69 72 65 64 2d 73 69 64 65 62 61 72 mode.dired-mode..."Dired-sidebar
3b40 22 0a 20 20 22 41 20 6d 61 6a 6f 72 20 6d 6f 64 65 20 74 68 61 74 20 70 75 74 73 20 60 64 69 72 "..."A.major.mode.that.puts.`dir
3b60 65 64 27 20 69 6e 20 61 20 73 69 64 65 62 61 72 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 ed'.in.a.sidebar."...:group.'dir
3b80 65 64 2d 73 69 64 65 62 61 72 0a 0a 20 20 3b 3b 20 48 61 63 6b 20 66 6f 72 20 68 74 74 70 73 3a ed-sidebar....;;.Hack.for.https:
3ba0 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 6a 6f 6a 6f 6a 61 6d 65 73 2f 64 69 72 65 64 2d 73 69 64 //github.com/jojojames/dired-sid
3bc0 65 62 61 72 2f 69 73 73 75 65 73 2f 31 38 2e 0a 20 20 3b 3b 20 57 6f 75 6c 64 20 62 65 20 6f 70 ebar/issues/18....;;.Would.be.op
3be0 65 6e 20 74 6f 20 61 20 62 65 74 74 65 72 20 66 69 78 2e 2e 2e 0a 20 20 3b 3b 20 60 64 69 72 65 en.to.a.better.fix......;;.`dire
3c00 64 2d 72 65 6d 65 6d 62 65 72 2d 68 69 64 64 65 6e 27 20 69 6e 20 45 6d 61 63 73 20 32 35 20 28 d-remember-hidden'.in.Emacs.25.(
3c20 74 65 72 6d 69 6e 61 6c 3f 29 20 73 65 65 6d 73 20 74 6f 20 74 68 72 6f 77 0a 20 20 3b 3b 20 61 terminal?).seems.to.throw...;;.a
3c40 6e 20 65 72 72 6f 72 20 75 70 6f 6e 20 63 61 6c 6c 69 6e 67 20 60 67 6f 74 6f 2d 63 68 61 72 27 n.error.upon.calling.`goto-char'
3c60 2e 0a 20 20 28 77 68 65 6e 20 28 3c 3d 20 65 6d 61 63 73 2d 6d 61 6a 6f 72 2d 76 65 72 73 69 6f ....(when.(<=.emacs-major-versio
3c80 6e 20 32 35 29 0a 20 20 20 20 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 72 n.25).....(defun.dired-sidebar-r
3ca0 65 6d 65 6d 62 65 72 2d 68 69 64 64 65 6e 2d 68 61 63 6b 20 28 66 20 26 72 65 73 74 20 61 72 67 emember-hidden-hack.(f.&rest.arg
3cc0 73 29 0a 20 20 20 20 20 20 22 52 65 74 75 72 6e 20 6e 69 6c 20 66 6f 72 20 60 64 69 72 65 64 2d s)......."Return.nil.for.`dired-
3ce0 72 65 6d 65 6d 62 65 72 2d 68 69 64 64 65 6e 27 2e 0a 0a 57 6f 72 6b 73 20 61 72 6f 75 6e 64 20 remember-hidden'...Works.around.
3d00 6d 61 72 6b 65 72 20 70 6f 69 6e 74 69 6e 67 20 74 6f 20 77 72 6f 6e 67 20 62 75 66 66 65 72 20 marker.pointing.to.wrong.buffer.
3d20 69 6e 20 45 6d 61 63 73 20 32 35 2e 22 0a 20 20 20 20 20 20 28 69 66 20 28 65 71 20 6d 61 6a 6f in.Emacs.25.".......(if.(eq.majo
3d40 72 2d 6d 6f 64 65 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 6d 6f 64 65 29 0a 20 20 20 20 r-mode.'dired-sidebar-mode).....
3d60 20 20 20 20 20 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 28 61 70 70 6c 79 20 66 20 61 72 67 73 29 ......nil.........(apply.f.args)
3d80 29 29 0a 20 20 20 20 28 61 64 76 69 63 65 2d 72 65 6d 6f 76 65 20 27 64 69 72 65 64 2d 72 65 6d )).....(advice-remove.'dired-rem
3da0 65 6d 62 65 72 2d 68 69 64 64 65 6e 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 72 65 6d 65 ember-hidden.'dired-sidebar-reme
3dc0 6d 62 65 72 2d 68 69 64 64 65 6e 2d 68 61 63 6b 29 0a 20 20 20 20 28 61 64 76 69 63 65 2d 61 64 mber-hidden-hack).....(advice-ad
3de0 64 20 27 64 69 72 65 64 2d 72 65 6d 65 6d 62 65 72 2d 68 69 64 64 65 6e 20 3a 61 72 6f 75 6e 64 d.'dired-remember-hidden.:around
3e00 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 72 65 6d 65 6d 62 65 72 2d 68 69 64 64 65 6e 2d .'dired-sidebar-remember-hidden-
3e20 68 61 63 6b 29 29 0a 0a 20 20 3b 3b 20 68 74 74 70 73 3a 2f 2f 64 65 62 62 75 67 73 2e 67 6e 75 hack))....;;.https://debbugs.gnu
3e40 2e 6f 72 67 2f 63 67 69 2f 62 75 67 72 65 70 6f 72 74 2e 63 67 69 3f 62 75 67 3d 33 32 33 39 32 .org/cgi/bugreport.cgi?bug=32392
3e60 0a 20 20 28 77 68 65 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 75 73 65 2d 77 64 69 72 65 ...(when.dired-sidebar-use-wdire
3e80 64 2d 69 6e 74 65 67 72 61 74 69 6f 6e 0a 20 20 20 20 28 61 64 76 69 63 65 2d 72 65 6d 6f 76 65 d-integration.....(advice-remove
3ea0 20 27 77 64 69 72 65 64 2d 63 68 61 6e 67 65 2d 74 6f 2d 64 69 72 65 64 2d 6d 6f 64 65 0a 20 20 .'wdired-change-to-dired-mode...
3ec0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d .................'dired-sidebar-
3ee0 77 64 69 72 65 64 2d 63 68 61 6e 67 65 2d 74 6f 2d 64 69 72 65 64 2d 6d 6f 64 65 2d 61 64 76 69 wdired-change-to-dired-mode-advi
3f00 63 65 29 0a 20 20 20 20 28 61 64 76 69 63 65 2d 72 65 6d 6f 76 65 20 27 77 64 69 72 65 64 2d 63 ce).....(advice-remove.'wdired-c
3f20 68 61 6e 67 65 2d 74 6f 2d 77 64 69 72 65 64 2d 6d 6f 64 65 0a 20 20 20 20 20 20 20 20 20 20 20 hange-to-wdired-mode............
3f40 20 20 20 20 20 20 20 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 77 64 69 72 65 64 2d 63 68 ........'dired-sidebar-wdired-ch
3f60 61 6e 67 65 2d 74 6f 2d 77 64 69 72 65 64 2d 6d 6f 64 65 2d 61 64 76 69 63 65 29 0a 0a 20 20 20 ange-to-wdired-mode-advice).....
3f80 20 28 61 64 76 69 63 65 2d 61 64 64 20 27 77 64 69 72 65 64 2d 63 68 61 6e 67 65 2d 74 6f 2d 64 .(advice-add.'wdired-change-to-d
3fa0 69 72 65 64 2d 6d 6f 64 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 72 6f 75 6e ired-mode.................:aroun
3fc0 64 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 77 64 69 72 65 64 2d 63 68 61 6e 67 65 2d 74 d.'dired-sidebar-wdired-change-t
3fe0 6f 2d 64 69 72 65 64 2d 6d 6f 64 65 2d 61 64 76 69 63 65 29 0a 20 20 20 20 28 61 64 76 69 63 65 o-dired-mode-advice).....(advice
4000 2d 61 64 64 20 27 77 64 69 72 65 64 2d 63 68 61 6e 67 65 2d 74 6f 2d 77 64 69 72 65 64 2d 6d 6f -add.'wdired-change-to-wdired-mo
4020 64 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 72 6f 75 6e 64 20 27 64 69 72 65 de.................:around.'dire
4040 64 2d 73 69 64 65 62 61 72 2d 77 64 69 72 65 64 2d 63 68 61 6e 67 65 2d 74 6f 2d 77 64 69 72 65 d-sidebar-wdired-change-to-wdire
4060 64 2d 6d 6f 64 65 2d 61 64 76 69 63 65 29 29 0a 0a 20 20 28 73 65 74 71 20 77 69 6e 64 6f 77 2d d-mode-advice))....(setq.window-
4080 73 69 7a 65 2d 66 69 78 65 64 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 77 69 6e 64 6f 77 2d size-fixed.dired-sidebar-window-
40a0 66 69 78 65 64 29 0a 0a 20 20 3b 3b 20 4d 61 74 63 68 20 62 61 63 6b 67 72 6f 75 6e 64 73 2e 0a fixed)....;;.Match.backgrounds..
40c0 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 75 73 65 2d ..(setq-local.dired-subtree-use-
40e0 62 61 63 6b 67 72 6f 75 6e 64 73 20 6e 69 6c 29 0a 0a 20 20 3b 3b 20 60 64 69 72 65 64 2d 73 75 backgrounds.nil)....;;.`dired-su
4100 62 74 72 65 65 27 27 73 20 6c 69 6e 65 20 70 72 65 66 69 78 20 69 73 20 64 65 74 65 72 6d 69 6e btree''s.line.prefix.is.determin
4120 65 64 20 62 79 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 27 2e 0a 20 20 28 73 65 74 71 2d 6c ed.by.`dired-sidebar'....(setq-l
4140 6f 63 61 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 ocal.dired-subtree-line-prefix.d
4160 69 72 65 64 2d 73 69 64 65 62 61 72 2d 73 75 62 74 72 65 65 2d 6c 69 6e 65 2d 70 72 65 66 69 78 ired-sidebar-subtree-line-prefix
4180 29 0a 0a 20 20 3b 3b 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 6a 6f 6a 6f 6a )....;;.https://github.com/jojoj
41a0 61 6d 65 73 2f 64 69 72 65 64 2d 73 69 64 65 62 61 72 2f 69 73 73 75 65 73 2f 37 0a 20 20 3b 3b ames/dired-sidebar/issues/7...;;
41c0 20 53 79 6d 6c 69 6e 6b 73 20 61 72 65 20 64 69 73 70 6c 61 79 65 64 20 69 6e 63 6f 72 72 65 63 .Symlinks.are.displayed.incorrec
41e0 74 6c 79 20 77 68 65 6e 20 74 68 65 73 65 20 74 68 72 65 65 20 74 68 69 6e 67 73 20 68 61 70 70 tly.when.these.three.things.happ
4200 65 6e 2e 0a 20 20 3b 3b 20 31 2e 20 60 64 69 72 65 64 2d 68 69 64 65 2d 64 65 74 61 69 6c 73 2d en....;;.1..`dired-hide-details-
4220 6d 6f 64 65 27 20 69 73 20 6f 6e 2e 0a 20 20 3b 3b 20 32 2e 20 60 64 69 72 65 64 2d 73 75 62 74 mode'.is.on....;;.2..`dired-subt
4240 72 65 65 27 20 74 6f 67 67 6c 65 73 20 61 20 73 79 6d 6c 69 6e 6b 20 66 6f 6c 64 65 72 20 76 69 ree'.toggles.a.symlink.folder.vi
4260 61 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 74 6f 67 67 6c 65 27 2e 0a 20 20 3b 3b 20 33 a.`dired-subtree-toggle'....;;.3
4280 2e 20 60 64 69 72 65 64 2d 68 69 64 65 2d 64 65 74 61 69 6c 73 2d 68 69 64 65 2d 73 79 6d 6c 69 ..`dired-hide-details-hide-symli
42a0 6e 6b 2d 74 61 72 67 65 74 73 27 20 69 73 20 73 65 74 20 74 6f 20 74 72 75 65 2e 0a 20 20 3b 3b nk-targets'.is.set.to.true....;;
42c0 20 53 69 6e 63 65 20 77 65 20 75 73 65 20 62 6f 74 68 20 31 20 26 20 32 2c 20 64 69 73 61 62 6c .Since.we.use.both.1.&.2,.disabl
42e0 65 20 33 20 74 6f 20 61 76 6f 69 64 20 74 68 65 20 69 73 73 75 65 2e 0a 20 20 3b 3b 20 54 68 69 e.3.to.avoid.the.issue....;;.Thi
4300 73 20 6e 65 65 64 73 20 74 6f 20 62 65 20 73 65 74 20 74 6f 20 6e 69 6c 20 62 65 66 6f 72 65 20 s.needs.to.be.set.to.nil.before.
4320 60 64 69 72 65 64 2d 68 69 64 65 2d 64 65 74 61 69 6c 73 2d 6d 6f 64 65 27 20 69 73 20 63 61 6c `dired-hide-details-mode'.is.cal
4340 6c 65 64 2e 0a 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 64 69 72 65 64 2d 68 69 64 65 2d 64 65 led....(setq-local.dired-hide-de
4360 74 61 69 6c 73 2d 68 69 64 65 2d 73 79 6d 6c 69 6e 6b 2d 74 61 72 67 65 74 73 20 6e 69 6c 29 0a tails-hide-symlink-targets.nil).
4380 0a 20 20 3b 3b 20 55 73 65 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 72 65 76 65 72 74 27 ...;;.Use.`dired-sidebar-revert'
43a0 20 69 6e 73 74 65 61 64 20 74 68 61 74 20 77 72 61 70 73 20 60 64 69 72 65 64 2d 72 65 76 65 72 .instead.that.wraps.`dired-rever
43c0 74 27 2e 0a 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 72 65 76 65 72 74 2d 62 75 66 66 65 72 2d t'....(setq-local.revert-buffer-
43e0 66 75 6e 63 74 69 6f 6e 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 72 65 76 65 72 74 29 0a function.'dired-sidebar-revert).
4400 0a 20 20 3b 3b 20 57 65 20 64 6f 6e 27 74 20 77 61 6e 74 20 65 78 74 72 61 20 64 65 74 61 69 6c ...;;.We.don't.want.extra.detail
4420 73 20 69 6e 20 74 68 65 20 73 69 64 65 62 61 72 2e 0a 20 20 28 64 69 72 65 64 2d 68 69 64 65 2d s.in.the.sidebar....(dired-hide-
4440 64 65 74 61 69 6c 73 2d 6d 6f 64 65 29 0a 0a 20 20 28 77 68 65 6e 20 28 61 6e 64 20 64 69 72 65 details-mode)....(when.(and.dire
4460 64 2d 73 69 64 65 62 61 72 2d 64 69 73 61 62 6c 65 2d 64 69 72 65 64 2d 63 6f 6c 6c 61 70 73 65 d-sidebar-disable-dired-collapse
4480 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 62 6f 75 6e 64 70 20 27 64 69 72 65 64 2d 63 6f ..............(fboundp.'dired-co
44a0 6c 6c 61 70 73 65 2d 6d 6f 64 65 29 29 0a 20 20 20 20 28 61 64 64 2d 68 6f 6f 6b 20 27 64 69 72 llapse-mode)).....(add-hook.'dir
44c0 65 64 2d 6d 6f 64 65 2d 68 6f 6f 6b 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 ed-mode-hook...............(lamb
44e0 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 62 6f 75 da.().................(when.(bou
4500 6e 64 2d 61 6e 64 2d 74 72 75 65 2d 70 20 64 69 72 65 64 2d 63 6f 6c 6c 61 70 73 65 2d 6d 6f 64 nd-and-true-p.dired-collapse-mod
4520 65 29 0a 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 63 6f 6c 6c e)...................(dired-coll
4540 61 70 73 65 2d 6d 6f 64 65 20 2d 31 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 apse-mode.-1)))...............:a
4560 70 70 65 6e 64 20 3a 6c 6f 63 61 6c 29 29 0a 0a 20 20 28 77 68 65 6e 20 28 61 6e 64 0a 20 20 20 ppend.:local))....(when.(and....
4580 20 20 20 20 20 20 28 6e 6f 74 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 64 69 73 70 6c 61 79 ......(not.dired-sidebar-display
45a0 2d 61 75 74 6f 72 65 76 65 72 74 2d 6d 65 73 73 61 67 65 73 29 0a 20 20 20 20 20 20 20 20 20 28 -autorevert-messages)..........(
45c0 62 6f 75 6e 64 70 20 27 61 75 74 6f 2d 72 65 76 65 72 74 2d 76 65 72 62 6f 73 65 29 29 0a 20 20 boundp.'auto-revert-verbose))...
45e0 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 61 75 74 6f 2d 72 65 76 65 72 74 2d 76 65 72 62 6f 73 ..(setq-local.auto-revert-verbos
4600 65 20 6e 69 6c 29 29 0a 0a 20 20 28 77 68 65 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 64 e.nil))....(when.dired-sidebar-d
4620 65 6c 61 79 2d 61 75 74 6f 2d 72 65 76 65 72 74 2d 75 70 64 61 74 65 73 0a 20 20 20 20 28 73 65 elay-auto-revert-updates.....(se
4640 74 71 2d 6c 6f 63 61 6c 20 62 75 66 66 65 72 2d 73 74 61 6c 65 2d 66 75 6e 63 74 69 6f 6e 20 23 tq-local.buffer-stale-function.#
4660 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 62 75 66 66 65 72 2d 73 74 61 6c 65 2d 70 29 0a 20 'dired-sidebar-buffer-stale-p)..
4680 20 20 20 28 6c 65 74 20 28 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 28 63 75 72 72 65 6e ...(let.((current-buffer.(curren
46a0 74 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 64 69 72 65 64 2d 73 69 t-buffer))).......(setq.dired-si
46c0 64 65 62 61 72 2d 73 74 61 6c 65 2d 62 75 66 66 65 72 2d 74 69 6d 65 72 0a 20 20 20 20 20 20 20 debar-stale-buffer-timer........
46e0 20 20 20 20 20 28 72 75 6e 2d 77 69 74 68 2d 69 64 6c 65 2d 74 69 6d 65 72 0a 20 20 20 20 20 20 .....(run-with-idle-timer.......
4700 20 20 20 20 20 20 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 73 74 61 6c 65 2d 62 75 66 66 65 .......dired-sidebar-stale-buffe
4720 72 2d 74 69 6d 65 2d 69 64 6c 65 2d 64 65 6c 61 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 74 r-time-idle-delay..............t
4740 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 .(lambda.()..................;;.
4760 4f 6e 6c 79 20 64 6f 20 61 20 63 68 65 63 6b 20 69 66 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 Only.do.a.check.if.`dired-sideba
4780 72 27 20 62 75 66 66 65 72 20 69 73 20 69 6e 20 74 68 65 20 66 6f 72 65 67 72 6f 75 6e 64 2e 0a r'.buffer.is.in.the.foreground..
47a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 67 65 74 2d 62 75 66 66 .................(when.(get-buff
47c0 65 72 2d 77 69 6e 64 6f 77 20 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 er-window.current-buffer).......
47e0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 .............(with-current-buffe
4800 72 20 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 r.current-buffer................
4820 20 20 20 20 20 20 28 73 65 74 71 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 63 68 65 63 6b 2d ......(setq.dired-sidebar-check-
4840 66 6f 72 2d 73 74 61 6c 65 2d 62 75 66 66 65 72 2d 70 20 74 29 29 29 29 29 29 0a 0a 20 20 20 20 for-stale-buffer-p.t))))))......
4860 20 20 28 61 64 64 2d 68 6f 6f 6b 20 27 6b 69 6c 6c 2d 62 75 66 66 65 72 2d 68 6f 6f 6b 0a 20 20 ..(add-hook.'kill-buffer-hook...
4880 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 ..............(lambda.()........
48a0 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 74 69 6d 65 72 70 20 64 69 72 65 64 2d 73 ...........(when.(timerp.dired-s
48c0 69 64 65 62 61 72 2d 73 74 61 6c 65 2d 62 75 66 66 65 72 2d 74 69 6d 65 72 29 0a 20 20 20 20 20 idebar-stale-buffer-timer)......
48e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6e 63 65 6c 2d 74 69 6d 65 72 20 64 69 72 ...............(cancel-timer.dir
4900 65 64 2d 73 69 64 65 62 61 72 2d 73 74 61 6c 65 2d 62 75 66 66 65 72 2d 74 69 6d 65 72 29 29 29 ed-sidebar-stale-buffer-timer)))
4920 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 20 74 29 29 29 0a 0a 20 20 28 77 68 .................nil.t)))....(wh
4940 65 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 72 65 66 72 65 73 68 2d 6f 6e 2d 73 70 65 63 en.dired-sidebar-refresh-on-spec
4960 69 61 6c 2d 63 6f 6d 6d 61 6e 64 73 0a 20 20 20 20 28 6d 61 70 63 0a 20 20 20 20 20 28 6c 61 6d ial-commands.....(mapc......(lam
4980 62 64 61 20 28 78 29 0a 20 20 20 20 20 20 20 28 69 66 20 28 63 6f 6e 73 70 20 78 29 0a 20 20 20 bda.(x)........(if.(consp.x)....
49a0 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 63 6f 6d 6d 61 6e 64 20 28 63 61 72 20 78 29 29 0a ........(let.((command.(car.x)).
49c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 6c 61 79 20 28 63 64 72 20 78 29 29 .................(delay.(cdr.x))
49e0 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 64 76 69 63 65 2d 61 64 64 0a 20 20 20 20 20 )..............(advice-add......
4a00 20 20 20 20 20 20 20 20 20 63 6f 6d 6d 61 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a .........command...............:
4a20 61 66 74 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 66 61 6c 69 61 73 20 28 69 after...............(defalias.(i
4a40 6e 74 65 72 6e 20 28 66 6f 72 6d 61 74 20 22 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 72 65 66 ntern.(format."dired-sidebar-ref
4a60 72 65 73 68 2d 61 66 74 65 72 2d 25 53 22 20 63 6f 6d 6d 61 6e 64 29 29 0a 20 20 20 20 20 20 20 resh-after-%S".command))........
4a80 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 .........(function..............
4aa0 20 20 20 20 28 6c 61 6d 62 64 61 20 28 26 72 65 73 74 20 5f 29 0a 20 20 20 20 20 20 20 20 20 20 ....(lambda.(&rest._)...........
4ac0 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 74 69 6d 65 72 2d 73 79 6d 62 6f 6c 0a 20 20 20 .........(let.((timer-symbol....
4ae0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 74 65 72 6e 0a 20 .......................(intern..
4b00 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 66 6f 72 6d 61 ..........................(forma
4b20 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 22 64 t............................."d
4b40 69 72 65 64 2d 73 69 64 65 62 61 72 2d 72 65 66 72 65 73 68 2d 25 53 2d 74 69 6d 65 72 22 20 63 ired-sidebar-refresh-%S-timer".c
4b60 6f 6d 6d 61 6e 64 29 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 ommand))))......................
4b80 28 77 68 65 6e 20 28 61 6e 64 20 28 62 6f 75 6e 64 70 20 74 69 6d 65 72 2d 73 79 6d 62 6f 6c 29 (when.(and.(boundp.timer-symbol)
4ba0 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 20 ................................
4bc0 20 28 74 69 6d 65 72 70 20 28 73 79 6d 62 6f 6c 2d 76 61 6c 75 65 20 74 69 6d 65 72 2d 73 79 6d .(timerp.(symbol-value.timer-sym
4be0 62 6f 6c 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 63 bol)))........................(c
4c00 61 6e 63 65 6c 2d 74 69 6d 65 72 20 28 73 79 6d 62 6f 6c 2d 76 61 6c 75 65 20 74 69 6d 65 72 2d ancel-timer.(symbol-value.timer-
4c20 73 79 6d 62 6f 6c 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 28 symbol)))......................(
4c40 73 65 74 66 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 79 6d 62 setf.......................(symb
4c60 6f 6c 2d 76 61 6c 75 65 20 74 69 6d 65 72 2d 73 79 6d 62 6f 6c 29 0a 20 20 20 20 20 20 20 20 20 ol-value.timer-symbol)..........
4c80 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 75 6e 2d 77 69 74 68 2d 69 64 6c 65 2d 74 69 6d 65 .............(run-with-idle-time
4ca0 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 64 65 6c 61 79 0a 20 r........................delay..
4cc0 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 0a 20 20 20 20 20 20 ......................nil.......
4ce0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 .................#'dired-sidebar
4d00 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 29 29 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 -refresh-buffer)))))))).........
4d20 20 28 61 64 76 69 63 65 2d 61 64 64 20 78 20 3a 61 66 74 65 72 20 23 27 64 69 72 65 64 2d 73 69 .(advice-add.x.:after.#'dired-si
4d40 64 65 62 61 72 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20 20 20 64 69 72 debar-refresh-buffer)))......dir
4d60 65 64 2d 73 69 64 65 62 61 72 2d 73 70 65 63 69 61 6c 2d 72 65 66 72 65 73 68 2d 63 6f 6d 6d 61 ed-sidebar-special-refresh-comma
4d80 6e 64 73 29 29 0a 0a 20 20 28 77 68 65 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 74 6f 67 nds))....(when.dired-sidebar-tog
4da0 67 6c 65 2d 68 69 64 64 65 6e 2d 63 6f 6d 6d 61 6e 64 73 0a 20 20 20 20 28 6d 61 70 63 0a 20 20 gle-hidden-commands.....(mapc...
4dc0 20 20 20 28 6c 61 6d 62 64 61 20 28 78 29 0a 20 20 20 20 20 20 20 28 61 64 76 69 63 65 2d 61 64 ...(lambda.(x)........(advice-ad
4de0 64 20 78 20 3a 61 72 6f 75 6e 64 20 23 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 61 64 76 69 d.x.:around.#'dired-sidebar-advi
4e00 63 65 2d 68 69 64 65 2d 74 65 6d 70 6f 72 61 72 69 6c 79 29 29 0a 20 20 20 20 20 64 69 72 65 64 ce-hide-temporarily))......dired
4e20 2d 73 69 64 65 62 61 72 2d 74 6f 67 67 6c 65 2d 68 69 64 64 65 6e 2d 63 6f 6d 6d 61 6e 64 73 29 -sidebar-toggle-hidden-commands)
4e40 29 0a 0a 20 20 28 77 68 65 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 75 73 65 2d 63 75 73 )....(when.dired-sidebar-use-cus
4e60 74 6f 6d 2d 66 6f 6e 74 0a 20 20 20 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 73 65 74 2d tom-font.....(dired-sidebar-set-
4e80 66 6f 6e 74 29 29 0a 0a 20 20 28 77 68 65 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 75 73 font))....(when.dired-sidebar-us
4ea0 65 2d 63 75 73 74 6f 6d 2d 6d 6f 64 65 6c 69 6e 65 0a 20 20 20 20 28 64 69 72 65 64 2d 73 69 64 e-custom-modeline.....(dired-sid
4ec0 65 62 61 72 2d 73 65 74 2d 6d 6f 64 65 2d 6c 69 6e 65 29 29 0a 0a 20 20 28 77 68 65 6e 20 64 69 ebar-set-mode-line))....(when.di
4ee0 72 65 64 2d 73 69 64 65 62 61 72 2d 72 65 66 72 65 73 68 2d 6f 6e 2d 70 72 6f 6a 65 63 74 2d 73 red-sidebar-refresh-on-project-s
4f00 77 69 74 63 68 0a 20 20 20 20 28 61 64 76 69 63 65 2d 61 64 64 20 27 70 72 6f 6a 65 63 74 2d 66 witch.....(advice-add.'project-f
4f20 69 6e 64 2d 66 69 6c 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 66 74 65 72 20 ind-file.................:after.
4f40 23 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 66 6f 6c 6c 6f 77 2d 66 69 6c 65 29 0a 20 20 20 #'dired-sidebar-follow-file)....
4f60 20 28 61 64 64 2d 68 6f 6f 6b 20 27 70 72 6f 6a 65 63 74 69 6c 65 2d 61 66 74 65 72 2d 73 77 69 .(add-hook.'projectile-after-swi
4f80 74 63 68 2d 70 72 6f 6a 65 63 74 2d 68 6f 6f 6b 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 tch-project-hook...............#
4fa0 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 66 6f 6c 6c 6f 77 2d 66 69 6c 65 29 29 0a 0a 20 20 'dired-sidebar-follow-file))....
4fc0 28 77 68 65 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 73 68 6f 75 6c 64 2d 66 6f 6c 6c 6f (when.dired-sidebar-should-follo
4fe0 77 2d 66 69 6c 65 0a 20 20 20 20 28 73 65 74 71 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 66 w-file.....(setq.dired-sidebar-f
5000 6f 6c 6c 6f 77 2d 66 69 6c 65 2d 74 69 6d 65 72 0a 20 20 20 20 20 20 20 20 20 20 28 72 75 6e 2d ollow-file-timer...........(run-
5020 77 69 74 68 2d 69 64 6c 65 2d 74 69 6d 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 64 69 72 65 64 with-idle-timer............dired
5040 2d 73 69 64 65 62 61 72 2d 66 6f 6c 6c 6f 77 2d 66 69 6c 65 2d 69 64 6c 65 2d 64 65 6c 61 79 0a -sidebar-follow-file-idle-delay.
5060 20 20 20 20 20 20 20 20 20 20 20 74 20 23 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 66 6f 6c ...........t.#'dired-sidebar-fol
5080 6c 6f 77 2d 66 69 6c 65 29 29 29 0a 0a 20 20 3b 3b 20 54 68 69 73 20 63 6f 6d 6d 65 6e 74 20 69 low-file)))....;;.This.comment.i
50a0 73 20 74 61 6b 65 6e 20 66 72 6f 6d 20 60 64 69 72 65 64 2d 72 65 61 64 69 6e 27 2e 0a 20 20 3b s.taken.from.`dired-readin'....;
50c0 3b 20 42 65 67 69 6e 20 2d 2d 2d 20 43 6f 70 69 65 64 20 63 6f 6d 6d 65 6e 74 20 66 72 6f 6d 20 ;.Begin.---.Copied.comment.from.
50e0 64 69 72 65 64 2e 65 6c 2e 0a 20 20 3b 3b 20 4d 75 73 74 20 66 69 72 73 74 20 6d 61 6b 65 20 61 dired.el....;;.Must.first.make.a
5100 6c 69 73 74 20 62 75 66 66 65 72 20 6c 6f 63 61 6c 20 61 6e 64 20 73 65 74 20 69 74 20 74 6f 20 list.buffer.local.and.set.it.to.
5120 6e 69 6c 20 62 65 63 61 75 73 65 0a 20 20 3b 3b 20 64 69 72 65 64 2d 62 75 69 6c 64 2d 73 75 62 nil.because...;;.dired-build-sub
5140 64 69 72 2d 61 6c 69 73 74 20 77 69 6c 6c 20 63 61 6c 6c 20 64 69 72 65 64 2d 63 6c 65 61 72 2d dir-alist.will.call.dired-clear-
5160 61 6c 69 73 74 20 66 69 72 73 74 0a 20 20 3b 3b 20 45 6e 64 20 2d 2d 2d 20 43 6f 70 69 65 64 20 alist.first...;;.End.---.Copied.
5180 63 6f 6d 6d 65 6e 74 20 66 72 6f 6d 20 64 69 72 65 64 2e 65 6c 2e 0a 20 20 28 73 65 74 71 2d 6c comment.from.dired.el....(setq-l
51a0 6f 63 61 6c 20 64 69 72 65 64 2d 73 75 62 64 69 72 2d 61 6c 69 73 74 20 6e 69 6c 29 0a 20 20 28 ocal.dired-subdir-alist.nil)...(
51c0 64 69 72 65 64 2d 62 75 69 6c 64 2d 73 75 62 64 69 72 2d 61 6c 69 73 74 29 0a 0a 20 20 28 64 69 dired-build-subdir-alist)....(di
51e0 72 65 64 2d 75 6e 61 64 76 65 72 74 69 73 65 20 28 64 69 72 65 64 2d 63 75 72 72 65 6e 74 2d 64 red-unadvertise.(dired-current-d
5200 69 72 65 63 74 6f 72 79 29 29 0a 20 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 75 70 64 61 irectory))...(dired-sidebar-upda
5220 74 65 2d 62 75 66 66 65 72 2d 6e 61 6d 65 29 0a 20 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 te-buffer-name)...(dired-sidebar
5240 2d 75 70 64 61 74 65 2d 73 74 61 74 65 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 0a -update-state.(current-buffer)).
5260 0a 20 20 3b 3b 20 4d 6f 76 65 20 73 65 74 74 69 6e 67 20 74 68 65 6d 65 20 75 6e 74 69 6c 20 74 ...;;.Move.setting.theme.until.t
5280 68 65 20 65 6e 64 20 61 66 74 65 72 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 27 20 68 61 73 he.end.after.`dired-sidebar'.has
52a0 20 73 65 74 20 75 70 0a 20 20 3b 3b 20 69 74 73 20 64 69 72 65 63 74 6f 72 79 20 73 74 72 75 63 .set.up...;;.its.directory.struc
52c0 74 75 72 65 2e 0a 20 20 3b 3b 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 6a 6f ture....;;.https://github.com/jo
52e0 6a 6f 6a 61 6d 65 73 2f 64 69 72 65 64 2d 73 69 64 65 62 61 72 2f 69 73 73 75 65 73 2f 32 39 0a jojames/dired-sidebar/issues/29.
5300 20 20 28 77 68 65 6e 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 63 61 6e 2d 64 69 73 70 6c ..(when.(dired-sidebar-can-displ
5320 61 79 2d 69 63 6f 6e 73 29 0a 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 28 28 64 69 72 65 64 ay-icons).....(cond......((dired
5340 2d 73 69 64 65 62 61 72 2d 75 73 69 6e 67 2d 74 75 69 2d 70 29 0a 20 20 20 20 20 20 28 64 69 72 -sidebar-using-tui-p).......(dir
5360 65 64 2d 73 69 64 65 62 61 72 2d 73 65 74 75 70 2d 74 75 69 29 29 0a 20 20 20 20 20 28 28 61 6e ed-sidebar-setup-tui))......((an
5380 64 20 28 65 71 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 74 68 65 6d 65 20 27 69 63 6f 6e 73 d.(eq.dired-sidebar-theme.'icons
53a0 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 64 69 73 70 6c 61 79 2d 67 72 61 70 68 69 63 2d 70 29 )............(display-graphic-p)
53c0 0a 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 66 62 6f ............(or.............(fbo
53e0 75 6e 64 70 20 27 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 2d 64 69 72 65 64 2d 6d 6f 64 65 29 0a undp.'all-the-icons-dired-mode).
5400 20 20 20 20 20 20 20 20 20 20 20 20 28 61 75 74 6f 6c 6f 61 64 70 20 28 73 79 6d 62 6f 6c 2d 66 ............(autoloadp.(symbol-f
5420 75 6e 63 74 69 6f 6e 20 27 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 2d 64 69 72 65 64 2d 6d 6f 64 unction.'all-the-icons-dired-mod
5440 65 29 29 29 29 0a 20 20 20 20 20 20 28 77 69 74 68 2d 6e 6f 2d 77 61 72 6e 69 6e 67 73 0a 20 20 e)))).......(with-no-warnings...
5460 20 20 20 20 20 20 28 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 2d 64 69 72 65 64 2d 6d 6f 64 65 29 ......(all-the-icons-dired-mode)
5480 29 29 0a 20 20 20 20 20 28 3a 64 65 66 61 75 6c 74 20 3a 6e 6f 2d 74 68 65 6d 65 29 29 29 29 0a ))......(:default.:no-theme)))).
54a0 0a 3b 3b 20 55 73 65 72 20 49 6e 74 65 72 66 61 63 65 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f .;;.User.Interface..;;;###autolo
54c0 61 64 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 74 6f 67 67 6c 65 2d 73 ad.(defun.dired-sidebar-toggle-s
54e0 69 64 65 62 61 72 20 28 26 6f 70 74 69 6f 6e 61 6c 20 64 69 72 29 0a 20 20 22 54 6f 67 67 6c 65 idebar.(&optional.dir)..."Toggle
5500 20 74 68 65 20 70 72 6f 6a 65 63 74 20 65 78 70 6c 6f 72 65 72 20 77 69 6e 64 6f 77 2e 0a 4f 70 .the.project.explorer.window..Op
5520 74 69 6f 6e 61 6c 20 61 72 67 75 6d 65 6e 74 20 44 49 52 20 55 73 65 20 44 49 52 20 61 73 20 73 tional.argument.DIR.Use.DIR.as.s
5540 69 64 65 62 61 72 20 72 6f 6f 74 20 69 66 20 61 76 61 69 6c 61 62 6c 65 2e 0a 0a 57 69 74 68 20 idebar.root.if.available...With.
5560 75 6e 69 76 65 72 73 61 6c 20 61 72 67 75 6d 65 6e 74 2c 20 75 73 65 20 63 75 72 72 65 6e 74 20 universal.argument,.use.current.
5580 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 29 0a 20 20 28 69 directory."...(interactive)...(i
55a0 66 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 73 68 6f 77 69 6e 67 2d 73 69 64 65 62 61 72 f.(dired-sidebar-showing-sidebar
55c0 2d 70 29 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 68 69 64 65 2d 73 69 -p).......(dired-sidebar-hide-si
55e0 64 65 62 61 72 29 0a 20 20 20 20 28 6c 65 74 2a 20 28 28 6f 6c 64 2d 62 75 66 66 65 72 20 28 64 debar).....(let*.((old-buffer.(d
5600 69 72 65 64 2d 73 69 64 65 62 61 72 2d 62 75 66 66 65 72 20 28 73 65 6c 65 63 74 65 64 2d 66 72 ired-sidebar-buffer.(selected-fr
5620 61 6d 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 74 6f 2d 73 68 6f 77 20 ame)))............(file-to-show.
5640 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 67 65 74 2d 66 69 6c 65 2d 74 6f 2d 73 68 6f 77 29 (dired-sidebar-get-file-to-show)
5660 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 2d 74 6f 2d 73 68 6f 77 20 28 6f 72 20 64 69 )............(dir-to-show.(or.di
5680 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 28 77 r.............................(w
56a0 68 65 6e 20 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 0a 20 20 20 20 20 20 20 20 20 hen.current-prefix-arg..........
56c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 78 70 61 6e 64 2d 66 69 6c .....................(expand-fil
56e0 65 2d 6e 61 6d 65 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 29 0a 20 20 20 20 20 e-name.default-directory))......
5700 20 20 20 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 69 .......................(dired-si
5720 64 65 62 61 72 2d 67 65 74 2d 64 69 72 2d 74 6f 2d 73 68 6f 77 29 29 29 0a 20 20 20 20 20 20 20 debar-get-dir-to-show)))........
5740 20 20 20 20 28 73 69 64 65 62 61 72 2d 62 75 66 66 65 72 20 28 64 69 72 65 64 2d 73 69 64 65 62 ....(sidebar-buffer.(dired-sideb
5760 61 72 2d 67 65 74 2d 6f 72 2d 63 72 65 61 74 65 2d 62 75 66 66 65 72 20 64 69 72 2d 74 6f 2d 73 ar-get-or-create-buffer.dir-to-s
5780 68 6f 77 29 29 29 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 73 68 6f 77 how))).......(dired-sidebar-show
57a0 2d 73 69 64 65 62 61 72 20 73 69 64 65 62 61 72 2d 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 28 -sidebar.sidebar-buffer).......(
57c0 77 68 65 6e 20 28 61 6e 64 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 75 73 65 2d 6f 6e 65 2d when.(and.dired-sidebar-use-one-
57e0 69 6e 73 74 61 6e 63 65 20 6f 6c 64 2d 62 75 66 66 65 72 20 28 6e 6f 74 20 28 65 71 20 73 69 64 instance.old-buffer.(not.(eq.sid
5800 65 62 61 72 2d 62 75 66 66 65 72 20 6f 6c 64 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20 20 20 20 ebar-buffer.old-buffer))).......
5820 20 20 28 6b 69 6c 6c 2d 62 75 66 66 65 72 20 6f 6c 64 2d 62 75 66 66 65 72 29 29 0a 20 20 20 20 ..(kill-buffer.old-buffer)).....
5840 20 20 28 69 66 20 28 61 6e 64 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 66 6f 6c 6c 6f 77 2d ..(if.(and.dired-sidebar-follow-
5860 66 69 6c 65 2d 61 74 2d 70 6f 69 6e 74 2d 6f 6e 2d 74 6f 67 67 6c 65 2d 6f 70 65 6e 0a 20 20 20 file-at-point-on-toggle-open....
5880 20 20 20 20 20 20 20 20 20 20 20 20 66 69 6c 65 2d 74 6f 2d 73 68 6f 77 29 0a 20 20 20 20 20 20 ............file-to-show).......
58a0 20 20 20 20 28 69 66 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 70 6f 70 2d 74 6f 2d 73 69 64 ....(if.dired-sidebar-pop-to-sid
58c0 65 62 61 72 2d 6f 6e 2d 74 6f 67 67 6c 65 2d 6f 70 65 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 ebar-on-toggle-open.............
58e0 20 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 70 6f 69 6e 74 2d 61 74 2d 66 69 6c 65 20 66 ..(dired-sidebar-point-at-file.f
5900 69 6c 65 2d 74 6f 2d 73 68 6f 77 20 64 69 72 2d 74 6f 2d 73 68 6f 77 29 0a 20 20 20 20 20 20 20 ile-to-show.dir-to-show)........
5920 20 20 20 20 20 28 77 69 74 68 2d 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 20 28 73 65 6c 65 .....(with-selected-window.(sele
5940 63 74 65 64 2d 77 69 6e 64 6f 77 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 cted-window)...............(dire
5960 64 2d 73 69 64 65 62 61 72 2d 70 6f 69 6e 74 2d 61 74 2d 66 69 6c 65 20 66 69 6c 65 2d 74 6f 2d d-sidebar-point-at-file.file-to-
5980 73 68 6f 77 20 64 69 72 2d 74 6f 2d 73 68 6f 77 29 29 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 show.dir-to-show))).........(whe
59a0 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 70 6f 70 2d 74 6f 2d 73 69 64 65 62 61 72 2d 6f n.dired-sidebar-pop-to-sidebar-o
59c0 6e 2d 74 6f 67 67 6c 65 2d 6f 70 65 6e 0a 20 20 20 20 20 20 20 20 20 20 28 70 6f 70 2d 74 6f 2d n-toggle-open...........(pop-to-
59e0 62 75 66 66 65 72 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 62 75 66 66 65 72 29 29 29 29 buffer.(dired-sidebar-buffer))))
5a00 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 70 6f 69 6e 74 2d )))..(defun.dired-sidebar-point-
5a20 61 74 2d 66 69 6c 65 20 28 6e 61 6d 65 20 72 6f 6f 74 29 0a 20 20 22 54 72 79 20 74 6f 20 70 6f at-file.(name.root)..."Try.to.po
5a40 69 6e 74 20 61 74 20 4e 41 4d 45 20 66 72 6f 6d 20 73 69 64 65 62 61 72 2e 0a 0a 4b 65 65 70 20 int.at.NAME.from.sidebar...Keep.
5a60 60 64 69 72 65 64 27 20 70 6f 69 6e 74 65 64 20 61 74 20 52 4f 4f 54 20 77 68 69 6c 65 20 63 79 `dired'.pointed.at.ROOT.while.cy
5a80 63 6c 69 6e 67 20 64 69 72 65 63 74 6f 72 69 65 73 20 75 6e 74 69 6c 0a 4e 41 4d 45 20 69 73 20 cling.directories.until.NAME.is.
5aa0 66 6f 75 6e 64 20 69 6e 20 52 4f 4f 54 20 70 61 74 68 2e 0a 0a 54 68 69 73 20 69 73 20 64 65 70 found.in.ROOT.path...This.is.dep
5ac0 65 6e 64 65 6e 74 20 6f 6e 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 63 79 63 6c 65 27 2e endent.on.`dired-subtree-cycle'.
5ae0 22 0a 20 20 28 6c 65 74 20 28 28 73 69 64 65 62 61 72 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 "...(let.((sidebar.(dired-sideba
5b00 72 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20 20 28 70 6f 70 2d 74 6f 2d 62 75 66 66 65 72 20 73 r-buffer))).....(pop-to-buffer.s
5b20 69 64 65 62 61 72 29 0a 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 6e 61 6d 65 0a 20 20 20 20 idebar).....(when.(and.name.....
5b40 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 43 68 65 63 6b 69 6e 67 20 66 6f 72 20 61 20 70 72 69 ...........;;.Checking.for.a.pri
5b60 76 61 74 65 20 6d 65 74 68 6f 64 2e 20 2a 73 68 72 75 67 2a 0a 20 20 20 20 20 20 20 20 20 20 20 vate.method..*shrug*............
5b80 20 20 20 20 28 66 62 6f 75 6e 64 70 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 69 73 2d ....(fboundp.'dired-subtree--is-
5ba0 65 78 70 61 6e 64 65 64 2d 70 29 29 0a 20 20 20 20 20 20 28 70 6f 70 2d 74 6f 2d 62 75 66 66 65 expanded-p)).......(pop-to-buffe
5bc0 72 20 73 69 64 65 62 61 72 29 0a 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 30 29 0a 20 r.sidebar).......(goto-char.0)..
5be0 20 20 20 20 20 28 6c 65 74 2a 20 28 28 70 61 74 68 20 72 6f 6f 74 29 0a 20 20 20 20 20 20 20 20 .....(let*.((path.root).........
5c00 20 20 20 20 20 3b 3b 20 49 6d 61 67 69 6e 65 20 72 6f 6f 74 20 69 73 20 2f 72 6f 6f 74 2f 76 61 .....;;.Imagine.root.is./root/va
5c20 72 2f 20 61 6e 64 20 6e 61 6d 65 20 69 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 2f r/.and.name.is..............;;./
5c40 72 6f 6f 74 2f 76 61 72 2f 61 2f 62 2f 63 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 root/var/a/b/c...............;;.
5c60 54 68 69 73 20 77 69 6c 6c 20 72 65 74 75 72 6e 20 61 20 6c 69 73 74 20 6f 66 20 27 5c 28 22 61 This.will.return.a.list.of.'\("a
5c80 22 20 22 62 22 20 22 63 22 5c 29 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 73 20 "."b"."c"\)...............(dirs.
5ca0 28 77 68 65 6e 20 28 63 61 64 72 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 6e 61 6d 65 20 72 (when.(cadr.(split-string.name.r
5cc0 6f 6f 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 70 6c 69 oot))......................(spli
5ce0 74 2d 73 74 72 69 6e 67 20 28 63 61 64 72 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 6e 61 6d t-string.(cadr.(split-string.nam
5d00 65 20 72 6f 6f 74 29 29 20 22 2f 22 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 64 6f 6c 69 73 74 e.root))."/")))).........(dolist
5d20 20 28 64 69 72 20 64 69 72 73 29 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 54 72 61 69 6c 69 6e .(dir.dirs)...........;;.Trailin
5d40 67 20 60 24 27 20 69 73 20 65 73 73 65 6e 74 69 61 6c 20 74 6f 20 61 76 6f 69 64 20 6d 61 74 63 g.`$'.is.essential.to.avoid.matc
5d60 68 69 6e 67 20 74 68 65 20 6d 6f 64 69 66 69 63 61 74 69 6f 6e 20 64 61 74 65 0a 20 20 20 20 20 hing.the.modification.date......
5d80 20 20 20 20 20 3b 3b 20 66 69 65 6c 64 73 20 6f 66 20 74 68 65 20 75 6e 64 65 72 6c 79 69 6e 67 .....;;.fields.of.the.underlying
5da0 20 60 6c 73 27 20 70 72 6f 63 65 73 73 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 70 .`ls'.process...........(let.((p
5dc0 61 74 68 2d 72 65 67 65 78 20 28 63 6f 6e 63 61 74 20 22 5e 2e 2a 5b 5b 3a 73 70 61 63 65 3a 5d ath-regex.(concat."^.*[[:space:]
5de0 5d 22 20 28 72 65 67 65 78 70 2d 71 75 6f 74 65 20 64 69 72 29 20 22 24 22 29 29 29 0a 20 20 20 ]".(regexp-quote.dir)."$")))....
5e00 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 70 61 74 68 20 28 63 6f 6e 63 61 74 20 70 61 74 68 .........(setq.path.(concat.path
5e20 20 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 66 69 6c 65 2d 72 65 67 .dir)).............(if.(file-reg
5e40 75 6c 61 72 2d 70 20 70 61 74 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 ular-p.path).................;;.
5e60 54 72 79 20 74 6f 20 75 73 65 20 60 64 69 72 65 64 2d 67 6f 74 6f 2d 66 69 6c 65 27 20 74 6f 20 Try.to.use.`dired-goto-file'.to.
5e80 67 6f 20 74 6f 20 74 68 65 20 63 6f 72 72 65 63 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 go.to.the.correct...............
5ea0 20 20 3b 3b 20 66 69 6c 65 2e 20 49 66 20 74 68 61 74 20 66 61 69 6c 73 2c 20 6a 75 73 74 20 73 ..;;.file..If.that.fails,.just.s
5ec0 65 61 72 63 68 20 66 6f 72 20 74 68 65 20 74 65 78 74 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 earch.for.the.text..............
5ee0 20 20 20 20 28 6c 65 74 20 28 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 28 66 69 ....(let.((default-directory.(fi
5f00 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 70 61 74 68 29 29 29 0a 20 20 20 20 20 20 le-name-directory.path))).......
5f20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 64 69 72 65 64 2d 67 6f 74 6f 2d ............(unless.(dired-goto-
5f40 66 69 6c 65 20 70 61 74 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 file.path).....................(
5f60 63 6f 6e 64 69 74 69 6f 6e 2d 63 61 73 65 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 condition-case.nil..............
5f80 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 49 74 27 73 20 68 61 72 64 20 74 6f 20 67 65 74 20 74 ...........;;.It's.hard.to.get.t
5fa0 68 69 73 20 72 69 67 68 74 20 73 6f 20 6a 75 73 74 20 75 73 69 6e 67 20 61 0a 20 20 20 20 20 20 his.right.so.just.using.a.......
5fc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 68 65 75 72 69 73 74 69 63 20 77 ..................;;.heuristic.w
5fe0 69 6c 6c 20 67 65 74 20 39 30 25 20 6f 66 20 74 68 65 20 77 61 79 20 74 68 65 72 65 2e 0a 20 20 ill.get.90%.of.the.way.there....
6000 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 4d 61 6b 69 6e 67 20 ......................;;.Making.
6020 73 75 72 65 20 74 68 65 72 65 27 73 20 61 20 73 70 61 63 65 20 69 6e 20 66 72 6f 6e 74 20 6f 66 sure.there's.a.space.in.front.of
6040 20 74 68 65 20 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .the.name.......................
6060 20 20 3b 3b 20 73 6b 69 70 73 20 6d 61 74 63 68 65 73 20 74 68 61 74 20 63 6f 6e 74 61 69 6e 73 ..;;.skips.matches.that.contains
6080 20 74 68 65 20 6e 61 6d 65 20 61 73 20 61 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .the.name.as.a..................
60a0 20 20 20 20 20 20 20 3b 3b 20 73 75 62 73 74 72 69 6e 67 20 77 68 69 63 68 20 69 73 20 70 72 6f .......;;.substring.which.is.pro
60c0 62 61 62 6c 79 20 67 6f 6f 64 20 65 6e 6f 75 67 68 2e 2e 2e 0a 20 20 20 20 20 20 20 20 20 20 20 bably.good.enough...............
60e0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 .............(re-search-forward.
6100 70 61 74 68 2d 72 65 67 65 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 path-regex).....................
6120 20 20 3b 3b 20 53 6f 6d 65 74 69 6d 65 73 20 60 64 69 72 65 64 27 20 67 65 74 73 20 6f 75 74 20 ..;;.Sometimes.`dired'.gets.out.
6140 6f 66 20 73 79 6e 63 20 77 69 74 68 20 74 68 65 20 66 69 6c 65 2e 0a 20 20 20 20 20 20 20 20 20 of.sync.with.the.file...........
6160 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 52 65 66 72 65 73 68 20 74 68 65 20 62 75 66 66 .............;;.Refresh.the.buff
6180 65 72 20 61 6e 64 20 74 72 79 20 74 68 65 20 73 65 61 72 63 68 20 61 67 61 69 6e 2e 0a 20 20 20 er.and.try.the.search.again.....
61a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 4f 6e 65 20 77 61 79 20 74 6f ...................;;.One.way.to
61c0 20 72 65 70 72 6f 64 75 63 65 20 74 68 69 73 3a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .reproduce.this:................
61e0 20 20 20 20 20 20 20 3b 3b 20 31 2e 20 4f 70 65 6e 20 66 69 6c 65 20 41 20 61 73 20 62 75 66 66 .......;;.1..Open.file.A.as.buff
6200 65 72 20 42 2e 0a 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 32 er.B........................;;.2
6220 2e 20 44 65 6c 65 74 65 20 66 69 6c 65 20 41 20 69 6e 20 60 64 69 72 65 64 27 2e 0a 20 20 20 20 ..Delete.file.A.in.`dired'......
6240 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 33 2e 20 48 69 64 65 20 60 64 69 ..................;;.3..Hide.`di
6260 72 65 64 2d 73 69 64 65 62 61 72 27 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 red-sidebar'....................
6280 20 20 20 20 3b 3b 20 34 2e 20 53 61 76 65 20 62 75 66 66 65 72 20 42 2e 0a 20 20 20 20 20 20 20 ....;;.4..Save.buffer.B.........
62a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 35 2e 20 52 65 2d 6f 70 65 6e 20 60 64 69 ...............;;.5..Re-open.`di
62c0 72 65 64 2d 73 69 64 65 62 61 72 27 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 red-sidebar'....................
62e0 20 20 20 20 28 65 72 72 6f 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ....(error......................
6300 20 20 28 72 65 76 65 72 74 2d 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..(revert-buffer)...............
6320 20 20 20 20 20 20 20 20 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 70 61 74 68 .........(re-search-forward.path
6340 2d 72 65 67 65 78 20 6e 69 6c 20 3a 6e 6f 2d 65 72 72 6f 72 29 29 29 29 29 0a 20 20 20 20 20 20 -regex.nil.:no-error))))).......
6360 20 20 20 20 20 20 20 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 70 61 74 68 2d ........(re-search-forward.path-
6380 72 65 67 65 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 43 68 65 63 6b 20 69 66 regex)...............;;.Check.if
63a0 20 73 75 62 74 72 65 65 20 68 61 73 20 61 6c 72 65 61 64 79 20 62 65 65 6e 20 65 78 70 61 6e 64 .subtree.has.already.been.expand
63c0 65 64 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 42 61 73 69 63 61 6c 6c 79 2c 20 ed................;;.Basically,.
63e0 77 65 27 72 65 20 75 73 69 6e 67 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 63 79 63 6c 65 we're.using.`dired-subtree-cycle
6400 27 20 6d 6f 72 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6c 69 6b 65 20 64 69 72 '.more...............;;.like.dir
6420 65 64 2d 73 75 62 74 72 65 65 2d 65 78 70 61 6e 64 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ed-subtree-expand...............
6440 20 28 77 68 65 6e 20 28 6e 6f 74 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 69 73 2d 65 .(when.(not.(dired-subtree--is-e
6460 78 70 61 6e 64 65 64 2d 70 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 54 xpanded-p)).................;;.T
6480 68 69 73 20 77 69 6c 6c 20 70 72 6f 62 61 62 6c 79 20 74 68 72 6f 77 20 61 6e 20 65 72 72 6f 72 his.will.probably.throw.an.error
64a0 20 77 68 65 6e 20 74 72 79 69 6e 67 20 74 6f 20 65 78 70 61 6e 64 0a 20 20 20 20 20 20 20 20 20 .when.trying.to.expand..........
64c0 20 20 20 20 20 20 20 3b 3b 20 64 69 72 65 63 74 6f 72 69 65 73 20 74 68 61 74 20 68 61 76 65 20 .......;;.directories.that.have.
64e0 62 65 65 6e 20 63 6f 6c 6c 61 70 73 65 64 20 62 79 20 60 64 69 72 65 64 2d 63 6f 6c 6c 61 70 73 been.collapsed.by.`dired-collaps
6500 65 27 2e 0a 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 e'..................(dired-subtr
6520 65 65 2d 63 79 63 6c 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 70 ee-cycle))...............(setq.p
6540 61 74 68 20 28 63 6f 6e 63 61 74 20 70 61 74 68 20 22 2f 22 29 29 29 29 29 29 0a 20 20 20 20 20 ath.(concat.path."/"))))))......
6560 20 28 77 68 65 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 72 65 63 65 6e 74 65 72 2d 63 75 .(when.dired-sidebar-recenter-cu
6580 72 73 6f 72 2d 6f 6e 2d 66 6f 6c 6c 6f 77 2d 66 69 6c 65 0a 20 20 20 20 20 20 20 20 28 72 65 63 rsor-on-follow-file.........(rec
65a0 65 6e 74 65 72 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 enter.nil)).......(dired-sidebar
65c0 2d 72 65 64 69 73 70 6c 61 79 2d 69 63 6f 6e 73 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f -redisplay-icons))))..;;;###auto
65e0 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 74 6f 67 67 6c 65 load.(defun.dired-sidebar-toggle
6600 2d 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 64 69 72 65 63 74 6f 72 79 20 28 29 0a 20 20 22 4c 69 -with-current-directory.()..."Li
6620 6b 65 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 74 6f 67 67 6c 65 2d 73 69 64 65 62 61 72 ke.`dired-sidebar-toggle-sidebar
6640 27 20 62 75 74 20 75 73 65 20 63 75 72 72 65 6e 74 2d 64 69 72 65 63 74 6f 72 79 2e 22 0a 20 20 '.but.use.current-directory."...
6660 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 20 28 28 63 75 72 72 65 6e 74 2d 70 (interactive)...(let.((current-p
6680 72 65 66 69 78 2d 61 72 67 20 27 28 34 29 29 29 20 3b 20 43 2d 75 0a 20 20 20 20 28 63 61 6c 6c refix-arg.'(4))).;.C-u.....(call
66a0 2d 69 6e 74 65 72 61 63 74 69 76 65 6c 79 20 23 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 74 -interactively.#'dired-sidebar-t
66c0 6f 67 67 6c 65 2d 73 69 64 65 62 61 72 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 oggle-sidebar)))..;;;###autoload
66e0 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 73 68 6f 77 2d 73 69 64 65 62 .(defun.dired-sidebar-show-sideb
6700 61 72 20 28 26 6f 70 74 69 6f 6e 61 6c 20 62 29 0a 20 20 22 53 68 6f 77 20 73 69 64 65 62 61 72 ar.(&optional.b)..."Show.sidebar
6720 20 64 69 73 70 6c 61 79 69 6e 67 20 62 75 66 66 65 72 20 42 2e 22 0a 20 20 28 69 6e 74 65 72 61 .displaying.buffer.B."...(intera
6740 63 74 69 76 65 29 0a 20 20 28 6c 65 74 20 28 28 62 75 66 66 65 72 20 28 6f 72 20 62 0a 20 20 20 ctive)...(let.((buffer.(or.b....
6760 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 4f 6e 6c 79 20 65 78 70 65 63 74 20 .................;;.Only.expect.
6780 74 68 69 73 20 74 6f 20 62 65 20 68 69 74 20 77 68 65 6e 20 63 61 6c 6c 65 64 20 69 6e 74 65 72 this.to.be.hit.when.called.inter
67a0 61 63 74 69 76 65 6c 79 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 actively......................(d
67c0 69 72 65 64 2d 73 69 64 65 62 61 72 2d 67 65 74 2d 6f 72 2d 63 72 65 61 74 65 2d 62 75 66 66 65 ired-sidebar-get-or-create-buffe
67e0 72 0a 20 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 69 r......................(dired-si
6800 64 65 62 61 72 2d 67 65 74 2d 64 69 72 2d 74 6f 2d 73 68 6f 77 29 29 29 29 29 0a 20 20 20 20 28 debar-get-dir-to-show))))).....(
6820 64 69 73 70 6c 61 79 2d 62 75 66 66 65 72 2d 69 6e 2d 73 69 64 65 2d 77 69 6e 64 6f 77 20 62 75 display-buffer-in-side-window.bu
6840 66 66 65 72 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 64 69 73 70 6c 61 79 2d 61 6c 69 73 74 ffer.dired-sidebar-display-alist
6860 29 0a 20 20 20 20 28 6c 65 74 20 28 28 77 69 6e 64 6f 77 20 28 67 65 74 2d 62 75 66 66 65 72 2d ).....(let.((window.(get-buffer-
6880 77 69 6e 64 6f 77 20 62 75 66 66 65 72 29 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 64 69 72 window.buffer))).......(when.dir
68a0 65 64 2d 73 69 64 65 62 61 72 2d 6e 6f 2d 64 65 6c 65 74 65 2d 6f 74 68 65 72 2d 77 69 6e 64 6f ed-sidebar-no-delete-other-windo
68c0 77 73 0a 20 20 20 20 20 20 20 20 28 73 65 74 2d 77 69 6e 64 6f 77 2d 70 61 72 61 6d 65 74 65 72 ws.........(set-window-parameter
68e0 20 77 69 6e 64 6f 77 20 27 6e 6f 2d 64 65 6c 65 74 65 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 73 .window.'no-delete-other-windows
6900 20 74 29 29 0a 20 20 20 20 20 20 28 73 65 74 2d 77 69 6e 64 6f 77 2d 64 65 64 69 63 61 74 65 64 .t)).......(set-window-dedicated
6920 2d 70 20 77 69 6e 64 6f 77 20 74 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 64 69 72 65 64 2d 73 -p.window.t).......(when.dired-s
6940 69 64 65 62 61 72 2d 72 65 73 69 7a 65 2d 6f 6e 2d 6f 70 65 6e 0a 20 20 20 20 20 20 20 20 28 77 idebar-resize-on-open.........(w
6960 69 74 68 2d 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 20 77 69 6e 64 6f 77 0a 20 20 20 20 20 ith-selected-window.window......
6980 20 20 20 20 20 28 6c 65 74 20 28 28 77 69 6e 64 6f 77 2d 73 69 7a 65 2d 66 69 78 65 64 29 29 0a .....(let.((window-size-fixed)).
69a0 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 73 65 74 2d 77 ............(dired-sidebar-set-w
69c0 69 64 74 68 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 77 69 64 74 68 29 29 29 29 29 0a 20 20 idth.dired-sidebar-width)))))...
69e0 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 62 75 66 66 65 72 0a 20 20 ..(with-current-buffer.buffer...
6a00 20 20 20 20 28 69 66 20 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 64 69 72 65 64 2d 73 69 ....(if.(eq.major-mode.'dired-si
6a20 64 65 62 61 72 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 62 75 69 debar-mode)...........(dired-bui
6a40 6c 64 2d 73 75 62 64 69 72 2d 61 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d ld-subdir-alist).........(dired-
6a60 73 69 64 65 62 61 72 2d 6d 6f 64 65 29 29 29 0a 20 20 20 20 28 64 69 72 65 64 2d 73 69 64 65 62 sidebar-mode))).....(dired-sideb
6a80 61 72 2d 75 70 64 61 74 65 2d 73 74 61 74 65 20 62 75 66 66 65 72 29 29 29 0a 0a 3b 3b 3b 23 23 ar-update-state.buffer)))..;;;##
6aa0 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 68 #autoload.(defun.dired-sidebar-h
6ac0 69 64 65 2d 73 69 64 65 62 61 72 20 28 29 0a 20 20 22 48 69 64 65 20 74 68 65 20 73 69 64 65 62 ide-sidebar.()..."Hide.the.sideb
6ae0 61 72 20 69 6e 20 74 68 65 20 73 65 6c 65 63 74 65 64 20 66 72 61 6d 65 2e 22 0a 20 20 28 69 6e ar.in.the.selected.frame."...(in
6b00 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 77 68 65 6e teractive)...(dired-sidebar-when
6b20 2d 6c 65 74 2a 20 28 28 62 75 66 66 65 72 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 62 75 -let*.((buffer.(dired-sidebar-bu
6b40 66 66 65 72 29 29 29 0a 20 20 20 20 28 64 65 6c 65 74 65 2d 77 69 6e 64 6f 77 20 28 67 65 74 2d ffer))).....(delete-window.(get-
6b60 62 75 66 66 65 72 2d 77 69 6e 64 6f 77 20 62 75 66 66 65 72 29 29 0a 20 20 20 20 28 64 69 72 65 buffer-window.buffer)).....(dire
6b80 64 2d 73 69 64 65 62 61 72 2d 75 70 64 61 74 65 2d 73 74 61 74 65 20 6e 69 6c 29 29 29 0a 0a 3b d-sidebar-update-state.nil)))..;
6ba0 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 69 64 65 62 ;;###autoload.(defun.dired-sideb
6bc0 61 72 2d 6a 75 6d 70 2d 74 6f 2d 73 69 64 65 62 61 72 20 28 29 0a 20 20 22 4a 75 6d 70 20 74 6f ar-jump-to-sidebar.()..."Jump.to
6be0 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 27 20 62 75 66 66 65 72 20 69 66 20 69 74 20 69 73 .`dired-sidebar'.buffer.if.it.is
6c00 20 73 68 6f 77 69 6e 67 2e 0a 0a 49 66 20 69 74 27 73 20 6e 6f 74 20 73 68 6f 77 69 6e 67 2c 20 .showing...If.it's.not.showing,.
6c20 61 63 74 20 61 73 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 74 6f 67 67 6c 65 2d 73 69 64 act.as.`dired-sidebar-toggle-sid
6c40 65 62 61 72 27 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 69 66 20 28 64 ebar'."...(interactive)...(if.(d
6c60 69 72 65 64 2d 73 69 64 65 62 61 72 2d 73 68 6f 77 69 6e 67 2d 73 69 64 65 62 61 72 2d 70 29 0a ired-sidebar-showing-sidebar-p).
6c80 20 20 20 20 20 20 28 73 65 6c 65 63 74 2d 77 69 6e 64 6f 77 0a 20 20 20 20 20 20 20 28 67 65 74 ......(select-window........(get
6ca0 2d 62 75 66 66 65 72 2d 77 69 6e 64 6f 77 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 62 75 -buffer-window.(dired-sidebar-bu
6cc0 66 66 65 72 20 28 73 65 6c 65 63 74 65 64 2d 66 72 61 6d 65 29 29 29 29 0a 20 20 20 20 28 63 61 ffer.(selected-frame)))).....(ca
6ce0 6c 6c 2d 69 6e 74 65 72 61 63 74 69 76 65 6c 79 20 23 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 ll-interactively.#'dired-sidebar
6d00 2d 74 6f 67 67 6c 65 2d 73 69 64 65 62 61 72 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 -toggle-sidebar)))..(defun.dired
6d20 2d 73 69 64 65 62 61 72 2d 66 69 6e 64 2d 66 69 6c 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20 64 69 -sidebar-find-file.(&optional.di
6d40 72 29 0a 20 20 22 57 72 61 70 70 65 72 20 6f 76 65 72 20 60 64 69 72 65 64 2d 66 69 6e 64 2d 66 r)..."Wrapper.over.`dired-find-f
6d60 69 6c 65 27 2e 0a 4f 70 74 69 6f 6e 61 6c 20 61 72 67 75 6d 65 6e 74 20 44 49 52 20 46 69 6e 65 ile'..Optional.argument.DIR.Fine
6d80 20 66 69 6c 65 20 75 73 69 6e 67 20 44 49 52 20 6f 66 20 61 76 61 69 6c 61 62 6c 65 2e 0a 0a 57 .file.using.DIR.of.available...W
6da0 69 74 68 20 70 72 65 66 69 78 20 61 72 67 75 6d 65 6e 74 2c 20 75 73 65 20 60 64 69 72 65 64 2d ith.prefix.argument,.use.`dired-
6dc0 73 69 64 65 62 61 72 2d 61 6c 74 65 72 6e 61 74 65 2d 73 65 6c 65 63 74 2d 77 69 6e 64 6f 77 2d sidebar-alternate-select-window-
6de0 66 75 6e 63 74 69 6f 6e 27 20 66 6f 72 0a 77 69 6e 64 6f 77 20 73 65 6c 65 63 74 69 6f 6e 2e 22 function'.for.window.selection."
6e00 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 66 69 6e 64 2d 66 ...(interactive)...(let.((find-f
6e20 69 6c 65 2d 72 75 6e 2d 64 69 72 65 64 20 74 29 0a 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d ile-run-dired.t).........(dired-
6e40 66 69 6c 65 2d 6e 61 6d 65 20 28 6f 72 20 64 69 72 20 28 64 69 72 65 64 2d 67 65 74 2d 66 69 6c file-name.(or.dir.(dired-get-fil
6e60 65 2d 66 6f 72 2d 76 69 73 69 74 29 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 6c 65 63 74 2d 77 e-for-visit))).........(select-w
6e80 69 74 68 2d 61 6c 74 2d 77 69 6e 64 6f 77 2d 66 75 6e 63 74 69 6f 6e 20 63 75 72 72 65 6e 74 2d ith-alt-window-function.current-
6ea0 70 72 65 66 69 78 2d 61 72 67 29 29 0a 20 20 20 20 28 69 66 20 28 61 6e 64 20 28 66 69 6c 65 2d prefix-arg)).....(if.(and.(file-
6ec0 64 69 72 65 63 74 6f 72 79 2d 70 20 64 69 72 65 64 2d 66 69 6c 65 2d 6e 61 6d 65 29 0a 20 20 20 directory-p.dired-file-name)....
6ee0 20 20 20 20 20 20 20 20 20 20 3b 3b 20 46 6f 72 20 22 2e 22 20 6f 70 65 6e 20 61 20 66 75 6c 6c ..........;;.For.".".open.a.full
6f00 2d 62 6c 6f 77 6e 20 64 69 72 65 64 20 62 75 66 66 65 72 2c 20 73 69 6e 63 65 20 74 68 65 20 64 -blown.dired.buffer,.since.the.d
6f20 69 72 65 63 74 6f 72 79 20 69 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 61 6c 72 65 irectory.is..............;;.alre
6f40 61 64 79 20 6f 70 65 6e 20 69 6e 20 74 68 65 20 73 69 64 65 62 61 72 2e 0a 20 20 20 20 20 20 20 ady.open.in.the.sidebar.........
6f60 20 20 20 20 20 20 28 6e 6f 74 20 28 73 74 72 69 6e 67 3d 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 6e ......(not.(string=.(file-name-n
6f80 6f 6e 64 69 72 65 63 74 6f 72 79 20 64 69 72 65 64 2d 66 69 6c 65 2d 6e 61 6d 65 29 0a 20 20 20 ondirectory.dired-file-name)....
6fa0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2e 22 29 29 29 0a 20 ........................".")))..
6fc0 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 77 69 74 68 2d 6e 6f 2d 64 65 .......(dired-sidebar-with-no-de
6fe0 64 69 63 61 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 62 75 66 2d 6e 61 6d dication..........(let.((buf-nam
7000 65 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 62 75 66 66 65 72 2d 6e 61 6d 65 0a 20 20 20 e.(dired-sidebar-buffer-name....
7020 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 66 69 6c .......................dired-fil
7040 65 2d 6e 61 6d 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 64 69 72 65 64 2d e-name)))............(if.(dired-
7060 73 69 64 65 62 61 72 2d 62 75 66 66 65 72 2d 65 78 69 73 74 73 2d 70 20 62 75 66 2d 6e 61 6d 65 sidebar-buffer-exists-p.buf-name
7080 29 0a 20 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 )................(progn.........
70a0 20 20 20 20 20 20 20 20 20 28 73 77 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 20 62 75 66 2d 6e .........(switch-to-buffer.buf-n
70c0 61 6d 65 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 2d 73 69 64 ame)..................(dired-sid
70e0 65 62 61 72 2d 75 70 64 61 74 65 2d 73 74 61 74 65 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 ebar-update-state.(current-buffe
7100 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 61 6e 64 20 64 69 72 65 64 r)))..............(if.(and.dired
7120 2d 73 69 64 65 62 61 72 2d 75 73 65 2d 6f 6e 65 2d 69 6e 73 74 61 6e 63 65 20 28 66 69 6c 65 2d -sidebar-use-one-instance.(file-
7140 64 69 72 65 63 74 6f 72 79 2d 70 20 64 69 72 65 64 2d 66 69 6c 65 2d 6e 61 6d 65 29 29 0a 20 20 directory-p.dired-file-name))...
7160 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6e 64 2d 61 6c 74 65 72 6e 61 74 65 2d 66 ...............(find-alternate-f
7180 69 6c 65 20 64 69 72 65 64 2d 66 69 6c 65 2d 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 ile.dired-file-name)............
71a0 20 20 20 20 3b 3b 20 43 6f 70 69 65 64 20 66 72 6f 6d 20 60 64 69 72 65 64 2d 66 69 6e 64 2d 66 ....;;.Copied.from.`dired-find-f
71c0 69 6c 65 27 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6e 64 2d 66 69 6c 65 20 ile'.................(find-file.
71e0 64 69 72 65 64 2d 66 69 6c 65 2d 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 dired-file-name))..............(
7200 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 dired-sidebar-mode).............
7220 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 75 70 64 61 74 65 2d 73 74 61 74 65 20 28 63 75 .(dired-sidebar-update-state.(cu
7240 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 29 29 0a 20 20 20 20 20 20 3b 3b 20 53 65 6c 65 63 rrent-buffer))))).......;;.Selec
7260 74 20 74 68 65 20 73 69 64 65 62 61 72 20 77 69 6e 64 6f 77 20 73 6f 20 74 68 61 74 20 60 6e 65 t.the.sidebar.window.so.that.`ne
7280 78 74 2d 77 69 6e 64 6f 77 27 20 69 73 20 63 6f 6e 73 69 73 74 65 6e 74 0a 20 20 20 20 20 20 3b xt-window'.is.consistent.......;
72a0 3b 20 69 6e 20 70 69 63 6b 69 6e 67 20 74 68 65 20 77 69 6e 64 6f 77 20 6e 65 78 74 20 74 6f 20 ;.in.picking.the.window.next.to.
72c0 74 68 65 20 73 69 64 65 62 61 72 2e 0a 20 20 20 20 20 20 3b 3b 20 54 68 69 73 20 69 73 20 75 73 the.sidebar........;;.This.is.us
72e0 65 66 75 6c 20 66 6f 72 20 77 68 65 6e 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 66 69 6e eful.for.when.`dired-sidebar-fin
7300 64 2d 66 69 6c 65 27 20 69 73 20 63 61 6c 6c 65 64 0a 20 20 20 20 20 20 3b 3b 20 66 72 6f 6d 20 d-file'.is.called.......;;.from.
7320 61 20 62 75 66 66 65 72 20 74 68 61 74 20 69 73 20 6e 6f 74 20 61 6c 72 65 61 64 79 20 69 6e 20 a.buffer.that.is.not.already.in.
7340 74 68 65 20 73 69 64 65 62 61 72 20 62 75 66 66 65 72 2e 0a 20 20 20 20 20 20 3b 3b 20 65 2e 67 the.sidebar.buffer........;;.e.g
7360 2e 20 41 20 6d 6f 75 73 65 20 63 6c 69 63 6b 20 65 76 65 6e 74 2e 0a 20 20 20 20 20 20 28 73 77 ..A.mouse.click.event........(sw
7380 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 62 75 itch-to-buffer.(dired-sidebar-bu
73a0 66 66 65 72 29 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 77 69 6e 64 6f 77 0a 20 20 20 20 20 ffer)).......(let.((window......
73c0 20 20 20 20 20 20 20 20 28 69 66 20 73 65 6c 65 63 74 2d 77 69 74 68 2d 61 6c 74 2d 77 69 6e 64 ........(if.select-with-alt-wind
73e0 6f 77 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 ow-function..................(fu
7400 6e 63 61 6c 6c 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 61 6c 74 65 72 6e 61 74 65 2d 73 65 ncall.dired-sidebar-alternate-se
7420 6c 65 63 74 2d 77 69 6e 64 6f 77 2d 66 75 6e 63 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 lect-window-function)...........
7440 20 20 20 20 20 28 69 66 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 6f 70 65 6e 2d 66 69 6c 65 .....(if.dired-sidebar-open-file
7460 2d 69 6e 2d 6d 6f 73 74 2d 72 65 63 65 6e 74 6c 79 2d 75 73 65 64 2d 77 69 6e 64 6f 77 0a 20 20 -in-most-recently-used-window...
7480 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 65 74 2d 6d 72 75 2d 77 69 6e 64 6f 77 .................(get-mru-window
74a0 20 6e 69 6c 20 6e 69 6c 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 65 .nil.nil.t)..................(ne
74c0 78 74 2d 77 69 6e 64 6f 77 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 3b 3b 20 68 74 74 70 73 3a xt-window))))).........;;.https:
74e0 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 6a 6f 6a 6f 6a 61 6d 65 73 2f 64 69 72 65 64 2d 73 69 64 //github.com/jojojames/dired-sid
7500 65 62 61 72 2f 69 73 73 75 65 73 2f 35 35 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 6f 72 20 28 ebar/issues/55.........(if.(or.(
7520 6e 75 6c 6c 20 77 69 6e 64 6f 77 29 20 28 77 69 6e 64 6f 77 2d 64 65 64 69 63 61 74 65 64 2d 70 null.window).(window-dedicated-p
7540 20 77 69 6e 64 6f 77 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 6c 65 63 74 2d 77 69 .window)).............(select-wi
7560 6e 64 6f 77 20 28 73 70 6c 69 74 2d 77 69 6e 64 6f 77 20 28 6e 65 78 74 2d 77 69 6e 64 6f 77 29 ndow.(split-window.(next-window)
7580 20 6e 69 6c 20 27 72 69 67 68 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 6c 65 63 74 2d .nil.'right))...........(select-
75a0 77 69 6e 64 6f 77 20 77 69 6e 64 6f 77 29 29 29 0a 20 20 20 20 20 20 28 66 69 6e 64 2d 66 69 6c window.window))).......(find-fil
75c0 65 20 64 69 72 65 64 2d 66 69 6c 65 2d 6e 61 6d 65 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 64 e.dired-file-name).......(when.d
75e0 69 72 65 64 2d 73 69 64 65 62 61 72 2d 63 6c 6f 73 65 2d 73 69 64 65 62 61 72 2d 6f 6e 2d 66 69 ired-sidebar-close-sidebar-on-fi
7600 6c 65 2d 6f 70 65 6e 0a 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 68 le-open.........(dired-sidebar-h
7620 69 64 65 2d 73 69 64 65 62 61 72 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 ide-sidebar)))))..(defun.dired-s
7640 69 64 65 62 61 72 2d 66 69 6e 64 2d 66 69 6c 65 2d 61 6c 74 20 28 29 0a 20 20 22 4c 69 6b 65 20 idebar-find-file-alt.()..."Like.
7660 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 66 69 6e 64 2d 66 69 6c 65 27 20 62 75 74 20 73 65 `dired-sidebar-find-file'.but.se
7680 6c 65 63 74 20 77 69 6e 64 6f 77 20 77 69 74 68 20 61 6c 74 65 72 61 74 65 20 6d 65 74 68 6f 64 lect.window.with.alterate.method
76a0 2e 0a 0a 53 65 6c 65 63 74 20 61 6c 74 65 72 6e 61 74 65 20 77 69 6e 64 6f 77 20 75 73 69 6e 67 ...Select.alternate.window.using
76c0 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 61 6c 74 65 72 6e 61 74 65 2d 73 65 6c 65 63 74 .`dired-sidebar-alternate-select
76e0 2d 77 69 6e 64 6f 77 2d 66 75 6e 63 74 69 6f 6e 27 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 -window-function'."...(interacti
7700 76 65 29 0a 20 20 28 6c 65 74 20 28 28 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 20 ve)...(let.((current-prefix-arg.
7720 27 28 34 29 29 29 20 3b 20 43 2d 75 0a 20 20 20 20 28 63 61 6c 6c 2d 69 6e 74 65 72 61 63 74 69 '(4))).;.C-u.....(call-interacti
7740 76 65 6c 79 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 66 69 6e 64 2d 66 69 6c 65 29 29 29 vely.'dired-sidebar-find-file)))
7760 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 75 70 2d 64 69 72 65 63 74 ..(defun.dired-sidebar-up-direct
7780 6f 72 79 20 28 29 0a 20 20 22 57 72 61 70 70 65 72 20 6f 76 65 72 20 60 64 69 72 65 64 2d 75 70 ory.()..."Wrapper.over.`dired-up
77a0 2d 64 69 72 65 63 74 6f 72 79 27 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 -directory'."...(interactive)...
77c0 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 77 69 74 68 2d 6e 6f 2d 64 65 64 69 63 61 74 69 6f (dired-sidebar-with-no-dedicatio
77e0 6e 0a 20 20 20 3b 3b 20 49 66 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 27 20 69 73 20 75 73 n....;;.If.`dired-subtree'.is.us
7800 65 64 2c 20 60 64 69 72 65 64 2d 63 75 72 72 65 6e 74 2d 64 69 72 65 63 74 6f 72 79 27 20 69 73 ed,.`dired-current-directory'.is
7820 20 72 65 64 65 66 69 6e 65 64 2e 0a 20 20 20 3b 3b 20 53 6f 20 6d 6f 76 65 20 70 6f 69 6e 74 20 .redefined.....;;.So.move.point.
7840 74 6f 20 74 68 65 20 74 6f 70 20 6f 66 20 74 68 65 20 62 75 66 66 65 72 20 74 6f 20 67 65 74 20 to.the.top.of.the.buffer.to.get.
7860 74 68 65 20 61 63 74 75 61 6c 20 64 69 72 65 63 74 6f 72 79 20 61 6e 64 0a 20 20 20 3b 3b 20 6e the.actual.directory.and....;;.n
7880 6f 74 20 74 68 65 20 6f 6e 65 20 61 74 20 70 6f 69 6e 74 2e 0a 20 20 20 28 77 68 65 6e 20 64 69 ot.the.one.at.point.....(when.di
78a0 72 65 64 2d 73 69 64 65 62 61 72 2d 73 6b 69 70 2d 73 75 62 74 72 65 65 2d 70 61 72 65 6e 74 0a red-sidebar-skip-subtree-parent.
78c0 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 29 0a 20 20 .....(goto-char.(point-min)))...
78e0 20 28 6c 65 74 2a 20 28 28 64 69 72 20 28 64 69 72 65 64 2d 63 75 72 72 65 6e 74 2d 64 69 72 65 .(let*.((dir.(dired-current-dire
7900 63 74 6f 72 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 75 70 20 28 66 69 6c 65 2d 6e 61 6d 65 ctory))...........(up.(file-name
7920 2d 64 69 72 65 63 74 6f 72 79 20 28 64 69 72 65 63 74 6f 72 79 2d 66 69 6c 65 2d 6e 61 6d 65 20 -directory.(directory-file-name.
7940 64 69 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 75 70 2d 6e 61 6d 65 20 28 64 69 72 65 64 dir)))...........(up-name.(dired
7960 2d 73 69 64 65 62 61 72 2d 62 75 66 66 65 72 2d 6e 61 6d 65 20 75 70 29 29 29 0a 20 20 20 20 20 -sidebar-buffer-name.up)))......
7980 28 69 66 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 62 75 66 66 65 72 2d 65 78 69 73 74 73 (if.(dired-sidebar-buffer-exists
79a0 2d 70 20 75 70 2d 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 -p.up-name)..........(progn.....
79c0 20 20 20 20 20 20 20 28 73 77 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 20 75 70 2d 6e 61 6d 65 .......(switch-to-buffer.up-name
79e0 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 75 70 64 61 )............(dired-sidebar-upda
7a00 74 65 2d 73 74 61 74 65 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20 20 te-state.(current-buffer))).....
7a20 20 20 20 28 69 66 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 75 73 65 2d 6f 6e 65 2d 69 6e 73 ...(if.dired-sidebar-use-one-ins
7a40 74 61 6e 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6e 64 2d 61 6c 74 65 72 6e 61 74 65 tance............(find-alternate
7a60 2d 66 69 6c 65 20 22 2e 2e 22 29 0a 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 75 70 2d 64 -file."..")..........(dired-up-d
7a80 69 72 65 63 74 6f 72 79 29 29 0a 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 irectory))........(dired-sidebar
7aa0 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 75 70 64 -mode)........(dired-sidebar-upd
7ac0 61 74 65 2d 73 74 61 74 65 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20 ate-state.(current-buffer)))....
7ae0 20 20 28 6c 65 74 20 28 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 75 70 29 29 0a ..(let.((default-directory.up)).
7b00 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 67 6f 74 6f 2d 66 69 6c 65 20 64 69 72 29 29 29 29 29 .......(dired-goto-file.dir)))))
7b20 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 6d 6f 75 73 65 2d 73 75 62 ..(defun.dired-sidebar-mouse-sub
7b40 74 72 65 65 2d 63 79 63 6c 65 2d 6f 72 2d 66 69 6e 64 2d 66 69 6c 65 20 28 65 76 65 6e 74 29 0a tree-cycle-or-find-file.(event).
7b60 20 20 22 48 61 6e 64 6c 65 20 61 20 6d 6f 75 73 65 20 63 6c 69 63 6b 20 45 56 45 4e 54 20 69 6e .."Handle.a.mouse.click.EVENT.in
7b80 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 27 2e 0a 0a 46 6f 72 20 64 69 72 65 63 74 6f 72 69 .`dired-sidebar'...For.directori
7ba0 65 73 2c 20 69 66 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 63 79 63 6c 65 2d 73 75 62 74 es,.if.`dired-sidebar-cycle-subt
7bc0 72 65 65 2d 6f 6e 2d 63 6c 69 63 6b 27 20 69 73 20 74 72 75 65 2c 0a 63 79 63 6c 65 20 74 68 65 ree-on-click'.is.true,.cycle.the
7be0 20 64 69 72 65 63 74 6f 72 79 2e 0a 0a 4f 74 68 65 72 77 69 73 65 2c 20 62 65 68 61 76 65 73 20 .directory...Otherwise,.behaves.
7c00 74 68 65 20 73 61 6d 65 20 61 73 20 69 66 20 75 73 65 72 20 63 6c 69 63 6b 65 64 20 6f 6e 20 61 the.same.as.if.user.clicked.on.a
7c20 20 66 69 6c 65 2e 0a 0a 46 6f 72 20 66 69 6c 65 73 2c 20 75 73 65 20 60 64 69 72 65 64 2d 73 69 .file...For.files,.use.`dired-si
7c40 64 65 62 61 72 2d 66 69 6e 64 2d 66 69 6c 65 27 2e 0a 0a 54 68 69 73 20 75 73 65 73 20 74 68 65 debar-find-file'...This.uses.the
7c60 20 73 61 6d 65 20 63 6f 64 65 20 61 73 20 60 64 69 72 65 64 2d 6d 6f 75 73 65 2d 66 69 6e 64 2d .same.code.as.`dired-mouse-find-
7c80 66 69 6c 65 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 27 20 74 6f 20 66 69 6e 64 0a 74 68 65 20 72 file-other-window'.to.find.the.r
7ca0 65 6c 65 76 61 6e 74 20 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 20 63 6c 69 63 6b 65 64 20 6f elevant.file-directory.clicked.o
7cc0 6e 20 62 79 20 74 68 65 20 6d 6f 75 73 65 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 n.by.the.mouse."...(interactive.
7ce0 22 65 22 29 0a 20 20 28 6c 65 74 20 28 77 69 6e 64 6f 77 20 70 6f 73 20 66 69 6c 65 29 0a 20 20 "e")...(let.(window.pos.file)...
7d00 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 28 73 65 74 71 20 77 69 ..(save-excursion.......(setq.wi
7d20 6e 64 6f 77 20 28 70 6f 73 6e 2d 77 69 6e 64 6f 77 20 28 65 76 65 6e 74 2d 65 6e 64 20 65 76 65 ndow.(posn-window.(event-end.eve
7d40 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 70 6f 73 20 28 70 6f 73 6e 2d 70 6f 69 6e 74 nt)).............pos.(posn-point
7d60 20 28 65 76 65 6e 74 2d 65 6e 64 20 65 76 65 6e 74 29 29 29 0a 20 20 20 20 20 20 28 69 66 20 28 .(event-end.event))).......(if.(
7d80 6e 6f 74 20 28 77 69 6e 64 6f 77 70 20 77 69 6e 64 6f 77 29 29 0a 20 20 20 20 20 20 20 20 20 20 not.(windowp.window))...........
7da0 28 65 72 72 6f 72 20 22 4e 6f 20 66 69 6c 65 20 63 68 6f 73 65 6e 22 29 29 0a 20 20 20 20 20 20 (error."No.file.chosen")).......
7dc0 28 73 65 74 2d 62 75 66 66 65 72 20 28 77 69 6e 64 6f 77 2d 62 75 66 66 65 72 20 77 69 6e 64 6f (set-buffer.(window-buffer.windo
7de0 77 29 29 0a 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 70 6f 73 29 0a 20 20 20 20 20 20 w)).......(goto-char.pos).......
7e00 28 73 65 74 71 20 66 69 6c 65 20 28 64 69 72 65 64 2d 67 65 74 2d 66 69 6c 65 2d 66 6f 72 2d 76 (setq.file.(dired-get-file-for-v
7e20 69 73 69 74 29 29 29 0a 20 20 20 20 3b 3b 20 54 68 65 72 65 27 73 20 61 20 66 6c 69 63 6b 65 72 isit))).....;;.There's.a.flicker
7e40 20 64 6f 69 6e 67 20 74 68 69 73 20 62 75 74 20 69 74 20 64 6f 65 73 6e 27 74 20 73 65 65 6d 20 .doing.this.but.it.doesn't.seem.
7e60 6c 69 6b 65 0a 20 20 20 20 3b 3b 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 63 79 63 6c 65 like.....;;.`dired-subtree-cycle
7e80 27 20 77 6f 72 6b 73 20 77 69 74 68 6f 75 74 20 66 69 72 73 74 20 73 65 6c 65 63 74 69 6e 67 20 '.works.without.first.selecting.
7ea0 74 68 65 20 77 69 6e 64 6f 77 2e 0a 20 20 20 20 28 77 69 74 68 2d 73 65 6c 65 63 74 65 64 2d 77 the.window......(with-selected-w
7ec0 69 6e 64 6f 77 20 77 69 6e 64 6f 77 0a 20 20 20 20 20 20 28 69 66 20 28 61 6e 64 20 64 69 72 65 indow.window.......(if.(and.dire
7ee0 64 2d 73 69 64 65 62 61 72 2d 63 79 63 6c 65 2d 73 75 62 74 72 65 65 2d 6f 6e 2d 63 6c 69 63 6b d-sidebar-cycle-subtree-on-click
7f00 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 2d ................(file-directory-
7f20 70 20 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 73 74 72 p.file)................(not.(str
7f40 69 6e 67 2d 73 75 66 66 69 78 2d 70 20 22 2e 22 20 66 69 6c 65 29 29 29 0a 20 20 20 20 20 20 20 ing-suffix-p.".".file)))........
7f60 20 20 20 28 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 63 79 63 6c 65 29 0a 20 20 20 20 20 20 20 ...(dired-subtree-cycle)........
7f80 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 66 69 6e 64 2d 66 69 6c 65 20 66 69 6c 65 29 29 .(dired-sidebar-find-file.file))
7fa0 29 29 0a 20 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 72 65 64 69 73 70 6c 61 79 2d 69 63 ))...(dired-sidebar-redisplay-ic
7fc0 6f 6e 73 29 29 0a 0a 3b 3b 20 48 65 6c 70 65 72 73 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d ons))..;;.Helpers..(defun.dired-
7fe0 73 69 64 65 62 61 72 2d 62 75 66 66 65 72 2d 65 78 69 73 74 73 2d 70 20 28 62 75 66 66 65 72 2d sidebar-buffer-exists-p.(buffer-
8000 6e 61 6d 65 29 0a 20 20 22 43 68 65 63 6b 20 69 66 20 61 20 60 64 69 72 65 64 2d 73 69 64 65 62 name)..."Check.if.a.`dired-sideb
8020 61 72 27 20 62 75 66 66 65 72 20 65 78 69 73 74 73 20 66 6f 72 20 42 55 46 46 45 52 2d 4e 41 4d ar'.buffer.exists.for.BUFFER-NAM
8040 45 2e 22 0a 20 20 28 67 65 74 2d 62 75 66 66 65 72 20 62 75 66 66 65 72 2d 6e 61 6d 65 29 29 0a E."...(get-buffer.buffer-name)).
8060 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 73 69 64 65 62 61 72 2d 72 6f .(defun.dired-sidebar-sidebar-ro
8080 6f 74 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 64 69 72 65 63 74 6f 72 79 20 75 73 69 6e 67 20 ot.()..."Return.directory.using.
80a0 60 70 72 6f 6a 65 63 74 69 6c 65 27 2c 20 60 70 72 6f 6a 65 63 74 27 20 6f 72 20 63 75 72 72 65 `projectile',.`project'.or.curre
80c0 6e 74 20 64 69 72 65 63 74 6f 72 79 2e 22 0a 20 20 28 69 66 20 28 66 65 61 74 75 72 65 70 20 27 nt.directory."...(if.(featurep.'
80e0 70 72 6f 6a 65 63 74 69 6c 65 29 0a 20 20 20 20 20 20 28 63 6f 6e 64 69 74 69 6f 6e 2d 63 61 73 projectile).......(condition-cas
8100 65 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 70 72 e.nil...........(if.(fboundp.'pr
8120 6f 6a 65 63 74 69 6c 65 2d 70 72 6f 6a 65 63 74 2d 72 6f 6f 74 29 0a 20 20 20 20 20 20 20 20 20 ojectile-project-root)..........
8140 20 20 20 20 20 28 6f 72 20 28 70 72 6f 6a 65 63 74 69 6c 65 2d 70 72 6f 6a 65 63 74 2d 72 6f 6f .....(or.(projectile-project-roo
8160 74 29 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 20 20 20 20 t).default-directory)...........
8180 20 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 20 20 28 65 72 ..default-directory).........(er
81a0 72 6f 72 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 29 0a 20 20 20 20 3b 3b 20 55 ror.default-directory)).....;;.U
81c0 73 65 20 60 70 72 6f 6a 65 63 74 27 20 69 66 20 60 70 72 6f 6a 65 63 74 69 6c 65 27 20 69 73 20 se.`project'.if.`projectile'.is.
81e0 6e 6f 74 20 6c 6f 61 64 65 64 20 79 65 74 2e 0a 20 20 20 20 3b 3b 20 60 70 72 6f 6a 65 63 74 69 not.loaded.yet......;;.`projecti
8200 6c 65 27 20 69 73 20 61 20 62 69 67 20 70 61 63 6b 61 67 65 20 61 6e 64 20 74 61 6b 65 73 20 61 le'.is.a.big.package.and.takes.a
8220 20 77 68 69 6c 65 20 74 6f 20 6c 6f 61 64 20 73 6f 20 69 74 27 73 20 62 65 74 74 65 72 0a 20 20 .while.to.load.so.it's.better...
8240 20 20 3b 3b 20 74 6f 20 64 65 66 65 72 20 6c 6f 61 64 69 6e 67 20 69 74 20 61 73 20 6c 6f 6e 67 ..;;.to.defer.loading.it.as.long
8260 20 61 73 20 70 6f 73 73 69 62 6c 65 20 28 75 6e 74 69 6c 20 74 68 65 20 75 73 65 72 20 63 68 6f .as.possible.(until.the.user.cho
8280 6f 73 65 73 29 2e 0a 20 20 20 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 69 66 2d 6c 65 74 oses)......(dired-sidebar-if-let
82a0 2a 20 28 28 70 72 20 28 70 72 6f 6a 65 63 74 2d 63 75 72 72 65 6e 74 29 29 29 0a 20 20 20 20 20 *.((pr.(project-current)))......
82c0 20 20 20 3b 3b 20 49 74 20 63 61 6e 20 68 61 70 70 65 6e 2c 20 61 74 20 6c 65 61 73 74 20 69 6e ...;;.It.can.happen,.at.least.in
82e0 20 45 6d 61 63 73 20 32 37 2e 31 2c 20 74 68 61 74 0a 20 20 20 20 20 20 20 20 3b 3b 20 60 70 72 .Emacs.27.1,.that.........;;.`pr
8300 6f 6a 65 63 74 2d 63 75 72 72 65 6e 74 60 20 67 69 76 65 20 61 20 6e 6f 6e 2d 6e 69 6c 20 72 65 oject-current`.give.a.non-nil.re
8320 73 75 6c 74 2c 20 77 68 69 6c 65 0a 20 20 20 20 20 20 20 20 3b 3b 20 60 70 72 6f 6a 65 63 74 2d sult,.while.........;;.`project-
8340 72 6f 6f 74 60 20 69 73 20 75 6e 64 65 66 69 6e 65 64 2e 20 46 61 6c 6c 62 61 63 6b 20 74 6f 20 root`.is.undefined..Fallback.to.
8360 61 73 73 75 6d 69 6e 67 20 74 68 61 74 20 74 68 65 0a 20 20 20 20 20 20 20 20 3b 3b 20 64 69 72 assuming.that.the.........;;.dir
8380 65 63 74 6f 72 79 20 70 61 72 74 20 6f 66 20 60 70 72 6f 6a 65 63 74 2d 63 75 72 72 65 6e 74 60 ectory.part.of.`project-current`
83a0 20 69 73 20 74 68 65 20 72 6f 6f 74 2e 20 53 65 65 0a 20 20 20 20 20 20 20 20 3b 3b 20 68 74 74 .is.the.root..See.........;;.htt
83c0 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 6a 6f 6a 6f 6a 61 6d 65 73 2f 64 69 72 65 64 2d ps://github.com/jojojames/dired-
83e0 73 69 64 65 62 61 72 2f 69 73 73 75 65 73 2f 37 33 20 66 6f 72 0a 20 20 20 20 20 20 20 20 3b 3b sidebar/issues/73.for.........;;
8400 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 66 62 6f 75 .more.details..........(if.(fbou
8420 6e 64 70 20 27 70 72 6f 6a 65 63 74 2d 72 6f 6f 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 ndp.'project-root).............(
8440 70 72 6f 6a 65 63 74 2d 72 6f 6f 74 20 70 72 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 64 72 20 project-root.pr)...........(cdr.
8460 70 72 29 29 0a 20 20 20 20 20 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 29 29 0a pr)).......default-directory))).
8480 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 62 75 66 66 65 72 2d 6e 61 6d .(defun.dired-sidebar-buffer-nam
84a0 65 20 28 64 69 72 29 0a 20 20 22 52 65 74 75 72 6e 20 6e 61 6d 65 20 6f 66 20 60 64 69 72 65 64 e.(dir)..."Return.name.of.`dired
84c0 2d 73 69 64 65 62 61 72 27 20 62 75 66 66 65 72 20 67 69 76 65 6e 20 44 49 52 2e 22 0a 20 20 28 -sidebar'.buffer.given.DIR."...(
84e0 6c 65 74 20 28 28 62 20 28 63 6f 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 28 73 74 72 69 let.((b.(cond.............((stri
8500 6e 67 2d 73 75 66 66 69 78 2d 70 20 22 2e 2e 22 20 64 69 72 29 0a 20 20 20 20 20 20 20 20 20 20 ng-suffix-p."..".dir)...........
8520 20 20 20 3b 3b 20 7e 2f 2e 65 6d 61 63 73 2e 64 2f 65 6c 70 61 2f 2e 2e 20 2d 3e 20 7e 2f 2e 65 ...;;.~/.emacs.d/elpa/...->.~/.e
8540 6d 61 63 73 2e 64 2f 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 6e 61 6d 65 2d macs.d/..............(file-name-
8560 64 69 72 65 63 74 6f 72 79 20 28 73 75 62 73 74 72 69 6e 67 20 64 69 72 20 30 20 28 2d 20 28 6c directory.(substring.dir.0.(-.(l
8580 65 6e 67 74 68 20 64 69 72 29 20 33 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 28 6e ength.dir).3)))).............((n
85a0 6f 74 20 28 73 74 72 69 6e 67 2d 73 75 66 66 69 78 2d 70 20 22 2f 22 20 64 69 72 29 29 0a 20 20 ot.(string-suffix-p."/".dir))...
85c0 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 64 69 72 20 22 2f 22 29 29 0a 20 20 20 ...........(concat.dir."/"))....
85e0 20 20 20 20 20 20 20 20 20 28 3a 64 65 66 61 75 6c 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 .........(:default..............
8600 64 69 72 29 29 29 29 0a 20 20 20 20 28 63 6f 6e 63 61 74 20 22 3a 22 20 28 61 62 62 72 65 76 69 dir)))).....(concat.":".(abbrevi
8620 61 74 65 2d 66 69 6c 65 2d 6e 61 6d 65 20 62 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 ate-file-name.b))))..(defun.dire
8640 64 2d 73 69 64 65 62 61 72 2d 67 65 74 2d 6f 72 2d 63 72 65 61 74 65 2d 62 75 66 66 65 72 20 28 d-sidebar-get-or-create-buffer.(
8660 72 6f 6f 74 29 0a 20 20 22 47 65 74 20 6f 72 20 63 72 65 61 74 65 20 61 20 60 64 69 72 65 64 2d root)..."Get.or.create.a.`dired-
8680 73 69 64 65 62 61 72 27 20 62 75 66 66 65 72 20 6d 61 74 63 68 69 6e 67 20 52 4f 4f 54 2e 22 0a sidebar'.buffer.matching.ROOT.".
86a0 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 6e 61 6d 65 20 28 64 ..(interactive)...(let.((name.(d
86c0 69 72 65 64 2d 73 69 64 65 62 61 72 2d 62 75 66 66 65 72 2d 6e 61 6d 65 20 72 6f 6f 74 29 29 29 ired-sidebar-buffer-name.root)))
86e0 0a 20 20 20 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 69 66 2d 6c 65 74 2a 20 28 28 65 78 .....(dired-sidebar-if-let*.((ex
8700 69 73 74 69 6e 67 2d 62 75 66 66 65 72 20 28 67 65 74 2d 62 75 66 66 65 72 20 6e 61 6d 65 29 29 isting-buffer.(get-buffer.name))
8720 29 0a 20 20 20 20 20 20 20 20 65 78 69 73 74 69 6e 67 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 ).........existing-buffer.......
8740 28 6c 65 74 20 28 28 62 75 66 66 65 72 20 28 64 69 72 65 64 2d 6e 6f 73 65 6c 65 63 74 20 72 6f (let.((buffer.(dired-noselect.ro
8760 6f 74 29 29 29 0a 20 20 20 20 20 20 20 20 3b 3b 20 57 68 65 6e 20 6f 70 65 6e 69 6e 67 20 61 20 ot))).........;;.When.opening.a.
8780 73 69 64 65 62 61 72 20 77 68 69 6c 65 20 69 6e 20 61 20 64 69 72 65 64 20 62 75 66 66 65 72 20 sidebar.while.in.a.dired.buffer.
87a0 74 68 61 74 20 6d 61 74 63 68 65 73 0a 20 20 20 20 20 20 20 20 3b 3b 20 74 68 65 20 73 69 64 65 that.matches.........;;.the.side
87c0 62 61 72 27 73 20 72 6f 6f 74 20 64 69 72 65 63 74 6f 72 79 2e 0a 20 20 20 20 20 20 20 20 28 69 bar's.root.directory..........(i
87e0 66 20 28 65 71 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 20 62 75 66 66 65 72 29 0a 20 f.(eq.(current-buffer).buffer)..
8800 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d ...........;;.https://github.com
8820 2f 46 75 63 6f 31 2f 64 69 72 65 64 2d 68 61 63 6b 73 2f 69 73 73 75 65 73 2f 31 30 32 0a 20 20 /Fuco1/dired-hacks/issues/102...
8840 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 6d 65 6d 62 65 72 20 27 64 69 72 65 64 2d 63 6f 6c ..........(if.(member.'dired-col
8860 6c 61 70 73 65 2d 6d 6f 64 65 20 64 69 72 65 64 2d 6d 6f 64 65 2d 68 6f 6f 6b 29 0a 20 20 20 20 lapse-mode.dired-mode-hook).....
8880 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 20 20 ............(progn..............
88a0 20 20 20 20 20 28 72 65 6d 6f 76 65 2d 68 6f 6f 6b 20 27 64 69 72 65 64 2d 6d 6f 64 65 2d 68 6f .....(remove-hook.'dired-mode-ho
88c0 6f 6b 20 27 64 69 72 65 64 2d 63 6f 6c 6c 61 70 73 65 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 ok.'dired-collapse-mode)........
88e0 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 63 6c 6f 6e 65 20 28 63 6c 6f 6e 65 2d 62 ...........(let.((clone.(clone-b
8900 75 66 66 65 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 64 uffer))).....................(ad
8920 64 2d 68 6f 6f 6b 20 27 64 69 72 65 64 2d 6d 6f 64 65 2d 68 6f 6f 6b 20 27 64 69 72 65 64 2d 63 d-hook.'dired-mode-hook.'dired-c
8940 6f 6c 6c 61 70 73 65 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ollapse-mode)...................
8960 20 20 63 6c 6f 6e 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 6f 6e 65 2d 62 ..clone))...............(clone-b
8980 75 66 66 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 52 65 6e 61 6d 65 20 74 68 65 20 uffer))...........;;.Rename.the.
89a0 62 75 66 66 65 72 20 67 65 6e 65 72 61 74 65 64 20 62 79 20 60 64 69 72 65 64 2d 6e 6f 73 65 6c buffer.generated.by.`dired-nosel
89c0 65 63 74 27 2e 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 6e 6f 74 20 28 73 74 72 69 ect'............(when.(not.(stri
89e0 6e 67 2d 65 71 75 61 6c 20 28 62 75 66 66 65 72 2d 6e 61 6d 65 20 62 75 66 66 65 72 29 20 6e 61 ng-equal.(buffer-name.buffer).na
8a00 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 me)).............(with-current-b
8a20 75 66 66 65 72 20 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 6e 61 uffer.buffer...............(rena
8a40 6d 65 2d 62 75 66 66 65 72 20 6e 61 6d 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 62 75 66 66 me-buffer.name)))...........buff
8a60 65 72 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 73 65 er)))))..(defun.dired-sidebar-se
8a80 74 2d 66 6f 6e 74 20 28 29 0a 20 20 22 43 75 73 74 6f 6d 69 7a 65 20 66 6f 6e 74 20 69 6e 20 60 t-font.()..."Customize.font.in.`
8aa0 64 69 72 65 64 2d 73 69 64 65 62 61 72 27 2e 0a 0a 53 65 74 20 66 6f 6e 74 20 74 6f 20 61 20 76 dired-sidebar'...Set.font.to.a.v
8ac0 61 72 69 61 62 6c 65 20 77 69 64 74 68 20 28 70 72 6f 70 6f 72 74 69 6f 6e 61 6c 29 20 69 6e 20 ariable.width.(proportional).in.
8ae0 74 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 the.current.buffer."...(interact
8b00 69 76 65 29 0a 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 62 75 66 66 65 72 2d 66 61 63 65 2d 6d ive)...(setq-local.buffer-face-m
8b20 6f 64 65 2d 66 61 63 65 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 66 61 63 65 29 0a 20 20 28 ode-face.dired-sidebar-face)...(
8b40 62 75 66 66 65 72 2d 66 61 63 65 2d 6d 6f 64 65 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 buffer-face-mode))..(defun.dired
8b60 2d 73 69 64 65 62 61 72 2d 73 65 74 2d 6d 6f 64 65 2d 6c 69 6e 65 20 28 29 0a 20 20 22 43 75 73 -sidebar-set-mode-line.()..."Cus
8b80 74 6f 6d 69 7a 65 20 6d 6f 64 65 6c 69 6e 65 20 69 6e 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 tomize.modeline.in.`dired-sideba
8ba0 72 27 2e 22 0a 20 20 28 73 65 74 71 20 6d 6f 64 65 2d 6c 69 6e 65 2d 66 6f 72 6d 61 74 20 64 69 r'."...(setq.mode-line-format.di
8bc0 72 65 64 2d 73 69 64 65 62 61 72 2d 6d 6f 64 65 2d 6c 69 6e 65 2d 66 6f 72 6d 61 74 29 29 0a 0a red-sidebar-mode-line-format))..
8be0 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 73 65 74 2d 77 69 64 74 68 20 28 (defun.dired-sidebar-set-width.(
8c00 77 69 64 74 68 29 0a 20 20 22 53 65 74 20 74 68 65 20 77 69 64 74 68 20 6f 66 20 74 68 65 20 62 width)..."Set.the.width.of.the.b
8c20 75 66 66 65 72 20 74 6f 20 57 49 44 54 48 20 77 68 65 6e 20 69 74 20 69 73 20 63 72 65 61 74 65 uffer.to.WIDTH.when.it.is.create
8c40 64 2e 22 0a 20 20 3b 3b 20 43 6f 70 69 65 64 20 66 72 6f 6d 20 60 74 72 65 65 6d 61 63 73 2d 2d d."...;;.Copied.from.`treemacs--
8c60 73 65 74 2d 77 69 64 74 68 27 20 61 73 20 77 65 6c 6c 20 61 73 20 60 6e 65 6f 74 72 65 65 27 2e set-width'.as.well.as.`neotree'.
8c80 0a 20 20 28 75 6e 6c 65 73 73 20 28 6f 6e 65 2d 77 69 6e 64 6f 77 2d 70 29 0a 20 20 20 20 28 6c ...(unless.(one-window-p).....(l
8ca0 65 74 20 28 28 77 69 6e 64 6f 77 2d 73 69 7a 65 2d 66 69 78 65 64 29 0a 20 20 20 20 20 20 20 20 et.((window-size-fixed).........
8cc0 20 20 28 77 20 28 6d 61 78 20 77 69 64 74 68 20 77 69 6e 64 6f 77 2d 6d 69 6e 2d 77 69 64 74 68 ..(w.(max.width.window-min-width
8ce0 29 29 29 0a 20 20 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 20 20 28 28 3e 20 28 77 69 6e 64 ))).......(cond........((>.(wind
8d00 6f 77 2d 77 69 64 74 68 29 20 77 29 0a 20 20 20 20 20 20 20 20 28 73 68 72 69 6e 6b 2d 77 69 6e ow-width).w).........(shrink-win
8d20 64 6f 77 2d 68 6f 72 69 7a 6f 6e 74 61 6c 6c 79 20 20 28 2d 20 28 77 69 6e 64 6f 77 2d 77 69 64 dow-horizontally..(-.(window-wid
8d40 74 68 29 20 77 29 29 29 0a 20 20 20 20 20 20 20 28 28 3c 20 28 77 69 6e 64 6f 77 2d 77 69 64 74 th).w)))........((<.(window-widt
8d60 68 29 20 77 29 0a 20 20 20 20 20 20 20 20 28 65 6e 6c 61 72 67 65 2d 77 69 6e 64 6f 77 2d 68 6f h).w).........(enlarge-window-ho
8d80 72 69 7a 6f 6e 74 61 6c 6c 79 20 28 2d 20 77 20 28 77 69 6e 64 6f 77 2d 77 69 64 74 68 29 29 29 rizontally.(-.w.(window-width)))
8da0 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 75 70 64 61 )))))..(defun.dired-sidebar-upda
8dc0 74 65 2d 62 75 66 66 65 72 2d 6e 61 6d 65 20 28 29 0a 20 20 22 43 68 61 6e 67 65 20 62 75 66 66 te-buffer-name.()..."Change.buff
8de0 65 72 20 6e 61 6d 65 20 74 6f 20 61 76 6f 69 64 20 63 6f 6c 6c 69 73 69 6f 6e 20 77 69 74 68 20 er.name.to.avoid.collision.with.
8e00 72 65 67 75 6c 61 72 20 60 64 69 72 65 64 27 20 62 75 66 66 65 72 73 2e 22 0a 20 20 28 72 65 6e regular.`dired'.buffers."...(ren
8e20 61 6d 65 2d 62 75 66 66 65 72 0a 20 20 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 62 75 66 ame-buffer....(dired-sidebar-buf
8e40 66 65 72 2d 6e 61 6d 65 20 28 64 69 72 65 64 2d 63 75 72 72 65 6e 74 2d 64 69 72 65 63 74 6f 72 fer-name.(dired-current-director
8e60 79 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 75 70 64 61 y))))..(defun.dired-sidebar-upda
8e80 74 65 2d 73 74 61 74 65 20 28 62 75 66 66 65 72 20 26 6f 70 74 69 6f 6e 61 6c 20 66 29 0a 20 20 te-state.(buffer.&optional.f)...
8ea0 22 55 70 64 61 74 65 20 63 75 72 72 65 6e 74 20 73 74 61 74 65 20 77 69 74 68 20 42 55 46 46 45 "Update.current.state.with.BUFFE
8ec0 52 20 66 6f 72 20 73 69 64 65 62 61 72 20 69 6e 20 46 20 6f 72 20 73 65 6c 65 63 74 65 64 20 66 R.for.sidebar.in.F.or.selected.f
8ee0 72 61 6d 65 2e 22 0a 20 20 28 6c 65 74 20 28 28 66 72 61 6d 65 20 28 6f 72 20 66 20 28 73 65 6c rame."...(let.((frame.(or.f.(sel
8f00 65 63 74 65 64 2d 66 72 61 6d 65 29 29 29 29 0a 20 20 20 20 28 69 66 20 28 61 73 73 71 20 66 72 ected-frame)))).....(if.(assq.fr
8f20 61 6d 65 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 61 6c 69 73 74 29 0a 20 20 20 20 20 20 20 ame.dired-sidebar-alist)........
8f40 20 28 73 65 74 63 64 72 20 28 61 73 73 71 20 66 72 61 6d 65 20 64 69 72 65 64 2d 73 69 64 65 62 .(setcdr.(assq.frame.dired-sideb
8f60 61 72 2d 61 6c 69 73 74 29 20 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 28 70 75 73 68 20 60 28 ar-alist).buffer).......(push.`(
8f80 2c 66 72 61 6d 65 20 2e 20 2c 62 75 66 66 65 72 29 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d ,frame...,buffer).dired-sidebar-
8fa0 61 6c 69 73 74 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d alist))))..(defun.dired-sidebar-
8fc0 73 68 6f 77 69 6e 67 2d 73 69 64 65 62 61 72 2d 70 20 28 26 6f 70 74 69 6f 6e 61 6c 20 66 29 0a showing-sidebar-p.(&optional.f).
8fe0 20 20 22 57 68 65 74 68 65 72 20 46 20 6f 72 20 73 65 6c 65 63 74 65 64 20 66 72 61 6d 65 20 69 .."Whether.F.or.selected.frame.i
9000 73 20 73 68 6f 77 69 6e 67 20 61 20 73 69 64 65 62 61 72 2e 0a 0a 43 68 65 63 6b 20 69 66 20 46 s.showing.a.sidebar...Check.if.F
9020 20 6f 72 20 73 65 6c 65 63 74 65 64 20 66 72 61 6d 65 20 63 6f 6e 74 61 69 6e 73 20 61 20 73 69 .or.selected.frame.contains.a.si
9040 64 65 62 61 72 20 61 6e 64 20 72 65 74 75 72 6e 0a 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 62 debar.and.return.corresponding.b
9060 75 66 66 65 72 20 69 66 20 62 75 66 66 65 72 20 68 61 73 20 61 20 77 69 6e 64 6f 77 20 61 74 74 uffer.if.buffer.has.a.window.att
9080 61 63 68 65 64 20 74 6f 20 69 74 2e 0a 0a 52 65 74 75 72 6e 20 62 75 66 66 65 72 20 69 66 20 73 ached.to.it...Return.buffer.if.s
90a0 6f 2e 22 0a 20 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 77 68 65 6e 2d 6c 65 74 2a 20 28 o."...(dired-sidebar-when-let*.(
90c0 28 62 75 66 66 65 72 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 62 75 66 66 65 72 20 66 29 (buffer.(dired-sidebar-buffer.f)
90e0 29 29 0a 20 20 20 20 28 67 65 74 2d 62 75 66 66 65 72 2d 77 69 6e 64 6f 77 20 62 75 66 66 65 72 )).....(get-buffer-window.buffer
9100 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 62 75 66 66 65 72 )))..(defun.dired-sidebar-buffer
9120 20 28 26 6f 70 74 69 6f 6e 61 6c 20 66 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 63 75 72 .(&optional.f)..."Return.the.cur
9140 72 65 6e 74 20 73 69 64 65 62 61 72 20 62 75 66 66 65 72 20 69 6e 20 46 20 6f 72 20 73 65 6c 65 rent.sidebar.buffer.in.F.or.sele
9160 63 74 65 64 20 66 72 61 6d 65 2e 0a 0a 54 68 69 73 20 63 61 6e 20 72 65 74 75 72 6e 20 6e 69 6c cted.frame...This.can.return.nil
9180 20 69 66 20 74 68 65 20 62 75 66 66 65 72 20 68 61 73 20 62 65 65 6e 20 6b 69 6c 6c 65 64 2e 22 .if.the.buffer.has.been.killed."
91a0 0a 20 20 28 6c 65 74 2a 20 28 28 66 72 61 6d 65 20 28 6f 72 20 66 20 28 73 65 6c 65 63 74 65 64 ...(let*.((frame.(or.f.(selected
91c0 2d 66 72 61 6d 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 20 28 61 6c 69 73 -frame)))..........(buffer.(alis
91e0 74 2d 67 65 74 20 66 72 61 6d 65 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 61 6c 69 73 74 29 t-get.frame.dired-sidebar-alist)
9200 29 29 0a 20 20 20 20 3b 3b 20 54 68 65 20 62 75 66 66 65 72 20 63 61 6e 20 62 65 20 6b 69 6c 6c )).....;;.The.buffer.can.be.kill
9220 65 64 20 66 6f 72 20 61 20 76 61 72 69 65 74 79 20 6f 66 20 72 65 61 73 6f 6e 73 2e 0a 20 20 20 ed.for.a.variety.of.reasons.....
9240 20 3b 3b 20 54 68 69 73 20 73 69 64 65 20 65 66 66 65 63 74 20 69 73 20 6b 69 6e 64 20 6f 66 20 .;;.This.side.effect.is.kind.of.
9260 6d 65 73 73 79 20 62 75 74 20 69 74 27 73 20 74 68 65 20 73 69 6d 70 6c 65 73 74 20 70 6c 61 63 messy.but.it's.the.simplest.plac
9280 65 0a 20 20 20 20 3b 3b 20 74 6f 20 70 75 74 20 74 68 65 20 63 6c 65 61 6e 20 75 70 20 63 6f 64 e.....;;.to.put.the.clean.up.cod
92a0 65 20 66 6f 72 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 61 6c 69 73 74 27 2e 0a 20 20 20 e.for.`dired-sidebar-alist'.....
92c0 20 28 69 66 20 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 20 62 75 66 66 65 72 29 0a 20 20 20 20 .(if.(buffer-live-p.buffer).....
92e0 20 20 20 20 62 75 66 66 65 72 0a 20 20 20 20 20 20 3b 3b 20 68 74 74 70 73 3a 2f 2f 77 77 77 2e ....buffer.......;;.https://www.
9300 67 6e 75 2e 6f 72 67 2f 73 6f 66 74 77 61 72 65 2f 65 6d 61 63 73 2f 6d 61 6e 75 61 6c 2f 68 74 gnu.org/software/emacs/manual/ht
9320 6d 6c 5f 6e 6f 64 65 2f 65 6c 69 73 70 2f 41 73 73 6f 63 69 61 74 69 6f 6e 2d 4c 69 73 74 73 2e ml_node/elisp/Association-Lists.
9340 68 74 6d 6c 0a 20 20 20 20 20 20 3b 3b 20 44 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 66 6f 72 20 html.......;;.Documentation.for.
9360 60 61 73 73 71 2d 64 65 6c 65 74 65 2d 61 6c 6c 27 2e 0a 20 20 20 20 20 20 3b 3b 20 57 68 61 74 `assq-delete-all'........;;.What
9380 20 6b 69 6e 64 20 6f 66 20 41 50 49 20 69 73 20 74 68 69 73 3f 3f 20 3a 28 29 0a 20 20 20 20 20 .kind.of.API.is.this??.:()......
93a0 20 3b 3b 20 57 68 79 20 64 6f 65 73 20 69 74 20 6f 6e 6c 79 20 6d 6f 64 69 66 79 20 27 6f 66 74 .;;.Why.does.it.only.modify.'oft
93c0 65 6e 27 20 61 6e 64 20 6e 6f 74 20 27 61 6c 77 61 79 73 27 3f 20 c2 af 5c 5f 28 e3 83 84 29 5f en'.and.not.'always'?...\_(...)_
93e0 2f c2 af 0a 20 20 20 20 20 20 3b 3b 20 49 74 20 72 65 74 75 72 6e 73 20 74 68 65 20 73 68 6f 72 /.........;;.It.returns.the.shor
9400 74 65 6e 65 64 20 61 6c 69 73 74 2c 20 61 6e 64 20 6f 66 74 65 6e 20 6d 6f 64 69 66 69 65 73 20 tened.alist,.and.often.modifies.
9420 74 68 65 20 6f 72 69 67 69 6e 61 6c 20 6c 69 73 74 0a 20 20 20 20 20 20 3b 3b 20 73 74 72 75 63 the.original.list.......;;.struc
9440 74 75 72 65 20 6f 66 20 61 6c 69 73 74 2e 0a 20 20 20 20 20 20 3b 3b 20 46 6f 72 20 63 6f 72 72 ture.of.alist........;;.For.corr
9460 65 63 74 20 72 65 73 75 6c 74 73 2c 20 75 73 65 20 74 68 65 20 72 65 74 75 72 6e 20 76 61 6c 75 ect.results,.use.the.return.valu
9480 65 20 6f 66 20 61 73 73 71 2d 64 65 6c 65 74 65 2d 61 6c 6c 20 72 61 74 68 65 72 0a 20 20 20 20 e.of.assq-delete-all.rather.....
94a0 20 20 3b 3b 20 74 68 61 6e 20 6c 6f 6f 6b 69 6e 67 20 61 74 20 74 68 65 20 73 61 76 65 64 20 76 ..;;.than.looking.at.the.saved.v
94c0 61 6c 75 65 20 6f 66 20 61 6c 69 73 74 2e 0a 20 20 20 20 20 20 28 73 65 74 71 20 64 69 72 65 64 alue.of.alist........(setq.dired
94e0 2d 73 69 64 65 62 61 72 2d 61 6c 69 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 61 73 73 71 -sidebar-alist.............(assq
9500 2d 64 65 6c 65 74 65 2d 61 6c 6c 20 66 72 61 6d 65 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d -delete-all.frame.dired-sidebar-
9520 61 6c 69 73 74 29 29 0a 20 20 20 20 20 20 6e 69 6c 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 alist)).......nil)))..(defun.dir
9540 65 64 2d 73 69 64 65 62 61 72 2d 73 77 69 74 63 68 2d 74 6f 2d 64 69 72 20 28 64 69 72 29 0a 20 ed-sidebar-switch-to-dir.(dir)..
9560 20 22 55 70 64 61 74 65 20 62 75 66 66 65 72 20 77 69 74 68 20 44 49 52 20 61 73 20 72 6f 6f 74 ."Update.buffer.with.DIR.as.root
9580 2e 22 0a 20 20 28 77 68 65 6e 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 73 68 6f 77 69 6e ."...(when.(dired-sidebar-showin
95a0 67 2d 73 69 64 65 62 61 72 2d 70 29 0a 20 20 20 20 28 6c 65 74 20 28 28 62 75 66 66 65 72 20 28 g-sidebar-p).....(let.((buffer.(
95c0 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 67 65 74 2d 6f 72 2d 63 72 65 61 74 65 2d 62 75 66 66 dired-sidebar-get-or-create-buff
95e0 65 72 20 64 69 72 29 29 29 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 73 er.dir))).......(dired-sidebar-s
9600 68 6f 77 2d 73 69 64 65 62 61 72 20 62 75 66 66 65 72 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 how-sidebar.buffer))))..(defun.d
9620 69 72 65 64 2d 73 69 64 65 62 61 72 2d 62 75 66 66 65 72 2d 73 74 61 6c 65 2d 70 20 28 26 6f 70 ired-sidebar-buffer-stale-p.(&op
9640 74 69 6f 6e 61 6c 20 6e 6f 63 6f 6e 66 69 72 6d 29 0a 20 20 22 57 72 61 70 70 65 72 20 6f 76 65 tional.noconfirm)..."Wrapper.ove
9660 72 20 60 64 69 72 65 64 2d 62 75 66 66 65 72 2d 73 74 61 6c 65 2d 70 27 2e 0a 0a 43 68 65 63 6b r.`dired-buffer-stale-p'...Check
9680 20 69 66 20 62 75 66 66 65 72 20 69 73 20 73 74 61 6c 65 20 6f 6e 6c 79 20 69 66 20 60 64 69 72 .if.buffer.is.stale.only.if.`dir
96a0 65 64 2d 73 69 64 65 62 61 72 2d 73 74 61 6c 65 2d 62 75 66 66 65 72 2d 74 69 6d 65 2d 69 64 6c ed-sidebar-stale-buffer-time-idl
96c0 65 2d 64 65 6c 61 79 27 0a 0a 68 61 73 20 65 6c 61 70 73 65 64 2e 0a 0a 4f 70 74 69 6f 6e 61 6c e-delay'..has.elapsed...Optional
96e0 20 61 72 67 75 6d 65 6e 74 20 4e 4f 43 4f 4e 46 49 52 4d 20 50 61 73 73 20 4e 4f 43 4f 4e 46 49 .argument.NOCONFIRM.Pass.NOCONFI
9700 52 4d 20 6f 6e 20 74 6f 20 60 64 69 72 65 64 2d 62 75 66 66 65 72 2d 73 74 61 6c 65 2d 70 27 2e RM.on.to.`dired-buffer-stale-p'.
9720 22 0a 20 20 28 77 68 65 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 63 68 65 63 6b 2d 66 6f "...(when.dired-sidebar-check-fo
9740 72 2d 73 74 61 6c 65 2d 62 75 66 66 65 72 2d 70 0a 20 20 20 20 28 73 65 74 71 20 64 69 72 65 64 r-stale-buffer-p.....(setq.dired
9760 2d 73 69 64 65 62 61 72 2d 63 68 65 63 6b 2d 66 6f 72 2d 73 74 61 6c 65 2d 62 75 66 66 65 72 2d -sidebar-check-for-stale-buffer-
9780 70 20 6e 69 6c 29 0a 20 20 20 20 28 64 69 72 65 64 2d 62 75 66 66 65 72 2d 73 74 61 6c 65 2d 70 p.nil).....(dired-buffer-stale-p
97a0 20 6e 6f 63 6f 6e 66 69 72 6d 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 69 64 65 .noconfirm)))..(defun.dired-side
97c0 62 61 72 2d 72 65 66 72 65 73 68 2d 62 75 66 66 65 72 20 28 26 72 65 73 74 20 5f 29 0a 20 20 22 bar-refresh-buffer.(&rest._)..."
97e0 52 65 66 72 65 73 68 20 73 69 64 65 62 61 72 20 62 75 66 66 65 72 2e 22 0a 20 20 28 64 69 72 65 Refresh.sidebar.buffer."...(dire
9800 64 2d 73 69 64 65 62 61 72 2d 77 68 65 6e 2d 6c 65 74 2a 20 28 28 73 69 64 65 62 61 72 20 28 64 d-sidebar-when-let*.((sidebar.(d
9820 69 72 65 64 2d 73 69 64 65 62 61 72 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20 20 28 77 69 74 68 ired-sidebar-buffer))).....(with
9840 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 73 69 64 65 62 61 72 0a 20 20 20 20 20 20 28 6c -current-buffer.sidebar.......(l
9860 65 74 20 28 28 61 75 74 6f 2d 72 65 76 65 72 74 2d 76 65 72 62 6f 73 65 20 6e 69 6c 29 29 0a 20 et.((auto-revert-verbose.nil))..
9880 20 20 20 20 20 20 20 28 69 67 6e 6f 72 65 20 61 75 74 6f 2d 72 65 76 65 72 74 2d 76 65 72 62 6f .......(ignore.auto-revert-verbo
98a0 73 65 29 20 3b 3b 20 4d 61 6b 65 20 62 79 74 65 20 63 6f 6d 70 69 6c 65 72 20 68 61 70 70 79 2e se).;;.Make.byte.compiler.happy.
98c0 0a 20 20 20 20 20 20 20 20 28 72 65 76 65 72 74 2d 62 75 66 66 65 72 29 29 29 29 29 0a 0a 28 64 .........(revert-buffer)))))..(d
98e0 65 66 75 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 66 6f 6c 6c 6f 77 2d 66 69 6c 65 20 28 efun.dired-sidebar-follow-file.(
9900 26 72 65 73 74 20 5f 29 0a 20 20 22 46 6f 6c 6c 6f 77 20 6e 65 77 20 66 69 6c 65 2e 0a 0a 54 68 &rest._)..."Follow.new.file...Th
9920 65 20 72 6f 6f 74 20 6f 66 20 74 68 65 20 73 69 64 65 62 61 72 20 77 69 6c 6c 20 62 65 20 64 65 e.root.of.the.sidebar.will.be.de
9940 74 65 72 6d 69 6e 65 64 20 62 79 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 67 65 74 2d 64 termined.by.`dired-sidebar-get-d
9960 69 72 2d 74 6f 2d 73 68 6f 77 27 0a 61 6e 64 20 74 68 65 20 66 69 6c 65 20 66 6f 6c 6c 6f 77 65 ir-to-show'.and.the.file.followe
9980 64 20 69 73 20 77 69 6c 6c 20 62 65 20 64 65 74 65 72 6d 69 6e 65 64 20 62 79 20 60 64 69 72 65 d.is.will.be.determined.by.`dire
99a0 64 2d 73 69 64 65 62 61 72 2d 67 65 74 2d 66 69 6c 65 2d 74 6f 2d 73 68 6f 77 27 2c 0a 0a 62 6f d-sidebar-get-file-to-show',..bo
99c0 74 68 20 61 63 63 6f 75 6e 74 69 6e 67 20 66 6f 72 20 74 68 65 20 63 75 72 72 65 6e 74 6c 79 20 th.accounting.for.the.currently.
99e0 73 65 6c 65 63 74 65 64 20 77 69 6e 64 6f 77 2e 22 0a 20 20 28 77 68 65 6e 20 28 64 69 72 65 64 selected.window."...(when.(dired
9a00 2d 73 69 64 65 62 61 72 2d 73 68 6f 77 69 6e 67 2d 73 69 64 65 62 61 72 2d 70 29 0a 20 20 20 20 -sidebar-showing-sidebar-p).....
9a20 3b 3b 20 57 72 61 70 20 69 6e 20 60 77 69 74 68 2d 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 ;;.Wrap.in.`with-selected-window
9a40 27 20 62 65 63 61 75 73 65 20 77 65 20 64 6f 6e 27 74 20 77 61 6e 74 20 74 6f 20 70 6f 70 20 74 '.because.we.don't.want.to.pop.t
9a60 6f 0a 20 20 20 20 3b 3b 20 74 68 65 20 73 69 64 65 62 61 72 20 62 75 66 66 65 72 2e 0a 20 20 20 o.....;;.the.sidebar.buffer.....
9a80 20 3b 3b 20 57 65 20 61 6c 73 6f 20 6e 65 65 64 20 74 6f 20 70 69 63 6b 20 74 68 65 20 63 6f 72 .;;.We.also.need.to.pick.the.cor
9aa0 72 65 63 74 20 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 20 73 6f 20 74 68 61 74 0a 20 20 20 rect.selected-window.so.that....
9ac0 20 3b 3b 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 67 65 74 2d 64 69 72 2d 74 6f 2d 73 68 .;;.`dired-sidebar-get-dir-to-sh
9ae0 6f 77 27 20 63 61 6e 20 67 65 74 20 74 68 65 20 63 6f 72 72 65 63 74 20 72 6f 6f 74 20 74 6f 20 ow'.can.get.the.correct.root.to.
9b00 63 68 61 6e 67 65 20 74 6f 2e 0a 20 20 20 20 28 77 69 74 68 2d 73 65 6c 65 63 74 65 64 2d 77 69 change.to......(with-selected-wi
9b20 6e 64 6f 77 20 28 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 29 0a 20 20 20 20 20 20 28 6c 65 ndow.(selected-window).......(le
9b40 74 20 28 28 72 6f 6f 74 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 67 65 74 2d 64 69 72 2d t.((root.(dired-sidebar-get-dir-
9b60 74 6f 2d 73 68 6f 77 29 29 29 0a 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 to-show))).........(dired-sideba
9b80 72 2d 73 77 69 74 63 68 2d 74 6f 2d 64 69 72 20 72 6f 6f 74 29 0a 20 20 20 20 20 20 20 20 28 77 r-switch-to-dir.root).........(w
9ba0 68 65 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 66 6f 6c 6c 6f 77 2d 66 69 6c 65 2d 61 74 hen.dired-sidebar-follow-file-at
9bc0 2d 70 6f 69 6e 74 2d 6f 6e 2d 74 6f 67 67 6c 65 2d 6f 70 65 6e 0a 20 20 20 20 20 20 20 20 20 20 -point-on-toggle-open...........
9be0 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 77 68 65 6e 2d 6c 65 74 2a 20 28 28 66 69 6c 65 20 (dired-sidebar-when-let*.((file.
9c00 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 67 65 74 2d 66 69 6c 65 2d 74 6f 2d 73 68 6f 77 29 (dired-sidebar-get-file-to-show)
9c20 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 70 6f )).............(dired-sidebar-po
9c40 69 6e 74 2d 61 74 2d 66 69 6c 65 20 66 69 6c 65 20 72 6f 6f 74 29 29 29 29 29 29 29 0a 0a 28 64 int-at-file.file.root)))))))..(d
9c60 65 66 75 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 64 65 66 61 75 6c 74 2d 61 6c 74 65 72 efun.dired-sidebar-default-alter
9c80 6e 61 74 65 2d 73 65 6c 65 63 74 2d 77 69 6e 64 6f 77 20 28 29 0a 20 20 22 44 65 66 61 75 6c 74 nate-select-window.()..."Default
9ca0 20 66 75 6e 63 74 69 6f 6e 20 66 6f 72 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 61 6c 74 .function.for.`dired-sidebar-alt
9cc0 65 72 6e 61 74 65 2d 73 65 6c 65 63 74 2d 77 69 6e 64 6f 77 2d 66 75 6e 63 74 69 6f 6e 27 2e 22 ernate-select-window-function'."
9ce0 0a 20 20 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 61 77 2d 73 65 6c 65 63 74 29 0a 20 20 20 20 ...(if.(fboundp.'aw-select).....
9d00 20 20 28 61 77 2d 73 65 6c 65 63 74 20 22 53 65 6c 65 63 74 20 57 69 6e 64 6f 77 22 29 0a 20 20 ..(aw-select."Select.Window")...
9d20 20 20 28 6e 65 78 74 2d 77 69 6e 64 6f 77 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d ..(next-window)))..(defun.dired-
9d40 73 69 64 65 62 61 72 2d 67 65 74 2d 64 69 72 2d 74 6f 2d 73 68 6f 77 20 28 29 0a 20 20 22 52 65 sidebar-get-dir-to-show.()..."Re
9d60 74 75 72 6e 20 74 68 65 20 64 69 72 65 63 74 6f 72 79 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 turn.the.directory.`dired-sideba
9d80 72 27 20 73 68 6f 75 6c 64 20 6f 70 65 6e 20 74 6f 2e 22 0a 20 20 28 65 78 70 61 6e 64 2d 66 69 r'.should.open.to."...(expand-fi
9da0 6c 65 2d 6e 61 6d 65 0a 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 28 28 61 6e 64 20 28 64 65 72 69 le-name....(cond.....((and.(deri
9dc0 76 65 64 2d 6d 6f 64 65 2d 70 20 27 6d 61 67 69 74 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 ved-mode-p.'magit-mode).........
9de0 20 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 75 73 65 2d 6d 61 67 69 74 2d 69 6e 74 65 67 72 ..dired-sidebar-use-magit-integr
9e00 61 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 28 66 62 6f 75 6e 64 70 20 27 6d 61 67 69 74 2d ation...........(fboundp.'magit-
9e20 74 6f 70 6c 65 76 65 6c 29 29 0a 20 20 20 20 20 28 6d 61 67 69 74 2d 74 6f 70 6c 65 76 65 6c 29 toplevel))......(magit-toplevel)
9e40 29 0a 20 20 20 20 28 28 61 6e 64 20 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 74 65 72 6d ).....((and.(eq.major-mode.'term
9e60 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 75 -mode)...........dired-sidebar-u
9e80 73 65 2d 74 65 72 6d 2d 69 6e 74 65 67 72 61 74 69 6f 6e 29 0a 20 20 20 20 20 28 64 69 72 65 64 se-term-integration)......(dired
9ea0 2d 73 69 64 65 62 61 72 2d 74 65 72 6d 2d 67 65 74 2d 70 77 64 29 29 0a 20 20 20 20 28 28 61 6e -sidebar-term-get-pwd)).....((an
9ec0 64 20 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 64 69 72 65 64 2d 6d 6f 64 65 29 29 0a 20 d.(eq.major-mode.'dired-mode))..
9ee0 20 20 20 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 0a 20 20 20 20 28 28 61 6e 64 ....default-directory).....((and
9f00 20 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 69 62 75 66 66 65 72 2d 6d 6f 64 65 29 0a 20 .(eq.major-mode.'ibuffer-mode)..
9f20 20 20 20 20 20 20 20 20 20 28 66 62 6f 75 6e 64 70 20 27 69 62 75 66 66 65 72 2d 63 75 72 72 65 .........(fboundp.'ibuffer-curre
9f40 6e 74 2d 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 28 69 62 75 66 66 65 72 2d 63 75 nt-buffer)...........(ibuffer-cu
9f60 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 0a 20 20 20 20 20 28 6c 65 74 20 28 28 62 75 66 66 65 rrent-buffer))......(let.((buffe
9f80 72 2d 61 74 2d 70 6f 69 6e 74 20 28 69 62 75 66 66 65 72 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 r-at-point.(ibuffer-current-buff
9fa0 65 72 29 29 29 0a 20 20 20 20 20 20 20 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 69 62 75 66 66 er)))........(if.(fboundp.'ibuff
9fc0 65 72 2d 70 72 6f 6a 65 63 74 69 6c 65 2d 72 6f 6f 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 er-projectile-root)............(
9fe0 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 69 66 2d 6c 65 74 2a 20 28 28 69 62 75 66 66 65 72 2d dired-sidebar-if-let*.((ibuffer-
a000 70 72 6f 6a 65 63 74 69 6c 65 2d 72 6f 6f 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 projectile-root.................
a020 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 62 75 66 66 65 72 2d 70 72 6f ....................(ibuffer-pro
a040 6a 65 63 74 69 6c 65 2d 72 6f 6f 74 20 62 75 66 66 65 72 2d 61 74 2d 70 6f 69 6e 74 29 29 29 0a jectile-root.buffer-at-point))).
a060 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 64 72 20 69 62 75 66 66 65 72 2d 70 72 6f 6a ...............(cdr.ibuffer-proj
a080 65 63 74 69 6c 65 2d 72 6f 6f 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d ectile-root)..............(with-
a0a0 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 62 75 66 66 65 72 2d 61 74 2d 70 6f 69 6e 74 0a 20 current-buffer.buffer-at-point..
a0c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 ..............default-directory)
a0e0 29 0a 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 )..........(with-current-buffer.
a100 62 75 66 66 65 72 2d 61 74 2d 70 6f 69 6e 74 0a 20 20 20 20 20 20 20 20 20 20 20 64 65 66 61 75 buffer-at-point............defau
a120 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 29 29 29 0a 20 20 20 20 28 3a 64 65 66 61 75 6c 74 0a 20 lt-directory)))).....(:default..
a140 20 20 20 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 73 69 64 65 62 61 72 2d 72 6f 6f 74 29 ....(dired-sidebar-sidebar-root)
a160 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 67 65 74 2d 66 ))))..(defun.dired-sidebar-get-f
a180 69 6c 65 2d 74 6f 2d 73 68 6f 77 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 66 69 6c ile-to-show.()..."Return.the.fil
a1a0 65 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 27 20 73 68 6f 75 6c 64 20 6f 70 65 6e 20 74 6f e.`dired-sidebar'.should.open.to
a1c0 2e 0a 0a 54 68 69 73 20 6d 61 79 20 72 65 74 75 72 6e 20 6e 69 6c 20 69 66 20 74 68 65 72 65 27 ...This.may.return.nil.if.there'
a1e0 73 20 6e 6f 20 73 75 69 74 61 62 6c 65 20 66 69 6c 65 20 74 6f 20 73 68 6f 77 2e 22 0a 20 20 28 s.no.suitable.file.to.show."...(
a200 63 6f 6e 64 0a 20 20 20 28 28 61 6e 64 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 75 73 65 2d cond....((and.dired-sidebar-use-
a220 6d 61 67 69 74 2d 69 6e 74 65 67 72 61 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 28 64 65 72 69 magit-integration..........(deri
a240 76 65 64 2d 6d 6f 64 65 2d 70 20 27 6d 61 67 69 74 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 ved-mode-p.'magit-mode).........
a260 20 28 66 62 6f 75 6e 64 70 20 27 6d 61 67 69 74 2d 66 69 6c 65 2d 61 74 2d 70 6f 69 6e 74 29 0a .(fboundp.'magit-file-at-point).
a280 20 20 20 20 20 20 20 20 20 28 6d 61 67 69 74 2d 66 69 6c 65 2d 61 74 2d 70 6f 69 6e 74 29 29 0a .........(magit-file-at-point)).
a2a0 20 20 20 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 28 6d 61 67 69 74 2d 66 69 6c ....(expand-file-name.(magit-fil
a2c0 65 2d 61 74 2d 70 6f 69 6e 74 29 29 29 0a 20 20 20 28 28 61 6e 64 20 28 65 71 20 6d 61 6a 6f 72 e-at-point)))....((and.(eq.major
a2e0 2d 6d 6f 64 65 20 27 64 69 72 65 64 2d 6d 6f 64 65 29 29 0a 20 20 20 20 3b 3b 20 4e 6f 74 20 73 -mode.'dired-mode)).....;;.Not.s
a300 75 72 65 20 69 66 20 60 64 69 72 65 64 2d 67 65 74 2d 66 69 6c 65 6e 61 6d 65 27 20 69 73 20 6d ure.if.`dired-get-filename'.is.m
a320 6f 72 65 20 61 70 70 72 6f 70 72 69 61 74 65 2e 0a 20 20 20 20 28 63 6f 6e 64 69 74 69 6f 6e 2d ore.appropriate......(condition-
a340 63 61 73 65 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 67 65 74 2d 66 69 6c 65 case.nil.........(dired-get-file
a360 2d 66 6f 72 2d 76 69 73 69 74 29 0a 20 20 20 20 20 20 28 65 72 72 6f 72 20 6e 69 6c 29 29 29 0a -for-visit).......(error.nil))).
a380 20 20 20 28 28 61 6e 64 20 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 69 62 75 66 66 65 72 ...((and.(eq.major-mode.'ibuffer
a3a0 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 28 66 62 6f 75 6e 64 70 20 27 69 62 75 66 66 65 -mode)..........(fboundp.'ibuffe
a3c0 72 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 0a 20 20 20 20 28 6c 65 74 20 28 28 62 66 r-current-buffer)).....(let.((bf
a3e0 2d 6e 61 6d 65 20 28 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 28 69 62 75 66 66 65 72 -name.(buffer-file-name.(ibuffer
a400 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 29 0a 20 20 20 20 20 20 28 61 6e 64 20 62 -current-buffer)))).......(and.b
a420 66 2d 6e 61 6d 65 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 62 66 2d 6e 61 6d 65 29 20 62 f-name.(file-exists-p.bf-name).b
a440 66 2d 6e 61 6d 65 29 29 29 0a 20 20 20 28 3a 64 65 66 61 75 6c 74 0a 20 20 20 20 28 61 6e 64 20 f-name)))....(:default.....(and.
a460 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 buffer-file-name.(file-exists-p.
a480 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 29 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 buffer-file-name).buffer-file-na
a4a0 6d 65 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 74 65 72 me))))..(defun.dired-sidebar-ter
a4c0 6d 2d 67 65 74 2d 70 77 64 20 28 29 0a 20 20 22 47 65 74 20 63 75 72 72 65 6e 74 20 64 69 72 65 m-get-pwd.()..."Get.current.dire
a4e0 63 74 6f 72 79 20 6f 66 20 60 74 65 72 6d 2d 6d 6f 64 65 27 2e 0a 0a 54 68 69 73 20 69 73 20 73 ctory.of.`term-mode'...This.is.s
a500 6f 6d 65 77 68 61 74 20 65 78 70 65 72 69 6d 65 6e 74 61 6c 2f 68 61 63 6b 79 2e 22 0a 20 20 28 omewhat.experimental/hacky."...(
a520 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 63 6f 6e 64 69 74 69 6f 6e 2d 63 61 73 65 20 6e interactive)...(condition-case.n
a540 69 6c 0a 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 il.......(progn.........(forward
a560 2d 70 61 72 61 67 72 61 70 68 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 66 62 6f 75 6e -paragraph).........(when.(fboun
a580 64 70 20 27 74 65 72 6d 2d 70 72 65 76 69 6f 75 73 2d 70 72 6f 6d 70 74 29 0a 20 20 20 20 20 20 dp.'term-previous-prompt).......
a5a0 20 20 20 20 28 74 65 72 6d 2d 70 72 65 76 69 6f 75 73 2d 70 72 6f 6d 70 74 20 31 29 29 0a 20 20 ....(term-previous-prompt.1))...
a5c0 20 20 20 20 20 20 28 77 68 65 6e 20 28 66 62 6f 75 6e 64 70 20 27 74 65 72 6d 2d 73 69 6d 70 6c ......(when.(fboundp.'term-simpl
a5e0 65 2d 73 65 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20 28 74 65 72 6d 2d 73 69 6d 70 6c 65 2d 73 e-send)...........(term-simple-s
a600 65 6e 64 20 28 67 65 74 2d 62 75 66 66 65 72 2d 70 72 6f 63 65 73 73 20 28 63 75 72 72 65 6e 74 end.(get-buffer-process.(current
a620 2d 62 75 66 66 65 72 29 29 20 22 70 77 64 22 29 29 0a 20 20 20 20 20 20 20 20 28 73 6c 65 65 70 -buffer))."pwd")).........(sleep
a640 2d 66 6f 72 20 30 20 35 30 29 0a 20 20 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 -for.0.50).........(forward-line
a660 20 31 29 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 72 65 73 75 6c 74 20 28 73 74 72 69 6e .1).........(let.((result.(strin
a680 67 2d 74 72 69 6d 20 28 74 68 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 20 27 6c 69 6e 65 29 29 29 29 g-trim.(thing-at-point.'line))))
a6a0 0a 20 20 20 20 20 20 20 20 20 20 28 6b 69 6c 6c 2d 77 68 6f 6c 65 2d 6c 69 6e 65 29 0a 20 20 20 ...........(kill-whole-line)....
a6c0 20 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 2d 31 29 0a 20 20 20 20 20 20 20 .......(forward-line.-1)........
a6e0 20 20 20 28 6b 69 6c 6c 2d 77 68 6f 6c 65 2d 6c 69 6e 65 29 0a 20 20 20 20 20 20 20 20 20 20 72 ...(kill-whole-line)...........r
a700 65 73 75 6c 74 29 29 0a 20 20 20 20 28 65 72 72 6f 72 0a 20 20 20 20 20 64 65 66 61 75 6c 74 2d esult)).....(error......default-
a720 64 69 72 65 63 74 6f 72 79 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 69 64 65 62 directory)))..(defun.dired-sideb
a740 61 72 2d 73 75 62 74 72 65 65 2d 74 6f 67 67 6c 65 20 28 29 0a 20 20 22 57 72 61 70 70 65 72 20 ar-subtree-toggle.()..."Wrapper.
a760 6f 76 65 72 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 74 6f 67 67 6c 65 27 20 74 68 61 74 over.`dired-subtree-toggle'.that
a780 20 61 63 63 6f 75 6e 74 73 20 66 6f 72 20 60 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 2d 64 69 72 .accounts.for.`all-the-icons-dir
a7a0 65 64 27 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 64 69 72 65 64 2d 73 ed'."...(interactive)...(dired-s
a7c0 75 62 74 72 65 65 2d 74 6f 67 67 6c 65 29 0a 20 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d ubtree-toggle)...(dired-sidebar-
a7e0 72 65 64 69 73 70 6c 61 79 2d 69 63 6f 6e 73 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d redisplay-icons))..(defun.dired-
a800 73 69 64 65 62 61 72 2d 72 65 64 69 73 70 6c 61 79 2d 69 63 6f 6e 73 20 28 29 0a 20 20 22 52 65 sidebar-redisplay-icons.()..."Re
a820 64 69 73 70 6c 61 79 20 69 63 6f 6e 20 74 68 65 6d 65 73 20 75 6e 6c 65 73 73 20 6f 76 65 72 20 display.icon.themes.unless.over.
a840 54 52 41 4d 50 2e 22 0a 20 20 28 77 68 65 6e 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 63 TRAMP."...(when.(dired-sidebar-c
a860 61 6e 2d 64 69 73 70 6c 61 79 2d 69 63 6f 6e 73 29 0a 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 an-display-icons).....(when.(and
a880 20 28 65 71 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 74 68 65 6d 65 20 27 69 63 6f 6e 73 29 .(eq.dired-sidebar-theme.'icons)
a8a0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 62 6f 75 6e 64 70 20 27 61 6c 6c 2d 74 68 ................(fboundp.'all-th
a8c0 65 2d 69 63 6f 6e 73 2d 64 69 72 65 64 2d 2d 72 65 66 72 65 73 68 29 29 0a 20 20 20 20 20 20 3b e-icons-dired--refresh)).......;
a8e0 3b 20 52 65 66 72 65 73 68 20 60 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 2d 64 69 72 65 64 27 2e ;.Refresh.`all-the-icons-dired'.
a900 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 72 65 76 65 72 74 29 0a 20 20 .......(dired-sidebar-revert)...
a920 20 20 20 20 28 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 2d 64 69 72 65 64 2d 2d 72 65 66 72 65 73 ....(all-the-icons-dired--refres
a940 68 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 75 73 69 h)).....(when.(dired-sidebar-usi
a960 6e 67 2d 74 75 69 2d 70 29 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 74 ng-tui-p).......(dired-sidebar-t
a980 75 69 2d 75 70 64 61 74 65 2d 77 69 74 68 2d 64 65 6c 61 79 29 29 29 29 0a 0a 28 64 65 66 75 6e ui-update-with-delay))))..(defun
a9a0 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 61 64 76 69 63 65 2d 68 69 64 65 2d 74 65 6d 70 6f .dired-sidebar-advice-hide-tempo
a9c0 72 61 72 69 6c 79 20 28 66 20 26 72 65 73 74 20 61 72 67 73 29 0a 20 20 22 41 20 66 75 6e 63 74 rarily.(f.&rest.args)..."A.funct
a9e0 69 6f 6e 20 6d 65 61 6e 74 20 74 6f 20 62 65 20 75 73 65 64 20 77 69 74 68 20 61 64 76 69 63 65 ion.meant.to.be.used.with.advice
aa00 20 74 6f 20 74 65 6d 70 6f 72 61 72 69 6c 79 20 68 69 64 65 20 69 74 73 65 6c 66 2e 0a 0a 54 68 .to.temporarily.hide.itself...Th
aa20 69 73 20 66 75 6e 63 74 69 6f 6e 20 68 69 64 65 73 20 74 68 65 20 73 69 64 65 62 61 72 20 62 65 is.function.hides.the.sidebar.be
aa40 66 6f 72 65 20 65 78 65 63 75 74 69 6e 67 20 46 20 61 6e 64 20 74 68 65 6e 20 72 65 73 68 6f 77 fore.executing.F.and.then.reshow
aa60 73 20 69 74 73 65 6c 66 0a 61 66 74 65 72 2e 22 0a 20 20 28 69 66 20 28 6e 6f 74 20 28 64 69 72 s.itself.after."...(if.(not.(dir
aa80 65 64 2d 73 69 64 65 62 61 72 2d 73 68 6f 77 69 6e 67 2d 73 69 64 65 62 61 72 2d 70 29 29 0a 20 ed-sidebar-showing-sidebar-p))..
aaa0 20 20 20 20 20 28 61 70 70 6c 79 20 66 20 61 72 67 73 29 0a 20 20 20 20 28 6c 65 74 20 28 28 73 .....(apply.f.args).....(let.((s
aac0 69 64 65 62 61 72 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 62 75 66 66 65 72 29 29 29 0a idebar.(dired-sidebar-buffer))).
aae0 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 68 69 64 65 2d 73 69 64 65 62 61 ......(dired-sidebar-hide-sideba
ab00 72 29 0a 20 20 20 20 20 20 28 61 70 70 6c 79 20 66 20 61 72 67 73 29 0a 20 20 20 20 20 20 28 64 r).......(apply.f.args).......(d
ab20 69 72 65 64 2d 73 69 64 65 62 61 72 2d 73 68 6f 77 2d 73 69 64 65 62 61 72 20 73 69 64 65 62 61 ired-sidebar-show-sidebar.sideba
ab40 72 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 63 61 6e 2d r))))..(defun.dired-sidebar-can-
ab60 64 69 73 70 6c 61 79 2d 69 63 6f 6e 73 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 77 68 65 74 68 display-icons.()..."Return.wheth
ab80 65 72 20 6f 72 20 6e 6f 74 20 69 63 6f 6e 73 20 73 68 6f 75 6c 64 20 62 65 20 64 69 73 70 6c 61 er.or.not.icons.should.be.displa
aba0 79 65 64 2e 22 0a 20 20 28 61 6e 64 0a 20 20 20 28 6f 72 0a 20 20 20 20 64 69 72 65 64 2d 73 69 yed."...(and....(or.....dired-si
abc0 64 65 62 61 72 2d 64 69 73 70 6c 61 79 2d 72 65 6d 6f 74 65 2d 69 63 6f 6e 73 0a 20 20 20 20 28 debar-display-remote-icons.....(
abe0 6e 6f 74 20 28 66 69 6c 65 2d 72 65 6d 6f 74 65 2d 70 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 not.(file-remote-p.default-direc
ac00 74 6f 72 79 29 29 29 0a 20 20 20 28 63 6c 2d 65 76 65 72 79 20 28 6c 61 6d 62 64 61 20 28 6d 6f tory)))....(cl-every.(lambda.(mo
ac20 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 43 68 65 63 6b 20 61 67 61 69 de)................;;.Check.agai
ac40 6e 73 74 20 74 68 65 20 64 65 66 61 75 6c 74 20 76 61 6c 75 65 20 6f 66 20 60 64 69 72 65 64 2d nst.the.default.value.of.`dired-
ac60 6d 6f 64 65 2d 68 6f 6f 6b 27 20 68 65 72 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b mode-hook'.here................;
ac80 3b 20 73 69 6e 63 65 20 77 65 20 6d 61 64 65 20 69 74 20 62 75 66 66 65 72 20 6c 6f 63 61 6c 20 ;.since.we.made.it.buffer.local.
aca0 65 61 72 6c 69 65 72 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 6d 65 earlier.................(not.(me
acc0 6d 71 20 6d 6f 64 65 20 28 64 65 66 61 75 6c 74 2d 76 61 6c 75 65 20 27 64 69 72 65 64 2d 6d 6f mq.mode.(default-value.'dired-mo
ace0 64 65 2d 68 6f 6f 6b 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 65 64 2d 73 de-hook))))..............dired-s
ad00 69 64 65 62 61 72 2d 62 6c 6f 63 6b 2d 69 63 6f 6e 2d 64 69 73 70 6c 61 79 2d 6d 6f 64 65 73 29 idebar-block-icon-display-modes)
ad20 29 29 0a 0a 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b ))..;;;;;;;;;;;;;;;;;;;;;;;;;;;;
ad40 3b 20 54 65 78 74 20 55 73 65 72 20 49 6e 74 65 72 66 61 63 65 20 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b ;.Text.User.Interface.;;;;;;;;;;
ad60 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 0a 0a 28 64 65 66 76 61 72 2d 6c 6f ;;;;;;;;;;;;;;;;;;;;..(defvar-lo
ad80 63 61 6c 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 74 75 69 2d 64 69 72 65 64 2d 64 69 73 70 cal.dired-sidebar-tui-dired-disp
ada0 6c 61 79 65 64 20 6e 69 6c 0a 20 20 22 46 6c 61 67 73 20 77 68 65 74 68 65 72 20 69 63 6f 6e 73 layed.nil..."Flags.whether.icons
adc0 20 68 61 76 65 20 62 65 65 6e 20 61 64 64 65 64 2e 22 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 .have.been.added.")..(defun.dire
ade0 64 2d 73 69 64 65 62 61 72 2d 74 75 69 2d 64 69 72 65 64 2d 72 65 73 65 74 20 28 26 6f 70 74 69 d-sidebar-tui-dired-reset.(&opti
ae00 6f 6e 61 6c 20 5f 61 72 67 20 5f 6e 6f 63 6f 6e 66 69 72 6d 29 0a 20 20 22 46 75 6e 63 74 69 6f onal._arg._noconfirm)..."Functio
ae20 6e 20 75 73 65 64 20 61 73 20 61 64 76 69 63 65 20 77 68 65 6e 20 72 65 64 69 73 70 6c 61 79 69 n.used.as.advice.when.redisplayi
ae40 6e 67 20 62 75 66 66 65 72 2e 22 0a 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 64 69 72 65 64 2d ng.buffer."...(setq-local.dired-
ae60 73 69 64 65 62 61 72 2d 74 75 69 2d 64 69 72 65 64 2d 64 69 73 70 6c 61 79 65 64 20 6e 69 6c 29 sidebar-tui-dired-displayed.nil)
ae80 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 74 75 69 2d 64 69 72 65 )..(defun.dired-sidebar-tui-dire
aea0 64 2d 64 69 73 70 6c 61 79 20 28 29 0a 20 20 22 44 69 73 70 6c 61 79 20 74 68 65 20 69 63 6f 6e d-display.()..."Display.the.icon
aec0 73 20 6f 66 20 66 69 6c 65 73 20 69 6e 20 61 20 64 69 72 65 64 20 62 75 66 66 65 72 2e 22 0a 20 s.of.files.in.a.dired.buffer."..
aee0 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 77 68 65 6e 20 28 6f 72 20 74 20 28 61 6e .(interactive)...(when.(or.t.(an
af00 64 20 28 6e 6f 74 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 74 75 69 2d 64 69 72 65 64 2d 64 d.(not.dired-sidebar-tui-dired-d
af20 69 73 70 6c 61 79 65 64 29 20 64 69 72 65 64 2d 73 75 62 64 69 72 2d 61 6c 69 73 74 29 29 0a 20 isplayed).dired-subdir-alist))..
af40 20 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 74 75 69 ...(setq-local.dired-sidebar-tui
af60 2d 64 69 72 65 64 2d 64 69 73 70 6c 61 79 65 64 20 74 29 0a 20 20 20 20 28 6c 65 74 20 28 28 69 -dired-displayed.t).....(let.((i
af80 6e 68 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 20 20 28 63 nhibit-read-only.t)...........(c
afa0 6f 6c 6c 61 70 73 69 62 6c 65 2d 69 63 6f 6e 20 28 69 66 20 28 65 71 20 64 69 72 65 64 2d 73 69 ollapsible-icon.(if.(eq.dired-si
afc0 64 65 62 61 72 2d 74 68 65 6d 65 20 27 6e 65 72 64 29 20 22 e2 96 be 22 20 22 2d 22 29 29 0a 20 debar-theme.'nerd)."..."."-"))..
afe0 20 20 20 20 20 20 20 20 20 28 65 78 70 61 6e 64 61 62 6c 65 2d 69 63 6f 6e 20 28 69 66 20 28 65 .........(expandable-icon.(if.(e
b000 71 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 74 68 65 6d 65 20 27 6e 65 72 64 29 20 22 e2 96 q.dired-sidebar-theme.'nerd)."..
b020 b8 22 20 22 2b 22 29 29 29 0a 20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a ."."+"))).......(save-excursion.
b040 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a ........(goto-char.(point-min)).
b060 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 6e 6f 74 20 28 65 6f 62 70 29 29 0a 20 20 20 20 ........(while.(not.(eobp)).....
b080 20 20 20 20 20 20 28 77 68 65 6e 20 28 64 69 72 65 64 2d 6d 6f 76 65 2d 74 6f 2d 66 69 6c 65 6e ......(when.(dired-move-to-filen
b0a0 61 6d 65 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 6d 6f 76 65 ame.nil).............(dired-move
b0c0 2d 74 6f 2d 66 69 6c 65 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 -to-filename).............(let.(
b0e0 28 66 69 6c 65 20 28 64 69 72 65 64 2d 67 65 74 2d 66 69 6c 65 6e 61 6d 65 20 27 76 65 72 62 61 (file.(dired-get-filename.'verba
b100 74 69 6d 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 tim.t)))...............(unless.(
b120 6d 65 6d 62 65 72 20 66 69 6c 65 20 27 28 22 2e 22 20 22 2e 2e 22 29 29 0a 20 20 20 20 20 20 20 member.file.'(".".".."))........
b140 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 66 69 6c 65 6e 61 6d 65 20 28 64 69 72 65 64 2d .........(let.((filename.(dired-
b160 67 65 74 2d 66 69 6c 65 6e 61 6d 65 20 6e 69 6c 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 get-filename.nil.t)))...........
b180 20 20 20 20 20 20 20 20 28 69 66 20 28 65 71 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 74 68 ........(if.(eq.dired-sidebar-th
b1a0 65 6d 65 20 27 76 73 63 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 eme.'vscode)....................
b1c0 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ...(progn.......................
b1e0 20 20 28 72 65 71 75 69 72 65 20 27 76 73 63 6f 64 65 2d 69 63 6f 6e 29 0a 20 20 20 20 20 20 20 ..(require.'vscode-icon)........
b200 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 66 62 6f 75 6e 64 70 20 .................(when.(fboundp.
b220 27 76 73 63 6f 64 65 2d 69 63 6f 6e 2d 66 6f 72 2d 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 'vscode-icon-for-file)..........
b240 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 2d 69 6d 61 67 65 0a 20 .................(insert-image..
b260 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 76 73 63 6f 64 ..........................(vscod
b280 65 2d 69 63 6f 6e 2d 66 6f 72 2d 66 69 6c 65 20 66 69 6c 65 6e 61 6d 65 29 20 22 20 22 29 29 0a e-icon-for-file.filename).".")).
b2a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 ........................(insert.
b2c0 22 20 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 66 ".")).....................(if.(f
b2e0 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 66 69 6c 65 6e 61 6d 65 29 0a 20 20 20 20 20 20 ile-directory-p.filename).......
b300 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 64 69 72 65 64 2d 73 75 62 ..................(if.(dired-sub
b320 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 20 20 20 tree--is-expanded-p)............
b340 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 63 6f 6e 63 61 74 .................(insert.(concat
b360 20 63 6f 6c 6c 61 70 73 69 62 6c 65 2d 69 63 6f 6e 20 22 20 22 29 29 0a 20 20 20 20 20 20 20 20 .collapsible-icon.".")).........
b380 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 63 6f 6e 63 61 ..................(insert.(conca
b3a0 74 20 65 78 70 61 6e 64 61 62 6c 65 2d 69 63 6f 6e 20 22 20 22 29 29 29 0a 20 20 20 20 20 20 20 t.expandable-icon.".")))........
b3c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 69 66 20 28 65 71 20 64 ...............(insert.(if.(eq.d
b3e0 69 72 65 64 2d 73 69 64 65 62 61 72 2d 74 68 65 6d 65 20 27 6e 65 72 64 29 20 22 20 20 22 20 22 ired-sidebar-theme.'nerd).".."."
b400 22 29 29 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e "))))))))...........(forward-lin
b420 65 20 31 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d e.1))))))..(defun.dired-sidebar-
b440 74 75 69 2d 75 70 64 61 74 65 2d 77 69 74 68 2d 64 65 6c 61 79 20 28 26 72 65 73 74 20 5f 29 0a tui-update-with-delay.(&rest._).
b460 20 20 22 55 70 64 61 74 65 20 74 75 69 20 69 6e 74 65 72 66 61 63 65 20 61 66 74 65 72 20 61 20 .."Update.tui.interface.after.a.
b480 64 65 6c 61 79 2e 22 0a 20 20 28 72 75 6e 2d 77 69 74 68 2d 69 64 6c 65 2d 74 69 6d 65 72 0a 20 delay."...(run-with-idle-timer..
b4a0 20 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 74 75 69 2d 75 70 64 61 74 65 2d 64 65 6c 61 79 ..dired-sidebar-tui-update-delay
b4c0 20 6e 69 6c 0a 20 20 20 23 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 74 75 69 2d 75 70 64 61 .nil....#'dired-sidebar-tui-upda
b4e0 74 65 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 74 75 69 2d 75 te))..(defun.dired-sidebar-tui-u
b500 70 64 61 74 65 20 28 29 0a 20 20 22 57 6f 72 6b 68 6f 72 73 65 20 66 75 6e 63 74 69 6f 6e 20 74 pdate.()..."Workhorse.function.t
b520 6f 20 75 70 64 61 74 65 20 74 75 69 20 69 6e 74 65 72 66 61 63 65 2e 22 0a 20 20 28 64 69 72 65 o.update.tui.interface."...(dire
b540 64 2d 73 69 64 65 62 61 72 2d 77 68 65 6e 2d 6c 65 74 2a 20 28 28 62 75 66 66 65 72 20 28 64 69 d-sidebar-when-let*.((buffer.(di
b560 72 65 64 2d 73 69 64 65 62 61 72 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20 20 28 77 69 74 68 2d red-sidebar-buffer))).....(with-
b580 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 62 75 66 66 65 72 0a 20 20 20 20 20 20 28 64 69 72 current-buffer.buffer.......(dir
b5a0 65 64 2d 73 69 64 65 62 61 72 2d 72 65 76 65 72 74 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 64 ed-sidebar-revert).......(when.d
b5c0 69 72 65 64 2d 73 69 64 65 62 61 72 2d 72 65 63 65 6e 74 65 72 2d 63 75 72 73 6f 72 2d 6f 6e 2d ired-sidebar-recenter-cursor-on-
b5e0 74 75 69 2d 75 70 64 61 74 65 0a 20 20 20 20 20 20 20 20 28 72 65 63 65 6e 74 65 72 29 29 29 29 tui-update.........(recenter))))
b600 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 72 65 76 65 72 74 20 28 )..(defun.dired-sidebar-revert.(
b620 26 72 65 73 74 20 5f 29 0a 20 20 22 57 72 61 70 70 65 72 20 61 72 6f 75 6e 64 20 60 64 69 72 65 &rest._)..."Wrapper.around.`dire
b640 64 2d 72 65 76 65 72 74 27 20 62 75 74 20 73 61 76 65 73 20 77 69 6e 64 6f 77 20 70 6f 73 69 74 d-revert'.but.saves.window.posit
b660 69 6f 6e 2e 22 0a 20 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 77 68 65 6e 2d 6c 65 74 2a ion."...(dired-sidebar-when-let*
b680 20 28 28 77 69 6e 64 6f 77 20 28 67 65 74 2d 62 75 66 66 65 72 2d 77 69 6e 64 6f 77 0a 20 20 20 .((window.(get-buffer-window....
b6a0 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 ................................
b6c0 20 20 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 62 75 66 66 65 72 29 29 29 29 0a 20 20 20 20 ..(dired-sidebar-buffer)))).....
b6e0 28 77 69 74 68 2d 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 20 77 69 6e 64 6f 77 0a 20 20 20 (with-selected-window.window....
b700 20 20 20 28 6c 65 74 20 28 28 6f 6c 64 2d 77 69 6e 64 6f 77 2d 73 74 61 72 74 20 28 77 69 6e 64 ...(let.((old-window-start.(wind
b720 6f 77 2d 73 74 61 72 74 29 29 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 64 69 72 65 64 ow-start))).........(when.(dired
b740 2d 73 69 64 65 62 61 72 2d 75 73 69 6e 67 2d 74 75 69 2d 70 29 0a 20 20 20 20 20 20 20 20 20 20 -sidebar-using-tui-p)...........
b760 28 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 74 75 69 2d 72 65 73 65 74 2d 69 6e 2d 73 69 64 65 (dired-sidebar-tui-reset-in-side
b780 62 61 72 29 29 0a 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 72 65 76 65 72 74 29 0a 20 20 20 bar)).........(dired-revert)....
b7a0 20 20 20 20 20 28 73 65 74 2d 77 69 6e 64 6f 77 2d 73 74 61 72 74 20 77 69 6e 64 6f 77 20 6f 6c .....(set-window-start.window.ol
b7c0 64 2d 77 69 6e 64 6f 77 2d 73 74 61 72 74 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 d-window-start)))))..(defun.dire
b7e0 64 2d 73 69 64 65 62 61 72 2d 74 75 69 2d 72 65 73 65 74 2d 69 6e 2d 73 69 64 65 62 61 72 20 28 d-sidebar-tui-reset-in-sidebar.(
b800 26 72 65 73 74 20 5f 29 0a 20 20 22 52 75 6e 73 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d &rest._)..."Runs.`dired-sidebar-
b820 74 75 69 2d 64 69 72 65 64 2d 72 65 73 65 74 27 20 69 6e 20 63 75 72 72 65 6e 74 20 60 64 69 72 tui-dired-reset'.in.current.`dir
b840 65 64 2d 73 69 64 65 62 61 72 27 20 62 75 66 66 65 72 2e 22 0a 20 20 28 64 69 72 65 64 2d 73 69 ed-sidebar'.buffer."...(dired-si
b860 64 65 62 61 72 2d 77 68 65 6e 2d 6c 65 74 2a 20 28 28 62 75 66 66 65 72 20 28 64 69 72 65 64 2d debar-when-let*.((buffer.(dired-
b880 73 69 64 65 62 61 72 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 sidebar-buffer))).....(with-curr
b8a0 65 6e 74 2d 62 75 66 66 65 72 20 62 75 66 66 65 72 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 ent-buffer.buffer.......(dired-s
b8c0 69 64 65 62 61 72 2d 74 75 69 2d 64 69 72 65 64 2d 72 65 73 65 74 29 29 29 29 0a 0a 28 64 65 66 idebar-tui-dired-reset))))..(def
b8e0 75 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 73 65 74 75 70 2d 74 75 69 20 28 29 0a 20 20 un.dired-sidebar-setup-tui.()...
b900 22 53 65 74 73 20 75 70 20 74 65 78 74 20 75 73 65 72 20 69 6e 74 65 72 66 61 63 65 20 66 6f 72 "Sets.up.text.user.interface.for
b920 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 27 2e 0a 0a 54 68 69 73 20 69 73 20 75 73 65 64 20 .`dired-sidebar'...This.is.used.
b940 69 6e 20 70 6c 61 63 65 20 6f 66 20 60 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 27 20 74 6f 20 61 in.place.of.`all-the-icons'.to.a
b960 64 64 20 64 69 72 65 63 74 6f 72 79 20 69 6e 64 69 63 61 74 6f 72 73 2e 0a 0a 65 2e 67 2e 20 2b dd.directory.indicators...e.g..+
b980 20 61 6e 64 20 2d 2e 22 0a 20 20 28 61 64 64 2d 68 6f 6f 6b 20 27 64 69 72 65 64 2d 61 66 74 65 .and.-."...(add-hook.'dired-afte
b9a0 72 2d 72 65 61 64 69 6e 2d 68 6f 6f 6b 0a 20 20 20 20 20 20 20 20 20 20 20 20 27 64 69 72 65 64 r-readin-hook.............'dired
b9c0 2d 73 69 64 65 62 61 72 2d 74 75 69 2d 64 69 72 65 64 2d 64 69 73 70 6c 61 79 20 3a 61 70 70 65 -sidebar-tui-dired-display.:appe
b9e0 6e 64 20 3a 6c 6f 63 61 6c 29 0a 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 64 69 72 65 64 2d 73 nd.:local)...(setq-local.dired-s
ba00 75 62 74 72 65 65 2d 6c 69 6e 65 2d 70 72 65 66 69 78 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 ubtree-line-prefix.dired-sidebar
ba20 2d 73 75 62 74 72 65 65 2d 6c 69 6e 65 2d 70 72 65 66 69 78 29 0a 20 20 28 64 69 72 65 64 2d 62 -subtree-line-prefix)...(dired-b
ba40 75 69 6c 64 2d 73 75 62 64 69 72 2d 61 6c 69 73 74 29 0a 20 20 28 64 69 72 65 64 2d 73 69 64 65 uild-subdir-alist)...(dired-side
ba60 62 61 72 2d 72 65 76 65 72 74 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 69 64 65 62 bar-revert))..(defun.dired-sideb
ba80 61 72 2d 75 73 69 6e 67 2d 74 75 69 2d 70 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 74 20 69 66 ar-using-tui-p.()..."Return.t.if
baa0 20 60 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 74 68 65 6d 65 27 20 69 73 20 75 73 69 6e 67 20 .`dired-sidebar-theme'.is.using.
bac0 74 75 69 20 63 6f 64 65 20 70 61 74 68 2e 22 0a 20 20 28 6f 72 0a 20 20 20 28 65 71 20 64 69 72 tui.code.path."...(or....(eq.dir
bae0 65 64 2d 73 69 64 65 62 61 72 2d 74 68 65 6d 65 20 27 61 73 63 69 69 29 0a 20 20 20 28 65 71 20 ed-sidebar-theme.'ascii)....(eq.
bb00 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 74 68 65 6d 65 20 27 6e 65 72 64 29 0a 20 20 20 28 65 dired-sidebar-theme.'nerd)....(e
bb20 71 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 74 68 65 6d 65 20 27 76 73 63 6f 64 65 29 29 29 q.dired-sidebar-theme.'vscode)))
bb40 0a 0a 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 20 ..;;;;;;;;;;;;;;;;;;;;;;;;;;;;;.
bb60 54 65 78 74 20 55 73 65 72 20 49 6e 74 65 72 66 61 63 65 20 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b Text.User.Interface.;;;;;;;;;;;;
bb80 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 0a 0a 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b ;;;;;;;;;;;;;;;;;;..;;;;;;;;;;;;
bba0 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 20 60 77 64 69 72 65 64 27 20 48 61 63 6b 20 ;;;;;;;;;;;;;;;;;.`wdired'.Hack.
bbc0 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 0a 0a ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;..
bbe0 3b 3b 20 68 74 74 70 73 3a 2f 2f 64 65 62 62 75 67 73 2e 67 6e 75 2e 6f 72 67 2f 63 67 69 2f 62 ;;.https://debbugs.gnu.org/cgi/b
bc00 75 67 72 65 70 6f 72 74 2e 63 67 69 3f 62 75 67 3d 33 32 33 39 32 0a 0a 3b 3b 3b 3b 3b 3b 3b 3b ugreport.cgi?bug=32392..;;;;;;;;
bc20 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 20 60 77 64 69 72 65 64 27 20 48 ;;;;;;;;;;;;;;;;;;;;;.`wdired'.H
bc40 61 63 6b 20 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b ack.;;;;;;;;;;;;;;;;;;;;;;;;;;;;
bc60 3b 3b 0a 0a 28 64 65 66 76 61 72 2d 6c 6f 63 61 6c 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d ;;..(defvar-local.dired-sidebar-
bc80 77 64 69 72 65 64 2d 74 72 61 63 6b 69 6e 67 2d 6d 61 6a 6f 72 2d 6d 6f 64 65 20 6e 69 6c 0a 20 wdired-tracking-major-mode.nil..
bca0 20 22 54 72 61 63 6b 20 63 75 72 72 65 6e 74 20 60 6d 61 6a 6f 72 2d 6d 6f 64 65 27 20 77 68 65 ."Track.current.`major-mode'.whe
bcc0 6e 20 74 6f 67 67 6c 69 6e 67 20 74 6f 20 60 77 64 69 72 65 64 27 2e 22 29 0a 0a 28 64 65 66 75 n.toggling.to.`wdired'.")..(defu
bce0 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 77 64 69 72 65 64 2d 63 68 61 6e 67 65 2d 74 6f n.dired-sidebar-wdired-change-to
bd00 2d 64 69 72 65 64 2d 6d 6f 64 65 2d 61 64 76 69 63 65 20 28 66 20 26 72 65 73 74 20 61 72 67 73 -dired-mode-advice.(f.&rest.args
bd20 29 0a 20 20 22 41 64 76 69 63 65 20 66 6f 72 20 60 77 64 69 72 65 64 2d 63 68 61 6e 67 65 2d 74 )..."Advice.for.`wdired-change-t
bd40 6f 2d 64 69 72 65 64 2d 6d 6f 64 65 27 2e 22 0a 20 20 28 69 66 20 28 65 71 20 64 69 72 65 64 2d o-dired-mode'."...(if.(eq.dired-
bd60 73 69 64 65 62 61 72 2d 77 64 69 72 65 64 2d 74 72 61 63 6b 69 6e 67 2d 6d 61 6a 6f 72 2d 6d 6f sidebar-wdired-tracking-major-mo
bd80 64 65 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 28 64 de.'dired-sidebar-mode).......(d
bda0 69 72 65 64 2d 73 69 64 65 62 61 72 2d 77 64 69 72 65 64 2d 63 68 61 6e 67 65 2d 74 6f 2d 64 69 ired-sidebar-wdired-change-to-di
bdc0 72 65 64 2d 6d 6f 64 65 29 0a 20 20 20 20 28 61 70 70 6c 79 20 66 20 61 72 67 73 29 29 29 0a 0a red-mode).....(apply.f.args)))..
bde0 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 77 64 69 72 65 64 2d 63 68 61 6e (defun.dired-sidebar-wdired-chan
be00 67 65 2d 74 6f 2d 64 69 72 65 64 2d 6d 6f 64 65 20 28 29 0a 20 20 22 43 68 61 6e 67 65 20 74 68 ge-to-dired-mode.()..."Change.th
be20 65 20 6d 6f 64 65 20 62 61 63 6b 20 74 6f 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2e 0a 0a 54 e.mode.back.to.dired-sidebar...T
be40 68 69 73 20 69 73 20 61 6e 20 65 78 61 63 74 20 63 6f 70 79 20 6f 66 20 60 77 64 69 72 65 64 2d his.is.an.exact.copy.of.`wdired-
be60 63 68 61 6e 67 65 2d 74 6f 2d 64 69 72 65 64 2d 6d 6f 64 65 27 20 62 75 74 20 63 68 61 6e 67 65 change-to-dired-mode'.but.change
be80 73 20 74 68 65 0a 60 6d 61 6a 6f 72 2d 6d 6f 64 65 27 20 74 6f 20 60 64 69 72 65 64 2d 73 69 64 s.the.`major-mode'.to.`dired-sid
bea0 65 62 61 72 2d 6d 6f 64 65 27 20 69 6e 73 74 65 61 64 20 6f 66 20 60 64 69 72 65 64 2d 6d 6f 64 ebar-mode'.instead.of.`dired-mod
bec0 65 27 2e 22 0a 20 20 28 6c 65 74 20 28 28 69 6e 68 69 62 69 74 2d 72 65 61 64 2d 6f 6e 6c 79 20 e'."...(let.((inhibit-read-only.
bee0 74 29 29 0a 20 20 20 20 28 72 65 6d 6f 76 65 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 69 65 73 0a t)).....(remove-text-properties.
bf00 20 20 20 20 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 0a 20 20 20 .....(point-min).(point-max)....
bf20 20 20 27 28 66 72 6f 6e 74 2d 73 74 69 63 6b 79 20 6e 69 6c 20 72 65 61 72 2d 6e 6f 6e 73 74 69 ..'(front-sticky.nil.rear-nonsti
bf40 63 6b 79 20 6e 69 6c 20 72 65 61 64 2d 6f 6e 6c 79 20 6e 69 6c 20 6b 65 79 6d 61 70 20 6e 69 6c cky.nil.read-only.nil.keymap.nil
bf60 29 29 29 0a 20 20 28 75 73 65 2d 6c 6f 63 61 6c 2d 6d 61 70 20 64 69 72 65 64 2d 6d 6f 64 65 2d )))...(use-local-map.dired-mode-
bf80 6d 61 70 29 0a 20 20 28 66 6f 72 63 65 2d 6d 6f 64 65 2d 6c 69 6e 65 2d 75 70 64 61 74 65 29 0a map)...(force-mode-line-update).
bfa0 20 20 28 73 65 74 71 20 62 75 66 66 65 72 2d 72 65 61 64 2d 6f 6e 6c 79 20 74 29 0a 20 20 28 73 ..(setq.buffer-read-only.t)...(s
bfc0 65 74 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 6d 6f etq.major-mode.'dired-sidebar-mo
bfe0 64 65 29 0a 20 20 28 73 65 74 71 20 6d 6f 64 65 2d 6e 61 6d 65 20 22 44 69 72 65 64 2d 73 69 64 de)...(setq.mode-name."Dired-sid
c000 65 62 61 72 22 29 0a 20 20 28 64 69 72 65 64 2d 61 64 76 65 72 74 69 73 65 29 0a 20 20 28 72 65 ebar")...(dired-advertise)...(re
c020 6d 6f 76 65 2d 68 6f 6f 6b 20 27 6b 69 6c 6c 2d 62 75 66 66 65 72 2d 68 6f 6f 6b 20 27 77 64 69 move-hook.'kill-buffer-hook.'wdi
c040 72 65 64 2d 63 68 65 63 6b 2d 6b 69 6c 6c 2d 62 75 66 66 65 72 20 74 29 0a 20 20 28 73 65 74 20 red-check-kill-buffer.t)...(set.
c060 28 6d 61 6b 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 20 27 72 65 76 65 72 74 2d 62 75 66 (make-local-variable.'revert-buf
c080 66 65 72 2d 66 75 6e 63 74 69 6f 6e 29 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 72 65 76 fer-function).'dired-sidebar-rev
c0a0 65 72 74 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 77 64 69 72 ert))..(defun.dired-sidebar-wdir
c0c0 65 64 2d 63 68 61 6e 67 65 2d 74 6f 2d 77 64 69 72 65 64 2d 6d 6f 64 65 2d 61 64 76 69 63 65 20 ed-change-to-wdired-mode-advice.
c0e0 28 66 20 26 72 65 73 74 20 61 72 67 73 29 0a 20 20 22 46 6f 72 77 61 72 64 20 74 6f 20 60 77 64 (f.&rest.args)..."Forward.to.`wd
c100 69 72 65 64 2d 63 68 61 6e 67 65 2d 74 6f 2d 77 64 69 72 65 64 2d 6d 6f 64 65 27 2e 0a 0a 60 77 ired-change-to-wdired-mode'...`w
c120 64 69 72 65 64 27 20 65 78 70 65 63 74 65 64 20 74 68 65 20 60 6d 61 6a 6f 72 2d 6d 6f 64 65 27 dired'.expected.the.`major-mode'
c140 20 74 6f 20 62 65 20 60 64 69 72 65 64 2d 6d 6f 64 65 27 20 66 69 72 73 74 2e 0a 0a 54 72 61 63 .to.be.`dired-mode'.first...Trac
c160 6b 20 74 68 65 20 63 75 72 72 65 6e 74 20 60 6d 61 6a 6f 72 2d 6d 6f 64 65 27 20 61 6e 64 20 72 k.the.current.`major-mode'.and.r
c180 65 76 65 72 74 20 74 6f 20 74 68 61 74 20 75 70 6f 6e 20 65 78 69 74 69 6e 67 20 60 77 64 69 72 evert.to.that.upon.exiting.`wdir
c1a0 65 64 27 2e 22 0a 20 20 28 73 65 74 71 20 64 69 72 65 64 2d 73 69 64 65 62 61 72 2d 77 64 69 72 ed'."...(setq.dired-sidebar-wdir
c1c0 65 64 2d 74 72 61 63 6b 69 6e 67 2d 6d 61 6a 6f 72 2d 6d 6f 64 65 20 6d 61 6a 6f 72 2d 6d 6f 64 ed-tracking-major-mode.major-mod
c1e0 65 29 0a 20 20 28 69 66 20 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 64 69 72 65 64 2d 6d e)...(if.(eq.major-mode.'dired-m
c200 6f 64 65 29 0a 20 20 20 20 20 20 28 61 70 70 6c 79 20 66 20 61 72 67 73 29 0a 20 20 20 20 28 6c ode).......(apply.f.args).....(l
c220 65 74 20 28 28 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 64 69 72 65 64 2d 6d 6f 64 65 29 29 0a 20 20 et.((major-mode.'dired-mode))...
c240 20 20 20 20 28 61 70 70 6c 79 20 66 20 61 72 67 73 29 29 29 29 0a 0a 3b 3b 3b 3b 3b 3b 3b 3b 3b ....(apply.f.args))))..;;;;;;;;;
c260 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 20 60 77 64 69 72 65 64 27 20 48 61 ;;;;;;;;;;;;;;;;;;;;.`wdired'.Ha
c280 63 6b 20 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b ck.;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
c2a0 3b 0a 0a 28 70 72 6f 76 69 64 65 20 27 64 69 72 65 64 2d 73 69 64 65 62 61 72 29 0a 3b 3b 3b 20 ;..(provide.'dired-sidebar).;;;.
c2c0 64 69 72 65 64 2d 73 69 64 65 62 61 72 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 dired-sidebar.el.ends.here......
c2e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c300 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c320 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c3a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c3c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c3e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c400 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c420 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c440 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c460 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c480 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c4a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c4c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c4e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c500 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c520 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c540 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c560 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c580 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c5a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c5c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c5e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c600 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c620 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c660 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c680 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c6a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c6c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c6e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c700 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c720 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c7a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c7c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c7e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................