dirvish-20230519.1500.tar « localrepo - dotemacs.git

blob: 67b002649051ee3ca959f8de5319f7cb091e9a0d (plain)

ofs	hex dump	ascii
0000	64 69 72 76 69 73 68 2d 32 30 32 33 30 35 31 39 2e 31 35 30 30 2f 00 00 00 00 00 00 00 00 00 00	dirvish-20230519.1500/..........
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 32 34 35 34 00 20 35 00 00 00	0000000.00000000000.012454..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 76 69 73 68 2d 32 30 32 33 30 35 31 39 2e 31 35 30 30 2f 64 69 72 76 69 73 68 2d 63 6f	dirvish-20230519.1500/dirvish-co
0220	6c 6c 61 70 73 65 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	llapse.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 35 34 36 31 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 36 32 35 34 00 20 30 00 00 00	0005461.00000000000.016254..0...
02a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
02c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
02e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
0300	00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	.ustar...root...................
0320	00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	.........root...................
0340	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
0360	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
0380	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
03a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
03c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
03e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
0400	3b 3b 3b 20 64 69 72 76 69 73 68 2d 63 6f 6c 6c 61 70 73 65 2e 65 6c 20 2d 2d 2d 20 43 6f 6c 6c	;;;.dirvish-collapse.el.---.Coll
0420	61 70 73 65 20 75 6e 69 71 75 65 20 6e 65 73 74 65 64 20 70 61 74 68 73 20 2d 2a 2d 20 6c 65 78	apse.unique.nested.paths.-*-.lex
0440	69 63 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	ical-binding:.t.-*-..;;.Copyrigh
0460	74 20 28 43 29 20 32 30 32 31 2d 32 30 32 32 20 41 6c 65 78 20 4c 75 0a 3b 3b 20 41 75 74 68 6f	t.(C).2021-2022.Alex.Lu.;;.Autho
0480	72 20 3a 20 41 6c 65 78 20 4c 75 20 3c 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f	r.:.Alex.Lu.<https://github.com/
04a0	61 6c 65 78 6c 75 69 67 69 74 3e 0a 3b 3b 20 56 65 72 73 69 6f 6e 3a 20 32 2e 30 2e 35 33 0a 3b	alexluigit>.;;.Version:.2.0.53.;
04c0	3b 20 4b 65 79 77 6f 72 64 73 3a 20 66 69 6c 65 73 2c 20 63 6f 6e 76 65 6e 69 65 6e 63 65 0a 3b	;.Keywords:.files,.convenience.;
04e0	3b 20 48 6f 6d 65 70 61 67 65 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 61	;.Homepage:.https://github.com/a
0500	6c 65 78 6c 75 69 67 69 74 2f 64 69 72 76 69 73 68 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73	lexluigit/dirvish.;;.SPDX-Licens
0520	65 2d 49 64 65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 65 72 0a 0a	e-Identifier:.GPL-3.0-or-later..
0540	3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 20 50 72 6f 76 69 64 65 73 20 60 63 6f	;;;.Commentary:..;;.Provides.`co
0560	6c 6c 61 70 73 65 27 20 61 74 74 72 69 62 75 74 65 20 74 6f 20 72 65 76 65 61 6c 20 75 6e 69 71	llapse'.attribute.to.reveal.uniq
0580	75 65 20 6e 65 73 74 65 64 20 70 61 74 68 73 2e 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65	ue.nested.paths...;;;.Code:..(re
05a0	71 75 69 72 65 20 27 64 69 72 76 69 73 68 29 0a 0a 28 64 65 66 66 61 63 65 20 64 69 72 76 69 73	quire.'dirvish)..(defface.dirvis
05c0	68 2d 63 6f 6c 6c 61 70 73 65 2d 64 69 72 2d 66 61 63 65 0a 20 20 27 28 28 74 20 28 3a 69 6e 68	h-collapse-dir-face...'((t.(:inh
05e0	65 72 69 74 20 64 69 72 65 64 2d 64 69 72 65 63 74 6f 72 79 29 29 29 0a 20 20 22 46 61 63 65 20	erit.dired-directory)))..."Face.
0600	75 73 65 64 20 66 6f 72 20 64 69 72 65 63 74 6f 72 69 65 73 20 69 6e 20 60 63 6f 6c 6c 61 70 73	used.for.directories.in.`collaps
0620	65 27 20 61 74 74 72 69 62 75 74 65 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68	e'.attribute."...:group.'dirvish
0640	29 0a 0a 28 64 65 66 66 61 63 65 20 64 69 72 76 69 73 68 2d 63 6f 6c 6c 61 70 73 65 2d 65 6d 70	)..(defface.dirvish-collapse-emp
0660	74 79 2d 64 69 72 2d 66 61 63 65 0a 20 20 27 28 28 74 20 28 3a 69 6e 68 65 72 69 74 20 73 68 61	ty-dir-face...'((t.(:inherit.sha
0680	64 6f 77 29 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 65 6d 70 74 79 20 64 69	dow)))..."Face.used.for.empty.di
06a0	72 65 63 74 6f 72 69 65 73 20 69 6e 20 60 63 6f 6c 6c 61 70 73 65 27 20 61 74 74 72 69 62 75 74	rectories.in.`collapse'.attribut
06c0	65 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 29 0a 0a 28 64 65 66 66 61 63 65	e."...:group.'dirvish)..(defface
06e0	20 64 69 72 76 69 73 68 2d 63 6f 6c 6c 61 70 73 65 2d 66 69 6c 65 2d 66 61 63 65 0a 20 20 27 28	.dirvish-collapse-file-face...'(
0700	28 74 20 28 3a 69 6e 68 65 72 69 74 20 64 65 66 61 75 6c 74 29 29 29 0a 20 20 22 46 61 63 65 20	(t.(:inherit.default)))..."Face.
0720	75 73 65 64 20 66 6f 72 20 66 69 6c 65 73 20 69 6e 20 60 63 6f 6c 6c 61 70 73 65 27 20 61 74 74	used.for.files.in.`collapse'.att
0740	72 69 62 75 74 65 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 29 0a 0a 28 64 65	ribute."...:group.'dirvish)..(de
0760	66 75 6e 20 64 69 72 76 69 73 68 2d 63 6f 6c 6c 61 70 73 65 2d 2d 63 61 63 68 65 20 28 66 2d 6e	fun.dirvish-collapse--cache.(f-n
0780	61 6d 65 29 0a 20 20 22 43 61 63 68 65 20 63 6f 6c 6c 61 70 73 65 20 73 74 61 74 65 20 66 6f 72	ame)..."Cache.collapse.state.for
07a0	20 66 69 6c 65 20 46 2d 4e 41 4d 45 2e 22 0a 20 20 28 64 69 72 76 69 73 68 2d 61 74 74 72 69 62	.file.F-NAME."...(dirvish-attrib
07c0	75 74 65 2d 63 61 63 68 65 20 66 2d 6e 61 6d 65 20 3a 63 6f 6c 6c 61 70 73 65 0a 20 20 20 20 28	ute-cache.f-name.:collapse.....(
07e0	6c 65 74 20 28 28 70 61 74 68 20 66 2d 6e 61 6d 65 29 20 73 68 6f 75 6c 64 2d 63 6f 6c 6c 61 70	let.((path.f-name).should-collap
0800	73 65 20 66 69 6c 65 73 20 64 69 72 70 29 0a 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 61 6e 64	se.files.dirp).......(while.(and
0820	20 28 73 65 74 71 20 64 69 72 70 20 28 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 70 61	.(setq.dirp.(file-directory-p.pa
0840	74 68 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 66 69 6c	th))...................(setq.fil
0860	65 73 20 28 69 67 6e 6f 72 65 2d 65 72 72 6f 72 73 20 28 64 69 72 65 63 74 6f 72 79 2d 66 69 6c	es.(ignore-errors.(directory-fil
0880	65 73 20 70 61 74 68 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3d 20	es.path)))...................(=.
08a0	33 20 28 6c 65 6e 67 74 68 20 66 69 6c 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	3.(length.files))...............
08c0	20 20 20 20 3b 3b 20 44 6f 6e 27 74 20 63 6f 6c 6c 61 70 73 65 20 22 2e 22 20 61 6e 64 20 22 2e	....;;.Don't.collapse.".".and.".
08e0	2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 6f 72 20 28 73	."...................(not.(or.(s
0900	74 72 69 6e 67 2d 73 75 66 66 69 78 2d 70 20 22 2e 2e 22 20 70 61 74 68 29 0a 20 20 20 20 20 20	tring-suffix-p."..".path).......
0920	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 2d 73 75 66	.....................(string-suf
0940	66 69 78 2d 70 20 22 2f 2e 22 20 70 61 74 68 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 74	fix-p."/.".path)))).........(set
0960	71 20 73 68 6f 75 6c 64 2d 63 6f 6c 6c 61 70 73 65 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20	q.should-collapse.t.............
0980	20 20 70 61 74 68 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 0a 20 20 20 20 20 20 20	..path.(expand-file-name........
09a0	20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 72 20 28 72 65 6d 6f 76 65 20 22 2e 22 20 28 72	.............(car.(remove.".".(r
09c0	65 6d 6f 76 65 20 22 2e 2e 22 20 66 69 6c 65 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	emove."..".files))).............
09e0	20 20 20 20 20 20 20 20 70 61 74 68 29 29 29 0a 20 20 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20	........path))).......(cond.....
0a00	20 20 20 28 28 61 6e 64 20 28 65 71 20 28 6c 65 6e 67 74 68 20 66 69 6c 65 73 29 20 32 29 20 28	...((and.(eq.(length.files).2).(
0a20	6e 6f 74 20 73 68 6f 75 6c 64 2d 63 6f 6c 6c 61 70 73 65 29 29 20 28 63 6f 6e 73 20 27 65 6d 70	not.should-collapse)).(cons.'emp
0a40	74 79 20 74 29 29 0a 20 20 20 20 20 20 20 28 73 68 6f 75 6c 64 2d 63 6f 6c 6c 61 70 73 65 0a 20	ty.t))........(should-collapse..
0a60	20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 70 61 74 68 20 28 73 75 62 73 74 72 69 6e 67 20 70	.......(let*.((path.(substring.p
0a80	61 74 68 20 28 31 2b 20 28 6c 65 6e 67 74 68 20 66 2d 6e 61 6d 65 29 29 29 29 0a 20 20 20 20 20	ath.(1+.(length.f-name))))......
0aa0	20 20 20 20 20 20 20 20 20 20 28 73 65 67 73 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 70 61	..........(segs.(split-string.pa
0ac0	74 68 20 22 2f 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 68 65 61 64 20 28 66	th."/"))................(head.(f
0ae0	6f 72 6d 61 74 20 22 7c 25 73 7c 22 20 28 6d 61 70 63 6f 6e 63 61 74 20 23 27 63 6f 6e 63 61 74	ormat."\|%s\|".(mapconcat.#'concat
0b00	20 28 62 75 74 6c 61 73 74 20 73 65 67 73 29 20 22 7c 22 29 29 29 0a 20 20 20 20 20 20 20 20 20	.(butlast.segs)."\|")))..........
0b20	20 20 20 20 20 20 28 74 61 69 6c 20 28 63 61 72 20 28 6c 61 73 74 20 73 65 67 73 29 29 29 0a 20	......(tail.(car.(last.segs)))..
0b40	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 61 69 6c 2d 66 61 63 65 0a 20 20 20 20 20 20 20	..............(tail-face........
0b60	20 20 20 20 20 20 20 20 20 28 69 66 20 64 69 72 70 20 27 64 69 72 76 69 73 68 2d 63 6f 6c 6c 61	.........(if.dirp.'dirvish-colla
0b80	70 73 65 2d 64 69 72 2d 66 61 63 65 20 27 64 69 72 76 69 73 68 2d 63 6f 6c 6c 61 70 73 65 2d 66	pse-dir-face.'dirvish-collapse-f
0ba0	69 6c 65 2d 66 61 63 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 65 71 75 61	ile-face)))...........(and.(equa
0bc0	6c 20 68 65 61 64 20 22 7c 7c 22 29 20 28 73 65 74 71 20 68 65 61 64 20 22 7c 22 29 29 0a 20 20	l.head."\|\|").(setq.head."\|"))...
0be0	20 20 20 20 20 20 20 20 28 61 64 64 2d 66 61 63 65 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20	........(add-face-text-property.
0c00	30 20 28 6c 65 6e 67 74 68 20 68 65 61 64 29 20 27 64 69 72 76 69 73 68 2d 63 6f 6c 6c 61 70 73	0.(length.head).'dirvish-collaps
0c20	65 2d 64 69 72 2d 66 61 63 65 20 6e 69 6c 20 68 65 61 64 29 0a 20 20 20 20 20 20 20 20 20 20 28	e-dir-face.nil.head)...........(
0c40	61 64 64 2d 66 61 63 65 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 28 6c 65 6e 67 74 68	add-face-text-property.0.(length
0c60	20 74 61 69 6c 29 20 74 61 69 6c 2d 66 61 63 65 20 6e 69 6c 20 74 61 69 6c 29 0a 20 20 20 20 20	.tail).tail-face.nil.tail)......
0c80	20 20 20 20 20 28 63 6f 6e 73 20 68 65 61 64 20 74 61 69 6c 29 29 29 0a 20 20 20 20 20 20 20 28	.....(cons.head.tail)))........(
0ca0	74 20 28 63 6f 6e 73 20 6e 69 6c 20 6e 69 6c 29 29 29 29 29 29 0a 0a 28 64 69 72 76 69 73 68 2d	t.(cons.nil.nil))))))..(dirvish-
0cc0	64 65 66 69 6e 65 2d 61 74 74 72 69 62 75 74 65 20 63 6f 6c 6c 61 70 73 65 0a 20 20 22 43 6f 6c	define-attribute.collapse..."Col
0ce0	6c 61 70 73 65 20 75 6e 69 71 75 65 20 6e 65 73 74 65 64 20 70 61 74 68 73 2e 22 0a 20 20 3a 77	lapse.unique.nested.paths."...:w
0d00	68 65 6e 20 28 61 6e 64 20 28 6e 6f 74 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 66 64 2d	hen.(and.(not.(dirvish-prop.:fd-
0d20	61 72 67 6c 69 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 64 69 72	arglist))..............(not.(dir
0d40	76 69 73 68 2d 70 72 6f 70 20 3a 72 65 6d 6f 74 65 29 29 29 0a 20 20 28 77 68 65 6e 2d 6c 65 74	vish-prop.:remote)))...(when-let
0d60	2a 20 28 28 63 61 63 68 65 20 28 64 69 72 76 69 73 68 2d 63 6f 6c 6c 61 70 73 65 2d 2d 63 61 63	*.((cache.(dirvish-collapse--cac
0d80	68 65 20 66 2d 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 68 65 61 64 20	he.f-name))...............(head.
0da0	28 63 61 72 20 63 61 63 68 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 61 69 6c	(car.cache))...............(tail
0dc0	20 28 63 64 72 20 63 61 63 68 65 29 29 29 0a 20 20 20 20 28 69 66 20 28 65 71 20 68 65 61 64 20	.(cdr.cache))).....(if.(eq.head.
0de0	27 65 6d 70 74 79 29 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 6f 76 20 28 6d 61 6b 65 2d	'empty).........(let.((ov.(make-
0e00	6f 76 65 72 6c 61 79 20 66 2d 62 65 67 20 66 2d 65 6e 64 29 29 29 0a 20 20 20 20 20 20 20 20 20	overlay.f-beg.f-end)))..........
0e20	20 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 76 20 27 66 61 63 65 20 27 64 69 72 76 69 73 68 2d	.(overlay-put.ov.'face.'dirvish-
0e40	63 6f 6c 6c 61 70 73 65 2d 65 6d 70 74 79 2d 64 69 72 2d 66 61 63 65 29 0a 20 20 20 20 20 20 20	collapse-empty-dir-face)........
0e60	20 20 20 60 28 6f 76 20 2e 20 2c 6f 76 29 29 0a 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 73 74	...`(ov...,ov)).......(let*.((st
0e80	72 20 28 63 6f 6e 63 61 74 20 68 65 61 64 20 74 61 69 6c 29 29 29 0a 20 20 20 20 20 20 20 20 28	r.(concat.head.tail))).........(
0ea0	61 64 64 2d 66 61 63 65 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 28 6c 65 6e 67 74 68	add-face-text-property.0.(length
0ec0	20 73 74 72 29 20 68 6c 2d 66 61 63 65 20 6e 69 6c 20 73 74 72 29 0a 20 20 20 20 20 20 20 20 60	.str).hl-face.nil.str).........`
0ee0	28 6c 65 66 74 20 2e 20 2c 73 74 72 29 29 29 29 29 0a 0a 28 70 72 6f 76 69 64 65 20 27 64 69 72	(left...,str)))))..(provide.'dir
0f00	76 69 73 68 2d 63 6f 6c 6c 61 70 73 65 29 0a 3b 3b 3b 20 64 69 72 76 69 73 68 2d 63 6f 6c 6c 61	vish-collapse).;;;.dirvish-colla
0f20	70 73 65 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	pse.el.ends.here................
0f40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
0f60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
0f80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
0fa0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
0fc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
0fe0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1000	64 69 72 76 69 73 68 2d 32 30 32 33 30 35 31 39 2e 31 35 30 30 2f 64 69 72 76 69 73 68 2d 65 6d	dirvish-20230519.1500/dirvish-em
1020	65 72 67 65 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	erge.el.........................
1040	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1060	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
1080	30 30 35 37 34 37 36 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 37 33 33 00 20 30 00 00 00	0057476.00000000000.015733..0...
10a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
10c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
10e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1100	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...................
1120	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...................
1140	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1160	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1180	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
11a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
11c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
11e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1200	3b 3b 3b 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2e 65 6c 20 2d 2d 2d 20 50 69 6e 20 66 69	;;;.dirvish-emerge.el.---.Pin.fi
1220	6c 65 73 20 79 6f 75 20 61 72 65 20 69 6e 74 65 72 65 73 74 65 64 20 69 6e 20 61 74 20 74 6f 70	les.you.are.interested.in.at.top
1240	20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 20 74 20 2d 2a 2d 0a 0a 3b 3b 20	.--.lexical-binding:.t.--..;;.
1260	43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 32 31 2d 32 30 32 32 20 41 6c 65 78 20 4c 75 0a	Copyright.(C).2021-2022.Alex.Lu.
1280	3b 3b 20 41 75 74 68 6f 72 20 3a 20 41 6c 65 78 20 4c 75 20 3c 68 74 74 70 73 3a 2f 2f 67 69 74	;;.Author.:.Alex.Lu.<https://git
12a0	68 75 62 2e 63 6f 6d 2f 61 6c 65 78 6c 75 69 67 69 74 3e 0a 3b 3b 20 56 65 72 73 69 6f 6e 3a 20	hub.com/alexluigit>.;;.Version:.
12c0	32 2e 30 2e 35 33 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 66 69 6c 65 73 2c 20 63 6f 6e 76 65	2.0.53.;;.Keywords:.files,.conve
12e0	6e 69 65 6e 63 65 0a 3b 3b 20 48 6f 6d 65 70 61 67 65 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68	nience.;;.Homepage:.https://gith
1300	75 62 2e 63 6f 6d 2f 61 6c 65 78 6c 75 69 67 69 74 2f 64 69 72 76 69 73 68 0a 3b 3b 20 53 50 44	ub.com/alexluigit/dirvish.;;.SPD
1320	58 2d 4c 69 63 65 6e 73 65 2d 49 64 65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72	X-License-Identifier:.GPL-3.0-or
1340	2d 6c 61 74 65 72 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 20 54 68 69 73	-later..;;;.Commentary:..;;.This
1360	20 65 78 74 65 6e 73 69 6f 6e 20 61 6c 6c 6f 77 73 20 75 73 65 72 20 74 6f 20 70 69 6e 20 69 6d	.extension.allows.user.to.pin.im
1380	70 6f 72 74 61 6e 74 20 66 69 6c 65 73 20 61 74 20 74 68 65 20 74 6f 70 20 6f 66 20 44 69 72 76	portant.files.at.the.top.of.Dirv
13a0	69 73 68 0a 3b 3b 20 62 75 66 66 65 72 73 2e 20 20 54 79 70 65 20 4d 2d 78 20 64 69 72 76 69 73	ish.;;.buffers...Type.M-x.dirvis
13c0	68 2d 65 6d 65 72 67 65 2d 6d 65 6e 75 20 52 45 54 20 69 6e 74 6f 20 61 20 64 69 72 76 69 73 68	h-emerge-menu.RET.into.a.dirvish
13e0	20 62 75 66 66 65 72 20 74 6f 20 67 65 74 0a 3b 3b 20 73 74 61 72 74 65 64 2e 0a 0a 3b 3b 3b 20	.buffer.to.get.;;.started...;;;.
1400	43 6f 64 65 3a 0a 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 64 69 72 76 69 73 68	Code:..(declare-function.dirvish
1420	2d 65 6d 65 72 67 65 2d 2d 6d 65 6e 75 20 22 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 22 29 0a	-emerge--menu."dirvish-emerge").
1440	28 72 65 71 75 69 72 65 20 27 64 69 72 76 69 73 68 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69	(require.'dirvish)..(defun.dirvi
1460	73 68 2d 65 6d 65 72 67 65 2d 73 61 66 65 2d 67 72 6f 75 70 73 2d 70 20 28 67 72 6f 75 70 73 29	sh-emerge-safe-groups-p.(groups)
1480	0a 20 20 22 52 65 74 75 72 6e 20 74 20 69 66 20 47 52 4f 55 50 53 20 69 73 20 61 20 6c 69 73 74	..."Return.t.if.GROUPS.is.a.list
14a0	20 61 6e 64 20 68 61 73 20 6c 65 73 73 20 74 68 61 6e 20 31 30 30 20 69 74 65 6d 73 2e 22 0a 20	.and.has.less.than.100.items."..
14c0	20 28 61 6e 64 20 28 6c 69 73 74 70 20 67 72 6f 75 70 73 29 20 28 3c 20 28 6c 65 6e 67 74 68 20	.(and.(listp.groups).(<.(length.
14e0	67 72 6f 75 70 73 29 20 31 30 30 29 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69	groups).100)))..(defcustom.dirvi
1500	73 68 2d 65 6d 65 72 67 65 2d 67 72 6f 75 70 73 20 27 28 29 0a 20 20 22 44 65 66 61 75 6c 74 20	sh-emerge-groups.'()..."Default.
1520	65 6d 65 72 67 65 20 67 72 6f 75 70 73 20 61 70 70 6c 69 65 64 20 74 6f 20 61 6c 6c 20 44 69 72	emerge.groups.applied.to.all.Dir
1540	76 69 73 68 20 62 75 66 66 65 72 2e 0a 54 68 65 20 76 61 6c 75 65 20 69 73 20 61 6e 20 61 6c 69	vish.buffer..The.value.is.an.ali
1560	73 74 20 6f 66 20 28 4e 41 4d 45 20 2e 20 28 54 59 50 45 20 2e 20 56 41 4c 55 45 29 29 20 77 68	st.of.(NAME...(TYPE...VALUE)).wh
1580	65 72 65 20 4e 41 4d 45 20 69 73 20 61 0a 73 74 72 69 6e 67 20 74 6f 20 64 65 73 69 67 6e 61 74	ere.NAME.is.a.string.to.designat
15a0	65 20 74 68 65 20 6e 61 6d 65 20 61 6e 64 20 64 69 73 70 6c 61 79 20 74 69 74 6c 65 20 6f 66 20	e.the.name.and.display.title.of.
15c0	74 68 65 20 67 72 6f 75 70 2c 20 54 59 50 45 0a 69 73 20 61 20 73 79 6d 62 6f 6c 20 69 6e 20 6f	the.group,.TYPE.is.a.symbol.in.o
15e0	6e 65 20 6f 66 20 60 70 72 65 64 69 63 61 74 65 27 2c 20 60 65 78 74 65 6e 73 69 6f 6e 73 27 2c	ne.of.`predicate',.`extensions',
1600	20 6f 72 20 60 72 65 67 65 78 27 2e 20 20 54 68 65 0a 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20	.or.`regex'...The.corresponding.
1620	56 41 4c 55 45 73 20 28 63 72 69 74 65 72 69 61 29 20 66 6f 72 20 74 68 65 73 65 20 74 79 70 65	VALUEs.(criteria).for.these.type
1640	73 20 61 72 65 3a 0a 0a 2d 20 60 70 72 65 64 69 63 61 74 65 27 3a 20 61 20 73 79 6d 62 6f 6c 20	s.are:..-.`predicate':.a.symbol.
1660	74 68 61 74 20 70 6f 69 6e 74 73 20 74 6f 20 61 20 70 72 65 64 69 63 61 74 65 0a 2d 20 60 65 78	that.points.to.a.predicate.-.`ex
1680	74 65 6e 73 69 6f 6e 73 27 3a 20 6f 6e 65 20 6f 72 20 6d 6f 72 65 20 66 69 6c 65 6e 61 6d 65 20	tensions':.one.or.more.filename.
16a0	65 78 74 65 6e 73 69 6f 6e 73 0a 2d 20 60 72 65 67 65 78 27 3a 20 61 20 72 65 67 75 6c 61 72 20	extensions.-.`regex':.a.regular.
16c0	65 78 70 72 65 73 73 69 6f 6e 0a 0a 54 68 65 20 70 72 65 64 69 63 61 74 65 73 20 61 72 65 20 64	expression..The.predicates.are.d
16e0	65 66 69 6e 65 64 20 62 79 20 60 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 64 65 66 69 6e 65	efined.by.`dirvish-emerge-define
1700	2d 70 72 65 64 69 63 61 74 65 27 2e 0a 0a 48 65 72 65 20 69 73 20 61 20 73 61 6d 70 6c 65 20 76	-predicate'...Here.is.a.sample.v
1720	61 6c 75 65 20 66 6f 72 20 74 68 69 73 20 76 61 72 69 61 62 6c 65 2e 0a 0a 5c 28 28 5c 22 52 65	alue.for.this.variable...\((\"Re
1740	63 65 6e 74 5c 22 20 28 70 72 65 64 69 63 61 74 65 20 2e 20 60 72 65 63 65 6e 74 2d 66 69 6c 65	cent\".(predicate...`recent-file
1760	73 2d 32 68 27 29 29 0a 20 28 5c 22 52 45 41 44 4d 45 5c 22 20 28 72 65 67 65 78 20 2e 20 5c 22	s-2h'))..(\"README\".(regex...\"
1780	52 45 41 44 4d 45 5c 22 29 29 0a 20 28 5c 22 50 44 46 5c 22 20 20 20 20 28 65 78 74 65 6e 73 69	README\"))..(\"PDF\"....(extensi
17a0	6f 6e 73 20 5c 22 70 64 66 5c 22 29 29 0a 20 28 5c 22 4c 61 54 65 58 5c 22 20 20 28 65 78 74 65	ons.\"pdf\"))..(\"LaTeX\"..(exte
17c0	6e 73 69 6f 6e 73 20 5c 22 74 65 78 5c 22 20 5c 22 62 69 62 5c 22 29 29 29 0a 0a 57 68 65 6e 20	nsions.\"tex\".\"bib\")))..When.
17e0	60 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 6d 6f 64 65 27 20 69 73 20 65 6e 61 62 6c 65 64	`dirvish-emerge-mode'.is.enabled
1800	20 69 6e 20 74 68 65 20 62 75 66 66 65 72 2c 20 74 68 65 20 66 69 6c 65 73 65 74 0a 69 6e 20 74	.in.the.buffer,.the.fileset.in.t
1820	68 65 20 62 75 66 66 65 72 20 61 72 65 20 73 65 70 61 72 61 74 65 64 20 61 6e 64 20 72 65 61 72	he.buffer.are.separated.and.rear
1840	72 61 6e 67 65 64 20 62 79 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 67 72 6f 75 70 73 3a 0a	ranged.by.the.following.groups:.
1860	0a 31 2e 20 66 69 6c 65 73 20 6d 6f 64 69 66 69 65 64 20 77 69 74 68 69 6e 20 32 20 68 6f 75 72	.1..files.modified.within.2.hour
1880	73 0a 32 2e 20 66 69 6c 65 73 20 77 68 6f 73 65 20 6e 61 6d 65 20 63 61 6e 20 62 65 20 6d 61 74	s.2..files.whose.name.can.be.mat
18a0	63 68 65 64 20 62 79 20 5c 22 52 45 41 44 4d 45 5c 22 0a 33 2e 20 66 69 6c 65 73 20 77 68 6f 73	ched.by.\"README\".3..files.whos
18c0	65 20 65 78 74 65 6e 73 69 6f 6e 20 69 73 20 5c 22 70 64 66 5c 22 0a 34 2e 20 66 69 6c 65 73 20	e.extension.is.\"pdf\".4..files.
18e0	77 68 6f 73 65 20 65 78 74 65 6e 73 69 6f 6e 20 69 73 20 5c 22 74 65 78 5c 22 20 6f 72 20 5c 22	whose.extension.is.\"tex\".or.\"
1900	62 69 62 5c 22 0a 35 2e 20 6f 74 68 65 72 20 66 69 6c 65 73 0a 0a 41 6c 74 68 6f 75 67 68 74 20	bib\".5..other.files..Althought.
1920	79 6f 75 20 63 61 6e 20 73 65 74 20 74 68 69 73 20 76 61 72 69 61 62 6c 65 20 67 6c 6f 62 61 6c	you.can.set.this.variable.global
1940	6c 79 2c 20 61 20 6d 6f 72 65 20 61 70 70 72 6f 70 72 69 61 74 65 0a 77 61 79 20 77 6f 75 6c 64	ly,.a.more.appropriate.way.would
1960	20 62 65 20 73 65 74 20 69 74 20 64 69 72 65 63 74 6f 72 79 20 6c 6f 63 61 6c 6c 79 2e 20 20 49	.be.set.it.directory.locally...I
1980	6e 20 74 68 61 74 20 63 61 73 65 2c 20 69 74 20 69 73 0a 72 65 63 6f 6d 6d 65 6e 64 65 64 20 74	n.that.case,.it.is.recommended.t
19a0	6f 20 63 6f 6d 70 6f 73 65 20 61 6e 64 20 73 61 76 65 20 74 68 69 73 20 76 61 72 69 61 62 6c 65	o.compose.and.save.this.variable
19c0	20 74 6f 20 2e 64 69 72 2d 6c 6f 63 61 6c 73 2e 65 6c 0a 62 79 20 74 68 65 20 68 65 6c 70 20 6f	.to..dir-locals.el.by.the.help.o
19e0	66 20 60 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 6d 65 6e 75 27 2e 22 0a 20 20 3a 67 72 6f	f.`dirvish-emerge-menu'."...:gro
1a00	75 70 20 27 64 69 72 76 69 73 68 20 3a 74 79 70 65 20 27 61 6c 69 73 74 29 0a 28 70 75 74 20 27	up.'dirvish.:type.'alist).(put.'
1a20	64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 67 72 6f 75 70 73 20 27 73 61 66 65 2d 6c 6f 63 61	dirvish-emerge-groups.'safe-loca
1a40	6c 2d 76 61 72 69 61 62 6c 65 20 23 27 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 73 61 66 65	l-variable.#'dirvish-emerge-safe
1a60	2d 67 72 6f 75 70 73 2d 70 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 65	-groups-p)..(defcustom.dirvish-e
1a80	6d 65 72 67 65 2d 6d 61 78 2d 66 69 6c 65 2d 63 6f 75 6e 74 20 32 30 30 30 30 0a 20 20 22 49 6e	merge-max-file-count.20000..."In
1aa0	68 69 62 69 74 20 61 75 74 6f 20 67 72 6f 75 70 69 6e 67 20 69 6e 20 62 69 67 20 64 69 72 65 63	hibit.auto.grouping.in.big.direc
1ac0	74 6f 72 69 65 73 2e 0a 49 66 20 66 69 6c 65 20 63 6f 75 6e 74 20 6f 66 20 74 68 65 20 64 69 72	tories..If.file.count.of.the.dir
1ae0	65 63 74 6f 72 79 20 69 73 20 67 72 65 61 74 65 72 20 74 68 61 6e 20 74 68 69 73 20 76 61 6c 75	ectory.is.greater.than.this.valu
1b00	65 2c 0a 61 75 74 6f 6d 61 74 69 63 20 67 72 6f 75 70 69 6e 67 20 69 73 20 64 69 73 61 62 6c 65	e,.automatic.grouping.is.disable
1b20	64 20 65 76 65 6e 20 69 66 20 60 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 6d 6f 64 65 27 20	d.even.if.`dirvish-emerge-mode'.
1b40	69 73 0a 74 75 72 6e 65 64 20 6f 6e 20 69 6e 20 74 68 65 20 62 75 66 66 65 72 2e 22 0a 20 20 3a	is.turned.on.in.the.buffer."...:
1b60	67 72 6f 75 70 20 27 64 69 72 76 69 73 68 20 3a 74 79 70 65 20 27 69 6e 74 65 67 65 72 29 0a 0a	group.'dirvish.:type.'integer)..
1b80	28 64 65 66 66 61 63 65 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 67 72 6f 75 70 2d 74 69	(defface.dirvish-emerge-group-ti
1ba0	74 6c 65 0a 20 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 64 69 72 65 64 2d 69 67 6e 6f 72 65	tle...'((t.:inherit.dired-ignore
1bc0	64 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 65 6d 65 72 67 65 20 67 72 6f 75	d))..."Face.used.for.emerge.grou
1be0	70 20 74 69 74 6c 65 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 29 0a 0a 28 64	p.title."...:group.'dirvish)..(d
1c00	65 66 63 6c 61 73 73 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 67 72 6f 75 70 20 28 74 72	efclass.dirvish-emerge-group.(tr
1c20	61 6e 73 69 65 6e 74 2d 69 6e 66 69 78 29 0a 20 20 28 28 68 69 64 65 20 20 20 20 20 3a 69 6e 69	ansient-infix)...((hide.....:ini
1c40	74 61 72 67 20 3a 68 69 64 65 29 0a 20 20 20 28 73 65 6c 65 63 74 65 64 20 3a 69 6e 69 74 61 72	targ.:hide)....(selected.:initar
1c60	67 20 3a 73 65 6c 65 63 74 65 64 29 0a 20 20 20 28 72 65 63 69 70 65 20 20 20 3a 69 6e 69 74 61	g.:selected)....(recipe...:inita
1c80	72 67 20 3a 72 65 63 69 70 65 29 29 0a 20 20 22 5b 45 78 70 65 72 69 6d 65 6e 74 61 6c 5d 20 43	rg.:recipe))..."[Experimental].C
1ca0	6c 61 73 73 20 66 6f 72 20 44 69 72 76 69 73 68 20 65 6d 65 72 67 65 20 67 72 6f 75 70 73 2e 22	lass.for.Dirvish.emerge.groups."
1cc0	29 0a 0a 28 64 65 66 76 61 72 2d 6c 6f 63 61 6c 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d	)..(defvar-local.dirvish-emerge-
1ce0	2d 67 72 6f 75 70 2d 6f 76 65 72 6c 61 79 73 20 6e 69 6c 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74	-group-overlays.nil)..(cl-defmet
1d00	68 6f 64 20 74 72 61 6e 73 69 65 6e 74 2d 66 6f 72 6d 61 74 2d 6b 65 79 20 28 28 6f 62 6a 20 64	hod.transient-format-key.((obj.d
1d20	69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 67 72 6f 75 70 29 29 0a 20 20 22 46 6f 72 6d 61 74 20	irvish-emerge-group))..."Format.
1d40	6b 65 79 20 66 6f 72 20 4f 42 4a 2e 22 0a 20 20 28 6c 65 74 20 28 28 6b 65 79 20 28 6f 72 65 66	key.for.OBJ."...(let.((key.(oref
1d60	20 6f 62 6a 20 6b 65 79 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 6c 20 28 6f 72 65 66 20 6f 62	.obj.key)).........(sel.(oref.ob
1d80	6a 20 73 65 6c 65 63 74 65 64 29 29 29 0a 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 6b 65	j.selected))).....(propertize.ke
1da0	79 20 27 66 61 63 65 20 28 69 66 20 73 65 6c 20 27 74 72 61 6e 73 69 65 6e 74 2d 76 61 6c 75 65	y.'face.(if.sel.'transient-value
1dc0	20 27 74 72 61 6e 73 69 65 6e 74 2d 6b 65 79 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68	.'transient-key))))..(cl-defmeth
1de0	6f 64 20 74 72 61 6e 73 69 65 6e 74 2d 66 6f 72 6d 61 74 2d 64 65 73 63 72 69 70 74 69 6f 6e 20	od.transient-format-description.
1e00	28 28 6f 62 6a 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 67 72 6f 75 70 29 29 0a 20 20 22	((obj.dirvish-emerge-group))..."
1e20	46 6f 72 6d 61 74 20 64 65 73 63 72 69 70 74 69 6f 6e 20 66 6f 72 20 4f 42 4a 2e 22 0a 20 20 28	Format.description.for.OBJ."...(
1e40	6c 65 74 20 28 28 64 65 73 63 20 28 6f 72 65 66 20 6f 62 6a 20 64 65 73 63 72 69 70 74 69 6f 6e	let.((desc.(oref.obj.description
1e60	29 29 0a 20 20 20 20 20 20 20 20 28 73 65 6c 20 28 6f 72 65 66 20 6f 62 6a 20 73 65 6c 65 63 74	)).........(sel.(oref.obj.select
1e80	65 64 29 29 29 0a 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 64 65 73 63 20 27 66 61 63 65	ed))).....(propertize.desc.'face
1ea0	20 28 61 6e 64 20 73 65 6c 20 27 74 72 61 6e 73 69 65 6e 74 2d 76 61 6c 75 65 29 29 29 29 0a 0a	.(and.sel.'transient-value))))..
1ec0	28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 74 72 61 6e 73 69 65 6e 74 2d 66 6f 72 6d 61 74 2d 76	(cl-defmethod.transient-format-v
1ee0	61 6c 75 65 20 28 28 6f 62 6a 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 67 72 6f 75 70 29	alue.((obj.dirvish-emerge-group)
1f00	29 0a 20 20 22 46 6f 72 6d 61 74 20 76 61 6c 75 65 20 66 6f 72 20 4f 42 4a 2e 22 0a 20 20 28 70	)..."Format.value.for.OBJ."...(p
1f20	63 61 73 65 2d 6c 65 74 2a 20 28 28 60 28 2c 74 79 70 65 20 2e 20 2c 76 61 6c 29 20 28 6f 72 65	case-let*.((`(,type...,val).(ore
1f40	66 20 6f 62 6a 20 72 65 63 69 70 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66	f.obj.recipe))................(f
1f60	61 63 65 20 28 69 66 20 28 6f 72 65 66 20 6f 62 6a 20 68 69 64 65 29 20 27 66 6f 6e 74 2d 6c 6f	ace.(if.(oref.obj.hide).'font-lo
1f80	63 6b 2d 63 6f 6d 6d 65 6e 74 2d 66 61 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ck-comment-face.................
1fa0	20 20 20 20 20 20 20 27 74 72 61 6e 73 69 65 6e 74 2d 61 72 67 75 6d 65 6e 74 29 29 29 0a 20 20	.......'transient-argument)))...
1fc0	20 20 28 70 63 61 73 65 20 74 79 70 65 0a 20 20 20 20 20 20 28 27 72 65 67 65 78 20 28 70 72 6f	..(pcase.type.......('regex.(pro
1fe0	70 65 72 74 69 7a 65 20 28 66 6f 72 6d 61 74 20 22 5c 22 25 73 5c 22 22 20 76 61 6c 29 20 27 66	pertize.(format."\"%s\"".val).'f
2000	61 63 65 20 66 61 63 65 29 29 0a 20 20 20 20 20 20 28 27 65 78 74 65 6e 73 69 6f 6e 73 20 28 70	ace.face)).......('extensions.(p
2020	72 6f 70 65 72 74 69 7a 65 20 28 66 6f 72 6d 61 74 20 22 25 73 22 20 28 6d 61 70 63 6f 6e 63 61	ropertize.(format."%s".(mapconca
2040	74 20 23 27 63 6f 6e 63 61 74 20 76 61 6c 20 22 2c 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20	t.#'concat.val.","))............
2060	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 66 61 63 65 29 29	....................'face.face))
2080	0a 20 20 20 20 20 20 28 27 70 72 65 64 69 63 61 74 65 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22	.......('predicate.(propertize."
20a0	50 52 45 44 22 20 27 66 61 63 65 20 66 61 63 65 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65	PRED".'face.face)))))..(cl-defme
20c0	74 68 6f 64 20 74 72 61 6e 73 69 65 6e 74 2d 69 6e 66 69 78 2d 72 65 61 64 20 28 28 6f 62 6a 20	thod.transient-infix-read.((obj.
20e0	64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 67 72 6f 75 70 29 29 0a 20 20 22 52 65 61 64 20 76	dirvish-emerge-group))..."Read.v
2100	61 6c 75 65 20 66 72 6f 6d 20 4f 42 4a 2e 22 0a 20 20 28 6f 73 65 74 20 6f 62 6a 20 76 61 6c 75	alue.from.OBJ."...(oset.obj.valu
2120	65 20 28 6c 69 73 74 20 28 6f 72 65 66 20 6f 62 6a 20 64 65 73 63 72 69 70 74 69 6f 6e 29 20 28	e.(list.(oref.obj.description).(
2140	6f 72 65 66 20 6f 62 6a 20 72 65 63 69 70 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	oref.obj.recipe)................
2160	20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 6f 62 6a 20 68 69 64 65 29 20 28 6f 72 65 66 20 6f	.........(oref.obj.hide).(oref.o
2180	62 6a 20 73 65 6c 65 63 74 65 64 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 74	bj.selected))))..(cl-defmethod.t
21a0	72 61 6e 73 69 65 6e 74 2d 69 6e 66 69 78 2d 73 65 74 20 28 28 6f 62 6a 20 64 69 72 76 69 73 68	ransient-infix-set.((obj.dirvish
21c0	2d 65 6d 65 72 67 65 2d 67 72 6f 75 70 29 20 5f 76 61 6c 75 65 29 0a 20 20 22 53 65 74 20 76 61	-emerge-group)._value)..."Set.va
21e0	6c 75 65 20 66 6f 72 20 4f 42 4a 2e 22 0a 20 20 28 69 66 2d 6c 65 74 20 28 28 73 65 6c 20 28 6f	lue.for.OBJ."...(if-let.((sel.(o
2200	72 65 66 20 6f 62 6a 20 73 65 6c 65 63 74 65 64 29 29 29 0a 20 20 20 20 20 20 28 64 69 72 76 69	ref.obj.selected))).......(dirvi
2220	73 68 2d 65 6d 65 72 67 65 2d 72 65 61 64 2d 72 65 63 69 70 65 20 28 6f 72 65 66 20 6f 62 6a 20	sh-emerge-read-recipe.(oref.obj.
2240	72 65 63 69 70 65 29 20 6f 62 6a 29 0a 20 20 20 20 28 6f 73 65 74 20 6f 62 6a 20 73 65 6c 65 63	recipe).obj).....(oset.obj.selec
2260	74 65 64 20 74 29 29 29 0a 0a 28 64 65 66 76 61 72 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65	ted.t)))..(defvar.dirvish-emerge
2280	2d 2d 6d 61 78 2d 70 72 65 64 2d 6e 61 6d 65 2d 6c 65 6e 20 30 29 0a 28 64 65 66 76 61 72 20 64	--max-pred-name-len.0).(defvar.d
22a0	69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 61 76 61 69 6c 61 62 6c 65 2d 70 72 65 64 73 20 27	irvish-emerge--available-preds.'
22c0	28 29 29 0a 0a 28 64 65 66 6d 61 63 72 6f 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 64 65	())..(defmacro.dirvish-emerge-de
22e0	66 69 6e 65 2d 70 72 65 64 69 63 61 74 65 20 28 6e 61 6d 65 20 64 6f 63 73 74 72 69 6e 67 20 26	fine-predicate.(name.docstring.&
2300	72 65 73 74 20 62 6f 64 79 29 0a 20 20 22 44 65 66 69 6e 65 20 61 20 67 72 6f 75 70 20 70 72 65	rest.body)..."Define.a.group.pre
2320	64 69 63 61 74 65 20 4e 41 4d 45 20 77 69 74 68 20 42 4f 44 59 2e 0a 44 4f 43 53 54 52 49 4e 47	dicate.NAME.with.BODY..DOCSTRING
2340	20 69 73 20 74 68 65 20 64 6f 63 75 6d 65 6e 74 69 6f 6e 20 6f 66 20 74 68 65 20 70 72 65 64 69	.is.the.documention.of.the.predi
2360	63 61 74 65 2e 0a 54 68 65 20 70 72 65 64 69 63 61 74 65 20 74 61 6b 65 73 20 74 68 65 20 66 6f	cate..The.predicate.takes.the.fo
2380	6c 6c 6f 77 69 6e 67 20 61 72 67 75 6d 65 6e 74 73 3a 0a 0a 2d 20 60 6c 6f 63 61 6c 2d 6e 61 6d	llowing.arguments:..-.`local-nam
23a0	65 27 3a 20 6f 75 74 70 75 74 20 66 72 6f 6d 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69	e':.output.from.(file-name-nondi
23c0	72 65 63 74 6f 72 79 20 46 49 4c 45 29 0a 2d 20 60 66 75 6c 6c 2d 6e 61 6d 65 27 3a 20 6f 75 74	rectory.FILE).-.`full-name':.out
23e0	70 75 74 20 66 72 6f 6d 20 28 64 69 72 65 64 2d 67 65 74 2d 66 69 6c 65 6e 61 6d 65 29 0a 2d 20	put.from.(dired-get-filename).-.
2400	60 74 79 70 65 27 3a 20 61 20 63 6f 6e 73 20 6f 66 20 28 54 59 50 45 20 2e 20 53 59 4d 2d 54 41	`type':.a.cons.of.(TYPE...SYM-TA
2420	52 47 45 54 29 2e 20 20 54 59 50 45 20 69 73 20 65 69 74 68 65 72 20 60 64 69 72 27 20 6f 72 0a	RGET)...TYPE.is.either.`dir'.or.
2440	20 20 60 66 69 6c 65 27 2e 20 20 53 59 4d 2d 54 41 52 47 45 54 20 69 73 20 74 68 65 20 73 79 6d	..`file'...SYM-TARGET.is.the.sym
2460	6c 69 6e 6b 20 74 61 72 67 65 74 20 61 73 20 61 20 73 74 72 69 6e 67 20 77 68 65 6e 20 74 68 65	link.target.as.a.string.when.the
2480	0a 20 20 66 69 6c 65 20 69 73 20 61 20 73 79 6d 6c 69 6e 6b 2c 20 6f 74 68 65 72 77 69 73 65 20	...file.is.a.symlink,.otherwise.
24a0	6e 69 6c 2e 0a 2d 20 60 61 74 74 72 73 27 3a 20 6f 75 74 70 75 74 20 66 72 6f 6d 20 28 66 69 6c	nil..-.`attrs':.output.from.(fil
24c0	65 2d 61 74 74 72 69 62 75 74 65 73 20 46 49 4c 45 29 0a 0a 54 68 65 20 70 72 65 64 69 63 61 74	e-attributes.FILE)..The.predicat
24e0	65 20 69 73 20 63 6f 6e 73 75 6d 65 64 20 62 79 20 60 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65	e.is.consumed.by.`dirvish-emerge
2500	2d 67 72 6f 75 70 73 27 2e 22 0a 20 20 28 64 65 63 6c 61 72 65 20 28 69 6e 64 65 6e 74 20 64 65	-groups'."...(declare.(indent.de
2520	66 75 6e 29 20 28 64 6f 63 2d 73 74 72 69 6e 67 20 32 29 29 0a 20 20 60 28 6c 65 74 2a 20 28 28	fun).(doc-string.2))...`(let*.((
2540	66 6e 20 28 6c 61 6d 62 64 61 20 28 6c 6f 63 61 6c 2d 6e 61 6d 65 20 66 75 6c 6c 2d 6e 61 6d 65	fn.(lambda.(local-name.full-name
2560	20 74 79 70 65 20 61 74 74 72 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 67	.type.attrs).................(ig
2580	6e 6f 72 65 20 6c 6f 63 61 6c 2d 6e 61 6d 65 20 66 75 6c 6c 2d 6e 61 6d 65 20 74 79 70 65 20 61	nore.local-name.full-name.type.a
25a0	74 74 72 73 29 20 2c 40 62 6f 64 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 61 69 72 20 28	ttrs).,@body))...........(pair.(
25c0	61 73 73 71 20 27 2c 6e 61 6d 65 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 61 76 61 69	assq.',name.dirvish-emerge--avai
25e0	6c 61 62 6c 65 2d 70 72 65 64 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 76 61 6c 20 28 63 6f	lable-preds))...........(val.(co
2600	6e 73 20 27 2c 6e 61 6d 65 20 28 63 6f 6e 73 20 66 6e 20 2c 64 6f 63 73 74 72 69 6e 67 29 29 29	ns.',name.(cons.fn.,docstring)))
2620	29 0a 20 20 20 20 20 28 73 65 74 66 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 6d 61 78	)......(setf.dirvish-emerge--max
2640	2d 70 72 65 64 2d 6e 61 6d 65 2d 6c 65 6e 0a 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 78 20 64	-pred-name-len............(max.d
2660	69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 6d 61 78 2d 70 72 65 64 2d 6e 61 6d 65 2d 6c 65 6e	irvish-emerge--max-pred-name-len
2680	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 6e 67 74 68 20 28 66 6f 72 6d 61 74	.................(length.(format
26a0	20 22 25 73 22 20 27 2c 6e 61 6d 65 29 29 29 29 0a 20 20 20 20 20 28 69 66 20 70 61 69 72 0a 20	."%s".',name))))......(if.pair..
26c0	20 20 20 20 20 20 20 20 28 73 65 74 63 64 72 20 28 61 73 73 71 20 27 2c 6e 61 6d 65 20 64 69 72	........(setcdr.(assq.',name.dir
26e0	76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 61 76 61 69 6c 61 62 6c 65 2d 70 72 65 64 73 29 20 76 61	vish-emerge--available-preds).va
2700	6c 29 0a 20 20 20 20 20 20 20 28 70 75 73 68 20 76 61 6c 20 64 69 72 76 69 73 68 2d 65 6d 65 72	l)........(push.val.dirvish-emer
2720	67 65 2d 2d 61 76 61 69 6c 61 62 6c 65 2d 70 72 65 64 73 29 29 29 29 0a 0a 28 64 69 72 76 69 73	ge--available-preds))))..(dirvis
2740	68 2d 65 6d 65 72 67 65 2d 64 65 66 69 6e 65 2d 70 72 65 64 69 63 61 74 65 20 72 65 63 65 6e 74	h-emerge-define-predicate.recent
2760	2d 66 69 6c 65 73 2d 32 68 0a 20 20 22 46 69 6c 65 20 6d 6f 64 69 66 69 65 64 20 77 69 74 68 69	-files-2h..."File.modified.withi
2780	6e 20 32 20 68 6f 75 72 73 2e 22 0a 20 20 28 6c 65 74 20 28 28 6d 74 69 6d 65 20 28 66 69 6c 65	n.2.hours."...(let.((mtime.(file
27a0	2d 61 74 74 72 69 62 75 74 65 2d 6d 6f 64 69 66 69 63 61 74 69 6f 6e 2d 74 69 6d 65 20 61 74 74	-attribute-modification-time.att
27c0	72 73 29 29 29 0a 20 20 20 20 28 61 6e 64 20 28 6c 69 73 74 70 20 6d 74 69 6d 65 29 0a 20 20 20	rs))).....(and.(listp.mtime)....
27e0	20 20 20 20 20 20 28 3c 20 28 66 6c 6f 61 74 2d 74 69 6d 65 20 28 74 69 6d 65 2d 73 75 62 74 72	......(<.(float-time.(time-subtr
2800	61 63 74 20 28 63 75 72 72 65 6e 74 2d 74 69 6d 65 29 20 6d 74 69 6d 65 29 29 20 37 32 30 30 29	act.(current-time).mtime)).7200)
2820	29 29 29 0a 0a 28 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 64 65 66 69 6e 65 2d 70 72 65 64	)))..(dirvish-emerge-define-pred
2840	69 63 61 74 65 20 72 65 63 65 6e 74 2d 66 69 6c 65 73 2d 74 6f 64 61 79 0a 20 20 22 46 69 6c 65	icate.recent-files-today..."File
2860	20 6d 6f 64 69 66 69 65 64 20 74 6f 64 61 79 2e 22 0a 20 20 28 6c 65 74 20 28 28 6d 74 69 6d 65	.modified.today."...(let.((mtime
2880	20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 2d 6d 6f 64 69 66 69 63 61 74 69 6f 6e 2d 74 69	.(file-attribute-modification-ti
28a0	6d 65 20 61 74 74 72 73 29 29 29 0a 20 20 20 20 28 61 6e 64 20 28 6c 69 73 74 70 20 6d 74 69 6d	me.attrs))).....(and.(listp.mtim
28c0	65 29 0a 20 20 20 20 20 20 20 20 20 28 3c 20 28 66 6c 6f 61 74 2d 74 69 6d 65 20 28 74 69 6d 65	e)..........(<.(float-time.(time
28e0	2d 73 75 62 74 72 61 63 74 20 28 63 75 72 72 65 6e 74 2d 74 69 6d 65 29 20 6d 74 69 6d 65 29 29	-subtract.(current-time).mtime))
2900	20 38 36 34 30 30 29 29 29 29 0a 0a 28 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 64 65 66 69	.86400))))..(dirvish-emerge-defi
2920	6e 65 2d 70 72 65 64 69 63 61 74 65 20 64 69 72 65 63 74 6f 72 69 65 73 0a 20 20 22 4d 61 74 63	ne-predicate.directories..."Matc
2940	68 65 73 20 64 69 72 65 63 74 6f 72 69 65 73 2e 22 0a 20 20 28 65 71 20 27 64 69 72 20 28 63 61	hes.directories."...(eq.'dir.(ca
2960	72 20 74 79 70 65 29 29 29 0a 0a 28 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 64 65 66 69 6e	r.type)))..(dirvish-emerge-defin
2980	65 2d 70 72 65 64 69 63 61 74 65 20 66 69 6c 65 73 0a 20 20 22 4d 61 74 63 68 65 73 20 66 69 6c	e-predicate.files..."Matches.fil
29a0	65 73 2e 22 0a 20 20 28 65 71 20 27 66 69 6c 65 20 28 63 61 72 20 74 79 70 65 29 29 29 0a 0a 28	es."...(eq.'file.(car.type)))..(
29c0	64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 64 65 66 69 6e 65 2d 70 72 65 64 69 63 61 74 65 20	dirvish-emerge-define-predicate.
29e0	73 79 6d 6c 69 6e 6b 73 0a 20 20 22 4d 61 74 63 68 65 73 20 73 79 6d 6c 69 6d 6b 73 2e 22 0a 20	symlinks..."Matches.symlimks."..
2a00	20 28 63 64 72 20 74 79 70 65 29 29 0a 0a 3b 3b 20 4e 6f 74 65 20 74 68 65 20 62 65 68 61 76 69	.(cdr.type))..;;.Note.the.behavi
2a20	6f 72 20 6f 66 20 74 68 69 73 20 70 72 65 64 69 63 61 74 65 20 64 6f 65 73 6e 27 74 20 65 78 61	or.of.this.predicate.doesn't.exa
2a40	63 74 6c 79 20 6d 61 74 63 68 20 60 66 69 6c 65 2d 65 78 65 63 75 74 61 62 6c 65 2d 70 27 2e 0a	ctly.match.`file-executable-p'..
2a60	3b 3b 20 49 74 20 63 68 65 63 6b 73 20 69 66 20 74 68 65 20 6f 77 6e 65 72 20 6f 66 20 74 68 65	;;.It.checks.if.the.owner.of.the
2a80	20 66 69 6c 65 20 63 61 6e 20 65 78 65 63 75 74 65 20 69 74 20 61 6e 64 20 6e 6f 74 20 69 66 20	.file.can.execute.it.and.not.if.
2aa0	74 68 65 20 63 75 72 72 65 6e 74 0a 3b 3b 20 75 73 65 72 20 63 61 6e 2e 0a 28 64 69 72 76 69 73	the.current.;;.user.can..(dirvis
2ac0	68 2d 65 6d 65 72 67 65 2d 64 65 66 69 6e 65 2d 70 72 65 64 69 63 61 74 65 20 65 78 65 63 75 74	h-emerge-define-predicate.execut
2ae0	61 62 6c 65 73 0a 20 20 22 4d 61 74 63 68 65 73 20 65 78 65 63 75 74 61 62 6c 65 73 2e 22 0a 20	ables..."Matches.executables."..
2b00	20 28 65 71 20 3f 78 20 28 61 72 65 66 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 2d 6d 6f	.(eq.?x.(aref.(file-attribute-mo
2b20	64 65 73 20 61 74 74 72 73 29 20 33 29 29 29 0a 0a 28 63 6c 2d 64 65 66 67 65 6e 65 72 69 63 20	des.attrs).3)))..(cl-defgeneric.
2b40	64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 72 65 61 64 2d 72 65 63 69 70 65 20 28 72 65 63 69	dirvish-emerge-read-recipe.(reci
2b60	70 65 20 26 6f 70 74 69 6f 6e 61 6c 20 6f 62 6a 29 0a 20 20 22 52 65 61 64 20 52 45 43 49 50 45	pe.&optional.obj)..."Read.RECIPE
2b80	20 66 72 6f 6d 20 75 73 65 72 20 69 6e 70 75 74 20 61 6e 64 20 6f 70 74 69 6f 6e 61 6c 6c 79 20	.from.user.input.and.optionally.
2ba0	73 61 76 65 20 69 74 20 74 6f 20 4f 42 4a 2e 22 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64	save.it.to.OBJ.")..(cl-defmethod
2bc0	20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 72 65 61 64 2d 72 65 63 69 70 65 20 28 28 72 65	.dirvish-emerge-read-recipe.((re
2be0	63 69 70 65 20 28 68 65 61 64 20 72 65 67 65 78 29 29 20 26 6f 70 74 69 6f 6e 61 6c 20 6f 62 6a	cipe.(head.regex)).&optional.obj
2c00	29 0a 20 20 22 52 65 61 64 20 52 45 43 49 50 45 20 66 72 6f 6d 20 75 73 65 72 20 69 6e 70 75 74	)..."Read.RECIPE.from.user.input
2c20	20 61 6e 64 20 6f 70 74 69 6f 6e 61 6c 6c 79 20 73 61 76 65 20 69 74 20 74 6f 20 4f 42 4a 2e 22	.and.optionally.save.it.to.OBJ."
2c40	0a 20 20 28 6c 65 74 2a 20 28 28 64 65 66 74 20 28 63 64 72 20 72 65 63 69 70 65 29 29 0a 20 20	...(let*.((deft.(cdr.recipe))...
2c60	20 20 20 20 20 20 20 28 72 65 67 65 78 20 28 72 65 61 64 2d 72 65 67 65 78 70 0a 20 20 20 20 20	.......(regex.(read-regexp......
2c80	20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 43 68 61 6e 67 65 20 72 65 67 65	............(format."Change.rege
2ca0	78 20 74 6f 20 28 64 65 66 61 75 6c 74 73 20 74 6f 20 25 73 29 3a 20 22 20 64 65 66 74 29 20 64	x.to.(defaults.to.%s):.".deft).d
2cc0	65 66 74 29 29 29 0a 20 20 20 20 28 69 66 20 6f 62 6a 20 28 6f 73 65 74 20 6f 62 6a 20 72 65 63	eft))).....(if.obj.(oset.obj.rec
2ce0	69 70 65 20 60 28 72 65 67 65 78 20 2e 20 2c 72 65 67 65 78 29 29 20 72 65 67 65 78 29 29 29 0a	ipe.`(regex...,regex)).regex))).
2d00	0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 72 65	.(cl-defmethod.dirvish-emerge-re
2d20	61 64 2d 72 65 63 69 70 65 20 28 28 72 65 63 69 70 65 20 28 68 65 61 64 20 65 78 74 65 6e 73 69	ad-recipe.((recipe.(head.extensi
2d40	6f 6e 73 29 29 20 26 6f 70 74 69 6f 6e 61 6c 20 6f 62 6a 29 0a 20 20 22 52 65 61 64 20 52 45 43	ons)).&optional.obj)..."Read.REC
2d60	49 50 45 20 66 72 6f 6d 20 75 73 65 72 20 69 6e 70 75 74 20 61 6e 64 20 6f 70 74 69 6f 6e 61 6c	IPE.from.user.input.and.optional
2d80	6c 79 20 73 61 76 65 20 69 74 20 74 6f 20 4f 42 4a 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 70 72	ly.save.it.to.OBJ."...(let*.((pr
2da0	6f 6d 70 74 20 22 49 6e 70 75 74 20 6f 6e 65 20 6f 72 20 6d 6f 72 65 20 65 78 74 65 6e 73 69 6f	ompt."Input.one.or.more.extensio
2dc0	6e 73 3a 20 22 29 0a 20 20 20 20 20 20 20 20 20 28 63 61 6e 64 73 0a 20 20 20 20 20 20 20 20 20	ns:.")..........(cands..........
2de0	20 28 63 6c 2d 72 65 6d 6f 76 65 2d 69 66 2d 6e 6f 74 20 28 6c 61 6d 62 64 61 20 28 69 29 20 28	.(cl-remove-if-not.(lambda.(i).(
2e00	61 6e 64 20 69 20 28 3e 20 28 6c 65 6e 67 74 68 20 69 29 20 30 29 29 29 0a 20 20 20 20 20 20 20	and.i.(>.(length.i).0)))........
2e20	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 20 23 27 66	.....................(mapcar.#'f
2e40	69 6c 65 2d 6e 61 6d 65 2d 65 78 74 65 6e 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	ile-name-extension..............
2e60	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 63 74 6f 72	.......................(director
2e80	79 2d 66 69 6c 65 73 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 29 29 29 0a 20 20	y-files.default-directory))))...
2ea0	20 20 20 20 20 20 20 28 65 78 74 73 20 28 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 2d 6d 75	.......(exts.(completing-read-mu
2ec0	6c 74 69 70 6c 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 72 6f 6d 70 74 20 63 61	ltiple.................prompt.ca
2ee0	6e 64 73 20 6e 69 6c 20 6e 69 6c 20 28 6d 61 70 63 6f 6e 63 61 74 20 23 27 63 6f 6e 63 61 74 20	nds.nil.nil.(mapconcat.#'concat.
2f00	28 63 64 72 20 72 65 63 69 70 65 29 20 22 2c 22 29 29 29 29 0a 20 20 20 20 28 69 66 20 6f 62 6a	(cdr.recipe).",")))).....(if.obj
2f20	20 28 6f 73 65 74 20 6f 62 6a 20 72 65 63 69 70 65 20 60 28 65 78 74 65 6e 73 69 6f 6e 73 20 2e	.(oset.obj.recipe.`(extensions..
2f40	20 2c 40 65 78 74 73 29 29 20 65 78 74 73 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64	.,@exts)).exts)))..(cl-defmethod
2f60	20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 72 65 61 64 2d 72 65 63 69 70 65 20 28 28 72 65	.dirvish-emerge-read-recipe.((re
2f80	63 69 70 65 20 28 68 65 61 64 20 70 72 65 64 69 63 61 74 65 29 29 20 26 6f 70 74 69 6f 6e 61 6c	cipe.(head.predicate)).&optional
2fa0	20 6f 62 6a 29 0a 20 20 22 52 65 61 64 20 52 45 43 49 50 45 20 66 72 6f 6d 20 75 73 65 72 20 69	.obj)..."Read.RECIPE.from.user.i
2fc0	6e 70 75 74 20 61 6e 64 20 6f 70 74 69 6f 6e 61 6c 6c 79 20 73 61 76 65 20 69 74 20 74 6f 20 4f	nput.and.optionally.save.it.to.O
2fe0	42 4a 2e 22 0a 20 20 28 69 67 6e 6f 72 65 20 72 65 63 69 70 65 29 0a 20 20 28 6c 65 74 2a 20 28	BJ."...(ignore.recipe)...(let*.(
3000	28 74 61 62 6c 65 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 61 76 61 69 6c 61 62 6c 65	(table.dirvish-emerge--available
3020	2d 70 72 65 64 73 29 0a 20 20 20 20 20 20 20 20 20 28 63 6f 6c 6c 20 28 64 69 72 76 69 73 68 2d	-preds)..........(coll.(dirvish-
3040	2d 61 70 70 65 6e 64 2d 6d 65 74 61 64 61 74 61 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	-append-metadata................
3060	20 28 6c 61 6d 62 64 61 20 28 69 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	.(lambda.(i)...................(
3080	6c 65 74 20 28 28 69 74 65 6d 20 28 69 6e 74 65 72 6e 20 28 66 6f 72 6d 61 74 20 22 25 73 22 20	let.((item.(intern.(format."%s".
30a0	69 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 28 63 6f 6e 63 61	i)))).....................(conca
30c0	74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 6b 65 2d 73 74 72	t......................(make-str
30e0	69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2d 20 64 69 72	ing.......................(-.dir
3100	76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 6d 61 78 2d 70 72 65 64 2d 6e 61 6d 65 2d 6c 65 6e 20 28	vish-emerge--max-pred-name-len.(
3120	6c 65 6e 67 74 68 20 69 29 20 2d 38 29 20 3f 5c 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	length.i).-8).?\s)..............
3140	20 20 20 20 20 20 20 20 28 63 64 64 72 20 28 61 73 73 71 20 69 74 65 6d 20 74 61 62 6c 65 29 29	........(cddr.(assq.item.table))
3160	29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 61 62 6c 65 29 29 0a 20 20 20 20	))).................table)).....
3180	20 20 20 20 20 28 70 72 65 64 20 28 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 20 22 50 72 65	.....(pred.(completing-read."Pre
31a0	64 69 63 61 74 65 3a 20 22 20 63 6f 6c 6c 29 29 29 0a 20 20 20 20 28 69 66 20 6f 62 6a 20 28 6f	dicate:.".coll))).....(if.obj.(o
31c0	73 65 74 20 6f 62 6a 20 72 65 63 69 70 65 20 60 28 70 72 65 64 69 63 61 74 65 20 2e 20 2c 28 72	set.obj.recipe.`(predicate...,(r
31e0	65 61 64 20 70 72 65 64 29 29 29 20 28 72 65 61 64 20 70 72 65 64 29 29 29 29 0a 0a 28 64 65 66	ead.pred))).(read.pred))))..(def
3200	73 75 62 73 74 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 6d 61 6b 65 2d 70 72 65 64 20	subst.dirvish-emerge--make-pred.
3220	28 72 65 63 69 70 65 29 0a 20 20 22 4d 61 6b 65 20 70 72 65 64 69 63 61 74 65 20 66 75 6e 63 74	(recipe)..."Make.predicate.funct
3240	69 6f 6e 20 66 72 6f 6d 20 52 45 43 49 50 45 2e 22 0a 20 20 28 70 63 61 73 65 2d 6c 65 74 20 28	ion.from.RECIPE."...(pcase-let.(
3260	28 60 28 2c 74 79 70 65 20 2e 20 2c 76 61 6c 29 20 72 65 63 69 70 65 29 29 0a 20 20 20 20 28 70	(`(,type...,val).recipe)).....(p
3280	63 61 73 65 20 74 79 70 65 0a 20 20 20 20 20 20 28 27 72 65 67 65 78 0a 20 20 20 20 20 20 20 60	case.type.......('regex........`
32a0	28 6c 61 6d 62 64 61 20 28 6c 6f 63 61 6c 2d 6e 61 6d 65 20 5f 20 5f 20 5f 29 20 28 73 74 72 69	(lambda.(local-name._._._).(stri
32c0	6e 67 2d 6d 61 74 63 68 20 2c 76 61 6c 20 6c 6f 63 61 6c 2d 6e 61 6d 65 29 29 29 0a 20 20 20 20	ng-match.,val.local-name))).....
32e0	20 20 28 27 65 78 74 65 6e 73 69 6f 6e 73 0a 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 65 78 74	..('extensions........(let.((ext
3300	73 20 28 66 6f 72 6d 61 74 20 22 5c 5c 2e 5c 5c 28 25 73 5c 5c 29 24 22 20 28 6d 61 70 63 6f 6e	s.(format."\\.\$%s\$$".(mapcon
3320	63 61 74 20 23 27 63 6f 6e 63 61 74 20 76 61 6c 20 22 5c 5c 7c 22 29 29 29 29 0a 20 20 20 20 20	cat.#'concat.val."\\\|"))))......
3340	20 20 20 20 60 28 6c 61 6d 62 64 61 20 28 6c 6f 63 61 6c 2d 6e 61 6d 65 20 5f 20 5f 20 5f 29 20	....`(lambda.(local-name._._._).
3360	28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 2c 65 78 74 73 20 6c 6f 63 61 6c 2d 6e 61 6d 65 29 29	(string-match.,exts.local-name))
3380	29 29 0a 20 20 20 20 20 20 28 27 70 72 65 64 69 63 61 74 65 0a 20 20 20 20 20 20 20 28 63 61 64	)).......('predicate........(cad
33a0	72 20 28 61 73 73 71 20 28 63 64 72 20 72 65 63 69 70 65 29 20 64 69 72 76 69 73 68 2d 65 6d 65	r.(assq.(cdr.recipe).dirvish-eme
33c0	72 67 65 2d 2d 61 76 61 69 6c 61 62 6c 65 2d 70 72 65 64 73 29 29 29 29 29 29 0a 0a 28 64 65 66	rge--available-preds))))))..(def
33e0	75 6e 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 75 70 64 61 74 65 2d 67 72 6f 75 70 73	un.dirvish-emerge--update-groups
3400	20 28 67 72 6f 75 70 73 29 0a 20 20 22 55 70 64 61 74 65 20 64 69 72 2d 6c 6f 63 61 6c 20 67 72	.(groups)..."Update.dir-local.gr
3420	6f 75 70 73 20 74 6f 20 47 52 4f 55 50 53 2e 22 0a 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 64	oups.to.GROUPS."...(setq-local.d
3440	69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 67 72 6f 75 70 73 20 67 72 6f 75 70 73 29 0a 20 20 28	irvish-emerge-groups.groups)...(
3460	73 65 74 66 20 28 61 6c 69 73 74 2d 67 65 74 20 27 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d	setf.(alist-get.'dirvish-emerge-
3480	67 72 6f 75 70 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6c 69 73 74	groups....................(alist
34a0	2d 67 65 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 64 69 72 76 69 73	-get.....................'dirvis
34c0	68 2d 6d 6f 64 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6c 69 73	h-mode.....................(alis
34e0	74 2d 67 65 74 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 64 65 66 61 75 6c 74 2d	t-get.(expand-file-name.default-
3500	64 69 72 65 63 74 6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	directory)......................
3520	20 20 20 20 20 20 20 20 20 20 64 69 72 2d 6c 6f 63 61 6c 73 2d 63 6c 61 73 73 2d 61 6c 69 73 74	..........dir-locals-class-alist
3540	20 6e 69 6c 20 6e 69 6c 20 23 27 73 74 72 69 6e 67 3d 29 29 29 0a 20 20 20 20 20 20 20 20 67 72	.nil.nil.#'string=))).........gr
3560	6f 75 70 73 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 63	oups))..(defun.dirvish-emerge--c
3580	72 65 61 74 65 2d 69 6e 66 69 78 0a 20 20 20 20 28 69 66 78 20 64 65 73 63 72 69 70 74 69 6f 6e	reate-infix.....(ifx.description
35a0	20 72 65 63 69 70 65 20 26 6f 70 74 69 6f 6e 61 6c 20 73 65 6c 65 63 74 65 64 20 68 69 64 65 29	.recipe.&optional.selected.hide)
35c0	0a 20 20 22 43 72 65 61 74 65 20 61 6e 20 74 72 61 6e 73 69 65 6e 74 20 69 6e 66 69 78 20 49 46	..."Create.an.transient.infix.IF
35e0	58 20 6f 66 20 65 6d 65 72 67 65 20 67 72 6f 75 70 2e 0a 44 45 53 43 52 49 50 54 49 4f 4e 2c 20	X.of.emerge.group..DESCRIPTION,.
3600	52 45 43 49 50 45 2c 20 53 45 4c 45 43 54 45 44 20 61 6e 64 20 48 49 44 45 20 61 72 65 20 69 6e	RECIPE,.SELECTED.and.HIDE.are.in
3620	73 65 72 74 65 64 20 69 6e 74 6f 20 74 68 65 0a 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 73 6c	serted.into.the.corresponding.sl
3640	6f 74 73 2e 22 0a 20 20 28 65 76 61 6c 20 60 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65	ots."...(eval.`(transient-define
3660	2d 69 6e 66 69 78 20 2c 69 66 78 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 3a 63 6c 61 73 73	-infix.,ifx.()............:class
3680	20 27 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 67 72 6f 75 70 0a 20 20 20 20 20 20 20 20 20	.'dirvish-emerge-group..........
36a0	20 20 3a 72 65 63 69 70 65 20 27 2c 72 65 63 69 70 65 0a 20 20 20 20 20 20 20 20 20 20 20 3a 73	..:recipe.',recipe............:s
36c0	65 6c 65 63 74 65 64 20 2c 73 65 6c 65 63 74 65 64 0a 20 20 20 20 20 20 20 20 20 20 20 3a 68 69	elected.,selected............:hi
36e0	64 65 20 2c 68 69 64 65 0a 20 20 20 20 20 20 20 20 20 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e	de.,hide............:description
3700	20 2c 64 65 73 63 72 69 70 74 69 6f 6e 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68	.,description)))..(defun.dirvish
3720	2d 65 6d 65 72 67 65 2d 2d 63 72 65 61 74 65 2d 69 6e 66 69 78 65 73 20 28 29 0a 20 20 22 44 65	-emerge--create-infixes.()..."De
3740	66 69 6e 65 20 61 6e 64 20 63 6f 6c 6c 65 63 74 20 65 6d 65 72 67 65 20 67 72 6f 75 70 73 20 66	fine.and.collect.emerge.groups.f
3760	72 6f 6d 20 60 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 67 72 6f 75 70 73 27 2e 22 0a 20 20	rom.`dirvish-emerge-groups'."...
3780	28 63 6c 2d 6c 6f 6f 70 20 77 69 74 68 20 6c 65 6e 20 3d 20 28 6c 65 6e 67 74 68 20 64 69 72 76	(cl-loop.with.len.=.(length.dirv
37a0	69 73 68 2d 65 6d 65 72 67 65 2d 67 72 6f 75 70 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 66 6f	ish-emerge-groups)............fo
37c0	72 20 69 64 78 20 66 72 6f 6d 20 30 0a 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 28 64 65 73	r.idx.from.0............for.(des
37e0	63 20 72 65 63 69 70 65 20 68 69 64 65 20 73 65 6c 65 63 74 65 64 29 20 69 6e 20 28 73 65 71 2d	c.recipe.hide.selected).in.(seq-
3800	74 61 6b 65 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 67 72 6f 75 70 73 20 39 39 29 0a 20	take.dirvish-emerge-groups.99)..
3820	20 20 20 20 20 20 20 20 20 20 66 6f 72 20 69 66 78 20 3d 20 28 69 6e 74 65 72 6e 20 28 66 6f 72	..........for.ifx.=.(intern.(for
3840	6d 61 74 20 22 64 69 72 76 69 73 68 2d 25 73 2d 69 6e 66 69 78 22 0a 20 20 20 20 20 20 20 20 20	mat."dirvish-%s-infix"..........
3860	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 72 65 70	............................(rep
3880	6c 61 63 65 2d 72 65 67 65 78 70 2d 69 6e 2d 73 74 72 69 6e 67 20 22 20 22 20 22 2d 22 20 64 65	lace-regexp-in-string."."."-".de
38a0	73 63 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 6b 65 79 20 3d 20 28 66 6f 72 6d	sc)))............for.key.=.(form
38c0	61 74 20 28 69 66 20 28 3e 20 6c 65 6e 20 31 30 29 20 22 25 30 32 69 22 20 22 25 69 22 29 20 69	at.(if.(>.len.10)."%02i"."%i").i
38e0	64 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 63 6f 6c 6c 65 63 74 20 28 70 72 6f 67 6e 0a 20 20	dx)............collect.(progn...
3900	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 65 6d 65 72	...................(dirvish-emer
3920	67 65 2d 2d 63 72 65 61 74 65 2d 69 6e 66 69 78 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ge--create-infix................
3940	20 20 20 20 20 20 20 69 66 78 20 64 65 73 63 20 72 65 63 69 70 65 20 73 65 6c 65 63 74 65 64 20	.......ifx.desc.recipe.selected.
3960	68 69 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74	hide)......................(list
3980	20 6b 65 79 20 69 66 78 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 65 6d 65	.key.ifx))))..(defun.dirvish-eme
39a0	72 67 65 2d 2d 69 66 78 2d 61 70 70 6c 79 20 28 29 0a 20 20 22 41 70 70 6c 79 20 65 6d 65 72 67	rge--ifx-apply.()..."Apply.emerg
39c0	65 20 69 6e 66 69 78 65 73 20 69 6e 20 60 74 72 61 6e 73 69 65 6e 74 2d 63 75 72 72 65 6e 74 2d	e.infixes.in.`transient-current-
39e0	73 75 66 66 69 78 65 73 27 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 69 66 78 65 73 20 28 63 6c 2d	suffixes'."...(let*.((ifxes.(cl-
3a00	6c 6f 6f 70 20 66 6f 72 20 6f 20 69 6e 20 74 72 61 6e 73 69 65 6e 74 2d 63 75 72 72 65 6e 74 2d	loop.for.o.in.transient-current-
3a20	73 75 66 66 69 78 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	suffixes........................
3a40	20 20 77 68 65 6e 20 28 65 71 20 28 74 79 70 65 2d 6f 66 20 6f 29 20 27 64 69 72 76 69 73 68 2d	..when.(eq.(type-of.o).'dirvish-
3a60	65 6d 65 72 67 65 2d 67 72 6f 75 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	emerge-group)...................
3a80	20 20 20 20 20 20 20 63 6f 6c 6c 65 63 74 20 6f 29 29 0a 20 20 20 20 20 20 20 20 20 28 67 72 6f	.......collect.o))..........(gro
3aa0	75 70 73 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 6f 20 69 6e 20 69 66 78 65 73 0a 20 20 20 20	ups.(cl-loop.for.o.in.ifxes.....
3ac0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 6c 6c 65 63 74 20 28 6c	......................collect.(l
3ae0	69 73 74 20 28 6f 72 65 66 20 6f 20 64 65 73 63 72 69 70 74 69 6f 6e 29 20 28 6f 72 65 66 20 6f	ist.(oref.o.description).(oref.o
3b00	20 72 65 63 69 70 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.recipe)........................
3b20	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 6f 20 68 69 64 65 29 20 28	.................(oref.o.hide).(
3b40	6f 72 65 66 20 6f 20 73 65 6c 65 63 74 65 64 29 29 29 29 29 0a 20 20 20 20 28 64 69 72 76 69 73	oref.o.selected))))).....(dirvis
3b60	68 2d 65 6d 65 72 67 65 2d 6d 6f 64 65 20 31 29 0a 20 20 20 20 28 72 65 76 65 72 74 2d 62 75 66	h-emerge-mode.1).....(revert-buf
3b80	66 65 72 29 0a 20 20 20 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 66 6f 72 63 65 2d 65 6d	fer).....(dirvish-prop.:force-em
3ba0	65 72 67 65 20 74 29 0a 20 20 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 64 69 72 76 69 73 68 2d	erge.t).....(setq-local.dirvish-
3bc0	65 6d 65 72 67 65 2d 67 72 6f 75 70 73 20 67 72 6f 75 70 73 29 29 29 0a 0a 28 64 65 66 75 6e 20	emerge-groups.groups)))..(defun.
3be0	64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 69 66 78 2d 75 6e 73 65 6c 65 63 74 20 28 29 0a	dirvish-emerge--ifx-unselect.().
3c00	20 20 22 55 6e 73 65 6c 65 63 74 20 73 65 6c 65 63 74 65 64 20 65 6d 65 72 67 65 20 67 72 6f 75	.."Unselect.selected.emerge.grou
3c20	70 73 2e 22 0a 20 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 6f 62 6a 20 69 6e 20 74 72 61 6e 73	ps."...(cl-loop.for.obj.in.trans
3c40	69 65 6e 74 2d 63 75 72 72 65 6e 74 2d 73 75 66 66 69 78 65 73 0a 20 20 20 20 20 20 20 20 20 20	ient-current-suffixes...........
3c60	20 77 68 65 6e 20 28 65 71 20 28 74 79 70 65 2d 6f 66 20 6f 62 6a 29 20 27 64 69 72 76 69 73 68	.when.(eq.(type-of.obj).'dirvish
3c80	2d 65 6d 65 72 67 65 2d 67 72 6f 75 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 64 6f 20 28 6f 73	-emerge-group)............do.(os
3ca0	65 74 20 6f 62 6a 20 73 65 6c 65 63 74 65 64 20 6e 69 6c 29 29 29 0a 0a 28 64 65 66 75 6e 20 64	et.obj.selected.nil)))..(defun.d
3cc0	69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 69 66 78 2d 74 6f 67 67 6c 65 2d 68 69 64 69 6e 67	irvish-emerge--ifx-toggle-hiding
3ce0	20 28 29 0a 20 20 22 48 69 64 65 20 73 65 6c 65 63 74 65 64 20 65 6d 65 72 67 65 20 67 72 6f 75	.()..."Hide.selected.emerge.grou
3d00	70 73 2e 22 0a 20 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 6f 62 6a 20 69 6e 20 74 72 61 6e 73	ps."...(cl-loop.for.obj.in.trans
3d20	69 65 6e 74 2d 63 75 72 72 65 6e 74 2d 73 75 66 66 69 78 65 73 0a 20 20 20 20 20 20 20 20 20 20	ient-current-suffixes...........
3d40	20 77 68 65 6e 20 28 61 6e 64 20 28 65 71 20 28 74 79 70 65 2d 6f 66 20 6f 62 6a 29 20 27 64 69	.when.(and.(eq.(type-of.obj).'di
3d60	72 76 69 73 68 2d 65 6d 65 72 67 65 2d 67 72 6f 75 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	rvish-emerge-group).............
3d80	20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 6f 62 6a 20 73 65 6c 65 63 74 65 64 29 29 0a 20 20	.........(oref.obj.selected))...
3da0	20 20 20 20 20 20 20 20 20 64 6f 20 28 6f 73 65 74 20 6f 62 6a 20 68 69 64 65 20 28 6e 6f 74 20	.........do.(oset.obj.hide.(not.
3dc0	28 6f 72 65 66 20 6f 62 6a 20 68 69 64 65 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76	(oref.obj.hide)))))..(defun.dirv
3de0	69 73 68 2d 65 6d 65 72 67 65 2d 2d 69 66 78 2d 61 64 64 20 28 29 0a 20 20 22 41 64 64 20 61 20	ish-emerge--ifx-add.()..."Add.a.
3e00	6e 65 77 20 65 6d 65 72 67 65 20 67 72 6f 75 70 20 74 6f 20 60 74 72 61 6e 73 69 65 6e 74 2d 63	new.emerge.group.to.`transient-c
3e20	75 72 72 65 6e 74 2d 73 75 66 66 69 78 65 73 27 2e 22 0a 20 20 28 6c 65 74 20 28 28 74 79 70 65	urrent-suffixes'."...(let.((type
3e40	20 28 70 63 61 73 65 20 28 72 65 61 64 2d 63 68 61 72 2d 63 68 6f 69 63 65 0a 20 20 20 20 20 20	.(pcase.(read-char-choice.......
3e60	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 50 72 65 73 73 20 65 20 66 6f 72 20 65 78 74	................"Press.e.for.ext
3e80	65 6e 73 69 6f 6e 73 2c 20 70 20 66 6f 72 20 70 72 65 64 69 63 61 74 65 2c 20 72 20 66 6f 72 20	ensions,.p.for.predicate,.r.for.
3ea0	72 65 67 65 78 3a 20 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27	regex:.".......................'
3ec0	28 3f 65 20 3f 70 20 3f 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 31 30 31	(?e.?p.?r)).................(101
3ee0	20 27 65 78 74 65 6e 73 69 6f 6e 73 29 20 28 31 31 32 20 27 70 72 65 64 69 63 61 74 65 29 20 28	.'extensions).(112.'predicate).(
3f00	27 31 31 34 20 27 72 65 67 65 78 29 29 29 0a 20 20 20 20 20 20 20 20 28 6e 61 6d 65 73 20 28 6d	'114.'regex))).........(names.(m
3f20	61 70 63 61 72 20 23 27 63 61 72 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 67 72 6f 75 70	apcar.#'car.dirvish-emerge-group
3f40	73 29 29 0a 20 20 20 20 20 20 20 20 28 67 72 6f 75 70 73 20 28 62 75 66 66 65 72 2d 6c 6f 63 61	s)).........(groups.(buffer-loca
3f60	6c 2d 76 61 6c 75 65 20 27 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 67 72 6f 75 70 73 20 28	l-value.'dirvish-emerge-groups.(
3f80	63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20 20 20 20 20 20 28 69 64 78 20 31	current-buffer))).........(idx.1
3fa0	29 20 28 64 65 66 61 75 6c 74 20 22 41 6e 6f 6e 2d 31 22 29 20 72 65 63 69 70 65 20 74 69 74 6c	).(default."Anon-1").recipe.titl
3fc0	65 29 0a 20 20 20 20 28 77 68 69 6c 65 20 28 6d 65 6d 62 65 72 20 64 65 66 61 75 6c 74 20 6e 61	e).....(while.(member.default.na
3fe0	6d 65 73 29 0a 20 20 20 20 20 20 28 63 6c 2d 69 6e 63 66 20 69 64 78 29 0a 20 20 20 20 20 20 28	mes).......(cl-incf.idx).......(
4000	73 65 74 71 20 64 65 66 61 75 6c 74 20 28 66 6f 72 6d 61 74 20 22 41 6e 6f 6e 2d 25 73 22 20 69	setq.default.(format."Anon-%s".i
4020	64 78 29 29 29 0a 20 20 20 20 28 73 65 74 71 20 72 65 63 69 70 65 20 28 64 69 72 76 69 73 68 2d	dx))).....(setq.recipe.(dirvish-
4040	65 6d 65 72 67 65 2d 72 65 61 64 2d 72 65 63 69 70 65 20 28 63 6f 6e 73 20 74 79 70 65 20 6e 69	emerge-read-recipe.(cons.type.ni
4060	6c 29 29 29 0a 20 20 20 20 28 73 65 74 71 20 74 69 74 6c 65 20 28 72 65 61 64 2d 73 74 72 69 6e	l))).....(setq.title.(read-strin
4080	67 20 22 47 72 6f 75 70 20 74 69 74 6c 65 3a 20 22 20 64 65 66 61 75 6c 74 29 29 0a 20 20 20 20	g."Group.title:.".default)).....
40a0	28 70 75 73 68 20 28 6c 69 73 74 20 74 69 74 6c 65 20 28 63 6f 6e 73 20 74 79 70 65 20 72 65 63	(push.(list.title.(cons.type.rec
40c0	69 70 65 29 29 20 67 72 6f 75 70 73 29 0a 20 20 20 20 28 64 69 72 76 69 73 68 2d 65 6d 65 72 67	ipe)).groups).....(dirvish-emerg
40e0	65 2d 2d 75 70 64 61 74 65 2d 67 72 6f 75 70 73 20 67 72 6f 75 70 73 29 0a 20 20 20 20 28 64 69	e--update-groups.groups).....(di
4100	72 76 69 73 68 2d 65 6d 65 72 67 65 2d 6d 65 6e 75 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72	rvish-emerge-menu)))..(defun.dir
4120	76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 69 66 78 2d 72 65 6d 6f 76 65 20 28 29 0a 20 20 22 52 65	vish-emerge--ifx-remove.()..."Re
4140	6d 6f 76 65 20 61 6e 20 65 6d 65 72 67 65 20 67 72 6f 75 70 20 66 72 6f 6d 20 60 74 72 61 6e 73	move.an.emerge.group.from.`trans
4160	69 65 6e 74 2d 63 75 72 72 65 6e 74 2d 73 75 66 66 69 78 65 73 27 2e 22 0a 20 20 28 63 6c 2d 6c	ient-current-suffixes'."...(cl-l
4180	6f 6f 70 20 66 6f 72 20 6f 62 6a 20 69 6e 20 74 72 61 6e 73 69 65 6e 74 2d 63 75 72 72 65 6e 74	oop.for.obj.in.transient-current
41a0	2d 73 75 66 66 69 78 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 77 68 65 6e 20 28 61 6e 64 20 28	-suffixes............when.(and.(
41c0	65 71 20 28 74 79 70 65 2d 6f 66 20 6f 62 6a 29 20 27 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65	eq.(type-of.obj).'dirvish-emerge
41e0	2d 67 72 6f 75 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72	-group)......................(or
4200	65 66 20 6f 62 6a 20 73 65 6c 65 63 74 65 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 64 6f 20	ef.obj.selected))............do.
4220	28 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 75 70 64 61 74 65 2d 67 72 6f 75 70 73 0a 20	(dirvish-emerge--update-groups..
4240	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 73 73 6f 63 2d 64 65 6c 65 74 65 2d 61 6c 6c 20	..............(assoc-delete-all.
4260	28 6f 72 65 66 20 6f 62 6a 20 64 65 73 63 72 69 70 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20	(oref.obj.description)..........
4280	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 76 69 73 68 2d	........................dirvish-
42a0	65 6d 65 72 67 65 2d 67 72 6f 75 70 73 20 23 27 65 71 75 61 6c 29 29 29 0a 20 20 28 64 69 72 76	emerge-groups.#'equal)))...(dirv
42c0	69 73 68 2d 65 6d 65 72 67 65 2d 6d 65 6e 75 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73	ish-emerge-menu))..(defun.dirvis
42e0	68 2d 65 6d 65 72 67 65 2d 2d 69 66 78 2d 70 72 6f 6d 6f 74 65 20 28 26 6f 70 74 69 6f 6e 61 6c	h-emerge--ifx-promote.(&optional
4300	20 64 65 6d 6f 74 65 29 0a 20 20 22 53 68 69 66 74 20 73 65 6c 65 63 74 65 64 20 65 6d 65 72 67	.demote)..."Shift.selected.emerg
4320	65 20 67 72 6f 75 70 73 20 74 68 65 20 68 69 67 68 65 73 74 20 70 6f 73 69 74 69 6f 6e 2e 0a 49	e.groups.the.highest.position..I
4340	66 20 44 45 4d 4f 54 45 2c 20 73 68 69 66 74 20 74 68 65 6d 20 74 6f 20 74 68 65 20 6c 6f 77 65	f.DEMOTE,.shift.them.to.the.lowe
4360	73 74 20 69 6e 73 74 65 61 64 2e 22 0a 20 20 28 63 6c 2d 6c 6f 6f 70 20 77 69 74 68 20 73 65 6c	st.instead."...(cl-loop.with.sel
4380	20 3d 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 6f 62 6a 20 69 6e 20 74 72 61 6e	.=.()............for.obj.in.tran
43a0	73 69 65 6e 74 2d 63 75 72 72 65 6e 74 2d 73 75 66 66 69 78 65 73 0a 20 20 20 20 20 20 20 20 20	sient-current-suffixes..........
43c0	20 20 77 68 65 6e 20 28 61 6e 64 20 28 65 71 20 28 74 79 70 65 2d 6f 66 20 6f 62 6a 29 20 27 64	..when.(and.(eq.(type-of.obj).'d
43e0	69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 67 72 6f 75 70 29 0a 20 20 20 20 20 20 20 20 20 20 20	irvish-emerge-group)............
4400	20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 6f 62 6a 20 73 65 6c 65 63 74 65 64 29 29 0a 20	..........(oref.obj.selected))..
4420	20 20 20 20 20 20 20 20 20 20 64 6f 20 28 70 72 6f 67 6e 20 28 70 75 73 68 20 6f 62 6a 20 73 65	..........do.(progn.(push.obj.se
4440	6c 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 65 74 66 20 64 69	l)......................(setf.di
4460	72 76 69 73 68 2d 65 6d 65 72 67 65 2d 67 72 6f 75 70 73 0a 20 20 20 20 20 20 20 20 20 20 20 20	rvish-emerge-groups.............
4480	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 73 73 6f 63 2d 64 65 6c 65 74 65 2d 61 6c 6c	...............(assoc-delete-all
44a0	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 6f 72	.............................(or
44c0	65 66 20 6f 62 6a 20 64 65 73 63 72 69 70 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	ef.obj.description).............
44e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 67	................dirvish-emerge-g
4500	72 6f 75 70 73 20 23 27 65 71 75 61 6c 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 66 69 6e 61	roups.#'equal)))............fina
4520	6c 6c 79 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 73 65 6c 20 28 63 6c 2d 6c	lly............(let*.((sel.(cl-l
4540	6f 6f 70 20 66 6f 72 20 6f 20 69 6e 20 28 72 65 76 65 72 73 65 20 73 65 6c 29 20 63 6f 6c 6c 65	oop.for.o.in.(reverse.sel).colle
4560	63 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ct..............................
4580	20 20 20 28 6c 69 73 74 20 28 6f 72 65 66 20 6f 20 64 65 73 63 72 69 70 74 69 6f 6e 29 20 28 6f	...(list.(oref.o.description).(o
45a0	72 65 66 20 6f 20 72 65 63 69 70 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ref.o.recipe)...................
45c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 6f 20 68 69 64 65	....................(oref.o.hide
45e0	29 20 28 6f 72 65 66 20 6f 20 73 65 6c 65 63 74 65 64 29 29 29 29 0a 20 20 20 20 20 20 20 20 20	).(oref.o.selected))))..........
4600	20 20 20 20 20 20 20 20 20 28 67 72 6f 75 70 73 20 28 69 66 20 64 65 6d 6f 74 65 20 28 61 70 70	.........(groups.(if.demote.(app
4620	65 6e 64 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 67 72 6f 75 70 73 20 73 65 6c 29 0a 20	end.dirvish-emerge-groups.sel)..
4640	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	...............................(
4660	61 70 70 65 6e 64 20 73 65 6c 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 67 72 6f 75 70 73	append.sel.dirvish-emerge-groups
4680	29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 65 6d 65 72 67	))))..............(dirvish-emerg
46a0	65 2d 2d 75 70 64 61 74 65 2d 67 72 6f 75 70 73 20 67 72 6f 75 70 73 29 29 29 0a 20 20 28 64 69	e--update-groups.groups)))...(di
46c0	72 76 69 73 68 2d 65 6d 65 72 67 65 2d 6d 65 6e 75 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76	rvish-emerge-menu))..(defun.dirv
46e0	69 73 68 2d 65 6d 65 72 67 65 2d 2d 69 66 78 2d 72 65 61 64 20 28 29 0a 20 20 22 52 65 61 64 20	ish-emerge--ifx-read.()..."Read.
4700	67 72 6f 75 70 73 20 66 72 6f 6d 20 2e 64 69 72 2d 6c 6f 63 61 6c 73 2e 65 6c 2e 22 0a 20 20 28	groups.from..dir-locals.el."...(
4720	64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 72 65 61 64 69 6e 2d 67 72 6f 75 70 73 2d 31 20	dirvish-emerge--readin-groups-1.
4740	74 29 0a 20 20 28 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 6d 65 6e 75 29 29 0a 0a 28 64 65	t)...(dirvish-emerge-menu))..(de
4760	66 75 6e 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 69 66 78 2d 77 72 69 74 65 20 28 29	fun.dirvish-emerge--ifx-write.()
4780	0a 20 20 22 57 72 69 74 65 20 67 72 6f 75 70 73 20 74 6f 20 2e 64 69 72 2d 6c 6f 63 61 6c 73 2e	..."Write.groups.to..dir-locals.
47a0	65 6c 2e 22 0a 20 20 28 61 64 64 2d 64 69 72 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 0a 20	el."...(add-dir-local-variable..
47c0	20 20 27 64 69 72 65 64 2d 6d 6f 64 65 20 27 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 67 72	..'dired-mode.'dirvish-emerge-gr
47e0	6f 75 70 73 0a 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 6f 20 69 6e 20 74 72 61 6e 73 69	oups....(cl-loop.for.o.in.transi
4800	65 6e 74 2d 63 75 72 72 65 6e 74 2d 73 75 66 66 69 78 65 73 0a 20 20 20 20 20 20 20 20 20 20 20	ent-current-suffixes............
4820	20 77 68 65 6e 20 28 65 71 20 28 74 79 70 65 2d 6f 66 20 6f 29 20 27 64 69 72 76 69 73 68 2d 65	.when.(eq.(type-of.o).'dirvish-e
4840	6d 65 72 67 65 2d 67 72 6f 75 70 29 20 63 6f 6c 6c 65 63 74 0a 20 20 20 20 20 20 20 20 20 20 20	merge-group).collect............
4860	20 28 6c 69 73 74 20 28 6f 72 65 66 20 6f 20 64 65 73 63 72 69 70 74 69 6f 6e 29 20 28 6f 72 65	.(list.(oref.o.description).(ore
4880	66 20 6f 20 72 65 63 69 70 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f	f.o.recipe)...................(o
48a0	72 65 66 20 6f 20 68 69 64 65 29 20 28 6f 72 65 66 20 6f 20 73 65 6c 65 63 74 65 64 29 29 29 29	ref.o.hide).(oref.o.selected))))
48c0	29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 72 65 61 64 69 6e	)..(defun.dirvish-emerge--readin
48e0	2d 67 72 6f 75 70 73 2d 31 20 28 26 6f 70 74 69 6f 6e 61 6c 20 72 65 2d 72 65 61 64 29 0a 20 20	-groups-1.(&optional.re-read)...
4900	22 48 65 6c 70 65 72 20 66 6f 72 20 60 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 72 65 61	"Helper.for.`dirvish-emerge--rea
4920	64 69 6e 2d 67 72 6f 75 70 73 27 2e 0a 57 68 65 6e 20 52 45 2d 52 45 41 44 2c 20 72 65 61 64 20	din-groups'..When.RE-READ,.read.
4940	67 72 6f 75 70 73 20 66 72 6f 6d 20 2e 64 69 72 2d 6c 6f 63 61 6c 73 2e 65 6c 20 72 65 67 61 72	groups.from..dir-locals.el.regar
4960	64 6c 65 73 73 20 6f 66 20 63 61 63 68 65 2e 22 0a 20 20 28 6c 65 74 20 28 28 64 69 72 2d 6c 6f	dless.of.cache."...(let.((dir-lo
4980	63 61 6c 73 2d 64 69 72 65 63 74 6f 72 79 2d 63 61 63 68 65 0a 20 20 20 20 20 20 20 20 20 28 69	cals-directory-cache..........(i
49a0	66 20 72 65 2d 72 65 61 64 20 6e 69 6c 20 64 69 72 2d 6c 6f 63 61 6c 73 2d 64 69 72 65 63 74 6f	f.re-read.nil.dir-locals-directo
49c0	72 79 2d 63 61 63 68 65 29 29 29 0a 20 20 20 20 28 68 61 63 6b 2d 64 69 72 2d 6c 6f 63 61 6c 2d	ry-cache))).....(hack-dir-local-
49e0	76 61 72 69 61 62 6c 65 73 29 29 0a 20 20 28 6c 65 74 2a 20 28 28 64 69 72 2d 6c 6f 63 61 6c 20	variables))...(let*.((dir-local.
4a00	28 63 64 72 20 28 61 73 73 71 20 27 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 67 72 6f 75 70	(cdr.(assq.'dirvish-emerge-group
4a20	73 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	s...............................
4a40	20 66 69 6c 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 73 2d 61 6c 69 73 74 29 29 29 0a 20	.file-local-variables-alist)))..
4a60	20 20 20 20 20 20 20 20 28 67 72 6f 75 70 73 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20	........(groups...........(cond.
4a80	28 72 65 2d 72 65 61 64 20 64 69 72 2d 6c 6f 63 61 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	(re-read.dir-local).............
4aa0	20 20 20 20 28 28 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 2d 69 66 2d 73 65 74 2d 70 20 27 64	....((local-variable-if-set-p.'d
4ac0	69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 67 72 6f 75 70 73 29 0a 20 20 20 20 20 20 20 20 20 20	irvish-emerge-groups)...........
4ae0	20 20 20 20 20 20 20 28 62 75 66 66 65 72 2d 6c 6f 63 61 6c 2d 76 61 6c 75 65 20 27 64 69 72 76	.......(buffer-local-value.'dirv
4b00	69 73 68 2d 65 6d 65 72 67 65 2d 67 72 6f 75 70 73 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65	ish-emerge-groups.(current-buffe
4b20	72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 2d 6c 6f 63 61 6c 20	r))).................(dir-local.
4b40	64 69 72 2d 6c 6f 63 61 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 20 28 64	dir-local).................(t.(d
4b60	65 66 61 75 6c 74 2d 76 61 6c 75 65 20 27 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 67 72 6f	efault-value.'dirvish-emerge-gro
4b80	75 70 73 29 29 29 29 29 0a 20 20 20 20 28 68 61 63 6b 2d 6f 6e 65 2d 6c 6f 63 61 6c 2d 76 61 72	ups))))).....(hack-one-local-var
4ba0	69 61 62 6c 65 20 27 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 67 72 6f 75 70 73 20 67 72 6f	iable.'dirvish-emerge-groups.gro
4bc0	75 70 73 29 0a 20 20 20 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 65 6d 65 72 67 65 2d 70	ups).....(dirvish-prop.:emerge-p
4be0	72 65 64 73 0a 20 20 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 69 64 78 20 66 72 6f 6d	reds.......(cl-loop.for.idx.from
4c00	20 30 20 74 6f 20 28 31 2d 20 28 6c 65 6e 67 74 68 20 67 72 6f 75 70 73 29 29 0a 20 20 20 20 20	.0.to.(1-.(length.groups))......
4c20	20 20 20 20 20 20 20 20 20 20 66 6f 72 20 28 5f 64 65 73 63 20 72 65 63 69 70 65 29 20 69 6e 20	..........for.(_desc.recipe).in.
4c40	67 72 6f 75 70 73 20 63 6f 6c 6c 65 63 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63	groups.collect................(c
4c60	6f 6e 73 20 69 64 78 20 28 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 6d 61 6b 65 2d 70 72	ons.idx.(dirvish-emerge--make-pr
4c80	65 64 20 72 65 63 69 70 65 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d	ed.recipe))))))..(defun.dirvish-
4ca0	65 6d 65 72 67 65 2d 2d 72 65 61 64 69 6e 2d 67 72 6f 75 70 73 20 28 26 6f 70 74 69 6f 6e 61 6c	emerge--readin-groups.(&optional
4cc0	20 5f 64 76 20 5f 65 6e 74 72 79 20 62 75 66 66 65 72 29 0a 20 20 22 52 65 61 64 69 6e 20 65 6d	._dv._entry.buffer)..."Readin.em
4ce0	65 72 67 65 20 67 72 6f 75 70 73 20 69 6e 20 42 55 46 46 45 52 20 66 6f 72 20 73 65 73 73 69 6f	erge.groups.in.BUFFER.for.sessio
4d00	6e 20 44 56 2e 22 0a 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 28 6f	n.DV."...(with-current-buffer.(o
4d20	72 20 62 75 66 66 65 72 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 0a 20 20 20 20 28	r.buffer.(current-buffer)).....(
4d40	64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 72 65 61 64 69 6e 2d 67 72 6f 75 70 73 2d 31 29	dirvish-emerge--readin-groups-1)
4d60	29 29 0a 0a 28 64 65 66 76 61 72 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 67 72 6f 75 70	))..(defvar.dirvish-emerge-group
4d80	2d 68 65 61 64 69 6e 67 2d 6d 61 70 0a 20 20 28 6c 65 74 20 28 28 6d 61 70 20 28 6d 61 6b 65 2d	-heading-map...(let.((map.(make-
4da0	73 70 61 72 73 65 2d 6b 65 79 6d 61 70 29 29 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79	sparse-keymap))).....(define-key
4dc0	20 6d 61 70 20 28 6b 62 64 20 22 54 41 42 22 29 20 27 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65	.map.(kbd."TAB").'dirvish-emerge
4de0	2d 74 6f 67 67 6c 65 2d 63 75 72 72 65 6e 74 2d 67 72 6f 75 70 29 0a 20 20 20 20 6d 61 70 29 0a	-toggle-current-group).....map).
4e00	20 20 22 4b 65 79 6d 61 70 20 75 73 65 64 20 77 68 65 6e 20 6f 76 65 72 20 61 20 67 72 6f 75 70	.."Keymap.used.when.over.a.group
4e20	20 68 65 61 64 69 6e 67 2e 22 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 65 6d 65 72	.heading.")..(defun.dirvish-emer
4e40	67 65 2d 2d 67 72 6f 75 70 2d 68 65 61 64 69 6e 67 20 28 64 65 73 63 20 68 69 64 65 29 0a 20 20	ge--group-heading.(desc.hide)...
4e60	22 46 6f 72 6d 61 74 20 65 6d 65 72 67 65 20 67 72 6f 75 70 20 68 65 61 64 69 6e 67 20 69 6e 20	"Format.emerge.group.heading.in.
4e80	44 69 72 76 69 73 68 20 62 75 66 66 65 72 2e 0a 44 45 53 43 20 61 6e 64 20 48 49 44 45 20 61 72	Dirvish.buffer..DESC.and.HIDE.ar
4ea0	65 20 74 68 65 20 67 72 6f 75 70 20 74 69 74 6c 65 20 61 6e 64 20 76 69 73 69 62 69 6c 69 74 79	e.the.group.title.and.visibility
4ec0	20 72 65 73 70 65 63 74 69 76 65 6c 79 2e 22 0a 20 20 28 6c 65 74 20 28 28 70 72 65 66 69 78 20	.respectively."...(let.((prefix.
4ee0	28 70 72 6f 70 65 72 74 69 7a 65 20 22 20 22 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 66 61 63 65 0a	(propertize.".".'font-lock-face.
4f00	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 28 3a 69	............................'(:i
4f20	6e 68 65 72 69 74 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 67 72 6f 75 70 2d 74 69 74 6c	nherit.dirvish-emerge-group-titl
4f40	65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	e...............................
4f60	20 20 20 20 20 20 20 20 20 3a 73 74 72 69 6b 65 2d 74 68 72 6f 75 67 68 20 74 29 29 29 0a 20 20	.........:strike-through.t)))...
4f80	20 20 20 20 20 20 28 74 69 74 6c 65 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28 66 6f 72 6d 61 74	......(title.(propertize.(format
4fa0	20 22 20 25 73 25 73 20 22 20 64 65 73 63 20 28 69 66 20 68 69 64 65 20 22 20 28 48 69 64 64 65	.".%s%s.".desc.(if.hide.".(Hidde
4fc0	6e 29 22 20 22 22 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	n)".""))........................
4fe0	20 20 20 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 66 61 63 65 20 27 64 69 72 76 69 73 68 2d 65 6d 65	....'font-lock-face.'dirvish-eme
5000	72 67 65 2d 67 72 6f 75 70 2d 74 69 74 6c 65 29 29 0a 20 20 20 20 20 20 20 20 28 73 75 66 66 69	rge-group-title)).........(suffi
5020	78 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 20 22 20 27 64 69 73 70 6c 61 79 20 27 28 73 70 61	x.(propertize.".".'display.'(spa
5040	63 65 20 3a 61 6c 69 67 6e 2d 74 6f 20 72 69 67 68 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	ce.:align-to.right).............
5060	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 66 61 63 65 0a	................'font-lock-face.
5080	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 28 3a 69	............................'(:i
50a0	6e 68 65 72 69 74 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 67 72 6f 75 70 2d 74 69 74 6c	nherit.dirvish-emerge-group-titl
50c0	65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	e...............................
50e0	20 20 20 20 20 20 20 20 20 3a 73 74 72 69 6b 65 2d 74 68 72 6f 75 67 68 20 74 29 29 29 29 0a 20	.........:strike-through.t))))..
5100	20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28 66 6f 72 6d 61 74 20 22 25 73 25 73 25 73 5c 6e	...(propertize.(format."%s%s%s\n
5120	22 20 70 72 65 66 69 78 20 74 69 74 6c 65 20 73 75 66 66 69 78 29 0a 20 20 20 20 20 20 20 20 20	".prefix.title.suffix)..........
5140	20 20 20 20 20 20 20 27 6b 65 79 6d 61 70 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 67 72	.......'keymap.dirvish-emerge-gr
5160	6f 75 70 2d 68 65 61 64 69 6e 67 2d 6d 61 70 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69	oup-heading-map)))..(defun.dirvi
5180	73 68 2d 65 6d 65 72 67 65 2d 2d 69 6e 73 65 72 74 2d 67 72 6f 75 70 20 28 67 72 6f 75 70 29 0a	sh-emerge--insert-group.(group).
51a0	20 20 22 49 6e 73 65 72 74 20 61 6e 20 69 6e 64 69 76 69 64 75 61 6c 20 47 52 4f 55 50 20 74 6f	.."Insert.an.individual.GROUP.to
51c0	20 62 75 66 66 65 72 2e 22 0a 20 20 28 70 63 61 73 65 2d 6c 65 74 2a 20 28 28 60 28 2c 69 64 78	.buffer."...(pcase-let*.((`(,idx
51e0	20 2c 64 65 73 63 20 2c 68 69 64 65 20 2c 66 69 6c 65 73 29 20 67 72 6f 75 70 29 0a 20 20 20 20	.,desc.,hide.,files).group).....
5200	20 20 20 20 20 20 20 20 20 20 20 28 62 65 67 20 28 70 6f 69 6e 74 29 29 20 28 65 6d 70 74 79 20	...........(beg.(point)).(empty.
5220	6e 69 6c 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 6c 69 73 74 70 20 66 69 6c 65 73 29 0a 20 20	nil)).....(when.(listp.files)...
5240	20 20 20 20 28 73 65 74 71 20 65 6d 70 74 79 20 28 6e 6f 74 20 66 69 6c 65 73 29 0a 20 20 20 20	....(setq.empty.(not.files).....
5260	20 20 20 20 20 20 20 20 66 69 6c 65 73 20 28 6d 61 70 63 6f 6e 63 61 74 20 23 27 63 6f 6e 63 61	........files.(mapconcat.#'conca
5280	74 20 28 6e 72 65 76 65 72 73 65 20 66 69 6c 65 73 29 20 22 22 29 29 29 0a 20 20 20 20 28 75 6e	t.(nreverse.files).""))).....(un
52a0	6c 65 73 73 20 65 6d 70 74 79 20 28 69 6e 73 65 72 74 20 28 64 69 72 76 69 73 68 2d 65 6d 65 72	less.empty.(insert.(dirvish-emer
52c0	67 65 2d 2d 67 72 6f 75 70 2d 68 65 61 64 69 6e 67 20 64 65 73 63 20 68 69 64 65 29 29 29 0a 20	ge--group-heading.desc.hide)))..
52e0	20 20 20 28 75 6e 6c 65 73 73 20 68 69 64 65 20 28 69 6e 73 65 72 74 20 66 69 6c 65 73 29 29 0a	...(unless.hide.(insert.files)).
5300	20 20 20 20 28 6c 65 74 20 28 28 6f 20 28 6d 61 6b 65 2d 6f 76 65 72 6c 61 79 20 62 65 67 20 28	....(let.((o.(make-overlay.beg.(
5320	70 6f 69 6e 74 29 29 29 29 0a 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 20 27	point)))).......(overlay-put.o.'
5340	65 76 61 70 6f 72 61 74 65 20 74 29 0a 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74 20	evaporate.t).......(overlay-put.
5360	6f 20 27 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	o.'dirvish-emerge...............
5380	20 20 20 20 20 28 6c 69 73 74 20 69 64 78 20 64 65 73 63 20 68 69 64 65 20 28 75 6e 6c 65 73 73	.....(list.idx.desc.hide.(unless
53a0	20 65 6d 70 74 79 20 66 69 6c 65 73 29 20 65 6d 70 74 79 29 29 0a 20 20 20 20 20 20 28 70 75 73	.empty.files).empty)).......(pus
53c0	68 20 6f 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 67 72 6f 75 70 2d 6f 76 65 72 6c 61	h.o.dirvish-emerge--group-overla
53e0	79 73 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 69	ys))))..(defun.dirvish-emerge--i
5400	6e 73 65 72 74 2d 67 72 6f 75 70 73 20 28 67 72 6f 75 70 73 20 26 6f 70 74 69 6f 6e 61 6c 20 70	nsert-groups.(groups.&optional.p
5420	6f 73 20 62 65 67 20 65 6e 64 29 0a 20 20 22 49 6e 73 65 72 74 20 47 52 4f 55 50 53 20 74 68 65	os.beg.end)..."Insert.GROUPS.the
5440	6e 20 72 65 73 75 6d 65 20 63 75 72 73 6f 72 20 74 6f 20 50 4f 53 2e 0a 50 4f 53 20 63 61 6e 20	n.resume.cursor.to.POS..POS.can.
5460	62 65 20 61 20 69 6e 74 65 67 65 72 20 6f 72 20 66 69 6c 65 6e 61 6d 65 2e 0a 42 45 47 20 61 6e	be.a.integer.or.filename..BEG.an
5480	64 20 45 4e 44 20 64 65 74 65 72 6d 69 6e 65 20 74 68 65 20 62 6f 75 6e 64 61 72 79 20 6f 66 20	d.END.determine.the.boundary.of.
54a0	67 72 6f 75 70 73 2e 22 0a 20 20 28 75 6e 6c 65 73 73 20 28 6f 72 20 62 65 67 20 65 6e 64 29 0a	groups."...(unless.(or.beg.end).
54c0	20 20 20 20 28 73 65 74 71 20 62 65 67 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 63 6f 6e	....(setq.beg.(dirvish-prop.:con
54e0	74 65 6e 74 2d 62 65 67 69 6e 29 0a 20 20 20 20 20 20 20 20 20 20 65 6e 64 20 28 2d 20 28 64 69	tent-begin)...........end.(-.(di
5500	72 65 64 2d 73 75 62 64 69 72 2d 6d 61 78 29 20 28 69 66 20 28 63 64 72 20 64 69 72 65 64 2d 73	red-subdir-max).(if.(cdr.dired-s
5520	75 62 64 69 72 2d 61 6c 69 73 74 29 20 31 20 30 29 29 29 29 0a 20 20 28 77 69 74 68 2d 73 69 6c	ubdir-alist).1.0))))...(with-sil
5540	65 6e 74 2d 6d 6f 64 69 66 69 63 61 74 69 6f 6e 73 0a 20 20 20 20 28 73 65 74 71 20 64 69 72 76	ent-modifications.....(setq.dirv
5560	69 73 68 2d 65 6d 65 72 67 65 2d 2d 67 72 6f 75 70 2d 6f 76 65 72 6c 61 79 73 20 6e 69 6c 29 0a	ish-emerge--group-overlays.nil).
5580	20 20 20 20 28 64 65 6c 65 74 65 2d 72 65 67 69 6f 6e 20 62 65 67 20 65 6e 64 29 0a 20 20 20 20	....(delete-region.beg.end).....
55a0	28 6d 61 70 63 20 23 27 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 69 6e 73 65 72 74 2d 67	(mapc.#'dirvish-emerge--insert-g
55c0	72 6f 75 70 20 67 72 6f 75 70 73 29 0a 20 20 20 20 28 73 65 74 71 20 64 69 72 76 69 73 68 2d 65	roup.groups).....(setq.dirvish-e
55e0	6d 65 72 67 65 2d 2d 67 72 6f 75 70 2d 6f 76 65 72 6c 61 79 73 0a 20 20 20 20 20 20 20 20 20 20	merge--group-overlays...........
5600	28 6e 72 65 76 65 72 73 65 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 67 72 6f 75 70 2d	(nreverse.dirvish-emerge--group-
5620	6f 76 65 72 6c 61 79 73 29 29 29 0a 20 20 28 63 6f 6e 64 20 28 28 6e 75 6d 62 65 72 70 20 70 6f	overlays)))...(cond.((numberp.po
5640	73 29 20 28 67 6f 74 6f 2d 63 68 61 72 20 70 6f 73 29 29 0a 20 20 20 20 20 20 20 20 28 28 73 74	s).(goto-char.pos)).........((st
5660	72 69 6e 67 70 20 70 6f 73 29 20 28 64 69 72 65 64 2d 67 6f 74 6f 2d 66 69 6c 65 20 70 6f 73 29	ringp.pos).(dired-goto-file.pos)
5680	29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 61 70 70 6c	)))..(defun.dirvish-emerge--appl
56a0	79 2d 31 20 28 70 72 65 64 73 29 0a 20 20 22 48 65 6c 70 65 72 20 66 6f 72 20 60 64 69 72 76 69	y-1.(preds)..."Helper.for.`dirvi
56c0	73 68 2d 65 6d 65 72 67 65 2d 2d 61 70 70 6c 79 27 2e 0a 50 52 45 44 53 20 61 72 65 20 6c 6f 63	sh-emerge--apply'..PREDS.are.loc
56e0	61 6c 6c 79 20 63 6f 6d 70 6f 73 65 64 20 70 72 65 64 69 63 61 74 65 73 2e 22 0a 20 20 28 6c 65	ally.composed.predicates."...(le
5700	74 20 28 28 6f 6c 64 2d 66 69 6c 65 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 69 6e 64 65	t.((old-file.(dirvish-prop.:inde
5720	78 29 29 0a 20 20 20 20 20 20 20 20 28 67 72 6f 75 70 73 20 28 63 6c 2d 6c 6f 6f 70 0a 20 20 20	x)).........(groups.(cl-loop....
5740	20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 69 74 68 20 67 72 73 20 3d 20 28 61 70 70 65 6e 64	..............with.grs.=.(append
5760	20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 67 72 6f 75 70 73 0a 20 20 20 20 20 20 20 20 20	.dirvish-emerge-groups..........
5780	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 28 28 22 2d	...........................'(("-
57a0	22 20 6e 69 6c 20 6e 69 6c 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f	".nil.nil)))..................fo
57c0	72 20 69 20 66 72 6f 6d 20 30 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20	r.i.from.0..................for.
57e0	28 64 65 73 63 20 5f 20 68 69 64 65 29 20 69 6e 20 67 72 73 0a 20 20 20 20 20 20 20 20 20 20 20	(desc._.hide).in.grs............
5800	20 20 20 20 20 20 63 6f 6c 6c 65 63 74 20 28 6c 69 73 74 20 69 20 64 65 73 63 20 68 69 64 65 20	......collect.(list.i.desc.hide.
5820	27 28 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 62 65 67 20 28 70 72 6f 67 6e 20 28 67 6f 74 6f	'()))).........(beg.(progn.(goto
5840	2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70	-char.(point-min)).(dirvish-prop
5860	20 3a 63 6f 6e 74 65 6e 74 2d 62 65 67 69 6e 29 29 29 0a 20 20 20 20 20 20 20 20 28 65 6e 64 20	.:content-begin))).........(end.
5880	28 2d 20 28 64 69 72 65 64 2d 73 75 62 64 69 72 2d 6d 61 78 29 20 28 69 66 20 28 63 64 72 20 64	(-.(dired-subdir-max).(if.(cdr.d
58a0	69 72 65 64 2d 73 75 62 64 69 72 2d 61 6c 69 73 74 29 20 31 20 30 29 29 29 0a 20 20 20 20 20 20	ired-subdir-alist).1.0))).......
58c0	20 20 28 6d 61 78 2d 69 64 78 20 28 6c 65 6e 67 74 68 20 70 72 65 64 73 29 29 0a 20 20 20 20 20	..(max-idx.(length.preds))......
58e0	20 20 20 28 64 69 72 20 28 66 69 6c 65 2d 6c 6f 63 61 6c 2d 6e 61 6d 65 20 28 64 69 72 65 64 2d	...(dir.(file-local-name.(dired-
5900	63 75 72 72 65 6e 74 2d 64 69 72 65 63 74 6f 72 79 29 29 29 29 0a 20 20 20 20 28 77 68 69 6c 65	current-directory)))).....(while
5920	20 28 3c 20 28 70 6f 69 6e 74 29 20 65 6e 64 29 0a 20 20 20 20 20 20 28 77 68 65 6e 2d 6c 65 74	.(<.(point).end).......(when-let
5940	20 28 28 66 2d 62 65 67 20 28 64 69 72 65 64 2d 6d 6f 76 65 2d 74 6f 2d 66 69 6c 65 6e 61 6d 65	.((f-beg.(dired-move-to-filename
5960	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 2d 65 6e 64 20 28 64 69 72 65	))..................(f-end.(dire
5980	64 2d 6d 6f 76 65 2d 74 6f 2d 65 6e 64 2d 6f 66 2d 66 69 6c 65 6e 61 6d 65 29 29 29 0a 20 20 20	d-move-to-end-of-filename)))....
59a0	20 20 20 20 20 28 6c 65 74 2a 20 28 28 6c 2d 62 65 67 20 28 6c 69 6e 65 2d 62 65 67 69 6e 6e 69	.....(let*.((l-beg.(line-beginni
59c0	6e 67 2d 70 6f 73 69 74 69 6f 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 2d	ng-position))................(l-
59e0	65 6e 64 20 28 31 2b 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 29 29 29 0a 20 20	end.(1+.(line-end-position)))...
5a00	20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 63 61 6c 20 28 62 75 66 66 65 72 2d 73 75 62 73	.............(local.(buffer-subs
5a20	74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 66 2d 62 65 67 20 66 2d 65 6e 64 29	tring-no-properties.f-beg.f-end)
5a40	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6c 6c 20 28 63 6f 6e 63 61 74 20 64	)................(full.(concat.d
5a60	69 72 20 6c 6f 63 61 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 79 70 65 20	ir.local))................(type.
5a80	28 64 69 72 76 69 73 68 2d 61 74 74 72 69 62 75 74 65 2d 63 61 63 68 65 20 66 75 6c 6c 20 3a 74	(dirvish-attribute-cache.full.:t
5aa0	79 70 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 74 74 72 73 20 28 64 69 72	ype))................(attrs.(dir
5ac0	76 69 73 68 2d 61 74 74 72 69 62 75 74 65 2d 63 61 63 68 65 20 66 75 6c 6c 20 3a 62 75 69 6c 74	vish-attribute-cache.full.:built
5ae0	69 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 74 63 68 20 28 63 6c 2d 6c	in))................(match.(cl-l
5b00	6f 6f 70 20 66 6f 72 20 28 69 6e 64 65 78 20 2e 20 66 6e 29 20 69 6e 20 70 72 65 64 73 0a 20 20	oop.for.(index...fn).in.preds...
5b20	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 66 6f 72	.............................for
5b40	20 6d 61 74 63 68 20 3d 20 28 66 75 6e 63 61 6c 6c 20 66 6e 20 6c 6f 63 61 6c 20 66 75 6c 6c 20	.match.=.(funcall.fn.local.full.
5b60	74 79 70 65 20 61 74 74 72 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	type.attrs).....................
5b80	20 20 20 20 20 20 20 20 20 20 20 74 68 65 72 65 69 73 20 28 61 6e 64 20 6d 61 74 63 68 20 69 6e	...........thereis.(and.match.in
5ba0	64 65 78 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 28 62 75 66 66 65 72 2d	dex))))...........(push.(buffer-
5bc0	73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 6c 2d 62 65 67 20 6c 2d	substring-no-properties.l-beg.l-
5be0	65 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 74 68 20 33 20 28 6e 74 68	end).................(nth.3.(nth
5c00	20 28 6f 72 20 6d 61 74 63 68 20 6d 61 78 2d 69 64 78 29 20 67 72 6f 75 70 73 29 29 29 29 29 0a	.(or.match.max-idx).groups))))).
5c20	20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 31 29 29 0a 20 20 20 20 28 64 69 72	......(forward-line.1)).....(dir
5c40	76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 69 6e 73 65 72 74 2d 67 72 6f 75 70 73 20 67 72 6f 75 70	vish-emerge--insert-groups.group
5c60	73 20 6f 6c 64 2d 66 69 6c 65 20 62 65 67 20 65 6e 64 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69	s.old-file.beg.end)))..(defun.di
5c80	72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 61 70 70 6c 79 20 28 29 0a 20 20 22 52 65 61 64 69 6e	rvish-emerge--apply.()..."Readin
5ca0	20 60 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 67 72 6f 75 70 73 27 20 61 6e 64 20 61 70 70	.`dirvish-emerge-groups'.and.app
5cc0	6c 79 20 74 68 65 6d 2e 22 0a 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 6e 6f 74 20 28 64 69 72	ly.them."...(when.(and.(not.(dir
5ce0	76 69 73 68 2d 70 72 6f 70 20 3a 66 64 2d 61 72 67 6c 69 73 74 29 29 0a 20 20 20 20 20 20 20 20	vish-prop.:fd-arglist)).........
5d00	20 20 20 20 20 28 6f 72 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 66 6f 72 63 65 2d 65 6d	.....(or.(dirvish-prop.:force-em
5d20	65 72 67 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3c 20 28 68 61 73 68 2d	erge)..................(<.(hash-
5d40	74 61 62 6c 65 2d 63 6f 75 6e 74 20 64 69 72 76 69 73 68 2d 2d 61 74 74 72 73 2d 68 61 73 68 29	table-count.dirvish--attrs-hash)
5d60	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 76 69 73 68 2d 65 6d 65	.....................dirvish-eme
5d80	72 67 65 2d 6d 61 78 2d 66 69 6c 65 2d 63 6f 75 6e 74 29 29 29 0a 20 20 20 20 28 64 69 72 76 69	rge-max-file-count))).....(dirvi
5da0	73 68 2d 65 6d 65 72 67 65 2d 2d 72 65 61 64 69 6e 2d 67 72 6f 75 70 73 29 0a 20 20 20 20 28 77	sh-emerge--readin-groups).....(w
5dc0	68 65 6e 2d 6c 65 74 20 28 28 70 72 65 64 73 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 65	hen-let.((preds.(dirvish-prop.:e
5de0	6d 65 72 67 65 2d 70 72 65 64 73 29 29 29 0a 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 65 6d	merge-preds))).......(dirvish-em
5e00	65 72 67 65 2d 2d 61 70 70 6c 79 2d 31 20 70 72 65 64 73 29 29 29 29 0a 0a 3b 3b 3b 3b 20 49 6e	erge--apply-1.preds))))..;;;;.In
5e20	74 65 72 61 63 74 69 76 65 20 63 6f 6d 6d 61 6e 64 73 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f	teractive.commands..;;;###autolo
5e40	61 64 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 6d 65 6e 75 20 28 29	ad.(defun.dirvish-emerge-menu.()
5e60	0a 20 20 22 4d 61 6e 61 67 65 20 70 69 6e 6e 65 64 20 66 69 6c 65 73 20 69 6e 20 44 69 72 76 69	..."Manage.pinned.files.in.Dirvi
5e80	73 68 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 76 69 73 68 2d	sh."...(interactive)...(dirvish-
5ea0	65 6d 65 72 67 65 2d 2d 72 65 61 64 69 6e 2d 67 72 6f 75 70 73 29 0a 20 20 28 65 76 61 6c 0a 20	emerge--readin-groups)...(eval..
5ec0	20 20 60 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 70 72 65 66 69 78 20 64 69 72 76	..`(transient-define-prefix.dirv
5ee0	69 73 68 2d 65 6d 65 72 67 65 2d 2d 6d 65 6e 75 20 28 29 0a 20 20 20 20 20 20 22 4d 61 6e 61 67	ish-emerge--menu.()......."Manag
5f00	65 20 70 69 6e 6e 65 64 20 66 69 6c 65 73 20 69 6e 20 44 69 72 76 69 73 68 2e 22 0a 20 20 20 20	e.pinned.files.in.Dirvish.".....
5f20	20 20 5b 3a 64 65 73 63 72 69 70 74 69 6f 6e 0a 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28	..[:description........(lambda.(
5f40	29 20 28 64 69 72 76 69 73 68 2d 2d 66 6f 72 6d 61 74 2d 6d 65 6e 75 2d 68 65 61 64 69 6e 67 0a	).(dirvish--format-menu-heading.
5f60	20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 4d 61 6e 61 67 65 20 45 6d 65 72 67 69 6e 67 20 47	.............."Manage.Emerging.G
5f80	72 6f 75 70 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 50 72 65 73 73 20 74 68 65 20	roups"..............."Press.the.
5fa0	69 6e 64 65 78 20 28 6c 69 6b 65 20 5c 22 31 5c 22 29 20 74 6f 20 73 65 6c 65 63 74 20 74 68 65	index.(like.\"1\").to.select.the
5fc0	20 67 72 6f 75 70 0a 50 72 65 73 73 20 61 67 61 69 6e 20 74 6f 20 73 65 74 20 74 68 65 20 76 61	.group.Press.again.to.set.the.va
5fe0	6c 75 65 20 66 6f 72 20 74 68 65 20 67 72 6f 75 70 22 29 29 0a 20 20 20 20 20 20 20 5b 22 41 63	lue.for.the.group"))........["Ac
6000	74 69 76 65 20 67 72 6f 75 70 73 3a 22 0a 20 20 20 20 20 20 20 20 2c 40 28 69 66 20 64 69 72 76	tive.groups:".........,@(if.dirv
6020	69 73 68 2d 65 6d 65 72 67 65 2d 67 72 6f 75 70 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ish-emerge-groups...............
6040	28 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 63 72 65 61 74 65 2d 69 6e 66 69 78 65 73 29	(dirvish-emerge--create-infixes)
6060	0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 27 28 22 2b 22 20 22 20 20 50 72 65 73	.............(list.'("+"."..Pres
6080	73 20 2b 20 74 6f 20 61 64 64 20 61 20 67 72 6f 75 70 22 0a 20 20 20 20 20 20 20 20 20 20 20 20	s.+.to.add.a.group".............
60a0	20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 29 20 28 69 6e 74 65 72 61 63 74 69 76 65 29	........(lambda.().(interactive)
60c0	20 28 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 69 66 78 2d 61 64 64 29 29 29 29 29 5d 0a	.(dirvish-emerge--ifx-add)))))].
60e0	20 20 20 20 20 20 20 5b 22 41 63 74 69 6f 6e 73 3a 22 0a 20 20 20 20 20 20 20 20 28 22 52 45 54	.......["Actions:".........("RET
6100	22 20 22 41 70 70 6c 79 20 63 75 72 72 65 6e 74 20 73 65 74 75 70 22 20 28 6c 61 6d 62 64 61 20	"."Apply.current.setup".(lambda.
6120	28 29 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65	().(interactive).(dirvish-emerge
6140	2d 2d 69 66 78 2d 61 70 70 6c 79 29 29 29 0a 20 20 20 20 20 20 20 20 28 22 75 22 20 22 20 20 55	--ifx-apply))).........("u"."..U
6160	6e 73 65 6c 65 63 74 20 61 6c 6c 20 67 72 6f 75 70 73 22 0a 20 20 20 20 20 20 20 20 20 28 6c 61	nselect.all.groups"..........(la
6180	6d 62 64 61 20 28 29 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 64 69 72 76 69 73 68 2d 65	mbda.().(interactive).(dirvish-e
61a0	6d 65 72 67 65 2d 2d 69 66 78 2d 75 6e 73 65 6c 65 63 74 29 29 20 3a 74 72 61 6e 73 69 65 6e 74	merge--ifx-unselect)).:transient
61c0	20 74 29 0a 20 20 20 20 20 20 20 20 28 22 76 22 20 22 20 20 54 6f 67 67 6c 65 20 76 69 73 69 62	.t).........("v"."..Toggle.visib
61e0	69 6c 69 74 79 20 6f 66 20 73 65 6c 65 63 74 65 64 22 0a 20 20 20 20 20 20 20 20 20 28 6c 61 6d	ility.of.selected"..........(lam
6200	62 64 61 20 28 29 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 64 69 72 76 69 73 68 2d 65 6d	bda.().(interactive).(dirvish-em
6220	65 72 67 65 2d 2d 69 66 78 2d 74 6f 67 67 6c 65 2d 68 69 64 69 6e 67 29 29 20 3a 74 72 61 6e 73	erge--ifx-toggle-hiding)).:trans
6240	69 65 6e 74 20 74 29 0a 20 20 20 20 20 20 20 20 28 22 61 22 20 22 20 20 41 64 64 20 61 20 67 72	ient.t).........("a"."..Add.a.gr
6260	6f 75 70 22 0a 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 29 20 28 69 6e 74 65 72 61	oup"..........(lambda.().(intera
6280	63 74 69 76 65 29 20 28 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 69 66 78 2d 61 64 64 29	ctive).(dirvish-emerge--ifx-add)
62a0	29 29 0a 20 20 20 20 20 20 20 20 28 22 78 22 20 22 20 20 52 65 6d 6f 76 65 20 73 65 6c 65 63 74	)).........("x"."..Remove.select
62c0	65 64 20 67 72 6f 75 70 73 22 0a 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 29 20 28	ed.groups"..........(lambda.().(
62e0	69 6e 74 65 72 61 63 74 69 76 65 29 20 28 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 69 66	interactive).(dirvish-emerge--if
6300	78 2d 72 65 6d 6f 76 65 29 29 29 0a 20 20 20 20 20 20 20 20 28 22 74 22 20 22 20 20 50 72 6f 6d	x-remove))).........("t"."..Prom
6320	6f 74 65 20 73 65 6c 65 63 74 65 64 20 67 72 6f 75 70 73 20 28 74 6f 70 29 22 0a 20 20 20 20 20	ote.selected.groups.(top)"......
6340	20 20 20 20 28 6c 61 6d 62 64 61 20 28 29 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 64 69	....(lambda.().(interactive).(di
6360	72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 69 66 78 2d 70 72 6f 6d 6f 74 65 29 29 29 0a 20 20 20	rvish-emerge--ifx-promote)))....
6380	20 20 20 20 20 28 22 62 22 20 22 20 20 44 65 6d 6f 74 65 20 73 65 6c 65 63 74 65 64 20 67 72 6f	.....("b"."..Demote.selected.gro
63a0	75 70 73 20 28 62 6f 74 74 6f 6d 29 22 0a 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28	ups.(bottom)"..........(lambda.(
63c0	29 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d	).(interactive).(dirvish-emerge-
63e0	2d 69 66 78 2d 70 72 6f 6d 6f 74 65 20 27 64 65 6d 6f 74 65 29 29 29 0a 20 20 20 20 20 20 20 20	-ifx-promote.'demote))).........
6400	28 22 6e 22 20 22 20 20 4a 75 6d 70 20 74 6f 20 6e 65 78 74 20 67 72 6f 75 70 22 20 64 69 72 76	("n"."..Jump.to.next.group".dirv
6420	69 73 68 2d 65 6d 65 72 67 65 2d 6e 65 78 74 2d 67 72 6f 75 70 0a 20 20 20 20 20 20 20 20 20 3a	ish-emerge-next-group..........:
6440	74 72 61 6e 73 69 65 6e 74 20 74 20 3a 69 66 20 28 6c 61 6d 62 64 61 20 28 29 20 64 69 72 76 69	transient.t.:if.(lambda.().dirvi
6460	73 68 2d 65 6d 65 72 67 65 2d 2d 67 72 6f 75 70 2d 6f 76 65 72 6c 61 79 73 29 29 0a 20 20 20 20	sh-emerge--group-overlays)).....
6480	20 20 20 20 28 22 70 22 20 22 20 20 4a 75 6d 70 20 74 6f 20 70 72 65 76 69 6f 75 73 20 67 72 6f	....("p"."..Jump.to.previous.gro
64a0	75 70 22 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 70 72 65 76 69 6f 75 73 2d 67 72 6f 75	up".dirvish-emerge-previous-grou
64c0	70 0a 20 20 20 20 20 20 20 20 20 3a 74 72 61 6e 73 69 65 6e 74 20 74 20 3a 69 66 20 28 6c 61 6d	p..........:transient.t.:if.(lam
64e0	62 64 61 20 28 29 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 67 72 6f 75 70 2d 6f 76 65	bda.().dirvish-emerge--group-ove
6500	72 6c 61 79 73 29 29 0a 20 20 20 20 20 20 20 20 28 22 72 22 20 22 20 20 52 65 61 64 20 67 72 6f	rlays)).........("r"."..Read.gro
6520	75 70 73 20 66 72 6f 6d 20 2e 64 69 72 2d 6c 6f 63 61 6c 73 2e 65 6c 22 0a 20 20 20 20 20 20 20	ups.from..dir-locals.el"........
6540	20 20 28 6c 61 6d 62 64 61 20 28 29 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 64 69 72 76	..(lambda.().(interactive).(dirv
6560	69 73 68 2d 65 6d 65 72 67 65 2d 2d 69 66 78 2d 72 65 61 64 29 29 29 0a 20 20 20 20 20 20 20 20	ish-emerge--ifx-read))).........
6580	28 22 77 22 20 22 20 20 57 72 69 74 65 20 67 72 6f 75 70 73 20 74 6f 20 2e 64 69 72 2d 6c 6f 63	("w"."..Write.groups.to..dir-loc
65a0	61 6c 73 2e 65 6c 22 0a 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 29 20 28 69 6e 74	als.el"..........(lambda.().(int
65c0	65 72 61 63 74 69 76 65 29 20 28 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 69 66 78 2d 77	eractive).(dirvish-emerge--ifx-w
65e0	72 69 74 65 29 29 29 5d 5d 29 29 0a 20 20 28 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 6d	rite)))]]))...(dirvish-emerge--m
6600	65 6e 75 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 69 6e 65 2d 6d 69	enu))..;;;###autoload.(define-mi
6620	6e 6f 72 2d 6d 6f 64 65 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 6d 6f 64 65 0a 20 20 22	nor-mode.dirvish-emerge-mode..."
6640	54 6f 67 67 6c 65 20 67 72 6f 75 70 69 6e 67 20 6f 66 20 66 69 6c 65 73 20 69 6e 20 44 69 72 76	Toggle.grouping.of.files.in.Dirv
6660	69 73 68 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 0a 20 20 28 69 66 20 64 69	ish."...:group.'dirvish...(if.di
6680	72 76 69 73 68 2d 65 6d 65 72 67 65 2d 6d 6f 64 65 0a 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20	rvish-emerge-mode.......(progn..
66a0	20 20 20 20 20 20 20 28 61 64 64 2d 68 6f 6f 6b 20 27 64 69 72 76 69 73 68 2d 73 65 74 75 70 2d	.......(add-hook.'dirvish-setup-
66c0	68 6f 6f 6b 20 23 27 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 61 70 70 6c 79 20 6e 69 6c	hook.#'dirvish-emerge--apply.nil
66e0	20 74 29 0a 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 64 69 72 76 69 73 68 2d 65 6d 65 72	.t).........(unless.dirvish-emer
6700	67 65 2d 2d 67 72 6f 75 70 2d 6f 76 65 72 6c 61 79 73 20 28 64 69 72 76 69 73 68 2d 65 6d 65 72	ge--group-overlays.(dirvish-emer
6720	67 65 2d 2d 61 70 70 6c 79 29 29 29 0a 20 20 20 20 28 72 65 6d 6f 76 65 2d 68 6f 6f 6b 20 27 64	ge--apply))).....(remove-hook.'d
6740	69 72 76 69 73 68 2d 73 65 74 75 70 2d 68 6f 6f 6b 20 23 27 64 69 72 76 69 73 68 2d 65 6d 65 72	irvish-setup-hook.#'dirvish-emer
6760	67 65 2d 2d 61 70 70 6c 79 20 74 29 0a 20 20 20 20 28 6d 61 70 63 20 23 27 64 65 6c 65 74 65 2d	ge--apply.t).....(mapc.#'delete-
6780	6f 76 65 72 6c 61 79 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 67 72 6f 75 70 2d 6f 76	overlay.dirvish-emerge--group-ov
67a0	65 72 6c 61 79 73 29 0a 20 20 20 20 28 73 65 74 71 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65	erlays).....(setq.dirvish-emerge
67c0	2d 2d 67 72 6f 75 70 2d 6f 76 65 72 6c 61 79 73 20 6e 69 6c 29 0a 20 20 20 20 28 72 65 76 65 72	--group-overlays.nil).....(rever
67e0	74 2d 62 75 66 66 65 72 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 65 6d 65 72	t-buffer)))..(defun.dirvish-emer
6800	67 65 2d 2d 67 65 74 2d 67 72 6f 75 70 2d 6f 76 65 72 6c 61 79 20 28 29 0a 20 20 22 52 65 74 75	ge--get-group-overlay.()..."Retu
6820	72 6e 20 6f 76 65 72 6c 61 79 20 66 6f 72 20 74 68 65 20 67 72 6f 75 70 20 61 74 20 70 6f 69 6e	rn.overlay.for.the.group.at.poin
6840	74 2e 22 0a 20 20 28 75 6e 6c 65 73 73 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 67 72	t."...(unless.dirvish-emerge--gr
6860	6f 75 70 2d 6f 76 65 72 6c 61 79 73 0a 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 44 69	oup-overlays.....(user-error."Di
6880	72 76 69 73 68 3a 20 6e 6f 20 67 72 6f 75 70 73 20 61 70 70 6c 69 65 64 20 68 65 72 65 22 29 29	rvish:.no.groups.applied.here"))
68a0	0a 20 20 28 6c 65 74 20 28 28 70 6f 73 20 28 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 28 63 6c 2d	...(let.((pos.(point))).....(cl-
68c0	66 69 6e 64 2d 69 66 20 28 6c 61 6d 62 64 61 20 28 6f 29 20 28 61 6e 64 20 28 6f 76 65 72 6c 61	find-if.(lambda.(o).(and.(overla
68e0	79 2d 73 74 61 72 74 20 6f 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	y-start.o)......................
6900	20 20 20 20 20 20 20 28 3c 20 70 6f 73 20 28 6f 76 65 72 6c 61 79 2d 65 6e 64 20 6f 29 29 0a 20	.......(<.pos.(overlay-end.o))..
6920	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 3e 3d 20 70	...........................(>=.p
6940	6f 73 20 28 6f 76 65 72 6c 61 79 2d 73 74 61 72 74 20 6f 29 29 29 29 0a 20 20 20 20 20 20 20 20	os.(overlay-start.o)))).........
6960	20 20 20 20 20 20 20 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 67 72 6f 75 70 2d 6f 76	........dirvish-emerge--group-ov
6980	65 72 6c 61 79 73 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65	erlays)))..(defun.dirvish-emerge
69a0	2d 6e 65 78 74 2d 67 72 6f 75 70 20 28 61 72 67 29 0a 20 20 22 4a 75 6d 70 20 74 6f 20 74 68 65	-next-group.(arg)..."Jump.to.the
69c0	20 66 69 72 73 74 20 66 69 6c 65 20 69 6e 20 74 68 65 20 6e 65 78 74 20 41 52 47 20 76 69 73 69	.first.file.in.the.next.ARG.visi
69e0	62 6c 65 20 67 72 6f 75 70 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 5e 70 22 29	ble.group."...(interactive."^p")
6a00	0a 20 20 28 6c 65 74 2a 20 28 28 6f 6c 64 2d 6f 76 20 28 64 69 72 76 69 73 68 2d 65 6d 65 72 67	...(let*.((old-ov.(dirvish-emerg
6a20	65 2d 2d 67 65 74 2d 67 72 6f 75 70 2d 6f 76 65 72 6c 61 79 29 29 0a 20 20 20 20 20 20 20 20 20	e--get-group-overlay))..........
6a40	28 6f 6c 64 2d 69 64 78 20 28 63 6c 2d 70 6f 73 69 74 69 6f 6e 20 6f 6c 64 2d 6f 76 20 64 69 72	(old-idx.(cl-position.old-ov.dir
6a60	76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 67 72 6f 75 70 2d 6f 76 65 72 6c 61 79 73 29 29 0a 20 20	vish-emerge--group-overlays))...
6a80	20 20 20 20 20 20 20 28 74 61 72 67 65 74 20 28 2b 20 6f 6c 64 2d 69 64 78 20 61 72 67 29 29 0a	.......(target.(+.old-idx.arg)).
6aa0	20 20 20 20 20 20 20 20 20 28 6c 65 6e 20 28 31 2d 20 28 6c 65 6e 67 74 68 20 64 69 72 76 69 73	.........(len.(1-.(length.dirvis
6ac0	68 2d 65 6d 65 72 67 65 2d 2d 67 72 6f 75 70 2d 6f 76 65 72 6c 61 79 73 29 29 29 0a 20 20 20 20	h-emerge--group-overlays))).....
6ae0	20 20 20 20 20 28 69 64 78 20 28 6d 61 78 20 28 6d 69 6e 20 6c 65 6e 20 74 61 72 67 65 74 29 20	.....(idx.(max.(min.len.target).
6b00	30 29 29 0a 20 20 20 20 20 20 20 20 20 28 74 61 72 67 65 74 2d 6f 76 20 28 6e 74 68 20 69 64 78	0))..........(target-ov.(nth.idx
6b20	20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 67 72 6f 75 70 2d 6f 76 65 72 6c 61 79 73 29	.dirvish-emerge--group-overlays)
6b40	29 29 0a 20 20 20 20 28 77 68 69 6c 65 20 28 61 6e 64 20 28 6e 6f 74 20 28 6f 72 20 28 3e 3d 20	)).....(while.(and.(not.(or.(>=.
6b60	69 64 78 20 6c 65 6e 29 20 28 3c 3d 20 69 64 78 20 30 29 29 29 0a 20 20 20 20 20 20 20 20 20 20	idx.len).(<=.idx.0)))...........
6b80	20 20 20 20 20 20 28 6e 6f 74 20 28 6f 76 65 72 6c 61 79 2d 73 74 61 72 74 20 74 61 72 67 65 74	......(not.(overlay-start.target
6ba0	2d 6f 76 29 29 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 69 64 78 20 28 6d 61 78 20 28 6d 69 6e	-ov))).......(setq.idx.(max.(min
6bc0	20 6c 65 6e 20 28 2b 20 69 64 78 20 28 69 66 20 28 3e 20 61 72 67 20 30 29 20 31 20 2d 31 29 29	.len.(+.idx.(if.(>.arg.0).1.-1))
6be0	29 20 30 29 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 74 61 72 67 65 74 2d 6f 76 20 28 6e 74 68	).0)).......(setq.target-ov.(nth
6c00	20 69 64 78 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 67 72 6f 75 70 2d 6f 76 65 72 6c	.idx.dirvish-emerge--group-overl
6c20	61 79 73 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 20 28 28 65 71 20 6f 6c 64 2d 69 64 78 20 69 64	ays))).....(cond.((eq.old-idx.id
6c40	78 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 28 61 6e 64 20 74 61 72 67 65 74 2d 6f 76 20 28 6f	x))...........((and.target-ov.(o
6c60	76 65 72 6c 61 79 2d 73 74 61 72 74 20 74 61 72 67 65 74 2d 6f 76 29 29 0a 20 20 20 20 20 20 20	verlay-start.target-ov))........
6c80	20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 6f 76 65 72 6c 61 79 2d 73 74 61 72 74 20 74 61	....(goto-char.(overlay-start.ta
6ca0	72 67 65 74 2d 6f 76 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 65 6d	rget-ov))))))..(defun.dirvish-em
6cc0	65 72 67 65 2d 70 72 65 76 69 6f 75 73 2d 67 72 6f 75 70 20 28 61 72 67 29 0a 20 20 22 4a 75 6d	erge-previous-group.(arg)..."Jum
6ce0	70 20 74 6f 20 74 68 65 20 66 69 72 73 74 20 66 69 6c 65 20 69 6e 20 74 68 65 20 70 72 65 76 69	p.to.the.first.file.in.the.previ
6d00	6f 75 73 20 41 52 47 20 76 69 73 69 62 6c 65 20 67 72 6f 75 70 2e 22 0a 20 20 28 69 6e 74 65 72	ous.ARG.visible.group."...(inter
6d20	61 63 74 69 76 65 20 22 5e 70 22 29 0a 20 20 28 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 6e	active."^p")...(dirvish-emerge-n
6d40	65 78 74 2d 67 72 6f 75 70 20 28 2d 20 30 20 61 72 67 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69	ext-group.(-.0.arg)))..(defun.di
6d60	72 76 69 73 68 2d 65 6d 65 72 67 65 2d 74 6f 67 67 6c 65 2d 63 75 72 72 65 6e 74 2d 67 72 6f 75	rvish-emerge-toggle-current-grou
6d80	70 20 28 29 0a 20 20 22 54 6f 67 67 6c 65 20 74 68 65 20 63 75 72 72 65 6e 74 20 67 72 6f 75 70	p.()..."Toggle.the.current.group
6da0	2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 63 6c 2d 6c 6f 6f 70 0a 20 20	."...(interactive)...(cl-loop...
6dc0	20 77 69 74 68 20 63 75 72 72 2d 6f 76 20 3d 20 28 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d	.with.curr-ov.=.(dirvish-emerge-
6de0	2d 67 65 74 2d 67 72 6f 75 70 2d 6f 76 65 72 6c 61 79 29 0a 20 20 20 77 69 74 68 20 67 72 6f 75	-get-group-overlay)....with.grou
6e00	70 73 20 3d 20 28 29 0a 20 20 20 77 69 74 68 20 70 6f 73 20 3d 20 28 69 66 20 28 64 69 72 76 69	ps.=.()....with.pos.=.(if.(dirvi
6e20	73 68 2d 70 72 6f 70 20 3a 69 6e 64 65 78 29 20 28 6f 76 65 72 6c 61 79 2d 73 74 61 72 74 20 63	sh-prop.:index).(overlay-start.c
6e40	75 72 72 2d 6f 76 29 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 66 6f 72 20 6f 20 69 6e 20 64 69 72	urr-ov).(point))....for.o.in.dir
6e60	76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 67 72 6f 75 70 2d 6f 76 65 72 6c 61 79 73 0a 20 20 20 66	vish-emerge--group-overlays....f
6e80	6f 72 20 28 69 64 78 20 64 65 73 63 20 68 69 64 65 20 66 69 6c 65 73 29 20 3d 20 28 6f 76 65 72	or.(idx.desc.hide.files).=.(over
6ea0	6c 61 79 2d 67 65 74 20 6f 20 27 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 29 0a 20 20 20 64 6f	lay-get.o.'dirvish-emerge)....do
6ec0	20 28 77 68 65 6e 20 28 65 71 20 63 75 72 72 2d 6f 76 20 6f 29 0a 20 20 20 20 20 20 20 20 28 73	.(when.(eq.curr-ov.o).........(s
6ee0	65 74 71 20 68 69 64 65 20 28 6e 6f 74 20 68 69 64 65 29 29 0a 20 20 20 20 20 20 20 20 28 6c 65	etq.hide.(not.hide)).........(le
6f00	74 20 28 28 67 72 6f 75 70 20 28 6e 74 68 20 69 64 78 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67	t.((group.(nth.idx.dirvish-emerg
6f20	65 2d 67 72 6f 75 70 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 3c 20 28 6c 65	e-groups)))...........(if.(<.(le
6f40	6e 67 74 68 20 67 72 6f 75 70 29 20 33 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c	ngth.group).3)...............(cl
6f60	2d 63 61 6c 6c 66 20 61 70 70 65 6e 64 20 67 72 6f 75 70 20 27 28 74 29 29 0a 20 20 20 20 20 20	-callf.append.group.'(t)).......
6f80	20 20 20 20 20 20 28 63 6c 2d 63 61 6c 6c 66 20 6e 6f 74 20 28 6e 74 68 20 32 20 67 72 6f 75 70	......(cl-callf.not.(nth.2.group
6fa0	29 29 29 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 68 69 64 65 0a 20 20 20 20 20 20 20 20	)))).........(when.hide.........
6fc0	20 20 28 73 65 74 71 20 66 69 6c 65 73 20 28 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 0a	..(setq.files.(buffer-substring.
6fe0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63	.......................(save-exc
7000	75 72 73 69 6f 6e 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 6f 76 65 72 6c 61 79 2d 73 74 61 72 74	ursion.(goto-char.(overlay-start
7020	20 6f 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.o))............................
7040	20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 31 29 20 28 70 6f	............(forward-line.1).(po
7060	69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 76	int))........................(ov
7080	65 72 6c 61 79 2d 65 6e 64 20 6f 29 29 29 29 29 0a 20 20 20 64 6f 20 28 70 75 73 68 20 28 6c 69	erlay-end.o)))))....do.(push.(li
70a0	73 74 20 69 64 78 20 64 65 73 63 20 68 69 64 65 20 66 69 6c 65 73 29 20 67 72 6f 75 70 73 29 0a	st.idx.desc.hide.files).groups).
70c0	20 20 20 66 69 6e 61 6c 6c 79 20 28 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 69 6e 73 65	...finally.(dirvish-emerge--inse
70e0	72 74 2d 67 72 6f 75 70 73 20 28 6e 72 65 76 65 72 73 65 20 67 72 6f 75 70 73 29 20 70 6f 73 29	rt-groups.(nreverse.groups).pos)
7100	29 29 0a 0a 28 70 72 6f 76 69 64 65 20 27 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 29 0a 3b 3b	))..(provide.'dirvish-emerge).;;
7120	3b 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00	;.dirvish-emerge.el.ends.here...
7140	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
7160	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
7180	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
71a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
71c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
71e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
7200	64 69 72 76 69 73 68 2d 32 30 32 33 30 35 31 39 2e 31 35 30 30 2f 64 69 72 76 69 73 68 2d 65 78	dirvish-20230519.1500/dirvish-ex
7220	74 72 61 73 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	tras.el.........................
7240	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
7260	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
7280	30 30 35 37 31 33 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 37 36 32 00 20 30 00 00 00	0057132.00000000000.015762..0...
72a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
72c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
72e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
7300	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...................
7320	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...................
7340	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
7360	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
7380	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
73a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
73c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
73e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
7400	3b 3b 3b 20 64 69 72 76 69 73 68 2d 65 78 74 72 61 73 2e 65 6c 20 2d 2d 2d 20 45 78 74 72 61 20	;;;.dirvish-extras.el.---.Extra.
7420	75 74 69 6c 69 74 69 65 73 20 61 6e 64 20 74 72 61 6e 73 69 65 6e 74 20 70 72 65 66 69 78 65 73	utilities.and.transient.prefixes
7440	20 66 6f 72 20 64 69 72 76 69 73 68 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67	.for.dirvish.-*-.lexical-binding
7460	3a 20 74 20 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 32 31 2d 32	:.t.-*-..;;.Copyright.(C).2021-2
7480	30 32 32 20 41 6c 65 78 20 4c 75 0a 3b 3b 20 41 75 74 68 6f 72 20 3a 20 41 6c 65 78 20 4c 75 20	022.Alex.Lu.;;.Author.:.Alex.Lu.
74a0	3c 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 61 6c 65 78 6c 75 69 67 69 74 3e 0a	<https://github.com/alexluigit>.
74c0	3b 3b 20 56 65 72 73 69 6f 6e 3a 20 32 2e 30 2e 35 33 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20	;;.Version:.2.0.53.;;.Keywords:.
74e0	66 69 6c 65 73 2c 20 63 6f 6e 76 65 6e 69 65 6e 63 65 0a 3b 3b 20 48 6f 6d 65 70 61 67 65 3a 20	files,.convenience.;;.Homepage:.
7500	68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 61 6c 65 78 6c 75 69 67 69 74 2f 64 69	https://github.com/alexluigit/di
7520	72 76 69 73 68 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d 49 64 65 6e 74 69 66 69 65 72	rvish.;;.SPDX-License-Identifier
7540	3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 65 72 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61	:.GPL-3.0-or-later..;;;.Commenta
7560	72 79 3a 0a 0a 3b 3b 20 64 69 72 76 69 73 68 2d 65 78 74 72 61 73 2e 65 6c 20 63 6f 6e 74 61 69	ry:..;;.dirvish-extras.el.contai
7580	6e 73 20 74 68 65 20 54 52 41 4d 50 20 69 6e 74 65 67 72 61 74 69 6f 6e 20 66 6f 72 20 64 69 72	ns.the.TRAMP.integration.for.dir
75a0	76 69 73 68 2c 20 69 74 20 69 73 20 6f 6e 6c 79 0a 3b 3b 20 6c 6f 61 64 65 64 20 61 66 74 65 72	vish,.it.is.only.;;.loaded.after
75c0	20 61 20 54 52 41 4d 50 20 63 6f 6e 6e 65 63 74 69 6f 6e 20 69 73 20 69 6e 69 74 69 61 74 65 64	.a.TRAMP.connection.is.initiated
75e0	2e 20 20 42 65 73 69 64 65 73 2c 20 69 74 20 70 72 6f 76 69 64 65 73 20 73 6f 6d 65 0a 3b 3b 20	...Besides,.it.provides.some.;;.
7600	75 74 69 6c 69 74 69 65 73 20 61 6e 64 20 74 72 61 6e 73 69 65 6e 74 20 70 72 65 66 69 78 65 73	utilities.and.transient.prefixes
7620	2e 20 20 54 68 69 73 20 69 73 20 61 6e 20 6f 70 74 69 6d 69 7a 61 74 69 6f 6e 20 74 6f 20 61 76	...This.is.an.optimization.to.av
7640	6f 69 64 20 68 61 76 69 6e 67 20 74 6f 0a 3b 3b 20 6c 6f 61 64 20 66 75 6e 63 74 69 6f 6e 73 20	oid.having.to.;;.load.functions.
7660	74 68 61 74 20 61 72 65 20 72 61 72 65 6c 79 20 75 73 65 64 20 64 75 72 69 6e 67 20 73 74 61 72	that.are.rarely.used.during.star
7680	74 2d 75 70 2e 0a 3b 3b 0a 3b 3b 20 43 6f 6d 6d 61 6e 64 73 20 69 6e 63 6c 75 64 65 64 3a 0a 3b	t-up..;;.;;.Commands.included:.;
76a0	3b 20 2d 20 60 64 69 72 76 69 73 68 2d 66 69 6e 64 2d 66 69 6c 65 2d 74 72 75 65 2d 70 61 74 68	;.-.`dirvish-find-file-true-path
76c0	27 0a 3b 3b 20 2d 20 60 64 69 72 76 69 73 68 2d 63 6f 70 79 2d 66 69 6c 65 2d 6e 61 6d 65 27 20	'.;;.-.`dirvish-copy-file-name'.
76e0	28 61 75 74 6f 6c 6f 61 64 29 0a 3b 3b 20 2d 20 60 64 69 72 76 69 73 68 2d 63 6f 70 79 2d 66 69	(autoload).;;.-.`dirvish-copy-fi
7700	6c 65 2d 70 61 74 68 27 20 28 61 75 74 6f 6c 6f 61 64 29 0a 3b 3b 20 2d 20 60 64 69 72 76 69 73	le-path'.(autoload).;;.-.`dirvis
7720	68 2d 63 6f 70 79 2d 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 27 0a 3b 3b 20 2d 20 60 64 69 72	h-copy-file-directory'.;;.-.`dir
7740	76 69 73 68 2d 74 6f 74 61 6c 2d 66 69 6c 65 2d 73 69 7a 65 27 20 28 61 75 74 6f 6c 6f 61 64 29	vish-total-file-size'.(autoload)
7760	0a 3b 3b 20 2d 20 60 64 69 72 76 69 73 68 2d 6c 61 79 6f 75 74 2d 74 6f 67 67 6c 65 27 20 28 61	.;;.-.`dirvish-layout-toggle'.(a
7780	75 74 6f 6c 6f 61 64 29 0a 3b 3b 20 2d 20 60 64 69 72 76 69 73 68 2d 6c 61 79 6f 75 74 2d 73 77	utoload).;;.-.`dirvish-layout-sw
77a0	69 74 63 68 27 20 28 61 75 74 6f 6c 6f 61 64 29 0a 3b 3b 20 2d 20 60 64 69 72 76 69 73 68 2d 72	itch'.(autoload).;;.-.`dirvish-r
77c0	65 6e 61 6d 65 2d 73 70 61 63 65 2d 74 6f 2d 75 6e 64 65 72 73 63 6f 72 65 27 0a 3b 3b 0a 3b 3b	ename-space-to-underscore'.;;.;;
77e0	20 54 72 61 6e 73 69 65 6e 74 20 70 72 65 66 69 78 65 73 20 69 6e 63 6c 75 64 65 64 20 28 61 6c	.Transient.prefixes.included.(al
7800	6c 20 61 75 74 6f 6c 6f 61 64 65 64 29 3a 0a 3b 3b 20 2d 20 60 64 69 72 76 69 73 68 2d 66 69 6c	l.autoloaded):.;;.-.`dirvish-fil
7820	65 2d 69 6e 66 6f 2d 6d 65 6e 75 27 0a 3b 3b 20 2d 20 60 64 69 72 76 69 73 68 2d 72 65 6e 61 6d	e-info-menu'.;;.-.`dirvish-renam
7840	69 6e 67 2d 6d 65 6e 75 27 0a 3b 3b 20 2d 20 60 64 69 72 76 69 73 68 2d 73 75 62 64 69 72 2d 6d	ing-menu'.;;.-.`dirvish-subdir-m
7860	65 6e 75 27 0a 3b 3b 20 2d 20 60 64 69 72 76 69 73 68 2d 63 68 78 78 78 2d 6d 65 6e 75 27 0a 3b	enu'.;;.-.`dirvish-chxxx-menu'.;
7880	3b 20 2d 20 60 64 69 72 76 69 73 68 2d 6d 61 72 6b 2d 6d 65 6e 75 27 0a 3b 3b 20 2d 20 60 64 69	;.-.`dirvish-mark-menu'.;;.-.`di
78a0	72 76 69 73 68 2d 65 70 61 2d 64 69 72 65 64 2d 6d 65 6e 75 27 0a 3b 3b 20 2d 20 60 64 69 72 76	rvish-epa-dired-menu'.;;.-.`dirv
78c0	69 73 68 2d 73 65 74 75 70 2d 6d 65 6e 75 27 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71	ish-setup-menu'..;;;.Code:..(req
78e0	75 69 72 65 20 27 64 69 72 76 69 73 68 29 0a 28 72 65 71 75 69 72 65 20 27 74 72 61 6d 70 29 0a	uire.'dirvish).(require.'tramp).
7900	0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 6c 61 79 6f 75 74 2d 72 65 63 69 70	.(defcustom.dirvish-layout-recip
7920	65 73 0a 20 20 27 28 28 30 20 30 20 20 20 20 30 2e 34 29 20 20 20 3b 20 20 20 20 20 20 20 20 7c	es...'((0.0....0.4)...;........\|
7940	20 43 55 52 52 45 4e 54 20 7c 20 70 72 65 76 69 65 77 0a 20 20 20 20 28 30 20 30 20 20 20 20 30	.CURRENT.\|.preview.....(0.0....0
7960	2e 38 29 20 20 20 3b 20 20 20 20 20 20 20 20 7c 20 63 75 72 72 65 6e 74 20 7c 20 50 52 45 56 49	.8)...;........\|.current.\|.PREVI
7980	45 57 0a 20 20 20 20 28 31 20 30 2e 30 38 20 30 2e 38 29 20 20 20 3b 20 70 61 72 65 6e 74 20 7c	EW.....(1.0.08.0.8)...;.parent.\|
79a0	20 63 75 72 72 65 6e 74 20 7c 20 50 52 45 56 49 45 57 0a 20 20 20 20 28 31 20 30 2e 31 31 20 30	.current.\|.PREVIEW.....(1.0.11.0
79c0	2e 35 35 29 29 20 3b 20 70 61 72 65 6e 74 20 7c 20 63 75 72 72 65 6e 74 20 7c 20 70 72 65 76 69	.55)).;.parent.\|.current.\|.previ
79e0	65 77 0a 20 20 22 4c 61 79 6f 75 74 20 52 45 43 49 50 45 73 20 66 6f 72 20 60 64 69 72 76 69 73	ew..."Layout.RECIPEs.for.`dirvis
7a00	68 2d 6c 61 79 6f 75 74 2d 73 77 69 74 63 68 27 20 63 6f 6d 6d 61 6e 64 2e 0a 52 45 43 49 50 45	h-layout-switch'.command..RECIPE
7a20	20 68 61 73 20 74 68 65 20 73 61 6d 65 20 66 6f 72 6d 20 61 73 20 60 64 69 72 76 69 73 68 2d 64	.has.the.same.form.as.`dirvish-d
7a40	65 66 61 75 6c 74 2d 6c 61 79 6f 75 74 27 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69	efault-layout'."...:group.'dirvi
7a60	73 68 0a 20 20 3a 74 79 70 65 20 27 28 72 65 70 65 61 74 20 28 6c 69 73 74 20 28 69 6e 74 65 67	sh...:type.'(repeat.(list.(integ
7a80	65 72 20 3a 74 61 67 20 22 6e 75 6d 62 65 72 20 6f 66 20 70 61 72 65 6e 74 20 77 69 6e 64 6f 77	er.:tag."number.of.parent.window
7aa0	73 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6c 6f 61	s")........................(floa
7ac0	74 20 3a 74 61 67 20 22 6d 61 78 20 77 69 64 74 68 20 6f 66 20 70 61 72 65 6e 74 20 77 69 6e 64	t.:tag."max.width.of.parent.wind
7ae0	6f 77 73 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6c	ows")........................(fl
7b00	6f 61 74 20 3a 74 61 67 20 22 77 69 64 74 68 20 6f 66 20 70 72 65 76 69 65 77 20 77 69 6e 64 6f	oat.:tag."width.of.preview.windo
7b20	77 22 29 29 29 29 0a 0a 28 64 65 66 63 6c 61 73 73 20 64 69 72 76 69 73 68 2d 61 74 74 72 69 62	w"))))..(defclass.dirvish-attrib
7b40	75 74 65 20 28 74 72 61 6e 73 69 65 6e 74 2d 69 6e 66 69 78 29 0a 20 20 28 28 76 61 72 69 61 62	ute.(transient-infix)...((variab
7b60	6c 65 20 20 3a 69 6e 69 74 61 72 67 20 3a 76 61 72 69 61 62 6c 65 29 29 0a 20 20 22 43 6c 61 73	le..:initarg.:variable))..."Clas
7b80	73 20 66 6f 72 20 64 69 72 76 69 73 68 20 61 74 74 72 69 62 75 74 65 73 2e 22 29 0a 0a 28 63 6c	s.for.dirvish.attributes.")..(cl
7ba0	2d 64 65 66 6d 65 74 68 6f 64 20 74 72 61 6e 73 69 65 6e 74 2d 66 6f 72 6d 61 74 2d 64 65 73 63	-defmethod.transient-format-desc
7bc0	72 69 70 74 69 6f 6e 20 28 28 6f 62 6a 20 64 69 72 76 69 73 68 2d 61 74 74 72 69 62 75 74 65 29	ription.((obj.dirvish-attribute)
7be0	29 0a 20 20 22 46 6f 72 6d 61 74 20 64 65 73 63 72 69 70 74 69 6f 6e 20 66 6f 72 20 44 49 52 56	)..."Format.description.for.DIRV
7c00	49 53 48 2d 41 54 54 52 49 42 55 54 45 20 69 6e 73 74 61 6e 63 65 20 4f 42 4a 2e 22 0a 20 20 28	ISH-ATTRIBUTE.instance.OBJ."...(
7c20	66 6f 72 6d 61 74 20 22 25 73 25 73 22 20 28 6f 72 65 66 20 6f 62 6a 20 64 65 73 63 72 69 70 74	format."%s%s".(oref.obj.descript
7c40	69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 20 22 20 27	ion)...........(propertize.".".'
7c60	64 69 73 70 6c 61 79 20 27 28 73 70 61 63 65 20 3a 61 6c 69 67 6e 2d 74 6f 20 28 2d 20 72 69 67	display.'(space.:align-to.(-.rig
7c80	68 74 20 35 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 74 72 61 6e 73 69 65	ht.5)))))..(cl-defmethod.transie
7ca0	6e 74 2d 66 6f 72 6d 61 74 2d 76 61 6c 75 65 20 28 28 6f 62 6a 20 64 69 72 76 69 73 68 2d 61 74	nt-format-value.((obj.dirvish-at
7cc0	74 72 69 62 75 74 65 29 29 0a 20 20 22 46 6f 72 6d 61 74 20 76 61 6c 75 65 20 66 6f 72 20 44 49	tribute))..."Format.value.for.DI
7ce0	52 56 49 53 48 2d 41 54 54 52 49 42 55 54 45 20 69 6e 73 74 61 6e 63 65 20 4f 42 4a 2e 22 0a 20	RVISH-ATTRIBUTE.instance.OBJ."..
7d00	20 28 6c 65 74 2a 20 28 28 76 61 6c 20 28 6f 72 65 66 20 6f 62 6a 20 76 61 6c 75 65 29 29 0a 20	.(let*.((val.(oref.obj.value))..
7d20	20 20 20 20 20 20 20 20 28 66 61 63 65 20 28 69 66 20 28 65 71 75 61 6c 20 76 61 6c 20 22 2b 22	........(face.(if.(equal.val."+"
7d40	29 20 27 74 72 61 6e 73 69 65 6e 74 2d 61 72 67 75 6d 65 6e 74 20 27 74 72 61 6e 73 69 65 6e 74	).'transient-argument.'transient
7d60	2d 69 6e 61 63 74 69 76 65 2d 76 61 6c 75 65 29 29 29 0a 20 20 20 20 28 70 72 6f 70 65 72 74 69	-inactive-value))).....(properti
7d80	7a 65 20 76 61 6c 20 27 66 61 63 65 20 66 61 63 65 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74	ze.val.'face.face)))..(cl-defmet
7da0	68 6f 64 20 74 72 61 6e 73 69 65 6e 74 2d 69 6e 69 74 2d 76 61 6c 75 65 20 28 28 6f 62 6a 20 64	hod.transient-init-value.((obj.d
7dc0	69 72 76 69 73 68 2d 61 74 74 72 69 62 75 74 65 29 29 0a 20 20 22 49 6e 69 74 69 61 6c 69 7a 65	irvish-attribute))..."Initialize
7de0	20 76 61 6c 75 65 20 66 6f 72 20 44 49 52 56 49 53 48 2d 41 54 54 52 49 42 55 54 45 20 69 6e 73	.value.for.DIRVISH-ATTRIBUTE.ins
7e00	74 61 6e 63 65 20 4f 42 4a 2e 22 0a 20 20 28 6c 65 74 20 28 28 73 79 6d 20 28 6f 72 65 66 20 6f	tance.OBJ."...(let.((sym.(oref.o
7e20	62 6a 20 76 61 72 69 61 62 6c 65 29 29 29 0a 20 20 20 20 28 6f 73 65 74 20 6f 62 6a 20 76 61 6c	bj.variable))).....(oset.obj.val
7e40	75 65 20 28 69 66 20 28 6d 65 6d 71 20 73 79 6d 20 64 69 72 76 69 73 68 2d 61 74 74 72 69 62 75	ue.(if.(memq.sym.dirvish-attribu
7e60	74 65 73 29 20 22 2b 22 20 22 2d 22 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20	tes)."+"."-"))))..(cl-defmethod.
7e80	74 72 61 6e 73 69 65 6e 74 2d 69 6e 66 69 78 2d 72 65 61 64 20 28 28 6f 62 6a 20 64 69 72 76 69	transient-infix-read.((obj.dirvi
7ea0	73 68 2d 61 74 74 72 69 62 75 74 65 29 29 0a 20 20 22 52 65 61 64 20 76 61 6c 75 65 20 66 72 6f	sh-attribute))..."Read.value.fro
7ec0	6d 20 44 49 52 56 49 53 48 2d 41 54 54 52 49 42 55 54 45 20 69 6e 73 74 61 6e 63 65 20 4f 42 4a	m.DIRVISH-ATTRIBUTE.instance.OBJ
7ee0	2e 22 0a 20 20 28 6f 73 65 74 20 6f 62 6a 20 76 61 6c 75 65 20 28 69 66 20 28 65 71 75 61 6c 20	."...(oset.obj.value.(if.(equal.
7f00	28 6f 72 65 66 20 6f 62 6a 20 76 61 6c 75 65 29 20 22 2b 22 29 20 22 2d 22 20 22 2b 22 29 29 29	(oref.obj.value)."+")."-"."+")))
7f20	0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 74 72 61 6e 73 69 65 6e 74 2d 69 6e 66 69 78 2d	..(cl-defmethod.transient-infix-
7f40	73 65 74 20 28 28 6f 62 6a 20 64 69 72 76 69 73 68 2d 61 74 74 72 69 62 75 74 65 29 20 76 61 6c	set.((obj.dirvish-attribute).val
7f60	75 65 29 0a 20 20 22 53 65 74 20 72 65 6c 65 76 61 6e 74 20 76 61 6c 75 65 20 69 6e 20 44 49 52	ue)..."Set.relevant.value.in.DIR
7f80	56 49 53 48 2d 41 54 54 52 49 42 55 54 45 20 69 6e 73 74 61 6e 63 65 20 4f 42 4a 20 74 6f 20 56	VISH-ATTRIBUTE.instance.OBJ.to.V
7fa0	41 4c 55 45 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 69 74 65 6d 20 28 6f 72 65 66 20 6f 62 6a 20	ALUE."...(let*.((item.(oref.obj.
7fc0	76 61 72 69 61 62 6c 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 6f 6c 64 2d 76 61 6c 20 28 70 75	variable))..........(old-val.(pu
7fe0	72 65 63 6f 70 79 20 64 69 72 76 69 73 68 2d 61 74 74 72 69 62 75 74 65 73 29 29 0a 20 20 20 20	recopy.dirvish-attributes)).....
8000	20 20 20 20 20 28 6e 65 77 2d 76 61 6c 20 28 69 66 20 28 65 71 75 61 6c 20 76 61 6c 75 65 20 22	.....(new-val.(if.(equal.value."
8020	2b 22 29 20 28 63 6c 2d 70 75 73 68 6e 65 77 20 69 74 65 6d 20 6f 6c 64 2d 76 61 6c 29 0a 20 20	+").(cl-pushnew.item.old-val)...
8040	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 6d 71 20 69 74 65 6d 20 6f 6c 64	..................(remq.item.old
8060	2d 76 61 6c 29 29 29 29 0a 20 20 20 20 28 6d 61 70 63 20 23 27 72 65 71 75 69 72 65 20 27 28 64	-val)))).....(mapc.#'require.'(d
8080	69 72 76 69 73 68 2d 77 69 64 67 65 74 73 20 64 69 72 76 69 73 68 2d 76 63 20 64 69 72 76 69 73	irvish-widgets.dirvish-vc.dirvis
80a0	68 2d 63 6f 6c 6c 61 70 73 65 29 29 0a 20 20 20 20 28 64 69 72 76 69 73 68 2d 2d 72 65 6e 64 65	h-collapse)).....(dirvish--rende
80c0	72 2d 61 74 74 72 73 20 27 63 6c 65 61 72 29 0a 20 20 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20	r-attrs.'clear).....(setq-local.
80e0	64 69 72 76 69 73 68 2d 61 74 74 72 69 62 75 74 65 73 20 6e 65 77 2d 76 61 6c 29 0a 20 20 20 20	dirvish-attributes.new-val).....
8100	28 73 65 74 71 2d 6c 6f 63 61 6c 20 64 69 72 76 69 73 68 2d 2d 77 6f 72 6b 69 6e 67 2d 61 74 74	(setq-local.dirvish--working-att
8120	72 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 2d 61 74 74	rs.................(dirvish--att
8140	72 73 2d 65 78 70 61 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 70 70 65	rs-expand..................(appe
8160	6e 64 20 27 28 68 6c 2d 6c 69 6e 65 20 73 79 6d 6c 69 6e 6b 2d 74 61 72 67 65 74 29 20 6e 65 77	nd.'(hl-line.symlink-target).new
8180	2d 76 61 6c 29 29 29 0a 20 20 20 20 28 64 69 72 76 69 73 68 2d 2d 72 65 6e 64 65 72 2d 61 74 74	-val))).....(dirvish--render-att
81a0	72 73 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 20 28 61 75 74 6f 6c 6f 61 64 20	rs)))..;;;###autoload.(autoload.
81c0	27 64 69 72 76 69 73 68 2d 73 65 74 75 70 2d 6d 65 6e 75 20 22 64 69 72 76 69 73 68 2d 65 78 74	'dirvish-setup-menu."dirvish-ext
81e0	72 61 73 22 20 6e 69 6c 20 74 29 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 75	ras".nil.t).(defcustom.dirvish-u
8200	69 2d 73 65 74 75 70 2d 69 74 65 6d 73 0a 20 20 27 28 28 22 73 22 20 20 66 69 6c 65 2d 73 69 7a	i-setup-items...'(("s"..file-siz
8220	65 20 20 20 20 20 22 46 69 6c 65 20 73 69 7a 65 22 29 0a 20 20 20 20 28 22 74 22 20 20 66 69 6c	e....."File.size").....("t"..fil
8240	65 2d 74 69 6d 65 20 20 20 20 20 22 46 69 6c 65 20 6d 6f 64 69 66 69 63 61 74 69 6f 6e 20 74 69	e-time....."File.modification.ti
8260	6d 65 22 29 0a 20 20 20 20 28 22 63 22 20 20 63 6f 6c 6c 61 70 73 65 20 20 20 20 20 20 22 43 6f	me").....("c"..collapse......"Co
8280	6c 6c 61 70 73 65 20 75 6e 69 71 75 65 20 6e 65 73 74 65 64 20 70 61 74 68 73 22 0a 20 20 20 20	llapse.unique.nested.paths".....
82a0	20 28 6e 6f 74 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 72 65 6d 6f 74 65 29 29 29 0a 20	.(not.(dirvish-prop.:remote)))..
82c0	20 20 20 28 22 76 22 20 20 76 63 2d 73 74 61 74 65 20 20 20 20 20 20 22 56 65 72 73 69 6f 6e 20	...("v"..vc-state......"Version.
82e0	63 6f 6e 74 72 6f 6c 20 73 74 61 74 65 22 0a 20 20 20 20 20 28 61 6e 64 20 28 64 69 73 70 6c 61	control.state"......(and.(displa
8300	79 2d 67 72 61 70 68 69 63 2d 70 29 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 76 63 2d 62	y-graphic-p).(dirvish-prop.:vc-b
8320	61 63 6b 65 6e 64 29 29 29 0a 20 20 20 20 28 22 6d 22 20 20 67 69 74 2d 6d 73 67 20 20 20 20 20	ackend))).....("m"..git-msg.....
8340	20 20 22 47 69 74 20 63 6f 6d 6d 69 74 20 6d 65 73 73 61 67 65 73 22 0a 20 20 20 20 20 28 61 6e	.."Git.commit.messages"......(an
8360	64 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 76 63 2d 62 61 63 6b 65 6e 64 29 20 28 6e 6f	d.(dirvish-prop.:vc-backend).(no
8380	74 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 72 65 6d 6f 74 65 29 29 29 29 0a 20 20 20 20	t.(dirvish-prop.:remote)))).....
83a0	28 22 31 22 20 27 28 30 20 6e 69 6c 20 20 30 2e 34 29 20 20 22 20 20 20 20 20 2d 20 20 20 20 20	("1".'(0.nil..0.4)..".....-.....
83c0	20 20 7c 20 63 75 72 72 65 6e 74 20 28 36 30 25 29 20 7c 20 70 72 65 76 69 65 77 20 28 34 30 25	..\|.current.(60%).\|.preview.(40%
83e0	29 22 29 0a 20 20 20 20 28 22 32 22 20 27 28 30 20 6e 69 6c 20 20 30 2e 38 29 20 20 22 20 20 20	)").....("2".'(0.nil..0.8).."...
8400	20 20 2d 20 20 20 20 20 20 20 7c 20 63 75 72 72 65 6e 74 20 28 32 30 25 29 20 7c 20 70 72 65 76	..-.......\|.current.(20%).\|.prev
8420	69 65 77 20 28 38 30 25 29 22 29 0a 20 20 20 20 28 22 33 22 20 27 28 31 20 30 2e 30 38 20 30 2e	iew.(80%)").....("3".'(1.0.08.0.
8440	38 29 20 20 22 70 61 72 65 6e 74 20 28 38 25 29 20 20 7c 20 63 75 72 72 65 6e 74 20 28 31 32 25	8).."parent.(8%)..\|.current.(12%
8460	29 20 7c 20 70 72 65 76 69 65 77 20 28 38 30 25 29 22 29 0a 20 20 20 20 28 22 34 22 20 27 28 31	).\|.preview.(80%)").....("4".'(1
8480	20 30 2e 31 31 20 30 2e 35 35 29 20 22 70 61 72 65 6e 74 20 28 31 31 25 29 20 7c 20 63 75 72 72	.0.11.0.55)."parent.(11%).\|.curr
84a0	65 6e 74 20 28 33 33 25 29 20 7c 20 70 72 65 76 69 65 77 20 28 35 35 25 29 22 29 29 0a 20 20 22	ent.(33%).\|.preview.(55%)"))..."
84c0	49 54 45 4d 73 20 66 6f 72 20 60 64 69 72 76 69 73 68 2d 73 65 74 75 70 2d 6d 65 6e 75 27 2e 0a	ITEMs.for.`dirvish-setup-menu'..
84e0	41 20 49 54 45 4d 20 69 73 20 61 20 6c 69 73 74 20 63 6f 6e 73 69 73 74 73 20 6f 66 20 28 4b 45	A.ITEM.is.a.list.consists.of.(KE
8500	59 20 56 41 52 20 44 45 53 43 20 50 52 45 44 29 20 77 68 65 72 65 20 4b 45 59 20 69 73 20 74 68	Y.VAR.DESC.PRED).where.KEY.is.th
8520	65 0a 6b 65 79 62 69 6e 64 69 6e 67 20 66 6f 72 20 74 68 65 20 69 74 65 6d 2c 20 56 41 52 20 63	e.keybinding.for.the.item,.VAR.c
8540	61 6e 20 62 65 20 61 20 76 61 6c 69 64 20 60 64 69 72 76 69 73 68 2d 61 74 74 72 69 62 75 74 65	an.be.a.valid.`dirvish-attribute
8560	73 27 0a 6f 72 20 61 20 6c 61 79 6f 75 74 20 72 65 63 69 70 65 20 28 73 65 65 20 60 64 69 72 76	s'.or.a.layout.recipe.(see.`dirv
8580	69 73 68 2d 6c 61 79 6f 75 74 2d 72 65 63 69 70 65 73 27 29 2c 20 44 45 53 43 20 69 73 20 74 68	ish-layout-recipes'),.DESC.is.th
85a0	65 0a 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 66 6f 72 20 74 68 65 20 56 41 52 2e 20 20 54 68	e.documentation.for.the.VAR...Th
85c0	65 20 6f 70 74 69 6f 6e 61 6c 20 50 52 45 44 20 69 73 20 70 61 73 73 65 64 20 61 73 20 74 68 65	e.optional.PRED.is.passed.as.the
85e0	0a 70 72 65 64 69 63 61 74 65 20 66 6f 72 20 74 68 61 74 20 69 6e 66 69 78 2e 22 0a 20 20 3a 67	.predicate.for.that.infix."...:g
8600	72 6f 75 70 20 27 64 69 72 76 69 73 68 20 3a 74 79 70 65 20 27 61 6c 69 73 74 0a 20 20 3a 73 65	roup.'dirvish.:type.'alist...:se
8620	74 0a 20 20 28 6c 61 6d 62 64 61 20 28 6b 65 79 20 76 61 6c 75 65 29 0a 20 20 20 20 28 73 65 74	t...(lambda.(key.value).....(set
8640	20 6b 65 79 20 76 61 6c 75 65 29 0a 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 0a 20 20 20 20 20 77 69	.key.value).....(cl-loop......wi
8660	74 68 20 28 61 74 74 72 73 20 2e 20 6c 61 79 6f 75 74 73 29 20 3d 20 28 29 0a 20 20 20 20 20 66	th.(attrs...layouts).=.()......f
8680	6f 72 20 28 6b 20 76 20 64 65 73 63 20 70 72 65 64 29 20 69 6e 20 76 61 6c 75 65 0a 20 20 20 20	or.(k.v.desc.pred).in.value.....
86a0	20 66 6f 72 20 6e 61 6d 65 20 3d 20 28 61 6e 64 20 28 73 79 6d 62 6f 6c 70 20 76 29 20 28 69 6e	.for.name.=.(and.(symbolp.v).(in
86c0	74 65 72 6e 20 28 66 6f 72 6d 61 74 20 22 64 69 72 76 69 73 68 2d 25 73 2d 69 6e 66 69 78 22 20	tern.(format."dirvish-%s-infix".
86e0	76 29 29 29 0a 20 20 20 20 20 64 6f 20 28 69 66 20 28 6e 6f 74 20 6e 61 6d 65 29 0a 20 20 20 20	v)))......do.(if.(not.name).....
8700	20 20 20 20 20 20 20 20 28 70 75 73 68 20 28 6c 69 73 74 20 6b 20 28 70 72 6f 70 65 72 74 69 7a	........(push.(list.k.(propertiz
8720	65 20 64 65 73 63 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 64 6f 63 2d 66 61 63 65	e.desc.'face.'font-lock-doc-face
8740	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 6c 61 6d 62	).........................`(lamb
8760	64 61 20 28 29 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 64 69 72 76 69 73 68 2d 6c 61 79	da.().(interactive).(dirvish-lay
8780	6f 75 74 2d 73 77 69 74 63 68 20 2c 76 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	out-switch.,v)))................
87a0	20 20 20 6c 61 79 6f 75 74 73 29 0a 20 20 20 20 20 20 20 20 20 20 28 65 76 61 6c 20 60 28 74 72	...layouts)...........(eval.`(tr
87c0	61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 69 6e 66 69 78 20 2c 6e 61 6d 65 20 28 29 0a 20 20	ansient-define-infix.,name.()...
87e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 6c 61 73 73 20 27 64 69 72 76 69 73 68	.................:class.'dirvish
8800	2d 61 74 74 72 69 62 75 74 65 20 3a 76 61 72 69 61 62 6c 65 20 27 2c 76 0a 20 20 20 20 20 20 20	-attribute.:variable.',v........
8820	20 20 20 20 20 20 20 20 20 20 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 2c 64 65 73 63 20 3a	............:description.,desc.:
8840	69 66 20 28 6c 61 6d 62 64 61 20 28 29 20 2c 28 69 66 20 70 72 65 64 20 60 2c 40 70 72 65 64 20	if.(lambda.().,(if.pred.`,@pred.
8860	74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 28 6c 69 73 74 20 6b 20 6e 61	t))))...........(push.(list.k.na
8880	6d 65 29 20 61 74 74 72 73 29 29 0a 20 20 20 20 20 66 69 6e 61 6c 6c 79 0a 20 20 20 20 20 28 65	me).attrs))......finally......(e
88a0	76 61 6c 0a 20 20 20 20 20 20 60 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 70 72 65	val.......`(transient-define-pre
88c0	66 69 78 20 64 69 72 76 69 73 68 2d 73 65 74 75 70 2d 6d 65 6e 75 20 28 29 0a 20 20 20 20 20 20	fix.dirvish-setup-menu.().......
88e0	20 20 20 22 43 6f 6e 66 69 67 75 72 65 20 63 75 72 72 65 6e 74 20 44 69 72 76 69 73 68 20 73 65	..."Configure.current.Dirvish.se
8900	73 73 69 6f 6e 2e 22 0a 20 20 20 20 20 20 20 20 20 5b 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 28	ssion."..........[:description.(
8920	6c 61 6d 62 64 61 20 28 29 20 28 64 69 72 76 69 73 68 2d 2d 66 6f 72 6d 61 74 2d 6d 65 6e 75 2d	lambda.().(dirvish--format-menu-
8940	68 65 61 64 69 6e 67 20 22 53 65 74 75 70 20 44 69 72 76 69 73 68 20 55 49 22 29 29 0a 20 20 20	heading."Setup.Dirvish.UI"))....
8960	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 5b 22 41 74 74 72 69 62 75 74 65 73	....................["Attributes
8980	3a 22 20 2c 40 61 74 74 72 73 5d 5d 0a 20 20 20 20 20 20 20 20 20 5b 22 53 77 69 74 63 68 20 6c	:".,@attrs]]..........["Switch.l
89a0	61 79 6f 75 74 73 3a 22 0a 20 20 20 20 20 20 20 20 20 20 3a 69 66 20 28 6c 61 6d 62 64 61 20 28	ayouts:"...........:if.(lambda.(
89c0	29 20 28 63 61 72 20 28 64 76 2d 6c 61 79 6f 75 74 20 28 64 69 72 76 69 73 68 2d 63 75 72 72 29	).(car.(dv-layout.(dirvish-curr)
89e0	29 29 29 20 2c 40 6c 61 79 6f 75 74 73 5d 0a 20 20 20 20 20 20 20 20 20 5b 22 41 63 74 69 6f 6e	))).,@layouts]..........["Action
8a00	73 3a 22 0a 20 20 20 20 20 20 20 20 20 20 28 22 4d 2d 74 22 20 22 54 6f 67 67 6c 65 20 66 75 6c	s:"...........("M-t"."Toggle.ful
8a20	6c 73 63 72 65 65 6e 22 20 64 69 72 76 69 73 68 2d 6c 61 79 6f 75 74 2d 74 6f 67 67 6c 65 29 0a	lscreen".dirvish-layout-toggle).
8a40	20 20 20 20 20 20 20 20 20 20 28 22 52 45 54 22 20 22 41 70 70 6c 79 20 63 75 72 72 65 6e 74 20	..........("RET"."Apply.current.
8a60	73 65 74 74 69 6e 67 73 20 74 6f 20 66 75 74 75 72 65 20 73 65 73 73 69 6f 6e 73 22 0a 20 20 20	settings.to.future.sessions"....
8a80	20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 29 20 28 69 6e 74 65 72 61 63 74 69 76 65 29	........(lambda.().(interactive)
8aa0	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 2d 64 65 66 61 75 6c 74 20 64 69 72 76	..............(setq-default.dirv
8ac0	69 73 68 2d 61 74 74 72 69 62 75 74 65 73 20 64 69 72 76 69 73 68 2d 61 74 74 72 69 62 75 74 65	ish-attributes.dirvish-attribute
8ae0	73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 64 69 72 76 69 73 68 2d 64 65	s)..............(setq.dirvish-de
8b00	66 61 75 6c 74 2d 6c 61 79 6f 75 74 20 28 63 64 72 20 28 64 76 2d 6c 61 79 6f 75 74 20 28 64 69	fault-layout.(cdr.(dv-layout.(di
8b20	72 76 69 73 68 2d 63 75 72 72 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72	rvish-curr))))..............(dir
8b40	76 69 73 68 2d 2d 69 6e 69 74 2d 73 65 73 73 69 6f 6e 20 28 64 69 72 76 69 73 68 2d 63 75 72 72	vish--init-session.(dirvish-curr
8b60	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 76 65 72 74 2d 62 75 66 66 65 72 29 29	))..............(revert-buffer))
8b80	29 5d 29 29 29 29 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 64 69 72 76 69 73 68 2d 74 72 61 6d 70	)])))))..(defconst.dirvish-tramp
8ba0	2d 70 72 65 76 69 65 77 2d 63 6d 64 0a 20 20 22 68 65 61 64 20 2d 6e 20 31 30 30 30 20 25 73 20	-preview-cmd..."head.-n.1000.%s.
8bc0	32 3e 2f 64 65 76 2f 6e 75 6c 6c 20 7c 7c 20 6c 73 20 2d 41 6c 68 20 2d 2d 67 72 6f 75 70 2d 64	2>/dev/null.\|\|.ls.-Alh.--group-d
8be0	69 72 65 63 74 6f 72 69 65 73 2d 66 69 72 73 74 20 25 73 20 32 3e 2f 64 65 76 2f 6e 75 6c 6c 22	irectories-first.%s.2>/dev/null"
8c00	29 0a 28 64 65 66 76 61 72 20 64 69 72 76 69 73 68 2d 74 72 61 6d 70 2d 68 6f 73 74 73 20 27 28	).(defvar.dirvish-tramp-hosts.'(
8c20	29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 6c 73 2d 6f 75 74 70 75 74 2d 70 61 72	))..(defun.dirvish-ls-output-par
8c40	73 65 72 20 28 65 6e 74 72 79 20 6f 75 74 70 75 74 29 0a 20 20 22 50 61 72 73 65 20 6c 73 20 4f	ser.(entry.output)..."Parse.ls.O
8c60	55 54 50 55 54 20 66 6f 72 20 45 4e 54 52 59 20 61 6e 64 20 73 74 6f 72 65 20 69 74 20 69 6e 20	UTPUT.for.ENTRY.and.store.it.in.
8c80	60 64 69 72 76 69 73 68 2d 2d 61 74 74 72 73 2d 68 61 73 68 27 2e 22 0a 20 20 28 64 6f 6c 69 73	`dirvish--attrs-hash'."...(dolis
8ca0	74 20 28 66 69 6c 65 20 28 61 6e 64 20 28 3e 20 28 6c 65 6e 67 74 68 20 6f 75 74 70 75 74 29 20	t.(file.(and.(>.(length.output).
8cc0	32 29 20 28 63 6c 2d 73 75 62 73 65 71 20 6f 75 74 70 75 74 20 32 20 2d 31 29 29 29 0a 20 20 20	2).(cl-subseq.output.2.-1)))....
8ce0	20 28 63 6c 2d 64 65 73 74 72 75 63 74 75 72 69 6e 67 2d 62 69 6e 64 0a 20 20 20 20 20 20 20 20	.(cl-destructuring-bind.........
8d00	28 69 6e 6f 64 65 20 70 72 69 76 20 6c 6e 75 6d 20 75 73 65 72 20 67 72 6f 75 70 20 73 69 7a 65	(inode.priv.lnum.user.group.size
8d20	20 6d 6f 6e 20 64 61 79 20 74 69 6d 65 20 26 72 65 73 74 20 70 61 74 68 29 0a 20 20 20 20 20 20	.mon.day.time.&rest.path).......
8d40	20 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 66 69 6c 65 29 0a 20 20 20 20 20 20 28 6c 65 74	..(split-string.file).......(let
8d60	2a 20 28 28 73 79 6d 20 28 63 6c 2d 70 6f 73 69 74 69 6f 6e 20 22 2d 3e 22 20 70 61 74 68 20 3a	*.((sym.(cl-position."->".path.:
8d80	74 65 73 74 20 23 27 65 71 75 61 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 2d 6e	test.#'equal))..............(f-n
8da0	61 6d 65 20 28 73 74 72 69 6e 67 2d 6a 6f 69 6e 20 28 63 6c 2d 73 75 62 73 65 71 20 70 61 74 68	ame.(string-join.(cl-subseq.path
8dc0	20 30 20 73 79 6d 29 20 22 20 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 2d 6d 74	.0.sym)."."))..............(f-mt
8de0	69 6d 65 20 28 63 6f 6e 63 61 74 20 6d 6f 6e 20 22 20 22 20 64 61 79 20 22 20 22 20 74 69 6d 65	ime.(concat.mon.".".day.".".time
8e00	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 2d 74 72 75 65 6e 61 6d 65 20 28 61 6e 64	))..............(f-truename.(and
8e20	20 73 79 6d 20 28 73 74 72 69 6e 67 2d 6a 6f 69 6e 20 28 63 6c 2d 73 75 62 73 65 71 20 70 61 74	.sym.(string-join.(cl-subseq.pat
8e40	68 20 28 31 2b 20 73 79 6d 29 29 20 22 20 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	h.(1+.sym)).".")))..............
8e60	28 66 2d 64 69 72 70 20 28 73 74 72 69 6e 67 2d 70 72 65 66 69 78 2d 70 20 22 64 22 20 70 72 69	(f-dirp.(string-prefix-p."d".pri
8e80	76 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 2d 74 79 70 65 20 28 6f 72 20 66 2d 74	v))..............(f-type.(or.f-t
8ea0	72 75 65 6e 61 6d 65 20 66 2d 64 69 72 70 29 29 29 0a 20 20 20 20 20 20 20 20 28 70 75 74 68 61	ruename.f-dirp))).........(putha
8ec0	73 68 20 28 69 6e 74 65 72 6e 20 28 73 65 63 75 72 65 2d 68 61 73 68 20 27 6d 64 35 20 28 65 78	sh.(intern.(secure-hash.'md5.(ex
8ee0	70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 66 2d 6e 61 6d 65 20 65 6e 74 72 79 29 29 29 0a 20	pand-file-name.f-name.entry)))..
8f00	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 3a 62 75 69 6c 74 69 6e 20 2c 28 6c 69 73	................`(:builtin.,(lis
8f20	74 20 66 2d 74 79 70 65 20 6c 6e 75 6d 20 75 73 65 72 20 67 72 6f 75 70 20 6e 69 6c 0a 20 20 20	t.f-type.lnum.user.group.nil....
8f40	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	................................
8f60	66 2d 6d 74 69 6d 65 20 6e 69 6c 20 73 69 7a 65 20 70 72 69 76 20 6e 69 6c 20 69 6e 6f 64 65 29	f-mtime.nil.size.priv.nil.inode)
8f80	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 79 70 65 20 2c 28 63 6f 6e 73	....................:type.,(cons
8fa0	20 28 69 66 20 66 2d 64 69 72 70 20 27 64 69 72 20 27 66 69 6c 65 29 20 66 2d 74 72 75 65 6e 61	.(if.f-dirp.'dir.'file).f-truena
8fc0	6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 76 69 73 68 2d 2d 61	me))..................dirvish--a
8fe0	74 74 72 73 2d 68 61 73 68 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 6e	ttrs-hash)))))..(defun.dirvish-n
9000	6f 73 65 6c 65 63 74 2d 74 72 61 6d 70 20 28 66 6e 20 64 69 72 20 66 6c 61 67 73 20 72 65 6d 6f	oselect-tramp.(fn.dir.flags.remo
9020	74 65 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 44 69 72 65 64 20 62 75 66 66 65 72 20 61	te)..."Return.the.Dired.buffer.a
9040	74 20 44 49 52 20 77 69 74 68 20 6c 69 73 74 69 6e 67 20 46 4c 41 47 53 2e 0a 53 61 76 65 20 74	t.DIR.with.listing.FLAGS..Save.t
9060	68 65 20 52 45 4d 4f 54 45 20 68 6f 73 74 20 74 6f 20 60 64 69 72 76 69 73 68 2d 74 72 61 6d 70	he.REMOTE.host.to.`dirvish-tramp
9080	2d 68 6f 73 74 73 27 2e 0a 46 4e 20 69 73 20 74 68 65 20 6f 72 69 67 69 6e 61 6c 20 60 64 69 72	-hosts'..FN.is.the.original.`dir
90a0	65 64 2d 6e 6f 73 65 6c 65 63 74 27 20 63 6c 6f 73 75 72 65 2e 22 0a 20 20 28 6c 65 74 2a 20 28	ed-noselect'.closure."...(let*.(
90c0	28 73 61 76 65 64 2d 66 6c 61 67 73 20 28 63 64 72 20 28 61 73 73 6f 63 20 72 65 6d 6f 74 65 20	(saved-flags.(cdr.(assoc.remote.
90e0	64 69 72 76 69 73 68 2d 74 72 61 6d 70 2d 68 6f 73 74 73 20 23 27 65 71 75 61 6c 29 29 29 0a 20	dirvish-tramp-hosts.#'equal)))..
9100	20 20 20 20 20 20 20 20 28 66 74 70 3f 20 28 74 72 61 6d 70 2d 66 74 70 2d 66 69 6c 65 2d 6e 61	........(ftp?.(tramp-ftp-file-na
9120	6d 65 2d 70 20 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 20 28 73 68 6f 72 74 2d 66 6c 61 67 73	me-p.dir))..........(short-flags
9140	20 22 2d 41 6c 68 22 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63	."-Alh")..........(default-direc
9160	74 6f 72 79 20 64 69 72 29 0a 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 62 75 66 66 65 72	tory.dir)..........(dired-buffer
9180	73 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 20 28 63 6f 6e 64 20 28 66	s.nil)..........(buffer.(cond.(f
91a0	74 70 3f 20 28 66 75 6e 63 61 6c 6c 20 66 6e 20 64 69 72 20 73 68 6f 72 74 2d 66 6c 61 67 73 29	tp?.(funcall.fn.dir.short-flags)
91c0	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 73 61 76 65 64 2d	)........................(saved-
91e0	66 6c 61 67 73 20 28 66 75 6e 63 61 6c 6c 20 66 6e 20 64 69 72 20 73 61 76 65 64 2d 66 6c 61 67	flags.(funcall.fn.dir.saved-flag
9200	73 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 28 3d 20 28	s))........................((=.(
9220	70 72 6f 63 65 73 73 2d 66 69 6c 65 20 22 6c 73 22 20 6e 69 6c 20 6e 69 6c 20 6e 69 6c 20 22 2d	process-file."ls".nil.nil.nil."-
9240	2d 76 65 72 73 69 6f 6e 22 29 20 30 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	-version").0)...................
9260	20 20 20 20 20 20 28 70 75 73 68 20 28 63 6f 6e 73 20 72 65 6d 6f 74 65 20 66 6c 61 67 73 29 20	......(push.(cons.remote.flags).
9280	64 69 72 76 69 73 68 2d 74 72 61 6d 70 2d 68 6f 73 74 73 29 0a 20 20 20 20 20 20 20 20 20 20 20	dirvish-tramp-hosts)............
92a0	20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 66 6e 20 64 69 72 20 66 6c 61	.............(funcall.fn.dir.fla
92c0	67 73 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 74 20 28	gs))........................(t.(
92e0	70 75 73 68 20 28 63 6f 6e 73 20 72 65 6d 6f 74 65 20 73 68 6f 72 74 2d 66 6c 61 67 73 29 20 64	push.(cons.remote.short-flags).d
9300	69 72 76 69 73 68 2d 74 72 61 6d 70 2d 68 6f 73 74 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	irvish-tramp-hosts).............
9320	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 66 6e 20 64 69 72 20 73 68	..............(funcall.fn.dir.sh
9340	6f 72 74 2d 66 6c 61 67 73 29 29 29 29 29 0a 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74	ort-flags))))).....(with-current
9360	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 76 69 73 68 2d 70 72	-buffer.buffer.......(dirvish-pr
9380	6f 70 20 3a 74 72 61 6d 70 20 28 74 72 61 6d 70 2d 64 69 73 73 65 63 74 2d 66 69 6c 65 2d 6e 61	op.:tramp.(tramp-dissect-file-na
93a0	6d 65 20 64 69 72 29 29 0a 20 20 20 20 20 20 62 75 66 66 65 72 29 29 29 0a 0a 28 64 65 66 75 6e	me.dir)).......buffer)))..(defun
93c0	20 64 69 72 76 69 73 68 2d 74 72 61 6d 70 2d 2d 61 73 79 6e 63 2d 70 20 28 76 65 63 29 0a 20 20	.dirvish-tramp--async-p.(vec)...
93e0	22 52 65 74 75 72 6e 20 74 20 69 66 20 74 72 61 6d 70 20 63 6f 6e 6e 65 63 74 69 6f 6e 20 56 45	"Return.t.if.tramp.connection.VE
9400	43 20 73 75 70 70 6f 72 74 20 61 73 79 6e 63 20 63 6f 6d 6d 61 6e 64 73 2e 22 0a 20 20 28 6f 72	C.support.async.commands."...(or
9420	20 28 74 72 61 6d 70 2d 6c 6f 63 61 6c 2d 68 6f 73 74 2d 70 20 76 65 63 29 20 3b 20 6c 6f 63 61	.(tramp-local-host-p.vec).;.loca
9440	6c 68 6f 73 74 0a 20 20 20 20 20 20 3b 3b 20 74 68 65 20 63 6f 6e 6e 65 63 74 69 6f 6e 20 73 75	lhost.......;;.the.connection.su
9460	70 70 6f 72 74 20 60 64 69 72 65 63 74 2d 61 73 79 6e 63 2d 70 72 6f 63 65 73 73 27 20 61 6e 64	pport.`direct-async-process'.and
9480	20 6e 6f 20 70 61 73 73 77 6f 72 64 20 6e 65 65 64 65 64 0a 20 20 20 20 20 20 28 61 6e 64 20 28	.no.password.needed.......(and.(
94a0	73 74 72 69 6e 67 70 20 28 74 72 61 6d 70 2d 67 65 74 2d 63 6f 6e 6e 65 63 74 69 6f 6e 2d 70 72	stringp.(tramp-get-connection-pr
94c0	6f 70 65 72 74 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 76 65 63 20	operty......................vec.
94e0	22 66 69 72 73 74 2d 70 61 73 73 77 6f 72 64 2d 72 65 71 75 65 73 74 22 20 6e 69 6c 29 29 0a 20	"first-password-request".nil))..
9500	20 20 20 20 20 20 20 20 20 20 28 74 72 61 6d 70 2d 67 65 74 2d 6d 65 74 68 6f 64 2d 70 61 72 61	..........(tramp-get-method-para
9520	6d 65 74 65 72 20 76 65 63 20 27 74 72 61 6d 70 2d 64 69 72 65 63 74 2d 61 73 79 6e 63 29 0a 20	meter.vec.'tramp-direct-async)..
9540	20 20 20 20 20 20 20 20 20 20 28 74 72 61 6d 70 2d 67 65 74 2d 63 6f 6e 6e 65 63 74 69 6f 6e 2d	..........(tramp-get-connection-
9560	70 72 6f 70 65 72 74 79 20 76 65 63 20 22 64 69 72 65 63 74 2d 61 73 79 6e 63 2d 70 72 6f 63 65	property.vec."direct-async-proce
9580	73 73 22 20 6e 69 6c 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 74 72 61 6d	ss".nil))))..(defun.dirvish-tram
95a0	70 2d 64 69 72 2d 64 61 74 61 2d 70 72 6f 63 2d 73 20 28 70 72 6f 63 20 5f 65 78 69 74 29 0a 20	p-dir-data-proc-s.(proc._exit)..
95c0	20 22 53 65 6e 74 69 6e 65 6c 20 66 6f 72 20 60 64 69 72 76 69 73 68 2d 64 61 74 61 2d 66 6f 72	."Sentinel.for.`dirvish-data-for
95e0	2d 64 69 72 27 27 73 20 70 72 6f 63 65 73 73 20 50 52 4f 43 2e 22 0a 20 20 28 75 6e 77 69 6e 64	-dir''s.process.PROC."...(unwind
9600	2d 70 72 6f 74 65 63 74 0a 20 20 20 20 20 20 28 70 63 61 73 65 2d 6c 65 74 2a 20 28 28 60 28 2c	-protect.......(pcase-let*.((`(,
9620	64 69 72 20 2c 62 75 66 20 2c 73 65 74 75 70 29 20 28 70 72 6f 63 65 73 73 2d 67 65 74 20 70 72	dir.,buf.,setup).(process-get.pr
9640	6f 63 20 27 6d 65 74 61 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73	oc.'meta))....................(s
9660	74 72 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 28 70 72 6f 63 65 73 73	tr.(with-current-buffer.(process
9680	2d 62 75 66 66 65 72 20 70 72 6f 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	-buffer.proc)...................
96a0	20 20 20 20 20 20 20 20 28 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73	........(substring-no-properties
96c0	20 28 62 75 66 66 65 72 2d 73 74 72 69 6e 67 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	.(buffer-string)))).............
96e0	20 20 20 20 20 20 20 28 64 61 74 61 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 73 74 72 20 22	.......(data.(split-string.str."
9700	5c 6e 22 29 29 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 62 75 66 66 65 72 2d 6c 69 76	\n"))).........(when.(buffer-liv
9720	65 2d 70 20 62 75 66 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74	e-p.buf)...........(with-current
9740	2d 62 75 66 66 65 72 20 62 75 66 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68	-buffer.buf.............(dirvish
9760	2d 6c 73 2d 6f 75 74 70 75 74 2d 70 61 72 73 65 72 20 64 69 72 20 64 61 74 61 29 0a 20 20 20 20	-ls-output-parser.dir.data).....
9780	20 20 20 20 20 20 20 20 28 77 68 65 6e 20 73 65 74 75 70 20 28 72 75 6e 2d 68 6f 6f 6b 73 20 27	........(when.setup.(run-hooks.'
97a0	64 69 72 76 69 73 68 2d 73 65 74 75 70 2d 68 6f 6f 6b 29 29 0a 20 20 20 20 20 20 20 20 20 20 20	dirvish-setup-hook))............
97c0	20 28 75 6e 6c 65 73 73 20 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 77 64 69 72 65 64	.(unless.(derived-mode-p.'wdired
97e0	2d 6d 6f 64 65 29 20 28 64 69 72 76 69 73 68 2d 75 70 64 61 74 65 2d 62 6f 64 79 2d 68 29 29 29	-mode).(dirvish-update-body-h)))
9800	29 29 0a 20 20 20 20 28 64 69 72 76 69 73 68 2d 2d 6b 69 6c 6c 2d 62 75 66 66 65 72 20 28 70 72	)).....(dirvish--kill-buffer.(pr
9820	6f 63 65 73 73 2d 62 75 66 66 65 72 20 70 72 6f 63 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65	ocess-buffer.proc))))..(cl-defme
9840	74 68 6f 64 20 64 69 72 76 69 73 68 2d 64 61 74 61 2d 66 6f 72 2d 64 69 72 0a 20 20 28 64 69 72	thod.dirvish-data-for-dir...(dir
9860	20 62 75 66 66 65 72 20 73 65 74 75 70 20 26 63 6f 6e 74 65 78 74 20 28 28 64 69 72 76 69 73 68	.buffer.setup.&context.((dirvish
9880	2d 70 72 6f 70 20 3a 72 65 6d 6f 74 65 29 20 73 74 72 69 6e 67 29 29 0a 20 20 22 44 49 52 20 42	-prop.:remote).string))..."DIR.B
98a0	55 46 46 45 52 20 53 45 54 55 50 20 44 49 52 56 49 53 48 2d 50 52 4f 50 2e 22 0a 20 20 28 77 68	UFFER.SETUP.DIRVISH-PROP."...(wh
98c0	65 6e 20 28 64 69 72 76 69 73 68 2d 74 72 61 6d 70 2d 2d 61 73 79 6e 63 2d 70 20 28 64 69 72 76	en.(dirvish-tramp--async-p.(dirv
98e0	69 73 68 2d 70 72 6f 70 20 3a 74 72 61 6d 70 29 29 0a 20 20 20 20 28 6c 65 74 2a 20 28 28 70 72	ish-prop.:tramp)).....(let*.((pr
9900	6f 63 65 73 73 2d 63 6f 6e 6e 65 63 74 69 6f 6e 2d 74 79 70 65 20 6e 69 6c 29 0a 20 20 20 20 20	ocess-connection-type.nil)......
9920	20 20 20 20 20 20 28 62 75 66 20 28 64 69 72 76 69 73 68 2d 2d 75 74 69 6c 2d 62 75 66 66 65 72	......(buf.(dirvish--util-buffer
9940	20 28 6d 61 6b 65 2d 74 65 6d 70 2d 6e 61 6d 65 20 22 64 69 72 2d 64 61 74 61 2d 22 29 29 29 0a	.(make-temp-name."dir-data-"))).
9960	20 20 20 20 20 20 20 20 20 20 20 28 63 6d 64 20 28 66 6f 72 6d 61 74 20 22 6c 73 20 2d 31 6c 61	...........(cmd.(format."ls.-1la
9980	68 69 20 25 73 22 20 28 66 69 6c 65 2d 6c 6f 63 61 6c 2d 6e 61 6d 65 20 64 69 72 29 29 29 0a 20	hi.%s".(file-local-name.dir)))..
99a0	20 20 20 20 20 20 20 20 20 20 28 70 72 6f 63 20 28 73 74 61 72 74 2d 66 69 6c 65 2d 70 72 6f 63	..........(proc.(start-file-proc
99c0	65 73 73 2d 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e 64 20 28 62 75 66 66 65 72 2d 6e 61 6d 65 20 62	ess-shell-command.(buffer-name.b
99e0	75 66 29 20 62 75 66 20 63 6d 64 29 29 29 0a 20 20 20 20 20 20 28 70 72 6f 63 65 73 73 2d 70 75	uf).buf.cmd))).......(process-pu
9a00	74 20 70 72 6f 63 20 27 6d 65 74 61 20 28 6c 69 73 74 20 64 69 72 20 62 75 66 66 65 72 20 73 65	t.proc.'meta.(list.dir.buffer.se
9a20	74 75 70 29 29 0a 20 20 20 20 20 20 28 73 65 74 2d 70 72 6f 63 65 73 73 2d 73 65 6e 74 69 6e 65	tup)).......(set-process-sentine
9a40	6c 20 70 72 6f 63 20 23 27 64 69 72 76 69 73 68 2d 74 72 61 6d 70 2d 64 69 72 2d 64 61 74 61 2d	l.proc.#'dirvish-tramp-dir-data-
9a60	70 72 6f 63 2d 73 29 29 29 29 0a 0a 28 64 69 72 76 69 73 68 2d 64 65 66 69 6e 65 2d 70 72 65 76	proc-s))))..(dirvish-define-prev
9a80	69 65 77 20 74 72 61 6d 70 20 28 66 69 6c 65 20 5f 20 64 76 29 0a 20 20 22 50 72 65 76 69 65 77	iew.tramp.(file._.dv)..."Preview
9aa0	20 66 69 6c 65 73 20 77 69 74 68 20 60 6c 73 27 20 6f 72 20 60 68 65 61 64 27 20 66 6f 72 20 74	.files.with.`ls'.or.`head'.for.t
9ac0	72 61 6d 70 20 66 69 6c 65 73 2e 22 0a 20 20 28 6c 65 74 20 28 28 76 65 63 20 28 64 69 72 76 69	ramp.files."...(let.((vec.(dirvi
9ae0	73 68 2d 70 72 6f 70 20 3a 74 72 61 6d 70 29 29 29 0a 20 20 20 20 28 69 66 20 28 6e 6f 74 20 28	sh-prop.:tramp))).....(if.(not.(
9b00	64 69 72 76 69 73 68 2d 74 72 61 6d 70 2d 2d 61 73 79 6e 63 2d 70 20 76 65 63 29 29 0a 20 20 20	dirvish-tramp--async-p.vec))....
9b20	20 20 20 20 20 27 28 69 6e 66 6f 20 2e 20 22 46 69 6c 65 20 70 72 65 76 69 65 77 20 69 73 20 6e	.....'(info..."File.preview.is.n
9b40	6f 74 20 73 75 70 70 6f 72 74 65 64 20 69 6e 20 63 75 72 72 65 6e 74 20 63 6f 6e 6e 65 63 74 69	ot.supported.in.current.connecti
9b60	6f 6e 22 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 70 72 6f 63 65 73 73 2d 63 6f 6e 6e 65 63	on").......(let.((process-connec
9b80	74 69 6f 6e 2d 74 79 70 65 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 63 61	tion-type.nil).............(loca
9ba0	6c 6e 61 6d 65 20 28 66 69 6c 65 2d 72 65 6d 6f 74 65 2d 70 20 66 69 6c 65 20 27 6c 6f 63 61 6c	lname.(file-remote-p.file.'local
9bc0	6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 62 75 66 20 28 64 69 72 76 69 73 68	name)).............(buf.(dirvish
9be0	2d 2d 75 74 69 6c 2d 62 75 66 66 65 72 20 27 70 72 65 76 69 65 77 20 64 76 20 6e 69 6c 20 74 29	--util-buffer.'preview.dv.nil.t)
9c00	29 20 70 72 6f 63 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 2d 6c 65 74 20 28 28 70 72 6f 63	).proc).........(when-let.((proc
9c20	20 28 67 65 74 2d 62 75 66 66 65 72 2d 70 72 6f 63 65 73 73 20 62 75 66 29 29 29 20 28 64 65 6c	.(get-buffer-process.buf))).(del
9c40	65 74 65 2d 70 72 6f 63 65 73 73 20 70 72 6f 63 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71	ete-process.proc)).........(setq
9c60	20 70 72 6f 63 20 28 73 74 61 72 74 2d 66 69 6c 65 2d 70 72 6f 63 65 73 73 2d 73 68 65 6c 6c 2d	.proc.(start-file-process-shell-
9c80	63 6f 6d 6d 61 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 75 66	command.....................(buf
9ca0	66 65 72 2d 6e 61 6d 65 20 62 75 66 29 20 62 75 66 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	fer-name.buf).buf...............
9cc0	20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 64 69 72 76 69 73 68 2d 74 72 61 6d 70 2d 70 72 65 76	......(format.dirvish-tramp-prev
9ce0	69 65 77 2d 63 6d 64 20 6c 6f 63 61 6c 6e 61 6d 65 20 6c 6f 63 61 6c 6e 61 6d 65 29 29 29 0a 20	iew-cmd.localname.localname)))..
9d00	20 20 20 20 20 20 20 28 73 65 74 2d 70 72 6f 63 65 73 73 2d 73 65 6e 74 69 6e 65 6c 0a 20 20 20	.......(set-process-sentinel....
9d20	20 20 20 20 20 20 70 72 6f 63 20 28 6c 61 6d 62 64 61 20 28 70 72 6f 63 20 5f 73 69 67 29 0a 20	......proc.(lambda.(proc._sig)..
9d40	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 6d 65 6d 71 20 28 70 72 6f 63	...............(when.(memq.(proc
9d60	65 73 73 2d 73 74 61 74 75 73 20 70 72 6f 63 29 20 27 28 65 78 69 74 20 73 69 67 6e 61 6c 29 29	ess-status.proc).'(exit.signal))
9d80	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e	...................(shell-comman
9da0	64 2d 73 65 74 2d 70 6f 69 6e 74 2d 61 66 74 65 72 2d 63 6d 64 20 28 70 72 6f 63 65 73 73 2d 62	d-set-point-after-cmd.(process-b
9dc0	75 66 66 65 72 20 70 72 6f 63 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 2d 70 72 6f	uffer.proc))))).........(set-pro
9de0	63 65 73 73 2d 66 69 6c 74 65 72 0a 20 20 20 20 20 20 20 20 20 70 72 6f 63 20 28 6c 61 6d 62 64	cess-filter..........proc.(lambd
9e00	61 20 28 70 72 6f 63 20 73 74 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69	a.(proc.str).................(wi
9e20	74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 28 70 72 6f 63 65 73 73 2d 62 75 66 66 65	th-current-buffer.(process-buffe
9e40	72 20 70 72 6f 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 64 61	r.proc)...................(funda
9e60	6d 65 6e 74 61 6c 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 28	mental-mode)...................(
9e80	69 6e 73 65 72 74 20 73 74 72 29 29 29 29 0a 20 20 20 20 20 20 20 20 60 28 62 75 66 66 65 72 20	insert.str)))).........`(buffer.
9ea0	2e 20 2c 62 75 66 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 66 69 6e 64	..,buf)))))..(defun.dirvish-find
9ec0	2d 66 69 6c 65 2d 74 72 75 65 2d 70 61 74 68 20 28 29 0a 20 20 22 4f 70 65 6e 20 74 72 75 65 6e	-file-true-path.()..."Open.truen
9ee0	61 6d 65 20 6f 66 20 28 6d 61 79 62 65 29 20 73 79 6d 6c 69 6e 6b 20 66 69 6c 65 20 75 6e 64 65	ame.of.(maybe).symlink.file.unde
9f00	72 20 74 68 65 20 63 75 72 73 6f 72 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20	r.the.cursor."...(interactive)..
9f20	20 28 64 69 72 65 64 2d 6a 75 6d 70 20 6e 69 6c 20 28 66 69 6c 65 2d 74 72 75 65 6e 61 6d 65 20	.(dired-jump.nil.(file-truename.
9f40	28 64 69 72 65 64 2d 67 65 74 2d 66 69 6c 65 6e 61 6d 65 20 6e 69 6c 20 74 29 29 29 29 0a 0a 28	(dired-get-filename.nil.t))))..(
9f60	64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 2d 6b 69 6c 6c 2d 61 6e 64 2d 65 63 68 6f 20 28 73 74	defun.dirvish--kill-and-echo.(st
9f80	72 69 6e 67 29 0a 20 20 22 45 63 68 6f 20 6c 61 73 74 20 6b 69 6c 6c 65 64 20 53 54 52 49 4e 47	ring)..."Echo.last.killed.STRING
9fa0	2e 22 0a 20 20 28 6b 69 6c 6c 2d 6e 65 77 20 73 74 72 69 6e 67 29 0a 20 20 28 6c 65 74 20 28 28	."...(kill-new.string)...(let.((
9fc0	68 69 6e 74 20 28 70 72 6f 70 65 72 74 69 7a 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	hint.(propertize................
9fe0	22 43 6f 70 69 65 64 3a 20 22 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 62 75 69 6c	"Copied:.".'face.'font-lock-buil
a000	74 69 6e 2d 66 61 63 65 29 29 29 0a 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 25 73 22 20 28 66	tin-face))).....(message."%s".(f
a020	6f 72 6d 61 74 20 22 25 73 25 73 22 20 68 69 6e 74 20 73 74 72 69 6e 67 29 29 29 29 0a 0a 28 64	ormat."%s%s".hint.string))))..(d
a040	65 66 75 6e 20 64 69 72 76 69 73 68 2d 63 6f 70 79 2d 66 69 6c 65 2d 74 72 75 65 2d 70 61 74 68	efun.dirvish-copy-file-true-path
a060	20 28 29 0a 20 20 22 43 6f 70 79 20 74 72 75 65 6e 61 6d 65 20 6f 66 20 28 6d 61 79 62 65 29 20	.()..."Copy.truename.of.(maybe).
a080	73 79 6d 6c 69 6e 6b 20 66 69 6c 65 20 75 6e 64 65 72 20 74 68 65 20 63 75 72 73 6f 72 2e 22 0a	symlink.file.under.the.cursor.".
a0a0	20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 64 69 72 76 69 73 68 2d 2d 6b 69 6c 6c	..(interactive)...(dirvish--kill
a0c0	2d 61 6e 64 2d 65 63 68 6f 0a 20 20 20 28 66 69 6c 65 2d 74 72 75 65 6e 61 6d 65 20 28 64 69 72	-and-echo....(file-truename.(dir
a0e0	65 64 2d 67 65 74 2d 66 69 6c 65 6e 61 6d 65 20 6e 69 6c 20 74 29 29 29 29 0a 0a 3b 3b 3b 23 23	ed-get-filename.nil.t))))..;;;##
a100	23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 63 6f 70 79 2d 66 69	#autoload.(defun.dirvish-copy-fi
a120	6c 65 2d 6e 61 6d 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20 6d 75 6c 74 69 2d 6c 69 6e 65 29 0a 20	le-name.(&optional.multi-line)..
a140	20 22 43 6f 70 79 20 66 69 6c 65 6e 61 6d 65 20 6f 66 20 6d 61 72 6b 65 64 20 66 69 6c 65 73 2e	."Copy.filename.of.marked.files.
a160	0a 49 66 20 4d 55 4c 54 49 2d 4c 49 4e 45 2c 20 6d 61 6b 65 20 65 76 65 72 79 20 6e 61 6d 65 20	.If.MULTI-LINE,.make.every.name.
a180	6f 63 63 75 70 79 20 61 20 6e 65 77 20 6c 69 6e 65 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69	occupy.a.new.line."...(interacti
a1a0	76 65 20 22 50 22 29 0a 20 20 28 6c 65 74 2a 20 28 28 66 69 6c 65 73 20 28 64 69 72 65 64 2d 67	ve."P")...(let*.((files.(dired-g
a1c0	65 74 2d 6d 61 72 6b 65 64 2d 66 69 6c 65 73 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 6e 61	et-marked-files.t))..........(na
a1e0	6d 65 73 20 28 6d 61 70 63 6f 6e 63 61 74 20 23 27 63 6f 6e 63 61 74 20 66 69 6c 65 73 20 28 69	mes.(mapconcat.#'concat.files.(i
a200	66 20 6d 75 6c 74 69 2d 6c 69 6e 65 20 22 5c 6e 22 20 22 20 22 29 29 29 29 0a 20 20 20 20 28 64	f.multi-line."\n".".")))).....(d
a220	69 72 76 69 73 68 2d 2d 6b 69 6c 6c 2d 61 6e 64 2d 65 63 68 6f 20 28 69 66 20 6d 75 6c 74 69 2d	irvish--kill-and-echo.(if.multi-
a240	6c 69 6e 65 20 28 63 6f 6e 63 61 74 20 22 5c 6e 22 20 6e 61 6d 65 73 29 20 6e 61 6d 65 73 29 29	line.(concat."\n".names).names))
a260	29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73	))..;;;###autoload.(defun.dirvis
a280	68 2d 63 6f 70 79 2d 66 69 6c 65 2d 70 61 74 68 20 28 26 6f 70 74 69 6f 6e 61 6c 20 6d 75 6c 74	h-copy-file-path.(&optional.mult
a2a0	69 2d 6c 69 6e 65 29 0a 20 20 22 43 6f 70 79 20 66 69 6c 65 70 61 74 68 20 6f 66 20 6d 61 72 6b	i-line)..."Copy.filepath.of.mark
a2c0	65 64 20 66 69 6c 65 73 2e 0a 49 66 20 4d 55 4c 54 49 2d 4c 49 4e 45 2c 20 6d 61 6b 65 20 65 76	ed.files..If.MULTI-LINE,.make.ev
a2e0	65 72 79 20 70 61 74 68 20 6f 63 63 75 70 79 20 61 20 6e 65 77 20 6c 69 6e 65 2e 22 0a 20 20 28	ery.path.occupy.a.new.line."...(
a300	69 6e 74 65 72 61 63 74 69 76 65 20 22 50 22 29 0a 20 20 28 6c 65 74 2a 20 28 28 66 69 6c 65 73	interactive."P")...(let*.((files
a320	20 28 6d 61 70 63 61 72 20 23 27 66 69 6c 65 2d 6c 6f 63 61 6c 2d 6e 61 6d 65 20 28 64 69 72 65	.(mapcar.#'file-local-name.(dire
a340	64 2d 67 65 74 2d 6d 61 72 6b 65 64 2d 66 69 6c 65 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 28	d-get-marked-files)))..........(
a360	6e 61 6d 65 73 20 28 6d 61 70 63 6f 6e 63 61 74 20 23 27 63 6f 6e 63 61 74 20 66 69 6c 65 73 20	names.(mapconcat.#'concat.files.
a380	28 69 66 20 6d 75 6c 74 69 2d 6c 69 6e 65 20 22 5c 6e 22 20 22 20 22 29 29 29 29 0a 20 20 20 20	(if.multi-line."\n".".")))).....
a3a0	28 64 69 72 76 69 73 68 2d 2d 6b 69 6c 6c 2d 61 6e 64 2d 65 63 68 6f 20 28 69 66 20 6d 75 6c 74	(dirvish--kill-and-echo.(if.mult
a3c0	69 2d 6c 69 6e 65 20 28 63 6f 6e 63 61 74 20 22 5c 6e 22 20 6e 61 6d 65 73 29 20 6e 61 6d 65 73	i-line.(concat."\n".names).names
a3e0	29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 63 6f 70 79 2d 72 65 6d 6f 74 65	))))..(defun.dirvish-copy-remote
a400	2d 70 61 74 68 20 28 26 6f 70 74 69 6f 6e 61 6c 20 6d 75 6c 74 69 2d 6c 69 6e 65 29 0a 20 20 22	-path.(&optional.multi-line)..."
a420	43 6f 70 79 20 72 65 6d 6f 74 65 20 70 61 74 68 20 6f 66 20 6d 61 72 6b 65 64 20 66 69 6c 65 73	Copy.remote.path.of.marked.files
a440	2e 0a 49 66 20 4d 55 4c 54 49 2d 4c 49 4e 45 2c 20 6d 61 6b 65 20 65 76 65 72 79 20 70 61 74 68	..If.MULTI-LINE,.make.every.path
a460	20 6f 63 63 75 70 79 20 61 20 6e 65 77 20 6c 69 6e 65 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74	.occupy.a.new.line."...(interact
a480	69 76 65 20 22 50 22 29 0a 20 20 28 6c 65 74 2a 20 28 28 74 72 61 6d 70 20 28 6f 72 20 28 64 69	ive."P")...(let*.((tramp.(or.(di
a4a0	72 76 69 73 68 2d 70 72 6f 70 20 3a 74 72 61 6d 70 29 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22	rvish-prop.:tramp).(user-error."
a4c0	4e 6f 74 20 61 20 72 65 6d 6f 74 65 20 66 6f 6c 64 65 72 22 29 29 29 0a 20 20 20 20 20 20 20 20	Not.a.remote.folder"))).........
a4e0	20 28 66 69 6c 65 73 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 66 69 6c 65 20 69 6e 20 28 64 69	.(files.(cl-loop.for.file.in.(di
a500	72 65 64 2d 67 65 74 2d 6d 61 72 6b 65 64 2d 66 69 6c 65 73 29 0a 20 20 20 20 20 20 20 20 20 20	red-get-marked-files)...........
a520	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 75 73 65 72 20 3d 20 28 74 72 61 6d 70	...............for.user.=.(tramp
a540	2d 66 69 6c 65 2d 6e 61 6d 65 2d 75 73 65 72 20 74 72 61 6d 70 29 0a 20 20 20 20 20 20 20 20 20	-file-name-user.tramp)..........
a560	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 68 6f 73 74 20 3d 20 28 74 72 61 6d	................for.host.=.(tram
a580	70 2d 66 69 6c 65 2d 6e 61 6d 65 2d 68 6f 73 74 20 74 72 61 6d 70 29 0a 20 20 20 20 20 20 20 20	p-file-name-host.tramp).........
a5a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 6c 6f 63 61 6c 6e 61 6d 65 20 3d	.................for.localname.=
a5c0	20 28 66 69 6c 65 2d 6c 6f 63 61 6c 2d 6e 61 6d 65 20 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20	.(file-local-name.file).........
a5e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 6c 6c 65 63 74 20 28 66 6f 72 6d 61 74	.................collect.(format
a600	20 22 25 73 25 73 25 73 3a 25 73 22 20 28 6f 72 20 75 73 65 72 20 22 22 29 0a 20 20 20 20 20 20	."%s%s%s:%s".(or.user."").......
a620	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	................................
a640	20 20 20 28 69 66 20 75 73 65 72 20 22 40 22 20 22 22 29 20 68 6f 73 74 20 6c 6f 63 61 6c 6e 61	...(if.user."@"."").host.localna
a660	6d 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 6e 61 6d 65 73 20 28 6d 61 70 63 6f 6e 63 61 74	me)))..........(names.(mapconcat
a680	20 23 27 63 6f 6e 63 61 74 20 66 69 6c 65 73 20 28 69 66 20 6d 75 6c 74 69 2d 6c 69 6e 65 20 22	.#'concat.files.(if.multi-line."
a6a0	5c 6e 22 20 22 20 22 29 29 29 29 0a 20 20 20 20 28 64 69 72 76 69 73 68 2d 2d 6b 69 6c 6c 2d 61	\n".".")))).....(dirvish--kill-a
a6c0	6e 64 2d 65 63 68 6f 20 28 69 66 20 6d 75 6c 74 69 2d 6c 69 6e 65 20 28 63 6f 6e 63 61 74 20 22	nd-echo.(if.multi-line.(concat."
a6e0	5c 6e 22 20 6e 61 6d 65 73 29 20 6e 61 6d 65 73 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72	\n".names).names))))..(defun.dir
a700	76 69 73 68 2d 63 6f 70 79 2d 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 20 28 29 0a 20 20 22 43	vish-copy-file-directory.()..."C
a720	6f 70 79 20 64 69 72 65 63 74 6f 72 79 20 6e 61 6d 65 20 6f 66 20 66 69 6c 65 20 75 6e 64 65 72	opy.directory.name.of.file.under
a740	20 74 68 65 20 63 75 72 73 6f 72 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20	.the.cursor."...(interactive)...
a760	28 64 69 72 76 69 73 68 2d 2d 6b 69 6c 6c 2d 61 6e 64 2d 65 63 68 6f 0a 20 20 20 28 65 78 70 61	(dirvish--kill-and-echo....(expa
a780	6e 64 2d 66 69 6c 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	nd-file-name.default-directory))
a7a0	29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68	)..;;;###autoload.(defun.dirvish
a7c0	2d 74 6f 74 61 6c 2d 66 69 6c 65 2d 73 69 7a 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20 66 69 6c 65	-total-file-size.(&optional.file
a7e0	73 65 74 29 0a 20 20 22 45 63 68 6f 20 74 6f 74 61 6c 20 66 69 6c 65 20 73 69 7a 65 20 6f 66 20	set)..."Echo.total.file.size.of.
a800	46 49 4c 45 53 45 54 2e 0a 46 49 4c 45 53 45 54 20 64 65 66 61 75 6c 74 73 20 74 6f 20 60 64 69	FILESET..FILESET.defaults.to.`di
a820	72 65 64 2d 67 65 74 2d 6d 61 72 6b 65 64 2d 66 69 6c 65 73 27 2e 22 0a 20 20 28 69 6e 74 65 72	red-get-marked-files'."...(inter
a840	61 63 74 69 76 65 29 0a 20 20 28 63 6c 2d 6c 61 62 65 6c 73 20 28 28 66 2d 6e 61 6d 65 20 28 66	active)...(cl-labels.((f-name.(f
a860	29 20 28 69 66 20 28 6e 6f 74 20 28 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 66 29 29	).(if.(not.(file-directory-p.f))
a880	20 66 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	.f..............................
a8a0	20 28 64 69 72 65 63 74 6f 72 79 2d 66 69 6c 65 73 2d 72 65 63 75 72 73 69 76 65 6c 79 20 66 20	.(directory-files-recursively.f.
a8c0	22 2e 2a 22 20 6e 69 6c 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 2d 73	".*".nil.t)))...............(f-s
a8e0	69 7a 65 20 28 66 29 20 28 63 6f 6e 64 69 74 69 6f 6e 2d 63 61 73 65 20 6e 69 6c 0a 20 20 20 20	ize.(f).(condition-case.nil.....
a900	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 69 6c 65 2d	..........................(file-
a920	61 74 74 72 69 62 75 74 65 2d 73 69 7a 65 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 73 20	attribute-size.(file-attributes.
a940	66 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	f)).............................
a960	28 66 69 6c 65 2d 65 72 72 6f 72 20 30 29 29 29 29 0a 20 20 20 20 28 6c 65 74 2a 20 28 28 66 69	(file-error.0)))).....(let*.((fi
a980	6c 65 73 65 74 20 28 6f 72 20 66 69 6c 65 73 65 74 20 28 64 69 72 65 64 2d 67 65 74 2d 6d 61 72	leset.(or.fileset.(dired-get-mar
a9a0	6b 65 64 2d 66 69 6c 65 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e 74 20 28	ked-files)))............(count.(
a9c0	70 72 6f 70 65 72 74 69 7a 65 20 28 6e 75 6d 62 65 72 2d 74 6f 2d 73 74 72 69 6e 67 20 28 6c 65	propertize.(number-to-string.(le
a9e0	6e 67 74 68 20 66 69 6c 65 73 65 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ngth.fileset))..................
aa00	20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 62 75	.............'face.'font-lock-bu
aa20	69 6c 74 69 6e 2d 66 61 63 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 69 7a 65 20 28 74	iltin-face))............(size.(t
aa40	68 72 65 61 64 2d 6c 61 73 74 20 66 69 6c 65 73 65 74 20 28 6d 61 70 63 61 72 20 23 27 66 2d 6e	hread-last.fileset.(mapcar.#'f-n
aa60	61 6d 65 29 20 66 6c 61 74 74 65 6e 2d 74 72 65 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ame).flatten-tree...............
aa80	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 20 23 27 66 2d 73 69 7a 65	................(mapcar.#'f-size
aaa0	29 20 28 63 6c 2d 72 65 64 75 63 65 20 23 27 2b 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	).(cl-reduce.#'+)...............
aac0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 69 6c 65 2d 73 69 7a 65 2d 68 75 6d 61 6e 2d	................file-size-human-
aae0	72 65 61 64 61 62 6c 65 29 29 29 0a 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 25 73 22 20	readable))).......(message."%s".
ab00	28 66 6f 72 6d 61 74 20 22 54 6f 74 61 6c 20 73 69 7a 65 20 6f 66 20 25 73 20 65 6e 74 72 69 65	(format."Total.size.of.%s.entrie
ab20	73 3a 20 25 73 22 20 63 6f 75 6e 74 20 73 69 7a 65 29 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75	s:.%s".count.size)))))..;;;###au
ab40	74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 6c 61 79 6f 75 74 2d 74 6f 67	toload.(defun.dirvish-layout-tog
ab60	67 6c 65 20 28 29 0a 20 20 22 54 6f 67 67 6c 65 20 6c 61 79 6f 75 74 20 6f 66 20 63 75 72 72 65	gle.()..."Toggle.layout.of.curre
ab80	6e 74 20 44 69 72 76 69 73 68 20 73 65 73 73 69 6f 6e 2e 0a 41 20 73 65 73 73 69 6f 6e 20 77 69	nt.Dirvish.session..A.session.wi
aba0	74 68 20 6c 61 79 6f 75 74 20 6d 65 61 6e 73 20 69 74 20 68 61 73 20 61 20 63 6f 6d 70 61 6e 69	th.layout.means.it.has.a.compani
abc0	6f 6e 20 70 72 65 76 69 65 77 20 77 69 6e 64 6f 77 20 61 6e 64 0a 70 6f 73 73 69 62 6c 79 20 6f	on.preview.window.and.possibly.o
abe0	6e 65 20 6f 72 20 6d 6f 72 65 20 70 61 72 65 6e 74 20 77 69 6e 64 6f 77 73 2e 22 0a 20 20 28 69	ne.or.more.parent.windows."...(i
ac00	6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 2a 20 28 28 64 76 20 28 6f 72 20 28 64 69	nteractive)...(let*.((dv.(or.(di
ac20	72 76 69 73 68 2d 63 75 72 72 29 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 4e 6f 74 20 61 20 64	rvish-curr).(user-error."Not.a.d
ac40	69 72 76 69 73 68 20 62 75 66 66 65 72 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 6f 6c 64 2d	irvish.buffer")))..........(old-
ac60	6c 61 79 6f 75 74 20 28 63 61 72 20 28 64 76 2d 6c 61 79 6f 75 74 20 64 76 29 29 29 0a 20 20 20	layout.(car.(dv-layout.dv)))....
ac80	20 20 20 20 20 20 28 6e 65 77 2d 6c 61 79 6f 75 74 20 28 75 6e 6c 65 73 73 20 6f 6c 64 2d 6c 61	......(new-layout.(unless.old-la
aca0	79 6f 75 74 20 28 63 64 72 20 28 64 76 2d 6c 61 79 6f 75 74 20 64 76 29 29 29 29 0a 20 20 20 20	yout.(cdr.(dv-layout.dv)))).....
acc0	20 20 20 20 20 28 62 75 66 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20	.....(buf.(current-buffer)))....
ace0	20 28 69 66 20 6f 6c 64 2d 6c 61 79 6f 75 74 20 28 73 65 74 2d 77 69 6e 64 6f 77 2d 63 6f 6e 66	.(if.old-layout.(set-window-conf
ad00	69 67 75 72 61 74 69 6f 6e 20 28 64 76 2d 77 69 6e 63 6f 6e 66 20 64 76 29 29 0a 20 20 20 20 20	iguration.(dv-winconf.dv))......
ad20	20 28 77 69 74 68 2d 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 20 28 64 76 2d 72 6f 6f 74 2d	.(with-selected-window.(dv-root-
ad40	77 69 6e 64 6f 77 20 64 76 29 20 28 71 75 69 74 2d 77 69 6e 64 6f 77 29 29 29 0a 20 20 20 20 28	window.dv).(quit-window))).....(
ad60	73 65 74 63 61 72 20 28 64 76 2d 6c 61 79 6f 75 74 20 64 76 29 20 6e 65 77 2d 6c 61 79 6f 75 74	setcar.(dv-layout.dv).new-layout
ad80	29 0a 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 64 69 72	).....(with-selected-window.(dir
ada0	76 69 73 68 2d 2d 63 72 65 61 74 65 2d 72 6f 6f 74 2d 77 69 6e 64 6f 77 20 64 76 29 0a 20 20 20	vish--create-root-window.dv)....
adc0	20 20 20 28 73 77 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 20 62 75 66 29 0a 20 20 20 20 20 20	...(switch-to-buffer.buf).......
ade0	28 64 69 72 76 69 73 68 2d 2d 69 6e 69 74 2d 73 65 73 73 69 6f 6e 20 64 76 29 29 29 29 0a 0a 3b	(dirvish--init-session.dv))))..;
ae00	3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 6c 61 79	;;###autoload.(defun.dirvish-lay
ae20	6f 75 74 2d 73 77 69 74 63 68 20 28 26 6f 70 74 69 6f 6e 61 6c 20 72 65 63 69 70 65 29 0a 20 20	out-switch.(&optional.recipe)...
ae40	22 53 77 69 74 63 68 20 44 69 72 76 69 73 68 20 6c 61 79 6f 75 74 20 61 63 63 6f 72 64 69 6e 67	"Switch.Dirvish.layout.according
ae60	20 74 6f 20 52 45 43 49 50 45 2e 0a 49 66 20 52 45 43 49 50 45 20 69 73 20 6e 6f 74 20 70 72 6f	.to.RECIPE..If.RECIPE.is.not.pro
ae80	76 69 64 65 64 2c 20 73 77 69 74 63 68 20 74 6f 20 74 68 65 20 72 65 63 69 70 65 20 6e 65 78 74	vided,.switch.to.the.recipe.next
aea0	20 74 6f 20 74 68 65 0a 63 75 72 72 65 6e 74 20 6c 61 79 6f 75 74 20 64 65 66 69 6e 65 64 20 69	.to.the.current.layout.defined.i
aec0	6e 20 60 64 69 72 76 69 73 68 2d 6c 61 79 6f 75 74 2d 72 65 63 69 70 65 73 27 2e 22 0a 20 20 28	n.`dirvish-layout-recipes'."...(
aee0	69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 63 6c 2d 6c 6f 6f 70 0a 20 20 20 77 69 74 68 20	interactive)...(cl-loop....with.
af00	64 76 20 3d 20 28 6c 65 74 20 28 28 64 76 20 28 64 69 72 76 69 73 68 2d 63 75 72 72 29 29 29 0a	dv.=.(let.((dv.(dirvish-curr))).
af20	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 64 76 20 28 75 73 65 72 2d	...............(unless.dv.(user-
af40	65 72 72 6f 72 20 22 4e 6f 74 20 69 6e 20 61 20 44 69 72 76 69 73 68 20 73 65 73 73 69 6f 6e 22	error."Not.in.a.Dirvish.session"
af60	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 63 61 72 20 28	))................(unless.(car.(
af80	64 76 2d 6c 61 79 6f 75 74 20 64 76 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	dv-layout.dv))..................
afa0	28 64 69 72 76 69 73 68 2d 6c 61 79 6f 75 74 2d 74 6f 67 67 6c 65 29 0a 20 20 20 20 20 20 20 20	(dirvish-layout-toggle).........
afc0	20 20 20 20 20 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 44 69 72 76 69 73 68 3a 20 65	.........(user-error."Dirvish:.e
afe0	6e 74 65 72 69 6e 67 20 66 75 6c 6c 73 63 72 65 65 6e 22 29 29 20 64 76 29 0a 20 20 20 77 69 74	ntering.fullscreen")).dv)....wit
b000	68 20 6f 6c 64 2d 72 65 63 69 70 65 20 3d 20 28 63 61 72 20 28 64 76 2d 6c 61 79 6f 75 74 20 64	h.old-recipe.=.(car.(dv-layout.d
b020	76 29 29 0a 20 20 20 77 69 74 68 20 72 65 63 69 70 65 73 20 3d 20 28 69 66 20 72 65 63 69 70 65	v))....with.recipes.=.(if.recipe
b040	20 28 6c 69 73 74 20 72 65 63 69 70 65 29 20 64 69 72 76 69 73 68 2d 6c 61 79 6f 75 74 2d 72 65	.(list.recipe).dirvish-layout-re
b060	63 69 70 65 73 29 0a 20 20 20 77 69 74 68 20 6c 2d 6c 65 6e 67 74 68 20 3d 20 28 6c 65 6e 67 74	cipes)....with.l-length.=.(lengt
b080	68 20 72 65 63 69 70 65 73 29 0a 20 20 20 66 6f 72 20 69 64 78 20 66 72 6f 6d 20 31 0a 20 20 20	h.recipes)....for.idx.from.1....
b0a0	66 6f 72 20 72 65 63 69 70 65 20 69 6e 20 72 65 63 69 70 65 73 0a 20 20 20 77 68 65 6e 20 28 6f	for.recipe.in.recipes....when.(o
b0c0	72 20 28 65 71 20 69 64 78 20 6c 2d 6c 65 6e 67 74 68 29 20 28 65 71 75 61 6c 20 6f 6c 64 2d 72	r.(eq.idx.l-length).(equal.old-r
b0e0	65 63 69 70 65 20 72 65 63 69 70 65 29 29 0a 20 20 20 72 65 74 75 72 6e 0a 20 20 20 28 6c 65 74	ecipe.recipe))....return....(let
b100	2a 20 28 28 6e 65 77 2d 69 64 78 20 28 69 66 20 28 3e 20 69 64 78 20 28 31 2d 20 6c 2d 6c 65 6e	*.((new-idx.(if.(>.idx.(1-.l-len
b120	67 74 68 29 29 20 30 20 69 64 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6e 65 77 2d 72 65 63	gth)).0.idx))...........(new-rec
b140	69 70 65 20 28 6e 74 68 20 6e 65 77 2d 69 64 78 20 72 65 63 69 70 65 73 29 29 29 0a 20 20 20 20	ipe.(nth.new-idx.recipes))).....
b160	20 28 73 65 74 66 20 28 64 76 2d 6c 61 79 6f 75 74 20 64 76 29 20 28 63 6f 6e 73 20 6e 65 77 2d	.(setf.(dv-layout.dv).(cons.new-
b180	72 65 63 69 70 65 20 6e 65 77 2d 72 65 63 69 70 65 29 29 0a 20 20 20 20 20 28 64 69 72 76 69 73	recipe.new-recipe))......(dirvis
b1a0	68 2d 2d 69 6e 69 74 2d 73 65 73 73 69 6f 6e 20 64 76 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64	h--init-session.dv))))..(defun.d
b1c0	69 72 76 69 73 68 2d 72 65 6e 61 6d 65 2d 73 70 61 63 65 2d 74 6f 2d 75 6e 64 65 72 73 63 6f 72	irvish-rename-space-to-underscor
b1e0	65 20 28 29 0a 20 20 22 52 65 6e 61 6d 65 20 6d 61 72 6b 65 64 20 66 69 6c 65 73 20 62 79 20 72	e.()..."Rename.marked.files.by.r
b200	65 70 6c 61 63 69 6e 67 20 73 70 61 63 65 20 74 6f 20 75 6e 64 65 72 73 63 6f 72 65 2e 22 0a 20	eplacing.space.to.underscore."..
b220	20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 72 65 71 75 69 72 65 20 27 64 69 72 65 64	.(interactive)...(require.'dired
b240	2d 61 75 78 29 0a 20 20 28 69 66 20 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 64 69 72	-aux)...(if.(derived-mode-p.'dir
b260	65 64 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 6d 61 72 6b 65 64 46 69 6c 65	ed-mode).......(let.((markedFile
b280	73 20 28 64 69 72 65 64 2d 67 65 74 2d 6d 61 72 6b 65 64 2d 66 69 6c 65 73 20 29 29 29 0a 20 20	s.(dired-get-marked-files.)))...
b2a0	20 20 20 20 20 20 28 6d 61 70 63 20 28 6c 61 6d 62 64 61 20 28 78 29 0a 20 20 20 20 20 20 20 20	......(mapc.(lambda.(x).........
b2c0	20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 20 22 20	........(when.(string-match.".".
b2e0	78 20 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 72 65 6e	x.)...................(dired-ren
b300	61 6d 65 2d 66 69 6c 65 20 78 20 28 72 65 70 6c 61 63 65 2d 72 65 67 65 78 70 2d 69 6e 2d 73 74	ame-file.x.(replace-regexp-in-st
b320	72 69 6e 67 20 22 20 22 20 22 5f 22 20 78 29 20 6e 69 6c 29 29 29 0a 20 20 20 20 20 20 20 20 20	ring."."."_".x).nil)))..........
b340	20 20 20 20 20 6d 61 72 6b 65 64 46 69 6c 65 73 29 0a 20 20 20 20 20 20 20 20 28 72 65 76 65 72	.....markedFiles).........(rever
b360	74 2d 62 75 66 66 65 72 29 29 0a 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 4e 6f 74 20	t-buffer)).....(user-error."Not.
b380	69 6e 20 61 20 44 69 72 65 64 20 62 75 66 66 65 72 22 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69	in.a.Dired.buffer")))..(defun.di
b3a0	72 76 69 73 68 2d 2d 6d 61 72 6b 65 64 2d 66 69 6c 65 73 2d 61 73 2d 69 6e 66 6f 2d 73 74 72 69	rvish--marked-files-as-info-stri
b3c0	6e 67 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 61 6c 6c 20 6d 61 72 6b 65 64 20 66 69 6c 65 73	ng.()..."Return.all.marked.files
b3e0	20 61 73 20 61 20 73 74 72 69 6e 67 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 66 69 6c 65 73 20 28	.as.a.string."...(let*.((files.(
b400	64 69 72 65 64 2d 67 65 74 2d 6d 61 72 6b 65 64 2d 66 69 6c 65 73 20 74 29 29 0a 20 20 20 20 20	dired-get-marked-files.t))......
b420	20 20 20 20 28 63 6f 75 6e 74 20 28 6c 65 6e 67 74 68 20 66 69 6c 65 73 29 29 29 0a 20 20 20 20	....(count.(length.files))).....
b440	28 63 6f 6e 64 20 28 28 3c 3d 20 63 6f 75 6e 74 20 31 29 0a 20 20 20 20 20 20 20 20 20 20 20 28	(cond.((<=.count.1)............(
b460	66 6f 72 6d 61 74 20 22 63 75 72 72 65 6e 74 20 66 69 6c 65 3a 20 25 73 22 20 28 64 69 72 65 64	format."current.file:.%s".(dired
b480	2d 67 65 74 2d 66 69 6c 65 6e 61 6d 65 20 74 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28	-get-filename.t.t)))...........(
b4a0	28 3c 3d 20 63 6f 75 6e 74 20 31 30 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74	(<=.count.10)............(format
b4c0	20 22 6d 61 72 6b 65 64 20 66 69 6c 65 73 3a 5c 6e 20 20 25 73 22 20 28 6d 61 70 63 6f 6e 63 61	."marked.files:\n..%s".(mapconca
b4e0	74 20 23 27 63 6f 6e 63 61 74 20 66 69 6c 65 73 20 22 5c 6e 20 20 22 29 29 29 0a 20 20 20 20 20	t.#'concat.files."\n..")))......
b500	20 20 20 20 20 28 74 20 28 66 6f 72 6d 61 74 20 22 6d 61 72 6b 65 64 20 66 69 6c 65 73 3a 5c 6e	.....(t.(format."marked.files:\n
b520	20 20 25 73 5c 6e 20 20 2e 2e 2e 20 61 6e 64 20 25 73 20 6d 6f 72 65 20 28 25 73 20 69 6e 20 74	..%s\n......and.%s.more.(%s.in.t
b540	6f 74 61 6c 29 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70	otal)"......................(map
b560	63 6f 6e 63 61 74 20 23 27 63 6f 6e 63 61 74 20 28 73 65 71 2d 74 61 6b 65 20 66 69 6c 65 73 20	concat.#'concat.(seq-take.files.
b580	31 30 29 20 22 5c 6e 20 20 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	10)."\n..").....................
b5a0	20 28 2d 20 63 6f 75 6e 74 20 31 30 29 20 63 6f 75 6e 74 29 29 29 29 29 0a 0a 3b 3b 3b 23 23 23	.(-.count.10).count)))))..;;;###
b5c0	61 75 74 6f 6c 6f 61 64 20 28 61 75 74 6f 6c 6f 61 64 20 27 64 69 72 76 69 73 68 2d 66 69 6c 65	autoload.(autoload.'dirvish-file
b5e0	2d 69 6e 66 6f 2d 6d 65 6e 75 20 22 64 69 72 76 69 73 68 2d 65 78 74 72 61 73 22 20 6e 69 6c 20	-info-menu."dirvish-extras".nil.
b600	74 29 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 70 72 65 66 69 78 20 64 69 72 76	t).(transient-define-prefix.dirv
b620	69 73 68 2d 66 69 6c 65 2d 69 6e 66 6f 2d 6d 65 6e 75 20 28 29 0a 20 20 22 47 61 74 68 65 72 20	ish-file-info-menu.()..."Gather.
b640	66 69 6c 65 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 2e 22 0a 20 20 5b 3a 64 65 73 63 72 69 70 74 69	file.information."...[:descripti
b660	6f 6e 0a 20 20 20 28 6c 61 6d 62 64 61 20 28 29 20 28 64 69 72 76 69 73 68 2d 2d 66 6f 72 6d 61	on....(lambda.().(dirvish--forma
b680	74 2d 6d 65 6e 75 2d 68 65 61 64 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 22 47 65 74 20 46 69	t-menu-heading..........."Get.Fi
b6a0	6c 65 20 49 6e 66 6f 72 6d 61 74 69 6f 6e 22 0a 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69	le.Information"...........(dirvi
b6c0	73 68 2d 2d 6d 61 72 6b 65 64 2d 66 69 6c 65 73 2d 61 73 2d 69 6e 66 6f 2d 73 74 72 69 6e 67 29	sh--marked-files-as-info-string)
b6e0	29 29 0a 20 20 20 28 22 6e 22 20 20 20 22 43 6f 70 79 20 66 69 6c 65 20 4e 41 4d 45 73 20 69 6e	))....("n"..."Copy.file.NAMEs.in
b700	20 6f 6e 65 20 6c 69 6e 65 20 3c 6e 3e 20 2f 20 6d 75 6c 74 69 70 6c 65 20 6c 69 6e 65 73 20 3c	.one.line.<n>./.multiple.lines.<
b720	43 2d 75 20 6e 3e 22 0a 20 20 20 20 64 69 72 76 69 73 68 2d 63 6f 70 79 2d 66 69 6c 65 2d 6e 61	C-u.n>".....dirvish-copy-file-na
b740	6d 65 29 0a 20 20 20 28 22 70 22 20 20 20 22 43 6f 70 79 20 66 69 6c 65 20 50 41 54 48 73 20 69	me)....("p"..."Copy.file.PATHs.i
b760	6e 20 6f 6e 65 20 6c 69 6e 65 20 3c 70 3e 20 2f 20 6d 75 6c 74 69 70 6c 65 20 6c 69 6e 65 73 20	n.one.line.<p>./.multiple.lines.
b780	3c 43 2d 75 20 70 3e 22 0a 20 20 20 20 64 69 72 76 69 73 68 2d 63 6f 70 79 2d 66 69 6c 65 2d 70	<C-u.p>".....dirvish-copy-file-p
b7a0	61 74 68 29 0a 20 20 20 28 22 50 22 20 20 20 22 43 6f 70 79 20 72 65 6d 6f 74 65 20 50 41 54 48	ath)....("P"..."Copy.remote.PATH
b7c0	73 20 69 6e 20 6f 6e 65 20 6c 69 6e 65 20 3c 50 3e 20 2f 20 6d 75 6c 74 69 70 6c 65 20 6c 69 6e	s.in.one.line.<P>./.multiple.lin
b7e0	65 73 20 3c 43 2d 75 20 50 3e 22 0a 20 20 20 20 64 69 72 76 69 73 68 2d 63 6f 70 79 2d 72 65 6d	es.<C-u.P>".....dirvish-copy-rem
b800	6f 74 65 2d 70 61 74 68 0a 20 20 20 20 3a 69 66 20 28 6c 61 6d 62 64 61 20 28 29 20 28 64 69 72	ote-path.....:if.(lambda.().(dir
b820	76 69 73 68 2d 70 72 6f 70 20 3a 72 65 6d 6f 74 65 29 29 29 0a 20 20 20 28 22 64 22 20 20 20 22	vish-prop.:remote)))....("d"..."
b840	43 6f 70 79 20 66 69 6c 65 20 44 49 52 45 43 54 4f 52 59 22 20 20 20 20 20 20 20 20 20 20 20 20	Copy.file.DIRECTORY"............
b860	20 20 20 20 64 69 72 76 69 73 68 2d 63 6f 70 79 2d 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 29	....dirvish-copy-file-directory)
b880	0a 20 20 20 28 22 6c 22 20 20 20 22 43 6f 70 79 20 73 79 6d 6c 69 6e 6b 27 73 20 74 72 75 65 6e	....("l"..."Copy.symlink's.truen
b8a0	61 6d 65 22 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 76 69 73 68 2d 63 6f 70 79 2d 66 69 6c	ame"............dirvish-copy-fil
b8c0	65 2d 74 72 75 65 2d 70 61 74 68 0a 20 20 20 20 3a 69 66 20 28 6c 61 6d 62 64 61 20 28 29 20 28	e-true-path.....:if.(lambda.().(
b8e0	66 69 6c 65 2d 73 79 6d 6c 69 6e 6b 2d 70 20 28 64 69 72 65 64 2d 67 65 74 2d 66 69 6c 65 6e 61	file-symlink-p.(dired-get-filena
b900	6d 65 20 6e 69 6c 20 74 29 29 29 29 0a 20 20 20 28 22 4c 22 20 20 20 22 47 6f 20 74 6f 20 73 79	me.nil.t))))....("L"..."Go.to.sy
b920	6d 6c 69 6e 6b 27 73 20 74 72 75 65 6e 61 6d 65 22 20 20 20 20 20 20 20 20 20 20 20 64 69 72 76	mlink's.truename"...........dirv
b940	69 73 68 2d 66 69 6e 64 2d 66 69 6c 65 2d 74 72 75 65 2d 70 61 74 68 0a 20 20 20 20 3a 69 66 20	ish-find-file-true-path.....:if.
b960	28 6c 61 6d 62 64 61 20 28 29 20 28 66 69 6c 65 2d 73 79 6d 6c 69 6e 6b 2d 70 20 28 64 69 72 65	(lambda.().(file-symlink-p.(dire
b980	64 2d 67 65 74 2d 66 69 6c 65 6e 61 6d 65 20 6e 69 6c 20 74 29 29 29 29 0a 20 20 20 28 22 73 22	d-get-filename.nil.t))))....("s"
b9a0	20 20 20 22 47 65 74 20 74 6f 74 61 6c 20 73 69 7a 65 20 6f 66 20 6d 61 72 6b 65 64 20 66 69 6c	..."Get.total.size.of.marked.fil
b9c0	65 73 22 20 20 20 20 20 64 69 72 76 69 73 68 2d 74 6f 74 61 6c 2d 66 69 6c 65 2d 73 69 7a 65 29	es".....dirvish-total-file-size)
b9e0	0a 20 20 20 28 22 74 22 20 20 20 22 53 68 6f 77 20 66 69 6c 65 20 54 59 50 45 22 20 20 20 20 20	....("t"..."Show.file.TYPE".....
ba00	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 65 64 2d 73 68 6f 77 2d 66 69 6c 65 2d	................dired-show-file-
ba20	74 79 70 65 29 5d 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 70 72 65 66 69	type)])..(transient-define-prefi
ba40	78 20 64 69 72 76 69 73 68 2d 73 75 62 64 69 72 2d 6d 65 6e 75 20 28 29 0a 20 20 22 48 65 6c 70	x.dirvish-subdir-menu.()..."Help
ba60	20 4d 65 6e 75 20 66 6f 72 20 44 69 72 65 64 20 73 75 62 64 69 72 20 6d 61 6e 61 67 65 6d 65 6e	.Menu.for.Dired.subdir.managemen
ba80	74 2e 22 0a 20 20 5b 3a 64 65 73 63 72 69 70 74 69 6f 6e 0a 20 20 20 28 6c 61 6d 62 64 61 20 28	t."...[:description....(lambda.(
baa0	29 20 28 64 69 72 76 69 73 68 2d 2d 66 6f 72 6d 61 74 2d 6d 65 6e 75 2d 68 65 61 64 69 6e 67 20	).(dirvish--format-menu-heading.
bac0	22 4d 61 6e 61 67 65 20 73 75 62 64 69 72 73 22 29 29 0a 20 20 20 28 22 69 22 20 22 20 20 49 6e	"Manage.subdirs"))....("i"."..In
bae0	73 65 72 74 20 73 75 62 64 69 72 22 20 20 20 20 64 69 72 65 64 2d 6d 61 79 62 65 2d 69 6e 73 65	sert.subdir"....dired-maybe-inse
bb00	72 74 2d 73 75 62 64 69 72 20 3a 74 72 61 6e 73 69 65 6e 74 20 74 29 0a 20 20 20 28 22 6b 22 20	rt-subdir.:transient.t)....("k".
bb20	22 20 20 4b 69 6c 6c 20 73 75 62 64 69 72 22 20 20 20 20 20 20 64 69 72 65 64 2d 6b 69 6c 6c 2d	"..Kill.subdir"......dired-kill-
bb40	73 75 62 64 69 72 20 3a 74 72 61 6e 73 69 65 6e 74 20 74 29 0a 20 20 20 28 22 6e 22 20 22 20 20	subdir.:transient.t)....("n"."..
bb60	4e 65 78 74 20 73 75 62 64 69 72 22 20 20 20 20 20 20 64 69 72 65 64 2d 6e 65 78 74 2d 73 75 62	Next.subdir"......dired-next-sub
bb80	64 69 72 20 3a 74 72 61 6e 73 69 65 6e 74 20 74 29 0a 20 20 20 28 22 70 22 20 22 20 20 50 72 65	dir.:transient.t)....("p"."..Pre
bba0	76 20 73 75 62 64 69 72 22 20 20 20 20 20 20 64 69 72 65 64 2d 70 72 65 76 2d 73 75 62 64 69 72	v.subdir"......dired-prev-subdir
bbc0	20 3a 74 72 61 6e 73 69 65 6e 74 20 74 29 0a 20 20 20 28 22 6a 22 20 22 20 20 4a 75 6d 70 20 74	.:transient.t)....("j"."..Jump.t
bbe0	6f 20 73 75 62 64 69 72 22 20 20 20 64 69 72 65 64 2d 67 6f 74 6f 2d 73 75 62 64 69 72 29 0a 20	o.subdir"...dired-goto-subdir)..
bc00	20 20 28 22 24 22 20 22 20 20 48 69 64 65 20 73 75 62 64 69 72 22 20 20 20 20 20 20 64 69 72 65	..("$"."..Hide.subdir"......dire
bc20	64 2d 68 69 64 65 2d 73 75 62 64 69 72 20 3a 74 72 61 6e 73 69 65 6e 74 20 74 29 0a 20 20 20 28	d-hide-subdir.:transient.t)....(
bc40	22 4d 2d 24 22 20 22 48 69 64 65 20 61 6c 6c 20 73 75 62 64 69 72 73 22 20 64 69 72 65 64 2d 68	"M-$"."Hide.all.subdirs".dired-h
bc60	69 64 65 2d 61 6c 6c 29 5d 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 20 28 61 75 74 6f	ide-all)])..;;;###autoload.(auto
bc80	6c 6f 61 64 20 27 64 69 72 76 69 73 68 2d 63 68 78 78 78 2d 6d 65 6e 75 20 22 64 69 72 76 69 73	load.'dirvish-chxxx-menu."dirvis
bca0	68 2d 65 78 74 72 61 73 22 20 6e 69 6c 20 74 29 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69	h-extras".nil.t).(transient-defi
bcc0	6e 65 2d 70 72 65 66 69 78 20 64 69 72 76 69 73 68 2d 63 68 78 78 78 2d 6d 65 6e 75 20 28 29 0a	ne-prefix.dirvish-chxxx-menu.().
bce0	20 20 22 48 65 6c 70 20 4d 65 6e 75 20 66 6f 72 20 66 69 6c 65 20 61 74 74 72 69 62 75 74 65 20	.."Help.Menu.for.file.attribute.
bd00	6d 6f 64 69 66 69 63 61 74 69 6f 6e 20 63 6f 6d 6d 61 6e 64 73 2e 22 0a 20 20 5b 3a 64 65 73 63	modification.commands."...[:desc
bd20	72 69 70 74 69 6f 6e 0a 20 20 20 28 6c 61 6d 62 64 61 20 28 29 20 28 64 69 72 76 69 73 68 2d 2d	ription....(lambda.().(dirvish--
bd40	66 6f 72 6d 61 74 2d 6d 65 6e 75 2d 68 65 61 64 69 6e 67 20 22 4d 6f 64 69 66 79 20 66 69 6c 65	format-menu-heading."Modify.file
bd60	27 73 20 61 74 74 72 69 62 75 74 65 73 22 29 29 0a 20 20 20 28 22 67 22 20 20 20 22 43 68 61 6e	's.attributes"))....("g"..."Chan
bd80	67 65 20 66 69 6c 65 27 73 20 47 52 4f 55 50 22 20 20 20 20 20 20 20 20 20 20 64 69 72 65 64 2d	ge.file's.GROUP"..........dired-
bda0	64 6f 2d 63 68 67 72 70 29 0a 20 20 20 28 22 6d 22 20 20 20 22 43 68 61 6e 67 65 20 66 69 6c 65	do-chgrp)....("m"..."Change.file
bdc0	27 73 20 4d 4f 44 45 22 20 20 20 20 20 20 20 20 20 20 20 64 69 72 65 64 2d 64 6f 2d 63 68 6d 6f	's.MODE"...........dired-do-chmo
bde0	64 29 0a 20 20 20 28 22 6f 22 20 20 20 22 43 68 61 6e 67 65 20 66 69 6c 65 27 73 20 4f 57 4e 45	d)....("o"..."Change.file's.OWNE
be00	52 22 20 20 20 20 20 20 20 20 20 20 64 69 72 65 64 2d 64 6f 2d 63 68 6f 77 6e 29 0a 20 20 20 28	R"..........dired-do-chown)....(
be20	22 74 22 20 20 20 22 43 68 61 6e 67 65 20 66 69 6c 65 27 73 20 54 49 4d 45 53 54 41 4d 50 22 20	"t"..."Change.file's.TIMESTAMP".
be40	20 20 20 20 20 64 69 72 65 64 2d 64 6f 2d 74 6f 75 63 68 29 0a 20 20 20 28 22 70 22 20 20 20 22	.....dired-do-touch)....("p"..."
be60	43 68 61 6e 67 65 20 66 69 6c 65 27 73 20 50 41 54 48 22 20 20 20 20 20 20 20 20 20 20 20 64 69	Change.file's.PATH"...........di
be80	72 65 64 2d 64 6f 2d 72 65 6e 61 6d 65 29 5d 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64	red-do-rename)])..;;;###autoload
bea0	20 28 61 75 74 6f 6c 6f 61 64 20 27 64 69 72 76 69 73 68 2d 6d 61 72 6b 2d 6d 65 6e 75 20 22 64	.(autoload.'dirvish-mark-menu."d
bec0	69 72 76 69 73 68 2d 65 78 74 72 61 73 22 20 6e 69 6c 20 74 29 0a 28 74 72 61 6e 73 69 65 6e 74	irvish-extras".nil.t).(transient
bee0	2d 64 65 66 69 6e 65 2d 70 72 65 66 69 78 20 64 69 72 76 69 73 68 2d 6d 61 72 6b 2d 6d 65 6e 75	-define-prefix.dirvish-mark-menu
bf00	20 28 29 0a 20 20 22 48 65 6c 70 20 4d 65 6e 75 20 66 6f 72 20 60 64 69 72 65 64 2d 6d 61 72 6b	.()..."Help.Menu.for.`dired-mark
bf20	2f 64 6f 2d 2a 27 20 63 6f 6d 6d 61 6e 64 73 2e 22 0a 20 20 5b 5b 22 4d 61 72 6b 20 6f 72 20 75	/do-*'.commands."...[["Mark.or.u
bf40	6e 6d 61 72 6b 20 66 69 6c 65 73 3a 22 0a 20 20 20 20 28 22 65 22 20 22 20 20 62 79 20 45 78 74	nmark.files:".....("e"."..by.Ext
bf60	65 6e 73 69 6f 6e 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 65 64 2d 6d 61 72	ension"................dired-mar
bf80	6b 2d 65 78 74 65 6e 73 69 6f 6e 20 3a 74 72 61 6e 73 69 65 6e 74 20 74 29 0a 20 20 20 20 28 22	k-extension.:transient.t).....("
bfa0	2a 22 20 22 20 20 62 79 20 52 65 67 65 78 70 20 28 66 69 6c 65 20 6e 61 6d 65 29 22 20 20 20 20	*"."..by.Regexp.(file.name)"....
bfc0	20 20 20 64 69 72 65 64 2d 6d 61 72 6b 2d 66 69 6c 65 73 2d 72 65 67 65 78 70 20 3a 74 72 61 6e	...dired-mark-files-regexp.:tran
bfe0	73 69 65 6e 74 20 74 29 0a 20 20 20 20 28 22 63 22 20 22 20 20 62 79 20 52 65 67 65 78 70 20 28	sient.t).....("c"."..by.Regexp.(
c000	66 69 6c 65 20 63 6f 6e 74 65 6e 74 29 22 20 20 20 20 64 69 72 65 64 2d 6d 61 72 6b 2d 66 69 6c	file.content)"....dired-mark-fil
c020	65 73 2d 63 6f 6e 74 61 69 6e 69 6e 67 2d 72 65 67 65 78 70 20 3a 74 72 61 6e 73 69 65 6e 74 20	es-containing-regexp.:transient.
c040	74 29 0a 20 20 20 20 28 22 73 22 20 22 20 20 62 79 20 53 75 62 64 69 72 22 20 20 20 20 20 20 20	t).....("s"."..by.Subdir".......
c060	20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 65 64 2d 6d 61 72 6b 2d 73 75 62 64 69 72 2d 66 69	............dired-mark-subdir-fi
c080	6c 65 73 20 3a 74 72 61 6e 73 69 65 6e 74 20 74 29 0a 20 20 20 20 28 22 78 22 20 22 20 20 62 79	les.:transient.t).....("x"."..by
c0a0	20 45 78 65 63 75 74 61 62 6c 65 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 65 64	.Executable"...............dired
c0c0	2d 6d 61 72 6b 2d 65 78 65 63 75 74 61 62 6c 65 73 20 3a 74 72 61 6e 73 69 65 6e 74 20 74 29 0a	-mark-executables.:transient.t).
c0e0	20 20 20 20 28 22 2f 22 20 22 20 20 62 79 20 44 69 72 65 63 74 6f 72 79 22 20 20 20 20 20 20 20	....("/"."..by.Directory".......
c100	20 20 20 20 20 20 20 20 20 64 69 72 65 64 2d 6d 61 72 6b 2d 64 69 72 65 63 74 6f 72 69 65 73 20	.........dired-mark-directories.
c120	3a 74 72 61 6e 73 69 65 6e 74 20 74 29 0a 20 20 20 20 28 22 40 22 20 22 20 20 62 79 20 53 79 6d	:transient.t).....("@"."..by.Sym
c140	6c 69 6e 6b 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 65 64 2d 6d 61 72	link"..................dired-mar
c160	6b 2d 73 79 6d 6c 69 6e 6b 73 20 3a 74 72 61 6e 73 69 65 6e 74 20 74 29 0a 20 20 20 20 28 22 26	k-symlinks.:transient.t).....("&
c180	22 20 22 20 20 62 79 20 47 61 72 62 61 67 65 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	"."..by.Garbage"................
c1a0	20 20 64 69 72 65 64 2d 66 6c 61 67 2d 67 61 72 62 61 67 65 2d 66 69 6c 65 73 20 3a 74 72 61 6e	..dired-flag-garbage-files.:tran
c1c0	73 69 65 6e 74 20 74 29 0a 20 20 20 20 28 22 23 22 20 22 20 20 62 79 20 41 75 74 6f 2d 73 61 76	sient.t).....("#"."..by.Auto-sav
c1e0	65 64 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 65 64 2d 66 6c 61 67 2d 61 75 74	ed"...............dired-flag-aut
c200	6f 2d 73 61 76 65 2d 66 69 6c 65 73 20 3a 74 72 61 6e 73 69 65 6e 74 20 74 29 0a 20 20 20 20 28	o-save-files.:transient.t).....(
c220	22 7e 22 20 22 20 20 62 79 20 42 61 63 6b 75 70 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	"~"."..by.Backup"...............
c240	20 20 20 20 64 69 72 65 64 2d 66 6c 61 67 2d 62 61 63 6b 75 70 2d 66 69 6c 65 73 20 3a 74 72 61	....dired-flag-backup-files.:tra
c260	6e 73 69 65 6e 74 20 74 29 0a 20 20 20 20 28 22 2e 22 20 22 20 20 62 79 20 4e 75 6d 65 72 69 63	nsient.t).....("."."..by.Numeric
c280	61 6c 20 62 61 63 6b 75 70 22 20 20 20 20 20 20 20 20 20 64 69 72 65 64 2d 63 6c 65 61 6e 2d 64	al.backup".........dired-clean-d
c2a0	69 72 65 63 74 6f 72 79 20 3a 74 72 61 6e 73 69 65 6e 74 20 74 29 0a 20 20 20 20 28 22 75 22 20	irectory.:transient.t).....("u".
c2c0	22 20 20 55 6e 6d 61 72 6b 20 74 68 69 73 20 66 69 6c 65 22 20 20 20 20 20 20 20 20 20 20 20 20	"..Unmark.this.file"............
c2e0	64 69 72 65 64 2d 75 6e 6d 61 72 6b 20 3a 74 72 61 6e 73 69 65 6e 74 20 74 29 0a 20 20 20 20 28	dired-unmark.:transient.t).....(
c300	22 44 45 4c 22 20 22 55 6e 6d 61 72 6b 20 61 6e 64 20 6d 6f 76 65 20 75 70 20 6c 69 6e 65 22 20	"DEL"."Unmark.and.move.up.line".
c320	20 20 20 20 64 69 72 65 64 2d 75 6e 6d 61 72 6b 2d 62 61 63 6b 77 61 72 64 20 3a 74 72 61 6e 73	....dired-unmark-backward.:trans
c340	69 65 6e 74 20 74 29 0a 20 20 20 20 28 22 55 22 20 22 20 20 55 6e 6d 61 72 6b 20 61 6c 6c 20 66	ient.t).....("U"."..Unmark.all.f
c360	69 6c 65 73 22 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 65 64 2d 75 6e 6d 61 72 6b 2d 61 6c	iles"............dired-unmark-al
c380	6c 2d 66 69 6c 65 73 20 3a 74 72 61 6e 73 69 65 6e 74 20 74 29 0a 20 20 20 20 28 22 74 22 20 22	l-files.:transient.t).....("t"."
c3a0	20 20 54 6f 67 67 6c 65 20 6d 61 72 6b 73 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64	..Toggle.marks"................d
c3c0	69 72 65 64 2d 74 6f 67 67 6c 65 2d 6d 61 72 6b 73 20 3a 74 72 61 6e 73 69 65 6e 74 20 74 29 0a	ired-toggle-marks.:transient.t).
c3e0	20 20 20 20 28 22 6e 22 20 22 20 20 4d 6f 76 65 20 74 6f 20 6e 65 78 74 20 6d 61 72 6b 65 64 20	....("n"."..Move.to.next.marked.
c400	66 69 6c 65 22 20 20 20 20 64 69 72 65 64 2d 6e 65 78 74 2d 6d 61 72 6b 65 64 2d 66 69 6c 65 20	file"....dired-next-marked-file.
c420	3a 74 72 61 6e 73 69 65 6e 74 20 74 29 0a 20 20 20 20 28 22 70 22 20 22 20 20 4d 6f 76 65 20 74	:transient.t).....("p"."..Move.t
c440	6f 20 70 72 65 76 20 6d 61 72 6b 65 64 20 66 69 6c 65 22 20 20 20 20 64 69 72 65 64 2d 70 72 65	o.prev.marked.file"....dired-pre
c460	76 2d 6d 61 72 6b 65 64 2d 66 69 6c 65 20 3a 74 72 61 6e 73 69 65 6e 74 20 74 29 5d 0a 20 20 20	v-marked-file.:transient.t)]....
c480	5b 22 41 63 74 69 6f 6e 73 20 6f 6e 20 6d 61 72 6b 65 64 20 66 69 6c 65 73 3a 22 0a 20 20 20 20	["Actions.on.marked.files:".....
c4a0	28 22 4f 22 20 20 20 22 4f 70 65 6e 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	("O"..."Open"...................
c4c0	20 20 20 20 20 64 69 72 65 64 2d 64 6f 2d 66 69 6e 64 2d 6d 61 72 6b 65 64 2d 66 69 6c 65 73 29	.....dired-do-find-marked-files)
c4e0	0a 20 20 20 20 28 22 53 22 20 20 20 22 53 79 6d 6c 69 6e 6b 22 20 20 20 20 20 20 20 20 20 20 20	.....("S"..."Symlink"...........
c500	20 20 20 20 20 20 20 20 20 20 64 69 72 65 64 2d 64 6f 2d 73 79 6d 6c 69 6e 6b 29 0a 20 20 20 20	..........dired-do-symlink).....
c520	28 22 48 22 20 20 20 22 48 61 72 64 6c 69 6e 6b 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	("H"..."Hardlink"...............
c540	20 20 20 20 20 64 69 72 65 64 2d 64 6f 2d 68 61 72 64 6c 69 6e 6b 29 0a 20 20 20 20 28 22 50 22	.....dired-do-hardlink).....("P"
c560	20 20 20 22 50 72 69 6e 74 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	..."Print"......................
c580	20 64 69 72 65 64 2d 64 6f 2d 70 72 69 6e 74 29 0a 20 20 20 20 28 22 58 22 20 20 20 22 44 65 6c	.dired-do-print).....("X"..."Del
c5a0	65 74 65 20 66 6c 61 67 67 65 64 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 65 64 2d	ete.flagged"..............dired-
c5c0	64 6f 2d 66 6c 61 67 67 65 64 2d 64 65 6c 65 74 65 29 0a 20 20 20 20 28 22 72 22 20 20 20 22 53	do-flagged-delete).....("r"..."S
c5e0	65 61 72 63 68 20 66 69 6c 65 20 63 6f 6e 74 65 6e 74 73 22 20 20 20 20 20 20 20 20 64 69 72 65	earch.file.contents"........dire
c600	64 2d 64 6f 2d 66 69 6e 64 2d 72 65 67 65 78 70 29 0a 20 20 20 20 28 22 52 22 20 20 20 22 52 65	d-do-find-regexp).....("R"..."Re
c620	70 6c 61 63 65 20 66 69 6c 65 20 63 6f 6e 74 65 6e 74 73 22 20 20 20 20 20 20 20 64 69 72 65 64	place.file.contents".......dired
c640	2d 64 6f 2d 66 69 6e 64 2d 72 65 67 65 78 70 2d 61 6e 64 2d 72 65 70 6c 61 63 65 29 0a 20 20 20	-do-find-regexp-and-replace)....
c660	20 28 22 42 22 20 20 20 22 42 79 74 65 20 63 6f 6d 70 69 6c 65 20 65 6c 69 73 70 22 20 20 20 20	.("B"..."Byte.compile.elisp"....
c680	20 20 20 20 20 20 64 69 72 65 64 2d 64 6f 2d 62 79 74 65 2d 63 6f 6d 70 69 6c 65 29 0a 20 20 20	......dired-do-byte-compile)....
c6a0	20 28 22 4c 22 20 20 20 22 4c 6f 61 64 20 65 6c 69 73 70 22 20 20 20 20 20 20 20 20 20 20 20 20	.("L"..."Load.elisp"............
c6c0	20 20 20 20 20 20 64 69 72 65 64 2d 64 6f 2d 6c 6f 61 64 29 0a 20 20 20 20 28 22 7a 22 20 20 20	......dired-do-load).....("z"...
c6e0	22 43 6f 6d 70 72 65 73 73 20 74 6f 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69	"Compress.to".................di
c700	72 65 64 2d 64 6f 2d 63 6f 6d 70 72 65 73 73 2d 74 6f 29 0a 20 20 20 20 28 22 5a 22 20 20 20 22	red-do-compress-to).....("Z"..."
c720	43 6f 6d 70 72 65 73 73 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72	Compress"....................dir
c740	65 64 2d 64 6f 2d 63 6f 6d 70 72 65 73 73 29 0a 20 20 20 20 28 22 21 22 20 20 20 22 53 68 65 6c	ed-do-compress).....("!"..."Shel
c760	6c 20 63 6f 6d 6d 61 6e 64 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 65 64 2d 64	l.command"...............dired-d
c780	6f 2d 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e 64 29 0a 20 20 20 20 28 22 26 22 20 20 20 22 41 73 79	o-shell-command).....("&"..."Asy
c7a0	6e 63 20 73 68 65 6c 6c 20 63 6f 6d 6d 61 6e 64 22 20 20 20 20 20 20 20 20 20 64 69 72 65 64 2d	nc.shell.command".........dired-
c7c0	64 6f 2d 61 73 79 6e 63 2d 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e 64 29 0a 20 20 20 20 28 22 4e 22	do-async-shell-command).....("N"
c7e0	20 20 20 22 45 63 68 6f 20 6e 75 6d 62 65 72 20 6f 66 20 6d 61 72 6b 65 64 20 66 69 6c 65 73 22	..."Echo.number.of.marked.files"
c800	20 64 69 72 65 64 2d 6e 75 6d 62 65 72 2d 6f 66 2d 6d 61 72 6b 65 64 2d 66 69 6c 65 73 29 0a 20	.dired-number-of-marked-files)..
c820	20 20 20 28 22 41 22 20 20 20 22 4d 6f 64 69 66 79 20 66 69 6c 65 27 73 20 61 74 74 72 69 62 75	...("A"..."Modify.file's.attribu
c840	74 65 73 22 20 20 20 20 64 69 72 76 69 73 68 2d 63 68 78 78 78 2d 6d 65 6e 75 29 0a 20 20 20 20	tes"....dirvish-chxxx-menu).....
c860	28 22 43 22 20 20 20 22 43 68 61 6e 67 65 20 6d 61 72 6b 20 74 79 70 65 22 20 20 20 20 20 20 20	("C"..."Change.mark.type".......
c880	20 20 20 20 20 64 69 72 65 64 2d 63 68 61 6e 67 65 2d 6d 61 72 6b 73 29 0a 20 20 20 20 28 22 6b	.....dired-change-marks).....("k
c8a0	22 20 20 20 22 4b 69 6c 6c 20 6c 69 6e 65 73 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	"..."Kill.lines"................
c8c0	20 20 64 69 72 65 64 2d 64 6f 2d 6b 69 6c 6c 2d 6c 69 6e 65 73 29 5d 5d 0a 20 20 28 69 6e 74 65	..dired-do-kill-lines)]]...(inte
c8e0	72 61 63 74 69 76 65 29 0a 20 20 28 72 65 71 75 69 72 65 20 27 64 69 72 65 64 2d 78 29 0a 20 20	ractive)...(require.'dired-x)...
c900	28 72 65 71 75 69 72 65 20 27 64 69 72 65 64 2d 61 75 78 29 0a 20 20 28 74 72 61 6e 73 69 65 6e	(require.'dired-aux)...(transien
c920	74 2d 73 65 74 75 70 20 27 64 69 72 76 69 73 68 2d 6d 61 72 6b 2d 6d 65 6e 75 29 29 0a 0a 28 74	t-setup.'dirvish-mark-menu))..(t
c940	72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 70 72 65 66 69 78 20 64 69 72 76 69 73 68 2d 72	ransient-define-prefix.dirvish-r
c960	65 6e 61 6d 69 6e 67 2d 6d 65 6e 75 20 28 29 0a 20 20 22 48 65 6c 70 20 4d 65 6e 75 20 66 6f 72	enaming-menu.()..."Help.Menu.for
c980	20 66 69 6c 65 20 72 65 6e 61 6d 69 6e 67 20 69 6e 20 44 69 72 65 64 2e 22 0a 20 20 5b 3a 64 65	.file.renaming.in.Dired."...[:de
c9a0	73 63 72 69 70 74 69 6f 6e 0a 20 20 20 28 6c 61 6d 62 64 61 20 28 29 20 28 64 69 72 76 69 73 68	scription....(lambda.().(dirvish
c9c0	2d 2d 66 6f 72 6d 61 74 2d 6d 65 6e 75 2d 68 65 61 64 69 6e 67 20 22 46 69 6c 65 20 72 65 6e 61	--format-menu-heading."File.rena
c9e0	6d 69 6e 67 22 29 29 0a 20 20 20 28 22 75 22 20 20 20 22 55 70 70 65 72 2d 63 61 73 65 20 66 69	ming"))....("u"..."Upper-case.fi
ca00	6c 65 20 6e 61 6d 65 22 20 20 20 20 20 20 20 20 20 20 64 69 72 65 64 2d 75 70 63 61 73 65 29 0a	le.name"..........dired-upcase).
ca20	20 20 20 28 22 6c 22 20 20 20 22 4c 6f 77 65 72 2d 63 61 73 65 20 66 69 6c 65 20 6e 61 6d 65 22	...("l"..."Lower-case.file.name"
ca40	20 20 20 20 20 20 20 20 20 20 64 69 72 65 64 2d 64 6f 77 6e 63 61 73 65 29 0a 20 20 20 28 22 5f	..........dired-downcase)....("_
ca60	22 20 20 20 22 52 65 70 6c 61 63 65 20 53 50 43 20 77 69 74 68 20 55 4e 44 45 52 53 43 4f 52 45	"..."Replace.SPC.with.UNDERSCORE
ca80	22 20 20 20 64 69 72 76 69 73 68 2d 72 65 6e 61 6d 65 2d 73 70 61 63 65 2d 74 6f 2d 75 6e 64 65	"...dirvish-rename-space-to-unde
caa0	72 73 63 6f 72 65 20 3a 69 66 2d 64 65 72 69 76 65 64 20 27 64 69 72 76 69 73 68 2d 6d 6f 64 65	rscore.:if-derived.'dirvish-mode
cac0	29 0a 20 20 20 28 22 77 22 20 20 20 22 45 6e 74 65 72 20 77 64 69 72 65 64 20 5b 77 72 69 74 61	)....("w"..."Enter.wdired.[writa
cae0	62 6c 65 20 64 69 72 65 64 5d 22 20 77 64 69 72 65 64 2d 63 68 61 6e 67 65 2d 74 6f 2d 77 64 69	ble.dired]".wdired-change-to-wdi
cb00	72 65 64 2d 6d 6f 64 65 20 3a 69 66 2d 6e 6f 74 2d 64 65 72 69 76 65 64 20 77 64 69 72 65 64 2d	red-mode.:if-not-derived.wdired-
cb20	6d 6f 64 65 29 5d 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 70 72 65 66 69	mode)])..(transient-define-prefi
cb40	78 20 64 69 72 76 69 73 68 2d 65 70 61 2d 64 69 72 65 64 2d 6d 65 6e 75 20 28 29 0a 20 20 22 48	x.dirvish-epa-dired-menu.()..."H
cb60	65 6c 70 20 6d 65 6e 75 20 66 6f 72 20 60 65 70 61 2d 64 69 72 65 64 2d 64 6f 2d 2a 27 20 63 6f	elp.menu.for.`epa-dired-do-*'.co
cb80	6d 6d 61 6e 64 73 2e 22 0a 20 20 5b 3a 64 65 73 63 72 69 70 74 69 6f 6e 0a 20 20 20 28 6c 61 6d	mmands."...[:description....(lam
cba0	62 64 61 20 28 29 20 28 64 69 72 76 69 73 68 2d 2d 66 6f 72 6d 61 74 2d 6d 65 6e 75 2d 68 65 61	bda.().(dirvish--format-menu-hea
cbc0	64 69 6e 67 20 22 47 4e 55 70 67 20 61 73 73 69 73 74 61 6e 74 22 29 29 0a 20 20 20 28 22 65 22	ding."GNUpg.assistant"))....("e"
cbe0	20 22 45 6e 63 72 79 70 74 22 20 65 70 61 2d 64 69 72 65 64 2d 64 6f 2d 65 6e 63 72 79 70 74 29	."Encrypt".epa-dired-do-encrypt)
cc00	0a 20 20 20 28 22 64 22 20 22 44 65 63 72 79 70 74 22 20 65 70 61 2d 64 69 72 65 64 2d 64 6f 2d	....("d"."Decrypt".epa-dired-do-
cc20	64 65 63 72 79 70 74 29 0a 20 20 20 28 22 76 22 20 22 56 65 72 69 66 79 22 20 20 65 70 61 2d 64	decrypt)....("v"."Verify"..epa-d
cc40	69 72 65 64 2d 64 6f 2d 76 65 72 69 66 79 29 0a 20 20 20 28 22 73 22 20 22 53 69 67 6e 22 20 20	ired-do-verify)....("s"."Sign"..
cc60	20 20 65 70 61 2d 64 69 72 65 64 2d 64 6f 2d 73 69 67 6e 29 5d 29 0a 0a 3b 3b 3b 23 23 23 61 75	..epa-dired-do-sign)])..;;;###au
cc80	74 6f 6c 6f 61 64 20 28 61 75 74 6f 6c 6f 61 64 20 27 64 69 72 76 69 73 68 2d 64 69 72 65 64 2d	toload.(autoload.'dirvish-dired-
cca0	63 68 65 61 74 73 68 65 65 74 20 22 64 69 72 76 69 73 68 2d 65 78 74 72 61 73 22 20 6e 69 6c 20	cheatsheet."dirvish-extras".nil.
ccc0	74 29 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 70 72 65 66 69 78 20 64 69 72 76	t).(transient-define-prefix.dirv
cce0	69 73 68 2d 64 69 72 65 64 2d 63 68 65 61 74 73 68 65 65 74 20 28 29 0a 20 20 22 41 20 63 6f 6c	ish-dired-cheatsheet.()..."A.col
cd00	6c 65 63 74 69 6f 6e 20 6f 66 20 6d 6f 73 74 20 66 72 65 71 75 65 6e 74 6c 79 20 75 73 65 64 20	lection.of.most.frequently.used.
cd20	44 69 72 65 64 20 63 6f 6d 6d 61 6e 64 73 2e 22 0a 20 20 5b 3a 64 65 73 63 72 69 70 74 69 6f 6e	Dired.commands."...[:description
cd40	0a 20 20 20 28 6c 61 6d 62 64 61 20 28 29 20 28 64 69 72 76 69 73 68 2d 2d 66 6f 72 6d 61 74 2d	....(lambda.().(dirvish--format-
cd60	6d 65 6e 75 2d 68 65 61 64 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 22 44 69 72 65 64 20 63 68	menu-heading..........."Dired.ch
cd80	65 61 74 73 68 65 65 74 22 0a 20 20 20 20 20 20 20 20 20 20 22 54 68 65 20 6b 65 79 73 20 6c 69	eatsheet"..........."The.keys.li
cda0	73 74 65 64 20 68 65 72 65 20 6d 61 79 20 62 65 20 64 69 66 66 65 72 65 6e 74 20 66 72 6f 6d 20	sted.here.may.be.different.from.
cdc0	74 68 65 20 61 63 74 75 61 6c 20 62 69 6e 64 69 6e 67 73 22 29 29 0a 20 20 20 28 22 6e 22 20 22	the.actual.bindings"))....("n"."
cde0	20 20 4d 6f 76 65 20 74 6f 20 6e 65 78 74 20 6c 69 6e 65 22 20 20 20 20 20 20 64 69 72 65 64 2d	..Move.to.next.line"......dired-
ce00	6e 65 78 74 2d 6c 69 6e 65 20 3a 74 72 61 6e 73 69 65 6e 74 20 74 29 0a 20 20 20 28 22 70 22 20	next-line.:transient.t)....("p".
ce20	22 20 20 4d 6f 76 65 20 74 6f 20 70 72 65 76 20 6c 69 6e 65 22 20 20 20 20 20 20 64 69 72 65 64	"..Move.to.prev.line"......dired
ce40	2d 70 72 65 76 69 6f 75 73 2d 6c 69 6e 65 20 3a 74 72 61 6e 73 69 65 6e 74 20 74 29 0a 20 20 20	-previous-line.:transient.t)....
ce60	28 22 3e 22 20 22 20 20 4d 6f 76 65 20 74 6f 20 6e 65 78 74 20 64 69 72 6c 69 6e 65 22 20 20 20	(">"."..Move.to.next.dirline"...
ce80	64 69 72 65 64 2d 6e 65 78 74 2d 64 69 72 6c 69 6e 65 20 3a 74 72 61 6e 73 69 65 6e 74 20 74 29	dired-next-dirline.:transient.t)
cea0	0a 20 20 20 28 22 3c 22 20 22 20 20 4d 6f 76 65 20 74 6f 20 70 72 65 76 20 64 69 72 6c 69 6e 65	....("<"."..Move.to.prev.dirline
cec0	22 20 20 20 64 69 72 65 64 2d 70 72 65 76 2d 64 69 72 6c 69 6e 65 20 3a 74 72 61 6e 73 69 65 6e	"...dired-prev-dirline.:transien
cee0	74 20 74 29 0a 20 20 20 28 22 2e 22 20 22 20 20 41 64 64 20 61 6e 20 65 6d 70 74 79 20 66 69 6c	t.t)....("."."..Add.an.empty.fil
cf00	65 22 20 20 20 20 20 20 64 69 72 65 64 2d 63 72 65 61 74 65 2d 65 6d 70 74 79 2d 66 69 6c 65 29	e"......dired-create-empty-file)
cf20	0a 20 20 20 28 22 2b 22 20 22 20 20 41 64 64 20 61 20 64 69 72 65 63 74 6f 72 79 22 20 20 20 20	....("+"."..Add.a.directory"....
cf40	20 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 29 0a 20 20 20 28	....dired-create-directory)....(
cf60	22 58 22 20 22 20 20 44 65 6c 65 74 65 20 66 69 6c 65 73 22 20 20 20 20 20 20 20 20 20 20 20 64	"X"."..Delete.files"...........d
cf80	69 72 65 64 2d 64 6f 2d 64 65 6c 65 74 65 29 0a 20 20 20 28 22 76 22 20 22 20 20 56 69 65 77 20	ired-do-delete)....("v"."..View.
cfa0	74 68 69 73 20 66 69 6c 65 22 20 20 20 20 20 20 20 20 20 64 69 72 65 64 2d 76 69 65 77 2d 66 69	this.file".........dired-view-fi
cfc0	6c 65 29 0a 20 20 20 28 22 67 22 20 22 20 20 52 65 66 72 65 73 68 20 62 75 66 66 65 72 22 20 20	le)....("g"."..Refresh.buffer"..
cfe0	20 20 20 20 20 20 20 72 65 76 65 72 74 2d 62 75 66 66 65 72 29 0a 20 20 20 28 22 66 22 20 22 20	.......revert-buffer)....("f".".
d000	20 46 69 6e 64 20 66 69 6c 65 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 65 64 2d 66	.Find.file"..............dired-f
d020	69 6e 64 2d 66 69 6c 65 29 0a 20 20 20 28 22 6f 22 20 22 20 20 46 69 6e 64 20 66 69 6c 65 20 6f	ind-file)....("o"."..Find.file.o
d040	74 68 65 72 20 77 69 6e 64 6f 77 22 20 64 69 72 65 64 2d 66 69 6e 64 2d 66 69 6c 65 2d 6f 74 68	ther.window".dired-find-file-oth
d060	65 72 2d 77 69 6e 64 6f 77 29 0a 20 20 20 28 22 6a 22 20 22 20 20 47 6f 20 74 6f 20 6c 69 6e 65	er-window)....("j"."..Go.to.line
d080	20 66 6f 72 20 66 69 6c 65 22 20 20 20 20 64 69 72 65 64 2d 67 6f 74 6f 2d 66 69 6c 65 29 0a 20	.for.file"....dired-goto-file)..
d0a0	20 20 28 22 5e 22 20 22 20 20 47 6f 20 74 6f 20 70 61 72 65 6e 74 20 64 69 72 65 63 74 6f 72 79	..("^"."..Go.to.parent.directory
d0c0	22 20 64 69 72 65 64 2d 75 70 2d 64 69 72 65 63 74 6f 72 79 29 0a 20 20 20 28 22 3d 22 20 22 20	".dired-up-directory)....("=".".
d0e0	20 43 6f 6d 70 61 72 65 20 66 69 6c 65 73 22 20 20 20 20 20 20 20 20 20 20 64 69 72 65 64 2d 64	.Compare.files"..........dired-d
d100	69 66 66 29 0a 20 20 20 28 22 28 22 20 22 20 20 54 6f 67 67 6c 65 20 64 65 74 61 69 6c 73 22 20	iff)....("("."..Toggle.details".
d120	20 20 20 20 20 20 20 20 64 69 72 65 64 2d 68 69 64 65 2d 64 65 74 61 69 6c 73 2d 6d 6f 64 65 29	........dired-hide-details-mode)
d140	0a 20 20 20 28 22 64 22 20 22 20 20 44 69 73 70 6c 61 79 20 74 68 69 73 20 66 69 6c 65 22 20 20	....("d"."..Display.this.file"..
d160	20 20 20 20 64 69 72 65 64 2d 64 69 73 70 6c 61 79 2d 66 69 6c 65 29 0a 20 20 20 28 22 73 22 20	....dired-display-file)....("s".
d180	22 20 20 4d 61 6e 61 67 65 20 73 75 62 64 69 72 73 22 20 20 20 20 20 20 20 20 20 64 69 72 76 69	"..Manage.subdirs".........dirvi
d1a0	73 68 2d 73 75 62 64 69 72 2d 6d 65 6e 75 29 0a 20 20 20 28 22 3a 22 20 22 20 20 47 6e 75 50 47	sh-subdir-menu)....(":"."..GnuPG
d1c0	20 68 65 6c 70 65 72 73 22 20 20 20 20 20 20 20 20 20 20 64 69 72 76 69 73 68 2d 65 70 61 2d 64	.helpers"..........dirvish-epa-d
d1e0	69 72 65 64 2d 6d 65 6e 75 29 0a 20 20 20 28 22 68 22 20 22 20 20 4d 6f 72 65 20 69 6e 66 6f 20	ired-menu)....("h"."..More.info.
d200	61 62 6f 75 74 20 44 69 72 65 64 22 20 20 64 65 73 63 72 69 62 65 2d 6d 6f 64 65 29 5d 29 0a 0a	about.Dired"..describe-mode)])..
d220	28 70 72 6f 76 69 64 65 20 27 64 69 72 76 69 73 68 2d 65 78 74 72 61 73 29 0a 3b 3b 3b 20 64 69	(provide.'dirvish-extras).;;;.di
d240	72 76 69 73 68 2d 65 78 74 72 61 73 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00	rvish-extras.el.ends.here.......
d260	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
d280	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
d2a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
d2c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
d2e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
d300	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
d320	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
d340	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
d360	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
d380	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
d3a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
d3c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
d3e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
d400	64 69 72 76 69 73 68 2d 32 30 32 33 30 35 31 39 2e 31 35 30 30 2f 64 69 72 76 69 73 68 2d 66 64	dirvish-20230519.1500/dirvish-fd
d420	2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	.el.............................
d440	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
d460	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
d480	30 30 35 31 32 33 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 30 34 30 00 20 30 00 00 00	0051232.00000000000.015040..0...
d4a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
d4c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
d4e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
d500	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...................
d520	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...................
d540	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
d560	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
d580	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
d5a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
d5c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
d5e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
d600	3b 3b 3b 20 64 69 72 76 69 73 68 2d 66 64 2e 65 6c 20 2d 2d 2d 20 66 69 6e 64 2d 64 69 72 65 64	;;;.dirvish-fd.el.---.find-dired
d620	20 61 6c 74 65 72 6e 61 74 69 76 65 20 75 73 69 6e 67 20 66 64 20 20 2d 2a 2d 20 6c 65 78 69 63	.alternative.using.fd..-*-.lexic
d640	61 6c 2d 62 69 6e 64 69 6e 67 3a 20 74 3b 20 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74	al-binding:.t;.-*-..;;.Copyright
d660	20 28 43 29 20 32 30 32 31 2d 32 30 32 32 20 41 6c 65 78 20 4c 75 0a 3b 3b 20 41 75 74 68 6f 72	.(C).2021-2022.Alex.Lu.;;.Author
d680	20 3a 20 41 6c 65 78 20 4c 75 20 3c 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 61	.:.Alex.Lu.<https://github.com/a
d6a0	6c 65 78 6c 75 69 67 69 74 3e 0a 3b 3b 20 56 65 72 73 69 6f 6e 3a 20 32 2e 30 2e 35 33 0a 3b 3b	lexluigit>.;;.Version:.2.0.53.;;
d6c0	20 4b 65 79 77 6f 72 64 73 3a 20 66 69 6c 65 73 2c 20 63 6f 6e 76 65 6e 69 65 6e 63 65 0a 3b 3b	.Keywords:.files,.convenience.;;
d6e0	20 48 6f 6d 65 70 61 67 65 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 61 6c	.Homepage:.https://github.com/al
d700	65 78 6c 75 69 67 69 74 2f 64 69 72 76 69 73 68 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65	exluigit/dirvish.;;.SPDX-License
d720	2d 49 64 65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 65 72 0a 0a 3b	-Identifier:.GPL-3.0-or-later..;
d740	3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 20 60 66 64 27 20 69 6e 74 65 67 72 61 74	;;.Commentary:..;;.`fd'.integrat
d760	69 6f 6e 20 66 6f 72 20 44 69 72 76 69 73 68 2e 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65	ion.for.Dirvish...;;;.Code:..(re
d780	71 75 69 72 65 20 27 64 69 72 76 69 73 68 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76	quire.'dirvish)..(defcustom.dirv
d7a0	69 73 68 2d 66 64 2d 73 77 69 74 63 68 65 73 20 22 22 0a 20 20 22 46 64 20 61 72 67 75 6d 65 6e	ish-fd-switches.""..."Fd.argumen
d7c0	74 73 20 69 6e 73 65 72 74 65 64 20 62 65 66 6f 72 65 20 75 73 65 72 20 69 6e 70 75 74 2e 22 0a	ts.inserted.before.user.input.".
d7e0	20 20 3a 74 79 70 65 20 27 73 74 72 69 6e 67 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 29	..:type.'string.:group.'dirvish)
d800	0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 66 64 2d 2d 66 69 6e 64 2d 66 64 2d 70 72 6f	..(defun.dirvish-fd--find-fd-pro
d820	67 72 61 6d 20 28 26 6f 70 74 69 6f 6e 61 6c 20 72 65 6d 6f 74 65 29 0a 20 20 22 46 69 6e 64 20	gram.(&optional.remote)..."Find.
d840	66 64 20 70 72 6f 67 72 61 6d 6d 20 6f 6e 20 61 20 6c 6f 63 61 6c 20 6f 72 20 60 52 45 4d 4f 54	fd.programm.on.a.local.or.`REMOT
d860	45 27 20 68 6f 73 74 20 2e 22 0a 20 20 28 6c 65 74 20 28 28 66 64 20 28 65 78 65 63 75 74 61 62	E'.host.."...(let.((fd.(executab
d880	6c 65 2d 66 69 6e 64 20 22 66 64 22 20 72 65 6d 6f 74 65 29 29 0a 20 20 20 20 20 20 20 20 28 66	le-find."fd".remote)).........(f
d8a0	64 66 69 6e 64 20 28 65 78 65 63 75 74 61 62 6c 65 2d 66 69 6e 64 20 22 66 64 66 69 6e 64 22 20	dfind.(executable-find."fdfind".
d8c0	72 65 6d 6f 74 65 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 20 28 66 64 20 66 64 29 0a 20 20 20 20	remote))).....(cond.(fd.fd).....
d8e0	20 20 20 20 20 20 28 66 64 66 69 6e 64 20 66 64 66 69 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20	......(fdfind.fdfind)...........
d900	28 74 20 6e 69 6c 29 29 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 66	(t.nil))))..(defcustom.dirvish-f
d920	64 2d 70 72 6f 67 72 61 6d 0a 20 20 28 64 69 72 76 69 73 68 2d 66 64 2d 2d 66 69 6e 64 2d 66 64	d-program...(dirvish-fd--find-fd
d940	2d 70 72 6f 67 72 61 6d 29 0a 20 20 22 54 68 65 20 64 65 66 61 75 6c 74 20 66 64 20 70 72 6f 67	-program)..."The.default.fd.prog
d960	72 61 6d 2e 22 0a 20 20 3a 74 79 70 65 20 27 73 74 72 69 6e 67 20 3a 67 72 6f 75 70 20 27 64 69	ram."...:type.'string.:group.'di
d980	72 76 69 73 68 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 66 64 2d 2d 66 69 6e 64 2d	rvish)..(defun.dirvish-fd--find-
d9a0	67 6e 75 2d 6c 73 20 28 26 6f 70 74 69 6f 6e 61 6c 20 72 65 6d 6f 74 65 29 0a 20 20 22 46 69 6e	gnu-ls.(&optional.remote)..."Fin
d9c0	64 20 6c 73 20 66 72 6f 6d 20 67 6e 75 20 63 6f 72 65 75 74 69 6c 73 20 6f 6e 20 61 20 6c 6f 63	d.ls.from.gnu.coreutils.on.a.loc
d9e0	61 6c 20 6f 72 20 52 45 4d 4f 54 45 20 68 6f 73 74 20 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 6c	al.or.REMOTE.host.."...(let*.((l
da00	73 20 28 65 78 65 63 75 74 61 62 6c 65 2d 66 69 6e 64 20 22 6c 73 22 20 72 65 6d 6f 74 65 29 29	s.(executable-find."ls".remote))
da20	0a 20 20 20 20 20 20 20 20 20 28 67 6c 73 20 28 65 78 65 63 75 74 61 62 6c 65 2d 66 69 6e 64 20	..........(gls.(executable-find.
da40	22 67 6c 73 22 20 72 65 6d 6f 74 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 69 64 70 20 28 65 78	"gls".remote))..........(idp.(ex
da60	65 63 75 74 61 62 6c 65 2d 66 69 6e 64 20 69 6e 73 65 72 74 2d 64 69 72 65 63 74 6f 72 79 2d 70	ecutable-find.insert-directory-p
da80	72 6f 67 72 61 6d 20 72 65 6d 6f 74 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 6c 73 2d 69 73 2d	rogram.remote))..........(ls-is-
daa0	67 6e 75 3f 20 28 61 6e 64 20 6c 73 20 28 3d 20 30 20 28 70 72 6f 63 65 73 73 2d 66 69 6c 65 20	gnu?.(and.ls.(=.0.(process-file.
dac0	6c 73 20 6e 69 6c 20 6e 69 6c 20 6e 69 6c 20 22 2d 2d 76 65 72 73 69 6f 6e 22 29 29 29 29 0a 20	ls.nil.nil.nil."--version"))))..
dae0	20 20 20 20 20 20 20 20 28 69 64 70 2d 69 73 2d 67 6e 75 2d 6c 73 3f 0a 20 20 20 20 20 20 20 20	........(idp-is-gnu-ls?.........
db00	20 20 28 61 6e 64 20 69 64 70 20 28 3d 20 30 20 28 70 72 6f 63 65 73 73 2d 66 69 6c 65 20 69 64	..(and.idp.(=.0.(process-file.id
db20	70 20 6e 69 6c 20 6e 69 6c 20 6e 69 6c 20 22 2d 2d 76 65 72 73 69 6f 6e 22 29 29 29 29 29 0a 20	p.nil.nil.nil."--version")))))..
db40	20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 3b 3b 20 6a 75 73 74 20 75 73 65 20 47 4e 55 20 6c 73	...(cond......;;.just.use.GNU.ls
db60	20 69 66 20 66 6f 75 6e 64 0a 20 20 20 20 20 28 6c 73 2d 69 73 2d 67 6e 75 3f 20 6c 73 29 0a 20	.if.found......(ls-is-gnu?.ls)..
db80	20 20 20 20 3b 3b 20 75 73 65 20 69 6e 73 65 72 74 2d 64 69 72 65 63 74 6f 72 79 2d 70 72 6f 67	....;;.use.insert-directory-prog
dba0	72 61 6d 20 69 66 20 69 74 20 70 6f 69 6e 74 73 20 74 6f 20 47 4e 55 20 6c 73 0a 20 20 20 20 20	ram.if.it.points.to.GNU.ls......
dbc0	28 69 64 70 2d 69 73 2d 67 6e 75 2d 6c 73 3f 20 69 6e 73 65 72 74 2d 64 69 72 65 63 74 6f 72 79	(idp-is-gnu-ls?.insert-directory
dbe0	2d 70 72 6f 67 72 61 6d 29 0a 20 20 20 20 20 3b 3b 20 68 65 75 72 69 73 74 69 63 3a 20 47 4e 55	-program)......;;.heuristic:.GNU
dc00	20 6c 73 20 69 73 20 6f 66 74 65 6e 20 69 6e 73 74 61 6c 6c 65 64 20 61 73 20 67 6c 73 20 62 79	.ls.is.often.installed.as.gls.by
dc20	20 48 6f 6d 65 62 72 65 77 20 6f 6e 20 4d 61 63 0a 20 20 20 20 20 28 28 61 6e 64 20 28 65 71 20	.Homebrew.on.Mac......((and.(eq.
dc40	73 79 73 74 65 6d 2d 74 79 70 65 20 27 64 61 72 77 69 6e 29 20 67 6c 73 29 20 67 6c 73 29 0a 20	system-type.'darwin).gls).gls)..
dc60	20 20 20 20 3b 3b 20 66 61 6c 6c 62 61 63 6b 3a 20 75 73 65 20 69 6e 73 65 72 74 2d 64 69 72 65	....;;.fallback:.use.insert-dire
dc80	63 74 6f 72 79 2d 70 72 6f 67 72 61 6d 2c 20 62 75 74 20 77 61 72 6e 20 74 68 65 20 75 73 65 72	ctory-program,.but.warn.the.user
dca0	20 74 68 61 74 20 69 74 20 6d 61 79 20 6e 6f 74 20 62 65 20 63 6f 6d 70 61 74 69 62 6c 65 0a 20	.that.it.may.not.be.compatible..
dcc0	20 20 20 20 28 74 20 28 77 61 72 6e 20 22 60 64 69 72 76 69 73 68 2d 66 64 27 20 72 65 71 75 69	....(t.(warn."`dirvish-fd'.requi
dce0	72 65 73 20 60 6c 73 27 20 66 72 6f 6d 20 47 4e 55 20 63 6f 72 65 75 74 69 6c 73 2c 20 70 6c 65	res.`ls'.from.GNU.coreutils,.ple
dd00	61 73 65 20 69 6e 73 74 61 6c 6c 20 69 74 22 29 0a 20 20 20 20 20 20 20 20 69 6e 73 65 72 74 2d	ase.install.it").........insert-
dd20	64 69 72 65 63 74 6f 72 79 2d 70 72 6f 67 72 61 6d 29 29 29 29 0a 0a 28 64 65 66 63 75 73 74 6f	directory-program))))..(defcusto
dd40	6d 20 64 69 72 76 69 73 68 2d 66 64 2d 6c 73 2d 70 72 6f 67 72 61 6d 0a 20 20 28 64 69 72 76 69	m.dirvish-fd-ls-program...(dirvi
dd60	73 68 2d 66 64 2d 2d 66 69 6e 64 2d 67 6e 75 2d 6c 73 29 0a 20 20 22 4c 69 73 74 69 6e 67 20 70	sh-fd--find-gnu-ls)..."Listing.p
dd80	72 6f 67 72 61 6d 20 66 6f 72 20 60 66 64 27 2e 22 0a 20 20 3a 74 79 70 65 20 27 28 73 74 72 69	rogram.for.`fd'."...:type.'(stri
dda0	6e 67 20 3a 74 61 67 20 22 4c 69 73 74 69 6e 67 20 70 72 6f 67 72 61 6d 2c 20 73 75 63 68 20 61	ng.:tag."Listing.program,.such.a
ddc0	73 20 60 6c 73 27 22 29 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 29 0a 0a 28 64 65 66 63	s.`ls'").:group.'dirvish)..(defc
dde0	75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 66 64 2d 72 65 67 65 78 2d 62 75 69 6c 64 65 72 0a 20	ustom.dirvish-fd-regex-builder..
de00	20 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 6f 72 64 65 72 6c 65 73 73 2d 70 61 74 74 65 72 6e	.(if.(fboundp.'orderless-pattern
de20	2d 63 6f 6d 70 69 6c 65 72 29 0a 20 20 20 20 20 20 23 27 6f 72 64 65 72 6c 65 73 73 2d 70 61 74	-compiler).......#'orderless-pat
de40	74 65 72 6e 2d 63 6f 6d 70 69 6c 65 72 0a 20 20 20 20 23 27 73 70 6c 69 74 2d 73 74 72 69 6e 67	tern-compiler.....#'split-string
de60	29 0a 20 20 22 46 75 6e 63 74 69 6f 6e 20 75 73 65 64 20 74 6f 20 63 6f 6d 70 6f 73 65 20 74 68	)..."Function.used.to.compose.th
de80	65 20 72 65 67 65 78 20 6c 69 73 74 20 66 6f 72 20 6e 61 72 72 6f 77 69 6e 67 2e 0a 54 68 65 20	e.regex.list.for.narrowing..The.
dea0	66 75 6e 63 74 69 6f 6e 20 74 61 6b 65 73 20 74 68 65 20 69 6e 70 75 74 20 73 74 72 69 6e 67 20	function.takes.the.input.string.
dec0	61 73 20 69 74 73 20 73 6f 6c 65 20 61 72 67 75 6d 65 6e 74 20 61 6e 64 0a 73 68 6f 75 6c 64 20	as.its.sole.argument.and.should.
dee0	72 65 74 75 72 6e 20 61 20 6c 69 73 74 20 6f 66 20 72 65 67 75 6c 61 72 20 65 78 70 72 65 73 73	return.a.list.of.regular.express
df00	69 6f 6e 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 20 3a 74 79 70 65 20 27	ions."...:group.'dirvish.:type.'
df20	66 75 6e 63 74 69 6f 6e 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 66 64	function)..(defcustom.dirvish-fd
df40	2d 64 65 62 6f 75 6e 63 65 20 30 2e 32 0a 20 20 22 4c 69 6b 65 20 60 64 69 72 76 69 73 68 2d 72	-debounce.0.2..."Like.`dirvish-r
df60	65 64 69 73 70 6c 61 79 2d 64 65 62 6f 75 6e 63 65 27 2c 20 62 75 74 20 75 73 65 64 20 66 6f 72	edisplay-debounce',.but.used.for
df80	20 66 64 20 69 6e 70 75 74 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 20 3a 74	.fd.input."...:group.'dirvish.:t
dfa0	79 70 65 20 27 66 6c 6f 61 74 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d	ype.'float)..(defcustom.dirvish-
dfc0	66 64 2d 64 65 66 61 75 6c 74 2d 64 69 72 20 22 2f 22 0a 20 20 22 44 65 66 61 75 6c 74 20 64 69	fd-default-dir."/"..."Default.di
dfe0	72 65 63 74 6f 72 79 20 66 6f 72 20 60 64 69 72 76 69 73 68 2d 66 64 2d 6a 75 6d 70 27 2e 22 0a	rectory.for.`dirvish-fd-jump'.".
e000	20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 20 3a 74 79 70 65 20 27 64 69 72 65 63 74 6f	..:group.'dirvish.:type.'directo
e020	72 79 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 64 69 72 76 69 73 68 2d 66 64 2d 62 75 66 6e 61 6d	ry)..(defconst.dirvish-fd-bufnam
e040	65 20 22 f0 9f 94 8d 25 73 f0 9f 93 81 25 73 f0 9f 93 81 25 73 22 29 0a 28 64 65 66 63 6f 6e 73	e."....%s....%s....%s").(defcons
e060	74 20 64 69 72 76 69 73 68 2d 66 64 2d 68 65 61 64 65 72 0a 20 20 28 64 69 72 76 69 73 68 2d 2d	t.dirvish-fd-header...(dirvish--
e080	6d 6f 64 65 2d 6c 69 6e 65 2d 66 6d 74 2d 73 65 74 74 65 72 20 27 28 66 64 2d 73 77 69 74 63 68	mode-line-fmt-setter.'(fd-switch
e0a0	65 73 29 20 27 28 66 64 2d 74 69 6d 65 73 74 61 6d 70 20 66 64 2d 70 77 64 20 22 20 22 29 20 74	es).'(fd-timestamp.fd-pwd.".").t
e0c0	29 29 0a 28 64 65 66 76 61 72 20 64 69 72 76 69 73 68 2d 66 64 2d 69 6e 70 75 74 2d 68 69 73 74	)).(defvar.dirvish-fd-input-hist
e0e0	6f 72 79 20 6e 69 6c 20 22 48 69 73 74 6f 72 79 20 6c 69 73 74 20 6f 66 20 66 64 20 69 6e 70 75	ory.nil."History.list.of.fd.inpu
e100	74 20 69 6e 20 74 68 65 20 6d 69 6e 69 62 75 66 66 65 72 2e 22 29 0a 28 64 65 66 76 61 72 20 64	t.in.the.minibuffer.").(defvar.d
e120	69 72 76 69 73 68 2d 66 64 2d 64 65 62 6f 75 6e 63 65 2d 74 69 6d 65 72 20 6e 69 6c 29 0a 28 64	irvish-fd-debounce-timer.nil).(d
e140	65 66 76 61 72 2d 6c 6f 63 61 6c 20 64 69 72 76 69 73 68 2d 66 64 2d 2d 6f 75 74 70 75 74 20 22	efvar-local.dirvish-fd--output."
e160	22 29 0a 28 64 65 66 76 61 72 2d 6c 6f 63 61 6c 20 64 69 72 76 69 73 68 2d 66 64 2d 2d 69 6e 70	").(defvar-local.dirvish-fd--inp
e180	75 74 20 22 22 20 22 4c 61 73 74 20 75 73 65 64 20 66 64 20 75 73 65 72 20 69 6e 70 75 74 2e 22	ut.""."Last.used.fd.user.input."
e1a0	29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 66 64 2d 2d 65 6e 73 75 72 65 2d 66 64 20	)..(defun.dirvish-fd--ensure-fd.
e1c0	28 72 65 6d 6f 74 65 29 0a 20 20 22 52 65 74 75 72 6e 20 66 64 20 65 78 65 63 75 74 61 62 6c 65	(remote)..."Return.fd.executable
e1e0	20 6f 6e 20 52 45 4d 4f 54 45 20 6f 72 20 6c 6f 63 61 6c 68 6f 73 74 2e 0a 52 61 69 73 65 20 61	.on.REMOTE.or.localhost..Raise.a
e200	6e 20 65 72 72 6f 72 20 69 66 20 66 64 20 65 78 65 63 75 74 61 62 6c 65 20 69 73 20 6e 6f 74 20	n.error.if.fd.executable.is.not.
e220	61 76 61 69 6c 61 62 6c 65 2e 22 0a 20 20 28 6f 72 20 28 61 6e 64 20 72 65 6d 6f 74 65 20 28 64	available."...(or.(and.remote.(d
e240	69 72 76 69 73 68 2d 66 64 2d 2d 66 69 6e 64 2d 66 64 2d 70 72 6f 67 72 61 6d 20 72 65 6d 6f 74	irvish-fd--find-fd-program.remot
e260	65 29 29 20 64 69 72 76 69 73 68 2d 66 64 2d 70 72 6f 67 72 61 6d 0a 20 20 20 20 20 20 28 75 73	e)).dirvish-fd-program.......(us
e280	65 72 2d 65 72 72 6f 72 20 22 60 64 69 72 76 69 73 68 2d 66 64 27 20 72 65 71 75 69 72 65 73 20	er-error."`dirvish-fd'.requires.
e2a0	60 66 64 27 2c 20 70 6c 65 61 73 65 20 69 6e 73 74 61 6c 6c 20 69 74 22 29 29 29 0a 0a 28 64 65	`fd',.please.install.it")))..(de
e2c0	66 73 75 62 73 74 20 64 69 72 76 69 73 68 2d 66 64 2d 2d 68 65 61 64 65 72 2d 6f 66 66 73 65 74	fsubst.dirvish-fd--header-offset
e2e0	20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 23 20 6f 66 20 68 65 61 64 65 72 20 6c 69 6e 65 73 20	.()..."Return.#.of.header.lines.
e300	69 6e 20 61 20 66 64 20 62 75 66 66 65 72 2e 22 0a 20 20 28 69 66 20 28 6f 72 20 28 6e 6f 74 20	in.a.fd.buffer."...(if.(or.(not.
e320	28 62 6f 75 6e 64 70 20 27 64 69 72 65 64 2d 66 72 65 65 2d 73 70 61 63 65 29 29 0a 20 20 20 20	(boundp.'dired-free-space)).....
e340	20 20 20 20 20 20 28 65 71 20 28 62 6f 75 6e 64 2d 61 6e 64 2d 74 72 75 65 2d 70 20 64 69 72 65	......(eq.(bound-and-true-p.dire
e360	64 2d 66 72 65 65 2d 73 70 61 63 65 29 20 27 73 65 70 61 72 61 74 65 29 29 0a 20 20 20 20 20 20	d-free-space).'separate)).......
e380	32 20 31 29 29 0a 0a 28 64 65 66 73 75 62 73 74 20 64 69 72 76 69 73 68 2d 66 64 2d 2d 62 75 66	2.1))..(defsubst.dirvish-fd--buf
e3a0	6e 61 6d 65 20 28 69 6e 70 75 74 20 64 69 72 20 64 76 29 0a 20 20 22 52 65 74 75 72 6e 20 66 64	name.(input.dir.dv)..."Return.fd
e3c0	20 62 75 66 66 65 72 20 6e 61 6d 65 20 6f 66 20 44 56 20 77 69 74 68 20 75 73 65 72 20 49 4e 50	.buffer.name.of.DV.with.user.INP
e3e0	55 54 20 61 74 20 44 49 52 2e 22 0a 20 20 28 66 6f 72 6d 61 74 20 64 69 72 76 69 73 68 2d 66 64	UT.at.DIR."...(format.dirvish-fd
e400	2d 62 75 66 6e 61 6d 65 20 28 6f 72 20 69 6e 70 75 74 20 22 22 29 0a 20 20 20 20 20 20 20 20 20	-bufname.(or.input."")..........
e420	20 28 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 72 65 63 74 6f 72 79 20 28 64 69 72 65 63 74	.(file-name-nondirectory.(direct
e440	6f 72 79 2d 66 69 6c 65 2d 6e 61 6d 65 20 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 64	ory-file-name.dir))...........(d
e460	76 2d 6e 61 6d 65 20 64 76 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 66 64 2d	v-name.dv)))..(defun.dirvish-fd-
e480	2d 61 70 70 6c 79 2d 73 77 69 74 63 68 65 73 20 28 29 0a 20 20 22 41 70 70 6c 79 20 66 64 20 53	-apply-switches.()..."Apply.fd.S
e4a0	57 49 54 43 48 45 53 20 74 6f 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2e 22 0a 20 20 28 69	WITCHES.to.current.buffer."...(i
e4c0	6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 2a 20 28 28 61 72 67 73 20 28 74 72 61 6e	nteractive)...(let*.((args.(tran
e4e0	73 69 65 6e 74 2d 61 72 67 73 20 74 72 61 6e 73 69 65 6e 74 2d 63 75 72 72 65 6e 74 2d 63 6f 6d	sient-args.transient-current-com
e500	6d 61 6e 64 29 29 0a 20 20 20 20 20 20 20 20 20 28 73 77 69 74 63 68 65 73 20 28 73 74 72 69 6e	mand))..........(switches.(strin
e520	67 2d 6a 6f 69 6e 20 61 72 67 73 20 22 20 22 29 29 29 0a 20 20 20 20 28 64 69 72 76 69 73 68 2d	g-join.args."."))).....(dirvish-
e540	70 72 6f 70 20 3a 66 64 2d 73 77 69 74 63 68 65 73 20 73 77 69 74 63 68 65 73 29 0a 20 20 20 20	prop.:fd-switches.switches).....
e560	28 72 65 76 65 72 74 2d 62 75 66 66 65 72 29 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65	(revert-buffer)))..(transient-de
e580	66 69 6e 65 2d 69 6e 66 69 78 20 64 69 72 76 69 73 68 2d 66 64 2d 2d 65 78 74 65 6e 73 69 6f 6e	fine-infix.dirvish-fd--extension
e5a0	73 2d 73 77 69 74 63 68 20 28 29 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 22 46 69 6c 74	s-switch.()...:description."Filt
e5c0	65 72 20 72 65 73 75 6c 74 73 20 62 79 20 66 69 6c 65 20 65 78 74 65 6e 73 69 6f 6e 73 22 0a 20	er.results.by.file.extensions"..
e5e0	20 3a 63 6c 61 73 73 20 27 74 72 61 6e 73 69 65 6e 74 2d 6f 70 74 69 6f 6e 0a 20 20 3a 61 72 67	.:class.'transient-option...:arg
e600	75 6d 65 6e 74 20 22 2d 2d 65 78 74 65 6e 73 69 6f 6e 3d 22 0a 20 20 3a 6d 75 6c 74 69 2d 76 61	ument."--extension="...:multi-va
e620	6c 75 65 20 27 72 65 70 65 61 74 0a 20 20 3a 70 72 6f 6d 70 74 0a 20 20 28 6c 61 6d 62 64 61 20	lue.'repeat...:prompt...(lambda.
e640	28 6f 29 0a 20 20 20 20 28 6c 65 74 2a 20 28 28 76 61 6c 20 28 6f 72 65 66 20 6f 20 76 61 6c 75	(o).....(let*.((val.(oref.o.valu
e660	65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 20 28 69 66 20 76 61 6c 20 28 66 6f 72	e))............(str.(if.val.(for
e680	6d 61 74 20 22 28 63 75 72 72 65 6e 74 3a 20 25 73 29 20 22 20 28 6d 61 70 63 6f 6e 63 61 74 20	mat."(current:.%s).".(mapconcat.
e6a0	23 27 63 6f 6e 63 61 74 20 76 61 6c 20 22 2c 22 29 29 20 22 22 29 29 29 0a 20 20 20 20 20 20 28	#'concat.val.",")).""))).......(
e6c0	66 6f 72 6d 61 74 20 22 25 73 46 69 6c 65 20 65 78 74 73 20 73 65 70 61 72 61 74 65 64 20 77 69	format."%sFile.exts.separated.wi
e6e0	74 68 20 63 6f 6d 6d 61 3a 20 22 20 73 74 72 29 29 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d	th.comma:.".str))))..(transient-
e700	64 65 66 69 6e 65 2d 69 6e 66 69 78 20 64 69 72 76 69 73 68 2d 66 64 2d 2d 65 78 63 6c 75 64 65	define-infix.dirvish-fd--exclude
e720	2d 73 77 69 74 63 68 20 28 29 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 22 45 78 63 6c 75	-switch.()...:description."Exclu
e740	64 65 20 66 69 6c 65 73 2f 64 69 72 73 20 74 68 61 74 20 6d 61 74 63 68 20 74 68 65 20 67 6c 6f	de.files/dirs.that.match.the.glo
e760	62 20 70 61 74 74 65 72 6e 22 0a 20 20 3a 63 6c 61 73 73 20 27 74 72 61 6e 73 69 65 6e 74 2d 6f	b.pattern"...:class.'transient-o
e780	70 74 69 6f 6e 0a 20 20 3a 61 72 67 75 6d 65 6e 74 20 22 2d 2d 65 78 63 6c 75 64 65 3d 22 0a 20	ption...:argument."--exclude="..
e7a0	20 3a 6d 75 6c 74 69 2d 76 61 6c 75 65 20 27 72 65 70 65 61 74 0a 20 20 3a 70 72 6f 6d 70 74 0a	.:multi-value.'repeat...:prompt.
e7c0	20 20 28 6c 61 6d 62 64 61 20 28 6f 29 0a 20 20 20 20 28 6c 65 74 2a 20 28 28 76 61 6c 20 28 6f	..(lambda.(o).....(let*.((val.(o
e7e0	72 65 66 20 6f 20 76 61 6c 75 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 20 28 69	ref.o.value))............(str.(i
e800	66 20 76 61 6c 20 28 66 6f 72 6d 61 74 20 22 28 63 75 72 72 65 6e 74 3a 20 25 73 29 20 22 20 28	f.val.(format."(current:.%s).".(
e820	6d 61 70 63 6f 6e 63 61 74 20 23 27 63 6f 6e 63 61 74 20 76 61 6c 20 22 2c 22 29 29 20 22 22 29	mapconcat.#'concat.val.","))."")
e840	29 29 0a 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 47 6c 6f 62 20 70 61 74 74 65 72 6e	)).......(format."%sGlob.pattern
e860	73 20 28 73 75 63 68 20 61 73 20 2a 2e 70 79 63 29 20 73 65 70 61 72 61 74 65 64 20 77 69 74 68	s.(such.as.*.pyc).separated.with
e880	20 63 6f 6d 6d 61 3a 20 22 20 73 74 72 29 29 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65	.comma:.".str))))..(transient-de
e8a0	66 69 6e 65 2d 69 6e 66 69 78 20 64 69 72 76 69 73 68 2d 66 64 2d 2d 73 65 61 72 63 68 2d 70 61	fine-infix.dirvish-fd--search-pa
e8c0	74 74 65 72 6e 2d 69 6e 66 69 78 20 28 29 0a 20 20 22 43 68 61 6e 67 65 20 73 65 61 72 63 68 20	ttern-infix.()..."Change.search.
e8e0	70 61 74 74 65 72 6e 2e 22 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 22 43 68 61 6e 67 65	pattern."...:description."Change
e900	20 73 65 61 72 63 68 20 70 61 74 74 65 72 6e 22 0a 20 20 3a 63 6c 61 73 73 20 27 74 72 61 6e 73	.search.pattern"...:class.'trans
e920	69 65 6e 74 2d 6c 69 73 70 2d 76 61 72 69 61 62 6c 65 0a 20 20 3a 76 61 72 69 61 62 6c 65 20 27	ient-lisp-variable...:variable.'
e940	64 69 72 76 69 73 68 2d 66 64 2d 2d 69 6e 70 75 74 0a 20 20 3a 72 65 61 64 65 72 20 28 6c 61 6d	dirvish-fd--input...:reader.(lam
e960	62 64 61 20 28 5f 70 72 6f 6d 70 74 20 5f 69 6e 69 74 20 5f 68 69 73 74 29 0a 20 20 20 20 20 20	bda.(_prompt._init._hist).......
e980	20 20 20 20 20 20 28 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 20 22 49 6e 70 75 74 20 73 65	......(completing-read."Input.se
e9a0	61 72 63 68 20 70 61 74 74 65 72 6e 3a 20 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	arch.pattern:.".................
e9c0	20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 76 69 73 68 2d 66 64 2d 69 6e 70 75 74 2d 68 69	.............dirvish-fd-input-hi
e9e0	73 74 6f 72 79 20 6e 69 6c 20 6e 69 6c 20 64 69 72 76 69 73 68 2d 66 64 2d 2d 69 6e 70 75 74 29	story.nil.nil.dirvish-fd--input)
ea00	29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 20 28 61 75 74 6f 6c 6f 61 64 20 27 64 69	))..;;;###autoload.(autoload.'di
ea20	72 76 69 73 68 2d 66 64 2d 73 77 69 74 63 68 65 73 2d 6d 65 6e 75 20 22 64 69 72 76 69 73 68 2d	rvish-fd-switches-menu."dirvish-
ea40	66 64 22 20 6e 69 6c 20 74 29 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 70 72 65	fd".nil.t).(transient-define-pre
ea60	66 69 78 20 64 69 72 76 69 73 68 2d 66 64 2d 73 77 69 74 63 68 65 73 2d 6d 65 6e 75 20 28 29 0a	fix.dirvish-fd-switches-menu.().
ea80	20 20 22 53 65 74 75 70 20 66 64 20 73 77 69 74 63 68 65 73 2e 22 0a 20 20 3a 69 6e 69 74 2d 76	.."Setup.fd.switches."...:init-v
eaa0	61 6c 75 65 0a 20 20 28 6c 61 6d 62 64 61 20 28 6f 29 20 28 6f 73 65 74 20 6f 20 76 61 6c 75 65	alue...(lambda.(o).(oset.o.value
eac0	20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 28 6f 72 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70	.(split-string.(or.(dirvish-prop
eae0	20 3a 66 64 2d 73 77 69 74 63 68 65 73 29 20 22 22 29 29 29 29 0a 20 20 5b 3a 64 65 73 63 72 69	.:fd-switches).""))))...[:descri
eb00	70 74 69 6f 6e 0a 20 20 20 28 6c 61 6d 62 64 61 20 28 29 20 28 64 69 72 76 69 73 68 2d 2d 66 6f	ption....(lambda.().(dirvish--fo
eb20	72 6d 61 74 2d 6d 65 6e 75 2d 68 65 61 64 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	rmat-menu-heading...............
eb40	20 22 53 65 74 75 70 20 46 44 20 53 77 69 74 63 68 65 73 22 0a 20 20 20 20 20 20 20 20 20 20 20	."Setup.FD.Switches"............
eb60	20 20 20 20 22 49 67 6e 6f 72 65 20 52 61 6e 67 65 20 5b 62 79 20 64 65 66 61 75 6c 74 20 69 67	...."Ignore.Range.[by.default.ig
eb80	6e 6f 72 65 20 41 4c 4c 5d 0a 20 20 56 43 53 3a 20 2e 67 69 74 69 67 6e 6f 72 65 20 2b 20 2e 67	nore.ALL]...VCS:..gitignore.+..g
eba0	69 74 2f 69 6e 66 6f 2f 65 78 63 6c 75 64 65 20 2b 20 24 48 4f 4d 45 2f 2e 63 6f 6e 66 69 67 2f	it/info/exclude.+.$HOME/.config/
ebc0	67 69 74 2f 69 67 6e 6f 72 65 0a 20 20 41 4c 4c 3a 20 56 43 53 20 2b 20 2e 69 67 6e 6f 72 65 20	git/ignore...ALL:.VCS.+..ignore.
ebe0	2b 20 2e 66 64 69 67 6e 6f 72 65 20 2b 20 24 48 4f 4d 45 2f 2e 63 6f 6e 66 69 67 2f 66 64 2f 69	+..fdignore.+.$HOME/.config/fd/i
ec00	67 6e 6f 72 65 22 29 29 0a 20 20 20 5b 22 46 69 6c 65 20 74 79 70 65 73 20 28 6d 75 6c 74 69 70	gnore"))....["File.types.(multip
ec20	6c 65 20 74 79 70 65 73 20 63 61 6e 20 62 65 20 69 6e 63 6c 75 64 65 64 29 22 0a 20 20 20 20 28	le.types.can.be.included)".....(
ec40	33 20 22 66 22 20 22 20 53 65 61 72 63 68 20 66 6f 72 20 72 65 67 75 6c 61 72 20 66 69 6c 65 73	3."f".".Search.for.regular.files
ec60	22 20 22 2d 2d 74 79 70 65 3d 66 69 6c 65 22 29 0a 20 20 20 20 28 33 20 22 64 22 20 22 20 53 65	"."--type=file").....(3."d".".Se
ec80	61 72 63 68 20 66 6f 72 20 64 69 72 65 63 74 6f 72 69 65 73 22 20 22 2d 2d 74 79 70 65 3d 64 69	arch.for.directories"."--type=di
eca0	72 65 63 74 6f 72 79 22 29 0a 20 20 20 20 28 33 20 22 6c 22 20 22 20 53 65 61 72 63 68 20 66 6f	rectory").....(3."l".".Search.fo
ecc0	72 20 73 79 6d 62 6f 6c 69 63 20 6c 69 6e 6b 73 22 20 22 2d 2d 74 79 70 65 3d 73 79 6d 6c 69 6e	r.symbolic.links"."--type=symlin
ece0	6b 22 29 0a 20 20 20 20 28 33 20 22 73 22 20 22 20 53 65 61 72 63 68 20 66 6f 72 20 73 6f 63 6b	k").....(3."s".".Search.for.sock
ed00	65 74 73 22 20 22 2d 2d 74 79 70 65 3d 73 6f 63 6b 65 74 22 29 0a 20 20 20 20 28 33 20 22 70 22	ets"."--type=socket").....(3."p"
ed20	20 22 20 53 65 61 72 63 68 20 66 6f 72 20 6e 61 6d 65 64 20 70 69 70 65 73 22 20 22 2d 2d 74 79	.".Search.for.named.pipes"."--ty
ed40	70 65 3d 70 69 70 65 22 29 0a 20 20 20 20 28 33 20 22 78 22 20 22 20 53 65 61 72 63 68 20 66 6f	pe=pipe").....(3."x".".Search.fo
ed60	72 20 65 78 65 63 75 74 61 62 6c 65 22 20 22 2d 2d 74 79 70 65 3d 65 78 65 63 75 74 61 62 6c 65	r.executable"."--type=executable
ed80	22 29 0a 20 20 20 20 28 33 20 22 65 22 20 22 20 53 65 61 72 63 68 20 66 6f 72 20 65 6d 70 74 79	").....(3."e".".Search.for.empty
eda0	20 66 69 6c 65 73 20 6f 72 20 64 69 72 65 63 74 6f 72 69 65 73 22 20 22 2d 2d 74 79 70 65 3d 65	.files.or.directories"."--type=e
edc0	6d 70 74 79 22 29 0a 20 20 20 20 22 22 0a 20 20 20 20 22 54 6f 67 67 6c 65 73 22 0a 20 20 20 20	mpty").....""....."Toggles".....
ede0	28 33 20 22 2d 48 22 20 22 49 6e 63 6c 75 64 65 20 68 69 64 64 65 6e 20 66 69 6c 65 73 7c 64 69	(3."-H"."Include.hidden.files\|di
ee00	72 73 20 69 6e 20 74 68 65 20 72 65 73 75 6c 74 73 22 20 22 2d 2d 68 69 64 64 65 6e 22 29 0a 20	rs.in.the.results"."--hidden")..
ee20	20 20 20 28 33 20 22 2d 49 22 20 22 53 68 6f 77 20 72 65 73 75 6c 74 73 20 66 72 6f 6d 20 41 4c	...(3."-I"."Show.results.from.AL
ee40	4c 22 20 22 2d 2d 6e 6f 2d 69 67 6e 6f 72 65 22 29 0a 20 20 20 20 28 34 20 22 69 76 22 20 22 53	L"."--no-ignore").....(4."iv"."S
ee60	68 6f 77 20 72 65 73 75 6c 74 73 20 66 72 6f 6d 20 56 43 53 22 20 22 2d 2d 6e 6f 2d 69 67 6e 6f	how.results.from.VCS"."--no-igno
ee80	72 65 2d 76 63 73 22 29 0a 20 20 20 20 28 35 20 22 69 70 22 20 22 53 68 6f 77 20 72 65 73 75 6c	re-vcs").....(5."ip"."Show.resul
eea0	74 73 20 66 72 6f 6d 20 2e 67 69 74 69 67 6e 6f 72 65 20 69 6e 20 70 61 72 65 6e 74 20 64 69 72	ts.from..gitignore.in.parent.dir
eec0	73 22 20 22 2d 2d 6e 6f 2d 69 67 6e 6f 72 65 2d 70 61 72 65 6e 74 22 29 0a 20 20 20 20 28 33 20	s"."--no-ignore-parent").....(3.
eee0	22 2d 73 22 20 22 50 65 72 66 6f 72 6d 20 61 20 63 61 73 65 2d 73 65 6e 73 69 74 69 76 65 20 73	"-s"."Perform.a.case-sensitive.s
ef00	65 61 72 63 68 22 20 22 2d 2d 63 61 73 65 2d 73 65 6e 73 69 74 69 76 65 22 29 0a 20 20 20 20 28	earch"."--case-sensitive").....(
ef20	34 20 22 2d 67 22 20 22 50 65 72 66 6f 72 6d 20 61 20 67 6c 6f 62 2d 62 61 73 65 64 20 28 72 61	4."-g"."Perform.a.glob-based.(ra
ef40	74 68 65 72 20 74 68 61 6e 20 72 65 67 65 78 2d 62 61 73 65 64 29 20 73 65 61 72 63 68 22 20 22	ther.than.regex-based).search"."
ef60	2d 2d 67 6c 6f 62 22 29 0a 20 20 20 20 28 34 20 22 2d 46 22 20 22 54 72 65 61 74 20 74 68 65 20	--glob").....(4."-F"."Treat.the.
ef80	70 61 74 74 65 72 6e 20 61 73 20 61 20 6c 69 74 65 72 61 6c 20 73 74 72 69 6e 67 22 20 22 2d 2d	pattern.as.a.literal.string"."--
efa0	66 69 78 65 64 2d 73 74 72 69 6e 67 73 22 29 0a 20 20 20 20 28 34 20 22 2d 4c 22 20 22 54 72 61	fixed-strings").....(4."-L"."Tra
efc0	76 65 72 73 65 20 73 79 6d 62 6f 6c 69 63 20 6c 69 6e 6b 73 22 20 22 2d 2d 66 6f 6c 6c 6f 77 22	verse.symbolic.links"."--follow"
efe0	29 0a 20 20 20 20 28 34 20 22 2d 70 22 20 22 4c 65 74 20 74 68 65 20 70 61 74 74 65 72 6e 20 6d	).....(4."-p"."Let.the.pattern.m
f000	61 74 63 68 20 61 67 61 69 6e 73 74 20 74 68 65 20 66 75 6c 6c 20 70 61 74 68 22 20 22 2d 2d 66	atch.against.the.full.path"."--f
f020	75 6c 6c 2d 70 61 74 68 22 29 0a 20 20 20 20 28 35 20 22 6d 72 22 20 22 4d 61 78 69 6d 75 6d 20	ull-path").....(5."mr"."Maximum.
f040	6e 75 6d 62 65 72 20 6f 66 20 73 65 61 72 63 68 20 72 65 73 75 6c 74 73 22 20 22 2d 2d 6d 61 78	number.of.search.results"."--max
f060	2d 72 65 73 75 6c 74 73 22 29 0a 20 20 20 20 28 35 20 22 6d 74 22 20 22 44 6f 20 6e 6f 74 20 64	-results").....(5."mt"."Do.not.d
f080	65 73 63 65 6e 64 20 69 6e 74 6f 20 61 20 64 69 66 66 65 72 65 6e 74 20 66 69 6c 65 20 73 79 73	escend.into.a.different.file.sys
f0a0	74 65 6d 73 22 20 22 2d 2d 6d 6f 75 6e 74 22 29 0a 20 20 20 20 28 35 20 22 50 22 20 22 20 44 6f	tems"."--mount").....(5."P".".Do
f0c0	20 6e 6f 74 20 74 72 61 76 65 72 73 65 20 69 6e 74 6f 20 6d 61 74 63 68 69 6e 67 20 64 69 72 65	.not.traverse.into.matching.dire
f0e0	63 74 6f 72 69 65 73 22 20 22 2d 2d 70 72 75 6e 65 22 29 0a 20 20 20 20 22 22 0a 20 20 20 20 22	ctories"."--prune").....""....."
f100	4f 70 74 69 6f 6e 73 22 0a 20 20 20 20 28 34 20 22 2d 65 22 20 64 69 72 76 69 73 68 2d 66 64 2d	Options".....(4."-e".dirvish-fd-
f120	2d 65 78 74 65 6e 73 69 6f 6e 73 2d 73 77 69 74 63 68 29 0a 20 20 20 20 28 34 20 22 2d 45 22 20	-extensions-switch).....(4."-E".
f140	64 69 72 76 69 73 68 2d 66 64 2d 2d 65 78 63 6c 75 64 65 2d 73 77 69 74 63 68 29 0a 20 20 20 20	dirvish-fd--exclude-switch).....
f160	28 34 20 22 2d 44 22 20 22 4d 61 78 20 6c 65 76 65 6c 20 66 6f 72 20 64 69 72 65 63 74 6f 72 79	(4."-D"."Max.level.for.directory
f180	20 74 72 61 76 65 72 73 69 6e 67 22 20 22 2d 2d 6d 61 78 2d 64 65 70 74 68 3d 22 29 0a 20 20 20	.traversing"."--max-depth=")....
f1a0	20 28 35 20 22 2d 64 22 20 22 4f 6e 6c 79 20 73 68 6f 77 20 72 65 73 75 6c 74 73 20 73 74 61 72	.(5."-d"."Only.show.results.star
f1c0	74 69 6e 67 20 61 74 20 74 68 65 20 64 65 70 74 68 22 20 22 2d 2d 6d 69 78 2d 64 65 70 74 68 3d	ting.at.the.depth"."--mix-depth=
f1e0	22 29 0a 20 20 20 20 28 35 20 22 67 64 22 20 22 4f 6e 6c 79 20 73 68 6f 77 20 72 65 73 75 6c 74	").....(5."gd"."Only.show.result
f200	73 20 73 74 61 72 74 69 6e 67 20 61 74 20 74 68 65 20 65 78 61 63 74 20 67 69 76 65 6e 20 64 65	s.starting.at.the.exact.given.de
f220	70 74 68 22 20 22 2d 2d 65 78 61 63 74 2d 64 65 70 74 68 3d 22 29 0a 20 20 20 20 28 35 20 22 69	pth"."--exact-depth=").....(5."i
f240	66 22 20 22 41 64 64 20 61 20 63 75 73 74 6f 6d 20 69 67 6e 6f 72 65 2d 66 69 6c 65 20 69 6e 20	f"."Add.a.custom.ignore-file.in.
f260	27 2e 67 69 74 69 67 6e 6f 72 65 27 20 66 6f 72 6d 61 74 22 20 22 2d 2d 69 67 6e 6f 72 65 2d 66	'.gitignore'.format"."--ignore-f
f280	69 6c 65 3d 22 0a 20 20 20 20 20 20 20 3a 72 65 61 64 65 72 20 28 6c 61 6d 62 64 61 20 28 5f 70	ile="........:reader.(lambda.(_p
f2a0	72 6f 6d 70 74 20 5f 69 6e 69 74 20 5f 68 69 73 74 29 20 28 72 65 61 64 2d 66 69 6c 65 2d 6e 61	rompt._init._hist).(read-file-na
f2c0	6d 65 20 22 43 68 6f 6f 73 65 20 69 67 6e 6f 72 65 20 66 69 6c 65 3a 20 22 29 29 29 0a 20 20 20	me."Choose.ignore.file:.")))....
f2e0	20 28 35 20 22 2d 53 22 20 22 4c 69 6d 69 74 20 72 65 73 75 6c 74 73 20 62 61 73 65 64 20 6f 6e	.(5."-S"."Limit.results.based.on
f300	20 74 68 65 20 73 69 7a 65 20 6f 66 20 66 69 6c 65 73 22 20 22 2d 2d 73 69 7a 65 3d 22 0a 20 20	.the.size.of.files"."--size="...
f320	20 20 20 20 20 3a 72 65 61 64 65 72 20 28 6c 61 6d 62 64 61 20 28 5f 70 72 6f 6d 70 74 20 5f 69	.....:reader.(lambda.(_prompt._i
f340	6e 69 74 20 5f 68 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 61	nit._hist)..................(rea
f360	64 2d 73 74 72 69 6e 67 20 22 49 6e 70 75 74 20 66 69 6c 65 20 73 69 7a 65 20 75 73 69 6e 67 20	d-string."Input.file.size.using.
f380	74 68 65 20 66 6f 72 6d 61 74 20 3c 2b 2d 3e 3c 4e 55 4d 3e 3c 55 4e 49 54 3e 20 28 65 67 2e 20	the.format.<+-><NUM><UNIT>.(eg..
f3a0	2b 31 30 30 6d 29 3a 20 22 29 29 29 0a 20 20 20 20 28 35 20 22 63 6e 22 20 22 46 69 6c 74 65 72	+100m):."))).....(5."cn"."Filter
f3c0	20 72 65 73 75 6c 74 73 20 62 61 73 65 64 20 6f 6e 20 74 68 65 20 66 69 6c 65 20 6d 74 69 6d 65	.results.based.on.the.file.mtime
f3e0	20 6e 65 77 65 72 20 74 68 61 6e 22 20 22 2d 2d 63 68 61 6e 67 65 64 2d 77 69 74 68 69 6e 3d 22	.newer.than"."--changed-within="
f400	0a 20 20 20 20 20 20 20 3a 72 65 61 64 65 72 20 28 6c 61 6d 62 64 61 20 28 5f 70 72 6f 6d 70 74	........:reader.(lambda.(_prompt
f420	20 5f 69 6e 69 74 20 5f 68 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	._init._hist)..................(
f440	72 65 61 64 2d 73 74 72 69 6e 67 20 22 49 6e 70 75 74 20 61 20 64 75 72 61 74 69 6f 6e 20 28 31	read-string."Input.a.duration.(1
f460	30 68 2c 20 31 64 2c 20 33 35 6d 69 6e 29 20 6f 72 20 61 20 74 69 6d 65 20 70 6f 69 6e 74 20 28	0h,.1d,.35min).or.a.time.point.(
f480	32 30 31 38 2d 31 30 2d 32 37 20 31 30 3a 30 30 3a 30 30 29 3a 20 22 29 29 29 0a 20 20 20 20 28	2018-10-27.10:00:00):."))).....(
f4a0	35 20 22 63 6f 22 20 22 46 69 6c 74 65 72 20 72 65 73 75 6c 74 73 20 62 61 73 65 64 20 6f 6e 20	5."co"."Filter.results.based.on.
f4c0	74 68 65 20 66 69 6c 65 20 6d 74 69 6d 65 20 6f 6c 64 65 72 20 74 68 61 6e 22 20 22 2d 2d 63 68	the.file.mtime.older.than"."--ch
f4e0	61 6e 67 65 64 2d 62 65 66 6f 72 65 3d 22 0a 20 20 20 20 20 20 20 3a 72 65 61 64 65 72 20 28 6c	anged-before="........:reader.(l
f500	61 6d 62 64 61 20 28 5f 70 72 6f 6d 70 74 20 5f 69 6e 69 74 20 5f 68 69 73 74 29 0a 20 20 20 20	ambda.(_prompt._init._hist).....
f520	20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 61 64 2d 73 74 72 69 6e 67 20 22 49 6e 70 75 74	.............(read-string."Input
f540	20 61 20 64 75 72 61 74 69 6f 6e 20 28 31 30 68 2c 20 31 64 2c 20 33 35 6d 69 6e 29 20 6f 72 20	.a.duration.(10h,.1d,.35min).or.
f560	61 20 74 69 6d 65 20 70 6f 69 6e 74 20 28 32 30 31 38 2d 31 30 2d 32 37 20 31 30 3a 30 30 3a 30	a.time.point.(2018-10-27.10:00:0
f580	30 29 3a 20 22 29 29 29 0a 20 20 20 20 28 36 20 22 2d 6f 22 20 22 46 69 6c 74 65 72 20 66 69 6c	0):."))).....(6."-o"."Filter.fil
f5a0	65 73 20 62 79 20 74 68 65 69 72 20 75 73 65 72 20 61 6e 64 2f 6f 72 20 67 72 6f 75 70 22 20 22	es.by.their.user.and/or.group"."
f5c0	2d 2d 6f 77 6e 65 72 3d 22 0a 20 20 20 20 20 20 20 3a 72 65 61 64 65 72 20 28 6c 61 6d 62 64 61	--owner="........:reader.(lambda
f5e0	20 28 5f 70 72 6f 6d 70 74 20 5f 69 6e 69 74 20 5f 68 69 73 74 29 0a 20 20 20 20 20 20 20 20 20	.(_prompt._init._hist)..........
f600	20 20 20 20 20 20 20 20 28 72 65 61 64 2d 73 74 72 69 6e 67 20 22 75 73 65 72 7c 75 69 64 3a 67	........(read-string."user\|uid:g
f620	72 6f 75 70 7c 67 69 64 20 2d 20 65 67 2e 20 6a 6f 68 6e 2c 20 3a 73 74 75 64 65 6e 74 73 2c 20	roup\|gid.-.eg..john,.:students,.
f640	21 6a 6f 68 6e 3a 73 74 75 64 65 6e 74 73 20 28 27 21 27 20 6d 65 61 6e 73 20 74 6f 20 65 78 63	!john:students.('!'.means.to.exc
f660	6c 75 64 65 20 66 69 6c 65 73 20 69 6e 73 74 65 61 64 29 3a 20 22 29 29 29 0a 20 20 20 20 22 22	lude.files.instead):."))).....""
f680	0a 20 20 20 20 22 41 63 74 69 6f 6e 73 22 0a 20 20 20 20 28 22 72 22 20 64 69 72 76 69 73 68 2d	....."Actions".....("r".dirvish-
f6a0	66 64 2d 2d 73 65 61 72 63 68 2d 70 61 74 74 65 72 6e 2d 69 6e 66 69 78 29 0a 20 20 20 20 28 22	fd--search-pattern-infix).....("
f6c0	52 45 54 22 20 22 41 70 70 6c 79 20 73 77 69 74 63 68 65 73 22 20 64 69 72 76 69 73 68 2d 66 64	RET"."Apply.switches".dirvish-fd
f6e0	2d 2d 61 70 70 6c 79 2d 73 77 69 74 63 68 65 73 29 5d 5d 29 0a 0a 28 64 65 66 75 6e 20 64 69 72	--apply-switches)]])..(defun.dir
f700	76 69 73 68 2d 66 64 2d 73 77 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 20 28 62 75 66 66 65 72	vish-fd-switch-to-buffer.(buffer
f720	29 0a 20 20 22 53 77 69 74 63 68 20 74 6f 20 42 55 46 46 45 52 20 77 69 74 68 20 77 69 6e 64 6f	)..."Switch.to.BUFFER.with.windo
f740	77 20 75 6e 64 65 64 69 63 61 74 65 64 2e 22 0a 20 20 28 6c 65 74 20 28 28 64 65 64 69 63 61 74	w.undedicated."...(let.((dedicat
f760	65 64 20 28 77 69 6e 64 6f 77 2d 64 65 64 69 63 61 74 65 64 2d 70 29 29 20 28 77 69 6e 20 28 73	ed.(window-dedicated-p)).(win.(s
f780	65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 29 29 29 0a 20 20 20 20 28 73 65 74 2d 77 69 6e 64 6f	elected-window))).....(set-windo
f7a0	77 2d 64 65 64 69 63 61 74 65 64 2d 70 20 77 69 6e 20 6e 69 6c 29 0a 20 20 20 20 28 70 72 6f 67	w-dedicated-p.win.nil).....(prog
f7c0	31 20 28 73 77 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 20 62 75 66 66 65 72 29 0a 20 20 20 20	1.(switch-to-buffer.buffer).....
f7e0	20 20 28 73 65 74 2d 77 69 6e 64 6f 77 2d 64 65 64 69 63 61 74 65 64 2d 70 20 77 69 6e 20 64 65	..(set-window-dedicated-p.win.de
f800	64 69 63 61 74 65 64 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 66 64 2d 2d	dicated))))..(defun.dirvish-fd--
f820	61 72 67 70 61 72 73 65 72 20 28 61 72 67 73 29 0a 20 20 22 50 61 72 73 65 20 66 64 20 61 72 67	argparser.(args)..."Parse.fd.arg
f840	73 20 74 6f 20 61 20 6c 69 73 74 20 6f 66 20 66 6c 61 67 73 20 66 72 6f 6d 20 41 52 47 53 2e 22	s.to.a.list.of.flags.from.ARGS."
f860	0a 20 20 28 6c 65 74 2a 20 28 28 67 6c 6f 62 70 20 28 6d 65 6d 62 65 72 20 22 2d 2d 67 6c 6f 62	...(let*.((globp.(member."--glob
f880	22 20 61 72 67 73 29 29 0a 20 20 20 20 20 20 20 20 20 28 63 61 73 65 70 20 28 6d 65 6d 62 65 72	".args))..........(casep.(member
f8a0	20 22 2d 2d 63 61 73 65 2d 73 65 6e 73 69 74 69 76 65 22 20 61 72 67 73 29 29 0a 20 20 20 20 20	."--case-sensitive".args))......
f8c0	20 20 20 20 28 69 67 6e 2d 72 61 6e 67 65 20 28 63 6f 6e 64 20 28 28 6d 65 6d 62 65 72 20 22 2d	....(ign-range.(cond.((member."-
f8e0	2d 6e 6f 2d 69 67 6e 6f 72 65 22 20 61 72 67 73 29 20 22 6e 6f 22 29 0a 20 20 20 20 20 20 20 20	-no-ignore".args)."no").........
f900	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 6d 65 6d 62 65 72 20 22 2d 2d 6e 6f	..................((member."--no
f920	2d 69 67 6e 6f 72 65 2d 76 63 73 22 20 61 72 67 73 29 20 22 6e 6f 5f 76 63 73 22 29 0a 20 20 20	-ignore-vcs".args)."no_vcs")....
f940	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 20 22 61 6c 6c 22 29	.......................(t."all")
f960	29 29 0a 20 20 20 20 20 20 20 20 20 74 79 70 65 73 20 65 78 74 73 20 65 78 63 6c 75 64 65 73 29	))..........types.exts.excludes)
f980	0a 20 20 20 20 28 64 6f 6c 69 73 74 20 28 61 72 67 20 61 72 67 73 29 0a 20 20 20 20 20 20 28 63	.....(dolist.(arg.args).......(c
f9a0	6f 6e 64 20 28 28 73 74 72 69 6e 67 2d 70 72 65 66 69 78 2d 70 20 22 2d 2d 74 79 70 65 3d 22 20	ond.((string-prefix-p."--type=".
f9c0	61 72 67 29 20 28 70 75 73 68 20 28 73 75 62 73 74 72 69 6e 67 20 61 72 67 20 38 29 20 74 79 70	arg).(push.(substring.arg.8).typ
f9e0	65 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 28 73 74 72 69 6e 67 2d 70 72 65 66 69 78	es)).............((string-prefix
fa00	2d 70 20 22 2d 2d 65 78 74 65 6e 73 69 6f 6e 3d 22 20 61 72 67 29 20 28 70 75 73 68 20 28 73 75	-p."--extension=".arg).(push.(su
fa20	62 73 74 72 69 6e 67 20 61 72 67 20 31 32 29 20 65 78 74 73 29 29 0a 20 20 20 20 20 20 20 20 20	bstring.arg.12).exts))..........
fa40	20 20 20 28 28 73 74 72 69 6e 67 2d 70 72 65 66 69 78 2d 70 20 22 2d 2d 65 78 63 6c 75 64 65 3d	...((string-prefix-p."--exclude=
fa60	22 20 61 72 67 29 20 28 70 75 73 68 20 28 73 75 62 73 74 72 69 6e 67 20 61 72 67 20 31 30 29 20	".arg).(push.(substring.arg.10).
fa80	65 78 63 6c 75 64 65 73 29 29 29 29 0a 20 20 20 20 28 73 65 74 71 20 74 79 70 65 73 20 28 6d 61	excludes)))).....(setq.types.(ma
faa0	70 63 6f 6e 63 61 74 20 23 27 63 6f 6e 63 61 74 20 74 79 70 65 73 20 22 2c 22 29 29 0a 20 20 20	pconcat.#'concat.types.","))....
fac0	20 28 73 65 74 71 20 65 78 74 73 20 28 6d 61 70 63 6f 6e 63 61 74 20 23 27 63 6f 6e 63 61 74 20	.(setq.exts.(mapconcat.#'concat.
fae0	65 78 74 73 20 22 2c 22 29 29 0a 20 20 20 20 28 73 65 74 71 20 65 78 63 6c 75 64 65 73 20 28 6d	exts.",")).....(setq.excludes.(m
fb00	61 70 63 6f 6e 63 61 74 20 23 27 63 6f 6e 63 61 74 20 65 78 63 6c 75 64 65 73 20 22 2c 22 29 29	apconcat.#'concat.excludes.","))
fb20	0a 20 20 20 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 66 64 2d 61 72 67 6c 69 73 74 20 28	.....(dirvish-prop.:fd-arglist.(
fb40	6c 69 73 74 20 67 6c 6f 62 70 20 63 61 73 65 70 20 69 67 6e 2d 72 61 6e 67 65 20 74 79 70 65 73	list.globp.casep.ign-range.types
fb60	20 65 78 74 73 20 65 78 63 6c 75 64 65 73 29 29 29 29 0a 0a 28 64 69 72 76 69 73 68 2d 64 65 66	.exts.excludes))))..(dirvish-def
fb80	69 6e 65 2d 6d 6f 64 65 2d 6c 69 6e 65 20 66 64 2d 73 77 69 74 63 68 65 73 0a 20 20 22 52 65 74	ine-mode-line.fd-switches..."Ret
fba0	75 72 6e 20 61 20 66 6f 72 6d 61 74 74 65 64 20 73 74 72 69 6e 67 20 73 68 6f 77 69 6e 67 20 74	urn.a.formatted.string.showing.t
fbc0	68 65 20 44 49 52 56 49 53 48 2d 46 44 2d 41 43 54 55 41 4c 2d 53 57 49 54 43 48 45 53 2e 22 0a	he.DIRVISH-FD-ACTUAL-SWITCHES.".
fbe0	20 20 28 70 63 61 73 65 2d 6c 65 74 20 28 28 60 28 2c 67 6c 6f 62 70 20 2c 63 61 73 65 70 20 2c	..(pcase-let.((`(,globp.,casep.,
fc00	69 67 6e 2d 72 61 6e 67 65 20 2c 74 79 70 65 73 20 2c 65 78 74 73 20 2c 65 78 63 6c 75 64 65 73	ign-range.,types.,exts.,excludes
fc20	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a	)................(dirvish-prop.:
fc40	66 64 2d 61 72 67 6c 69 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 61 63 65	fd-arglist))...............(face
fc60	20 28 69 66 20 28 64 69 72 76 69 73 68 2d 2d 77 69 6e 64 6f 77 2d 73 65 6c 65 63 74 65 64 2d 70	.(if.(dirvish--window-selected-p
fc80	20 64 76 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 64 69	.dv).........................'di
fca0	72 65 64 2d 68 65 61 64 65 72 20 27 73 68 61 64 6f 77 29 29 29 0a 20 20 20 20 28 66 6f 72 6d 61	red-header.'shadow))).....(forma
fcc0	74 20 22 20 20 25 73 20 7c 20 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65	t."..%s.\|.%s".............(prope
fce0	72 74 69 7a 65 20 22 46 44 22 20 27 66 61 63 65 20 66 61 63 65 29 0a 20 20 20 20 20 20 20 20 20	rtize."FD".'face.face)..........
fd00	20 20 20 28 69 66 20 28 6e 6f 74 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 66 64 2d 74 69	...(if.(not.(dirvish-prop.:fd-ti
fd20	6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 75 62 73 74 69 74 75 74 65	me)).................(substitute
fd40	2d 63 6f 6d 6d 61 6e 64 2d 6b 65 79 73 0a 09 09 20 22 50 72 6f 63 65 73 73 69 6e 67 2e 2e 2e 20	-command-keys...."Processing....
fd60	70 72 65 73 73 20 5c 5c 5b 64 69 72 76 69 73 68 2d 66 64 2d 6b 69 6c 6c 5d 20 74 6f 20 61 62 6f	press.\\[dirvish-fd-kill].to.abo
fd80	72 74 20 74 68 65 20 73 65 61 72 63 68 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66	rt.the.search")...............(f
fda0	6f 72 6d 61 74 20 22 25 73 20 5c 22 25 73 5c 22 20 7c 20 25 73 20 25 73 20 7c 20 25 73 20 25 73	ormat."%s.\"%s\".\|.%s.%s.\|.%s.%s
fdc0	20 7c 20 25 73 20 25 73 20 7c 20 25 73 20 25 73 20 7c 20 25 73 20 25 73 20 7c 22 0a 20 20 20 20	.\|.%s.%s.\|.%s.%s.\|.%s.%s.\|".....
fde0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28 69	..................(propertize.(i
fe00	66 20 67 6c 6f 62 70 20 22 67 6c 6f 62 3a 22 20 22 72 65 67 65 78 3a 22 29 20 27 66 61 63 65 20	f.globp."glob:"."regex:").'face.
fe20	66 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f	face).......................(pro
fe40	70 65 72 74 69 7a 65 20 28 6f 72 20 64 69 72 76 69 73 68 2d 66 64 2d 2d 69 6e 70 75 74 20 22 22	pertize.(or.dirvish-fd--input.""
fe60	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	)...............................
fe80	20 20 20 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 72 65 67 65 78 70 2d 67 72 6f 75	....'face.'font-lock-regexp-grou
fea0	70 69 6e 67 2d 63 6f 6e 73 74 72 75 63 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ping-construct).................
fec0	20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 74 79 70 65 3a 22 20 27 66 61 63 65 20	......(propertize."type:".'face.
fee0	66 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f	face).......................(pro
ff00	70 65 72 74 69 7a 65 20 28 69 66 20 28 65 71 75 61 6c 20 74 79 70 65 73 20 22 22 29 20 22 61 6c	pertize.(if.(equal.types."")."al
ff20	6c 22 20 74 79 70 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	l".types).......................
ff40	20 20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 76 61 72	............'face.'font-lock-var
ff60	69 61 62 6c 65 2d 6e 61 6d 65 2d 66 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	iable-name-face)................
ff80	20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 63 61 73 65 3a 22 20 27 66 61 63 65	.......(propertize."case:".'face
ffa0	20 66 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72	.face).......................(pr
ffc0	6f 70 65 72 74 69 7a 65 20 28 69 66 20 63 61 73 65 70 20 22 73 65 6e 73 69 74 69 76 65 22 20 22	opertize.(if.casep."sensitive"."
ffe0	73 6d 61 72 74 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	smart").........................
10000	20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 74 79 70 65 2d	..........'face.'font-lock-type-
10020	66 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f	face).......................(pro
10040	70 65 72 74 69 7a 65 20 22 69 67 6e 6f 72 65 3a 22 20 27 66 61 63 65 20 66 61 63 65 29 0a 20 20	pertize."ignore:".'face.face)...
10060	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20	....................(propertize.
10080	69 67 6e 2d 72 61 6e 67 65 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 63 6f 6d 6d 65	ign-range.'face.'font-lock-comme
100a0	6e 74 2d 66 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	nt-face).......................(
100c0	70 72 6f 70 65 72 74 69 7a 65 20 22 65 78 74 73 3a 22 20 27 66 61 63 65 20 66 61 63 65 29 0a 20	propertize."exts:".'face.face)..
100e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65	.....................(propertize
10100	20 28 69 66 20 28 65 71 75 61 6c 20 65 78 74 73 20 22 22 29 20 22 61 6c 6c 22 20 65 78 74 73 29	.(if.(equal.exts."")."all".exts)
10120	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	................................
10140	20 20 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 73 74 72 69 6e 67 2d 66 61 63 65 29	...'face.'font-lock-string-face)
10160	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69	.......................(properti
10180	7a 65 20 22 65 78 63 6c 75 64 65 73 3a 22 20 27 66 61 63 65 20 66 61 63 65 29 0a 20 20 20 20 20	ze."excludes:".'face.face)......
101a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28 69 66	.................(propertize.(if
101c0	20 28 65 71 75 61 6c 20 65 78 63 6c 75 64 65 73 20 22 22 29 20 22 6e 6f 6e 65 22 20 65 78 63 6c	.(equal.excludes."")."none".excl
101e0	75 64 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	udes)...........................
10200	20 20 20 20 20 20 20 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 73 74 72 69 6e 67 2d	........'face.'font-lock-string-
10220	66 61 63 65 29 29 29 29 29 29 0a 0a 28 64 69 72 76 69 73 68 2d 64 65 66 69 6e 65 2d 6d 6f 64 65	face))))))..(dirvish-define-mode
10240	2d 6c 69 6e 65 20 66 64 2d 74 69 6d 65 73 74 61 6d 70 0a 20 20 22 54 69 6d 65 73 74 61 6d 70 20	-line.fd-timestamp..."Timestamp.
10260	6f 66 20 73 65 61 72 63 68 20 66 69 6e 69 73 68 65 64 2e 22 0a 20 20 28 77 68 65 6e 20 28 63 61	of.search.finished."...(when.(ca
10280	72 20 28 64 76 2d 6c 61 79 6f 75 74 20 64 76 29 29 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20	r.(dv-layout.dv)).(dirvish-prop.
102a0	3a 66 64 2d 74 69 6d 65 29 29 29 0a 0a 28 64 69 72 76 69 73 68 2d 64 65 66 69 6e 65 2d 6d 6f 64	:fd-time)))..(dirvish-define-mod
102c0	65 2d 6c 69 6e 65 20 66 64 2d 70 77 64 0a 20 20 22 43 75 72 72 65 6e 74 20 77 6f 72 6b 69 6e 67	e-line.fd-pwd..."Current.working
102e0	20 64 69 72 65 63 74 6f 72 79 2e 22 0a 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28 61 62 62 72	.directory."...(propertize.(abbr
10300	65 76 69 61 74 65 2d 66 69 6c 65 2d 6e 61 6d 65 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f	eviate-file-name.default-directo
10320	72 79 29 20 27 66 61 63 65 20 27 64 69 72 65 64 2d 64 69 72 65 63 74 6f 72 79 29 29 0a 0a 28 64	ry).'face.'dired-directory))..(d
10340	65 66 69 6e 65 2d 6f 62 73 6f 6c 65 74 65 2d 66 75 6e 63 74 69 6f 6e 2d 61 6c 69 61 73 20 27 64	efine-obsolete-function-alias.'d
10360	69 72 76 69 73 68 2d 72 6f 61 6d 20 23 27 64 69 72 76 69 73 68 2d 66 64 2d 6a 75 6d 70 20 22 4a	irvish-roam.#'dirvish-fd-jump."J
10380	75 6e 20 30 38 2c 20 32 30 32 32 22 29 0a 28 64 65 66 69 6e 65 2d 6f 62 73 6f 6c 65 74 65 2d 66	un.08,.2022").(define-obsolete-f
103a0	75 6e 63 74 69 6f 6e 2d 61 6c 69 61 73 20 27 64 69 72 76 69 73 68 2d 66 64 2d 72 6f 61 6d 20 23	unction-alias.'dirvish-fd-roam.#
103c0	27 64 69 72 76 69 73 68 2d 66 64 2d 6a 75 6d 70 20 22 4a 75 6c 20 31 37 2c 20 32 30 32 32 22 29	'dirvish-fd-jump."Jul.17,.2022")
103e0	0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 66	.;;;###autoload.(defun.dirvish-f
10400	64 2d 6a 75 6d 70 20 28 26 6f 70 74 69 6f 6e 61 6c 20 63 75 72 72 65 6e 74 2d 64 69 72 2d 70 29	d-jump.(&optional.current-dir-p)
10420	0a 20 20 22 42 72 6f 77 73 65 20 64 69 72 65 63 74 6f 72 69 65 73 20 75 73 69 6e 67 20 60 66 64	..."Browse.directories.using.`fd
10440	27 20 63 6f 6d 6d 61 6e 64 2e 0a 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 74 61 6b 65 73 20 61 20	'.command..This.command.takes.a.
10460	77 68 69 6c 65 20 74 6f 20 69 6e 64 65 78 20 61 6c 6c 20 74 68 65 20 64 69 72 65 63 74 6f 72 69	while.to.index.all.the.directori
10480	65 73 20 74 68 65 20 66 69 72 73 74 0a 74 69 6d 65 20 79 6f 75 20 72 75 6e 20 69 74 2e 20 20 41	es.the.first.time.you.run.it...A
104a0	66 74 65 72 20 74 68 65 20 69 6e 64 65 78 69 6e 67 2c 20 69 74 20 66 69 72 65 73 20 75 70 20 69	fter.the.indexing,.it.fires.up.i
104c0	6e 73 74 61 6e 74 6c 79 2e 0a 0a 49 66 20 63 61 6c 6c 65 64 20 77 69 74 68 20 5c 5c 60 43 2d 75	nstantly...If.called.with.\\`C-u
104e0	27 20 6f 72 20 69 66 20 43 55 52 52 45 4e 54 2d 44 49 52 2d 50 20 68 6f 6c 64 73 20 74 68 65 20	'.or.if.CURRENT-DIR-P.holds.the.
10500	76 61 6c 75 65 20 34 2c 0a 73 65 61 72 63 68 20 66 6f 72 20 64 69 72 65 63 74 6f 72 69 65 73 20	value.4,.search.for.directories.
10520	69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 64 69 72 65 63 74 6f 72 79 2e 20 20 4f 74 68 65 72	in.the.current.directory...Other
10540	77 69 73 65 2c 0a 73 65 61 72 63 68 20 66 6f 72 20 64 69 72 65 63 74 6f 72 69 65 73 20 69 6e 20	wise,.search.for.directories.in.
10560	60 64 69 72 76 69 73 68 2d 66 64 2d 64 65 66 61 75 6c 74 2d 64 69 72 27 2e 0a 0a 49 66 20 70 72	`dirvish-fd-default-dir'...If.pr
10580	65 66 69 78 65 64 20 74 77 69 63 65 20 77 69 74 68 20 5c 5c 60 43 2d 75 27 20 6f 72 20 69 66 20	efixed.twice.with.\\`C-u'.or.if.
105a0	43 55 52 52 45 4e 54 2d 44 49 52 2d 50 20 68 6f 6c 64 73 20 74 68 65 0a 76 61 6c 75 65 20 31 36	CURRENT-DIR-P.holds.the.value.16
105c0	2c 20 6c 65 74 20 74 68 65 20 75 73 65 72 20 63 68 6f 6f 73 65 20 74 68 65 20 72 6f 6f 74 20 64	,.let.the.user.choose.the.root.d
105e0	69 72 65 63 74 6f 72 79 20 6f 66 20 74 68 65 69 72 20 73 65 61 72 63 68 2e 22 0a 20 20 28 69 6e	irectory.of.their.search."...(in
10600	74 65 72 61 63 74 69 76 65 20 22 70 22 29 0a 20 20 28 6c 65 74 2a 20 28 28 62 61 73 65 2d 64 69	teractive."p")...(let*.((base-di
10620	72 20 28 63 6f 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 65 71	r.(cond.....................((eq
10640	20 63 75 72 72 65 6e 74 2d 64 69 72 2d 70 20 34 29 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74	.current-dir-p.4).default-direct
10660	6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 65 71 20 63 75	ory).....................((eq.cu
10680	72 72 65 6e 74 2d 64 69 72 2d 70 20 31 36 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	rrent-dir-p.16).................
106a0	20 20 20 20 20 28 6c 65 74 20 28 28 64 69 72 20 28 63 61 72 20 28 66 69 6e 64 2d 66 69 6c 65 2d	.....(let.((dir.(car.(find-file-
106c0	72 65 61 64 2d 61 72 67 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	read-args.......................
106e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 53 65 6c 65 63 74 20 72 6f 6f 74 20 64 69 72	................"Select.root.dir
10700	65 63 74 6f 72 79 3a 20 22 20 6e 69 6c 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ectory:.".nil))))...............
10720	20 20 20 20 20 20 20 20 20 28 69 66 20 28 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 64	.........(if.(file-directory-p.d
10740	69 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	ir)............................(
10760	66 69 6c 65 2d 6e 61 6d 65 2d 61 73 2d 64 69 72 65 63 74 6f 72 79 20 64 69 72 29 0a 20 20 20 20	file-name-as-directory.dir).....
10780	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 76 69 73 68 2d 2d 67	.....................(dirvish--g
107a0	65 74 2d 70 61 72 65 6e 74 2d 70 61 74 68 20 64 69 72 29 29 29 29 0a 20 20 20 20 20 20 20 20 20	et-parent-path.dir))))..........
107c0	20 20 20 20 20 20 20 20 20 20 20 28 74 20 64 69 72 76 69 73 68 2d 66 64 2d 64 65 66 61 75 6c 74	...........(t.dirvish-fd-default
107e0	2d 64 69 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 72 65 6d 6f 74 65 20 28 66 69 6c 65 2d 72	-dir)))..........(remote.(file-r
10800	65 6d 6f 74 65 2d 70 20 62 61 73 65 2d 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 64 2d	emote-p.base-dir))..........(fd-
10820	70 72 6f 67 72 61 6d 20 28 64 69 72 76 69 73 68 2d 66 64 2d 2d 65 6e 73 75 72 65 2d 66 64 20 72	program.(dirvish-fd--ensure-fd.r
10840	65 6d 6f 74 65 29 29 29 0a 20 20 20 20 28 6c 65 74 2a 20 28 28 63 6f 6d 6d 61 6e 64 20 28 63 6f	emote))).....(let*.((command.(co
10860	6e 63 61 74 20 66 64 2d 70 72 6f 67 72 61 6d 20 22 20 2d 48 20 2d 74 64 20 2d 2d 63 6f 6c 6f 72	ncat.fd-program.".-H.-td.--color
10880	3d 6e 65 76 65 72 20 2d 30 20 2e 20 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	=never.-0..."...................
108a0	20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 6c 6f 63 61 6c 2d 6e 61 6d 65 20 62 61 73 65 2d	..........(file-local-name.base-
108c0	64 69 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63	dir)))............(default-direc
108e0	74 6f 72 79 20 62 61 73 65 2d 64 69 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6f 75 74 70 75	tory.base-dir)............(outpu
10900	74 20 28 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e 64 2d 74 6f 2d 73 74 72 69 6e 67 20 63 6f 6d 6d 61	t.(shell-command-to-string.comma
10920	6e 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 73 2d 72 61 77 20 28 73 70 6c 69	nd))............(files-raw.(spli
10940	74 2d 73 74 72 69 6e 67 20 6f 75 74 70 75 74 20 22 5c 30 22 20 74 29 29 0a 20 20 20 20 20 20 20	t-string.output."\0".t))........
10960	20 20 20 20 28 66 69 6c 65 73 20 28 64 69 72 76 69 73 68 2d 2d 61 70 70 65 6e 64 2d 6d 65 74 61	....(files.(dirvish--append-meta
10980	64 61 74 61 20 27 66 69 6c 65 20 66 69 6c 65 73 2d 72 61 77 29 29 0a 20 20 20 20 20 20 20 20 20	data.'file.files-raw))..........
109a0	20 20 28 66 69 6c 65 20 28 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 20 22 47 6f 20 74 6f 3a	..(file.(completing-read."Go.to:
109c0	20 22 20 66 69 6c 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6c 6c 2d 66 69 6c 65	.".files))............(full-file
109e0	20 28 63 6f 6e 63 61 74 20 72 65 6d 6f 74 65 20 66 69 6c 65 29 29 29 0a 20 20 20 20 20 20 28 64	.(concat.remote.file))).......(d
10a00	69 72 65 64 2d 6a 75 6d 70 20 6e 69 6c 20 66 75 6c 6c 2d 66 69 6c 65 29 29 29 29 0a 0a 28 64 65	ired-jump.nil.full-file))))..(de
10a20	66 75 6e 20 64 69 72 76 69 73 68 2d 66 64 2d 70 72 6f 63 2d 66 69 6c 74 65 72 20 28 70 72 6f 63	fun.dirvish-fd-proc-filter.(proc
10a40	20 73 74 72 69 6e 67 29 0a 20 20 22 46 69 6c 74 65 72 20 66 6f 72 20 60 64 69 72 76 69 73 68 2d	.string)..."Filter.for.`dirvish-
10a60	66 64 27 20 70 72 6f 63 65 73 73 65 73 20 50 52 4f 43 20 61 6e 64 20 6f 75 74 70 75 74 20 53 54	fd'.processes.PROC.and.output.ST
10a80	52 49 4e 47 2e 22 0a 20 20 28 6c 65 74 20 28 28 62 75 66 20 28 70 72 6f 63 65 73 73 2d 62 75 66	RING."...(let.((buf.(process-buf
10aa0	66 65 72 20 70 72 6f 63 29 29 29 0a 20 20 20 20 28 69 66 20 28 62 75 66 66 65 72 2d 6e 61 6d 65	fer.proc))).....(if.(buffer-name
10ac0	20 62 75 66 29 0a 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	.buf).........(with-current-buff
10ae0	65 72 20 62 75 66 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 64 69 72 76 69 73 68 2d 66	er.buf...........(setq.dirvish-f
10b00	64 2d 2d 6f 75 74 70 75 74 20 28 63 6f 6e 63 61 74 20 64 69 72 76 69 73 68 2d 66 64 2d 2d 6f 75	d--output.(concat.dirvish-fd--ou
10b20	74 70 75 74 20 73 74 72 69 6e 67 29 29 29 0a 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 70 72 6f	tput.string))).......(delete-pro
10b40	63 65 73 73 20 70 72 6f 63 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 66 64	cess.proc))))..(defun.dirvish-fd
10b60	2d 2d 72 65 61 64 2d 69 6e 70 75 74 20 28 29 0a 20 20 22 53 65 74 75 70 20 49 4e 50 55 54 20 72	--read-input.()..."Setup.INPUT.r
10b80	65 61 64 65 72 20 66 6f 72 20 66 64 2e 22 0a 20 20 28 6d 69 6e 69 62 75 66 66 65 72 2d 77 69 74	eader.for.fd."...(minibuffer-wit
10ba0	68 2d 73 65 74 75 70 2d 68 6f 6f 6b 20 23 27 64 69 72 76 69 73 68 2d 66 64 2d 6d 69 6e 69 62 75	h-setup-hook.#'dirvish-fd-minibu
10bc0	66 66 65 72 2d 73 65 74 75 70 2d 68 0a 20 20 20 20 28 63 6f 6e 64 69 74 69 6f 6e 2d 63 61 73 65	ffer-setup-h.....(condition-case
10be0	20 6e 69 6c 0a 20 20 20 20 20 20 20 20 28 72 65 61 64 2d 73 74 72 69 6e 67 20 22 f0 9f 94 8d 3a	.nil.........(read-string."....:
10c00	20 22 20 6e 69 6c 20 64 69 72 76 69 73 68 2d 66 64 2d 69 6e 70 75 74 2d 68 69 73 74 6f 72 79 29	.".nil.dirvish-fd-input-history)
10c20	0a 20 20 20 20 20 20 28 71 75 69 74 20 28 70 72 6f 67 31 20 27 63 61 6e 63 65 6c 6c 65 64 20 28	.......(quit.(prog1.'cancelled.(
10c40	6d 65 73 73 61 67 65 20 22 46 64 20 73 65 61 72 63 68 20 63 61 6e 63 65 6c 6c 65 64 22 29 29 29	message."Fd.search.cancelled")))
10c60	29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 66 64 2d 2d 70 61 72 73 65 2d 6f 75	)))..(defun.dirvish-fd--parse-ou
10c80	74 70 75 74 20 28 29 0a 20 20 22 50 61 72 73 65 20 66 64 20 63 6f 6d 6d 61 6e 64 20 6f 75 74 70	tput.()..."Parse.fd.command.outp
10ca0	75 74 2e 22 0a 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20	ut."...(goto-char.(dirvish-prop.
10cc0	3a 63 6f 6e 74 65 6e 74 2d 62 65 67 69 6e 29 29 0a 20 20 28 63 6c 2d 6c 6f 6f 70 0a 20 20 20 77	:content-begin))...(cl-loop....w
10ce0	69 74 68 20 72 65 73 20 3d 20 28 29 20 77 69 74 68 20 62 75 66 66 65 72 2d 72 65 61 64 2d 6f 6e	ith.res.=.().with.buffer-read-on
10d00	6c 79 20 3d 20 6e 69 6c 0a 20 20 20 66 6f 72 20 66 69 6c 65 20 69 6e 20 28 73 70 6c 69 74 2d 73	ly.=.nil....for.file.in.(split-s
10d20	74 72 69 6e 67 20 64 69 72 76 69 73 68 2d 66 64 2d 2d 6f 75 74 70 75 74 20 22 5c 6e 22 20 74 29	tring.dirvish-fd--output."\n".t)
10d40	0a 20 20 20 66 6f 72 20 69 64 78 20 3d 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 20 2e 2f	....for.idx.=.(string-match."../
10d60	22 20 66 69 6c 65 29 0a 20 20 20 66 6f 72 20 66 2d 6e 61 6d 65 20 3d 20 28 73 75 62 73 74 72 69	".file)....for.f-name.=.(substri
10d80	6e 67 20 66 69 6c 65 20 28 2b 20 69 64 78 20 33 29 29 0a 20 20 20 66 6f 72 20 66 2d 66 75 6c 6c	ng.file.(+.idx.3))....for.f-full
10da0	20 3d 20 28 63 6f 6e 63 61 74 20 22 20 20 22 20 28 73 75 62 73 74 72 69 6e 67 20 66 69 6c 65 20	.=.(concat."..".(substring.file.
10dc0	30 20 69 64 78 29 20 22 20 22 20 66 2d 6e 61 6d 65 20 22 5c 6e 22 29 20 64 6f 0a 20 20 20 28 70	0.idx).".".f-name."\n").do....(p
10de0	72 6f 67 6e 20 28 69 6e 73 65 72 74 20 66 2d 66 75 6c 6c 29 20 28 70 75 73 68 20 28 63 6f 6e 73	rogn.(insert.f-full).(push.(cons
10e00	20 66 2d 6e 61 6d 65 20 66 2d 66 75 6c 6c 29 20 72 65 73 29 29 0a 20 20 20 66 69 6e 61 6c 6c 79	.f-name.f-full).res))....finally
10e20	20 72 65 74 75 72 6e 20 28 70 72 6f 67 31 20 28 6e 72 65 76 65 72 73 65 20 72 65 73 29 20 28 67	.return.(prog1.(nreverse.res).(g
10e40	6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 29 29 29 0a 0a 28 64 65 66 75 6e	oto-char.(point-min)))))..(defun
10e60	20 64 69 72 76 69 73 68 2d 66 64 2d 66 69 6e 64 20 28 65 6e 74 72 79 29 0a 20 20 22 52 75 6e 20	.dirvish-fd-find.(entry)..."Run.
10e80	66 64 20 61 63 63 72 6f 72 69 6e 67 20 74 6f 20 45 4e 54 52 59 2e 22 0a 20 20 28 6c 65 74 2a 20	fd.accroring.to.ENTRY."...(let*.
10ea0	28 28 64 76 20 28 6f 72 20 64 69 72 76 69 73 68 2d 2d 74 68 69 73 20 28 64 69 72 76 69 73 68 2d	((dv.(or.dirvish--this.(dirvish-
10ec0	63 75 72 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 72 6f 6f 74 73 20 28 61 6e 64 20 64 76 20	curr)))..........(roots.(and.dv.
10ee0	28 64 76 2d 72 6f 6f 74 73 20 64 76 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 62 75 66 20 28 61	(dv-roots.dv)))..........(buf.(a
10f00	6e 64 20 72 6f 6f 74 73 20 28 61 6c 69 73 74 2d 67 65 74 20 65 6e 74 72 79 20 72 6f 6f 74 73 20	nd.roots.(alist-get.entry.roots.
10f20	6e 69 6c 20 6e 69 6c 20 23 27 65 71 75 61 6c 29 29 29 29 0a 20 20 20 20 28 6f 72 20 62 75 66 0a	nil.nil.#'equal)))).....(or.buf.
10f40	20 20 20 20 20 20 20 20 28 70 63 61 73 65 2d 6c 65 74 20 28 28 60 28 2c 70 61 74 74 65 72 6e 20	........(pcase-let.((`(,pattern.
10f60	2c 64 69 72 20 2c 5f 29 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 28 73 75 62 73 74 72 69 6e	,dir.,_).(split-string.(substrin
10f80	67 20 65 6e 74 72 79 20 31 29 20 22 f0 9f 93 81 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28	g.entry.1)."....")))...........(
10fa0	64 69 72 76 69 73 68 2d 66 64 20 64 69 72 20 70 61 74 74 65 72 6e 29 29 29 29 29 0a 0a 28 64 65	dirvish-fd.dir.pattern)))))..(de
10fc0	66 73 75 62 73 74 20 64 69 72 76 69 73 68 2d 66 64 2d 72 65 76 65 72 74 20 28 26 72 65 73 74 20	fsubst.dirvish-fd-revert.(&rest.
10fe0	5f 29 0a 20 20 22 52 65 76 65 72 74 20 62 75 66 66 65 72 20 66 75 6e 63 74 69 6f 6e 20 66 6f 72	_)..."Revert.buffer.function.for
11000	20 66 64 20 62 75 66 66 65 72 2e 22 0a 20 20 28 64 69 72 76 69 73 68 2d 66 64 20 64 65 66 61 75	.fd.buffer."...(dirvish-fd.defau
11020	6c 74 2d 64 69 72 65 63 74 6f 72 79 20 28 6f 72 20 64 69 72 76 69 73 68 2d 66 64 2d 2d 69 6e 70	lt-directory.(or.dirvish-fd--inp
11040	75 74 20 22 22 29 29 29 0a 0a 28 63 6c 2d 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 66 64 2d 70	ut."")))..(cl-defun.dirvish-fd-p
11060	72 6f 63 2d 73 65 6e 74 69 6e 65 6c 20 28 70 72 6f 63 20 5f 29 0a 20 20 22 53 65 6e 74 69 6e 65	roc-sentinel.(proc._)..."Sentine
11080	6c 20 66 6f 72 20 60 64 69 72 76 69 73 68 2d 66 64 27 20 70 72 6f 63 65 73 73 20 50 52 4f 43 2e	l.for.`dirvish-fd'.process.PROC.
110a0	22 0a 20 20 28 70 63 61 73 65 2d 6c 65 74 2a 20 28 28 62 75 66 20 28 70 72 6f 63 65 73 73 2d 62	"...(pcase-let*.((buf.(process-b
110c0	75 66 66 65 72 20 70 72 6f 63 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 75 63	uffer.proc))................(suc
110e0	63 65 73 73 20 28 65 71 20 28 70 72 6f 63 65 73 73 2d 65 78 69 74 2d 73 74 61 74 75 73 20 70 72	cess.(eq.(process-exit-status.pr
11100	6f 63 29 20 30 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 60 28 2c 69 6e 70 75 74	oc).0))................(`(,input
11120	20 2c 64 69 72 20 2c 64 76 29 20 28 70 72 6f 63 65 73 73 2d 67 65 74 20 70 72 6f 63 20 27 69 6e	.,dir.,dv).(process-get.proc.'in
11140	66 6f 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 6e 6f 74 20 73 75 63 63 65 73 73 29 0a 20 20	fo))).....(when.(not.success)...
11160	20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 44 69 72 76 69 73 68 20 66 64 20 65 72 72 6f	....(user-error."Dirvish.fd.erro
11180	72 3a 20 25 73 22 20 64 69 72 76 69 73 68 2d 66 64 2d 2d 6f 75 74 70 75 74 29 29 0a 20 20 20 20	r:.%s".dirvish-fd--output)).....
111a0	28 75 6e 6c 65 73 73 20 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 20 62 75 66 29 0a 20 20 20 20	(unless.(buffer-live-p.buf).....
111c0	20 20 28 63 6c 2d 72 65 74 75 72 6e 2d 66 72 6f 6d 20 64 69 72 76 69 73 68 2d 66 64 2d 70 72 6f	..(cl-return-from.dirvish-fd-pro
111e0	63 2d 73 65 6e 74 69 6e 65 6c 0a 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 60 66 64	c-sentinel.........(message."`fd
11200	27 20 70 72 6f 63 65 73 73 20 74 65 72 6d 69 6e 61 74 65 64 22 29 29 29 0a 20 20 20 20 28 77 69	'.process.terminated"))).....(wi
11220	74 68 2d 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 20 28 64 76 2d 72 6f 6f 74 2d 77 69 6e 64	th-selected-window.(dv-root-wind
11240	6f 77 20 64 76 29 0a 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 65 71 20 28 63 75 72 72 65 6e	ow.dv).......(unless.(eq.(curren
11260	74 2d 62 75 66 66 65 72 29 20 62 75 66 29 0a 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d	t-buffer).buf).........(dirvish-
11280	66 64 2d 73 77 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 20 62 75 66 29 29 29 0a 20 20 20 20 28	fd-switch-to-buffer.buf))).....(
112a0	77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 62 75 66 0a 20 20 20 20 20 20 28 73	with-current-buffer.buf.......(s
112c0	65 74 71 2d 6c 6f 63 61 6c 20 64 69 72 76 69 73 68 2d 66 64 2d 2d 69 6e 70 75 74 20 69 6e 70 75	etq-local.dirvish-fd--input.inpu
112e0	74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 76 69 73 68 2d 66 64 2d 2d	t...................dirvish-fd--
11300	6f 75 74 70 75 74 20 28 64 69 72 76 69 73 68 2d 66 64 2d 2d 70 61 72 73 65 2d 6f 75 74 70 75 74	output.(dirvish-fd--parse-output
11320	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 76 65 72 74 2d 62 75 66 66 65	)...................revert-buffe
11340	72 2d 66 75 6e 63 74 69 6f 6e 20 23 27 64 69 72 76 69 73 68 2d 66 64 2d 72 65 76 65 72 74 29 0a	r-function.#'dirvish-fd-revert).
11360	20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 66 64 2d 74 69 6d 65 0a 20 20 20	......(dirvish-prop.:fd-time....
11380	20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 20 25 73 20 25 73 20 22 0a 20 20 20 20 20 20 20 20 20	.....(format.".%s.%s."..........
113a0	20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 46 69 6e 69 73 68 65 64 20 61 74 3a	.......(propertize."Finished.at:
113c0	22 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 64 6f 63 2d 66 61 63 65 29 0a 20 20 20	".'face.'font-lock-doc-face)....
113e0	20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28 63 75 72 72 65 6e	.............(propertize.(curren
11400	74 2d 74 69 6d 65 2d 73 74 72 69 6e 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	t-time-string)..................
11420	20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 28 69 66 20 73 75 63 63 65 73 73 20 27 73 75	...........'face.(if.success.'su
11440	63 63 65 73 73 20 27 65 72 72 6f 72 29 29 29 29 0a 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 6e	ccess.'error)))).......(cond.((n
11460	6f 74 20 69 6e 70 75 74 29 20 28 73 65 74 71 20 69 6e 70 75 74 20 28 64 69 72 76 69 73 68 2d 66	ot.input).(setq.input.(dirvish-f
11480	64 2d 2d 72 65 61 64 2d 69 6e 70 75 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 74 20	d--read-input))).............(t.
114a0	28 64 69 72 76 69 73 68 2d 75 70 64 61 74 65 2d 62 6f 64 79 2d 68 29 29 29 0a 20 20 20 20 20 20	(dirvish-update-body-h))).......
114c0	28 77 68 65 6e 20 28 65 71 20 69 6e 70 75 74 20 27 63 61 6e 63 65 6c 6c 65 64 29 0a 20 20 20 20	(when.(eq.input.'cancelled).....
114e0	20 20 20 20 28 63 6c 2d 72 65 74 75 72 6e 2d 66 72 6f 6d 20 64 69 72 76 69 73 68 2d 66 64 2d 70	....(cl-return-from.dirvish-fd-p
11500	72 6f 63 2d 73 65 6e 74 69 6e 65 6c 20 28 6b 69 6c 6c 2d 62 75 66 66 65 72 20 62 75 66 29 29 29	roc-sentinel.(kill-buffer.buf)))
11520	0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 62 75 66 6e 61 6d 65 20 28 64 69 72 76 69 73 68 2d 66	.......(let.((bufname.(dirvish-f
11540	64 2d 2d 62 75 66 6e 61 6d 65 20 69 6e 70 75 74 20 64 69 72 20 64 76 29 29 29 0a 20 20 20 20 20	d--bufname.input.dir.dv)))......
11560	20 20 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 72 6f 6f 74 20 62 75 66 6e 61 6d 65 29 0a	...(dirvish-prop.:root.bufname).
11580	20 20 20 20 20 20 20 20 28 73 65 74 66 20 28 64 76 2d 69 6e 64 65 78 20 64 76 29 20 28 63 6f 6e	........(setf.(dv-index.dv).(con
115a0	73 20 62 75 66 6e 61 6d 65 20 62 75 66 29 29 0a 20 20 20 20 20 20 20 20 28 70 75 73 68 20 28 63	s.bufname.buf)).........(push.(c
115c0	6f 6e 73 20 62 75 66 6e 61 6d 65 20 62 75 66 29 20 28 64 76 2d 72 6f 6f 74 73 20 64 76 29 29 0a	ons.bufname.buf).(dv-roots.dv)).
115e0	20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 2d 6b 69 6c 6c 2d 62 75 66 66 65 72 20 28 67	........(dirvish--kill-buffer.(g
11600	65 74 2d 62 75 66 66 65 72 20 62 75 66 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 28 72 65 6e	et-buffer.bufname)).........(ren
11620	61 6d 65 2d 62 75 66 66 65 72 20 62 75 66 6e 61 6d 65 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20	ame-buffer.bufname)))))..(defun.
11640	64 69 72 76 69 73 68 2d 66 64 2d 2d 6e 61 72 72 6f 77 20 28 26 6f 70 74 69 6f 6e 61 6c 20 69 6e	dirvish-fd--narrow.(&optional.in
11660	70 75 74 20 67 6c 6f 62 29 0a 20 20 22 46 69 6c 74 65 72 20 74 68 65 20 73 75 62 64 69 72 20 77	put.glob)..."Filter.the.subdir.w
11680	69 74 68 20 72 65 67 65 78 73 20 63 6f 6d 70 6f 73 65 64 20 66 72 6f 6d 20 49 4e 50 55 54 2e 0a	ith.regexs.composed.from.INPUT..
116a0	57 68 65 6e 20 47 4c 4f 42 2c 20 63 6f 6e 76 65 72 74 20 74 68 65 20 72 65 67 65 78 73 20 75 73	When.GLOB,.convert.the.regexs.us
116c0	69 6e 67 20 60 64 69 72 65 64 2d 67 6c 6f 62 2d 72 65 67 65 78 70 27 2e 22 0a 20 20 28 6c 65 74	ing.`dired-glob-regexp'."...(let
116e0	20 28 28 72 65 67 65 78 73 20 28 63 6f 6e 64 20 28 28 65 71 20 28 6c 65 6e 67 74 68 20 69 6e 70	.((regexs.(cond.((eq.(length.inp
11700	75 74 29 20 30 29 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ut).0).nil).....................
11720	20 20 28 67 6c 6f 62 20 28 6d 61 70 63 61 72 20 23 27 64 69 72 65 64 2d 67 6c 6f 62 2d 72 65 67	..(glob.(mapcar.#'dired-glob-reg
11740	65 78 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	exp.............................
11760	20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 64 69 72 76 69 73 68 2d 66 64 2d 72 65 67 65	........(funcall.dirvish-fd-rege
11780	78 2d 62 75 69 6c 64 65 72 20 69 6e 70 75 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	x-builder.input)))..............
117a0	20 20 20 20 20 20 20 20 20 28 74 20 28 66 75 6e 63 61 6c 6c 20 64 69 72 76 69 73 68 2d 66 64 2d	.........(t.(funcall.dirvish-fd-
117c0	72 65 67 65 78 2d 62 75 69 6c 64 65 72 20 69 6e 70 75 74 29 29 29 29 0a 20 20 20 20 20 20 20 20	regex-builder.input)))).........
117e0	62 75 66 66 65 72 2d 72 65 61 64 2d 6f 6e 6c 79 29 0a 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72	buffer-read-only).....(goto-char
11800	20 28 63 64 61 72 20 64 69 72 65 64 2d 73 75 62 64 69 72 2d 61 6c 69 73 74 29 29 0a 20 20 20 20	.(cdar.dired-subdir-alist)).....
11820	28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 28 64 69 72 76 69 73 68 2d 66 64 2d 2d 68 65 61 64 65	(forward-line.(dirvish-fd--heade
11840	72 2d 6f 66 66 73 65 74 29 29 0a 20 20 20 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 63 6f	r-offset)).....(dirvish-prop.:co
11860	6e 74 65 6e 74 2d 62 65 67 69 6e 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 28 64 65 6c 65 74 65	ntent-begin.(point)).....(delete
11880	2d 72 65 67 69 6f 6e 20 28 70 6f 69 6e 74 29 20 28 64 69 72 65 64 2d 73 75 62 64 69 72 2d 6d 61	-region.(point).(dired-subdir-ma
118a0	78 29 29 0a 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 28 69	x)).....(save-excursion.......(i
118c0	66 20 28 6e 6f 74 20 72 65 67 65 78 73 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 6c 6f 6f	f.(not.regexs)...........(cl-loo
118e0	70 20 66 6f 72 20 28 5f 20 2e 20 6c 69 6e 65 29 20 69 6e 20 64 69 72 76 69 73 68 2d 66 64 2d 2d	p.for.(_...line).in.dirvish-fd--
11900	6f 75 74 70 75 74 20 64 6f 20 28 69 6e 73 65 72 74 20 6c 69 6e 65 29 29 0a 20 20 20 20 20 20 20	output.do.(insert.line))........
11920	20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 28 66 69 6c 65 20 2e 20 6c 69 6e 65 29 20 69 6e 20 64	.(cl-loop.for.(file...line).in.d
11940	69 72 76 69 73 68 2d 66 64 2d 2d 6f 75 74 70 75 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	irvish-fd--output...............
11960	20 20 20 75 6e 6c 65 73 73 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 72 65 67 65 78 20 69 6e 20	...unless.(cl-loop.for.regex.in.
11980	72 65 67 65 78 73 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	regexs..........................
119a0	20 20 20 20 20 20 20 20 74 68 65 72 65 69 73 20 28 6e 6f 74 20 28 73 74 72 69 6e 67 2d 6d 61 74	........thereis.(not.(string-mat
119c0	63 68 20 72 65 67 65 78 20 66 69 6c 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ch.regex.file)))................
119e0	20 20 64 6f 20 28 69 6e 73 65 72 74 20 6c 69 6e 65 29 29 29 29 0a 20 20 20 20 28 64 69 72 76 69	..do.(insert.line)))).....(dirvi
11a00	73 68 2d 75 70 64 61 74 65 2d 62 6f 64 79 2d 68 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76	sh-update-body-h)))..(defun.dirv
11a20	69 73 68 2d 66 64 2d 6d 69 6e 69 62 75 66 66 65 72 2d 75 70 64 61 74 65 2d 68 20 28 29 0a 20 20	ish-fd-minibuffer-update-h.()...
11a40	22 4d 69 6e 69 62 75 66 66 65 72 20 75 70 64 61 74 65 20 66 75 6e 63 74 69 6f 6e 20 66 6f 72 20	"Minibuffer.update.function.for.
11a60	60 64 69 72 76 69 73 68 2d 66 64 27 2e 22 0a 20 20 28 64 69 72 76 69 73 68 2d 64 65 62 6f 75 6e	`dirvish-fd'."...(dirvish-deboun
11a80	63 65 20 66 64 0a 20 20 20 20 28 6c 65 74 2a 20 28 28 62 75 66 20 28 77 69 6e 64 6f 77 2d 62 75	ce.fd.....(let*.((buf.(window-bu
11aa0	66 66 65 72 20 28 6d 69 6e 69 62 75 66 66 65 72 2d 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77	ffer.(minibuffer-selected-window
11ac0	29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 70 75 74 20 28 6d 69 6e 69 62 75 66 66 65	)))............(input.(minibuffe
11ae0	72 2d 63 6f 6e 74 65 6e 74 73 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 29 29 29 0a 20 20 20 20	r-contents-no-properties))).....
11b00	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 0a 20 20 20 20 20	..(with-current-buffer.buf......
11b20	20 20 20 28 73 65 74 71 20 64 69 72 76 69 73 68 2d 66 64 2d 2d 69 6e 70 75 74 20 69 6e 70 75 74	...(setq.dirvish-fd--input.input
11b40	29 0a 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 66 64 2d 2d 6e 61 72 72 6f 77 20 69 6e	).........(dirvish-fd--narrow.in
11b60	70 75 74 20 28 63 61 72 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 66 64 2d 61 72 67 6c 69	put.(car.(dirvish-prop.:fd-argli
11b80	73 74 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 66 64 2d 6d 69 6e	st)))))))..(defun.dirvish-fd-min
11ba0	69 62 75 66 66 65 72 2d 73 65 74 75 70 2d 68 20 28 29 0a 20 20 22 4d 69 6e 69 62 75 66 66 65 72	ibuffer-setup-h.()..."Minibuffer
11bc0	20 73 65 74 75 70 20 66 75 6e 63 74 69 6f 6e 20 66 6f 72 20 60 64 69 72 76 69 73 68 2d 66 64 27	.setup.function.for.`dirvish-fd'
11be0	2e 22 0a 20 20 28 61 64 64 2d 68 6f 6f 6b 20 27 70 6f 73 74 2d 63 6f 6d 6d 61 6e 64 2d 68 6f 6f	."...(add-hook.'post-command-hoo
11c00	6b 20 23 27 64 69 72 76 69 73 68 2d 66 64 2d 6d 69 6e 69 62 75 66 66 65 72 2d 75 70 64 61 74 65	k.#'dirvish-fd-minibuffer-update
11c20	2d 68 20 6e 69 6c 20 74 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 66 64 2d 6b 69	-h.nil.t))..(defun.dirvish-fd-ki
11c40	6c 6c 20 28 29 0a 20 20 22 4b 69 6c 6c 20 74 68 65 20 60 66 64 27 20 70 72 6f 63 65 73 73 20 72	ll.()..."Kill.the.`fd'.process.r
11c60	75 6e 6e 69 6e 67 20 69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2e 22 0a 20	unning.in.the.current.buffer."..
11c80	20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 64 69 72 76 69 73 68 2d 2d 6b 69 6c 6c 2d	.(interactive)...(dirvish--kill-
11ca0	62 75 66 66 65 72 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 0a 0a 3b 3b 3b 23 23	buffer.(current-buffer)))..;;;##
11cc0	23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 66 64 20 28 64 69 72	#autoload.(defun.dirvish-fd.(dir
11ce0	20 70 61 74 74 65 72 6e 29 0a 20 20 22 52 75 6e 20 60 66 64 27 20 6f 6e 20 44 49 52 20 61 6e 64	.pattern)..."Run.`fd'.on.DIR.and
11d00	20 67 6f 20 69 6e 74 6f 20 44 69 72 65 64 20 6d 6f 64 65 20 6f 6e 20 61 20 62 75 66 66 65 72 20	.go.into.Dired.mode.on.a.buffer.
11d20	6f 66 20 74 68 65 20 6f 75 74 70 75 74 2e 0a 54 68 65 20 63 6f 6d 6d 61 6e 64 20 72 75 6e 20 69	of.the.output..The.command.run.i
11d40	73 20 65 73 73 65 6e 74 69 61 6c 6c 79 3a 0a 0a 20 20 66 64 20 2d 2d 63 6f 6c 6f 72 3d 6e 65 76	s.essentially:....fd.--color=nev
11d60	65 72 20 2d 30 20 60 64 69 72 76 69 73 68 2d 66 64 2d 73 77 69 74 63 68 65 73 27 20 50 41 54 54	er.-0.`dirvish-fd-switches'.PATT
11d80	45 52 4e 0a 20 20 20 20 20 2d 2d 65 78 65 63 2d 62 61 74 63 68 20 60 64 69 72 76 69 73 68 2d 66	ERN......--exec-batch.`dirvish-f
11da0	64 2d 6c 73 2d 70 72 6f 67 72 61 6d 27 20 60 64 69 72 65 64 2d 6c 69 73 74 69 6e 67 2d 73 77 69	d-ls-program'.`dired-listing-swi
11dc0	74 63 68 65 73 27 20 2d 2d 64 69 72 65 63 74 6f 72 79 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74	tches'.--directory."...(interact
11de0	69 76 65 20 28 6c 69 73 74 20 28 61 6e 64 20 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72	ive.(list.(and.current-prefix-ar
11e00	67 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 28 72 65 61	g...........................(rea
11e20	64 2d 64 69 72 65 63 74 6f 72 79 2d 6e 61 6d 65 20 22 46 64 20 74 61 72 67 65 74 20 64 69 72 65	d-directory-name."Fd.target.dire
11e40	63 74 6f 72 79 3a 20 22 20 6e 69 6c 20 22 22 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	ctory:.".nil."".t)).............
11e60	20 20 20 20 20 20 20 20 20 6e 69 6c 29 29 0a 20 20 28 73 65 74 71 20 64 69 72 20 28 66 69 6c 65	.........nil))...(setq.dir.(file
11e80	2d 6e 61 6d 65 2d 61 73 2d 64 69 72 65 63 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	-name-as-directory..............
11ea0	28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 28 6f 72 20 64 69 72 20 64 65 66 61 75 6c	(expand-file-name.(or.dir.defaul
11ec0	74 2d 64 69 72 65 63 74 6f 72 79 29 29 29 29 0a 20 20 28 6f 72 20 28 66 69 6c 65 2d 64 69 72 65	t-directory))))...(or.(file-dire
11ee0	63 74 6f 72 79 2d 70 20 64 69 72 29 0a 20 20 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22	ctory-p.dir).......(user-error."
11f00	27 66 64 27 20 63 6f 6d 6d 61 6e 64 20 72 65 71 75 69 72 65 73 20 61 20 64 69 72 65 63 74 6f 72	'fd'.command.requires.a.director
11f20	79 3a 20 25 73 22 20 64 69 72 29 29 0a 20 20 28 6c 65 74 2a 20 28 28 72 65 6d 6f 74 65 20 28 66	y:.%s".dir))...(let*.((remote.(f
11f40	69 6c 65 2d 72 65 6d 6f 74 65 2d 70 20 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 64 2d	ile-remote-p.dir))..........(fd-
11f60	70 72 6f 67 72 61 6d 20 28 64 69 72 76 69 73 68 2d 66 64 2d 2d 65 6e 73 75 72 65 2d 66 64 20 72	program.(dirvish-fd--ensure-fd.r
11f80	65 6d 6f 74 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 6c 73 2d 70 72 6f 67 72 61 6d 20 28 6f 72	emote))..........(ls-program.(or
11fa0	20 28 61 6e 64 20 72 65 6d 6f 74 65 20 28 64 69 72 76 69 73 68 2d 66 64 2d 2d 66 69 6e 64 2d 67	.(and.remote.(dirvish-fd--find-g
11fc0	6e 75 2d 6c 73 20 72 65 6d 6f 74 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	nu-ls.remote))..................
11fe0	20 20 20 20 20 20 20 20 64 69 72 76 69 73 68 2d 66 64 2d 6c 73 2d 70 72 6f 67 72 61 6d 29 29 0a	........dirvish-fd-ls-program)).
12000	20 20 20 20 20 20 20 20 20 28 64 76 20 28 6f 72 20 28 64 69 72 76 69 73 68 2d 63 75 72 72 29 20	.........(dv.(or.(dirvish-curr).
12020	28 70 72 6f 67 6e 20 28 64 69 72 76 69 73 68 20 64 69 72 29 20 64 69 72 76 69 73 68 2d 2d 74 68	(progn.(dirvish.dir).dirvish--th
12040	69 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 64 2d 73 77 69 74 63 68 65 73 20 28 6f 72 20	is)))..........(fd-switches.(or.
12060	28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 66 64 2d 73 77 69 74 63 68 65 73 29 20 64 69 72 76	(dirvish-prop.:fd-switches).dirv
12080	69 73 68 2d 66 64 2d 73 77 69 74 63 68 65 73 20 22 22 29 29 0a 20 20 20 20 20 20 20 20 20 28 6c	ish-fd-switches.""))..........(l
120a0	73 2d 73 77 69 74 63 68 65 73 20 28 6f 72 20 64 69 72 65 64 2d 61 63 74 75 61 6c 2d 73 77 69 74	s-switches.(or.dired-actual-swit
120c0	63 68 65 73 20 28 64 76 2d 6c 73 2d 73 77 69 74 63 68 65 73 20 64 76 29 29 29 0a 20 20 20 20 20	ches.(dv-ls-switches.dv)))......
120e0	20 20 20 20 28 62 75 66 66 65 72 20 28 64 69 72 76 69 73 68 2d 2d 75 74 69 6c 2d 62 75 66 66 65	....(buffer.(dirvish--util-buffe
12100	72 20 27 66 64 20 64 76 20 6e 69 6c 20 74 29 29 29 0a 20 20 20 20 28 64 69 72 76 69 73 68 2d 2d	r.'fd.dv.nil.t))).....(dirvish--
12120	6b 69 6c 6c 2d 62 75 66 66 65 72 20 28 67 65 74 2d 62 75 66 66 65 72 20 28 64 69 72 76 69 73 68	kill-buffer.(get-buffer.(dirvish
12140	2d 66 64 2d 2d 62 75 66 6e 61 6d 65 20 70 61 74 74 65 72 6e 20 64 69 72 20 64 76 29 29 29 0a 20	-fd--bufname.pattern.dir.dv)))..
12160	20 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	...(with-current-buffer.buffer..
12180	20 20 20 20 20 28 65 72 61 73 65 2d 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 28 69 6e 73 65 72	.....(erase-buffer).......(inser
121a0	74 20 22 20 20 22 20 64 69 72 20 22 3a 22 20 28 6d 61 6b 65 2d 73 74 72 69 6e 67 20 28 64 69 72	t."..".dir.":".(make-string.(dir
121c0	76 69 73 68 2d 66 64 2d 2d 68 65 61 64 65 72 2d 6f 66 66 73 65 74 29 20 3f 5c 6e 29 29 0a 20 20	vish-fd--header-offset).?\n))...
121e0	20 20 20 20 28 64 69 72 65 64 2d 6d 6f 64 65 20 64 69 72 20 6c 73 2d 73 77 69 74 63 68 65 73 29	....(dired-mode.dir.ls-switches)
12200	0a 20 20 20 20 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63	.......(setq-local.default-direc
12220	74 6f 72 79 20 64 69 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 65 64	tory.dir...................dired
12240	2d 73 75 62 64 69 72 2d 61 6c 69 73 74 20 28 6c 69 73 74 20 28 63 6f 6e 73 20 64 69 72 20 28 70	-subdir-alist.(list.(cons.dir.(p
12260	6f 69 6e 74 2d 6d 69 6e 2d 6d 61 72 6b 65 72 29 29 29 29 0a 20 20 20 20 20 20 28 64 69 72 76 69	oint-min-marker)))).......(dirvi
12280	73 68 2d 69 6e 69 74 2d 64 69 72 65 64 2d 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 28 6c 65 74	sh-init-dired-buffer).......(let
122a0	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 20	.((map.(make-sparse-keymap)))...
122c0	20 20 20 20 20 20 28 73 65 74 2d 6b 65 79 6d 61 70 2d 70 61 72 65 6e 74 20 6d 61 70 20 28 63 75	......(set-keymap-parent.map.(cu
122e0	72 72 65 6e 74 2d 6c 6f 63 61 6c 2d 6d 61 70 29 29 0a 20 20 20 20 20 20 20 20 28 64 65 66 69 6e	rrent-local-map)).........(defin
12300	65 2d 6b 65 79 20 6d 61 70 20 22 5c 43 2d 63 5c 43 2d 6b 22 20 23 27 64 69 72 76 69 73 68 2d 66	e-key.map."\C-c\C-k".#'dirvish-f
12320	64 2d 6b 69 6c 6c 29 0a 20 20 20 20 20 20 20 20 28 75 73 65 2d 6c 6f 63 61 6c 2d 6d 61 70 20 6d	d-kill).........(use-local-map.m
12340	61 70 29 29 0a 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 64 76 20 28 64 76	ap)).......(dirvish-prop.:dv.(dv
12360	2d 6e 61 6d 65 20 64 76 29 29 0a 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a	-name.dv)).......(dirvish-prop.:
12380	67 75 69 20 28 64 69 73 70 6c 61 79 2d 67 72 61 70 68 69 63 2d 70 29 29 0a 20 20 20 20 20 20 28	gui.(display-graphic-p)).......(
123a0	64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 66 64 2d 73 77 69 74 63 68 65 73 20 66 64 2d 73 77 69	dirvish-prop.:fd-switches.fd-swi
123c0	74 63 68 65 73 29 0a 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 63 75 73 2d	tches).......(dirvish-prop.:cus-
123e0	68 65 61 64 65 72 20 27 64 69 72 76 69 73 68 2d 66 64 2d 68 65 61 64 65 72 29 0a 20 20 20 20 20	header.'dirvish-fd-header)......
12400	20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 72 65 6d 6f 74 65 20 72 65 6d 6f 74 65 29 0a 20	.(dirvish-prop.:remote.remote)..
12420	20 20 20 20 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 67 6c 6f 62 61 6c 2d 68 65 61 64 65	.....(dirvish-prop.:global-heade
12440	72 20 74 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 70 72 6f 63 20 28 61 70 70 6c 79 20 23 27	r.t).......(let.((proc.(apply.#'
12460	73 74 61 72 74 2d 66 69 6c 65 2d 70 72 6f 63 65 73 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	start-file-process..............
12480	20 20 20 20 20 20 20 20 20 20 20 20 22 66 64 22 20 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20	............"fd".buffer.........
124a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 2c 66 64 2d 70 72 6f 67 72 61 6d 20 22	.................`(,fd-program."
124c0	2d 2d 63 6f 6c 6f 72 3d 6e 65 76 65 72 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	--color=never"..................
124e0	20 20 20 20 20 20 20 20 20 20 2c 40 28 6f 72 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 66 64	..........,@(or.(split-string.fd
12500	2d 73 77 69 74 63 68 65 73 29 20 22 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	-switches)."")..................
12520	20 20 20 20 20 20 20 20 20 20 2c 28 6f 72 20 70 61 74 74 65 72 6e 20 22 22 29 0a 20 20 20 20 20	..........,(or.pattern."")......
12540	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2d 2d 65 78 65 63 2d 62 61	......................"--exec-ba
12560	74 63 68 22 20 2c 6c 73 2d 70 72 6f 67 72 61 6d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	tch".,ls-program................
12580	20 20 20 20 20 20 20 20 20 20 20 20 2c 40 28 6f 72 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20	............,@(or.(split-string.
125a0	6c 73 2d 73 77 69 74 63 68 65 73 29 20 22 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ls-switches)."")................
125c0	20 20 20 20 20 20 20 20 20 20 20 20 22 2d 2d 71 75 6f 74 69 6e 67 2d 73 74 79 6c 65 3d 6c 69 74	............"--quoting-style=lit
125e0	65 72 61 6c 22 20 22 2d 2d 64 69 72 65 63 74 6f 72 79 22 29 29 29 29 0a 20 20 20 20 20 20 20 20	eral"."--directory")))).........
12600	28 73 65 74 2d 70 72 6f 63 65 73 73 2d 66 69 6c 74 65 72 20 70 72 6f 63 20 23 27 64 69 72 76 69	(set-process-filter.proc.#'dirvi
12620	73 68 2d 66 64 2d 70 72 6f 63 2d 66 69 6c 74 65 72 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 2d	sh-fd-proc-filter).........(set-
12640	70 72 6f 63 65 73 73 2d 73 65 6e 74 69 6e 65 6c 20 70 72 6f 63 20 23 27 64 69 72 76 69 73 68 2d	process-sentinel.proc.#'dirvish-
12660	66 64 2d 70 72 6f 63 2d 73 65 6e 74 69 6e 65 6c 29 0a 20 20 20 20 20 20 20 20 28 64 69 72 76 69	fd-proc-sentinel).........(dirvi
12680	73 68 2d 66 64 2d 2d 61 72 67 70 61 72 73 65 72 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 28	sh-fd--argparser.(split-string.(
126a0	6f 72 20 66 64 2d 73 77 69 74 63 68 65 73 20 22 22 29 29 29 0a 20 20 20 20 20 20 20 20 28 70 72	or.fd-switches.""))).........(pr
126c0	6f 63 65 73 73 2d 70 75 74 20 70 72 6f 63 20 27 69 6e 66 6f 20 28 6c 69 73 74 20 70 61 74 74 65	ocess-put.proc.'info.(list.patte
126e0	72 6e 20 64 69 72 20 64 76 29 29 29 29 0a 20 20 20 20 28 64 69 72 76 69 73 68 2d 66 64 2d 73 77	rn.dir.dv)))).....(dirvish-fd-sw
12700	69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 20 62 75 66 66 65 72 29 29 29 0a 0a 0a 3b 3b 3b 23 23	itch-to-buffer.buffer)))...;;;##
12720	23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 66 64 2d 61 73 6b 20	#autoload.(defun.dirvish-fd-ask.
12740	28 64 69 72 20 70 61 74 74 65 72 6e 29 0a 20 20 22 54 68 65 20 73 61 6d 65 20 61 73 20 60 64 69	(dir.pattern)..."The.same.as.`di
12760	72 76 69 73 68 2d 66 64 27 20 62 75 74 20 61 73 6b 20 69 6e 69 74 69 61 6c 20 60 70 61 74 74 65	rvish-fd'.but.ask.initial.`patte
12780	72 6e 27 20 76 69 61 20 70 72 6f 6d 70 74 2e 20 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65	rn'.via.prompt.."...(interactive
127a0	20 28 6c 69 73 74 20 28 61 6e 64 20 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 0a 20	.(list.(and.current-prefix-arg..
127c0	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 72 65 61 64 2d 64	.........................(read-d
127e0	69 72 65 63 74 6f 72 79 2d 6e 61 6d 65 20 22 46 64 20 74 61 72 67 65 74 20 64 69 72 65 63 74 6f	irectory-name."Fd.target.directo
12800	72 79 3a 20 22 20 6e 69 6c 20 22 22 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ry:.".nil."".t))................
12820	20 20 20 20 20 20 28 72 65 61 64 2d 66 72 6f 6d 2d 6d 69 6e 69 62 75 66 66 65 72 20 22 50 61 74	......(read-from-minibuffer."Pat
12840	74 65 72 6e 3a 20 22 29 29 29 0a 20 20 28 64 69 72 76 69 73 68 2d 66 64 20 64 69 72 20 70 61 74	tern:.")))...(dirvish-fd.dir.pat
12860	74 65 72 6e 29 29 0a 0a 28 70 72 6f 76 69 64 65 20 27 64 69 72 76 69 73 68 2d 66 64 29 0a 3b 3b	tern))..(provide.'dirvish-fd).;;
12880	3b 20 64 69 72 76 69 73 68 2d 66 64 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00	;.dirvish-fd.el.ends.here.......
128a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
128c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
128e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
12900	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
12920	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
12940	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
12960	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
12980	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
129a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
129c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
129e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
12a00	64 69 72 76 69 73 68 2d 32 30 32 33 30 35 31 39 2e 31 35 30 30 2f 64 69 72 76 69 73 68 2d 68 69	dirvish-20230519.1500/dirvish-hi
12a20	73 74 6f 72 79 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	story.el........................
12a40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
12a60	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
12a80	30 30 30 36 32 33 35 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 36 31 35 33 00 20 30 00 00 00	0006235.00000000000.016153..0...
12aa0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
12ac0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
12ae0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
12b00	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...................
12b20	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...................
12b40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
12b60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
12b80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
12ba0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
12bc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
12be0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
12c00	3b 3b 3b 20 64 69 72 76 69 73 68 2d 68 69 73 74 6f 72 79 2e 65 6c 20 2d 2d 2d 20 48 69 73 74 6f	;;;.dirvish-history.el.---.Histo
12c20	72 79 20 6e 61 76 69 67 61 74 69 6f 6e 20 63 6f 6d 6d 61 6e 64 73 20 69 6e 20 44 69 72 76 69 73	ry.navigation.commands.in.Dirvis
12c40	68 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 20 74 20 2d 2a 2d 0a 0a 3b 3b	h.--.lexical-binding:.t.--..;;
12c60	20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 32 31 2d 32 30 32 32 20 41 6c 65 78 20 4c 75	.Copyright.(C).2021-2022.Alex.Lu
12c80	0a 3b 3b 20 41 75 74 68 6f 72 20 3a 20 41 6c 65 78 20 4c 75 20 3c 68 74 74 70 73 3a 2f 2f 67 69	.;;.Author.:.Alex.Lu.<https://gi
12ca0	74 68 75 62 2e 63 6f 6d 2f 61 6c 65 78 6c 75 69 67 69 74 3e 0a 3b 3b 20 56 65 72 73 69 6f 6e 3a	thub.com/alexluigit>.;;.Version:
12cc0	20 32 2e 30 2e 35 33 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 66 69 6c 65 73 2c 20 63 6f 6e 76	.2.0.53.;;.Keywords:.files,.conv
12ce0	65 6e 69 65 6e 63 65 0a 3b 3b 20 48 6f 6d 65 70 61 67 65 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74	enience.;;.Homepage:.https://git
12d00	68 75 62 2e 63 6f 6d 2f 61 6c 65 78 6c 75 69 67 69 74 2f 64 69 72 76 69 73 68 0a 3b 3b 20 53 50	hub.com/alexluigit/dirvish.;;.SP
12d20	44 58 2d 4c 69 63 65 6e 73 65 2d 49 64 65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f	DX-License-Identifier:.GPL-3.0-o
12d40	72 2d 6c 61 74 65 72 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 20 48 69 73	r-later..;;;.Commentary:..;;.His
12d60	74 6f 72 79 20 6e 61 76 69 67 61 74 69 6f 6e 20 63 6f 6d 6d 61 6e 64 73 20 69 6e 20 44 69 72 76	tory.navigation.commands.in.Dirv
12d80	69 73 68 2e 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 64 69 72 76 69	ish...;;;.Code:..(require.'dirvi
12da0	73 68 29 0a 0a 28 64 65 66 69 6e 65 2d 6f 62 73 6f 6c 65 74 65 2d 66 75 6e 63 74 69 6f 6e 2d 61	sh)..(define-obsolete-function-a
12dc0	6c 69 61 73 20 27 64 69 72 76 69 73 68 2d 73 68 6f 77 2d 68 69 73 74 6f 72 79 20 23 27 64 69 72	lias.'dirvish-show-history.#'dir
12de0	76 69 73 68 2d 68 69 73 74 6f 72 79 2d 6a 75 6d 70 20 22 4a 75 6e 20 30 38 2c 20 32 30 32 32 22	vish-history-jump."Jun.08,.2022"
12e00	29 0a 28 64 65 66 69 6e 65 2d 6f 62 73 6f 6c 65 74 65 2d 66 75 6e 63 74 69 6f 6e 2d 61 6c 69 61	).(define-obsolete-function-alia
12e20	73 20 27 64 69 72 76 69 73 68 2d 6f 74 68 65 72 2d 62 75 66 66 65 72 20 23 27 64 69 72 76 69 73	s.'dirvish-other-buffer.#'dirvis
12e40	68 2d 68 69 73 74 6f 72 79 2d 6c 61 73 74 20 22 4a 75 6e 20 30 38 2c 20 32 30 32 32 22 29 0a 28	h-history-last."Jun.08,.2022").(
12e60	64 65 66 69 6e 65 2d 6f 62 73 6f 6c 65 74 65 2d 66 75 6e 63 74 69 6f 6e 2d 61 6c 69 61 73 20 27	define-obsolete-function-alias.'
12e80	64 69 72 76 69 73 68 2d 67 6f 2d 66 6f 72 77 61 72 64 2d 68 69 73 74 6f 72 79 20 23 27 64 69 72	dirvish-go-forward-history.#'dir
12ea0	76 69 73 68 2d 68 69 73 74 6f 72 79 2d 67 6f 2d 66 6f 72 77 61 72 64 20 22 4a 75 6e 20 30 38 2c	vish-history-go-forward."Jun.08,
12ec0	20 32 30 32 32 22 29 0a 28 64 65 66 69 6e 65 2d 6f 62 73 6f 6c 65 74 65 2d 66 75 6e 63 74 69 6f	.2022").(define-obsolete-functio
12ee0	6e 2d 61 6c 69 61 73 20 27 64 69 72 76 69 73 68 2d 67 6f 2d 62 61 63 6b 77 61 72 64 2d 68 69 73	n-alias.'dirvish-go-backward-his
12f00	74 6f 72 79 20 23 27 64 69 72 76 69 73 68 2d 68 69 73 74 6f 72 79 2d 67 6f 2d 62 61 63 6b 77 61	tory.#'dirvish-history-go-backwa
12f20	72 64 20 22 4a 75 6e 20 30 38 2c 20 32 30 32 32 22 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f	rd."Jun.08,.2022")..;;;###autolo
12f40	61 64 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 68 69 73 74 6f 72 79 2d 6a 75 6d 70 20 28	ad.(defun.dirvish-history-jump.(
12f60	29 0a 20 20 22 4f 70 65 6e 20 61 20 74 61 72 67 65 74 20 64 69 72 65 63 74 6f 72 79 20 66 72 6f	)..."Open.a.target.directory.fro
12f80	6d 20 60 64 69 72 76 69 73 68 2d 2d 68 69 73 74 6f 72 79 27 2e 22 0a 20 20 28 69 6e 74 65 72 61	m.`dirvish--history'."...(intera
12fa0	63 74 69 76 65 29 0a 20 20 28 75 6e 6c 65 73 73 20 64 69 72 76 69 73 68 2d 2d 68 69 73 74 6f 72	ctive)...(unless.dirvish--histor
12fc0	79 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 44 69 72 76 69 73 68 5b 65 72 72 6f 72 5d 3a 20 6e	y.(user-error."Dirvish[error]:.n
12fe0	6f 20 68 69 73 74 6f 72 79 20 65 6e 74 72 69 65 73 22 29 29 0a 20 20 28 6c 65 74 2a 20 28 28 65	o.history.entries"))...(let*.((e
13000	6e 74 72 69 65 73 20 28 64 69 72 76 69 73 68 2d 2d 61 70 70 65 6e 64 2d 6d 65 74 61 64 61 74 61	ntries.(dirvish--append-metadata
13020	20 27 66 69 6c 65 20 64 69 72 76 69 73 68 2d 2d 68 69 73 74 6f 72 79 29 29 0a 20 20 20 20 20 20	.'file.dirvish--history)).......
13040	20 20 20 28 72 65 73 75 6c 74 20 28 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 20 22 52 65 63	...(result.(completing-read."Rec
13060	65 6e 74 6c 79 20 76 69 73 69 74 65 64 3a 20 22 20 65 6e 74 72 69 65 73 29 29 29 0a 20 20 20 20	ently.visited:.".entries))).....
13080	20 20 28 77 68 65 6e 20 72 65 73 75 6c 74 20 28 64 69 72 76 69 73 68 2d 66 69 6e 64 2d 65 6e 74	..(when.result.(dirvish-find-ent
130a0	72 79 2d 61 20 72 65 73 75 6c 74 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a	ry-a.result))))..;;;###autoload.
130c0	28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 68 69 73 74 6f 72 79 2d 6c 61 73 74 20 28 29 0a 20	(defun.dirvish-history-last.()..
130e0	20 22 53 77 69 74 63 68 20 74 6f 20 74 68 65 20 6d 6f 73 74 20 72 65 63 65 6e 74 6c 79 20 76 69	."Switch.to.the.most.recently.vi
13100	73 69 74 65 64 20 64 69 72 76 69 73 68 20 62 75 66 66 65 72 2e 22 0a 20 20 28 69 6e 74 65 72 61	sited.dirvish.buffer."...(intera
13120	63 74 69 76 65 29 0a 20 20 28 75 6e 6c 65 73 73 20 64 69 72 76 69 73 68 2d 2d 68 69 73 74 6f 72	ctive)...(unless.dirvish--histor
13140	79 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 44 69 72 76 69 73 68 5b 65 72 72 6f 72 5d 3a 20 6e	y.(user-error."Dirvish[error]:.n
13160	6f 20 68 69 73 74 6f 72 79 20 65 6e 74 72 69 65 73 22 29 29 0a 20 20 28 6c 65 74 20 28 28 6d 61	o.history.entries"))...(let.((ma
13180	74 63 68 0a 20 20 20 20 20 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 0a 20 20 20 20 20 20 20 20 20 20	tch..........(cl-loop...........
131a0	77 69 74 68 20 6c 6f 63 61 6c 2d 65 6e 74 72 69 65 73 20 3d 20 28 6d 61 70 63 61 72 20 23 27 63	with.local-entries.=.(mapcar.#'c
131c0	61 72 20 28 64 76 2d 72 6f 6f 74 73 20 28 64 69 72 76 69 73 68 2d 63 75 72 72 29 29 29 0a 20 20	ar.(dv-roots.(dirvish-curr)))...
131e0	20 20 20 20 20 20 20 20 66 6f 72 20 65 6e 74 72 79 20 69 6e 20 64 69 72 76 69 73 68 2d 2d 68 69	........for.entry.in.dirvish--hi
13200	73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 74 68 65 72 65 69 73 20 28 61 6e 64 20 28 6d 65	story...........thereis.(and.(me
13220	6d 62 65 72 20 65 6e 74 72 79 20 6c 6f 63 61 6c 2d 65 6e 74 72 69 65 73 29 0a 20 20 20 20 20 20	mber.entry.local-entries).......
13240	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 65 71 75 61 6c 20 65 6e 74	.................(not.(equal.ent
13260	72 79 20 28 64 69 72 65 64 2d 63 75 72 72 65 6e 74 2d 64 69 72 65 63 74 6f 72 79 29 29 29 20 65	ry.(dired-current-directory))).e
13280	6e 74 72 79 29 29 29 29 0a 20 20 20 20 28 61 6e 64 20 6d 61 74 63 68 20 28 64 69 72 76 69 73 68	ntry)))).....(and.match.(dirvish
132a0	2d 66 69 6e 64 2d 65 6e 74 72 79 2d 61 20 6d 61 74 63 68 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61	-find-entry-a.match))))..;;;###a
132c0	75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 68 69 73 74 6f 72 79 2d 67	utoload.(defun.dirvish-history-g
132e0	6f 2d 66 6f 72 77 61 72 64 20 28 61 72 67 29 0a 20 20 22 4e 61 76 69 67 61 74 65 20 74 6f 20 6e	o-forward.(arg)..."Navigate.to.n
13300	65 78 74 20 41 52 47 20 64 69 72 65 63 74 6f 72 79 20 69 6e 20 68 69 73 74 6f 72 79 2e 0a 41 52	ext.ARG.directory.in.history..AR
13320	47 20 64 65 66 61 75 6c 74 73 20 74 6f 20 31 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65	G.defaults.to.1."...(interactive
13340	20 22 5e 70 22 29 0a 20 20 28 6c 65 74 2a 20 28 28 64 76 20 28 6f 72 20 28 64 69 72 76 69 73 68	."^p")...(let*.((dv.(or.(dirvish
13360	2d 63 75 72 72 29 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 4e 6f 74 20 69 6e 20 61 20 64 69 72	-curr).(user-error."Not.in.a.dir
13380	76 69 73 68 20 73 65 73 73 69 6f 6e 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 64 69 72 73 20	vish.session")))..........(dirs.
133a0	28 72 65 76 65 72 73 65 20 28 6d 61 70 63 61 72 20 23 27 63 61 72 20 28 64 76 2d 72 6f 6f 74 73	(reverse.(mapcar.#'car.(dv-roots
133c0	20 64 76 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 6c 65 6e 20 28 6c 65 6e 67 74 68 20 64 69	.dv))))..........(len.(length.di
133e0	72 73 29 29 0a 20 20 20 20 20 20 20 20 20 28 69 64 78 20 28 63 6c 2d 70 6f 73 69 74 69 6f 6e 20	rs))..........(idx.(cl-position.
13400	28 63 61 72 20 28 64 76 2d 69 6e 64 65 78 20 64 76 29 29 20 64 69 72 73 20 3a 74 65 73 74 20 23	(car.(dv-index.dv)).dirs.:test.#
13420	27 65 71 75 61 6c 29 29 0a 20 20 20 20 20 20 20 20 20 28 6e 65 77 2d 69 64 78 20 28 2b 20 69 64	'equal))..........(new-idx.(+.id
13440	78 20 61 72 67 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 20 28 28 3e 3d 20 6e 65 77 2d 69 64 78 20	x.arg))).....(cond.((>=.new-idx.
13460	6c 65 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 66 69 6e 64 2d 65 6e	len)............(dirvish-find-en
13480	74 72 79 2d 61 20 28 6e 74 68 20 28 2d 20 6c 65 6e 20 31 29 20 64 69 72 73 29 29 0a 20 20 20 20	try-a.(nth.(-.len.1).dirs)).....
134a0	20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 44 69 72 76 69 73 68 3a 20 72 65 61 63 68 65	.......(message."Dirvish:.reache
134c0	64 20 74 68 65 20 65 6e 64 20 6f 66 20 68 69 73 74 6f 72 79 22 29 29 0a 20 20 20 20 20 20 20 20	d.the.end.of.history")).........
134e0	20 20 28 28 3c 20 6e 65 77 2d 69 64 78 20 30 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72	..((<.new-idx.0)............(dir
13500	76 69 73 68 2d 66 69 6e 64 2d 65 6e 74 72 79 2d 61 20 28 6e 74 68 20 30 20 64 69 72 73 29 29 0a	vish-find-entry-a.(nth.0.dirs)).
13520	20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 44 69 72 76 69 73 68 3a 20 72 65	...........(message."Dirvish:.re
13540	61 63 68 65 64 20 74 68 65 20 62 65 67 69 6e 6e 69 6e 67 20 6f 66 20 68 69 73 74 6f 72 79 22 29	ached.the.beginning.of.history")
13560	29 0a 20 20 20 20 20 20 20 20 20 20 28 74 20 28 64 69 72 76 69 73 68 2d 66 69 6e 64 2d 65 6e 74	)...........(t.(dirvish-find-ent
13580	72 79 2d 61 20 28 6e 74 68 20 6e 65 77 2d 69 64 78 20 64 69 72 73 29 29 29 29 29 29 0a 0a 3b 3b	ry-a.(nth.new-idx.dirs))))))..;;
135a0	3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 68 69 73 74	;###autoload.(defun.dirvish-hist
135c0	6f 72 79 2d 67 6f 2d 62 61 63 6b 77 61 72 64 20 28 61 72 67 29 0a 20 20 22 4e 61 76 69 67 61 74	ory-go-backward.(arg)..."Navigat
135e0	65 20 74 6f 20 70 72 65 76 69 6f 75 73 20 41 52 47 20 64 69 72 65 63 74 6f 72 79 20 69 6e 20 68	e.to.previous.ARG.directory.in.h
13600	69 73 74 6f 72 79 2e 0a 41 52 47 20 64 65 66 61 75 6c 74 73 20 74 6f 20 31 2e 22 0a 20 20 28 69	istory..ARG.defaults.to.1."...(i
13620	6e 74 65 72 61 63 74 69 76 65 20 22 5e 70 22 29 0a 20 20 28 64 69 72 76 69 73 68 2d 68 69 73 74	nteractive."^p")...(dirvish-hist
13640	6f 72 79 2d 67 6f 2d 66 6f 72 77 61 72 64 20 28 2d 20 30 20 61 72 67 29 29 29 0a 0a 3b 3b 3b 23	ory-go-forward.(-.0.arg)))..;;;#
13660	23 23 61 75 74 6f 6c 6f 61 64 20 28 61 75 74 6f 6c 6f 61 64 20 27 64 69 72 76 69 73 68 2d 68 69	##autoload.(autoload.'dirvish-hi
13680	73 74 6f 72 79 2d 6d 65 6e 75 20 22 64 69 72 76 69 73 68 2d 68 69 73 74 6f 72 79 22 20 6e 69 6c	story-menu."dirvish-history".nil
136a0	20 74 29 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 70 72 65 66 69 78 20 64 69 72	.t).(transient-define-prefix.dir
136c0	76 69 73 68 2d 68 69 73 74 6f 72 79 2d 6d 65 6e 75 20 28 29 0a 20 20 22 48 65 6c 70 20 6d 65 6e	vish-history-menu.()..."Help.men
136e0	75 20 66 6f 72 20 60 64 69 72 76 69 73 68 2d 68 69 73 74 6f 72 79 2d 2a 27 20 63 6f 6d 6d 61 6e	u.for.`dirvish-history-*'.comman
13700	64 73 2e 22 0a 20 20 5b 3a 64 65 73 63 72 69 70 74 69 6f 6e 0a 20 20 20 28 6c 61 6d 62 64 61 20	ds."...[:description....(lambda.
13720	28 29 20 28 64 69 72 76 69 73 68 2d 2d 66 6f 72 6d 61 74 2d 6d 65 6e 75 2d 68 65 61 64 69 6e 67	().(dirvish--format-menu-heading
13740	20 22 47 6f 20 74 6f 20 68 69 73 74 6f 72 79 20 65 6e 74 72 69 65 73 22 29 29 0a 20 20 20 28 22	."Go.to.history.entries"))....("
13760	66 22 20 22 46 6f 72 77 61 72 64 20 68 69 73 74 6f 72 79 22 20 20 20 20 20 20 20 20 64 69 72 76	f"."Forward.history"........dirv
13780	69 73 68 2d 68 69 73 74 6f 72 79 2d 67 6f 2d 66 6f 72 77 61 72 64 20 3a 74 72 61 6e 73 69 65 6e	ish-history-go-forward.:transien
137a0	74 20 74 29 0a 20 20 20 28 22 62 22 20 22 42 61 63 6b 77 61 72 64 20 68 69 73 74 6f 72 79 22 20	t.t)....("b"."Backward.history".
137c0	20 20 20 20 20 20 64 69 72 76 69 73 68 2d 68 69 73 74 6f 72 79 2d 67 6f 2d 62 61 63 6b 77 61 72	......dirvish-history-go-backwar
137e0	64 20 3a 74 72 61 6e 73 69 65 6e 74 20 74 29 0a 20 20 20 28 22 6c 22 20 22 47 6f 20 74 6f 20 6d	d.:transient.t)....("l"."Go.to.m
13800	6f 73 74 20 72 65 63 65 6e 74 20 75 73 65 64 22 20 64 69 72 76 69 73 68 2d 68 69 73 74 6f 72 79	ost.recent.used".dirvish-history
13820	2d 6c 61 73 74 29 0a 20 20 20 28 22 61 22 20 22 41 63 63 65 73 73 20 68 69 73 74 6f 72 79 20 65	-last)....("a"."Access.history.e
13840	6e 74 72 69 65 73 22 20 64 69 72 76 69 73 68 2d 68 69 73 74 6f 72 79 2d 6a 75 6d 70 29 5d 29 0a	ntries".dirvish-history-jump)]).
13860	0a 28 70 72 6f 76 69 64 65 20 27 64 69 72 76 69 73 68 2d 68 69 73 74 6f 72 79 29 0a 3b 3b 3b 20	.(provide.'dirvish-history).;;;.
13880	64 69 72 76 69 73 68 2d 68 69 73 74 6f 72 79 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00	dirvish-history.el.ends.here....
138a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
138c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
138e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
13900	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
13920	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
13940	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
13960	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
13980	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
139a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
139c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
139e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
13a00	64 69 72 76 69 73 68 2d 32 30 32 33 30 35 31 39 2e 31 35 30 30 2f 64 69 72 76 69 73 68 2d 69 63	dirvish-20230519.1500/dirvish-ic
13a20	6f 6e 73 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	ons.el..........................
13a40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
13a60	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
13a80	30 30 31 33 35 37 36 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 35 37 33 00 20 30 00 00 00	0013576.00000000000.015573..0...
13aa0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
13ac0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
13ae0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
13b00	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...................
13b20	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...................
13b40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
13b60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
13b80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
13ba0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
13bc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
13be0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
13c00	3b 3b 3b 20 64 69 72 76 69 73 68 2d 69 63 6f 6e 73 2e 65 6c 20 2d 2d 2d 20 49 63 6f 6e 20 73 75	;;;.dirvish-icons.el.---.Icon.su
13c20	70 70 6f 72 74 20 66 6f 72 20 44 69 72 76 69 73 68 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69	pport.for.Dirvish.-*-.lexical-bi
13c40	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 28 43 29 20 32	nding:.t.-*-..;;.Copyright.(C).2
13c60	30 32 31 2d 32 30 32 32 20 41 6c 65 78 20 4c 75 0a 3b 3b 20 41 75 74 68 6f 72 20 3a 20 41 6c 65	021-2022.Alex.Lu.;;.Author.:.Ale
13c80	78 20 4c 75 20 3c 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 61 6c 65 78 6c 75 69	x.Lu.<https://github.com/alexlui
13ca0	67 69 74 3e 0a 3b 3b 20 56 65 72 73 69 6f 6e 3a 20 32 2e 30 2e 35 33 0a 3b 3b 20 4b 65 79 77 6f	git>.;;.Version:.2.0.53.;;.Keywo
13cc0	72 64 73 3a 20 66 69 6c 65 73 2c 20 63 6f 6e 76 65 6e 69 65 6e 63 65 0a 3b 3b 20 48 6f 6d 65 70	rds:.files,.convenience.;;.Homep
13ce0	61 67 65 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 61 6c 65 78 6c 75 69 67	age:.https://github.com/alexluig
13d00	69 74 2f 64 69 72 76 69 73 68 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d 49 64 65 6e 74	it/dirvish.;;.SPDX-License-Ident
13d20	69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 65 72 0a 0a 3b 3b 3b 20 43 6f 6d	ifier:.GPL-3.0-or-later..;;;.Com
13d40	6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 20 49 6e 74 65 67 72 61 74 65 20 60 61 6c 6c 2d 74 68 65 2d	mentary:..;;.Integrate.`all-the-
13d60	69 63 6f 6e 73 27 2c 20 60 6e 65 72 64 2d 69 63 6f 6e 73 27 2c 20 61 6e 64 20 60 76 73 63 6f 64	icons',.`nerd-icons',.and.`vscod
13d80	65 2d 69 63 6f 6e 27 20 77 69 74 68 20 44 69 72 76 69 73 68 2e 0a 0a 3b 3b 3b 20 43 6f 64 65 3a	e-icon'.with.Dirvish...;;;.Code:
13da0	0a 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e	..(declare-function.all-the-icon
13dc0	73 2d 69 63 6f 6e 2d 66 6f 72 2d 66 69 6c 65 20 22 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 22 29	s-icon-for-file."all-the-icons")
13de0	0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73	.(declare-function.all-the-icons
13e00	2d 69 63 6f 6e 2d 66 6f 72 2d 64 69 72 20 22 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 22 29 0a 28	-icon-for-dir."all-the-icons").(
13e20	64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 6e 65 72 64 2d 69 63 6f 6e 73 2d 69 63 6f 6e	declare-function.nerd-icons-icon
13e40	2d 66 6f 72 2d 66 69 6c 65 20 22 6e 65 72 64 2d 69 63 6f 6e 73 22 29 0a 28 64 65 63 6c 61 72 65	-for-file."nerd-icons").(declare
13e60	2d 66 75 6e 63 74 69 6f 6e 20 6e 65 72 64 2d 69 63 6f 6e 73 2d 69 63 6f 6e 2d 66 6f 72 2d 64 69	-function.nerd-icons-icon-for-di
13e80	72 20 22 6e 65 72 64 2d 69 63 6f 6e 73 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f	r."nerd-icons").(declare-functio
13ea0	6e 20 76 73 63 6f 64 65 2d 69 63 6f 6e 2d 63 61 6e 2d 73 63 61 6c 65 2d 69 6d 61 67 65 2d 70 20	n.vscode-icon-can-scale-image-p.
13ec0	22 76 73 63 6f 64 65 2d 69 63 6f 6e 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e	"vscode-icon").(declare-function
13ee0	20 76 73 63 6f 64 65 2d 69 63 6f 6e 2d 66 69 6c 65 20 22 76 73 63 6f 64 65 2d 69 63 6f 6e 22 29	.vscode-icon-file."vscode-icon")
13f00	0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 76 73 63 6f 64 65 2d 69 63 6f 6e 2d 64	.(declare-function.vscode-icon-d
13f20	69 72 2d 65 78 69 73 74 73 2d 70 20 22 76 73 63 6f 64 65 2d 69 63 6f 6e 22 29 0a 28 64 65 63 6c	ir-exists-p."vscode-icon").(decl
13f40	61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 76 73 63 6f 64 65 2d 69 63 6f 6e 2d 63 72 65 61 74 65 2d	are-function.vscode-icon-create-
13f60	69 6d 61 67 65 20 22 76 73 63 6f 64 65 2d 69 63 6f 6e 22 29 0a 28 64 65 66 76 61 72 20 76 73 63	image."vscode-icon").(defvar.vsc
13f80	6f 64 65 2d 69 63 6f 6e 2d 73 69 7a 65 29 0a 28 64 65 66 76 61 72 20 76 73 63 6f 64 65 2d 69 63	ode-icon-size).(defvar.vscode-ic
13fa0	6f 6e 2d 64 69 72 2d 61 6c 69 73 74 29 0a 28 64 65 66 76 61 72 20 76 73 63 6f 64 65 2d 69 63 6f	on-dir-alist).(defvar.vscode-ico
13fc0	6e 2d 64 69 72 29 0a 28 72 65 71 75 69 72 65 20 27 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 20 6e	n-dir).(require.'all-the-icons.n
13fe0	69 6c 20 74 29 0a 28 72 65 71 75 69 72 65 20 27 76 73 63 6f 64 65 2d 69 63 6f 6e 20 6e 69 6c 20	il.t).(require.'vscode-icon.nil.
14000	74 29 0a 28 72 65 71 75 69 72 65 20 27 64 69 72 76 69 73 68 29 0a 0a 28 64 65 66 76 61 72 20 64	t).(require.'dirvish)..(defvar.d
14020	69 72 76 69 73 68 2d 2d 76 73 63 6f 64 65 2d 69 63 6f 6e 2d 64 69 72 65 63 74 6f 72 79 0a 20 20	irvish--vscode-icon-directory...
14040	28 63 6f 6e 63 61 74 20 28 61 6e 64 20 28 62 6f 75 6e 64 70 20 27 76 73 63 6f 64 65 2d 69 63 6f	(concat.(and.(boundp.'vscode-ico
14060	6e 2d 64 69 72 29 20 76 73 63 6f 64 65 2d 69 63 6f 6e 2d 64 69 72 29 0a 20 20 20 20 20 20 20 20	n-dir).vscode-icon-dir).........
14080	20 20 28 69 66 20 28 61 6e 64 20 28 66 62 6f 75 6e 64 70 20 27 76 73 63 6f 64 65 2d 69 63 6f 6e	..(if.(and.(fboundp.'vscode-icon
140a0	2d 63 61 6e 2d 73 63 61 6c 65 2d 69 6d 61 67 65 2d 70 29 20 28 76 73 63 6f 64 65 2d 69 63 6f 6e	-can-scale-image-p).(vscode-icon
140c0	2d 63 61 6e 2d 73 63 61 6c 65 2d 69 6d 61 67 65 2d 70 29 29 20 22 31 32 38 2f 22 20 22 32 33 2f	-can-scale-image-p))."128/"."23/
140e0	22 29 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 69 63 6f 6e 2d 64 65	")))..(defcustom.dirvish-icon-de
14100	6c 69 6d 69 74 65 72 20 22 20 22 0a 20 20 22 41 20 73 74 72 69 6e 67 20 61 74 74 61 63 68 65 64	limiter."."..."A.string.attached
14120	20 74 6f 20 74 68 65 20 69 63 6f 6e 20 28 66 6f 72 20 62 6f 74 68 20 62 61 63 6b 65 6e 64 73 29	.to.the.icon.(for.both.backends)
14140	2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 20 3a 74 79 70 65 20 27 73 74 72 69	."...:group.'dirvish.:type.'stri
14160	6e 67 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 61 6c 6c 2d 74 68 65 2d	ng)..(defcustom.dirvish-all-the-
14180	69 63 6f 6e 73 2d 6f 66 66 73 65 74 20 30 2e 30 31 0a 20 20 22 49 63 6f 6e 27 73 20 76 65 72 74	icons-offset.0.01..."Icon's.vert
141a0	69 63 61 6c 20 6f 66 66 73 65 74 20 75 73 65 64 20 66 6f 72 20 60 61 6c 6c 2d 74 68 65 2d 69 63	ical.offset.used.for.`all-the-ic
141c0	6f 6e 73 27 20 62 61 63 6b 65 6e 64 2e 0a 53 65 74 20 69 74 20 74 6f 20 6e 69 6c 20 74 6f 20 75	ons'.backend..Set.it.to.nil.to.u
141e0	73 65 20 74 68 65 20 64 65 66 61 75 6c 74 20 6f 66 66 73 65 74 20 66 72 6f 6d 20 60 61 6c 6c 2d	se.the.default.offset.from.`all-
14200	74 68 65 2d 69 63 6f 6e 73 27 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 20 3a	the-icons'."...:group.'dirvish.:
14220	74 79 70 65 20 27 28 63 68 6f 69 63 65 20 28 66 6c 6f 61 74 20 6e 69 6c 29 29 29 0a 0a 28 64 65	type.'(choice.(float.nil)))..(de
14240	66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 2d 68 65	fcustom.dirvish-all-the-icons-he
14260	69 67 68 74 20 6e 69 6c 0a 20 20 22 49 63 6f 6e 20 68 65 69 67 68 74 20 75 73 65 64 20 66 6f 72	ight.nil..."Icon.height.used.for
14280	20 60 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 27 20 62 61 63 6b 65 6e 64 2e 0a 54 68 65 20 68 65	.`all-the-icons'.backend..The.he
142a0	69 67 68 74 20 6f 66 20 74 68 65 20 69 63 6f 6e 20 69 73 20 73 63 61 6c 65 64 20 74 6f 20 74 68	ight.of.the.icon.is.scaled.to.th
142c0	69 73 20 76 61 6c 75 65 20 28 74 72 79 20 30 2e 38 29 2e 0a 53 65 74 20 69 74 20 74 6f 20 6e 69	is.value.(try.0.8)..Set.it.to.ni
142e0	6c 20 74 6f 20 75 73 65 20 74 68 65 20 64 65 66 61 75 6c 74 20 68 65 69 67 68 74 20 66 72 6f 6d	l.to.use.the.default.height.from
14300	20 60 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 27 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72	.`all-the-icons'."...:group.'dir
14320	76 69 73 68 20 3a 74 79 70 65 20 27 28 63 68 6f 69 63 65 20 28 66 6c 6f 61 74 20 6e 69 6c 29 29	vish.:type.'(choice.(float.nil))
14340	29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 61 6c 6c 2d 74 68 65 2d 69 63	)..(defcustom.dirvish-all-the-ic
14360	6f 6e 73 2d 70 61 6c 65 74 74 65 20 27 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 0a 20 20 22 43 6f	ons-palette.'all-the-icons..."Co
14380	6c 6f 72 69 6e 67 20 73 74 79 6c 65 20 75 73 65 64 20 66 6f 72 20 66 69 6c 65 20 60 61 6c 6c 2d	loring.style.used.for.file.`all-
143a0	74 68 65 2d 69 63 6f 6e 73 27 20 62 61 63 6b 65 6e 64 2e 0a 56 61 6c 75 65 73 20 61 72 65 20 69	the-icons'.backend..Values.are.i
143c0	6e 74 65 72 70 72 65 74 65 64 20 61 73 20 66 6f 6c 6c 6f 77 73 3a 0a 2d 20 61 6c 6c 2d 74 68 65	nterpreted.as.follows:.-.all-the
143e0	2d 69 63 6f 6e 73 2c 20 6d 65 61 6e 69 6e 67 20 6c 65 74 20 60 61 6c 6c 2d 74 68 65 2d 69 63 6f	-icons,.meaning.let.`all-the-ico
14400	6e 73 2e 65 6c 27 20 74 6f 20 64 6f 20 74 68 65 20 63 6f 6c 6f 72 69 6e 67 2e 0a 2d 20 41 20 66	ns.el'.to.do.the.coloring..-.A.f
14420	61 63 65 20 74 68 61 74 20 69 73 20 75 73 65 64 20 66 6f 72 20 61 6c 6c 20 74 68 65 20 69 63 6f	ace.that.is.used.for.all.the.ico
14440	6e 73 2e 0a 2d 20 6e 69 6c 2c 20 69 6e 68 65 72 69 74 20 66 61 63 65 20 61 74 20 70 6f 69 6e 74	ns..-.nil,.inherit.face.at.point
14460	2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 20 3a 74 79 70 65 20 27 28 63 68 6f	."...:group.'dirvish.:type.'(cho
14480	69 63 65 20 66 61 63 65 20 73 79 6d 62 6f 6c 20 6e 69 6c 29 29 0a 0a 28 64 65 66 63 75 73 74 6f	ice.face.symbol.nil))..(defcusto
144a0	6d 20 64 69 72 76 69 73 68 2d 6e 65 72 64 2d 69 63 6f 6e 73 2d 6f 66 66 73 65 74 20 30 2e 30 30	m.dirvish-nerd-icons-offset.0.00
144c0	0a 20 20 22 49 63 6f 6e 27 73 20 76 65 72 74 69 63 61 6c 20 6f 66 66 73 65 74 20 75 73 65 64 20	..."Icon's.vertical.offset.used.
144e0	66 6f 72 20 60 6e 65 72 64 2d 69 63 6f 6e 73 27 20 62 61 63 6b 65 6e 64 2e 0a 53 65 74 20 69 74	for.`nerd-icons'.backend..Set.it
14500	20 74 6f 20 6e 69 6c 20 74 6f 20 75 73 65 20 74 68 65 20 64 65 66 61 75 6c 74 20 6f 66 66 73 65	.to.nil.to.use.the.default.offse
14520	74 20 66 72 6f 6d 20 60 6e 65 72 64 2d 69 63 6f 6e 73 27 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27	t.from.`nerd-icons'."...:group.'
14540	64 69 72 76 69 73 68 20 3a 74 79 70 65 20 27 28 63 68 6f 69 63 65 20 28 66 6c 6f 61 74 20 6e 69	dirvish.:type.'(choice.(float.ni
14560	6c 29 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 6e 65 72 64 2d 69 63	l)))..(defcustom.dirvish-nerd-ic
14580	6f 6e 73 2d 68 65 69 67 68 74 20 6e 69 6c 0a 20 20 22 49 63 6f 6e 20 68 65 69 67 68 74 20 75 73	ons-height.nil..."Icon.height.us
145a0	65 64 20 66 6f 72 20 60 6e 65 72 64 2d 69 63 6f 6e 73 27 20 62 61 63 6b 65 6e 64 2e 0a 54 68 65	ed.for.`nerd-icons'.backend..The
145c0	20 68 65 69 67 68 74 20 6f 66 20 74 68 65 20 69 63 6f 6e 20 69 73 20 73 63 61 6c 65 64 20 74 6f	.height.of.the.icon.is.scaled.to
145e0	20 74 68 69 73 20 76 61 6c 75 65 20 28 74 72 79 20 30 2e 38 29 2e 0a 53 65 74 20 69 74 20 74 6f	.this.value.(try.0.8)..Set.it.to
14600	20 6e 69 6c 20 74 6f 20 75 73 65 20 74 68 65 20 64 65 66 61 75 6c 74 20 68 65 69 67 68 74 20 66	.nil.to.use.the.default.height.f
14620	72 6f 6d 20 60 6e 65 72 64 2d 69 63 6f 6e 73 27 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72	rom.`nerd-icons'."...:group.'dir
14640	76 69 73 68 20 3a 74 79 70 65 20 27 28 63 68 6f 69 63 65 20 28 66 6c 6f 61 74 20 6e 69 6c 29 29	vish.:type.'(choice.(float.nil))
14660	29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 6e 65 72 64 2d 69 63 6f 6e 73	)..(defcustom.dirvish-nerd-icons
14680	2d 70 61 6c 65 74 74 65 20 27 6e 65 72 64 2d 69 63 6f 6e 73 0a 20 20 22 43 6f 6c 6f 72 69 6e 67	-palette.'nerd-icons..."Coloring
146a0	20 73 74 79 6c 65 20 75 73 65 64 20 66 6f 72 20 66 69 6c 65 20 60 6e 65 72 64 2d 69 63 6f 6e 73	.style.used.for.file.`nerd-icons
146c0	27 20 62 61 63 6b 65 6e 64 2e 0a 56 61 6c 75 65 73 20 61 72 65 20 69 6e 74 65 72 70 72 65 74 65	'.backend..Values.are.interprete
146e0	64 20 61 73 20 66 6f 6c 6c 6f 77 73 3a 0a 2d 20 6e 65 72 64 2d 69 63 6f 6e 73 2c 20 6d 65 61 6e	d.as.follows:.-.nerd-icons,.mean
14700	69 6e 67 20 6c 65 74 20 60 6e 65 72 64 2d 69 63 6f 6e 73 2e 65 6c 27 20 74 6f 20 64 6f 20 74 68	ing.let.`nerd-icons.el'.to.do.th
14720	65 20 63 6f 6c 6f 72 69 6e 67 2e 0a 2d 20 41 20 66 61 63 65 20 74 68 61 74 20 69 73 20 75 73 65	e.coloring..-.A.face.that.is.use
14740	64 20 66 6f 72 20 61 6c 6c 20 74 68 65 20 69 63 6f 6e 73 2e 0a 2d 20 6e 69 6c 2c 20 69 6e 68 65	d.for.all.the.icons..-.nil,.inhe
14760	72 69 74 20 66 61 63 65 20 61 74 20 70 6f 69 6e 74 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69	rit.face.at.point."...:group.'di
14780	72 76 69 73 68 20 3a 74 79 70 65 20 27 28 63 68 6f 69 63 65 20 66 61 63 65 20 73 79 6d 62 6f 6c	rvish.:type.'(choice.face.symbol
147a0	20 6e 69 6c 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 76 73 63 6f 64	.nil))..(defcustom.dirvish-vscod
147c0	65 2d 69 63 6f 6e 2d 73 69 7a 65 20 33 32 0a 20 20 22 49 63 6f 6e 20 28 69 6d 61 67 65 20 70 69	e-icon-size.32..."Icon.(image.pi
147e0	78 65 6c 29 20 73 69 7a 65 20 75 73 65 64 20 66 6f 72 20 60 76 73 63 6f 64 65 2d 69 63 6f 6e 27	xel).size.used.for.`vscode-icon'
14800	20 62 61 63 6b 65 6e 64 2e 0a 54 68 65 20 76 61 6c 75 65 20 73 68 6f 75 6c 64 20 62 65 20 61 20	.backend..The.value.should.be.a.
14820	69 6e 74 65 67 65 72 20 62 65 74 77 65 65 6e 20 32 33 20 74 6f 20 31 32 38 2e 22 0a 20 20 3a 67	integer.between.23.to.128."...:g
14840	72 6f 75 70 20 27 64 69 72 76 69 73 68 20 3a 74 79 70 65 20 27 69 6e 74 65 67 65 72 29 0a 0a 28	roup.'dirvish.:type.'integer)..(
14860	64 69 72 76 69 73 68 2d 64 65 66 69 6e 65 2d 61 74 74 72 69 62 75 74 65 20 61 6c 6c 2d 74 68 65	dirvish-define-attribute.all-the
14880	2d 69 63 6f 6e 73 0a 20 20 22 46 69 6c 65 20 69 63 6f 6e 73 20 70 72 6f 76 69 64 65 64 20 62 79	-icons..."File.icons.provided.by
148a0	20 60 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 2e 65 6c 27 2e 22 0a 20 20 3a 77 69 64 74 68 20 28	.`all-the-icons.el'."...:width.(
148c0	2b 20 28 6c 65 6e 67 74 68 20 64 69 72 76 69 73 68 2d 69 63 6f 6e 2d 64 65 6c 69 6d 69 74 65 72	+.(length.dirvish-icon-delimiter
148e0	29 20 32 29 0a 20 20 28 6c 65 74 2a 20 28 28 6f 66 66 73 65 74 20 60 28 3a 76 2d 61 64 6a 75 73	).2)...(let*.((offset.`(:v-adjus
14900	74 20 2c 64 69 72 76 69 73 68 2d 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 2d 6f 66 66 73 65 74 29	t.,dirvish-all-the-icons-offset)
14920	29 0a 20 20 20 20 20 20 20 20 20 28 68 65 69 67 68 74 20 60 28 3a 68 65 69 67 68 74 20 2c 64 69	)..........(height.`(:height.,di
14940	72 76 69 73 68 2d 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 2d 68 65 69 67 68 74 29 29 0a 20 20 20	rvish-all-the-icons-height))....
14960	20 20 20 20 20 20 28 66 61 63 65 20 28 63 6f 6e 64 20 28 68 6c 2d 66 61 63 65 20 60 28 3a 66 61	......(face.(cond.(hl-face.`(:fa
14980	63 65 20 2c 68 6c 2d 66 61 63 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ce.,hl-face))...................
149a0	20 20 20 28 28 65 71 20 64 69 72 76 69 73 68 2d 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 2d 70 61	...((eq.dirvish-all-the-icons-pa
149c0	6c 65 74 74 65 20 27 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 29 20 6e 69 6c 29 0a 20 20 20 20 20	lette.'all-the-icons).nil)......
149e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 20 60 28 3a 66 61 63 65 20 2c 64 69 72 76	................(t.`(:face.,dirv
14a00	69 73 68 2d 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 2d 70 61 6c 65 74 74 65 29 29 29 29 0a 20 20	ish-all-the-icons-palette))))...
14a20	20 20 20 20 20 20 20 28 69 63 6f 6e 2d 61 74 74 72 73 20 28 61 70 70 65 6e 64 20 66 61 63 65 20	.......(icon-attrs.(append.face.
14a40	6f 66 66 73 65 74 20 68 65 69 67 68 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 69 63 6f 6e 20 28	offset.height))..........(icon.(
14a60	69 66 20 28 65 71 20 28 63 61 72 20 66 2d 74 79 70 65 29 20 27 64 69 72 29 0a 20 20 20 20 20 20	if.(eq.(car.f-type).'dir).......
14a80	20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 70 70 6c 79 20 23 27 61 6c 6c 2d 74 68 65 2d 69 63	.............(apply.#'all-the-ic
14aa0	6f 6e 73 2d 69 63 6f 6e 2d 66 6f 72 2d 64 69 72 20 66 2d 6e 61 6d 65 20 69 63 6f 6e 2d 61 74 74	ons-icon-for-dir.f-name.icon-att
14ac0	72 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 70 70 6c 79 20 23 27 61 6c	rs)..................(apply.#'al
14ae0	6c 2d 74 68 65 2d 69 63 6f 6e 73 2d 69 63 6f 6e 2d 66 6f 72 2d 66 69 6c 65 20 66 2d 73 74 72 20	l-the-icons-icon-for-file.f-str.
14b00	69 63 6f 6e 2d 61 74 74 72 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 69 63 6f 6e 2d 73 74 72	icon-attrs)))..........(icon-str
14b20	20 28 63 6f 6e 63 61 74 20 69 63 6f 6e 20 28 70 72 6f 70 65 72 74 69 7a 65 20 64 69 72 76 69 73	.(concat.icon.(propertize.dirvis
14b40	68 2d 69 63 6f 6e 2d 64 65 6c 69 6d 69 74 65 72 20 27 66 61 63 65 20 68 6c 2d 66 61 63 65 29 29	h-icon-delimiter.'face.hl-face))
14b60	29 0a 20 20 20 20 20 20 20 20 20 28 6f 76 20 28 6d 61 6b 65 2d 6f 76 65 72 6c 61 79 20 28 31 2d	)..........(ov.(make-overlay.(1-
14b80	20 66 2d 62 65 67 29 20 66 2d 62 65 67 29 29 29 0a 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75	.f-beg).f-beg))).....(overlay-pu
14ba0	74 20 6f 76 20 27 61 66 74 65 72 2d 73 74 72 69 6e 67 20 69 63 6f 6e 2d 73 74 72 29 0a 20 20 20	t.ov.'after-string.icon-str)....
14bc0	20 60 28 6f 76 20 2e 20 2c 6f 76 29 29 29 0a 0a 28 64 69 72 76 69 73 68 2d 64 65 66 69 6e 65 2d	.`(ov...,ov)))..(dirvish-define-
14be0	61 74 74 72 69 62 75 74 65 20 6e 65 72 64 2d 69 63 6f 6e 73 0a 20 20 22 46 69 6c 65 20 69 63 6f	attribute.nerd-icons..."File.ico
14c00	6e 73 20 70 72 6f 76 69 64 65 64 20 62 79 20 60 6e 65 72 64 2d 69 63 6f 6e 73 2e 65 6c 27 2e 22	ns.provided.by.`nerd-icons.el'."
14c20	0a 20 20 3a 77 69 64 74 68 20 28 2b 20 28 6c 65 6e 67 74 68 20 64 69 72 76 69 73 68 2d 69 63 6f	...:width.(+.(length.dirvish-ico
14c40	6e 2d 64 65 6c 69 6d 69 74 65 72 29 20 32 29 0a 20 20 28 6c 65 74 2a 20 28 28 6f 66 66 73 65 74	n-delimiter).2)...(let*.((offset
14c60	20 60 28 3a 76 2d 61 64 6a 75 73 74 20 2c 64 69 72 76 69 73 68 2d 6e 65 72 64 2d 69 63 6f 6e 73	.`(:v-adjust.,dirvish-nerd-icons
14c80	2d 6f 66 66 73 65 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 68 65 69 67 68 74 20 60 28 3a 68 65	-offset))..........(height.`(:he
14ca0	69 67 68 74 20 2c 64 69 72 76 69 73 68 2d 6e 65 72 64 2d 69 63 6f 6e 73 2d 68 65 69 67 68 74 29	ight.,dirvish-nerd-icons-height)
14cc0	29 0a 20 20 20 20 20 20 20 20 20 28 66 61 63 65 20 28 63 6f 6e 64 20 28 68 6c 2d 66 61 63 65 20	)..........(face.(cond.(hl-face.
14ce0	60 28 3a 66 61 63 65 20 2c 68 6c 2d 66 61 63 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	`(:face.,hl-face))..............
14d00	20 20 20 20 20 20 20 20 28 28 65 71 20 64 69 72 76 69 73 68 2d 6e 65 72 64 2d 69 63 6f 6e 73 2d	........((eq.dirvish-nerd-icons-
14d20	70 61 6c 65 74 74 65 20 27 6e 65 72 64 2d 69 63 6f 6e 73 29 20 6e 69 6c 29 0a 20 20 20 20 20 20	palette.'nerd-icons).nil).......
14d40	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 20 60 28 3a 66 61 63 65 20 2c 64 69 72 76 69	...............(t.`(:face.,dirvi
14d60	73 68 2d 6e 65 72 64 2d 69 63 6f 6e 73 2d 70 61 6c 65 74 74 65 29 29 29 29 0a 20 20 20 20 20 20	sh-nerd-icons-palette)))).......
14d80	20 20 20 28 69 63 6f 6e 2d 61 74 74 72 73 20 28 61 70 70 65 6e 64 20 66 61 63 65 20 6f 66 66 73	...(icon-attrs.(append.face.offs
14da0	65 74 20 68 65 69 67 68 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 69 63 6f 6e 20 28 69 66 20 28	et.height))..........(icon.(if.(
14dc0	65 71 20 28 63 61 72 20 66 2d 74 79 70 65 29 20 27 64 69 72 29 0a 20 20 20 20 20 20 20 20 20 20	eq.(car.f-type).'dir)...........
14de0	20 20 20 20 20 20 20 20 20 28 61 70 70 6c 79 20 23 27 6e 65 72 64 2d 69 63 6f 6e 73 2d 69 63 6f	.........(apply.#'nerd-icons-ico
14e00	6e 2d 66 6f 72 2d 64 69 72 20 66 2d 6e 61 6d 65 20 69 63 6f 6e 2d 61 74 74 72 73 29 0a 20 20 20	n-for-dir.f-name.icon-attrs)....
14e20	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 70 70 6c 79 20 23 27 6e 65 72 64 2d 69 63 6f 6e	..............(apply.#'nerd-icon
14e40	73 2d 69 63 6f 6e 2d 66 6f 72 2d 66 69 6c 65 20 66 2d 73 74 72 20 69 63 6f 6e 2d 61 74 74 72 73	s-icon-for-file.f-str.icon-attrs
14e60	29 29 29 0a 20 20 20 20 20 20 20 20 20 28 69 63 6f 6e 2d 73 74 72 20 28 63 6f 6e 63 61 74 20 69	)))..........(icon-str.(concat.i
14e80	63 6f 6e 20 28 70 72 6f 70 65 72 74 69 7a 65 20 64 69 72 76 69 73 68 2d 69 63 6f 6e 2d 64 65 6c	con.(propertize.dirvish-icon-del
14ea0	69 6d 69 74 65 72 20 27 66 61 63 65 20 68 6c 2d 66 61 63 65 29 29 29 0a 20 20 20 20 20 20 20 20	imiter.'face.hl-face))).........
14ec0	20 28 6f 76 20 28 6d 61 6b 65 2d 6f 76 65 72 6c 61 79 20 28 31 2d 20 66 2d 62 65 67 29 20 66 2d	.(ov.(make-overlay.(1-.f-beg).f-
14ee0	62 65 67 29 29 29 0a 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 76 20 27 61 66 74 65	beg))).....(overlay-put.ov.'afte
14f00	72 2d 73 74 72 69 6e 67 20 69 63 6f 6e 2d 73 74 72 29 0a 20 20 20 20 60 28 6f 76 20 2e 20 2c 6f	r-string.icon-str).....`(ov...,o
14f20	76 29 29 29 0a 0a 28 64 69 72 76 69 73 68 2d 64 65 66 69 6e 65 2d 61 74 74 72 69 62 75 74 65 20	v)))..(dirvish-define-attribute.
14f40	76 73 63 6f 64 65 2d 69 63 6f 6e 0a 20 20 22 46 69 6c 65 20 69 63 6f 6e 73 20 70 72 6f 76 69 64	vscode-icon..."File.icons.provid
14f60	65 64 20 62 79 20 60 76 73 63 6f 64 65 2d 69 63 6f 6e 2e 65 6c 27 2e 22 0a 20 20 3a 77 69 64 74	ed.by.`vscode-icon.el'."...:widt
14f80	68 20 28 31 2b 20 28 6c 65 6e 67 74 68 20 64 69 72 76 69 73 68 2d 69 63 6f 6e 2d 64 65 6c 69 6d	h.(1+.(length.dirvish-icon-delim
14fa0	69 74 65 72 29 29 0a 20 20 28 6c 65 74 2a 20 28 28 76 73 63 6f 64 65 2d 69 63 6f 6e 2d 73 69 7a	iter))...(let*.((vscode-icon-siz
14fc0	65 20 64 69 72 76 69 73 68 2d 76 73 63 6f 64 65 2d 69 63 6f 6e 2d 73 69 7a 65 29 0a 20 20 20 20	e.dirvish-vscode-icon-size).....
14fe0	20 20 20 20 20 28 69 63 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 61 74	.....(icon...........(dirvish-at
15000	74 72 69 62 75 74 65 2d 63 61 63 68 65 20 66 2d 6e 61 6d 65 20 3a 76 73 63 6f 64 65 2d 69 63 6f	tribute-cache.f-name.:vscode-ico
15020	6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 64 65 66 61 75 6c 74 2d 64 69 72	n.............(let.((default-dir
15040	65 63 74 6f 72 79 20 64 69 72 76 69 73 68 2d 2d 76 73 63 6f 64 65 2d 69 63 6f 6e 2d 64 69 72 65	ectory.dirvish--vscode-icon-dire
15060	63 74 6f 72 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 65 71 20 28 63	ctory))...............(if.(eq.(c
15080	61 72 20 66 2d 74 79 70 65 29 20 27 64 69 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ar.f-type).'dir)................
150a0	20 20 20 28 6c 65 74 2a 20 28 28 62 61 73 65 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 73 61 6e 73 2d	...(let*.((base.(file-name-sans-
150c0	65 78 74 65 6e 73 69 6f 6e 20 66 2d 73 74 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	extension.f-str))...............
150e0	20 20 20 20 20 20 20 20 20 20 20 28 69 2d 62 61 73 65 20 28 6f 72 20 28 63 64 72 20 28 61 73 73	...........(i-base.(or.(cdr.(ass
15100	6f 63 20 62 61 73 65 20 76 73 63 6f 64 65 2d 69 63 6f 6e 2d 64 69 72 2d 61 6c 69 73 74 29 29 0a	oc.base.vscode-icon-dir-alist)).
15120	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	................................
15140	20 20 20 20 20 62 61 73 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.....base)).....................
15160	20 20 20 20 20 28 69 2d 70 61 74 68 20 28 76 73 63 6f 64 65 2d 69 63 6f 6e 2d 64 69 72 2d 65 78	.....(i-path.(vscode-icon-dir-ex
15180	69 73 74 73 2d 70 20 69 2d 62 61 73 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ists-p.i-base)))................
151a0	20 20 20 20 20 28 76 73 63 6f 64 65 2d 69 63 6f 6e 2d 63 72 65 61 74 65 2d 69 6d 61 67 65 0a 20	.....(vscode-icon-create-image..
151c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 69 2d 70 61 74 68 20 28	....................(or.i-path.(
151e0	65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 64 65 66 61 75 6c 74 5f 66 6f 6c 64 65 72	expand-file-name."default_folder
15200	2e 70 6e 67 22 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 76 73 63 6f 64	.png")))).................(vscod
15220	65 2d 69 63 6f 6e 2d 66 69 6c 65 20 66 2d 6e 61 6d 65 29 29 29 29 29 0a 20 20 20 20 20 20 20 20	e-icon-file.f-name))))).........
15240	20 28 6f 76 20 28 6d 61 6b 65 2d 6f 76 65 72 6c 61 79 20 28 31 2d 20 66 2d 62 65 67 29 20 66 2d	.(ov.(make-overlay.(1-.f-beg).f-
15260	62 65 67 29 29 29 0a 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 76 20 27 64 69 73 70	beg))).....(overlay-put.ov.'disp
15280	6c 61 79 20 69 63 6f 6e 29 0a 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 76 20 27 62	lay.icon).....(overlay-put.ov.'b
152a0	65 66 6f 72 65 2d 73 74 72 69 6e 67 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 20 22 20 27 66 61	efore-string.(propertize.".".'fa
152c0	63 65 20 68 6c 2d 66 61 63 65 29 29 0a 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 76	ce.hl-face)).....(overlay-put.ov
152e0	20 27 61 66 74 65 72 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.'after-string..................
15300	28 70 72 6f 70 65 72 74 69 7a 65 20 64 69 72 76 69 73 68 2d 69 63 6f 6e 2d 64 65 6c 69 6d 69 74	(propertize.dirvish-icon-delimit
15320	65 72 20 27 66 61 63 65 20 68 6c 2d 66 61 63 65 29 29 0a 20 20 20 20 60 28 6f 76 20 2e 20 2c 6f	er.'face.hl-face)).....`(ov...,o
15340	76 29 29 29 0a 0a 28 70 72 6f 76 69 64 65 20 27 64 69 72 76 69 73 68 2d 69 63 6f 6e 73 29 0a 3b	v)))..(provide.'dirvish-icons).;
15360	3b 3b 20 64 69 72 76 69 73 68 2d 69 63 6f 6e 73 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00	;;.dirvish-icons.el.ends.here...
15380	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
153a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
153c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
153e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
15400	64 69 72 76 69 73 68 2d 32 30 32 33 30 35 31 39 2e 31 35 30 30 2f 64 69 72 76 69 73 68 2d 6c 73	dirvish-20230519.1500/dirvish-ls
15420	2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	.el.............................
15440	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
15460	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
15480	30 30 31 37 35 33 31 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 30 37 31 00 20 30 00 00 00	0017531.00000000000.015071..0...
154a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
154c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
154e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
15500	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...................
15520	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...................
15540	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
15560	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
15580	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
155a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
155c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
155e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
15600	3b 3b 3b 20 64 69 72 76 69 73 68 2d 6c 73 2e 65 6c 20 2d 2d 2d 20 53 65 74 75 70 20 6c 73 20 63	;;;.dirvish-ls.el.---.Setup.ls.c
15620	6f 6d 6d 61 6e 64 20 73 77 69 74 63 68 65 73 20 6f 6e 20 74 68 65 20 66 6c 79 20 2d 2a 2d 20 6c	ommand.switches.on.the.fly.-*-.l
15640	65 78 69 63 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	exical-binding:.t.-*-..;;.Copyri
15660	67 68 74 20 28 43 29 20 32 30 32 31 2d 32 30 32 32 20 41 6c 65 78 20 4c 75 0a 3b 3b 20 41 75 74	ght.(C).2021-2022.Alex.Lu.;;.Aut
15680	68 6f 72 20 3a 20 41 6c 65 78 20 4c 75 20 3c 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f	hor.:.Alex.Lu.<https://github.co
156a0	6d 2f 61 6c 65 78 6c 75 69 67 69 74 3e 0a 3b 3b 20 56 65 72 73 69 6f 6e 3a 20 32 2e 30 2e 35 33	m/alexluigit>.;;.Version:.2.0.53
156c0	0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 66 69 6c 65 73 2c 20 63 6f 6e 76 65 6e 69 65 6e 63 65	.;;.Keywords:.files,.convenience
156e0	0a 3b 3b 20 48 6f 6d 65 70 61 67 65 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d	.;;.Homepage:.https://github.com
15700	2f 61 6c 65 78 6c 75 69 67 69 74 2f 64 69 72 76 69 73 68 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65	/alexluigit/dirvish.;;.SPDX-Lice
15720	6e 73 65 2d 49 64 65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 65 72	nse-Identifier:.GPL-3.0-or-later
15740	0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 20 53 65 74 75 70 20 6c 73 20 63	..;;;.Commentary:..;;.Setup.ls.c
15760	6f 6d 6d 61 6e 64 20 73 77 69 74 63 68 65 73 20 6f 6e 20 74 68 65 20 66 6c 79 2e 0a 0a 3b 3b 3b	ommand.switches.on.the.fly...;;;
15780	20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 64 69 72 76 69 73 68 29 0a 0a 28 64 65 66	.Code:..(require.'dirvish)..(def
157a0	75 6e 20 64 69 72 76 69 73 68 2d 6c 73 2d 2d 63 6c 65 61 72 2d 73 77 69 74 63 68 65 73 2d 63 68	un.dirvish-ls--clear-switches-ch
157c0	6f 69 63 65 73 20 28 29 0a 20 20 22 52 65 6c 6f 61 64 20 74 68 65 20 6c 69 73 74 69 6e 67 20 73	oices.()..."Reload.the.listing.s
157e0	77 69 74 63 68 65 73 20 73 65 74 75 70 20 55 49 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76	witches.setup.UI."...(interactiv
15800	65 29 0a 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 65 74 75 70 20 27 64 69 72 76 69 73 68 2d 6c	e)...(transient-setup.'dirvish-l
15820	73 2d 73 77 69 74 63 68 65 73 2d 6d 65 6e 75 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73	s-switches-menu))..(defun.dirvis
15840	68 2d 6c 73 2d 2d 61 70 70 6c 79 2d 73 77 69 74 63 68 65 73 2d 74 6f 2d 62 75 66 66 65 72 20 28	h-ls--apply-switches-to-buffer.(
15860	26 6f 70 74 69 6f 6e 61 6c 20 73 77 69 74 63 68 65 73 29 0a 20 20 22 41 70 70 6c 79 20 6c 69 73	&optional.switches)..."Apply.lis
15880	74 69 6e 67 20 53 57 49 54 43 48 45 53 20 74 6f 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2e	ting.SWITCHES.to.current.buffer.
158a0	22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 2a 20 28 28 61 72 67 73	"...(interactive)...(let*.((args
158c0	20 28 74 72 61 6e 73 69 65 6e 74 2d 61 72 67 73 20 74 72 61 6e 73 69 65 6e 74 2d 63 75 72 72 65	.(transient-args.transient-curre
158e0	6e 74 2d 63 6f 6d 6d 61 6e 64 29 29 0a 20 20 20 20 20 20 20 20 20 28 73 77 69 74 63 68 65 73 20	nt-command))..........(switches.
15900	28 6f 72 20 73 77 69 74 63 68 65 73 20 28 73 74 72 69 6e 67 2d 6a 6f 69 6e 20 28 61 70 70 65 6e	(or.switches.(string-join.(appen
15920	64 20 27 28 22 2d 6c 22 29 20 61 72 67 73 29 20 22 20 22 29 29 29 29 0a 20 20 20 20 28 77 68 65	d.'("-l").args).".")))).....(whe
15940	6e 20 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 20 28 73 65 74 71 20 64 69 72 65 64	n.current-prefix-arg.(setq.dired
15960	2d 6c 69 73 74 69 6e 67 2d 73 77 69 74 63 68 65 73 20 73 77 69 74 63 68 65 73 29 29 0a 20 20 20	-listing-switches.switches))....
15980	20 28 73 65 74 71 20 64 69 72 65 64 2d 61 63 74 75 61 6c 2d 73 77 69 74 63 68 65 73 20 73 77 69	.(setq.dired-actual-switches.swi
159a0	74 63 68 65 73 29 0a 20 20 20 20 28 72 65 76 65 72 74 2d 62 75 66 66 65 72 29 29 29 0a 0a 28 64	tches).....(revert-buffer)))..(d
159c0	65 66 75 6e 20 64 69 72 76 69 73 68 2d 6c 73 2d 2d 61 70 70 6c 79 2d 73 77 69 74 63 68 65 73 2d	efun.dirvish-ls--apply-switches-
159e0	74 6f 2d 61 6c 6c 20 28 26 6f 70 74 69 6f 6e 61 6c 20 73 77 69 74 63 68 65 73 29 0a 20 20 22 41	to-all.(&optional.switches)..."A
15a00	70 70 6c 79 20 6c 69 73 74 69 6e 67 20 53 57 49 54 43 48 45 53 20 74 6f 20 63 75 72 72 65 6e 74	pply.listing.SWITCHES.to.current
15a20	20 73 65 73 73 69 6f 6e 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65	.session."...(interactive)...(le
15a40	74 2a 20 28 28 61 72 67 73 20 28 74 72 61 6e 73 69 65 6e 74 2d 61 72 67 73 20 74 72 61 6e 73 69	t*.((args.(transient-args.transi
15a60	65 6e 74 2d 63 75 72 72 65 6e 74 2d 63 6f 6d 6d 61 6e 64 29 29 0a 20 20 20 20 20 20 20 20 20 28	ent-current-command))..........(
15a80	73 77 69 74 63 68 65 73 20 28 6f 72 20 73 77 69 74 63 68 65 73 20 28 73 74 72 69 6e 67 2d 6a 6f	switches.(or.switches.(string-jo
15aa0	69 6e 20 28 61 70 70 65 6e 64 20 27 28 22 2d 6c 22 29 20 61 72 67 73 29 20 22 20 22 29 29 29 29	in.(append.'("-l").args)."."))))
15ac0	0a 20 20 20 20 28 77 68 65 6e 20 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 20 28 73	.....(when.current-prefix-arg.(s
15ae0	65 74 71 20 64 69 72 65 64 2d 6c 69 73 74 69 6e 67 2d 73 77 69 74 63 68 65 73 20 73 77 69 74 63	etq.dired-listing-switches.switc
15b00	68 65 73 29 29 0a 20 20 20 20 28 73 65 74 66 20 28 64 76 2d 6c 73 2d 73 77 69 74 63 68 65 73 20	hes)).....(setf.(dv-ls-switches.
15b20	28 64 69 72 76 69 73 68 2d 63 75 72 72 29 29 20 73 77 69 74 63 68 65 73 29 0a 20 20 20 20 28 64	(dirvish-curr)).switches).....(d
15b40	6f 6c 69 73 74 20 28 62 75 66 20 28 63 6c 2d 72 65 6d 6f 76 65 2d 69 66 2d 6e 6f 74 0a 20 20 20	olist.(buf.(cl-remove-if-not....
15b60	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 62 29 20 28 77 69 74 68	...............(lambda.(b).(with
15b80	2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 62 20 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d	-current-buffer.b.(derived-mode-
15ba0	70 20 27 64 69 72 65 64 2d 6d 6f 64 65 29 29 29 20 28 62 75 66 66 65 72 2d 6c 69 73 74 29 29 29	p.'dired-mode))).(buffer-list)))
15bc0	0a 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 62 75 66 0a	.......(with-current-buffer.buf.
15be0	20 20 20 20 20 20 20 20 28 73 65 74 71 20 64 69 72 65 64 2d 61 63 74 75 61 6c 2d 73 77 69 74 63	........(setq.dired-actual-switc
15c00	68 65 73 20 73 77 69 74 63 68 65 73 29 0a 20 20 20 20 20 20 20 20 28 72 65 76 65 72 74 2d 62 75	hes.switches).........(revert-bu
15c20	66 66 65 72 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 6c 73 2d 2d 72 65	ffer)))))..(defun.dirvish-ls--re
15c40	73 65 74 2d 73 77 69 74 63 68 65 73 2d 66 6f 72 2d 62 75 66 66 65 72 20 28 29 0a 20 20 22 52 65	set-switches-for-buffer.()..."Re
15c60	73 65 74 20 6c 69 73 74 69 6e 67 20 73 77 69 74 63 68 65 73 20 66 6f 72 20 63 75 72 72 65 6e 74	set.listing.switches.for.current
15c80	20 62 75 66 66 65 72 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	.buffer."...(interactive)...(dir
15ca0	76 69 73 68 2d 6c 73 2d 2d 61 70 70 6c 79 2d 73 77 69 74 63 68 65 73 2d 74 6f 2d 62 75 66 66 65	vish-ls--apply-switches-to-buffe
15cc0	72 20 64 69 72 65 64 2d 6c 69 73 74 69 6e 67 2d 73 77 69 74 63 68 65 73 29 29 0a 0a 28 64 65 66	r.dired-listing-switches))..(def
15ce0	75 6e 20 64 69 72 76 69 73 68 2d 6c 73 2d 2d 72 65 73 65 74 2d 73 77 69 74 63 68 65 73 2d 66 6f	un.dirvish-ls--reset-switches-fo
15d00	72 2d 61 6c 6c 20 28 29 0a 20 20 22 52 65 73 65 74 20 6c 69 73 74 69 6e 67 20 73 77 69 74 63 68	r-all.()..."Reset.listing.switch
15d20	65 73 20 66 6f 72 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	es.for.current.buffer."...(inter
15d40	61 63 74 69 76 65 29 0a 20 20 28 64 69 72 76 69 73 68 2d 6c 73 2d 2d 61 70 70 6c 79 2d 73 77 69	active)...(dirvish-ls--apply-swi
15d60	74 63 68 65 73 2d 74 6f 2d 61 6c 6c 20 64 69 72 65 64 2d 6c 69 73 74 69 6e 67 2d 73 77 69 74 63	tches-to-all.dired-listing-switc
15d80	68 65 73 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 69 6e 66 69 78 20 64	hes))..(transient-define-infix.d
15da0	69 72 76 69 73 68 2d 6c 73 2d 2d 66 69 6c 74 65 72 2d 73 77 69 74 63 68 20 28 29 0a 20 20 3a 64	irvish-ls--filter-switch.()...:d
15dc0	65 73 63 72 69 70 74 69 6f 6e 20 22 73 68 6f 77 20 61 6c 6c 20 66 69 6c 65 73 22 0a 20 20 3a 63	escription."show.all.files"...:c
15de0	6c 61 73 73 20 27 74 72 61 6e 73 69 65 6e 74 2d 73 77 69 74 63 68 65 73 0a 20 20 3a 61 72 67 75	lass.'transient-switches...:argu
15e00	6d 65 6e 74 2d 66 6f 72 6d 61 74 20 22 2d 2d 25 73 22 0a 20 20 3a 61 72 67 75 6d 65 6e 74 2d 72	ment-format."--%s"...:argument-r
15e20	65 67 65 78 70 20 22 5c 5c 28 2d 2d 5c 5c 28 61 6c 6c 5c 5c 7c 61 6c 6d 6f 73 74 2d 61 6c 6c 5c	egexp."\\(--\\(all\\\|almost-all\
15e40	5c 29 5c 5c 29 22 0a 20 20 3a 63 68 6f 69 63 65 73 20 27 28 22 61 6c 6c 22 20 22 61 6c 6d 6f 73	\)\\)"...:choices.'("all"."almos
15e60	74 2d 61 6c 6c 22 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 69 6e 66 69	t-all"))..(transient-define-infi
15e80	78 20 64 69 72 76 69 73 68 2d 6c 73 2d 2d 73 6f 72 74 2d 73 77 69 74 63 68 20 28 29 0a 20 20 3a	x.dirvish-ls--sort-switch.()...:
15ea0	64 65 73 63 72 69 70 74 69 6f 6e 20 22 73 6f 72 74 20 62 79 22 0a 20 20 3a 63 6c 61 73 73 20 27	description."sort.by"...:class.'
15ec0	74 72 61 6e 73 69 65 6e 74 2d 73 77 69 74 63 68 65 73 0a 20 20 3a 61 72 67 75 6d 65 6e 74 2d 66	transient-switches...:argument-f
15ee0	6f 72 6d 61 74 20 22 2d 2d 73 6f 72 74 3d 25 73 22 0a 20 20 3a 61 72 67 75 6d 65 6e 74 2d 72 65	ormat."--sort=%s"...:argument-re
15f00	67 65 78 70 20 22 5c 5c 28 2d 2d 73 6f 72 74 3d 5c 5c 28 74 69 6d 65 5c 5c 7c 6e 6f 6e 65 5c 5c	gexp."\\(--sort=\\(time\\\|none\\
15f20	7c 65 78 74 65 6e 73 69 6f 6e 5c 5c 7c 73 69 7a 65 5c 5c 7c 76 65 72 73 69 6f 6e 5c 5c 7c 77 69	\|extension\\\|size\\\|version\\\|wi
15f40	64 74 68 5c 5c 29 5c 5c 29 22 0a 20 20 3a 63 68 6f 69 63 65 73 20 27 28 22 74 69 6d 65 22 20 22	dth\\)\\)"...:choices.'("time"."
15f60	6e 6f 6e 65 22 20 22 65 78 74 65 6e 73 69 6f 6e 22 20 22 73 69 7a 65 22 20 22 76 65 72 73 69 6f	none"."extension"."size"."versio
15f80	6e 22 20 22 77 69 64 74 68 22 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d	n"."width"))..(transient-define-
15fa0	69 6e 66 69 78 20 64 69 72 76 69 73 68 2d 6c 73 2d 2d 74 69 6d 65 2d 73 77 69 74 63 68 20 28 29	infix.dirvish-ls--time-switch.()
15fc0	0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 22 73 68 6f 77 20 74 69 6d 65 20 61 73 20 7c 20	...:description."show.time.as.\|.
15fe0	73 6f 72 74 20 66 69 6c 65 73 20 77 69 74 68 22 0a 20 20 3a 63 6c 61 73 73 20 27 74 72 61 6e 73	sort.files.with"...:class.'trans
16000	69 65 6e 74 2d 73 77 69 74 63 68 65 73 0a 20 20 3a 61 72 67 75 6d 65 6e 74 2d 66 6f 72 6d 61 74	ient-switches...:argument-format
16020	20 22 2d 2d 74 69 6d 65 3d 25 73 22 0a 20 20 3a 61 72 67 75 6d 65 6e 74 2d 72 65 67 65 78 70 20	."--time=%s"...:argument-regexp.
16040	22 5c 5c 28 2d 2d 74 69 6d 65 3d 5c 5c 28 75 73 65 5c 5c 7c 62 69 72 74 68 5c 5c 7c 63 74 69 6d	"\\(--time=\\(use\\\|birth\\\|ctim
16060	65 5c 5c 29 5c 5c 29 22 0a 20 20 3a 63 68 6f 69 63 65 73 20 27 28 22 75 73 65 22 20 22 62 69 72	e\\)\\)"...:choices.'("use"."bir
16080	74 68 22 20 22 63 74 69 6d 65 22 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65	th"."ctime"))..(transient-define
160a0	2d 69 6e 66 69 78 20 64 69 72 76 69 73 68 2d 6c 73 2d 2d 74 69 6d 65 2d 73 74 79 6c 65 2d 73 77	-infix.dirvish-ls--time-style-sw
160c0	69 74 63 68 20 28 29 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 22 74 69 6d 65 20 73 74 79	itch.()...:description."time.sty
160e0	6c 65 22 0a 20 20 3a 63 6c 61 73 73 20 27 74 72 61 6e 73 69 65 6e 74 2d 73 77 69 74 63 68 65 73	le"...:class.'transient-switches
16100	0a 20 20 3a 61 72 67 75 6d 65 6e 74 2d 66 6f 72 6d 61 74 20 22 2d 2d 74 69 6d 65 2d 73 74 79 6c	...:argument-format."--time-styl
16120	65 3d 25 73 22 0a 20 20 3a 61 72 67 75 6d 65 6e 74 2d 72 65 67 65 78 70 20 22 5c 5c 28 2d 2d 74	e=%s"...:argument-regexp."\\(--t
16140	69 6d 65 2d 73 74 79 6c 65 3d 5c 5c 28 66 75 6c 6c 2d 69 73 6f 5c 5c 7c 6c 6f 6e 67 2d 69 73 6f	ime-style=\\(full-iso\\\|long-iso
16160	5c 5c 7c 69 73 6f 5c 5c 7c 6c 6f 63 61 6c 65 5c 5c 7c 2b 5c 5c 29 5c 5c 29 22 0a 20 20 3a 63 68	\\\|iso\\\|locale\\\|+\\)\\)"...:ch
16180	6f 69 63 65 73 20 27 28 22 66 75 6c 6c 2d 69 73 6f 22 20 22 6c 6f 6e 67 2d 69 73 6f 22 20 22 69	oices.'("full-iso"."long-iso"."i
161a0	73 6f 22 20 22 6c 6f 63 61 6c 65 22 20 22 2b 22 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64	so"."locale"."+"))..(transient-d
161c0	65 66 69 6e 65 2d 69 6e 66 69 78 20 64 69 72 76 69 73 68 2d 6c 73 2d 2d 69 6e 64 69 63 61 74 6f	efine-infix.dirvish-ls--indicato
161e0	72 2d 73 74 79 6c 65 2d 73 77 69 74 63 68 20 28 29 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e	r-style-switch.()...:description
16200	20 22 61 64 64 20 69 6e 64 69 63 61 74 6f 72 22 0a 20 20 3a 63 6c 61 73 73 20 27 74 72 61 6e 73	."add.indicator"...:class.'trans
16220	69 65 6e 74 2d 73 77 69 74 63 68 65 73 0a 20 20 3a 61 72 67 75 6d 65 6e 74 2d 66 6f 72 6d 61 74	ient-switches...:argument-format
16240	20 22 2d 2d 69 6e 64 69 63 61 74 6f 72 2d 73 74 79 6c 65 3d 25 73 22 0a 20 20 3a 61 72 67 75 6d	."--indicator-style=%s"...:argum
16260	65 6e 74 2d 72 65 67 65 78 70 20 22 5c 5c 28 2d 2d 69 6e 64 69 63 61 74 6f 72 2d 73 74 79 6c 65	ent-regexp."\\(--indicator-style
16280	3d 5c 5c 28 73 6c 61 73 68 5c 5c 7c 66 69 6c 65 2d 74 79 70 65 5c 5c 7c 63 6c 61 73 73 69 66 79	=\\(slash\\\|file-type\\\|classify
162a0	5c 5c 29 5c 5c 29 22 0a 20 20 3a 63 68 6f 69 63 65 73 20 27 28 22 73 6c 61 73 68 22 20 22 66 69	\\)\\)"...:choices.'("slash"."fi
162c0	6c 65 2d 74 79 70 65 22 20 22 63 6c 61 73 73 69 66 79 22 29 29 0a 0a 28 64 65 66 75 6e 20 64 69	le-type"."classify"))..(defun.di
162e0	72 76 69 73 68 2d 6c 73 2d 2d 71 75 69 63 6b 73 6f 72 74 2d 64 6f 2d 73 6f 72 74 20 28 73 77 69	rvish-ls--quicksort-do-sort.(swi
16300	74 63 68 65 73 29 0a 20 20 22 53 6f 72 74 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 20 77 69	tches)..."Sort.current.buffer.wi
16320	74 68 20 44 69 72 65 64 20 73 6f 72 74 20 53 57 49 54 43 48 45 53 2e 22 0a 20 20 28 6c 65 74 2a	th.Dired.sort.SWITCHES."...(let*
16340	20 28 28 72 65 67 65 78 70 20 22 5c 5c 28 2d 2d 74 69 6d 65 3d 5c 5c 77 2b 5c 5c 7c 2d 2d 73 6f	.((regexp."\\(--time=\\w+\\\|--so
16360	72 74 3d 5c 5c 77 2b 5c 5c 7c 2d 2d 72 65 76 65 72 73 65 5c 5c 29 5c 5c 28 20 5c 5c 29 3f 22 29	rt=\\w+\\\|--reverse\\)\$.\$?")
16380	0a 20 20 20 20 20 20 20 20 20 28 6f 74 68 65 72 73 20 28 72 65 70 6c 61 63 65 2d 72 65 67 65 78	..........(others.(replace-regex
163a0	70 2d 69 6e 2d 73 74 72 69 6e 67 20 72 65 67 65 78 70 20 22 22 20 64 69 72 65 64 2d 61 63 74 75	p-in-string.regexp."".dired-actu
163c0	61 6c 2d 73 77 69 74 63 68 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 28 6e 65 77 2d 73 77 69 74	al-switches))..........(new-swit
163e0	63 68 65 73 20 28 63 6f 6e 63 61 74 20 6f 74 68 65 72 73 20 22 20 22 20 73 77 69 74 63 68 65 73	ches.(concat.others.".".switches
16400	29 29 29 0a 20 20 20 20 28 73 65 74 71 20 64 69 72 65 64 2d 61 63 74 75 61 6c 2d 73 77 69 74 63	))).....(setq.dired-actual-switc
16420	68 65 73 20 6e 65 77 2d 73 77 69 74 63 68 65 73 29 0a 20 20 20 20 28 72 65 76 65 72 74 2d 62 75	hes.new-switches).....(revert-bu
16440	66 66 65 72 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 20 28 61 75 74 6f 6c 6f 61	ffer)))..;;;###autoload.(autoloa
16460	64 20 27 64 69 72 76 69 73 68 2d 71 75 69 63 6b 73 6f 72 74 20 22 64 69 72 76 69 73 68 2d 6c 73	d.'dirvish-quicksort."dirvish-ls
16480	22 20 6e 69 6c 20 74 29 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 6c 73 2d 71	".nil.t).(defcustom.dirvish-ls-q
164a0	75 69 63 6b 73 6f 72 74 2d 6b 65 79 73 0a 20 20 27 28 28 22 6e 22 20 22 22 20 20 20 20 20 20 20	uicksort-keys...'(("n"."".......
164c0	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 6e 61 6d	............................"nam
164e0	65 20 28 61 2d 7a 29 22 29 0a 20 20 20 20 28 22 4e 22 20 22 2d 2d 72 65 76 65 72 73 65 22 20 20	e.(a-z)").....("N"."--reverse"..
16500	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 6e 61 6d 65 20 28 7a	........................"name.(z
16520	2d 61 29 22 29 0a 20 20 20 20 28 22 65 22 20 22 2d 2d 73 6f 72 74 3d 65 78 74 65 6e 73 69 6f 6e	-a)").....("e"."--sort=extension
16540	22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 65 78 74 65 6e 73 69 6f 6e 20 28	"..................."extension.(
16560	61 2d 7a 29 22 29 0a 20 20 20 20 28 22 45 22 20 22 2d 2d 73 6f 72 74 3d 65 78 74 65 6e 73 69 6f	a-z)").....("E"."--sort=extensio
16580	6e 20 2d 2d 72 65 76 65 72 73 65 22 20 20 20 20 20 20 20 20 20 22 65 78 74 65 6e 73 69 6f 6e 20	n.--reverse"........."extension.
165a0	28 7a 2d 61 29 22 29 0a 20 20 20 20 28 22 73 22 20 22 2d 2d 73 6f 72 74 3d 73 69 7a 65 22 20 20	(z-a)").....("s"."--sort=size"..
165c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 73 69 7a 65 20 28 6c 61 72	......................"size.(lar
165e0	67 65 73 74 20 66 69 72 73 74 29 22 29 0a 20 20 20 20 28 22 53 22 20 22 2d 2d 73 6f 72 74 3d 73	gest.first)").....("S"."--sort=s
16600	69 7a 65 20 2d 2d 72 65 76 65 72 73 65 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 73 69 7a	ize.--reverse".............."siz
16620	65 20 28 73 6d 61 6c 6c 65 73 74 20 66 69 72 73 74 29 22 29 0a 20 20 20 20 28 22 76 22 20 22 2d	e.(smallest.first)").....("v"."-
16640	2d 73 6f 72 74 3d 76 65 72 73 69 6f 6e 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	-sort=version"..................
16660	20 20 20 22 76 65 72 73 69 6f 6e 20 6e 75 6d 62 65 72 20 28 65 61 72 6c 69 65 73 74 20 66 69 72	..."version.number.(earliest.fir
16680	73 74 29 22 29 0a 20 20 20 20 28 22 56 22 20 22 2d 2d 73 6f 72 74 3d 76 65 72 73 69 6f 6e 20 2d	st)").....("V"."--sort=version.-
166a0	2d 72 65 76 65 72 73 65 22 20 20 20 20 20 20 20 20 20 20 20 22 76 65 72 73 69 6f 6e 20 6e 75 6d	-reverse"..........."version.num
166c0	62 65 72 20 28 6c 61 74 65 73 74 20 66 69 72 73 74 29 22 29 0a 20 20 20 20 28 22 77 22 20 22 2d	ber.(latest.first)").....("w"."-
166e0	2d 73 6f 72 74 3d 77 69 64 74 68 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	-sort=width"....................
16700	20 20 20 22 77 69 64 74 68 20 28 73 68 6f 72 74 65 73 74 20 66 69 72 73 74 29 22 29 0a 20 20 20	..."width.(shortest.first)")....
16720	20 28 22 57 22 20 22 2d 2d 73 6f 72 74 3d 77 69 64 74 68 20 2d 2d 72 65 76 65 72 73 65 22 20 20	.("W"."--sort=width.--reverse"..
16740	20 20 20 20 20 20 20 20 20 20 20 22 77 69 64 74 68 20 28 6c 6f 6e 67 65 73 74 20 66 69 72 73 74	..........."width.(longest.first
16760	29 22 29 0a 20 20 20 20 28 22 6d 22 20 22 2d 2d 73 6f 72 74 3d 74 69 6d 65 22 20 20 20 20 20 20	)").....("m"."--sort=time"......
16780	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 6d 6f 64 69 66 69 63 61 74 69 6f 6e 20	.................."modification.
167a0	74 69 6d 65 20 28 6e 65 77 65 73 74 20 66 69 72 73 74 29 22 29 0a 20 20 20 20 28 22 4d 22 20 22	time.(newest.first)").....("M"."
167c0	2d 2d 73 6f 72 74 3d 74 69 6d 65 20 2d 2d 72 65 76 65 72 73 65 22 20 20 20 20 20 20 20 20 20 20	--sort=time.--reverse"..........
167e0	20 20 20 20 22 6d 6f 64 69 66 69 63 61 74 69 6f 6e 20 74 69 6d 65 20 28 6f 6c 64 65 73 74 20 66	...."modification.time.(oldest.f
16800	69 72 73 74 29 22 29 0a 20 20 20 20 28 22 61 22 20 22 2d 2d 73 6f 72 74 3d 74 69 6d 65 20 2d 2d	irst)").....("a"."--sort=time.--
16820	74 69 6d 65 3d 75 73 65 22 20 20 20 20 20 20 20 20 20 20 20 20 20 22 61 63 63 65 73 73 20 74 69	time=use"............."access.ti
16840	6d 65 20 28 6e 65 77 65 73 74 20 66 69 72 73 74 29 22 29 0a 20 20 20 20 28 22 41 22 20 22 2d 2d	me.(newest.first)").....("A"."--
16860	73 6f 72 74 3d 74 69 6d 65 20 2d 2d 74 69 6d 65 3d 75 73 65 20 2d 2d 72 65 76 65 72 73 65 22 20	sort=time.--time=use.--reverse".
16880	20 20 22 61 63 63 65 73 73 20 74 69 6d 65 20 28 6f 6c 64 65 73 74 20 66 69 72 73 74 29 22 29 0a	.."access.time.(oldest.first)").
168a0	20 20 20 20 28 22 62 22 20 22 2d 2d 73 6f 72 74 3d 74 69 6d 65 20 2d 2d 74 69 6d 65 3d 62 69 72	....("b"."--sort=time.--time=bir
168c0	74 68 22 20 20 20 20 20 20 20 20 20 20 20 22 62 69 72 74 68 20 74 69 6d 65 20 28 6e 65 77 65 73	th"..........."birth.time.(newes
168e0	74 20 66 69 72 73 74 29 22 29 0a 20 20 20 20 28 22 42 22 20 22 2d 2d 73 6f 72 74 3d 74 69 6d 65	t.first)").....("B"."--sort=time
16900	20 2d 2d 74 69 6d 65 3d 62 69 72 74 68 20 2d 2d 72 65 76 65 72 73 65 22 20 22 62 69 72 74 68 20	.--time=birth.--reverse"."birth.
16920	74 69 6d 65 20 28 6f 6c 64 65 73 74 20 66 69 72 73 74 29 22 29 0a 20 20 20 20 28 22 63 22 20 22	time.(oldest.first)").....("c"."
16940	2d 2d 73 6f 72 74 3d 74 69 6d 65 20 2d 2d 74 69 6d 65 3d 63 74 69 6d 65 22 20 20 20 20 20 20 20	--sort=time.--time=ctime".......
16960	20 20 20 20 22 63 68 61 6e 67 65 20 74 69 6d 65 20 28 6e 65 77 65 73 74 20 66 69 72 73 74 29 22	...."change.time.(newest.first)"
16980	29 0a 20 20 20 20 28 22 43 22 20 22 2d 2d 73 6f 72 74 3d 74 69 6d 65 20 2d 2d 74 69 6d 65 3d 63	).....("C"."--sort=time.--time=c
169a0	74 69 6d 65 20 2d 2d 72 65 76 65 72 73 65 22 20 22 63 68 61 6e 67 65 20 74 69 6d 65 20 28 6f 6c	time.--reverse"."change.time.(ol
169c0	64 65 73 74 20 66 69 72 73 74 29 22 29 29 0a 20 20 22 53 4f 52 54 2d 4b 45 59 73 20 66 6f 72 20	dest.first)"))..."SORT-KEYs.for.
169e0	63 6f 6d 6d 61 6e 64 20 60 64 69 72 76 69 73 68 2d 71 75 69 63 6b 73 6f 72 74 27 2e 0a 41 20 53	command.`dirvish-quicksort'..A.S
16a00	4f 52 54 2d 4b 45 59 20 69 73 20 61 20 28 4b 45 59 20 53 57 49 54 43 48 45 53 20 44 4f 43 29 20	ORT-KEY.is.a.(KEY.SWITCHES.DOC).
16a20	61 6c 69 73 74 20 77 68 65 72 65 20 4b 45 59 20 69 73 20 74 68 65 20 6b 65 79 20 74 6f 0a 69 6e	alist.where.KEY.is.the.key.to.in
16a40	76 6f 6b 65 20 74 68 65 20 73 6f 72 74 20 66 75 6e 63 74 69 6f 6e 2c 20 53 57 49 54 43 48 45 53	voke.the.sort.function,.SWITCHES
16a60	20 69 73 20 74 68 65 20 74 68 65 20 73 6f 72 74 20 66 6c 61 67 73 20 66 6f 72 0a 60 64 69 72 65	.is.the.the.sort.flags.for.`dire
16a80	64 2d 73 6f 72 74 2d 6f 74 68 65 72 27 2c 20 44 4f 43 20 69 73 20 74 68 65 20 64 6f 63 75 6d 65	d-sort-other',.DOC.is.the.docume
16aa0	6e 74 61 74 69 6f 6e 20 73 74 72 69 6e 67 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69	ntation.string."...:group.'dirvi
16ac0	73 68 20 3a 74 79 70 65 20 27 61 6c 69 73 74 0a 20 20 3a 73 65 74 0a 20 20 28 6c 61 6d 62 64 61	sh.:type.'alist...:set...(lambda
16ae0	20 28 6b 20 76 29 0a 20 20 20 20 28 73 65 74 20 6b 20 76 29 0a 20 20 20 20 28 65 76 61 6c 0a 20	.(k.v).....(set.k.v).....(eval..
16b00	20 20 20 20 60 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 70 72 65 66 69 78 20 64 69	....`(transient-define-prefix.di
16b20	72 76 69 73 68 2d 71 75 69 63 6b 73 6f 72 74 20 28 29 0a 20 20 20 20 20 20 20 20 22 53 6f 72 74	rvish-quicksort.()........."Sort
16b40	20 44 69 72 76 69 73 68 20 62 75 66 66 65 72 20 62 79 20 64 69 66 66 65 72 65 6e 74 20 63 72 69	.Dirvish.buffer.by.different.cri
16b60	74 65 72 69 61 2e 22 0a 20 20 20 20 20 20 20 20 5b 3a 64 65 73 63 72 69 70 74 69 6f 6e 0a 20 20	teria.".........[:description...
16b80	20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 29 20 28 64 69 72 76 69 73 68 2d 2d 66 6f 72 6d	.......(lambda.().(dirvish--form
16ba0	61 74 2d 6d 65 6e 75 2d 68 65 61 64 69 6e 67 20 22 53 6f 72 74 20 62 79 3a 22 29 29 0a 20 20 20	at-menu-heading."Sort.by:"))....
16bc0	20 20 20 20 20 20 2c 40 28 63 6c 2d 6c 6f 6f 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72	......,@(cl-loop.............for
16be0	20 28 6b 65 79 20 73 77 69 74 63 68 65 73 20 64 65 73 63 29 20 69 6e 20 76 20 63 6f 6c 6c 65 63	.(key.switches.desc).in.v.collec
16c00	74 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 6b 65 79 20 64 65 73 63 20 60 28 6c	t.............(list.key.desc.`(l
16c20	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 20 20 20 20 20 20	ambda.()........................
16c40	20 20 20 20 20 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 20 20 20 20 20 20 20 20 20	.......(interactive)............
16c60	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 6c 73 2d 2d	...................(dirvish-ls--
16c80	71 75 69 63 6b 73 6f 72 74 2d 64 6f 2d 73 6f 72 74 20 2c 73 77 69 74 63 68 65 73 29 29 29 29 5d	quicksort-do-sort.,switches))))]
16ca0	29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 20 28 61 75 74 6f 6c 6f 61 64 20 27	))))..;;;###autoload.(autoload.'
16cc0	64 69 72 76 69 73 68 2d 6c 73 2d 73 77 69 74 63 68 65 73 2d 6d 65 6e 75 20 22 64 69 72 76 69 73	dirvish-ls-switches-menu."dirvis
16ce0	68 2d 6c 73 22 20 6e 69 6c 20 74 29 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 70	h-ls".nil.t).(transient-define-p
16d00	72 65 66 69 78 20 64 69 72 76 69 73 68 2d 6c 73 2d 73 77 69 74 63 68 65 73 2d 6d 65 6e 75 20 28	refix.dirvish-ls-switches-menu.(
16d20	29 0a 20 20 22 53 65 74 75 70 20 44 69 72 65 64 20 6c 69 73 74 69 6e 67 20 73 77 69 74 63 68 65	)..."Setup.Dired.listing.switche
16d40	73 2e 22 0a 20 20 3a 69 6e 69 74 2d 76 61 6c 75 65 0a 20 20 28 6c 61 6d 62 64 61 20 28 6f 29 20	s."...:init-value...(lambda.(o).
16d60	28 6f 73 65 74 20 6f 20 76 61 6c 75 65 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 28 6f 72 20	(oset.o.value.(split-string.(or.
16d80	64 69 72 65 64 2d 61 63 74 75 61 6c 2d 73 77 69 74 63 68 65 73 20 22 22 29 29 29 29 0a 20 20 5b	dired-actual-switches.""))))...[
16da0	3a 64 65 73 63 72 69 70 74 69 6f 6e 0a 20 20 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20	:description....(lambda.()......
16dc0	28 66 6f 72 6d 61 74 20 22 25 73 5c 6e 25 73 20 25 73 5c 6e 25 73 20 25 73 22 0a 20 20 20 20 20	(format."%s\n%s.%s\n%s.%s"......
16de0	20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 53 65 74 75 70 20 4c 69 73 74 69	........(propertize."Setup.Listi
16e00	6e 67 20 53 77 69 74 63 68 65 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ng.Switches"....................
16e20	20 20 20 20 20 20 27 66 61 63 65 20 27 28 3a 69 6e 68 65 72 69 74 20 64 69 72 65 64 2d 6d 61 72	......'face.'(:inherit.dired-mar
16e40	6b 20 3a 75 6e 64 65 72 6c 69 6e 65 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	k.:underline.t).................
16e60	20 20 20 20 20 20 20 20 20 27 64 69 73 70 6c 61 79 20 27 28 28 68 65 69 67 68 74 20 31 2e 32 29	.........'display.'((height.1.2)
16e80	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 6c 6f 77	))..............(propertize."low
16ea0	65 72 63 61 73 65 64 20 73 77 69 74 63 68 65 73 20 61 6c 73 6f 20 77 6f 72 6b 20 69 6e 22 20 27	ercased.switches.also.work.in".'
16ec0	66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 64 6f 63 2d 66 61 63 65 29 0a 20 20 20 20 20 20	face.'font-lock-doc-face).......
16ee0	20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 64 69 72 65 64 2d 68 69 64 65 2d 64	.......(propertize."dired-hide-d
16f00	65 74 61 69 6c 73 2d 6d 6f 64 65 22 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 63 6f	etails-mode".'face.'font-lock-co
16f20	6e 73 74 61 6e 74 2d 66 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65	nstant-face)..............(prope
16f40	72 74 69 7a 65 20 22 43 2d 75 20 52 45 54 20 61 6e 64 20 43 2d 75 20 4d 2d 52 45 54 20 77 69 6c	rtize."C-u.RET.and.C-u.M-RET.wil
16f60	6c 20 6d 6f 64 69 66 79 22 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 64 6f 63 2d 66	l.modify".'face.'font-lock-doc-f
16f80	61 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 64	ace)..............(propertize."d
16fa0	69 72 65 64 2d 6c 69 73 74 69 6e 67 2d 73 77 69 74 63 68 65 73 22 20 27 66 61 63 65 20 27 66 6f	ired-listing-switches".'face.'fo
16fc0	6e 74 2d 6c 6f 63 6b 2d 63 6f 6e 73 74 61 6e 74 2d 66 61 63 65 29 29 29 0a 20 20 20 5b 22 6f 70	nt-lock-constant-face)))....["op
16fe0	74 69 6f 6e 73 22 0a 20 20 20 20 28 22 61 22 20 64 69 72 76 69 73 68 2d 6c 73 2d 2d 66 69 6c 74	tions".....("a".dirvish-ls--filt
17000	65 72 2d 73 77 69 74 63 68 29 0a 20 20 20 20 28 22 73 22 20 64 69 72 76 69 73 68 2d 6c 73 2d 2d	er-switch).....("s".dirvish-ls--
17020	73 6f 72 74 2d 73 77 69 74 63 68 29 0a 20 20 20 20 28 22 69 22 20 64 69 72 76 69 73 68 2d 6c 73	sort-switch).....("i".dirvish-ls
17040	2d 2d 69 6e 64 69 63 61 74 6f 72 2d 73 74 79 6c 65 2d 73 77 69 74 63 68 29 0a 20 20 20 20 28 22	--indicator-style-switch).....("
17060	74 22 20 64 69 72 76 69 73 68 2d 6c 73 2d 2d 74 69 6d 65 2d 73 77 69 74 63 68 29 0a 20 20 20 20	t".dirvish-ls--time-switch).....
17080	28 22 54 22 20 64 69 72 76 69 73 68 2d 6c 73 2d 2d 74 69 6d 65 2d 73 74 79 6c 65 2d 73 77 69 74	("T".dirvish-ls--time-style-swit
170a0	63 68 29 0a 20 20 20 20 28 22 42 22 20 22 53 63 61 6c 65 20 73 69 7a 65 73 20 77 68 65 6e 20 70	ch).....("B"."Scale.sizes.when.p
170c0	72 69 6e 74 69 6e 67 2c 20 65 67 2e 20 31 30 4b 22 20 22 2d 2d 62 6c 6f 63 6b 2d 73 69 7a 65 3d	rinting,.eg..10K"."--block-size=
170e0	22 29 0a 20 20 20 20 22 22 0a 20 20 20 20 22 74 6f 67 67 6c 65 73 22 0a 20 20 20 20 28 22 72 22	").....""....."toggles".....("r"
17100	20 22 52 65 76 65 72 73 65 20 6f 72 64 65 72 20 77 68 69 6c 65 20 73 6f 72 74 69 6e 67 22 20 22	."Reverse.order.while.sorting"."
17120	2d 2d 72 65 76 65 72 73 65 22 29 0a 20 20 20 20 28 22 64 22 20 22 4c 69 73 74 20 64 69 72 65 63	--reverse").....("d"."List.direc
17140	74 6f 72 69 65 73 20 6f 6e 74 6f 70 22 20 22 2d 2d 67 72 6f 75 70 2d 64 69 72 65 63 74 6f 72 69	tories.ontop"."--group-directori
17160	65 73 2d 66 69 72 73 74 22 29 0a 20 20 20 20 28 22 7e 22 20 22 48 69 64 65 20 62 61 63 6b 75 70	es-first").....("~"."Hide.backup
17180	73 20 66 69 6c 65 73 20 28 65 67 2e 20 66 6f 6f 7e 29 22 20 22 2d 2d 69 67 6e 6f 72 65 2d 62 61	s.files.(eg..foo~)"."--ignore-ba
171a0	63 6b 75 70 73 22 29 0a 20 20 20 20 28 22 41 22 20 22 53 68 6f 77 20 74 68 65 20 61 75 74 68 6f	ckups").....("A"."Show.the.autho
171c0	72 22 20 22 2d 2d 61 75 74 68 6f 72 22 29 0a 20 20 20 20 28 22 43 22 20 22 53 68 6f 77 20 73 65	r"."--author").....("C"."Show.se
171e0	63 75 72 69 74 79 20 63 6f 6e 74 65 78 74 22 20 22 2d 2d 63 6f 6e 74 65 78 74 22 29 0a 20 20 20	curity.context"."--context")....
17200	20 28 22 48 22 20 22 48 75 6d 61 6e 20 72 65 61 64 61 62 6c 65 20 66 69 6c 65 20 73 69 7a 65 22	.("H"."Human.readable.file.size"
17220	20 22 2d 2d 68 75 6d 61 6e 2d 72 65 61 64 61 62 6c 65 22 29 0a 20 20 20 20 28 22 47 22 20 22 48	."--human-readable").....("G"."H
17240	69 64 65 20 67 72 6f 75 70 20 6e 61 6d 65 73 22 20 22 2d 2d 6e 6f 2d 67 72 6f 75 70 22 29 0a 20	ide.group.names"."--no-group")..
17260	20 20 20 28 22 4f 22 20 22 48 69 64 65 20 6f 77 6e 65 72 20 6e 61 6d 65 73 22 20 22 2d 67 22 29	...("O"."Hide.owner.names"."-g")
17280	0a 20 20 20 20 28 22 4c 22 20 22 49 6e 66 6f 20 66 6f 72 20 6c 69 6e 6b 20 72 65 66 65 72 65 6e	.....("L"."Info.for.link.referen
172a0	63 65 73 20 6f 72 20 6c 69 6e 6b 20 69 74 73 65 6c 66 22 20 22 2d 2d 64 65 72 65 66 65 72 65 6e	ces.or.link.itself"."--dereferen
172c0	63 65 22 29 0a 20 20 20 20 28 22 4e 22 20 22 4e 75 6d 65 72 69 63 20 75 73 65 72 20 61 6e 64 20	ce").....("N"."Numeric.user.and.
172e0	67 72 6f 75 70 20 49 44 73 22 20 22 2d 2d 6e 75 6d 65 72 69 63 2d 75 69 64 2d 67 69 64 22 29 0a	group.IDs"."--numeric-uid-gid").
17300	20 20 20 20 28 22 50 22 20 22 50 6f 77 65 72 73 20 6f 66 20 31 30 30 30 20 66 6f 72 20 66 69 6c	....("P"."Powers.of.1000.for.fil
17320	65 20 73 69 7a 65 20 72 61 74 68 65 72 20 74 68 61 6e 20 31 30 32 34 22 20 22 2d 2d 73 69 22 29	e.size.rather.than.1024"."--si")
17340	0a 20 20 20 20 28 22 49 22 20 22 53 68 6f 77 20 69 6e 64 65 78 20 6e 75 6d 62 65 72 22 20 22 2d	.....("I"."Show.index.number"."-
17360	2d 69 6e 6f 64 65 22 29 0a 20 20 20 20 28 22 53 22 20 22 53 68 6f 77 20 74 68 65 20 61 6c 6c 6f	-inode").....("S"."Show.the.allo
17380	63 61 74 65 64 20 73 69 7a 65 22 20 22 2d 2d 73 69 7a 65 22 29 0a 20 20 20 20 22 22 0a 20 20 20	cated.size"."--size").....""....
173a0	20 22 41 63 74 69 6f 6e 73 22 0a 20 20 20 20 28 22 52 45 54 22 20 22 20 20 41 70 70 6c 79 20 74	."Actions".....("RET"."..Apply.t
173c0	6f 20 74 68 69 73 20 62 75 66 66 65 72 22 20 64 69 72 76 69 73 68 2d 6c 73 2d 2d 61 70 70 6c 79	o.this.buffer".dirvish-ls--apply
173e0	2d 73 77 69 74 63 68 65 73 2d 74 6f 2d 62 75 66 66 65 72 29 0a 20 20 20 20 28 22 4d 2d 52 45 54	-switches-to-buffer).....("M-RET
17400	22 20 22 41 70 70 6c 79 20 74 6f 20 61 6c 6c 20 44 69 72 65 64 20 62 75 66 66 65 72 73 22 20 64	"."Apply.to.all.Dired.buffers".d
17420	69 72 76 69 73 68 2d 6c 73 2d 2d 61 70 70 6c 79 2d 73 77 69 74 63 68 65 73 2d 74 6f 2d 61 6c 6c	irvish-ls--apply-switches-to-all
17440	29 0a 20 20 20 20 28 22 43 2d 72 22 20 22 20 20 52 65 73 65 74 20 74 68 69 73 20 62 75 66 66 65	).....("C-r"."..Reset.this.buffe
17460	72 22 20 64 69 72 76 69 73 68 2d 6c 73 2d 2d 72 65 73 65 74 2d 73 77 69 74 63 68 65 73 2d 66 6f	r".dirvish-ls--reset-switches-fo
17480	72 2d 62 75 66 66 65 72 29 0a 20 20 20 20 28 22 4d 2d 72 22 20 22 20 20 52 65 73 65 74 20 61 6c	r-buffer).....("M-r"."..Reset.al
174a0	6c 20 44 69 72 65 64 20 62 75 66 66 65 72 73 22 20 64 69 72 76 69 73 68 2d 6c 73 2d 2d 72 65 73	l.Dired.buffers".dirvish-ls--res
174c0	65 74 2d 73 77 69 74 63 68 65 73 2d 66 6f 72 2d 61 6c 6c 29 0a 20 20 20 20 28 22 43 2d 6c 22 20	et-switches-for-all).....("C-l".
174e0	22 20 20 43 6c 65 61 72 20 63 68 6f 69 63 65 73 22 20 64 69 72 76 69 73 68 2d 6c 73 2d 2d 63 6c	"..Clear.choices".dirvish-ls--cl
17500	65 61 72 2d 73 77 69 74 63 68 65 73 2d 63 68 6f 69 63 65 73 20 3a 74 72 61 6e 73 69 65 6e 74 20	ear-switches-choices.:transient.
17520	74 29 5d 5d 29 0a 0a 28 70 72 6f 76 69 64 65 20 27 64 69 72 76 69 73 68 2d 6c 73 29 0a 3b 3b 3b	t)]])..(provide.'dirvish-ls).;;;
17540	20 64 69 72 76 69 73 68 2d 6c 73 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00	.dirvish-ls.el.ends.here........
17560	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
17580	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
175a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
175c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
175e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
17600	64 69 72 76 69 73 68 2d 32 30 32 33 30 35 31 39 2e 31 35 30 30 2f 64 69 72 76 69 73 68 2d 6e 61	dirvish-20230519.1500/dirvish-na
17620	72 72 6f 77 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	rrow.el.........................
17640	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
17660	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
17680	30 30 31 31 31 33 31 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 37 35 31 00 20 30 00 00 00	0011131.00000000000.015751..0...
176a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
176c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
176e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
17700	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...................
17720	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...................
17740	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
17760	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
17780	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
177a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
177c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
177e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
17800	3b 3b 3b 20 64 69 72 76 69 73 68 2d 6e 61 72 72 6f 77 2e 65 6c 20 2d 2d 2d 20 4c 69 76 65 2d 6e	;;;.dirvish-narrow.el.---.Live-n
17820	61 72 72 6f 77 69 6e 67 20 6f 66 20 73 65 61 72 63 68 20 72 65 73 75 6c 74 73 20 66 6f 72 20 44	arrowing.of.search.results.for.D
17840	69 72 76 69 73 68 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 20 74 20 2d 2a	irvish.--.lexical-binding:.t.-
17860	2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 32 31 2d 32 30 32 32 20 41 6c	-..;;.Copyright.(C).2021-2022.Al
17880	65 78 20 4c 75 0a 3b 3b 20 41 75 74 68 6f 72 20 3a 20 41 6c 65 78 20 4c 75 20 3c 68 74 74 70 73	ex.Lu.;;.Author.:.Alex.Lu.<https
178a0	3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 61 6c 65 78 6c 75 69 67 69 74 3e 0a 3b 3b 20 56 65 72	://github.com/alexluigit>.;;.Ver
178c0	73 69 6f 6e 3a 20 32 2e 30 2e 35 33 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 66 69 6c 65 73 2c	sion:.2.0.53.;;.Keywords:.files,
178e0	20 63 6f 6e 76 65 6e 69 65 6e 63 65 0a 3b 3b 20 48 6f 6d 65 70 61 67 65 3a 20 68 74 74 70 73 3a	.convenience.;;.Homepage:.https:
17900	2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 61 6c 65 78 6c 75 69 67 69 74 2f 64 69 72 76 69 73 68 0a	//github.com/alexluigit/dirvish.
17920	3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d 49 64 65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d	;;.SPDX-License-Identifier:.GPL-
17940	33 2e 30 2d 6f 72 2d 6c 61 74 65 72 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b	3.0-or-later..;;;.Commentary:..;
17960	3b 20 54 68 69 73 20 70 61 63 6b 61 67 65 20 70 72 6f 76 69 64 65 73 20 6c 69 76 65 20 66 69 6c	;.This.package.provides.live.fil
17980	74 65 72 69 6e 67 20 6f 66 20 66 69 6c 65 73 20 69 6e 20 44 69 72 76 69 73 68 20 62 75 66 66 65	tering.of.files.in.Dirvish.buffe
179a0	72 73 2e 20 20 49 74 20 69 73 20 61 0a 3b 3b 20 73 74 72 69 70 70 65 64 2d 64 6f 77 6e 20 76 65	rs...It.is.a.;;.stripped-down.ve
179c0	72 73 69 6f 6e 20 6f 66 20 60 64 69 72 65 64 2d 6e 61 72 72 6f 77 27 2e 0a 0a 3b 3b 3b 20 43 6f	rsion.of.`dired-narrow'...;;;.Co
179e0	64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 64 69 72 76 69 73 68 29 0a 28 64 65 63 6c 61 72 65	de:..(require.'dirvish).(declare
17a00	2d 66 75 6e 63 74 69 6f 6e 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2d 72 65 76 65 72	-function.dirvish-subtree--rever
17a20	74 20 22 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 22 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d	t."dirvish-subtree")..(defcustom
17a40	20 64 69 72 76 69 73 68 2d 6e 61 72 72 6f 77 2d 72 65 67 65 78 2d 62 75 69 6c 64 65 72 0a 20 20	.dirvish-narrow-regex-builder...
17a60	28 69 66 20 28 66 75 6e 63 74 69 6f 6e 70 20 27 6f 72 64 65 72 6c 65 73 73 2d 70 61 74 74 65 72	(if.(functionp.'orderless-patter
17a80	6e 2d 63 6f 6d 70 69 6c 65 72 29 0a 20 20 20 20 20 20 23 27 6f 72 64 65 72 6c 65 73 73 2d 70 61	n-compiler).......#'orderless-pa
17aa0	74 74 65 72 6e 2d 63 6f 6d 70 69 6c 65 72 0a 20 20 20 20 23 27 73 70 6c 69 74 2d 73 74 72 69 6e	ttern-compiler.....#'split-strin
17ac0	67 29 0a 20 20 22 46 75 6e 63 74 69 6f 6e 20 75 73 65 64 20 74 6f 20 63 6f 6d 70 6f 73 65 20 74	g)..."Function.used.to.compose.t
17ae0	68 65 20 72 65 67 65 78 20 6c 69 73 74 20 66 6f 72 20 6e 61 72 72 6f 77 69 6e 67 2e 0a 54 68 65	he.regex.list.for.narrowing..The
17b00	20 66 75 6e 63 74 69 6f 6e 20 74 61 6b 65 73 20 74 68 65 20 69 6e 70 75 74 20 73 74 72 69 6e 67	.function.takes.the.input.string
17b20	20 61 73 20 69 74 73 20 73 6f 6c 65 20 61 72 67 75 6d 65 6e 74 20 61 6e 64 0a 73 68 6f 75 6c 64	.as.its.sole.argument.and.should
17b40	20 72 65 74 75 72 6e 20 61 20 6c 69 73 74 20 6f 66 20 72 65 67 75 6c 61 72 20 65 78 70 72 65 73	.return.a.list.of.regular.expres
17b60	73 69 6f 6e 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 20 3a 74 79 70 65 20	sions."...:group.'dirvish.:type.
17b80	27 66 75 6e 63 74 69 6f 6e 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 6e	'function)..(defcustom.dirvish-n
17ba0	61 72 72 6f 77 2d 64 65 62 6f 75 6e 63 65 20 30 2e 32 0a 20 20 22 4c 69 6b 65 20 60 64 69 72 76	arrow-debounce.0.2..."Like.`dirv
17bc0	69 73 68 2d 72 65 64 69 73 70 6c 61 79 2d 64 65 62 6f 75 6e 63 65 27 2c 20 62 75 74 20 75 73 65	ish-redisplay-debounce',.but.use
17be0	64 20 66 6f 72 20 6e 61 72 72 6f 77 69 6e 67 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76	d.for.narrowing."...:group.'dirv
17c00	69 73 68 20 3a 74 79 70 65 20 27 66 6c 6f 61 74 29 0a 0a 28 64 65 66 76 61 72 20 64 69 72 76 69	ish.:type.'float)..(defvar.dirvi
17c20	73 68 2d 6e 61 72 72 6f 77 2d 64 65 62 6f 75 6e 63 65 2d 74 69 6d 65 72 20 6e 69 6c 29 0a 28 64	sh-narrow-debounce-timer.nil).(d
17c40	65 66 76 61 72 2d 6c 6f 63 61 6c 20 64 69 72 76 69 73 68 2d 6e 61 72 72 6f 77 2d 2d 73 75 62 64	efvar-local.dirvish-narrow--subd
17c60	69 72 2d 61 6c 69 73 74 20 27 28 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 6e 61	ir-alist.'())..(defun.dirvish-na
17c80	72 72 6f 77 2d 2d 62 75 69 6c 64 2d 69 6e 64 69 63 65 73 20 28 29 0a 20 20 22 55 70 64 61 74 65	rrow--build-indices.()..."Update
17ca0	20 74 68 65 20 44 69 72 76 69 73 68 20 62 75 66 66 65 72 20 62 61 73 65 64 20 6f 6e 20 74 68 65	.the.Dirvish.buffer.based.on.the
17cc0	20 69 6e 70 75 74 20 6f 66 20 74 68 65 20 6d 69 6e 69 62 75 66 66 65 72 2e 22 0a 20 20 28 73 65	.input.of.the.minibuffer."...(se
17ce0	74 71 20 64 69 72 76 69 73 68 2d 6e 61 72 72 6f 77 2d 2d 73 75 62 64 69 72 2d 61 6c 69 73 74 20	tq.dirvish-narrow--subdir-alist.
17d00	27 28 29 29 0a 20 20 28 77 68 65 6e 20 28 62 6f 75 6e 64 2d 61 6e 64 2d 74 72 75 65 2d 70 20 64	'())...(when.(bound-and-true-p.d
17d20	69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2d 6f 76 65 72 6c 61 79 73 29 0a 20 20 20 20 28 64	irvish-subtree--overlays).....(d
17d40	69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2d 72 65 76 65 72 74 20 74 29 29 0a 20 20 28 73 61	irvish-subtree--revert.t))...(sa
17d60	76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62	ve-excursion.....(with-current-b
17d80	75 66 66 65 72 20 28 77 69 6e 64 6f 77 2d 62 75 66 66 65 72 20 28 6d 69 6e 69 62 75 66 66 65 72	uffer.(window-buffer.(minibuffer
17da0	2d 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 29 29 0a 20 20 20 20 20 20 28 63 6c 2d 6c 6f 6f	-selected-window)).......(cl-loo
17dc0	70 20 66 6f 72 20 28 64 69 72 20 2e 20 62 65 67 29 20 69 6e 20 64 69 72 65 64 2d 73 75 62 64 69	p.for.(dir...beg).in.dired-subdi
17de0	72 2d 61 6c 69 73 74 20 64 6f 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69	r-alist.do................(dirvi
17e00	73 68 2d 6e 61 72 72 6f 77 2d 2d 69 6e 64 65 78 2d 73 75 62 64 69 72 20 64 69 72 20 62 65 67 29	sh-narrow--index-subdir.dir.beg)
17e20	29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 6e 61 72 72 6f 77 2d 75 70 64 61	))))..(defun.dirvish-narrow-upda
17e40	74 65 2d 68 20 28 29 0a 20 20 22 55 70 64 61 74 65 20 74 68 65 20 44 69 72 76 69 73 68 20 62 75	te-h.()..."Update.the.Dirvish.bu
17e60	66 66 65 72 20 62 61 73 65 64 20 6f 6e 20 74 68 65 20 69 6e 70 75 74 20 6f 66 20 74 68 65 20 6d	ffer.based.on.the.input.of.the.m
17e80	69 6e 69 62 75 66 66 65 72 2e 22 0a 20 20 28 64 69 72 76 69 73 68 2d 64 65 62 6f 75 6e 63 65 20	inibuffer."...(dirvish-debounce.
17ea0	6e 61 72 72 6f 77 0a 20 20 20 20 28 6c 65 74 2a 20 28 28 69 6e 70 75 74 20 28 6d 69 6e 69 62 75	narrow.....(let*.((input.(minibu
17ec0	66 66 65 72 2d 63 6f 6e 74 65 6e 74 73 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 29 29 0a 20 20	ffer-contents-no-properties))...
17ee0	20 20 20 20 20 20 20 20 20 28 72 65 67 65 78 2d 6c 69 73 74 20 28 66 75 6e 63 61 6c 6c 20 64 69	.........(regex-list.(funcall.di
17f00	72 76 69 73 68 2d 6e 61 72 72 6f 77 2d 72 65 67 65 78 2d 62 75 69 6c 64 65 72 20 69 6e 70 75 74	rvish-narrow-regex-builder.input
17f20	29 29 29 0a 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 28	))).......(with-current-buffer.(
17f40	77 69 6e 64 6f 77 2d 62 75 66 66 65 72 20 28 6d 69 6e 69 62 75 66 66 65 72 2d 73 65 6c 65 63 74	window-buffer.(minibuffer-select
17f60	65 64 2d 77 69 6e 64 6f 77 29 29 0a 20 20 20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73	ed-window)).........(save-excurs
17f80	69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 69 64 78 20 66	ion...........(cl-loop.for.idx.f
17fa0	72 6f 6d 20 30 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 28 64 69	rom.0....................for.(di
17fc0	72 20 2e 20 70 6f 73 29 20 69 6e 20 64 69 72 65 64 2d 73 75 62 64 69 72 2d 61 6c 69 73 74 0a 20	r...pos).in.dired-subdir-alist..
17fe0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 6f 20 28 64 69 72 76 69 73 68 2d 6e 61	..................do.(dirvish-na
18000	72 72 6f 77 2d 2d 66 69 6c 74 65 72 2d 73 75 62 64 69 72 20 64 69 72 20 70 6f 73 20 72 65 67 65	rrow--filter-subdir.dir.pos.rege
18020	78 2d 6c 69 73 74 20 69 64 78 29 29 29 0a 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 75	x-list.idx))).........(dirvish-u
18040	70 64 61 74 65 2d 62 6f 64 79 2d 68 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73	pdate-body-h)))))..(defun.dirvis
18060	68 2d 6e 61 72 72 6f 77 2d 2d 72 65 76 65 72 74 20 28 29 0a 20 20 22 52 65 76 65 72 74 20 44 69	h-narrow--revert.()..."Revert.Di
18080	72 76 69 73 68 20 62 75 66 66 65 72 20 77 69 74 68 20 65 6d 70 74 79 20 6e 61 72 72 6f 77 69 6e	rvish.buffer.with.empty.narrowin
180a0	67 20 66 69 6c 74 65 72 2e 22 0a 20 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 69 64 78 20 66 72	g.filter."...(cl-loop.for.idx.fr
180c0	6f 6d 20 30 0a 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 28 64 69 72 20 2e 20 70 6f 73 29 20	om.0............for.(dir...pos).
180e0	69 6e 20 64 69 72 65 64 2d 73 75 62 64 69 72 2d 61 6c 69 73 74 0a 20 20 20 20 20 20 20 20 20 20	in.dired-subdir-alist...........
18100	20 64 6f 20 28 64 69 72 76 69 73 68 2d 6e 61 72 72 6f 77 2d 2d 66 69 6c 74 65 72 2d 73 75 62 64	.do.(dirvish-narrow--filter-subd
18120	69 72 20 64 69 72 20 70 6f 73 20 6e 69 6c 20 69 64 78 29 29 29 0a 0a 28 63 6c 2d 64 65 66 75 6e	ir.dir.pos.nil.idx)))..(cl-defun
18140	20 64 69 72 76 69 73 68 2d 6e 61 72 72 6f 77 2d 2d 69 6e 64 65 78 2d 73 75 62 64 69 72 20 28 73	.dirvish-narrow--index-subdir.(s
18160	75 62 64 69 72 20 62 65 67 29 0a 20 20 22 46 69 6c 74 65 72 20 74 68 65 20 53 55 42 44 49 52 20	ubdir.beg)..."Filter.the.SUBDIR.
18180	66 72 6f 6d 20 42 45 47 20 74 6f 20 45 4e 44 2e 22 0a 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 62	from.BEG.to.END."...(goto-char.b
181a0	65 67 29 0a 20 20 28 6c 65 74 20 28 28 65 6e 64 20 28 64 69 72 65 64 2d 73 75 62 64 69 72 2d 6d	eg)...(let.((end.(dired-subdir-m
181c0	61 78 29 29 20 66 69 6c 65 73 29 0a 20 20 20 20 28 77 68 69 6c 65 20 28 3c 20 28 70 6f 69 6e 74	ax)).files).....(while.(<.(point
181e0	29 20 65 6e 64 29 0a 20 20 20 20 20 20 28 77 68 65 6e 2d 6c 65 74 2a 20 28 28 66 2d 62 65 67 20	).end).......(when-let*.((f-beg.
18200	28 64 69 72 65 64 2d 6d 6f 76 65 2d 74 6f 2d 66 69 6c 65 6e 61 6d 65 29 29 0a 20 20 20 20 20 20	(dired-move-to-filename)).......
18220	20 20 20 20 20 20 20 20 20 20 20 20 28 66 2d 65 6e 64 20 28 64 69 72 65 64 2d 6d 6f 76 65 2d 74	............(f-end.(dired-move-t
18240	6f 2d 65 6e 64 2d 6f 66 2d 66 69 6c 65 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	o-end-of-filename)).............
18260	20 20 20 20 20 20 28 66 2d 6e 61 6d 65 20 28 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 2d	......(f-name.(buffer-substring-
18280	6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 66 2d 62 65 67 20 66 2d 65 6e 64 29 29 0a 20 20 20 20	no-properties.f-beg.f-end)).....
182a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 2d 62 65 67 20 28 6c 69 6e 65 2d 62 65 67 69 6e	..............(l-beg.(line-begin
182c0	6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ning-position)).................
182e0	20 20 28 6c 2d 65 6e 64 20 28 31 2b 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 29	..(l-end.(1+.(line-end-position)
18300	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 2d 73 74 72 20 28 62 75 66	))...................(l-str.(buf
18320	66 65 72 2d 73 75 62 73 74 72 69 6e 67 20 6c 2d 62 65 67 20 6c 2d 65 6e 64 29 29 29 0a 20 20 20	fer-substring.l-beg.l-end)))....
18340	20 20 20 20 20 28 70 75 73 68 20 28 63 6f 6e 73 20 66 2d 6e 61 6d 65 20 6c 2d 73 74 72 29 20 66	.....(push.(cons.f-name.l-str).f
18360	69 6c 65 73 29 29 0a 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 31 29 29 0a 20	iles)).......(forward-line.1))..
18380	20 20 20 28 70 75 73 68 20 28 63 6f 6e 73 20 73 75 62 64 69 72 20 28 72 65 76 65 72 73 65 20 66	...(push.(cons.subdir.(reverse.f
183a0	69 6c 65 73 29 29 20 64 69 72 76 69 73 68 2d 6e 61 72 72 6f 77 2d 2d 73 75 62 64 69 72 2d 61 6c	iles)).dirvish-narrow--subdir-al
183c0	69 73 74 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 6e 61 72 72 6f 77 2d 2d 66	ist)))..(defun.dirvish-narrow--f
183e0	69 6c 74 65 72 2d 73 75 62 64 69 72 20 28 64 69 72 20 70 6f 73 20 72 65 67 65 78 73 20 69 64 78	ilter-subdir.(dir.pos.regexs.idx
18400	29 0a 20 20 22 46 69 6c 74 65 72 20 74 68 65 20 73 75 62 64 69 72 20 44 49 52 20 69 6e 20 50 4f	)..."Filter.the.subdir.DIR.in.PO
18420	53 20 77 69 74 68 20 52 45 47 45 58 53 2e 0a 49 44 58 20 74 68 65 20 69 6e 64 65 78 20 6f 66 20	S.with.REGEXS..IDX.the.index.of.
18440	44 49 52 20 69 6e 20 60 64 69 72 65 64 2d 73 75 62 64 69 72 2d 61 6c 69 73 74 27 2e 22 0a 20 20	DIR.in.`dired-subdir-alist'."...
18460	28 67 6f 74 6f 2d 63 68 61 72 20 70 6f 73 29 0a 20 20 28 6c 65 74 2a 20 28 28 66 69 6c 65 73 20	(goto-char.pos)...(let*.((files.
18480	28 61 6c 69 73 74 2d 67 65 74 20 64 69 72 20 64 69 72 76 69 73 68 2d 6e 61 72 72 6f 77 2d 2d 73	(alist-get.dir.dirvish-narrow--s
184a0	75 62 64 69 72 2d 61 6c 69 73 74 20 6e 69 6c 20 6e 69 6c 20 23 27 65 71 75 61 6c 29 29 0a 20 20	ubdir-alist.nil.nil.#'equal))...
184c0	20 20 20 20 20 20 20 28 65 6e 64 20 28 2d 20 28 64 69 72 65 64 2d 73 75 62 64 69 72 2d 6d 61 78	.......(end.(-.(dired-subdir-max
184e0	29 20 28 69 66 20 28 65 71 20 69 64 78 20 30 29 20 30 20 31 29 29 29 0a 20 20 20 20 20 20 20 20	).(if.(eq.idx.0).0.1))).........
18500	20 28 6f 66 66 73 65 74 20 28 31 2d 20 28 6c 69 6e 65 2d 6e 75 6d 62 65 72 2d 61 74 2d 70 6f 73	.(offset.(1-.(line-number-at-pos
18520	20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 63 6f 6e 74 65 6e 74 2d 62 65 67 69 6e 29 29 29	.(dirvish-prop.:content-begin)))
18540	29 0a 20 20 20 20 20 20 20 20 20 28 62 65 67 20 28 70 72 6f 67 6e 20 28 66 6f 72 77 61 72 64 2d	)..........(beg.(progn.(forward-
18560	6c 69 6e 65 20 6f 66 66 73 65 74 29 20 28 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 20	line.offset).(point)))..........
18580	62 75 66 66 65 72 2d 72 65 61 64 2d 6f 6e 6c 79 29 0a 20 20 20 20 28 64 65 6c 65 74 65 2d 72 65	buffer-read-only).....(delete-re
185a0	67 69 6f 6e 20 62 65 67 20 65 6e 64 29 0a 20 20 20 20 28 69 66 20 28 6e 6f 74 20 72 65 67 65 78	gion.beg.end).....(if.(not.regex
185c0	73 29 0a 20 20 20 20 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 28 5f 20 2e 20 6c 69 6e	s).........(cl-loop.for.(_...lin
185e0	65 29 20 69 6e 20 66 69 6c 65 73 20 64 6f 20 28 69 6e 73 65 72 74 20 6c 69 6e 65 29 29 0a 20 20	e).in.files.do.(insert.line))...
18600	20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 28 66 69 6c 65 20 2e 20 6c 69 6e 65 29 20 69	....(cl-loop.for.(file...line).i
18620	6e 20 66 69 6c 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 75 6e 6c 65 73 73 20 28 63	n.files................unless.(c
18640	6c 2d 6c 6f 6f 70 20 66 6f 72 20 72 65 67 65 78 20 69 6e 20 72 65 67 65 78 73 0a 20 20 20 20 20	l-loop.for.regex.in.regexs......
18660	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 74 68 65 72 65 69	..........................therei
18680	73 20 28 6e 6f 74 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 72 65 67 65 78 20 66 69 6c 65 29	s.(not.(string-match.regex.file)
186a0	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 6f 20 28 69 6e 73 65 72 74 20 6c 69 6e	))................do.(insert.lin
186c0	65 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 6e 61 72 72 6f 77 2d 6d 69	e)))))..(defun.dirvish-narrow-mi
186e0	6e 69 62 75 66 66 65 72 2d 73 65 74 75 70 2d 68 20 28 29 0a 20 20 22 4d 69 6e 69 62 75 66 66 65	nibuffer-setup-h.()..."Minibuffe
18700	72 20 73 65 74 75 70 20 66 75 6e 63 74 69 6f 6e 20 66 6f 72 20 60 64 69 72 76 69 73 68 2d 6e 61	r.setup.function.for.`dirvish-na
18720	72 72 6f 77 27 2e 22 0a 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 28	rrow'."...(with-current-buffer.(
18740	77 69 6e 64 6f 77 2d 62 75 66 66 65 72 20 28 6d 69 6e 69 62 75 66 66 65 72 2d 73 65 6c 65 63 74	window-buffer.(minibuffer-select
18760	65 64 2d 77 69 6e 64 6f 77 29 29 0a 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 64 69 72 76	ed-window)).....(goto-char.(dirv
18780	69 73 68 2d 70 72 6f 70 20 3a 63 6f 6e 74 65 6e 74 2d 62 65 67 69 6e 29 29 0a 20 20 20 20 28 64	ish-prop.:content-begin)).....(d
187a0	69 72 76 69 73 68 2d 75 70 64 61 74 65 2d 62 6f 64 79 2d 68 29 29 0a 20 20 28 61 64 64 2d 68 6f	irvish-update-body-h))...(add-ho
187c0	6f 6b 20 27 70 6f 73 74 2d 63 6f 6d 6d 61 6e 64 2d 68 6f 6f 6b 20 23 27 64 69 72 76 69 73 68 2d	ok.'post-command-hook.#'dirvish-
187e0	6e 61 72 72 6f 77 2d 75 70 64 61 74 65 2d 68 20 6e 69 6c 20 74 29 29 0a 0a 3b 3b 3b 23 23 23 61	narrow-update-h.nil.t))..;;;###a
18800	75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 6e 61 72 72 6f 77 20 28 29	utoload.(defun.dirvish-narrow.()
18820	0a 20 20 22 4e 61 72 72 6f 77 20 61 20 44 69 72 76 69 73 68 20 62 75 66 66 65 72 20 74 6f 20 74	..."Narrow.a.Dirvish.buffer.to.t
18840	68 65 20 66 69 6c 65 73 20 6d 61 74 63 68 69 6e 67 20 61 20 72 65 67 65 78 2e 22 0a 20 20 28 69	he.files.matching.a.regex."...(i
18860	6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 64 69 72 76 69 73 68 2d 6e 61 72 72 6f 77 2d 2d 62	nteractive)...(dirvish-narrow--b
18880	75 69 6c 64 2d 69 6e 64 69 63 65 73 29 0a 20 20 28 77 68 65 6e 20 28 6d 69 6e 69 62 75 66 66 65	uild-indices)...(when.(minibuffe
188a0	72 70 29 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 60 25 73 27 20 63 61 6c 6c 65 64 20 69 6e 73	rp).(user-error."`%s'.called.ins
188c0	69 64 65 20 74 68 65 20 6d 69 6e 69 62 75 66 66 65 72 22 20 74 68 69 73 2d 63 6f 6d 6d 61 6e 64	ide.the.minibuffer".this-command
188e0	29 29 0a 20 20 28 6c 65 74 20 28 28 6f 6c 64 2d 66 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20	))...(let.((old-f.(dirvish-prop.
18900	3a 69 6e 64 65 78 29 29 20 66 69 6e 61 6c 2d 69 6e 70 75 74 29 0a 20 20 20 20 28 6d 69 6e 69 62	:index)).final-input).....(minib
18920	75 66 66 65 72 2d 77 69 74 68 2d 73 65 74 75 70 2d 68 6f 6f 6b 20 23 27 64 69 72 76 69 73 68 2d	uffer-with-setup-hook.#'dirvish-
18940	6e 61 72 72 6f 77 2d 6d 69 6e 69 62 75 66 66 65 72 2d 73 65 74 75 70 2d 68 0a 20 20 20 20 20 20	narrow-minibuffer-setup-h.......
18960	28 75 6e 77 69 6e 64 2d 70 72 6f 74 65 63 74 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20	(unwind-protect...........(setq.
18980	66 69 6e 61 6c 2d 69 6e 70 75 74 20 28 72 65 61 64 2d 66 72 6f 6d 2d 6d 69 6e 69 62 75 66 66 65	final-input.(read-from-minibuffe
189a0	72 20 22 46 6f 63 75 73 20 6f 6e 20 66 69 6c 65 73 3a 20 22 29 29 0a 20 20 20 20 20 20 20 20 28	r."Focus.on.files:.")).........(
189c0	77 68 65 6e 20 28 3d 20 28 6c 65 6e 67 74 68 20 66 69 6e 61 6c 2d 69 6e 70 75 74 29 20 30 29 20	when.(=.(length.final-input).0).
189e0	28 64 69 72 76 69 73 68 2d 6e 61 72 72 6f 77 2d 2d 72 65 76 65 72 74 29 29 0a 20 20 20 20 20 20	(dirvish-narrow--revert)).......
18a00	20 20 28 64 69 72 65 64 2d 67 6f 74 6f 2d 66 69 6c 65 20 6f 6c 64 2d 66 29 29 29 29 29 0a 0a 28	..(dired-goto-file.old-f)))))..(
18a20	70 72 6f 76 69 64 65 20 27 64 69 72 76 69 73 68 2d 6e 61 72 72 6f 77 29 0a 3b 3b 3b 20 64 69 72	provide.'dirvish-narrow).;;;.dir
18a40	76 69 73 68 2d 6e 61 72 72 6f 77 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00	vish-narrow.el.ends.here........
18a60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18a80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18aa0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18ac0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18ae0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18b00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18b20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18b40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18b60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18b80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18ba0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18bc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18be0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18c00	64 69 72 76 69 73 68 2d 32 30 32 33 30 35 31 39 2e 31 35 30 30 2f 64 69 72 76 69 73 68 2d 70 65	dirvish-20230519.1500/dirvish-pe
18c20	65 6b 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	ek.el...........................
18c40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18c60	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
18c80	30 30 31 30 34 33 37 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 33 37 35 00 20 30 00 00 00	0010437.00000000000.015375..0...
18ca0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18cc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18ce0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18d00	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...................
18d20	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...................
18d40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18d60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18d80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18da0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18dc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18de0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18e00	3b 3b 3b 20 64 69 72 76 69 73 68 2d 70 65 65 6b 2e 65 6c 20 2d 2d 2d 20 4d 69 6e 69 62 75 66 66	;;;.dirvish-peek.el.---.Minibuff
18e20	65 72 20 66 69 6c 65 20 70 72 65 76 69 65 77 20 70 6f 77 65 72 65 64 20 62 79 20 44 69 72 76 69	er.file.preview.powered.by.Dirvi
18e40	73 68 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 20 74 20 2d 2a 2d 0a 0a 3b	sh.--.lexical-binding:.t.--..;
18e60	3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 32 31 2d 32 30 32 32 20 41 6c 65 78 20 4c	;.Copyright.(C).2021-2022.Alex.L
18e80	75 0a 3b 3b 20 41 75 74 68 6f 72 20 3a 20 41 6c 65 78 20 4c 75 20 3c 68 74 74 70 73 3a 2f 2f 67	u.;;.Author.:.Alex.Lu.<https://g
18ea0	69 74 68 75 62 2e 63 6f 6d 2f 61 6c 65 78 6c 75 69 67 69 74 3e 0a 3b 3b 20 56 65 72 73 69 6f 6e	ithub.com/alexluigit>.;;.Version
18ec0	3a 20 32 2e 30 2e 35 33 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 66 69 6c 65 73 2c 20 63 6f 6e	:.2.0.53.;;.Keywords:.files,.con
18ee0	76 65 6e 69 65 6e 63 65 0a 3b 3b 20 48 6f 6d 65 70 61 67 65 3a 20 68 74 74 70 73 3a 2f 2f 67 69	venience.;;.Homepage:.https://gi
18f00	74 68 75 62 2e 63 6f 6d 2f 61 6c 65 78 6c 75 69 67 69 74 2f 64 69 72 76 69 73 68 0a 3b 3b 20 53	thub.com/alexluigit/dirvish.;;.S
18f20	50 44 58 2d 4c 69 63 65 6e 73 65 2d 49 64 65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d	PDX-License-Identifier:.GPL-3.0-
18f40	6f 72 2d 6c 61 74 65 72 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 20 60 64	or-later..;;;.Commentary:..;;.`d
18f60	69 72 76 69 73 68 2d 70 65 65 6b 2d 6d 6f 64 65 27 20 67 69 76 65 73 20 79 6f 75 20 66 69 6c 65	irvish-peek-mode'.gives.you.file
18f80	20 70 72 65 76 69 65 77 20 77 68 65 6e 20 6e 61 72 72 6f 77 69 6e 67 20 63 61 6e 64 69 64 61 74	.preview.when.narrowing.candidat
18fa0	65 73 20 75 73 69 6e 67 20 6d 69 6e 69 62 75 66 66 65 72 2e 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a	es.using.minibuffer...;;;.Code:.
18fc0	0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 76 65 72 74 69 63 6f 2d 2d 63 61 6e 64	.(declare-function.vertico--cand
18fe0	69 64 61 74 65 20 22 76 65 72 74 69 63 6f 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69	idate."vertico").(declare-functi
19000	6f 6e 20 73 65 6c 65 63 74 72 75 6d 2d 2d 67 65 74 2d 63 61 6e 64 69 64 61 74 65 20 22 73 65 6c	on.selectrum--get-candidate."sel
19020	65 63 74 72 75 6d 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 73 65 6c 65 63	ectrum").(declare-function.selec
19040	74 72 75 6d 2d 2d 67 65 74 2d 66 75 6c 6c 20 22 73 65 6c 65 63 74 72 75 6d 22 29 0a 28 64 65 66	trum--get-full."selectrum").(def
19060	76 61 72 20 73 65 6c 65 63 74 72 75 6d 2d 2d 63 75 72 72 65 6e 74 2d 63 61 6e 64 69 64 61 74 65	var.selectrum--current-candidate
19080	2d 69 6e 64 65 78 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 69 76 79 2d 73 74	-index).(declare-function.ivy-st
190a0	61 74 65 2d 63 75 72 72 65 6e 74 20 22 69 76 79 22 29 0a 28 64 65 66 76 61 72 20 69 76 79 2d 6c	ate-current."ivy").(defvar.ivy-l
190c0	61 73 74 29 0a 28 72 65 71 75 69 72 65 20 27 64 69 72 76 69 73 68 29 0a 28 72 65 71 75 69 72 65	ast).(require.'dirvish).(require
190e0	20 27 66 69 6e 64 2d 66 75 6e 63 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68	.'find-func)..(defcustom.dirvish
19100	2d 70 65 65 6b 2d 63 61 6e 64 69 64 61 74 65 2d 66 65 74 63 68 65 72 20 6e 69 6c 0a 20 20 22 46	-peek-candidate-fetcher.nil..."F
19120	75 6e 63 74 69 6f 6e 20 74 6f 20 67 65 74 20 63 75 72 72 65 6e 74 20 63 61 6e 64 69 64 61 74 65	unction.to.get.current.candidate
19140	20 69 6e 20 6d 69 6e 69 62 75 66 66 65 72 2e 0a 49 66 20 74 68 69 73 20 76 61 6c 75 65 20 69 73	.in.minibuffer..If.this.value.is
19160	20 6e 69 6c 2c 20 61 20 63 61 6e 64 69 64 61 74 65 20 66 65 74 63 68 65 72 20 66 75 6e 63 74 69	.nil,.a.candidate.fetcher.functi
19180	6f 6e 20 69 73 0a 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 63 68 6f 6f 73 65 64 20 61 63 63 6f	on.is.automatically.choosed.acco
191a0	72 64 69 6e 67 20 74 6f 20 79 6f 75 72 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 66 72 61 6d 65 77 6f	rding.to.your.completion.framewo
191c0	72 6b 0a 62 65 69 6e 67 20 75 73 65 64 20 61 74 20 72 75 6e 74 69 6d 65 2e 22 0a 20 20 3a 67 72	rk.being.used.at.runtime."...:gr
191e0	6f 75 70 20 27 64 69 72 76 69 73 68 20 3a 74 79 70 65 20 27 28 63 68 6f 69 63 65 20 66 75 6e 63	oup.'dirvish.:type.'(choice.func
19200	74 69 6f 6e 20 6e 69 6c 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 70	tion.nil))..(defcustom.dirvish-p
19220	65 65 6b 2d 63 61 74 65 67 6f 72 69 65 73 20 27 28 66 69 6c 65 20 70 72 6f 6a 65 63 74 2d 66 69	eek-categories.'(file.project-fi
19240	6c 65 20 6c 69 62 72 61 72 79 29 0a 20 20 22 4d 69 6e 69 62 75 66 66 65 72 20 6d 65 74 61 64 61	le.library)..."Minibuffer.metada
19260	74 61 20 63 61 74 65 67 6f 72 69 65 73 20 74 6f 20 73 68 6f 77 20 66 69 6c 65 20 70 72 65 76 69	ta.categories.to.show.file.previ
19280	65 77 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 20 3a 74 79 70 65 20 27 6c 69	ew."...:group.'dirvish.:type.'li
192a0	73 74 29 0a 0a 28 64 65 66 76 61 72 20 64 69 72 76 69 73 68 2d 70 65 65 6b 2d 2d 63 61 6e 64 2d	st)..(defvar.dirvish-peek--cand-
192c0	66 65 74 63 68 65 72 20 6e 69 6c 29 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 70 65 65 6b	fetcher.nil).(defun.dirvish-peek
192e0	2d 2d 70 72 65 70 61 72 65 2d 63 61 6e 64 2d 66 65 74 63 68 65 72 20 28 29 0a 20 20 22 53 65 74	--prepare-cand-fetcher.()..."Set
19300	20 63 61 6e 64 69 64 61 74 65 20 66 65 74 63 68 65 72 20 61 63 63 6f 72 64 69 6e 67 20 74 6f 20	.candidate.fetcher.according.to.
19320	63 75 72 72 65 6e 74 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 66 72 61 6d 65 77 6f 72 6b 2e 22 0a 20	current.completion.framework."..
19340	20 28 73 65 74 71 20 64 69 72 76 69 73 68 2d 70 65 65 6b 2d 2d 63 61 6e 64 2d 66 65 74 63 68 65	.(setq.dirvish-peek--cand-fetche
19360	72 0a 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 64 69 72 76 69 73 68 2d 70 65 65 6b 2d 63 61	r.........(cond.(dirvish-peek-ca
19380	6e 64 69 64 61 74 65 2d 66 65 74 63 68 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64	ndidate-fetcher................d
193a0	69 72 76 69 73 68 2d 70 65 65 6b 2d 63 61 6e 64 69 64 61 74 65 2d 66 65 74 63 68 65 72 29 0a 20	irvish-peek-candidate-fetcher)..
193c0	20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 62 6f 75 6e 64 2d 61 6e 64 2d 74 72 75 65 2d 70 20	.............((bound-and-true-p.
193e0	76 65 72 74 69 63 6f 2d 6d 6f 64 65 29 20 23 27 76 65 72 74 69 63 6f 2d 2d 63 61 6e 64 69 64 61	vertico-mode).#'vertico--candida
19400	74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 62 6f 75 6e 64 2d 61 6e 64 2d 74 72	te)...............((bound-and-tr
19420	75 65 2d 70 20 73 65 6c 65 63 74 72 75 6d 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20	ue-p.selectrum-mode)............
19440	20 20 20 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	....(lambda.()..................
19460	28 73 65 6c 65 63 74 72 75 6d 2d 2d 67 65 74 2d 66 75 6c 6c 0a 20 20 20 20 20 20 20 20 20 20 20	(selectrum--get-full............
19480	20 20 20 20 20 20 20 28 73 65 6c 65 63 74 72 75 6d 2d 2d 67 65 74 2d 63 61 6e 64 69 64 61 74 65	.......(selectrum--get-candidate
194a0	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 65 6c 65 63 74 72 75 6d 2d 2d 63	....................selectrum--c
194c0	75 72 72 65 6e 74 2d 63 61 6e 64 69 64 61 74 65 2d 69 6e 64 65 78 29 29 29 29 0a 20 20 20 20 20	urrent-candidate-index))))......
194e0	20 20 20 20 20 20 20 20 20 28 28 62 6f 75 6e 64 2d 61 6e 64 2d 74 72 75 65 2d 70 20 69 76 79 2d	.........((bound-and-true-p.ivy-
19500	6d 6f 64 65 29 20 28 6c 61 6d 62 64 61 20 28 29 20 28 69 76 79 2d 73 74 61 74 65 2d 63 75 72 72	mode).(lambda.().(ivy-state-curr
19520	65 6e 74 20 69 76 79 2d 6c 61 73 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28	ent.ivy-last)))...............((
19540	62 6f 75 6e 64 2d 61 6e 64 2d 74 72 75 65 2d 70 20 69 63 6f 6d 70 6c 65 74 65 2d 6d 6f 64 65 29	bound-and-true-p.icomplete-mode)
19560	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 29 20 28 63 61 72 20	................(lambda.().(car.
19580	63 6f 6d 70 6c 65 74 69 6f 6e 2d 61 6c 6c 2d 73 6f 72 74 65 64 2d 63 6f 6d 70 6c 65 74 69 6f 6e	completion-all-sorted-completion
195a0	73 29 29 29 29 29 29 0a 0a 28 64 65 66 76 61 72 20 64 69 72 76 69 73 68 2d 70 65 65 6b 2d 2d 63	s))))))..(defvar.dirvish-peek--c
195c0	75 72 72 2d 63 61 74 65 67 6f 72 79 20 6e 69 6c 29 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68	urr-category.nil).(defun.dirvish
195e0	2d 70 65 65 6b 2d 73 65 74 75 70 2d 68 20 28 29 0a 20 20 22 43 72 65 61 74 65 20 64 69 72 76 69	-peek-setup-h.()..."Create.dirvi
19600	73 68 20 6d 69 6e 69 62 75 66 66 65 72 20 70 72 65 76 69 65 77 20 77 69 6e 64 6f 77 2e 0a 54 68	sh.minibuffer.preview.window..Th
19620	65 20 77 69 6e 64 6f 77 20 69 73 20 63 72 65 61 74 65 64 20 6f 6e 6c 79 20 77 68 65 6e 20 6d 65	e.window.is.created.only.when.me
19640	74 61 64 61 74 61 20 69 6e 20 63 75 72 72 65 6e 74 20 6d 69 6e 69 62 75 66 66 65 72 20 69 73 0a	tadata.in.current.minibuffer.is.
19660	6f 6e 65 20 6f 66 20 63 61 74 65 67 6f 72 69 65 73 20 69 6e 20 60 64 69 72 76 69 73 68 2d 70 65	one.of.categories.in.`dirvish-pe
19680	65 6b 2d 63 61 74 65 67 6f 72 69 65 73 27 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 6d 65 74 61 20	ek-categories'."...(let*.((meta.
196a0	28 69 67 6e 6f 72 65 2d 65 72 72 6f 72 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	(ignore-errors..................
196c0	28 63 6f 6d 70 6c 65 74 69 6f 6e 2d 6d 65 74 61 64 61 74 61 0a 20 20 20 20 20 20 20 20 20 20 20	(completion-metadata............
196e0	20 20 20 20 20 20 20 28 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70	.......(buffer-substring-no-prop
19700	65 72 74 69 65 73 20 28 66 69 65 6c 64 2d 62 65 67 69 6e 6e 69 6e 67 29 20 28 70 6f 69 6e 74 29	erties.(field-beginning).(point)
19720	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6d 69 6e 69 62 75 66 66 65 72 2d 63	)...................minibuffer-c
19740	6f 6d 70 6c 65 74 69 6f 6e 2d 74 61 62 6c 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ompletion-table.................
19760	20 20 6d 69 6e 69 62 75 66 66 65 72 2d 63 6f 6d 70 6c 65 74 69 6f 6e 2d 70 72 65 64 69 63 61 74	..minibuffer-completion-predicat
19780	65 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 63 61 74 65 67 6f 72 79 20 28 63 6f 6d 70 6c 65 74	e)))..........(category.(complet
197a0	69 6f 6e 2d 6d 65 74 61 64 61 74 61 2d 67 65 74 20 6d 65 74 61 20 27 63 61 74 65 67 6f 72 79 29	ion-metadata-get.meta.'category)
197c0	29 0a 20 20 20 20 20 20 20 20 20 28 70 2d 63 61 74 65 67 6f 72 79 20 28 61 6e 64 20 28 6d 65 6d	)..........(p-category.(and.(mem
197e0	71 20 63 61 74 65 67 6f 72 79 20 64 69 72 76 69 73 68 2d 70 65 65 6b 2d 63 61 74 65 67 6f 72 69	q.category.dirvish-peek-categori
19800	65 73 29 20 63 61 74 65 67 6f 72 79 29 29 0a 20 20 20 20 20 20 20 20 20 6e 65 77 2d 64 76 29 0a	es).category))..........new-dv).
19820	20 20 20 20 28 73 65 74 71 20 64 69 72 76 69 73 68 2d 70 65 65 6b 2d 2d 63 75 72 72 2d 63 61 74	....(setq.dirvish-peek--curr-cat
19840	65 67 6f 72 79 20 70 2d 63 61 74 65 67 6f 72 79 29 0a 20 20 20 20 28 77 68 65 6e 20 70 2d 63 61	egory.p-category).....(when.p-ca
19860	74 65 67 6f 72 79 0a 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 70 65 65 6b 2d 2d 70 72 65 70	tegory.......(dirvish-peek--prep
19880	61 72 65 2d 63 61 6e 64 2d 66 65 74 63 68 65 72 29 0a 20 20 20 20 20 20 28 61 64 64 2d 68 6f 6f	are-cand-fetcher).......(add-hoo
198a0	6b 20 27 70 6f 73 74 2d 63 6f 6d 6d 61 6e 64 2d 68 6f 6f 6b 20 23 27 64 69 72 76 69 73 68 2d 70	k.'post-command-hook.#'dirvish-p
198c0	65 65 6b 2d 75 70 64 61 74 65 2d 68 20 39 30 20 74 29 0a 20 20 20 20 20 20 28 61 64 64 2d 68 6f	eek-update-h.90.t).......(add-ho
198e0	6f 6b 20 27 6d 69 6e 69 62 75 66 66 65 72 2d 65 78 69 74 2d 68 6f 6f 6b 20 23 27 64 69 72 76 69	ok.'minibuffer-exit-hook.#'dirvi
19900	73 68 2d 70 65 65 6b 2d 65 78 69 74 2d 68 20 6e 69 6c 20 74 29 0a 20 20 20 20 20 20 28 75 6e 6c	sh-peek-exit-h.nil.t).......(unl
19920	65 73 73 20 28 61 6e 64 20 64 69 72 76 69 73 68 2d 2d 74 68 69 73 20 28 64 76 2d 70 72 65 76 69	ess.(and.dirvish--this.(dv-previ
19940	65 77 2d 77 69 6e 64 6f 77 20 64 69 72 76 69 73 68 2d 2d 74 68 69 73 29 29 0a 20 20 20 20 20 20	ew-window.dirvish--this)).......
19960	20 20 28 73 65 74 71 20 6e 65 77 2d 64 76 20 28 64 69 72 76 69 73 68 2d 6e 65 77 20 3a 74 79 70	..(setq.new-dv.(dirvish-new.:typ
19980	65 20 27 28 70 65 65 6b 29 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 66 20 28 64 76 2d 70 72	e.'(peek))).........(setf.(dv-pr
199a0	65 76 69 65 77 2d 77 69 6e 64 6f 77 20 6e 65 77 2d 64 76 29 0a 20 20 20 20 20 20 20 20 20 20 20	eview-window.new-dv)............
199c0	20 20 20 28 6f 72 20 28 6d 69 6e 69 62 75 66 66 65 72 2d 73 65 6c 65 63 74 65 64 2d 77 69 6e 64	...(or.(minibuffer-selected-wind
199e0	6f 77 29 20 28 6e 65 78 74 2d 77 69 6e 64 6f 77 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20	ow).(next-window)))))))..(defun.
19a00	64 69 72 76 69 73 68 2d 70 65 65 6b 2d 75 70 64 61 74 65 2d 68 20 28 29 0a 20 20 22 48 6f 6f 6b	dirvish-peek-update-h.()..."Hook
19a20	20 66 6f 72 20 60 70 6f 73 74 2d 63 6f 6d 6d 61 6e 64 2d 68 6f 6f 6b 27 20 74 6f 20 75 70 64 61	.for.`post-command-hook'.to.upda
19a40	74 65 20 70 65 65 6b 20 77 69 6e 64 6f 77 2e 22 0a 20 20 28 77 68 65 6e 2d 6c 65 74 2a 20 28 28	te.peek.window."...(when-let*.((
19a60	64 69 72 76 69 73 68 2d 70 65 65 6b 2d 2d 63 75 72 72 2d 63 61 74 65 67 6f 72 79 29 0a 20 20 20	dirvish-peek--curr-category)....
19a80	20 20 20 20 20 20 20 20 20 20 20 28 63 61 6e 64 20 28 66 75 6e 63 61 6c 6c 20 64 69 72 76 69 73	...........(cand.(funcall.dirvis
19aa0	68 2d 70 65 65 6b 2d 2d 63 61 6e 64 2d 66 65 74 63 68 65 72 29 29 29 0a 20 20 20 20 28 70 63 61	h-peek--cand-fetcher))).....(pca
19ac0	73 65 20 64 69 72 76 69 73 68 2d 70 65 65 6b 2d 2d 63 75 72 72 2d 63 61 74 65 67 6f 72 79 0a 20	se.dirvish-peek--curr-category..
19ae0	20 20 20 20 20 28 27 66 69 6c 65 0a 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6e 64 20 28 65	.....('file........(setq.cand.(e
19b00	78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 63 61 6e 64 29 29 29 0a 20 20 20 20 20 20 28 27	xpand-file-name.cand))).......('
19b20	70 72 6f 6a 65 63 74 2d 66 69 6c 65 0a 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6e 64 20 28	project-file........(setq.cand.(
19b40	65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	expand-file-name................
19b60	20 20 20 20 63 61 6e 64 20 28 6f 72 20 28 64 69 72 76 69 73 68 2d 2d 67 65 74 2d 70 72 6f 6a 65	....cand.(or.(dirvish--get-proje
19b80	63 74 2d 72 6f 6f 74 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	ct-root)........................
19ba0	20 20 20 20 20 28 63 61 72 20 28 6d 69 6e 69 62 75 66 66 65 72 2d 68 69 73 74 6f 72 79 2d 76 61	.....(car.(minibuffer-history-va
19bc0	6c 75 65 29 29 29 29 29 29 0a 20 20 20 20 20 20 28 27 6c 69 62 72 61 72 79 0a 20 20 20 20 20 20	lue)))))).......('library.......
19be0	20 28 73 65 74 71 20 63 61 6e 64 20 28 66 69 6c 65 2d 74 72 75 65 6e 61 6d 65 0a 20 20 20 20 20	.(setq.cand.(file-truename......
19c00	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 69 67 6e 6f 72 65 2d 65 72 72 6f 72 73	..............(or.(ignore-errors
19c20	20 28 66 69 6e 64 2d 6c 69 62 72 61 72 79 2d 6e 61 6d 65 20 63 61 6e 64 29 29 20 22 22 29 29 29	.(find-library-name.cand))."")))
19c40	29 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 28 66 69 6c 65 2d 72 65 6d 6f 74 65 2d 70 20 63 61	)).....(unless.(file-remote-p.ca
19c60	6e 64 29 0a 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 64 65 62 6f 75 6e 63 65 20 6e 69 6c 20	nd).......(dirvish-debounce.nil.
19c80	28 64 69 72 76 69 73 68 2d 2d 70 72 65 76 69 65 77 2d 75 70 64 61 74 65 20 64 69 72 76 69 73 68	(dirvish--preview-update.dirvish
19ca0	2d 2d 74 68 69 73 20 63 61 6e 64 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68	--this.cand)))))..(defun.dirvish
19cc0	2d 70 65 65 6b 2d 65 78 69 74 2d 68 20 28 29 0a 20 20 22 48 6f 6f 6b 20 66 6f 72 20 60 6d 69 6e	-peek-exit-h.()..."Hook.for.`min
19ce0	69 62 75 66 66 65 72 2d 65 78 69 74 2d 68 6f 6f 6b 27 20 74 6f 20 64 65 73 74 72 6f 79 20 70 65	ibuffer-exit-hook'.to.destroy.pe
19d00	65 6b 20 73 65 73 73 69 6f 6e 2e 22 0a 20 20 28 64 6f 6c 69 73 74 20 28 64 76 20 28 68 61 73 68	ek.session."...(dolist.(dv.(hash
19d20	2d 74 61 62 6c 65 2d 76 61 6c 75 65 73 20 64 69 72 76 69 73 68 2d 2d 73 65 73 73 69 6f 6e 2d 68	-table-values.dirvish--session-h
19d40	61 73 68 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 65 71 20 28 63 61 72 20 28 64 76 2d 74 79 70	ash)).....(when.(eq.(car.(dv-typ
19d60	65 20 64 76 29 29 20 27 70 65 65 6b 29 0a 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 6b 69 6c	e.dv)).'peek).......(dirvish-kil
19d80	6c 20 64 76 29 0a 20 20 20 20 20 20 28 72 65 6d 68 61 73 68 20 28 64 76 2d 6e 61 6d 65 20 64 76	l.dv).......(remhash.(dv-name.dv
19da0	29 20 64 69 72 76 69 73 68 2d 2d 73 65 73 73 69 6f 6e 2d 68 61 73 68 29 29 29 29 0a 0a 3b 3b 3b	).dirvish--session-hash))))..;;;
19dc0	23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 69 6e 65 2d 6d 69 6e 6f 72 2d 6d 6f 64 65 20 64	###autoload.(define-minor-mode.d
19de0	69 72 76 69 73 68 2d 70 65 65 6b 2d 6d 6f 64 65 0a 20 20 22 53 68 6f 77 20 66 69 6c 65 20 70 72	irvish-peek-mode..."Show.file.pr
19e00	65 76 69 65 77 20 77 68 65 6e 20 6e 61 72 72 6f 77 69 6e 67 20 63 61 6e 64 69 64 61 74 65 73 20	eview.when.narrowing.candidates.
19e20	75 73 69 6e 67 20 6d 69 6e 69 62 75 66 66 65 72 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72	using.minibuffer."...:group.'dir
19e40	76 69 73 68 20 3a 67 6c 6f 62 61 6c 20 74 0a 20 20 28 69 66 20 64 69 72 76 69 73 68 2d 70 65 65	vish.:global.t...(if.dirvish-pee
19e60	6b 2d 6d 6f 64 65 0a 20 20 20 20 20 20 28 61 64 64 2d 68 6f 6f 6b 20 27 6d 69 6e 69 62 75 66 66	k-mode.......(add-hook.'minibuff
19e80	65 72 2d 73 65 74 75 70 2d 68 6f 6f 6b 20 23 27 64 69 72 76 69 73 68 2d 70 65 65 6b 2d 73 65 74	er-setup-hook.#'dirvish-peek-set
19ea0	75 70 2d 68 29 0a 20 20 20 20 28 72 65 6d 6f 76 65 2d 68 6f 6f 6b 20 27 6d 69 6e 69 62 75 66 66	up-h).....(remove-hook.'minibuff
19ec0	65 72 2d 73 65 74 75 70 2d 68 6f 6f 6b 20 23 27 64 69 72 76 69 73 68 2d 70 65 65 6b 2d 73 65 74	er-setup-hook.#'dirvish-peek-set
19ee0	75 70 2d 68 29 29 29 0a 0a 28 70 72 6f 76 69 64 65 20 27 64 69 72 76 69 73 68 2d 70 65 65 6b 29	up-h)))..(provide.'dirvish-peek)
19f00	0a 3b 3b 3b 20 64 69 72 76 69 73 68 2d 70 65 65 6b 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00	.;;;.dirvish-peek.el.ends.here..
19f20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
19f40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
19f60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
19f80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
19fa0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
19fc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
19fe0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a000	64 69 72 76 69 73 68 2d 32 30 32 33 30 35 31 39 2e 31 35 30 30 2f 64 69 72 76 69 73 68 2d 70 6b	dirvish-20230519.1500/dirvish-pk
1a020	67 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	g.el............................
1a040	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a060	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
1a080	30 30 30 30 37 36 37 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 32 33 37 00 20 30 00 00 00	0000767.00000000000.015237..0...
1a0a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a0c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a0e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a100	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...................
1a120	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...................
1a140	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a160	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a180	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a1a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a1c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a1e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a200	28 64 65 66 69 6e 65 2d 70 61 63 6b 61 67 65 20 22 64 69 72 76 69 73 68 22 20 22 32 30 32 33 30	(define-package."dirvish"."20230
1a220	35 31 39 2e 31 35 30 30 22 20 22 41 20 6d 6f 64 65 72 6e 20 66 69 6c 65 20 6d 61 6e 61 67 65 72	519.1500"."A.modern.file.manager
1a240	20 62 61 73 65 64 20 6f 6e 20 64 69 72 65 64 20 6d 6f 64 65 22 0a 20 20 27 28 28 65 6d 61 63 73	.based.on.dired.mode"...'((emacs
1a260	20 22 32 37 2e 31 22 29 0a 20 20 20 20 28 74 72 61 6e 73 69 65 6e 74 20 22 30 2e 33 2e 37 22 29	."27.1").....(transient."0.3.7")
1a280	29 0a 20 20 3a 63 6f 6d 6d 69 74 20 22 31 31 39 66 39 66 35 39 61 36 31 38 62 62 37 62 34 37 36	)...:commit."119f9f59a618bb7b476
1a2a0	63 39 33 65 39 61 62 31 64 37 35 34 32 63 35 63 31 64 66 34 31 22 20 3a 61 75 74 68 6f 72 73 0a	c93e9ab1d7542c5c1df41".:authors.
1a2c0	20 20 27 28 28 22 41 6c 65 78 20 4c 75 20 3c 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f	..'(("Alex.Lu.<https://github.co
1a2e0	6d 2f 61 6c 65 78 6c 75 69 67 69 74 3e 22 29 29 0a 20 20 3a 6d 61 69 6e 74 61 69 6e 65 72 73 0a	m/alexluigit>"))...:maintainers.
1a300	20 20 27 28 28 22 41 6c 65 78 20 4c 75 20 3c 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f	..'(("Alex.Lu.<https://github.co
1a320	6d 2f 61 6c 65 78 6c 75 69 67 69 74 3e 22 29 29 0a 20 20 3a 6d 61 69 6e 74 61 69 6e 65 72 0a 20	m/alexluigit>"))...:maintainer..
1a340	20 27 28 22 41 6c 65 78 20 4c 75 20 3c 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f	.'("Alex.Lu.<https://github.com/
1a360	61 6c 65 78 6c 75 69 67 69 74 3e 22 29 0a 20 20 3a 6b 65 79 77 6f 72 64 73 0a 20 20 27 28 22 66	alexluigit>")...:keywords...'("f
1a380	69 6c 65 73 22 20 22 63 6f 6e 76 65 6e 69 65 6e 63 65 22 29 0a 20 20 3a 75 72 6c 20 22 68 74 74	iles"."convenience")...:url."htt
1a3a0	70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 61 6c 65 78 6c 75 69 67 69 74 2f 64 69 72 76 69	ps://github.com/alexluigit/dirvi
1a3c0	73 68 22 29 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	sh").;;.Local.Variables:.;;.no-b
1a3e0	79 74 65 2d 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	yte-compile:.t.;;.End:..........
1a400	64 69 72 76 69 73 68 2d 32 30 32 33 30 35 31 39 2e 31 35 30 30 2f 64 69 72 76 69 73 68 2d 71 75	dirvish-20230519.1500/dirvish-qu
1a420	69 63 6b 2d 61 63 63 65 73 73 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	ick-access.el...................
1a440	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a460	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
1a480	30 30 30 35 35 34 34 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 37 30 32 37 00 20 30 00 00 00	0005544.00000000000.017027..0...
1a4a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a4c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a4e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a500	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...................
1a520	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...................
1a540	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a560	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a580	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a5a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a5c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a5e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a600	3b 3b 3b 20 64 69 72 76 69 73 68 2d 71 75 69 63 6b 2d 61 63 63 65 73 73 2e 65 6c 20 2d 2d 2d 20	;;;.dirvish-quick-access.el.---.
1a620	51 75 69 63 6b 20 6b 65 79 73 20 66 6f 72 20 66 72 65 71 75 65 6e 74 6c 79 20 76 69 73 69 74 65	Quick.keys.for.frequently.visite
1a640	64 20 70 6c 61 63 65 73 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 20 74 20	d.places.-*-.lexical-binding:.t.
1a660	2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 32 31 2d 32 30 32 32 20	-*-..;;.Copyright.(C).2021-2022.
1a680	41 6c 65 78 20 4c 75 0a 3b 3b 20 41 75 74 68 6f 72 20 3a 20 41 6c 65 78 20 4c 75 20 3c 68 74 74	Alex.Lu.;;.Author.:.Alex.Lu.<htt
1a6a0	70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 61 6c 65 78 6c 75 69 67 69 74 3e 0a 3b 3b 20 56	ps://github.com/alexluigit>.;;.V
1a6c0	65 72 73 69 6f 6e 3a 20 32 2e 30 2e 35 33 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 66 69 6c 65	ersion:.2.0.53.;;.Keywords:.file
1a6e0	73 2c 20 63 6f 6e 76 65 6e 69 65 6e 63 65 0a 3b 3b 20 48 6f 6d 65 70 61 67 65 3a 20 68 74 74 70	s,.convenience.;;.Homepage:.http
1a700	73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 61 6c 65 78 6c 75 69 67 69 74 2f 64 69 72 76 69 73	s://github.com/alexluigit/dirvis
1a720	68 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d 49 64 65 6e 74 69 66 69 65 72 3a 20 47 50	h.;;.SPDX-License-Identifier:.GP
1a740	4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 65 72 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a	L-3.0-or-later..;;;.Commentary:.
1a760	0a 3b 3b 20 54 68 69 73 20 44 69 72 76 69 73 68 20 65 78 74 65 6e 73 69 6f 6e 20 61 6c 6c 6f 77	.;;.This.Dirvish.extension.allow
1a780	73 20 74 68 65 20 75 73 65 72 20 74 6f 20 64 65 66 69 6e 65 20 61 20 6c 69 73 74 20 6f 66 20 66	s.the.user.to.define.a.list.of.f
1a7a0	72 65 71 75 65 6e 74 6c 79 20 76 69 73 69 74 65 64 0a 3b 3b 20 64 69 72 65 63 74 6f 72 69 65 73	requently.visited.;;.directories
1a7c0	20 61 6e 64 20 61 20 71 75 69 63 6b 20 6b 65 79 20 74 6f 20 6a 75 6d 70 20 74 6f 20 74 68 65 20	.and.a.quick.key.to.jump.to.the.
1a7e0	70 61 74 68 2e 20 20 60 64 69 72 76 69 73 68 2d 71 75 69 63 6b 2d 61 63 63 65 73 73 27 20 69 73	path...`dirvish-quick-access'.is
1a800	0a 3b 3b 20 64 65 73 69 67 6e 65 64 20 74 6f 20 62 65 20 61 20 63 6f 6d 70 6c 65 6d 65 6e 74 61	.;;.designed.to.be.a.complementa
1a820	72 79 20 63 6f 6d 6d 61 6e 64 20 74 6f 20 74 68 65 20 62 6f 6f 6b 6d 61 72 6b 20 73 79 73 74 65	ry.command.to.the.bookmark.syste
1a840	6d 20 69 6e 20 45 6d 61 63 73 2e 20 20 4f 6e 65 0a 3b 3b 20 63 61 6e 20 68 61 76 65 20 61 73 20	m.in.Emacs...One.;;.can.have.as.
1a860	6d 61 6e 79 20 61 73 20 62 6f 6f 6b 6d 61 72 6b 73 20 74 68 65 79 20 77 61 6e 74 2c 20 61 6e 64	many.as.bookmarks.they.want,.and
1a880	20 6a 75 6d 70 20 74 6f 20 61 20 70 61 72 74 69 63 75 6c 61 72 20 6f 6e 65 20 62 79 20 74 68 65	.jump.to.a.particular.one.by.the
1a8a0	0a 3b 3b 20 68 65 6c 70 20 6f 66 20 74 68 65 69 72 20 63 68 6f 69 63 65 20 6f 66 20 63 6f 6d 70	.;;.help.of.their.choice.of.comp
1a8c0	6c 65 74 69 6f 6e 20 66 72 61 6d 65 77 6f 72 6b 20 6f 72 20 63 6f 6d 6d 61 6e 64 73 20 6c 69 6b	letion.framework.or.commands.lik
1a8e0	65 0a 3b 3b 20 60 63 6f 6e 73 75 6c 74 2d 62 6f 6f 6b 6d 61 72 6b 27 2e 20 20 42 75 74 20 66 6f	e.;;.`consult-bookmark'...But.fo
1a900	72 20 74 68 6f 73 65 20 76 65 72 79 20 66 72 65 71 75 65 6e 74 6c 79 20 76 69 73 69 74 65 64 20	r.those.very.frequently.visited.
1a920	70 6c 61 63 65 73 20 69 6e 20 74 68 65 20 66 69 6c 65 0a 3b 3b 20 73 79 73 74 65 6d 2c 20 74 68	places.in.the.file.;;.system,.th
1a940	65 20 75 73 65 72 20 77 6f 75 6c 64 20 65 78 70 65 63 74 20 74 6f 20 61 63 63 65 73 73 20 74 68	e.user.would.expect.to.access.th
1a960	65 73 65 20 64 69 72 65 63 74 6f 72 69 65 73 20 77 69 74 68 20 74 68 65 20 73 68 6f 72 74 65 73	ese.directories.with.the.shortes
1a980	74 0a 3b 3b 20 6b 65 79 20 73 65 71 75 65 6e 63 65 2c 20 70 6c 75 73 20 61 20 6d 6e 65 6d 6f 6e	t.;;.key.sequence,.plus.a.mnemon
1a9a0	69 63 20 77 61 79 20 74 6f 20 72 65 6d 65 6d 62 65 72 20 74 68 6f 73 65 20 6b 65 79 73 2e 0a 0a	ic.way.to.remember.those.keys...
1a9c0	3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 64 69 72 76 69 73 68 29 0a 0a 28	;;;.Code:..(require.'dirvish)..(
1a9e0	64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 71 75 69 63 6b 2d 61 63 63 65 73 73 2d 66	defcustom.dirvish-quick-access-f
1aa00	75 6e 63 74 69 6f 6e 20 27 64 69 72 76 69 73 68 2d 64 77 69 6d 0a 20 20 22 46 75 6e 63 74 69 6f	unction.'dirvish-dwim..."Functio
1aa20	6e 20 75 73 65 64 20 74 6f 20 61 63 63 65 73 73 20 60 64 69 72 76 69 73 68 2d 71 75 69 63 6b 2d	n.used.to.access.`dirvish-quick-
1aa40	61 63 63 65 73 73 2d 65 6e 74 72 69 65 73 27 2e 0a 54 68 65 20 66 75 6e 63 74 69 6f 6e 20 74 61	access-entries'..The.function.ta
1aa60	6b 65 73 20 74 68 65 20 65 6e 74 72 79 20 61 73 20 74 68 65 20 73 6f 6c 65 20 61 72 67 75 6d 65	kes.the.entry.as.the.sole.argume
1aa80	6e 74 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 20 3a 74 79 70 65 20 27 66 75	nt."...:group.'dirvish.:type.'fu
1aaa0	6e 63 74 69 6f 6e 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 20 28 61 75 74 6f 6c 6f 61	nction)..;;;###autoload.(autoloa
1aac0	64 20 27 64 69 72 76 69 73 68 2d 71 75 69 63 6b 2d 61 63 63 65 73 73 20 22 64 69 72 76 69 73 68	d.'dirvish-quick-access."dirvish
1aae0	2d 71 75 69 63 6b 2d 61 63 63 65 73 73 22 20 6e 69 6c 20 74 29 0a 28 64 65 66 63 75 73 74 6f 6d	-quick-access".nil.t).(defcustom
1ab00	20 64 69 72 76 69 73 68 2d 71 75 69 63 6b 2d 61 63 63 65 73 73 2d 65 6e 74 72 69 65 73 0a 20 20	.dirvish-quick-access-entries...
1ab20	60 28 28 22 68 22 20 22 7e 2f 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 48 6f	`(("h"."~/".................."Ho
1ab40	6d 65 22 29 0a 20 20 20 20 28 22 65 22 20 2c 75 73 65 72 2d 65 6d 61 63 73 2d 64 69 72 65 63 74	me").....("e".,user-emacs-direct
1ab60	6f 72 79 20 22 45 6d 61 63 73 20 75 73 65 72 20 64 69 72 65 63 74 6f 72 79 22 29 29 0a 20 20 22	ory."Emacs.user.directory"))..."
1ab80	51 75 69 63 6b 20 61 63 63 65 73 73 20 65 6e 74 72 69 65 73 20 66 6f 72 20 63 6f 6d 6d 61 6e 64	Quick.access.entries.for.command
1aba0	20 60 64 69 72 76 69 73 68 2d 71 75 69 63 6b 2d 61 63 63 65 73 73 27 2e 0a 41 20 45 4e 54 52 59	.`dirvish-quick-access'..A.ENTRY
1abc0	20 69 73 20 61 20 28 4b 45 59 20 50 41 54 48 20 44 4f 43 29 20 61 6c 69 73 74 20 77 68 65 72 65	.is.a.(KEY.PATH.DOC).alist.where
1abe0	20 4b 45 59 20 69 73 20 74 68 65 20 6b 65 79 20 74 6f 0a 69 6e 76 6f 6b 65 20 74 68 65 20 6e 61	.KEY.is.the.key.to.invoke.the.na
1ac00	76 69 67 61 74 69 6f 6e 2c 20 50 41 54 48 20 69 73 20 74 68 65 20 74 68 65 20 61 72 67 75 6d 65	vigation,.PATH.is.the.the.argume
1ac20	6e 74 20 66 6f 72 20 63 6f 6d 6d 61 6e 64 0a 60 64 69 72 65 64 2d 6a 75 6d 70 27 2c 20 44 4f 43	nt.for.command.`dired-jump',.DOC
1ac40	20 28 6f 70 74 69 6f 6e 61 6c 29 20 69 73 20 69 74 73 20 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e	.(optional).is.its.documentation
1ac60	20 73 74 72 69 6e 67 2e 0a 0a 48 65 72 65 20 69 73 20 61 20 73 61 6d 70 6c 65 20 76 61 6c 75 65	.string...Here.is.a.sample.value
1ac80	20 66 6f 72 20 74 68 69 73 20 76 61 72 69 61 62 6c 65 2e 0a 0a 5c 28 28 5c 22 68 5c 22 20 20 5c	.for.this.variable...\((\"h\"..\
1aca0	22 7e 2f 5c 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 5c 22 48 6f 6d 65 5c	"~/\"....................\"Home\
1acc0	22 29 0a 20 28 5c 22 74 5c 22 20 20 5c 22 7e 2f 2e 6c 6f 63 61 6c 2f 73 68 61 72 65 2f 54 72 61	")..(\"t\"..\"~/.local/share/Tra
1ace0	73 68 2f 5c 22 20 5c 22 54 72 61 73 68 65 73 5c 22 29 0a 20 28 5c 22 70 61 5c 22 20 5c 22 7e 2f	sh/\".\"Trashes\")..(\"pa\".\"~/
1ad00	43 6f 64 65 2f 70 72 6f 6a 2d 61 2f 5c 22 20 20 20 20 20 20 20 20 5c 22 50 72 6f 6a 65 63 74 20	Code/proj-a/\"........\"Project.
1ad20	41 5c 22 29 0a 20 28 5c 22 70 62 5c 22 20 5c 22 7e 2f 43 6f 64 65 2f 70 72 6f 6a 2d 62 2f 5c 22	A\")..(\"pb\".\"~/Code/proj-b/\"
1ad40	20 20 20 20 20 20 20 20 5c 22 50 72 6f 6a 65 63 74 20 42 5c 22 29 29 22 0a 20 20 3a 67 72 6f 75	........\"Project.B\"))"...:grou
1ad60	70 20 27 64 69 72 76 69 73 68 20 3a 74 79 70 65 20 27 61 6c 69 73 74 0a 20 20 3a 73 65 74 0a 20	p.'dirvish.:type.'alist...:set..
1ad80	20 28 6c 61 6d 62 64 61 20 28 6b 20 76 29 0a 20 20 20 20 28 73 65 74 20 6b 20 76 29 0a 20 20 20	.(lambda.(k.v).....(set.k.v)....
1ada0	20 28 77 68 65 6e 2d 6c 65 74 2a 20 28 28 64 65 73 63 2d 6c 65 6e 20 28 6d 61 70 63 61 72 20 28	.(when-let*.((desc-len.(mapcar.(
1adc0	6c 61 6d 62 64 61 20 28 69 29 20 28 6c 65 6e 67 74 68 20 28 6e 74 68 20 32 20 69 29 29 29 20 76	lambda.(i).(length.(nth.2.i))).v
1ade0	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 78 2d 64 65 73 63 2d 6c 65 6e	)).................(max-desc-len
1ae00	20 28 73 65 71 2d 6d 61 78 20 64 65 73 63 2d 6c 65 6e 29 29 29 0a 20 20 20 20 20 20 28 65 76 61	.(seq-max.desc-len))).......(eva
1ae20	6c 0a 20 20 20 20 20 20 20 60 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 70 72 65 66	l........`(transient-define-pref
1ae40	69 78 20 64 69 72 76 69 73 68 2d 71 75 69 63 6b 2d 61 63 63 65 73 73 20 28 29 0a 20 20 20 20 20	ix.dirvish-quick-access.()......
1ae60	20 20 20 20 20 22 4a 75 6d 70 20 74 6f 20 44 69 72 76 69 73 68 20 71 75 69 63 6b 20 61 63 63 65	....."Jump.to.Dirvish.quick.acce
1ae80	73 73 20 65 6e 74 72 69 65 73 2e 22 0a 20 20 20 20 20 20 20 20 20 20 5b 3a 64 65 73 63 72 69 70	ss.entries."...........[:descrip
1aea0	74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 29 20 28 64 69 72 76	tion............(lambda.().(dirv
1aec0	69 73 68 2d 2d 66 6f 72 6d 61 74 2d 6d 65 6e 75 2d 68 65 61 64 69 6e 67 20 22 47 6f 20 74 6f 20	ish--format-menu-heading."Go.to.
1aee0	44 69 72 65 63 74 6f 72 79 3a 20 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 2c 40 28 63 6c 2d	Directory:."))............,@(cl-
1af00	6c 6f 6f 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 28 6b 65 79 20 70 61 74 68	loop...............for.(key.path
1af20	20 64 65 73 63 29 20 69 6e 20 76 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 6c 6c 65 63	.desc).in.v...............collec
1af40	74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 6b 65 79 0a 20 20 20 20 20 20	t...............(list.key.......
1af60	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 64 65 73 63 20 22 20 20 22 0a	..............(concat.desc."..".
1af80	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 6d 61 6b	............................(mak
1afa0	65 2d 73 74 72 69 6e 67 20 28 2d 20 6d 61 78 2d 64 65 73 63 2d 6c 65 6e 20 28 6c 65 6e 67 74 68	e-string.(-.max-desc-len.(length
1afc0	20 64 65 73 63 29 29 20 3f 5c 20 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.desc)).?\.)....................
1afe0	20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 70 61 74 68 20 27 66 61 63 65 20	.........(propertize.path.'face.
1b000	27 66 6f 6e 74 2d 6c 6f 63 6b 2d 63 6f 6d 6d 65 6e 74 2d 66 61 63 65 29 29 0a 20 20 20 20 20 20	'font-lock-comment-face)).......
1b020	20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20	..............`(lambda.().......
1b040	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20	.................(interactive)..
1b060	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 64	......................(funcall.d
1b080	69 72 76 69 73 68 2d 71 75 69 63 6b 2d 61 63 63 65 73 73 2d 66 75 6e 63 74 69 6f 6e 20 2c 70 61	irvish-quick-access-function.,pa
1b0a0	74 68 29 29 29 29 5d 0a 20 20 20 20 20 20 20 20 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a	th))))]...........(interactive).
1b0c0	20 20 20 20 20 20 20 20 20 20 28 72 65 71 75 69 72 65 20 27 64 69 72 76 69 73 68 2d 66 64 20 6e	..........(require.'dirvish-fd.n
1b0e0	69 6c 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 65 74 75 70	il.t)...........(transient-setup
1b100	20 27 64 69 72 76 69 73 68 2d 71 75 69 63 6b 2d 61 63 63 65 73 73 29 29 29 29 29 29 0a 0a 28 70	.'dirvish-quick-access))))))..(p
1b120	72 6f 76 69 64 65 20 27 64 69 72 76 69 73 68 2d 71 75 69 63 6b 2d 61 63 63 65 73 73 29 0a 3b 3b	rovide.'dirvish-quick-access).;;
1b140	3b 20 64 69 72 76 69 73 68 2d 71 75 69 63 6b 2d 61 63 63 65 73 73 2e 65 6c 20 65 6e 64 73 20 68	;.dirvish-quick-access.el.ends.h
1b160	65 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	ere.............................
1b180	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b1a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b1c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b1e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b200	64 69 72 76 69 73 68 2d 32 30 32 33 30 35 31 39 2e 31 35 30 30 2f 64 69 72 76 69 73 68 2d 73 69	dirvish-20230519.1500/dirvish-si
1b220	64 65 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	de.el...........................
1b240	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b260	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
1b280	30 30 31 37 31 30 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 33 37 31 00 20 30 00 00 00	0017102.00000000000.015371..0...
1b2a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b2c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b2e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b300	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...................
1b320	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...................
1b340	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b360	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b380	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b3a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b3c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b3e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b400	3b 3b 3b 20 64 69 72 76 69 73 68 2d 73 69 64 65 2e 65 6c 20 2d 2d 2d 20 54 6f 67 67 6c 65 20 44	;;;.dirvish-side.el.---.Toggle.D
1b420	69 72 76 69 73 68 20 69 6e 20 73 69 64 65 20 77 69 6e 64 6f 77 20 6c 69 6b 65 20 74 72 65 65 6d	irvish.in.side.window.like.treem
1b440	61 63 73 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 20 74 20 2d 2a 2d 0a 0a	acs.--.lexical-binding:.t.--..
1b460	3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 32 31 2d 32 30 32 32 20 41 6c 65 78 20	;;.Copyright.(C).2021-2022.Alex.
1b480	4c 75 0a 3b 3b 20 41 75 74 68 6f 72 20 3a 20 41 6c 65 78 20 4c 75 20 3c 68 74 74 70 73 3a 2f 2f	Lu.;;.Author.:.Alex.Lu.<https://
1b4a0	67 69 74 68 75 62 2e 63 6f 6d 2f 61 6c 65 78 6c 75 69 67 69 74 3e 0a 3b 3b 20 56 65 72 73 69 6f	github.com/alexluigit>.;;.Versio
1b4c0	6e 3a 20 32 2e 30 2e 35 33 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 66 69 6c 65 73 2c 20 63 6f	n:.2.0.53.;;.Keywords:.files,.co
1b4e0	6e 76 65 6e 69 65 6e 63 65 0a 3b 3b 20 48 6f 6d 65 70 61 67 65 3a 20 68 74 74 70 73 3a 2f 2f 67	nvenience.;;.Homepage:.https://g
1b500	69 74 68 75 62 2e 63 6f 6d 2f 61 6c 65 78 6c 75 69 67 69 74 2f 64 69 72 76 69 73 68 0a 3b 3b 20	ithub.com/alexluigit/dirvish.;;.
1b520	53 50 44 58 2d 4c 69 63 65 6e 73 65 2d 49 64 65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30	SPDX-License-Identifier:.GPL-3.0
1b540	2d 6f 72 2d 6c 61 74 65 72 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 20 54	-or-later..;;;.Commentary:..;;.T
1b560	6f 67 67 6c 65 20 44 69 72 76 69 73 68 20 69 6e 20 73 69 64 65 20 77 69 6e 64 6f 77 20 6c 69 6b	oggle.Dirvish.in.side.window.lik
1b580	65 20 74 72 65 65 6d 61 63 73 2e 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65	e.treemacs...;;;.Code:..(require
1b5a0	20 27 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64	.'dirvish-subtree)..(defcustom.d
1b5c0	69 72 76 69 73 68 2d 73 69 64 65 2d 64 69 73 70 6c 61 79 2d 61 6c 69 73 74 0a 20 20 27 28 28 73	irvish-side-display-alist...'((s
1b5e0	69 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 44 69 73 70	ide...left).(slot...-1))..."Disp
1b600	6c 61 79 20 61 6c 69 73 74 20 66 6f 72 20 60 64 69 72 76 69 73 68 2d 73 69 64 65 27 20 77 69 6e	lay.alist.for.`dirvish-side'.win
1b620	64 6f 77 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 20 3a 74 79 70 65 20 27 61	dow."...:group.'dirvish.:type.'a
1b640	6c 69 73 74 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 73 69 64 65 2d 77	list)..(defcustom.dirvish-side-w
1b660	69 64 74 68 20 33 35 0a 20 20 22 57 69 64 74 68 20 6f 66 20 74 68 65 20 60 64 69 72 76 69 73 68	idth.35..."Width.of.the.`dirvish
1b680	2d 73 69 64 65 27 20 62 75 66 66 65 72 2e 22 0a 20 20 3a 74 79 70 65 20 27 69 6e 74 65 67 65 72	-side'.buffer."...:type.'integer
1b6a0	20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69	.:group.'dirvish)..(defcustom.di
1b6c0	72 76 69 73 68 2d 73 69 64 65 2d 77 69 6e 64 6f 77 2d 70 61 72 61 6d 65 74 65 72 73 0a 20 20 27	rvish-side-window-parameters...'
1b6e0	28 28 6e 6f 2d 64 65 6c 65 74 65 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 73 20 2e 20 74 29 20 28	((no-delete-other-windows...t).(
1b700	6e 6f 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 20 2e 20 74 29 29 0a 20 20 22 57 69 6e 64 6f 77 20	no-other-window...t))..."Window.
1b720	70 61 72 61 6d 65 74 65 72 73 20 66 6f 72 20 60 64 69 72 76 69 73 68 2d 73 69 64 65 27 20 77 69	parameters.for.`dirvish-side'.wi
1b740	6e 64 6f 77 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 20 3a 74 79 70 65 20 27	ndow."...:group.'dirvish.:type.'
1b760	61 6c 69 73 74 29 0a 0a 28 64 65 66 69 6e 65 2d 6f 62 73 6f 6c 65 74 65 2d 76 61 72 69 61 62 6c	alist)..(define-obsolete-variabl
1b780	65 2d 61 6c 69 61 73 20 27 64 69 72 76 69 73 68 2d 73 69 64 65 2d 6f 70 65 6e 2d 66 69 6c 65 2d	e-alias.'dirvish-side-open-file-
1b7a0	77 69 6e 64 6f 77 2d 66 75 6e 63 74 69 6f 6e 20 27 64 69 72 76 69 73 68 2d 73 69 64 65 2d 6f 70	window-function.'dirvish-side-op
1b7c0	65 6e 2d 66 69 6c 65 2d 61 63 74 69 6f 6e 20 22 53 65 70 20 32 33 2c 20 32 30 32 32 22 29 0a 28	en-file-action."Sep.23,.2022").(
1b7e0	64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 73 69 64 65 2d 6f 70 65 6e 2d 66 69 6c 65	defcustom.dirvish-side-open-file
1b800	2d 61 63 74 69 6f 6e 20 27 6d 72 75 0a 20 20 22 54 68 65 20 61 63 74 69 6f 6e 20 6f 66 20 68 6f	-action.'mru..."The.action.of.ho
1b820	77 20 74 6f 20 6f 70 65 6e 20 61 20 66 69 6c 65 20 69 6e 20 73 69 64 65 20 77 69 6e 64 6f 77 2e	w.to.open.a.file.in.side.window.
1b840	0a 54 68 65 20 76 61 6c 75 65 20 63 61 6e 20 62 65 20 6f 6e 65 20 6f 66 3a 0a 0a 2d 20 5c 5c 3d	.The.value.can.be.one.of:..-.\\=
1b860	27 6d 72 75 20 20 20 20 2d 20 6f 70 65 6e 20 74 68 65 20 66 69 6c 65 20 69 6e 20 74 68 65 20 6d	'mru....-.open.the.file.in.the.m
1b880	6f 73 74 2d 72 65 63 65 6e 74 2d 75 73 65 64 20 77 69 6e 64 6f 77 2e 0a 2d 20 5c 5c 3d 27 73 70	ost-recent-used.window..-.\\='sp
1b8a0	6c 69 74 20 20 2d 20 6f 70 65 6e 20 74 68 65 20 66 69 6c 65 20 62 65 6c 6f 77 20 74 68 65 20 6d	lit..-.open.the.file.below.the.m
1b8c0	72 75 20 77 69 6e 64 6f 77 2e 0a 2d 20 5c 5c 3d 27 76 73 70 6c 69 74 20 2d 20 6f 70 65 6e 20 74	ru.window..-.\\='vsplit.-.open.t
1b8e0	68 65 20 66 69 6c 65 20 69 6e 20 61 20 76 65 72 74 69 63 61 6c 20 73 70 6c 69 74 20 77 69 6e 64	he.file.in.a.vertical.split.wind
1b900	6f 77 2e 0a 2d 20 61 20 66 75 6e 63 74 69 6f 6e 20 74 68 61 74 20 72 65 74 75 72 6e 73 20 61 20	ow..-.a.function.that.returns.a.
1b920	74 61 72 67 65 74 20 77 69 6e 64 6f 77 20 66 6f 72 20 74 68 65 20 66 69 6c 65 20 62 75 66 66 65	target.window.for.the.file.buffe
1b940	72 2c 0a 20 20 73 75 63 68 20 61 73 20 60 61 63 65 2d 73 65 6c 65 63 74 2d 77 69 6e 64 6f 77 27	r,...such.as.`ace-select-window'
1b960	2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 0a 20 20 3a 74 79 70 65 20 27 28 63	."...:group.'dirvish...:type.'(c
1b980	68 6f 69 63 65 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 6f 70 65 6e 20 74 68 65 20 66 69 6c 65	hoice.(const.:tag."open.the.file
1b9a0	20 69 6e 20 74 68 65 20 6d 6f 73 74 2d 72 65 63 65 6e 74 2d 75 73 65 64 20 77 69 6e 64 6f 77 22	.in.the.most-recent-used.window"
1b9c0	20 6d 72 75 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 3a 74	.mru)..................(const.:t
1b9e0	61 67 20 22 6f 70 65 6e 20 74 68 65 20 66 69 6c 65 20 62 65 6c 6f 77 20 74 68 65 20 6d 72 75 20	ag."open.the.file.below.the.mru.
1ba00	77 69 6e 64 6f 77 22 20 73 70 6c 69 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	window".split)..................
1ba20	28 63 6f 6e 73 74 20 3a 74 61 67 20 22 6f 70 65 6e 20 74 68 65 20 66 69 6c 65 20 69 6e 20 61 20	(const.:tag."open.the.file.in.a.
1ba40	76 65 72 74 69 63 61 6c 20 73 70 6c 69 74 20 77 69 6e 64 6f 77 22 20 76 73 70 6c 69 74 29 0a 20	vertical.split.window".vsplit)..
1ba60	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 74 69 6f 6e 20 3a 74 61 67 20 22	................(function.:tag."
1ba80	63 75 73 74 6f 6d 20 66 75 6e 63 74 69 6f 6e 22 29 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20	custom.function")))..(defcustom.
1baa0	64 69 72 76 69 73 68 2d 73 69 64 65 2d 61 75 74 6f 2d 63 6c 6f 73 65 20 6e 69 6c 0a 20 20 22 57	dirvish-side-auto-close.nil..."W
1bac0	68 65 74 68 65 72 20 74 6f 20 61 75 74 6f 20 63 6c 6f 73 65 20 74 68 65 20 73 69 64 65 20 73 65	hether.to.auto.close.the.side.se
1bae0	73 73 69 6f 6e 20 61 66 74 65 72 20 6f 70 65 6e 69 6e 67 20 61 20 66 69 6c 65 2e 22 0a 20 20 3a	ssion.after.opening.a.file."...:
1bb00	67 72 6f 75 70 20 27 64 69 72 76 69 73 68 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 29 0a 0a	group.'dirvish.:type.'boolean)..
1bb20	28 64 65 66 69 6e 65 2d 6f 62 73 6f 6c 65 74 65 2d 76 61 72 69 61 62 6c 65 2d 61 6c 69 61 73 20	(define-obsolete-variable-alias.
1bb40	27 64 69 72 76 69 73 68 2d 73 69 64 65 2d 66 6f 6c 6c 6f 77 2d 62 75 66 66 65 72 2d 66 69 6c 65	'dirvish-side-follow-buffer-file
1bb60	20 27 64 69 72 76 69 73 68 2d 73 69 64 65 2d 61 75 74 6f 2d 65 78 70 61 6e 64 20 22 53 65 70 20	.'dirvish-side-auto-expand."Sep.
1bb80	31 35 2c 20 32 30 32 32 22 29 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 73 69	15,.2022").(defcustom.dirvish-si
1bba0	64 65 2d 61 75 74 6f 2d 65 78 70 61 6e 64 20 74 0a 20 20 22 57 68 65 74 68 65 72 20 74 6f 20 61	de-auto-expand.t..."Whether.to.a
1bbc0	75 74 6f 20 65 78 70 61 6e 64 20 70 61 72 65 6e 74 20 64 69 72 65 63 74 6f 72 69 65 73 20 6f 66	uto.expand.parent.directories.of
1bbe0	20 63 75 72 72 65 6e 74 20 66 69 6c 65 2e 0a 49 66 20 6e 6f 6e 2d 6e 69 6c 2c 20 65 78 70 61 6e	.current.file..If.non-nil,.expan
1bc00	64 20 61 6c 6c 20 74 68 65 20 70 61 72 65 6e 74 20 64 69 72 65 63 74 6f 72 69 65 73 20 6f 66 20	d.all.the.parent.directories.of.
1bc20	63 75 72 72 65 6e 74 20 62 75 66 66 65 72 27 73 0a 66 69 6c 65 6e 61 6d 65 20 75 6e 74 69 6c 20	current.buffer's.filename.until.
1bc40	74 68 65 20 70 72 6f 6a 65 63 74 20 72 6f 6f 74 20 77 68 65 6e 20 6f 70 65 6e 69 6e 67 20 61 20	the.project.root.when.opening.a.
1bc60	73 69 64 65 20 73 65 73 73 69 6f 6e 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68	side.session."...:group.'dirvish
1bc80	20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 64 69 72 76	.:type.'boolean)..(defconst.dirv
1bca0	69 73 68 2d 73 69 64 65 2d 68 65 61 64 65 72 20 28 64 69 72 76 69 73 68 2d 2d 6d 6f 64 65 2d 6c	ish-side-header.(dirvish--mode-l
1bcc0	69 6e 65 2d 66 6d 74 2d 73 65 74 74 65 72 20 27 28 70 72 6f 6a 65 63 74 29 20 6e 69 6c 20 74 29	ine-fmt-setter.'(project).nil.t)
1bce0	29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 73 69 64 65 2d 66 69 6c 65 2d 6f 70 65 6e	)..(defun.dirvish-side-file-open
1bd00	2d 66 6e 20 28 29 0a 20 20 22 43 61 6c 6c 65 64 20 62 65 66 6f 72 65 20 6f 70 65 6e 69 6e 67 20	-fn.()..."Called.before.opening.
1bd20	61 20 66 69 6c 65 20 69 6e 20 73 69 64 65 20 73 65 73 73 69 6f 6e 73 2e 22 0a 20 20 28 6c 65 74	a.file.in.side.sessions."...(let
1bd40	2a 20 28 28 64 76 20 28 64 69 72 76 69 73 68 2d 63 75 72 72 29 29 20 28 6c 61 79 6f 75 74 20 28	*.((dv.(dirvish-curr)).(layout.(
1bd60	63 61 72 20 28 64 76 2d 6c 61 79 6f 75 74 20 64 76 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 6d	car.(dv-layout.dv)))..........(m
1bd80	72 75 20 28 67 65 74 2d 6d 72 75 2d 77 69 6e 64 6f 77 20 6e 69 6c 20 6e 69 6c 20 74 29 29 29 0a	ru.(get-mru-window.nil.nil.t))).
1bda0	20 20 20 20 28 69 66 20 6c 61 79 6f 75 74 20 28 64 69 72 76 69 73 68 2d 6b 69 6c 6c 20 64 76 29	....(if.layout.(dirvish-kill.dv)
1bdc0	0a 20 20 20 20 20 20 28 77 68 65 6e 20 64 69 72 76 69 73 68 2d 73 69 64 65 2d 61 75 74 6f 2d 63	.......(when.dirvish-side-auto-c
1bde0	6c 6f 73 65 0a 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 6b 69 6c 6c 20 64 76 29 0a 20	lose.........(dirvish-kill.dv)..
1be00	20 20 20 20 20 20 20 28 77 68 65 6e 20 64 69 72 76 69 73 68 2d 72 65 75 73 65 2d 73 65 73 73 69	.......(when.dirvish-reuse-sessi
1be20	6f 6e 20 28 71 75 69 74 2d 77 69 6e 64 6f 77 29 29 29 0a 20 20 20 20 20 20 28 73 65 6c 65 63 74	on.(quit-window))).......(select
1be40	2d 77 69 6e 64 6f 77 20 28 63 6f 6e 64 20 28 28 66 75 6e 63 74 69 6f 6e 70 20 64 69 72 76 69 73	-window.(cond.((functionp.dirvis
1be60	68 2d 73 69 64 65 2d 6f 70 65 6e 2d 66 69 6c 65 2d 61 63 74 69 6f 6e 29 0a 20 20 20 20 20 20 20	h-side-open-file-action)........
1be80	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 64 69	.....................(funcall.di
1bea0	72 76 69 73 68 2d 73 69 64 65 2d 6f 70 65 6e 2d 66 69 6c 65 2d 61 63 74 69 6f 6e 29 29 0a 20 20	rvish-side-open-file-action))...
1bec0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 65 71 20 64 69	.........................((eq.di
1bee0	72 76 69 73 68 2d 73 69 64 65 2d 6f 70 65 6e 2d 66 69 6c 65 2d 61 63 74 69 6f 6e 20 27 6d 72 75	rvish-side-open-file-action.'mru
1bf00	29 20 6d 72 75 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	).mru)..........................
1bf20	20 20 28 28 65 71 20 64 69 72 76 69 73 68 2d 73 69 64 65 2d 6f 70 65 6e 2d 66 69 6c 65 2d 61 63	..((eq.dirvish-side-open-file-ac
1bf40	74 69 6f 6e 20 27 73 70 6c 69 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	tion.'split)....................
1bf60	20 20 20 20 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 6d	.........(with-selected-window.m
1bf80	72 75 20 28 73 70 6c 69 74 2d 77 69 6e 64 6f 77 2d 62 65 6c 6f 77 29 29 29 0a 20 20 20 20 20 20	ru.(split-window-below))).......
1bfa0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 65 71 20 64 69 72 76 69 73	.....................((eq.dirvis
1bfc0	68 2d 73 69 64 65 2d 6f 70 65 6e 2d 66 69 6c 65 2d 61 63 74 69 6f 6e 20 27 76 73 70 6c 69 74 29	h-side-open-file-action.'vsplit)
1bfe0	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 69	.............................(wi
1c000	74 68 2d 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 20 6d 72 75 20 28 73 70 6c 69 74 2d 77 69	th-selected-window.mru.(split-wi
1c020	6e 64 6f 77 2d 72 69 67 68 74 29 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69	ndow-right))))))))..(defun.dirvi
1c040	73 68 2d 73 69 64 65 2d 72 6f 6f 74 2d 77 69 6e 64 6f 77 2d 66 6e 20 28 29 0a 20 20 22 43 72 65	sh-side-root-window-fn.()..."Cre
1c060	61 74 65 20 72 6f 6f 74 20 77 69 6e 64 6f 77 20 61 63 63 6f 72 64 69 6e 67 20 74 6f 20 60 64 69	ate.root.window.according.to.`di
1c080	72 76 69 73 68 2d 73 69 64 65 2d 64 69 73 70 6c 61 79 2d 61 6c 69 73 74 27 2e 22 0a 20 20 28 6c	rvish-side-display-alist'."...(l
1c0a0	65 74 20 28 28 77 69 6e 20 28 64 69 73 70 6c 61 79 2d 62 75 66 66 65 72 2d 69 6e 2d 73 69 64 65	et.((win.(display-buffer-in-side
1c0c0	2d 77 69 6e 64 6f 77 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 2d	-window...............(dirvish--
1c0e0	75 74 69 6c 2d 62 75 66 66 65 72 20 22 74 65 6d 70 22 29 20 64 69 72 76 69 73 68 2d 73 69 64 65	util-buffer."temp").dirvish-side
1c100	2d 64 69 73 70 6c 61 79 2d 61 6c 69 73 74 29 29 29 0a 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 66	-display-alist))).....(cl-loop.f
1c120	6f 72 20 28 6b 65 79 20 2e 20 76 61 6c 75 65 29 20 69 6e 20 64 69 72 76 69 73 68 2d 73 69 64 65	or.(key...value).in.dirvish-side
1c140	2d 77 69 6e 64 6f 77 2d 70 61 72 61 6d 65 74 65 72 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	-window-parameters..............
1c160	64 6f 20 28 73 65 74 2d 77 69 6e 64 6f 77 2d 70 61 72 61 6d 65 74 65 72 20 77 69 6e 20 6b 65 79	do.(set-window-parameter.win.key
1c180	20 76 61 6c 75 65 29 29 0a 20 20 20 20 28 77 69 74 68 2d 73 65 6c 65 63 74 65 64 2d 77 69 6e 64	.value)).....(with-selected-wind
1c1a0	6f 77 20 77 69 6e 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 77 20 28 6d 61 78 20 64 69 72 76 69	ow.win.......(let.((w.(max.dirvi
1c1c0	73 68 2d 73 69 64 65 2d 77 69 64 74 68 20 77 69 6e 64 6f 77 2d 6d 69 6e 2d 77 69 64 74 68 29 29	sh-side-width.window-min-width))
1c1e0	20 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 28 63 6f 6e	.window-size-fixed).........(con
1c200	64 20 28 28 3e 20 28 77 69 6e 64 6f 77 2d 77 69 64 74 68 29 20 77 29 0a 20 20 20 20 20 20 20 20	d.((>.(window-width).w).........
1c220	20 20 20 20 20 20 20 28 73 68 72 69 6e 6b 2d 77 69 6e 64 6f 77 2d 68 6f 72 69 7a 6f 6e 74 61 6c	.......(shrink-window-horizontal
1c240	6c 79 20 20 28 2d 20 28 77 69 6e 64 6f 77 2d 77 69 64 74 68 29 20 77 29 29 29 0a 20 20 20 20 20	ly..(-.(window-width).w)))......
1c260	20 20 20 20 20 20 20 20 20 28 28 3c 20 28 77 69 6e 64 6f 77 2d 77 69 64 74 68 29 20 77 29 0a 20	.........((<.(window-width).w)..
1c280	20 20 20 20 20 20 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	..............(enlarge-window-ho
1c2a0	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)))
1c2c0	29 29 29 29 0a 20 20 20 20 28 73 65 6c 65 63 74 2d 77 69 6e 64 6f 77 20 77 69 6e 29 29 29 0a 0a	)))).....(select-window.win)))..
1c2e0	28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 73 69 64 65 2d 2d 73 65 73 73 69 6f 6e 2d 76 69 73	(defun.dirvish-side--session-vis
1c300	69 62 6c 65 2d 70 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 72 6f 6f 74 20 77 69 6e	ible-p.()..."Return.the.root.win
1c320	64 6f 77 20 6f 66 20 76 69 73 69 62 6c 65 20 73 69 64 65 20 73 65 73 73 69 6f 6e 2e 22 0a 20 20	dow.of.visible.side.session."...
1c340	28 63 6c 2d 6c 6f 6f 70 0a 20 20 20 66 6f 72 20 77 20 69 6e 20 28 77 69 6e 64 6f 77 2d 6c 69 73	(cl-loop....for.w.in.(window-lis
1c360	74 29 0a 20 20 20 66 6f 72 20 62 20 3d 20 28 77 69 6e 64 6f 77 2d 62 75 66 66 65 72 20 77 29 0a	t)....for.b.=.(window-buffer.w).
1c380	20 20 20 66 6f 72 20 64 76 20 3d 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72	...for.dv.=.(with-current-buffer
1c3a0	20 62 20 28 64 69 72 76 69 73 68 2d 63 75 72 72 29 29 0a 20 20 20 74 68 65 72 65 69 73 20 28 61	.b.(dirvish-curr))....thereis.(a
1c3c0	6e 64 20 64 76 20 28 65 71 20 27 73 69 64 65 20 28 63 61 72 20 28 64 76 2d 74 79 70 65 20 64 76	nd.dv.(eq.'side.(car.(dv-type.dv
1c3e0	29 29 29 20 77 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 73 69 64 65 2d 2d 61	))).w)))..(defun.dirvish-side--a
1c400	75 74 6f 2d 6a 75 6d 70 20 28 29 0a 20 20 22 53 65 6c 65 63 74 20 6c 61 74 65 73 74 20 62 75 66	uto-jump.()..."Select.latest.buf
1c420	66 65 72 20 66 69 6c 65 20 69 6e 20 74 68 65 20 76 69 73 69 62 6c 65 20 60 64 69 72 76 69 73 68	fer.file.in.the.visible.`dirvish
1c440	2d 73 69 64 65 27 20 73 65 73 73 69 6f 6e 2e 22 0a 20 20 28 72 75 6e 2d 77 69 74 68 2d 74 69 6d	-side'.session."...(run-with-tim
1c460	65 72 0a 20 20 20 30 2e 35 20 6e 69 6c 0a 20 20 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20	er....0.5.nil....(lambda.().....
1c480	20 28 77 68 65 6e 2d 6c 65 74 2a 20 28 28 28 6e 6f 74 20 64 69 72 76 69 73 68 2d 2d 74 68 69 73	.(when-let*.(((not.dirvish--this
1c4a0	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 20 28 6f 72 20 28 64 69	))..................(dir.(or.(di
1c4c0	72 76 69 73 68 2d 2d 67 65 74 2d 70 72 6f 6a 65 63 74 2d 72 6f 6f 74 29 20 64 65 66 61 75 6c 74	rvish--get-project-root).default
1c4e0	2d 64 69 72 65 63 74 6f 72 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77	-directory))..................(w
1c500	69 6e 20 28 64 69 72 76 69 73 68 2d 73 69 64 65 2d 2d 73 65 73 73 69 6f 6e 2d 76 69 73 69 62 6c	in.(dirvish-side--session-visibl
1c520	65 2d 70 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 76 20 28 77 69 74 68	e-p))..................(dv.(with
1c540	2d 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 20 77 69 6e 20 28 64 69 72 76 69 73 68 2d 63 75	-selected-window.win.(dirvish-cu
1c560	72 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 6e 6f 74 20 28 61 63	rr)))..................((not.(ac
1c580	74 69 76 65 2d 6d 69 6e 69 62 75 66 66 65 72 2d 77 69 6e 64 6f 77 29 29 29 0a 20 20 20 20 20 20	tive-minibuffer-window))).......
1c5a0	20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d	...........(file.buffer-file-nam
1c5c0	65 29 29 0a 20 20 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	e))........(with-selected-window
1c5e0	20 77 69 6e 0a 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 64 69 72 0a 20 20 20 20 20 20 20 20	.win..........(when.dir.........
1c600	20 20 20 28 73 65 74 71 20 64 69 72 76 69 73 68 2d 2d 74 68 69 73 20 64 76 29 0a 20 20 20 20 20	...(setq.dirvish--this.dv)......
1c620	20 20 20 20 20 20 28 6c 65 74 20 28 62 75 66 66 65 72 2d 6c 69 73 74 2d 75 70 64 61 74 65 2d 68	......(let.(buffer-list-update-h
1c640	6f 6f 6b 29 20 28 64 69 72 76 69 73 68 2d 66 69 6e 64 2d 65 6e 74 72 79 2d 61 20 64 69 72 29 29	ook).(dirvish-find-entry-a.dir))
1c660	0a 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 64 69 72 76 69 73 68 2d 73 69 64 65 2d 61 75 74	............(if.dirvish-side-aut
1c680	6f 2d 65 78 70 61 6e 64 20 28 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 65 78 70 61 6e 64	o-expand.(dirvish-subtree-expand
1c6a0	2d 74 6f 20 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 67 6f	-to.file)..............(dired-go
1c6c0	74 6f 2d 66 69 6c 65 20 66 69 6c 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69	to-file.file))............(dirvi
1c6e0	73 68 2d 70 72 6f 70 20 3a 63 75 73 2d 68 65 61 64 65 72 20 27 64 69 72 76 69 73 68 2d 73 69 64	sh-prop.:cus-header.'dirvish-sid
1c700	65 2d 68 65 61 64 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 2d 73	e-header)............(dirvish--s
1c720	65 74 75 70 2d 6d 6f 64 65 2d 6c 69 6e 65 20 28 63 61 72 20 28 64 76 2d 6c 61 79 6f 75 74 20 64	etup-mode-line.(car.(dv-layout.d
1c740	76 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 75 70 64 61 74 65 2d	v)))............(dirvish-update-
1c760	62 6f 64 79 2d 68 29 29 0a 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 64 69 72 76 69 73 68 2d	body-h))..........(setq.dirvish-
1c780	2d 74 68 69 73 20 6e 69 6c 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d	-this.nil))))))..(defun.dirvish-
1c7a0	73 69 64 65 2d 2d 6e 65 77 20 28 70 61 74 68 29 0a 20 20 22 4f 70 65 6e 20 61 20 73 69 64 65 20	side--new.(path)..."Open.a.side.
1c7c0	73 65 73 73 69 6f 6e 20 69 6e 20 50 41 54 48 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 62 6e 61 6d	session.in.PATH."...(let*.((bnam
1c7e0	65 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 28 64 76	e.buffer-file-name)..........(dv
1c800	20 28 6f 72 20 28 63 61 72 20 28 64 69 72 76 69 73 68 2d 2d 66 69 6e 64 2d 72 65 75 73 61 62 6c	.(or.(car.(dirvish--find-reusabl
1c820	65 20 27 73 69 64 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76	e.'side))..................(dirv
1c840	69 73 68 2d 6e 65 77 20 3a 74 79 70 65 20 27 28 73 69 64 65 20 77 69 64 74 68 20 64 65 64 69 63	ish-new.:type.'(side.width.dedic
1c860	61 74 65 64 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	ated............................
1c880	20 20 20 20 20 20 20 20 20 20 20 64 69 72 76 69 73 68 2d 73 69 64 65 2d 72 6f 6f 74 2d 77 69 6e	...........dirvish-side-root-win
1c8a0	64 6f 77 2d 66 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	dow-fn..........................
1c8c0	20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 76 69 73 68 2d 73 69 64 65 2d 66 69 6c 65 2d 6f	.............dirvish-side-file-o
1c8e0	70 65 6e 2d 66 6e 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 72 2d 77 69 6e 20 28 64 76 2d 72	pen-fn))))..........(r-win.(dv-r
1c900	6f 6f 74 2d 77 69 6e 64 6f 77 20 64 76 29 29 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 28 77 69	oot-window.dv))).....(unless.(wi
1c920	6e 64 6f 77 2d 6c 69 76 65 2d 70 20 72 2d 77 69 6e 29 20 28 73 65 74 71 20 72 2d 77 69 6e 20 28	ndow-live-p.r-win).(setq.r-win.(
1c940	64 69 72 76 69 73 68 2d 2d 63 72 65 61 74 65 2d 72 6f 6f 74 2d 77 69 6e 64 6f 77 20 64 76 29 29	dirvish--create-root-window.dv))
1c960	29 0a 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 72 2d 77 69	).....(with-selected-window.r-wi
1c980	6e 0a 20 20 20 20 20 20 28 73 65 74 71 20 64 69 72 76 69 73 68 2d 2d 74 68 69 73 20 64 76 29 0a	n.......(setq.dirvish--this.dv).
1c9a0	20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 66 69 6e 64 2d 65 6e 74 72 79 2d 61 20 70 61 74 68	......(dirvish-find-entry-a.path
1c9c0	29 0a 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 6e 6f 74 20 62 6e 61 6d 65 29 20 6e 69 6c 29 0a	).......(cond.((not.bname).nil).
1c9e0	20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 73 69 64 65 2d 61 75 74 6f 2d 65	............(dirvish-side-auto-e
1ca00	78 70 61 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 73 75 62 74	xpand..............(dirvish-subt
1ca20	72 65 65 2d 65 78 70 61 6e 64 2d 74 6f 20 62 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 20	ree-expand-to.bname))...........
1ca40	20 20 28 74 20 28 64 69 72 65 64 2d 67 6f 74 6f 2d 66 69 6c 65 20 62 6e 61 6d 65 29 29 29 0a 20	..(t.(dired-goto-file.bname)))..
1ca60	20 20 20 20 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 63 75 73 2d 68 65 61 64 65 72 20 27	.....(dirvish-prop.:cus-header.'
1ca80	64 69 72 76 69 73 68 2d 73 69 64 65 2d 68 65 61 64 65 72 29 0a 20 20 20 20 20 20 28 64 69 72 76	dirvish-side-header).......(dirv
1caa0	69 73 68 2d 75 70 64 61 74 65 2d 62 6f 64 79 2d 68 29 29 29 29 0a 0a 28 64 69 72 76 69 73 68 2d	ish-update-body-h))))..(dirvish-
1cac0	64 65 66 69 6e 65 2d 6d 6f 64 65 2d 6c 69 6e 65 20 70 72 6f 6a 65 63 74 0a 20 20 22 52 65 74 75	define-mode-line.project..."Retu
1cae0	72 6e 20 61 20 73 74 72 69 6e 67 20 73 68 6f 77 69 6e 67 20 63 75 72 72 65 6e 74 20 70 72 6f 6a	rn.a.string.showing.current.proj
1cb00	65 63 74 2e 22 0a 20 20 28 6c 65 74 20 28 28 70 72 6f 6a 65 63 74 20 28 64 69 72 76 69 73 68 2d	ect."...(let.((project.(dirvish-
1cb20	2d 67 65 74 2d 70 72 6f 6a 65 63 74 2d 72 6f 6f 74 29 29 0a 20 20 20 20 20 20 20 20 28 66 61 63	-get-project-root)).........(fac
1cb40	65 20 28 69 66 20 28 64 69 72 76 69 73 68 2d 2d 77 69 6e 64 6f 77 2d 73 65 6c 65 63 74 65 64 2d	e.(if.(dirvish--window-selected-
1cb60	70 20 64 76 29 20 27 64 69 72 65 64 2d 68 65 61 64 65 72 20 27 73 68 61 64 6f 77 29 29 29 0a 20	p.dv).'dired-header.'shadow)))..
1cb80	20 20 20 28 69 66 20 70 72 6f 6a 65 63 74 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 70 72 6f	...(if.project.........(setq.pro
1cba0	6a 65 63 74 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 62 61 73 65 20 28 64 69 72 65 63 74 6f 72 79 2d	ject.(file-name-base.(directory-
1cbc0	66 69 6c 65 2d 6e 61 6d 65 20 70 72 6f 6a 65 63 74 29 29 29 0a 20 20 20 20 20 20 28 73 65 74 71	file-name.project))).......(setq
1cbe0	20 70 72 6f 6a 65 63 74 20 22 2d 22 29 29 0a 20 20 20 20 28 66 6f 72 6d 61 74 20 22 20 25 73 20	.project."-")).....(format.".%s.
1cc00	25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 50 72 6f	%s".............(propertize."Pro
1cc20	6a 65 63 74 3a 22 20 27 66 61 63 65 20 66 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28	ject:".'face.face).............(
1cc40	70 72 6f 70 65 72 74 69 7a 65 20 70 72 6f 6a 65 63 74 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c	propertize.project.'face.'font-l
1cc60	6f 63 6b 2d 73 74 72 69 6e 67 2d 66 61 63 65 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c	ock-string-face))))..;;;###autol
1cc80	6f 61 64 0a 28 64 65 66 69 6e 65 2d 6d 69 6e 6f 72 2d 6d 6f 64 65 20 64 69 72 76 69 73 68 2d 73	oad.(define-minor-mode.dirvish-s
1cca0	69 64 65 2d 66 6f 6c 6c 6f 77 2d 6d 6f 64 65 0a 20 20 22 54 6f 67 67 6c 65 20 60 64 69 72 76 69	ide-follow-mode..."Toggle.`dirvi
1ccc0	73 68 2d 73 69 64 65 2d 66 6f 6c 6c 6f 77 2d 6d 6f 64 65 27 2e 0a 57 68 65 6e 20 65 6e 61 62 6c	sh-side-follow-mode'..When.enabl
1cce0	65 64 20 74 68 65 20 76 69 73 69 62 6c 65 20 73 69 64 65 20 73 65 73 73 69 6f 6e 20 77 69 6c 6c	ed.the.visible.side.session.will
1cd00	20 73 65 6c 65 63 74 20 74 68 65 20 63 75 72 72 65 6e 74 0a 62 75 66 66 65 72 27 73 20 66 69 6c	.select.the.current.buffer's.fil
1cd20	65 6e 61 6d 65 2e 20 20 49 74 20 77 69 6c 6c 20 61 6c 73 6f 20 76 69 73 69 74 73 20 74 68 65 20	ename...It.will.also.visits.the.
1cd40	6c 61 74 65 73 74 20 60 70 72 6f 6a 65 63 74 2d 72 6f 6f 74 27 0a 61 66 74 65 72 20 73 77 69 74	latest.`project-root'.after.swit
1cd60	63 68 69 6e 67 20 74 6f 20 61 20 6e 65 77 20 70 72 6f 6a 65 63 74 2e 22 0a 20 20 3a 69 6e 69 74	ching.to.a.new.project."...:init
1cd80	2d 76 61 6c 75 65 20 6e 69 6c 20 3a 67 6c 6f 62 61 6c 20 74 20 3a 67 72 6f 75 70 20 27 64 69 72	-value.nil.:global.t.:group.'dir
1cda0	76 69 73 68 0a 20 20 28 69 66 20 64 69 72 76 69 73 68 2d 73 69 64 65 2d 66 6f 6c 6c 6f 77 2d 6d	vish...(if.dirvish-side-follow-m
1cdc0	6f 64 65 0a 20 20 20 20 20 20 28 61 64 64 2d 68 6f 6f 6b 20 27 62 75 66 66 65 72 2d 6c 69 73 74	ode.......(add-hook.'buffer-list
1cde0	2d 75 70 64 61 74 65 2d 68 6f 6f 6b 20 23 27 64 69 72 76 69 73 68 2d 73 69 64 65 2d 2d 61 75 74	-update-hook.#'dirvish-side--aut
1ce00	6f 2d 6a 75 6d 70 29 0a 20 20 20 20 28 72 65 6d 6f 76 65 2d 68 6f 6f 6b 20 27 62 75 66 66 65 72	o-jump).....(remove-hook.'buffer
1ce20	2d 6c 69 73 74 2d 75 70 64 61 74 65 2d 68 6f 6f 6b 20 23 27 64 69 72 76 69 73 68 2d 73 69 64 65	-list-update-hook.#'dirvish-side
1ce40	2d 2d 61 75 74 6f 2d 6a 75 6d 70 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28	--auto-jump)))..;;;###autoload.(
1ce60	64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 73 69 64 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20 70 61	defun.dirvish-side.(&optional.pa
1ce80	74 68 29 0a 20 20 22 54 6f 67 67 6c 65 20 61 20 44 69 72 76 69 73 68 20 73 65 73 73 69 6f 6e 20	th)..."Toggle.a.Dirvish.session.
1cea0	61 74 20 74 68 65 20 73 69 64 65 20 77 69 6e 64 6f 77 2e 0a 0a 2d 20 49 66 20 74 68 65 20 63 75	at.the.side.window...-.If.the.cu
1cec0	72 72 65 6e 74 20 77 69 6e 64 6f 77 20 69 73 20 61 20 73 69 64 65 20 73 65 73 73 69 6f 6e 20 77	rrent.window.is.a.side.session.w
1cee0	69 6e 64 6f 77 2c 20 68 69 64 65 20 69 74 2e 0a 2d 20 49 66 20 61 20 73 69 64 65 20 73 65 73 73	indow,.hide.it..-.If.a.side.sess
1cf00	69 6f 6e 20 69 73 20 76 69 73 69 62 6c 65 2c 20 73 65 6c 65 63 74 20 69 74 2e 0a 2d 20 49 66 20	ion.is.visible,.select.it..-.If.
1cf20	61 20 73 69 64 65 20 73 65 73 73 69 6f 6e 20 65 78 69 73 74 73 20 62 75 74 20 69 73 20 6e 6f 74	a.side.session.exists.but.is.not
1cf40	20 76 69 73 69 62 6c 65 2c 20 73 68 6f 77 20 69 74 2e 0a 2d 20 49 66 20 74 68 65 72 65 20 69 73	.visible,.show.it..-.If.there.is
1cf60	20 6e 6f 20 73 69 64 65 20 73 65 73 73 69 6f 6e 20 65 78 69 73 74 73 2c 63 72 65 61 74 65 20 61	.no.side.session.exists,create.a
1cf80	20 6e 65 77 20 6f 6e 65 20 77 69 74 68 20 50 41 54 48 2e 0a 0a 49 66 20 63 61 6c 6c 65 64 20 77	.new.one.with.PATH...If.called.w
1cfa0	69 74 68 20 5c 5c 5b 75 6e 69 76 65 72 73 61 6c 2d 61 72 67 75 6d 65 6e 74 73 5d 2c 20 70 72 6f	ith.\\[universal-arguments],.pro
1cfc0	6d 70 74 20 66 6f 72 20 50 41 54 48 2c 0a 6f 74 68 65 72 77 69 73 65 20 69 74 20 64 65 66 61 75	mpt.for.PATH,.otherwise.it.defau
1cfe0	6c 74 73 20 74 6f 20 60 70 72 6f 6a 65 63 74 2d 63 75 72 72 65 6e 74 27 2e 22 0a 20 20 28 69 6e	lts.to.`project-current'."...(in
1d000	74 65 72 61 63 74 69 76 65 20 28 6c 69 73 74 20 28 61 6e 64 20 63 75 72 72 65 6e 74 2d 70 72 65	teractive.(list.(and.current-pre
1d020	66 69 78 2d 61 72 67 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	fix-arg.........................
1d040	20 20 28 72 65 61 64 2d 64 69 72 65 63 74 6f 72 79 2d 6e 61 6d 65 20 22 4f 70 65 6e 20 73 69 64	..(read-directory-name."Open.sid
1d060	65 74 72 65 65 3a 20 22 29 29 29 29 0a 20 20 28 6c 65 74 20 28 28 66 75 6c 6c 66 72 61 6d 65 70	etree:."))))...(let.((fullframep
1d080	20 28 77 68 65 6e 2d 6c 65 74 20 28 28 64 76 20 28 64 69 72 76 69 73 68 2d 63 75 72 72 29 29 29	.(when-let.((dv.(dirvish-curr)))
1d0a0	20 28 63 61 72 20 28 64 76 2d 6c 61 79 6f 75 74 20 64 76 29 29 29 29 0a 20 20 20 20 20 20 20 20	.(car.(dv-layout.dv)))).........
1d0c0	28 76 69 73 69 62 6c 65 20 28 64 69 72 76 69 73 68 2d 73 69 64 65 2d 2d 73 65 73 73 69 6f 6e 2d	(visible.(dirvish-side--session-
1d0e0	76 69 73 69 62 6c 65 2d 70 29 29 0a 20 20 20 20 20 20 20 20 28 70 61 74 68 20 28 6f 72 20 70 61	visible-p)).........(path.(or.pa
1d100	74 68 20 28 64 69 72 76 69 73 68 2d 2d 67 65 74 2d 70 72 6f 6a 65 63 74 2d 72 6f 6f 74 29 20 64	th.(dirvish--get-project-root).d
1d120	65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 20 28 66	efault-directory))).....(cond.(f
1d140	75 6c 6c 66 72 61 6d 65 70 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 43 61 6e 20 6e 6f 74 20 63	ullframep.(user-error."Can.not.c
1d160	72 65 61 74 65 20 73 69 64 65 20 73 65 73 73 69 6f 6e 20 68 65 72 65 22 29 29 0a 20 20 20 20 20	reate.side.session.here"))......
1d180	20 20 20 20 20 28 28 65 71 20 76 69 73 69 62 6c 65 20 28 73 65 6c 65 63 74 65 64 2d 77 69 6e 64	.....((eq.visible.(selected-wind
1d1a0	6f 77 29 29 20 28 64 69 72 76 69 73 68 2d 71 75 69 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 28	ow)).(dirvish-quit))...........(
1d1c0	76 69 73 69 62 6c 65 20 28 73 65 6c 65 63 74 2d 77 69 6e 64 6f 77 20 76 69 73 69 62 6c 65 29 29	visible.(select-window.visible))
1d1e0	0a 20 20 20 20 20 20 20 20 20 20 28 74 20 28 64 69 72 76 69 73 68 2d 73 69 64 65 2d 2d 6e 65 77	...........(t.(dirvish-side--new
1d200	20 70 61 74 68 29 29 29 29 29 0a 0a 28 70 72 6f 76 69 64 65 20 27 64 69 72 76 69 73 68 2d 73 69	.path)))))..(provide.'dirvish-si
1d220	64 65 29 0a 3b 3b 3b 20 64 69 72 76 69 73 68 2d 73 69 64 65 2e 65 6c 20 65 6e 64 73 20 68 65 72	de).;;;.dirvish-side.el.ends.her
1d240	65 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	e...............................
1d260	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1d280	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1d2a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1d2c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1d2e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1d300	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1d320	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1d340	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1d360	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1d380	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1d3a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1d3c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1d3e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1d400	64 69 72 76 69 73 68 2d 32 30 32 33 30 35 31 39 2e 31 35 30 30 2f 64 69 72 76 69 73 68 2d 73 75	dirvish-20230519.1500/dirvish-su
1d420	62 74 72 65 65 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	btree.el........................
1d440	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1d460	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
1d480	30 30 34 31 32 37 31 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 36 31 32 32 00 20 30 00 00 00	0041271.00000000000.016122..0...
1d4a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1d4c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1d4e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1d500	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...................
1d520	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...................
1d540	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1d560	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1d580	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1d5a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1d5c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1d5e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1d600	3b 3b 3b 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2e 65 6c 20 2d 2d 2d 20 54 75 72 6e 20	;;;.dirvish-subtree.el.---.Turn.
1d620	44 69 72 76 69 73 68 20 69 6e 74 6f 20 61 20 74 72 65 65 20 62 72 6f 77 73 65 72 20 2d 2a 2d 20	Dirvish.into.a.tree.browser.-*-.
1d640	6c 65 78 69 63 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	lexical-binding:.t.-*-..;;.Copyr
1d660	69 67 68 74 20 28 43 29 20 32 30 32 31 2d 32 30 32 32 20 41 6c 65 78 20 4c 75 0a 3b 3b 20 41 75	ight.(C).2021-2022.Alex.Lu.;;.Au
1d680	74 68 6f 72 20 3a 20 41 6c 65 78 20 4c 75 20 3c 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63	thor.:.Alex.Lu.<https://github.c
1d6a0	6f 6d 2f 61 6c 65 78 6c 75 69 67 69 74 3e 0a 3b 3b 20 56 65 72 73 69 6f 6e 3a 20 32 2e 30 2e 35	om/alexluigit>.;;.Version:.2.0.5
1d6c0	33 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 66 69 6c 65 73 2c 20 63 6f 6e 76 65 6e 69 65 6e 63	3.;;.Keywords:.files,.convenienc
1d6e0	65 0a 3b 3b 20 48 6f 6d 65 70 61 67 65 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f	e.;;.Homepage:.https://github.co
1d700	6d 2f 61 6c 65 78 6c 75 69 67 69 74 2f 64 69 72 76 69 73 68 0a 3b 3b 20 53 50 44 58 2d 4c 69 63	m/alexluigit/dirvish.;;.SPDX-Lic
1d720	65 6e 73 65 2d 49 64 65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 65	ense-Identifier:.GPL-3.0-or-late
1d740	72 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 20 54 68 69 73 20 65 78 74 65	r..;;;.Commentary:..;;.This.exte
1d760	6e 73 69 6f 6e 20 61 6c 6c 6f 77 73 20 75 73 65 72 73 20 74 6f 20 69 6e 73 65 72 74 20 73 75 62	nsion.allows.users.to.insert.sub
1d780	64 69 72 65 63 74 6f 72 69 65 73 20 69 6e 20 61 20 74 72 65 65 2d 6c 69 6b 65 20 66 61 73 68 69	directories.in.a.tree-like.fashi
1d7a0	6f 6e 2c 0a 3b 3b 20 6c 69 6b 65 20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 27 20 6f 72 20 60	on,.;;.like.`dired-subtree'.or.`
1d7c0	74 72 65 65 6d 61 63 73 27 2c 20 62 75 74 20 73 69 6d 70 6c 65 72 20 61 6e 64 20 66 61 73 74 65	treemacs',.but.simpler.and.faste
1d7e0	72 2e 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e	r...;;;.Code:..(declare-function
1d800	20 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 2d 6f 63 74 69 63 6f 6e 20 22 61 6c 6c 2d 74 68 65 2d	.all-the-icons-octicon."all-the-
1d820	69 63 6f 6e 73 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 6e 65 72 64 2d 69	icons").(declare-function.nerd-i
1d840	63 6f 6e 73 2d 6f 63 74 69 63 6f 6e 20 22 6e 65 72 64 2d 69 63 6f 6e 73 22 29 0a 28 64 65 63 6c	cons-octicon."nerd-icons").(decl
1d860	61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 6f 6e 73 75 6c 74 2d 6c 73 70 2d 66 69 6c 65 2d 73 79	are-function.consult-lsp-file-sy
1d880	6d 62 6f 6c 73 20 22 63 6f 6e 73 75 6c 74 2d 6c 73 70 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75	mbols."consult-lsp").(declare-fu
1d8a0	6e 63 74 69 6f 6e 20 63 6f 6e 73 75 6c 74 2d 69 6d 65 6e 75 20 22 63 6f 6e 73 75 6c 74 2d 69 6d	nction.consult-imenu."consult-im
1d8c0	65 6e 75 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 6f 6e 73 75 6c 74 2d	enu").(declare-function.consult-
1d8e0	6c 69 6e 65 20 22 63 6f 6e 73 75 6c 74 22 29 0a 28 72 65 71 75 69 72 65 20 27 64 69 72 76 69 73	line."consult").(require.'dirvis
1d900	68 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 6c	h)..(defcustom.dirvish-subtree-l
1d920	69 73 74 69 6e 67 2d 73 77 69 74 63 68 65 73 20 6e 69 6c 0a 20 20 22 4c 69 73 74 69 6e 67 20 53	isting-switches.nil..."Listing.S
1d940	57 49 54 43 48 45 53 20 75 73 65 64 20 69 6e 20 73 75 62 74 72 65 65 73 2e 0a 54 68 65 20 76 61	WITCHES.used.in.subtrees..The.va
1d960	6c 75 65 20 6d 61 79 20 62 65 20 61 20 73 74 72 69 6e 67 20 6f 66 20 6f 70 74 69 6f 6e 73 20 6f	lue.may.be.a.string.of.options.o
1d980	72 20 6e 69 6c 20 77 68 69 63 68 20 6d 65 61 6e 73 20 74 68 65 0a 77 6f 72 6b 69 6e 67 20 73 77	r.nil.which.means.the.working.sw
1d9a0	69 74 63 68 65 73 20 6f 66 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 20 77 69 6c 6c 20 62 65	itches.of.current.buffer.will.be
1d9c0	20 75 73 65 64 2e 22 0a 20 20 3a 74 79 70 65 20 27 28 63 68 6f 69 63 65 20 73 79 6d 62 6f 6c 20	.used."...:type.'(choice.symbol.
1d9e0	73 74 72 69 6e 67 29 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 29 0a 0a 28 64 65 66 69 6e	string).:group.'dirvish)..(defin
1da00	65 2d 6f 62 73 6f 6c 65 74 65 2d 76 61 72 69 61 62 6c 65 2d 61 6c 69 61 73 20 27 64 69 72 76 69	e-obsolete-variable-alias.'dirvi
1da20	73 68 2d 73 75 62 74 72 65 65 2d 6c 69 6e 65 2d 70 72 65 66 69 78 20 27 64 69 72 76 69 73 68 2d	sh-subtree-line-prefix.'dirvish-
1da40	73 75 62 74 72 65 65 2d 70 72 65 66 69 78 20 22 53 65 70 20 31 2c 20 32 30 32 32 22 29 0a 28 64	subtree-prefix."Sep.1,.2022").(d
1da60	65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 70 72 65 66 69 78 20	efcustom.dirvish-subtree-prefix.
1da80	22 20 e2 94 82 22 0a 20 20 22 41 20 73 74 72 69 6e 67 20 70 75 74 20 69 6e 74 6f 20 65 61 63 68	"...."..."A.string.put.into.each
1daa0	20 6e 65 73 74 65 64 20 73 75 62 74 72 65 65 2e 0a 54 68 65 20 70 72 65 66 69 78 20 69 73 20 72	.nested.subtree..The.prefix.is.r
1dac0	65 70 65 61 74 65 64 20 5c 22 64 65 70 74 68 5c 22 20 74 69 6d 65 73 2e 22 0a 20 20 3a 74 79 70	epeated.\"depth\".times."...:typ
1dae0	65 20 27 73 74 72 69 6e 67 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 29 0a 0a 28 64 65 66	e.'string.:group.'dirvish)..(def
1db00	63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 73 61 76 65 2d 6f 6e 2d 72	custom.dirvish-subtree-save-on-r
1db20	65 76 65 72 74 20 74 0a 20 20 22 4e 6f 6e 2d 6e 69 6c 20 6d 65 61 6e 73 20 60 72 65 76 65 72 74	evert.t..."Non-nil.means.`revert
1db40	2d 62 75 66 66 65 72 27 20 6b 65 65 70 73 20 61 6c 6c 20 65 78 70 61 6e 64 65 64 20 73 75 62 74	-buffer'.keeps.all.expanded.subt
1db60	72 65 65 73 2e 22 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 20 3a 67 72 6f 75 70 20 27	rees."...:type.'boolean.:group.'
1db80	64 69 72 76 69 73 68 0a 20 20 3a 73 65 74 20 28 6c 61 6d 62 64 61 20 28 6b 20 76 29 0a 20 20 20	dirvish...:set.(lambda.(k.v)....
1dba0	20 20 20 20 20 20 28 73 65 74 20 6b 20 76 29 0a 20 20 20 20 20 20 20 20 20 28 69 66 20 76 20 28	......(set.k.v)..........(if.v.(
1dbc0	61 64 64 2d 68 6f 6f 6b 20 27 64 69 72 76 69 73 68 2d 61 66 74 65 72 2d 72 65 76 65 72 74 2d 68	add-hook.'dirvish-after-revert-h
1dbe0	6f 6f 6b 20 23 27 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2d 72 65 76 65 72 74 29 0a 20	ook.#'dirvish-subtree--revert)..
1dc00	20 20 20 20 20 20 20 20 20 20 28 72 65 6d 6f 76 65 2d 68 6f 6f 6b 20 27 64 69 72 76 69 73 68 2d	..........(remove-hook.'dirvish-
1dc20	61 66 74 65 72 2d 72 65 76 65 72 74 2d 68 6f 6f 6b 20 23 27 64 69 72 76 69 73 68 2d 73 75 62 74	after-revert-hook.#'dirvish-subt
1dc40	72 65 65 2d 2d 72 65 76 65 72 74 29 29 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76	ree--revert))))..(defcustom.dirv
1dc60	69 73 68 2d 73 75 62 74 72 65 65 2d 61 6c 77 61 79 73 2d 73 68 6f 77 2d 73 74 61 74 65 20 6e 69	ish-subtree-always-show-state.ni
1dc80	6c 0a 20 20 22 4e 6f 6e 2d 6e 69 6c 20 6d 65 61 6e 73 20 61 6c 77 61 79 73 20 73 68 6f 77 20 74	l..."Non-nil.means.always.show.t
1dca0	68 65 20 73 75 62 74 72 65 65 20 73 74 61 74 65 20 69 6e 64 69 63 61 74 6f 72 2e 22 0a 20 20 3a	he.subtree.state.indicator."...:
1dcc0	74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 29 0a 0a	type.'boolean.:group.'dirvish)..
1dce0	28 64 65 66 76 61 72 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2d 73 74 61 74 65 2d 69	(defvar.dirvish-subtree--state-i
1dd00	63 6f 6e 73 20 6e 69 6c 29 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 73 75 62	cons.nil).(defcustom.dirvish-sub
1dd20	74 72 65 65 2d 73 74 61 74 65 2d 73 74 79 6c 65 20 27 63 68 65 76 72 6f 6e 0a 20 20 22 49 63 6f	tree-state-style.'chevron..."Ico
1dd40	6e 2f 73 74 72 69 6e 67 20 75 73 65 64 20 66 6f 72 20 64 69 72 65 63 74 6f 72 79 20 65 78 70 61	n/string.used.for.directory.expa
1dd60	6e 64 65 64 20 73 74 61 74 65 2e 0a 54 68 65 20 76 61 6c 75 65 20 63 61 6e 20 62 65 20 6f 6e 65	nded.state..The.value.can.be.one
1dd80	20 6f 66 3a 20 60 70 6c 75 73 27 2c 20 60 61 72 72 6f 77 27 2c 20 60 63 68 65 76 72 6f 6e 27 2c	.of:.`plus',.`arrow',.`chevron',
1dda0	20 60 6e 65 72 64 27 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 20 3a 74 79 70	.`nerd'."...:group.'dirvish.:typ
1ddc0	65 20 27 73 79 6d 62 6f 6c 0a 20 20 3a 73 65 74 0a 20 20 28 6c 61 6d 62 64 61 20 28 6b 20 76 29	e.'symbol...:set...(lambda.(k.v)
1dde0	0a 20 20 20 20 28 61 6e 64 20 28 65 71 20 76 20 27 63 68 65 76 72 6f 6e 29 20 28 6e 6f 74 20 28	.....(and.(eq.v.'chevron).(not.(
1de00	72 65 71 75 69 72 65 20 27 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 20 6e 69 6c 20 74 29 29 20 28	require.'all-the-icons.nil.t)).(
1de20	73 65 74 71 20 76 20 27 61 72 72 6f 77 29 29 0a 20 20 20 20 28 61 6e 64 20 28 65 71 20 76 20 27	setq.v.'arrow)).....(and.(eq.v.'
1de40	6e 65 72 64 29 20 28 6e 6f 74 20 28 72 65 71 75 69 72 65 20 27 6e 65 72 64 2d 69 63 6f 6e 73 20	nerd).(not.(require.'nerd-icons.
1de60	6e 69 6c 20 74 29 29 20 28 73 65 74 71 20 76 20 27 61 72 72 6f 77 29 29 0a 20 20 20 20 28 73 65	nil.t)).(setq.v.'arrow)).....(se
1de80	74 20 6b 20 76 29 0a 20 20 20 20 28 73 65 74 71 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65	t.k.v).....(setq.dirvish-subtree
1dea0	2d 2d 73 74 61 74 65 2d 69 63 6f 6e 73 0a 20 20 20 20 20 20 20 20 20 20 28 70 63 61 73 65 20 28	--state-icons...........(pcase.(
1dec0	73 79 6d 62 6f 6c 2d 76 61 6c 75 65 20 6b 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 27 70 6c	symbol-value.k).............('pl
1dee0	75 73 20 28 63 6f 6e 73 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 2d 22 20 27 66 61 63 65 20 27	us.(cons.(propertize."-".'face.'
1df00	64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 73 74 61 74 65 29 0a 20 20 20 20 20 20 20 20 20	dirvish-subtree-state)..........
1df20	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 2b 22 20	................(propertize."+".
1df40	27 66 61 63 65 20 27 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 73 74 61 74 65 29 29 29 0a	'face.'dirvish-subtree-state))).
1df60	20 20 20 20 20 20 20 20 20 20 20 20 28 27 61 72 72 6f 77 20 28 63 6f 6e 73 20 28 70 72 6f 70 65	............('arrow.(cons.(prope
1df80	72 74 69 7a 65 20 22 e2 96 be 22 20 27 66 61 63 65 20 27 64 69 72 76 69 73 68 2d 73 75 62 74 72	rtize."...".'face.'dirvish-subtr
1dfa0	65 65 2d 73 74 61 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ee-state).......................
1dfc0	20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 e2 96 b8 22 20 27 66 61 63 65 20 27 64 69 72	....(propertize."...".'face.'dir
1dfe0	76 69 73 68 2d 73 75 62 74 72 65 65 2d 73 74 61 74 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20	vish-subtree-state)))...........
1e000	20 20 28 27 6e 65 72 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 0a 20 20 20 20	..('nerd..............(cons.....
1e020	20 20 20 20 20 20 20 20 20 20 28 6e 65 72 64 2d 69 63 6f 6e 73 2d 6f 63 74 69 63 6f 6e 0a 20 20	..........(nerd-icons-octicon...
1e040	20 20 20 20 20 20 20 20 20 20 20 20 20 22 6e 66 2d 6f 63 74 2d 63 68 65 76 72 6f 6e 5f 64 6f 77	............."nf-oct-chevron_dow
1e060	6e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 65 69 67 68 74 20 28 2a 20 28 6f 72	n"................:height.(*.(or
1e080	20 28 62 6f 75 6e 64 2d 61 6e 64 2d 74 72 75 65 2d 70 20 64 69 72 76 69 73 68 2d 6e 65 72 64 2d	.(bound-and-true-p.dirvish-nerd-
1e0a0	69 63 6f 6e 73 2d 68 65 69 67 68 74 29 20 31 29 20 30 2e 38 29 0a 20 20 20 20 20 20 20 20 20 20	icons-height).1).0.8)...........
1e0c0	20 20 20 20 20 3a 76 2d 61 64 6a 75 73 74 20 30 2e 31 20 3a 66 61 63 65 20 27 64 69 72 76 69 73	.....:v-adjust.0.1.:face.'dirvis
1e0e0	68 2d 73 75 62 74 72 65 65 2d 73 74 61 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	h-subtree-state)...............(
1e100	6e 65 72 64 2d 69 63 6f 6e 73 2d 6f 63 74 69 63 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	nerd-icons-octicon..............
1e120	20 20 22 6e 66 2d 6f 63 74 2d 63 68 65 76 72 6f 6e 5f 72 69 67 68 74 22 0a 20 20 20 20 20 20 20	.."nf-oct-chevron_right"........
1e140	20 20 20 20 20 20 20 20 3a 68 65 69 67 68 74 20 28 2a 20 28 6f 72 20 28 62 6f 75 6e 64 2d 61 6e	........:height.(*.(or.(bound-an
1e160	64 2d 74 72 75 65 2d 70 20 64 69 72 76 69 73 68 2d 6e 65 72 64 2d 69 63 6f 6e 73 2d 68 65 69 67	d-true-p.dirvish-nerd-icons-heig
1e180	68 74 29 20 31 29 20 30 2e 38 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 76 2d 61 64	ht).1).0.8)................:v-ad
1e1a0	6a 75 73 74 20 30 2e 31 20 3a 66 61 63 65 20 27 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d	just.0.1.:face.'dirvish-subtree-
1e1c0	73 74 61 74 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 27 63 68 65 76 72 6f 6e 0a 20	state))).............('chevron..
1e1e0	20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	............(cons...............
1e200	28 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 2d 6f 63 74 69 63 6f 6e 0a 20 20 20 20 20 20 20 20 20	(all-the-icons-octicon..........
1e220	20 20 20 20 20 20 22 63 68 65 76 72 6f 6e 2d 64 6f 77 6e 22 0a 20 20 20 20 20 20 20 20 20 20 20	......"chevron-down"............
1e240	20 20 20 20 3a 68 65 69 67 68 74 20 28 2a 20 28 6f 72 20 28 62 6f 75 6e 64 2d 61 6e 64 2d 74 72	....:height.(*.(or.(bound-and-tr
1e260	75 65 2d 70 20 64 69 72 76 69 73 68 2d 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 2d 68 65 69 67 68	ue-p.dirvish-all-the-icons-heigh
1e280	74 29 20 31 29 20 30 2e 38 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 76 2d 61 64 6a	t).1).0.8)................:v-adj
1e2a0	75 73 74 20 30 2e 31 20 3a 66 61 63 65 20 27 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 73	ust.0.1.:face.'dirvish-subtree-s
1e2c0	74 61 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6c 6c 2d 74 68 65 2d 69 63 6f	tate)...............(all-the-ico
1e2e0	6e 73 2d 6f 63 74 69 63 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 63 68 65 76 72	ns-octicon................"chevr
1e300	6f 6e 2d 72 69 67 68 74 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 65 69 67 68 74	on-right"................:height
1e320	20 28 2a 20 28 6f 72 20 28 62 6f 75 6e 64 2d 61 6e 64 2d 74 72 75 65 2d 70 20 64 69 72 76 69 73	.(*.(or.(bound-and-true-p.dirvis
1e340	68 2d 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 2d 68 65 69 67 68 74 29 20 31 29 20 30 2e 38 29 0a	h-all-the-icons-height).1).0.8).
1e360	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 76 2d 61 64 6a 75 73 74 20 30 2e 31 20 3a 66 61	...............:v-adjust.0.1.:fa
1e380	63 65 20 27 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 73 74 61 74 65 29 29 29 29 29 29 29	ce.'dirvish-subtree-state)))))))
1e3a0	0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 66 69 6c	..(defcustom.dirvish-subtree-fil
1e3c0	65 2d 76 69 65 77 65 72 20 23 27 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 64 65 66 61 75	e-viewer.#'dirvish-subtree-defau
1e3e0	6c 74 2d 66 69 6c 65 2d 76 69 65 77 65 72 0a 20 20 22 54 68 65 20 66 75 6e 63 74 69 6f 6e 20 75	lt-file-viewer..."The.function.u
1e400	73 65 64 20 74 6f 20 76 69 65 77 20 61 20 66 69 6c 65 20 6e 6f 64 65 2e 0a 41 66 74 65 72 20 65	sed.to.view.a.file.node..After.e
1e420	78 65 63 75 74 69 6e 67 20 60 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 74 6f 67 67 6c 65	xecuting.`dirvish-subtree-toggle
1e440	27 20 6f 6e 20 61 20 66 69 6c 65 20 6e 6f 64 65 2c 20 74 68 65 0a 6e 65 77 6c 79 20 6f 70 65 6e	'.on.a.file.node,.the.newly.open
1e460	65 64 20 66 69 6c 65 20 62 75 66 66 65 72 20 69 73 20 70 75 74 20 69 6e 20 65 69 74 68 65 72 20	ed.file.buffer.is.put.in.either.
1e480	74 68 65 20 73 65 73 73 69 6f 6e 20 70 72 65 76 69 65 77 0a 77 69 6e 64 6f 77 20 6f 72 20 77 68	the.session.preview.window.or.wh
1e4a0	61 74 65 76 65 72 20 72 65 74 75 72 6e 65 64 20 62 79 20 60 6e 65 78 74 2d 77 69 6e 64 6f 77 27	atever.returned.by.`next-window'
1e4c0	2e 20 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 73 0a 63 61 6c 6c 65 64 20 69 6e 20 74 68	...This.function.is.called.in.th
1e4e0	65 20 6f 70 65 6e 65 64 20 66 69 6c 65 20 62 75 66 66 65 72 20 77 69 74 68 20 74 68 65 20 6f 72	e.opened.file.buffer.with.the.or
1e500	69 67 69 6e 61 6c 20 62 75 66 66 65 72 20 6f 66 20 74 68 65 0a 77 69 6e 64 6f 77 20 61 73 20 69	iginal.buffer.of.the.window.as.i
1e520	74 73 20 73 6f 6c 65 20 61 72 67 75 6d 65 6e 74 2e 22 0a 20 20 3a 74 79 70 65 20 27 66 75 6e 63	ts.sole.argument."...:type.'func
1e540	74 69 6f 6e 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 29 0a 0a 28 64 65 66 66 61 63 65 20	tion.:group.'dirvish)..(defface.
1e560	64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 73 74 61 74 65 0a 20 20 27 28 28 74 20 28 3a 69	dirvish-subtree-state...'((t.(:i
1e580	6e 68 65 72 69 74 20 64 69 72 65 64 2d 69 67 6e 6f 72 65 64 20 3a 75 6e 64 65 72 6c 69 6e 65 20	nherit.dired-ignored.:underline.
1e5a0	6e 69 6c 20 3a 62 61 63 6b 67 72 6f 75 6e 64 20 75 6e 73 70 65 63 69 66 69 65 64 29 29 29 0a 20	nil.:background.unspecified)))..
1e5c0	20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 60 65 78 70 61 6e 64 65 64 2d 73 74 61 74 65 27	."Face.used.for.`expanded-state'
1e5e0	20 61 74 74 72 69 62 75 74 65 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 29 0a	.attribute."...:group.'dirvish).
1e600	0a 28 64 65 66 66 61 63 65 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 67 75 69 64 65 0a	.(defface.dirvish-subtree-guide.
1e620	20 20 27 28 28 74 20 28 3a 69 6e 68 65 72 69 74 20 64 69 72 65 64 2d 69 67 6e 6f 72 65 64 20 3a	..'((t.(:inherit.dired-ignored.:
1e640	75 6e 64 65 72 6c 69 6e 65 20 6e 69 6c 20 3a 62 61 63 6b 67 72 6f 75 6e 64 20 75 6e 73 70 65 63	underline.nil.:background.unspec
1e660	69 66 69 65 64 29 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 60 65 78 70 61 6e	ified)))..."Face.used.for.`expan
1e680	64 65 64 2d 73 74 61 74 65 27 20 61 74 74 72 69 62 75 74 65 2e 22 0a 20 20 3a 67 72 6f 75 70 20	ded-state'.attribute."...:group.
1e6a0	27 64 69 72 76 69 73 68 29 0a 0a 28 64 65 66 76 61 72 2d 6c 6f 63 61 6c 20 64 69 72 76 69 73 68	'dirvish)..(defvar-local.dirvish
1e6c0	2d 73 75 62 74 72 65 65 2d 2d 6f 76 65 72 6c 61 79 73 20 6e 69 6c 20 22 53 75 62 74 72 65 65 20	-subtree--overlays.nil."Subtree.
1e6e0	6f 76 65 72 6c 61 79 73 20 69 6e 20 74 68 69 73 20 62 75 66 66 65 72 2e 22 29 0a 0a 28 63 6c 2d	overlays.in.this.buffer.")..(cl-
1e700	6c 6f 6f 70 0a 20 66 6f 72 20 28 73 79 6d 20 61 64 20 68 6f 77 29 20 69 6e 20 27 28 28 64 69 72	loop..for.(sym.ad.how).in.'((dir
1e720	65 64 2d 63 75 72 72 65 6e 74 2d 64 69 72 65 63 74 6f 72 79 20 64 69 72 76 69 73 68 2d 63 75 72	ed-current-directory.dirvish-cur
1e740	72 2d 64 69 72 2d 61 20 3a 61 72 6f 75 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	r-dir-a.:around)................
1e760	20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 73 75 62 64 69 72 2d 69 6e 64 65 78 20 64 69 72 76	........(dired-subdir-index.dirv
1e780	69 73 68 2d 73 75 62 64 69 72 2d 69 6e 64 65 78 2d 61 20 3a 61 72 6f 75 6e 64 29 0a 20 20 20 20	ish-subdir-index-a.:around).....
1e7a0	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 67 65 74 2d 73 75	...................(dired-get-su
1e7c0	62 64 69 72 20 64 69 72 76 69 73 68 2d 67 65 74 2d 73 75 62 64 69 72 2d 61 20 3a 61 72 6f 75 6e	bdir.dirvish-get-subdir-a.:aroun
1e7e0	64 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 64 69 72 65 64	d)........................(dired
1e800	2d 72 65 6d 6f 76 65 2d 65 6e 74 72 79 20 64 69 72 76 69 73 68 2d 72 65 6d 6f 76 65 2d 65 6e 74	-remove-entry.dirvish-remove-ent
1e820	72 79 2d 61 20 3a 61 72 6f 75 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ry-a.:around)...................
1e840	20 20 20 20 20 28 64 69 72 65 64 2d 63 72 65 61 74 65 2d 65 6d 70 74 79 2d 66 69 6c 65 20 64 69	.....(dired-create-empty-file.di
1e860	72 76 69 73 68 2d 6e 65 77 2d 65 6d 70 74 79 2d 66 69 6c 65 2d 61 20 3a 61 72 6f 75 6e 64 29 0a	rvish-new-empty-file-a.:around).
1e880	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 63 72	.......................(dired-cr
1e8a0	65 61 74 65 2d 64 69 72 65 63 74 6f 72 79 20 64 69 72 76 69 73 68 2d 6e 65 77 2d 64 69 72 65 63	eate-directory.dirvish-new-direc
1e8c0	74 6f 72 79 2d 61 20 3a 61 66 74 65 72 29 29 0a 20 64 6f 20 28 61 64 76 69 63 65 2d 61 64 64 20	tory-a.:after))..do.(advice-add.
1e8e0	73 79 6d 20 68 6f 77 20 61 64 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 63 75 72	sym.how.ad))..(defun.dirvish-cur
1e900	72 2d 64 69 72 2d 61 20 28 66 6e 20 26 6f 70 74 69 6f 6e 61 6c 20 6c 6f 63 61 6c 70 29 0a 20 20	r-dir-a.(fn.&optional.localp)...
1e920	22 41 64 76 69 63 65 20 66 6f 72 20 46 4e 20 60 64 69 72 65 64 2d 63 75 72 72 65 6e 74 2d 64 69	"Advice.for.FN.`dired-current-di
1e940	72 65 63 74 6f 72 79 27 2e 0a 4c 4f 43 41 4c 50 20 69 73 20 74 68 65 20 61 72 67 20 66 6f 72 20	rectory'..LOCALP.is.the.arg.for.
1e960	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 2c 20 77 68 69 63 68	`dired-current-directory',.which
1e980	20 73 65 65 2e 22 0a 20 20 28 69 66 2d 6c 65 74 2a 20 28 28 70 61 72 65 6e 74 20 28 64 69 72 76	.see."...(if-let*.((parent.(dirv
1e9a0	69 73 68 2d 73 75 62 74 72 65 65 2d 2d 70 61 72 65 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20	ish-subtree--parent))...........
1e9c0	20 20 28 64 69 72 20 28 63 6f 6e 63 61 74 20 28 6f 76 65 72 6c 61 79 2d 67 65 74 20 70 61 72 65	..(dir.(concat.(overlay-get.pare
1e9e0	6e 74 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6e 61 6d 65 29 20 22 2f 22 29 29 29 0a 20	nt.'dired-subtree-name)."/")))..
1ea00	20 20 20 20 20 28 69 66 20 6c 6f 63 61 6c 70 20 28 64 69 72 65 64 2d 6d 61 6b 65 2d 72 65 6c 61	.....(if.localp.(dired-make-rela
1ea20	74 69 76 65 20 64 69 72 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 20 64 69 72 29	tive.dir.default-directory).dir)
1ea40	0a 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 66 6e 20 6c 6f 63 61 6c 70 29 29 29 0a 0a 28 64 65 66	.....(funcall.fn.localp)))..(def
1ea60	75 6e 20 64 69 72 76 69 73 68 2d 67 65 74 2d 73 75 62 64 69 72 2d 61 20 28 26 72 65 73 74 20 66	un.dirvish-get-subdir-a.(&rest.f
1ea80	6e 2d 61 72 67 73 29 0a 20 20 22 41 64 76 69 63 65 20 66 6f 72 20 46 4e 2d 41 52 47 53 20 60 64	n-args)..."Advice.for.FN-ARGS.`d
1eaa0	69 72 65 64 2d 67 65 74 2d 73 75 62 64 69 72 27 2e 22 0a 20 20 28 75 6e 6c 65 73 73 20 28 64 69	ired-get-subdir'."...(unless.(di
1eac0	72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2d 70 61 72 65 6e 74 29 20 28 61 70 70 6c 79 20 66 6e	rvish-subtree--parent).(apply.fn
1eae0	2d 61 72 67 73 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 73 75 62 64 69 72 2d	-args)))..(defun.dirvish-subdir-
1eb00	69 6e 64 65 78 2d 61 20 28 66 6e 20 64 69 72 29 0a 20 20 22 41 64 76 69 63 65 20 66 6f 72 20 46	index-a.(fn.dir)..."Advice.for.F
1eb20	4e 20 60 64 69 72 65 64 2d 73 75 62 64 69 72 2d 69 6e 64 65 78 27 2e 0a 45 6e 73 75 72 65 20 63	N.`dired-subdir-index'..Ensure.c
1eb40	6f 72 72 65 63 74 20 44 49 52 20 77 68 65 6e 20 69 6e 73 69 64 65 20 6f 66 20 61 20 73 75 62 74	orrect.DIR.when.inside.of.a.subt
1eb60	72 65 65 2e 22 0a 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 28 6c 65 74	ree."...(save-excursion.....(let
1eb80	20 28 28 63 6f 75 6e 74 20 30 29 20 6f 76 29 0a 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 61 6e	.((count.0).ov).......(while.(an
1eba0	64 20 28 73 65 74 71 20 6f 76 20 28 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2d 70 61 72	d.(setq.ov.(dirvish-subtree--par
1ebc0	65 6e 74 29 29 20 28 63 6c 2d 69 6e 63 66 20 63 6f 75 6e 74 29 29 0a 20 20 20 20 20 20 20 20 28	ent)).(cl-incf.count)).........(
1ebe0	67 6f 74 6f 2d 63 68 61 72 20 28 6f 76 65 72 6c 61 79 2d 73 74 61 72 74 20 6f 76 29 29 0a 20 20	goto-char.(overlay-start.ov))...
1ec00	20 20 20 20 20 20 28 64 69 72 65 64 2d 70 72 65 76 69 6f 75 73 2d 6c 69 6e 65 20 31 29 29 0a 20	......(dired-previous-line.1))..
1ec20	20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 65 71 20 63 6f 75 6e 74 20 30 29 20 28 73 65 74 71 20	.....(unless.(eq.count.0).(setq.
1ec40	64 69 72 20 28 64 69 72 65 64 2d 63 75 72 72 65 6e 74 2d 64 69 72 65 63 74 6f 72 79 29 29 29 29	dir.(dired-current-directory))))
1ec60	0a 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 66 6e 20 64 69 72 29 29 29 0a 0a 28 64 65 66 75 6e 20	.....(funcall.fn.dir)))..(defun.
1ec80	64 69 72 76 69 73 68 2d 72 65 6d 6f 76 65 2d 65 6e 74 72 79 2d 61 20 28 66 6e 20 66 69 6c 65 29	dirvish-remove-entry-a.(fn.file)
1eca0	0a 20 20 22 41 64 76 69 63 65 20 66 6f 72 20 46 4e 20 60 64 69 72 65 64 2d 72 65 6d 6f 76 65 2d	..."Advice.for.FN.`dired-remove-
1ecc0	65 6e 74 72 79 27 20 46 49 4c 45 2e 22 0a 20 20 28 69 66 20 64 69 72 76 69 73 68 2d 73 75 62 74	entry'.FILE."...(if.dirvish-subt
1ece0	72 65 65 2d 2d 6f 76 65 72 6c 61 79 73 0a 20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73	ree--overlays.......(save-excurs
1ed00	69 6f 6e 0a 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 64 69 72 76 69 73 68 2d 73 75 62 74 72 65	ion.........(and.(dirvish-subtre
1ed20	65 2d 65 78 70 61 6e 64 2d 74 6f 20 66 69 6c 65 29 0a 09 20 20 20 20 20 28 6c 65 74 20 28 62 75	e-expand-to.file).......(let.(bu
1ed40	66 66 65 72 2d 72 65 61 64 2d 6f 6e 6c 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	ffer-read-only)................(
1ed60	64 65 6c 65 74 65 2d 72 65 67 69 6f 6e 20 28 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f	delete-region.(line-beginning-po
1ed80	73 69 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	sition).........................
1eda0	20 20 20 20 20 20 28 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 20 32	......(line-beginning-position.2
1edc0	29 29 29 29 29 0a 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 66 6e 20 66 69 6c 65 29 29 29 0a 0a 28	))))).....(funcall.fn.file)))..(
1ede0	64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 6e 65 77 2d 65 6d 70 74 79 2d 66 69 6c 65 2d 61 20 28	defun.dirvish-new-empty-file-a.(
1ee00	66 6e 20 66 69 6c 65 29 0a 20 20 22 43 72 65 61 74 65 20 61 6e 20 65 6d 70 74 79 20 66 69 6c 65	fn.file)..."Create.an.empty.file
1ee20	20 63 61 6c 6c 65 64 20 46 49 4c 45 2e 0a 53 61 6d 65 20 61 73 20 46 4e 20 60 64 69 72 65 64 2d	.called.FILE..Same.as.FN.`dired-
1ee40	63 72 65 61 74 65 2d 65 6d 70 74 79 2d 66 69 6c 65 27 2c 20 62 75 74 20 75 73 65 0a 60 64 69 72	create-empty-file',.but.use.`dir
1ee60	65 64 2d 63 75 72 72 65 6e 74 2d 64 69 72 65 63 74 6f 72 79 27 20 61 73 20 74 68 65 20 70 72 6f	ed-current-directory'.as.the.pro
1ee80	6d 70 74 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 28 6c 69 73 74 20 28 72 65 61 64	mpt."...(interactive.(list.(read
1eea0	2d 66 69 6c 65 2d 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	-file-name......................
1eec0	20 22 43 72 65 61 74 65 20 65 6d 70 74 79 20 66 69 6c 65 3a 20 22 20 28 64 69 72 65 64 2d 63 75	."Create.empty.file:.".(dired-cu
1eee0	72 72 65 6e 74 2d 64 69 72 65 63 74 6f 72 79 29 29 29 29 0a 20 20 28 66 75 6e 63 61 6c 6c 20 66	rrent-directory))))...(funcall.f
1ef00	6e 20 66 69 6c 65 29 0a 20 20 28 77 68 65 6e 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d	n.file)...(when.dirvish-subtree-
1ef20	2d 6f 76 65 72 6c 61 79 73 20 28 72 65 76 65 72 74 2d 62 75 66 66 65 72 29 29 29 0a 0a 28 64 65	-overlays.(revert-buffer)))..(de
1ef40	66 75 6e 20 64 69 72 76 69 73 68 2d 6e 65 77 2d 64 69 72 65 63 74 6f 72 79 2d 61 20 28 26 72 65	fun.dirvish-new-directory-a.(&re
1ef60	73 74 20 5f 29 0a 20 20 22 41 64 76 69 63 65 20 66 6f 72 20 60 64 69 72 65 64 2d 63 72 65 61 74	st._)..."Advice.for.`dired-creat
1ef80	65 2d 64 69 72 65 63 74 6f 72 79 27 2e 0a 45 6e 73 75 72 65 20 74 68 65 20 65 6e 74 72 79 20 69	e-directory'..Ensure.the.entry.i
1efa0	73 20 69 6e 73 65 72 74 65 64 20 74 6f 20 74 68 65 20 62 75 66 66 65 72 20 61 66 74 65 72 20 64	s.inserted.to.the.buffer.after.d
1efc0	69 72 65 63 74 6f 72 79 0a 63 72 65 61 74 69 6f 6e 20 65 76 65 6e 20 74 68 65 20 65 6e 74 72 79	irectory.creation.even.the.entry
1efe0	20 69 73 20 69 6e 20 6e 65 73 74 65 64 20 73 75 62 74 72 65 65 20 6e 6f 64 65 73 2e 22 0a 20 20	.is.in.nested.subtree.nodes."...
1f000	28 77 68 65 6e 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2d 6f 76 65 72 6c 61 79 73 20	(when.dirvish-subtree--overlays.
1f020	28 72 65 76 65 72 74 2d 62 75 66 66 65 72 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73	(revert-buffer)))..(defun.dirvis
1f040	68 2d 73 75 62 74 72 65 65 2d 2d 64 65 70 74 68 20 28 29 0a 20 20 22 47 65 74 20 73 75 62 74 72	h-subtree--depth.()..."Get.subtr
1f060	65 65 20 64 65 70 74 68 20 61 74 20 70 6f 69 6e 74 2e 22 0a 20 20 28 6c 65 74 20 28 28 64 70 73	ee.depth.at.point."...(let.((dps
1f080	20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 6f 76 20 69 6e 20 28 6f 76 65 72 6c 61 79 73 2d 61 74	.(cl-loop.for.ov.in.(overlays-at
1f0a0	20 28 70 6f 69 6e 74 29 29 20 63 6f 6c 6c 65 63 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.(point)).collect...............
1f0c0	20 20 20 20 20 20 20 20 28 6f 72 20 28 6f 76 65 72 6c 61 79 2d 67 65 74 20 6f 76 20 27 64 69 72	........(or.(overlay-get.ov.'dir
1f0e0	65 64 2d 73 75 62 74 72 65 65 2d 64 65 70 74 68 29 20 30 29 29 29 29 0a 20 20 20 20 28 6f 72 20	ed-subtree-depth).0)))).....(or.
1f100	28 61 6e 64 20 64 70 73 20 28 61 70 70 6c 79 20 23 27 6d 61 78 20 64 70 73 29 29 20 30 29 29 29	(and.dps.(apply.#'max.dps)).0)))
1f120	0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2d 65 78 70 61 6e 64	..(defun.dirvish-subtree--expand
1f140	65 64 2d 70 20 28 29 0a 20 20 22 37 30 78 20 46 61 73 74 65 72 20 76 65 72 73 69 6f 6e 20 6f 66	ed-p.()..."70x.Faster.version.of
1f160	20 60 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 2d 69 73 2d 65 78 70 61 6e 64 65 64 2d 70 27 2e	.`dired-subtree--is-expanded-p'.
1f180	22 0a 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 20 28 3c 20 28 64 69 72 76 69 73 68 2d	"...(save-excursion.(<.(dirvish-
1f1a0	73 75 62 74 72 65 65 2d 2d 64 65 70 74 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	subtree--depth).................
1f1c0	20 20 20 20 20 28 70 72 6f 67 6e 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 31 29 20 28 64 69	.....(progn.(forward-line.1).(di
1f1e0	72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2d 64 65 70 74 68 29 29 29 29 29 0a 0a 28 64 65 66 75	rvish-subtree--depth)))))..(defu
1f200	6e 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2d 70 61 72 65 6e 74 20 28 26 6f 70 74 69	n.dirvish-subtree--parent.(&opti
1f220	6f 6e 61 6c 20 70 29 0a 20 20 22 47 65 74 20 74 68 65 20 70 61 72 65 6e 74 20 73 75 62 74 72 65	onal.p)..."Get.the.parent.subtre
1f240	65 20 6f 76 65 72 6c 61 79 20 61 74 20 70 6f 69 6e 74 20 50 2e 22 0a 20 20 28 73 65 74 71 20 70	e.overlay.at.point.P."...(setq.p
1f260	20 28 6f 72 20 70 20 28 70 6f 69 6e 74 29 29 29 0a 20 20 28 63 6c 2d 6c 6f 6f 70 0a 20 20 20 77	.(or.p.(point)))...(cl-loop....w
1f280	69 74 68 20 28 70 6f 76 20 2e 20 6d 61 78 29 20 3d 20 28 63 6f 6e 73 20 6e 69 6c 20 30 29 0a 20	ith.(pov...max).=.(cons.nil.0)..
1f2a0	20 20 66 6f 72 20 6f 76 20 69 6e 20 28 6f 76 65 72 6c 61 79 73 2d 61 74 20 70 29 0a 20 20 20 66	..for.ov.in.(overlays-at.p)....f
1f2c0	6f 72 20 64 65 70 74 68 20 3d 20 28 6f 72 20 28 6f 76 65 72 6c 61 79 2d 67 65 74 20 6f 76 20 27	or.depth.=.(or.(overlay-get.ov.'
1f2e0	64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 64 65 70 74 68 29 20 30 29 0a 20 20 20 64 6f 20 28 77	dired-subtree-depth).0)....do.(w
1f300	68 65 6e 20 28 3e 20 64 65 70 74 68 20 6d 61 78 29 20 28 73 65 74 71 20 70 6f 76 20 6f 76 29 20	hen.(>.depth.max).(setq.pov.ov).
1f320	28 73 65 74 71 20 6d 61 78 20 64 65 70 74 68 29 29 0a 20 20 20 66 69 6e 61 6c 6c 79 20 72 65 74	(setq.max.depth))....finally.ret
1f340	75 72 6e 20 70 6f 76 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65	urn.pov))..(defun.dirvish-subtre
1f360	65 2d 2d 72 65 61 64 69 6e 20 28 64 69 72 29 0a 20 20 22 52 65 61 64 69 6e 20 44 49 52 20 61 73	e--readin.(dir)..."Readin.DIR.as
1f380	20 61 20 73 75 62 74 72 65 65 20 6e 6f 64 65 2e 22 0a 20 20 28 6c 65 74 20 28 28 66 6c 61 67 73	.a.subtree.node."...(let.((flags
1f3a0	20 28 6f 72 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 6c 69 73 74 69 6e 67 2d 73 77 69	.(or.dirvish-subtree-listing-swi
1f3c0	74 63 68 65 73 20 64 69 72 65 64 2d 61 63 74 75 61 6c 2d 73 77 69 74 63 68 65 73 29 29 20 73 74	tches.dired-actual-switches)).st
1f3e0	72 29 0a 20 20 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 28	r).....(with-temp-buffer.......(
1f400	63 6c 2d 6c 65 74 66 20 28 28 28 73 79 6d 62 6f 6c 2d 66 75 6e 63 74 69 6f 6e 20 27 64 69 72 65	cl-letf.(((symbol-function.'dire
1f420	64 2d 69 6e 73 65 72 74 2d 73 65 74 2d 70 72 6f 70 65 72 74 69 65 73 29 20 23 27 69 67 6e 6f 72	d-insert-set-properties).#'ignor
1f440	65 29 29 0a 20 20 20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20	e)).........(save-excursion.....
1f460	20 20 20 20 20 20 28 64 69 72 65 64 2d 69 6e 73 65 72 74 2d 64 69 72 65 63 74 6f 72 79 20 28 66	......(dired-insert-directory.(f
1f480	69 6c 65 2d 6e 61 6d 65 2d 61 73 2d 64 69 72 65 63 74 6f 72 79 20 64 69 72 29 20 66 6c 61 67 73	ile-name-as-directory.dir).flags
1f4a0	29 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 6c 6f 6f 6b 69 6e 67 2d 61 74 2d 70 20 22	)).........(when.(looking-at-p."
1f4c0	20 20 74 6f 74 61 6c 20 75 73 65 64 20 69 6e 20 64 69 72 65 63 74 6f 72 79 22 29 0a 20 20 20 20	..total.used.in.directory").....
1f4e0	20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 72 65 67 69 6f 6e 20 28 70 6f 69 6e 74 29 20 28 6c 69	......(delete-region.(point).(li
1f500	6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 20 32 29 29 29 0a 20 20 20 20 20	ne-beginning-position.2)))......
1f520	20 20 20 28 73 65 74 71 20 73 74 72 20 28 62 75 66 66 65 72 2d 73 74 72 69 6e 67 29 29 0a 20 20	...(setq.str.(buffer-string))...
1f540	20 20 20 20 20 20 28 69 66 20 28 6f 72 20 28 3d 20 28 6c 65 6e 67 74 68 20 73 74 72 29 20 30 29	......(if.(or.(=.(length.str).0)
1f560	20 28 73 74 72 69 6e 67 2d 70 72 65 66 69 78 2d 70 20 22 2f 2f 44 49 52 45 44 2d 4f 50 54 49 4f	.(string-prefix-p."//DIRED-OPTIO
1f580	4e 53 2f 2f 22 20 73 74 72 29 29 20 22 22 0a 20 20 20 20 20 20 20 20 20 20 28 73 75 62 73 74 72	NS//".str)).""...........(substr
1f5a0	69 6e 67 20 28 62 75 66 66 65 72 2d 73 74 72 69 6e 67 29 20 30 20 2d 31 29 29 29 29 29 29 0a 0a	ing.(buffer-string).0.-1))))))..
1f5c0	28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2d 69 6e 73 65 72 74 20 28	(defun.dirvish-subtree--insert.(
1f5e0	29 0a 20 20 22 49 6e 73 65 72 74 20 73 75 62 74 72 65 65 20 75 6e 64 65 72 20 74 68 69 73 20 64	)..."Insert.subtree.under.this.d
1f600	69 72 65 63 74 6f 72 79 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 64 69 72 20 28 64 69 72 65 64 2d	irectory."...(let*.((dir.(dired-
1f620	67 65 74 2d 66 69 6c 65 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 69 6e 67	get-filename))..........(listing
1f640	20 28 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2d 72 65 61 64 69 6e 20 64 69 72 29 29 0a	.(dirvish-subtree--readin.dir)).
1f660	20 20 20 20 20 20 20 20 20 62 75 66 66 65 72 2d 72 65 61 64 2d 6f 6e 6c 79 20 62 65 67 20 65 6e	.........buffer-read-only.beg.en
1f680	64 29 0a 20 20 20 20 28 64 69 72 76 69 73 68 2d 64 61 74 61 2d 66 6f 72 2d 64 69 72 20 64 69 72	d).....(dirvish-data-for-dir.dir
1f6a0	20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 20 6e 69 6c 29 0a 20 20 20 20 28 77 69 74 68	.(current-buffer).nil).....(with
1f6c0	2d 73 69 6c 65 6e 74 2d 6d 6f 64 69 66 69 63 61 74 69 6f 6e 73 0a 20 20 20 20 20 20 28 73 61 76	-silent-modifications.......(sav
1f6e0	65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 62 65 67 20 28 70	e-excursion.........(setq.beg.(p
1f700	72 6f 67 6e 20 28 6d 6f 76 65 2d 65 6e 64 2d 6f 66 2d 6c 69 6e 65 20 31 29 20 28 69 6e 73 65 72	rogn.(move-end-of-line.1).(inser
1f720	74 20 22 5c 6e 22 29 20 28 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20	t."\n").(point))).........(setq.
1f740	65 6e 64 20 28 70 72 6f 67 6e 20 28 69 6e 73 65 72 74 20 6c 69 73 74 69 6e 67 29 20 28 31 2b 20	end.(progn.(insert.listing).(1+.
1f760	28 70 6f 69 6e 74 29 29 29 29 29 29 0a 20 20 20 20 28 6c 65 74 2a 20 28 28 6f 76 20 28 6d 61 6b	(point)))))).....(let*.((ov.(mak
1f780	65 2d 6f 76 65 72 6c 61 79 20 62 65 67 20 65 6e 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28	e-overlay.beg.end))............(
1f7a0	70 61 72 65 6e 74 20 28 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2d 70 61 72 65 6e 74 20	parent.(dirvish-subtree--parent.
1f7c0	28 31 2d 20 62 65 67 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 70 2d 64 65 70 74 68 20 28	(1-.beg)))............(p-depth.(
1f7e0	61 6e 64 20 70 61 72 65 6e 74 20 28 31 2b 20 28 6f 76 65 72 6c 61 79 2d 67 65 74 20 70 61 72 65	and.parent.(1+.(overlay-get.pare
1f800	6e 74 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 64 65 70 74 68 29 29 29 29 0a 20 20 20 20	nt.'dired-subtree-depth)))).....
1f820	20 20 20 20 20 20 20 28 64 65 70 74 68 20 28 6f 72 20 70 2d 64 65 70 74 68 20 31 29 29 0a 20 20	.......(depth.(or.p-depth.1))...
1f840	20 20 20 20 20 20 20 20 20 28 70 72 65 66 69 78 20 28 61 70 70 6c 79 20 23 27 63 6f 6e 63 61 74	.........(prefix.(apply.#'concat
1f860	20 28 6d 61 6b 65 2d 6c 69 73 74 20 64 65 70 74 68 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65	.(make-list.depth.dirvish-subtre
1f880	65 2d 70 72 65 66 69 78 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 70 72 65 66 69 78 2d 6c	e-prefix)))............(prefix-l
1f8a0	65 6e 20 28 6c 65 6e 67 74 68 20 70 72 65 66 69 78 29 29 29 0a 20 20 20 20 20 20 28 73 61 76 65	en.(length.prefix))).......(save
1f8c0	2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 62 65	-excursion.........(goto-char.be
1f8e0	67 29 0a 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 3c 20 28 70 6f 69 6e 74 29 20 65 6e 64	g).........(while.(<.(point).end
1f900	29 0a 20 20 20 20 20 20 20 20 20 20 28 61 64 64 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 69 65 73	)...........(add-text-properties
1f920	20 28 70 6f 69 6e 74 29 20 28 31 2b 20 28 70 6f 69 6e 74 29 29 20 60 28 6c 69 6e 65 2d 70 72 65	.(point).(1+.(point)).`(line-pre
1f940	66 69 78 20 2c 70 72 65 66 69 78 2d 6c 65 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 6f 72	fix.,prefix-len))...........(for
1f960	77 61 72 64 2d 6c 69 6e 65 20 31 29 29 29 0a 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75	ward-line.1))).......(overlay-pu
1f980	74 20 6f 76 20 27 6c 69 6e 65 2d 70 72 65 66 69 78 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	t.ov.'line-prefix...............
1f9a0	20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 70 72 65 66 69 78 20 27 66 61 63 65 20 27 64	.....(propertize.prefix.'face.'d
1f9c0	69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 67 75 69 64 65 29 29 0a 20 20 20 20 20 20 28 6f 76	irvish-subtree-guide)).......(ov
1f9e0	65 72 6c 61 79 2d 70 75 74 20 6f 76 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 6e 61 6d 65	erlay-put.ov.'dired-subtree-name
1fa00	20 64 69 72 29 0a 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 76 20 27 64 69 72	.dir).......(overlay-put.ov.'dir
1fa20	65 64 2d 73 75 62 74 72 65 65 2d 64 65 70 74 68 20 64 65 70 74 68 29 0a 20 20 20 20 20 20 28 6f	ed-subtree-depth.depth).......(o
1fa40	76 65 72 6c 61 79 2d 70 75 74 20 6f 76 20 27 65 76 61 70 6f 72 61 74 65 20 74 29 0a 20 20 20 20	verlay-put.ov.'evaporate.t).....
1fa60	20 20 28 70 75 73 68 20 6f 76 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2d 6f 76 65 72	..(push.ov.dirvish-subtree--over
1fa80	6c 61 79 73 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65	lays))))..(defun.dirvish-subtree
1faa0	2d 2d 72 65 76 65 72 74 20 28 26 6f 70 74 69 6f 6e 61 6c 20 63 6c 65 61 72 29 0a 20 20 22 52 65	--revert.(&optional.clear)..."Re
1fac0	69 6e 73 65 72 74 20 73 61 76 65 64 20 73 75 62 74 72 65 65 20 6e 6f 64 65 73 20 69 6e 74 6f 20	insert.saved.subtree.nodes.into.
1fae0	74 68 65 20 62 75 66 66 65 72 2e 0a 57 68 65 6e 20 43 4c 45 41 52 2c 20 72 65 6d 6f 76 65 20 61	the.buffer..When.CLEAR,.remove.a
1fb00	6c 6c 20 73 75 62 74 72 65 65 73 20 69 6e 20 74 68 65 20 62 75 66 66 65 72 2e 22 0a 20 20 28 63	ll.subtrees.in.the.buffer."...(c
1fb20	6c 2d 6c 6f 6f 70 0a 20 20 20 77 69 74 68 20 66 69 6c 65 6e 61 6d 65 73 20 3d 20 28 63 6c 2d 6c	l-loop....with.filenames.=.(cl-l
1fb40	6f 6f 70 20 66 6f 72 20 6f 20 69 6e 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2d 6f 76	oop.for.o.in.dirvish-subtree--ov
1fb60	65 72 6c 61 79 73 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	erlays..........................
1fb80	20 20 20 20 63 6f 6c 6c 65 63 74 20 28 6f 76 65 72 6c 61 79 2d 67 65 74 20 6f 20 27 64 69 72 65	....collect.(overlay-get.o.'dire
1fba0	64 2d 73 75 62 74 72 65 65 2d 6e 61 6d 65 29 29 0a 20 20 20 77 69 74 68 20 69 6e 64 65 78 20 3d	d-subtree-name))....with.index.=
1fbc0	20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 6f 6c 64 2d 69 6e 64 65 78 29 0a 20 20 20 77 69	.(dirvish-prop.:old-index)....wi
1fbe0	74 68 20 63 6c 65 61 72 20 3d 20 28 6f 72 20 63 6c 65 61 72 20 28 62 6f 75 6e 64 2d 61 6e 64 2d	th.clear.=.(or.clear.(bound-and-
1fc00	74 72 75 65 2d 70 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 2d 67 72 6f 75 70 2d 6f 76 65	true-p.dirvish-emerge--group-ove
1fc20	72 6c 61 79 73 29 29 0a 20 20 20 69 6e 69 74 69 61 6c 6c 79 20 28 73 65 74 71 20 64 69 72 76 69	rlays))....initially.(setq.dirvi
1fc40	73 68 2d 73 75 62 74 72 65 65 2d 2d 6f 76 65 72 6c 61 79 73 20 6e 69 6c 29 0a 20 20 20 66 6f 72	sh-subtree--overlays.nil)....for
1fc60	20 66 69 6c 65 6e 61 6d 65 20 69 6e 20 66 69 6c 65 6e 61 6d 65 73 0a 20 20 20 64 6f 20 28 69 66	.filename.in.filenames....do.(if
1fc80	20 63 6c 65 61 72 20 28 77 68 65 6e 20 28 64 69 72 65 64 2d 67 6f 74 6f 2d 66 69 6c 65 20 66 69	.clear.(when.(dired-goto-file.fi
1fca0	6c 65 6e 61 6d 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	lename)...................(dired
1fcc0	2d 6e 65 78 74 2d 6c 69 6e 65 20 31 29 20 28 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 72	-next-line.1).(dirvish-subtree-r
1fce0	65 6d 6f 76 65 29 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 64 69 72 76	emove)).........(when.(and.(dirv
1fd00	69 73 68 2d 73 75 62 74 72 65 65 2d 65 78 70 61 6e 64 2d 74 6f 20 66 69 6c 65 6e 61 6d 65 29 0a	ish-subtree-expand-to.filename).
1fd20	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 64 69 72 76 69 73 68	...................(not.(dirvish
1fd40	2d 73 75 62 74 72 65 65 2d 2d 65 78 70 61 6e 64 65 64 2d 70 29 29 29 0a 20 20 20 20 20 20 20 20	-subtree--expanded-p))).........
1fd60	20 20 28 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2d 69 6e 73 65 72 74 29 29 29 0a 20 20	..(dirvish-subtree--insert)))...
1fd80	20 66 69 6e 61 6c 6c 79 20 28 61 6e 64 20 69 6e 64 65 78 20 28 69 66 20 63 6c 65 61 72 20 28 64	.finally.(and.index.(if.clear.(d
1fda0	69 72 65 64 2d 67 6f 74 6f 2d 66 69 6c 65 20 69 6e 64 65 78 29 0a 20 20 20 20 20 20 20 20 20 20	ired-goto-file.index)...........
1fdc0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 65	..............(dirvish-subtree-e
1fde0	78 70 61 6e 64 2d 74 6f 20 69 6e 64 65 78 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76	xpand-to.index)))))..(defun.dirv
1fe00	69 73 68 2d 73 75 62 74 72 65 65 2d 64 65 66 61 75 6c 74 2d 66 69 6c 65 2d 76 69 65 77 65 72 20	ish-subtree-default-file-viewer.
1fe20	28 6f 72 69 67 2d 62 75 66 66 65 72 29 0a 20 20 22 44 65 66 61 75 6c 74 20 60 64 69 72 76 69 73	(orig-buffer)..."Default.`dirvis
1fe40	68 2d 73 75 62 74 72 65 65 2d 66 69 6c 65 2d 76 69 65 77 65 72 27 2e 0a 54 72 79 20 65 78 65 63	h-subtree-file-viewer'..Try.exec
1fe60	75 74 69 6e 67 20 60 63 6f 6e 73 75 6c 74 2d 6c 73 70 2d 66 69 6c 65 2d 73 79 6d 62 6f 6c 73 27	uting.`consult-lsp-file-symbols'
1fe80	2c 20 60 63 6f 6e 73 75 6c 74 2d 69 6d 65 6e 75 27 2c 0a 60 63 6f 6e 73 75 6c 74 2d 6c 69 6e 65	,.`consult-imenu',.`consult-line
1fea0	27 20 61 6e 64 20 60 69 6d 65 6e 75 27 20 73 65 71 75 65 6e 74 69 61 6c 6c 79 20 75 6e 74 69 6c	'.and.`imenu'.sequentially.until
1fec0	20 6f 6e 65 20 6f 66 20 74 68 65 6d 0a 73 75 63 63 65 65 64 2c 20 73 77 69 74 63 68 20 62 61 63	.one.of.them.succeed,.switch.bac
1fee0	6b 20 74 6f 20 4f 52 49 47 2d 42 55 46 46 45 52 20 61 66 74 65 72 77 61 72 64 73 20 72 65 67 61	k.to.ORIG-BUFFER.afterwards.rega
1ff00	72 64 6c 65 73 73 6c 79 2e 22 0a 20 20 28 75 6e 77 69 6e 64 2d 70 72 6f 74 65 63 74 0a 20 20 20	rdlessly."...(unwind-protect....
1ff20	20 20 20 28 63 6f 6e 64 69 74 69 6f 6e 2d 63 61 73 65 20 6e 69 6c 20 28 63 6f 6e 73 75 6c 74 2d	...(condition-case.nil.(consult-
1ff40	6c 73 70 2d 66 69 6c 65 2d 73 79 6d 62 6f 6c 73 20 74 29 0a 20 20 20 20 20 20 20 20 28 65 72 72	lsp-file-symbols.t).........(err
1ff60	6f 72 20 28 63 6f 6e 64 69 74 69 6f 6e 2d 63 61 73 65 20 6e 69 6c 20 28 63 6f 6e 73 75 6c 74 2d	or.(condition-case.nil.(consult-
1ff80	69 6d 65 6e 75 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 28	imenu)..................(error.(
1ffa0	63 6f 6e 64 69 74 69 6f 6e 2d 63 61 73 65 20 6e 69 6c 20 28 63 6f 6e 73 75 6c 74 2d 6c 69 6e 65	condition-case.nil.(consult-line
1ffc0	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 72 72	)...........................(err
1ffe0	6f 72 20 28 6d 65 73 73 61 67 65 20 22 46 61 69 6c 65 64 20 74 6f 20 76 69 65 77 20 66 69 6c 65	or.(message."Failed.to.view.file
20000	20 60 25 73 27 2e 20 5c 0a 53 65 65 20 60 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 66 69	.`%s'..\.See.`dirvish-subtree-fi
20020	6c 65 2d 76 69 65 77 65 72 27 20 66 6f 72 20 64 65 74 61 69 6c 73 22 0a 20 20 20 20 20 20 20 20	le-viewer'.for.details".........
20040	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	................................
20060	20 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 29 29 29 29 29 29 29 0a 20 20 20 20 28 73	..buffer-file-name))))))).....(s
20080	77 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 20 6f 72 69 67 2d 62 75 66 66 65 72 29 29 29 0a 0a	witch-to-buffer.orig-buffer)))..
200a0	28 64 69 72 76 69 73 68 2d 64 65 66 69 6e 65 2d 61 74 74 72 69 62 75 74 65 20 73 75 62 74 72 65	(dirvish-define-attribute.subtre
200c0	65 2d 73 74 61 74 65 0a 20 20 22 41 20 69 6e 64 69 63 61 74 6f 72 20 66 6f 72 20 64 69 72 65 63	e-state..."A.indicator.for.direc
200e0	74 6f 72 79 20 65 78 70 61 6e 64 69 6e 67 20 73 74 61 74 65 2e 22 0a 20 20 3a 77 68 65 6e 20 28	tory.expanding.state."...:when.(
20100	6f 72 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 61 6c 77 61 79 73 2d 73 68 6f 77 2d 73	or.dirvish-subtree-always-show-s
20120	74 61 74 65 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2d 6f 76 65 72 6c 61 79 73 29 0a	tate.dirvish-subtree--overlays).
20140	20 20 3a 77 69 64 74 68 20 31 0a 20 20 28 6c 65 74 20 28 28 73 74 61 74 65 2d 73 74 72 0a 20 20	..:width.1...(let.((state-str...
20160	20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28 69 66 20 28 65 71 20 28 63 61 72 20	.......(propertize.(if.(eq.(car.
20180	66 2d 74 79 70 65 29 20 27 64 69 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	f-type).'dir)...................
201a0	20 20 20 20 20 20 20 28 69 66 20 28 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2d 65 78 70	.......(if.(dirvish-subtree--exp
201c0	61 6e 64 65 64 2d 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	anded-p)........................
201e0	20 20 20 20 20 20 28 63 61 72 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2d 73 74 61 74	......(car.dirvish-subtree--stat
20200	65 2d 69 63 6f 6e 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	e-icons)........................
20220	20 20 20 20 28 63 64 72 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2d 73 74 61 74 65 2d	....(cdr.dirvish-subtree--state-
20240	69 63 6f 6e 73 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 22	icons))........................"
20260	20 22 29 29 29 0a 20 20 20 20 20 20 20 20 28 6f 76 20 28 6d 61 6b 65 2d 6f 76 65 72 6c 61 79 20	."))).........(ov.(make-overlay.
20280	28 31 2b 20 6c 2d 62 65 67 29 20 28 31 2b 20 6c 2d 62 65 67 29 29 29 29 0a 20 20 20 20 28 77 68	(1+.l-beg).(1+.l-beg)))).....(wh
202a0	65 6e 20 68 6c 2d 66 61 63 65 0a 20 20 20 20 20 20 28 61 64 64 2d 66 61 63 65 2d 74 65 78 74 2d	en.hl-face.......(add-face-text-
202c0	70 72 6f 70 65 72 74 79 20 30 20 31 20 68 6c 2d 66 61 63 65 20 74 20 73 74 61 74 65 2d 73 74 72	property.0.1.hl-face.t.state-str
202e0	29 29 0a 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 76 20 27 61 66 74 65 72 2d 73 74	)).....(overlay-put.ov.'after-st
20300	72 69 6e 67 20 73 74 61 74 65 2d 73 74 72 29 0a 20 20 20 20 60 28 6f 76 20 2e 20 2c 6f 76 29 29	ring.state-str).....`(ov...,ov))
20320	29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2d 6d 6f 76 65 2d	)..(defun.dirvish-subtree--move-
20340	74 6f 2d 66 69 6c 65 20 28 66 69 6c 65 20 64 65 70 74 68 29 0a 20 20 22 4d 6f 76 65 20 74 6f 20	to-file.(file.depth)..."Move.to.
20360	46 49 4c 45 20 61 74 20 73 75 62 74 72 65 65 20 44 45 50 54 48 2e 22 0a 20 20 28 6c 65 74 20 28	FILE.at.subtree.DEPTH."...(let.(
20380	73 74 6f 70 20 66 2d 62 65 67 29 0a 20 20 20 20 28 77 68 69 6c 65 20 28 61 6e 64 20 28 6e 6f 74	stop.f-beg).....(while.(and.(not
203a0	20 73 74 6f 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3d 20 28 66 6f 72 77 61	.stop).................(=.(forwa
203c0	72 64 2d 6c 69 6e 65 29 20 30 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74	rd-line).0).................(set
203e0	71 20 66 2d 62 65 67 20 28 64 69 72 65 64 2d 6d 6f 76 65 2d 74 6f 2d 66 69 6c 65 6e 61 6d 65 29	q.f-beg.(dired-move-to-filename)
20400	29 29 0a 20 20 20 20 20 20 28 61 6e 64 20 28 65 71 20 64 65 70 74 68 20 28 64 69 72 76 69 73 68	)).......(and.(eq.depth.(dirvish
20420	2d 73 75 62 74 72 65 65 2d 2d 64 65 70 74 68 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 65 71	-subtree--depth))............(eq
20440	75 61 6c 20 66 69 6c 65 20 28 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 20 66 2d 62 65 67	ual.file.(buffer-substring.f-beg
20460	20 28 64 69 72 65 64 2d 6d 6f 76 65 2d 74 6f 2d 65 6e 64 2d 6f 66 2d 66 69 6c 65 6e 61 6d 65 29	.(dired-move-to-end-of-filename)
20480	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 73 74 6f 70 20 74 29 29 29 0a 20 20	))............(setq.stop.t)))...
204a0	20 20 73 74 6f 70 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65	..stop))..(defun.dirvish-subtree
204c0	2d 65 78 70 61 6e 64 2d 74 6f 20 28 74 61 72 67 65 74 29 0a 20 20 22 47 6f 20 74 6f 20 6c 69 6e	-expand-to.(target)..."Go.to.lin
204e0	65 20 64 65 73 63 72 69 62 69 6e 67 20 54 41 52 47 45 54 20 61 6e 64 20 65 78 70 61 6e 64 20 69	e.describing.TARGET.and.expand.i
20500	74 73 20 70 61 72 65 6e 74 20 64 69 72 65 63 74 6f 72 69 65 73 2e 22 0a 20 20 28 69 6e 74 65 72	ts.parent.directories."...(inter
20520	61 63 74 69 76 65 0a 20 20 20 28 6c 69 73 74 20 28 64 69 72 65 63 74 6f 72 79 2d 66 69 6c 65 2d	active....(list.(directory-file-
20540	6e 61 6d 65 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 0a 09 20 20 20 20 20 20 20 20	name.(expand-file-name..........
20560	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 61 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22	...............(read-file-name."
20580	45 78 70 61 6e 64 20 74 6f 20 66 69 6c 65 3a 20 22 0a 09 09 09 20 20 20 20 20 20 20 20 20 20 20	Expand.to.file:."...............
205a0	20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 63 75 72 72 65 6e 74 2d 64 69 72 65 63	............(dired-current-direc
205c0	74 6f 72 79 29 29 29 29 29 29 0a 20 20 28 6c 65 74 20 28 28 66 69 6c 65 20 28 64 69 72 65 64 2d	tory))))))...(let.((file.(dired-
205e0	67 65 74 2d 66 69 6c 65 6e 61 6d 65 20 6e 69 6c 20 74 29 29 20 28 64 69 72 20 28 64 69 72 65 64	get-filename.nil.t)).(dir.(dired
20600	2d 63 75 72 72 65 6e 74 2d 64 69 72 65 63 74 6f 72 79 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 20	-current-directory))).....(cond.
20620	28 28 65 71 75 61 6c 20 66 69 6c 65 20 74 61 72 67 65 74 29 20 74 61 72 67 65 74 29 0a 20 20 20	((equal.file.target).target)....
20640	20 20 20 20 20 20 20 28 28 61 6e 64 20 66 69 6c 65 20 28 73 74 72 69 6e 67 2d 70 72 65 66 69 78	.......((and.file.(string-prefix
20660	2d 70 20 66 69 6c 65 20 74 61 72 67 65 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c	-p.file.target))............(unl
20680	65 73 73 20 28 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2d 65 78 70 61 6e 64 65 64 2d 70	ess.(dirvish-subtree--expanded-p
206a0	29 20 28 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2d 69 6e 73 65 72 74 29 29 0a 20 20 20	).(dirvish-subtree--insert))....
206c0	20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 64 65 70 74 68 20 28 31 2b 20 28 64 69 72 76 69 73	........(let.((depth.(1+.(dirvis
206e0	68 2d 73 75 62 74 72 65 65 2d 2d 64 65 70 74 68 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	h-subtree--depth))).............
20700	20 20 20 20 20 28 6e 65 78 74 20 28 63 61 72 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 0a 20 20	.....(next.(car.(split-string...
20720	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 73 75 62 73 74	..........................(subst
20740	72 69 6e 67 20 74 61 72 67 65 74 20 28 31 2b 20 28 6c 65 6e 67 74 68 20 66 69 6c 65 29 29 29 20	ring.target.(1+.(length.file))).
20760	22 2f 22 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 64 69 72 76	"/"))))..............(when.(dirv
20780	69 73 68 2d 73 75 62 74 72 65 65 2d 2d 6d 6f 76 65 2d 74 6f 2d 66 69 6c 65 20 6e 65 78 74 20 64	ish-subtree--move-to-file.next.d
207a0	65 70 74 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 73 75	epth)................(dirvish-su
207c0	62 74 72 65 65 2d 65 78 70 61 6e 64 2d 74 6f 20 74 61 72 67 65 74 29 29 29 29 0a 20 20 20 20 20	btree-expand-to.target))))......
207e0	20 20 20 20 20 28 28 73 74 72 69 6e 67 2d 70 72 65 66 69 78 2d 70 20 64 69 72 20 74 61 72 67 65	.....((string-prefix-p.dir.targe
20800	74 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 64 65 70 74 68 20 28 64 69 72 76	t)............(let.((depth.(dirv
20820	69 73 68 2d 73 75 62 74 72 65 65 2d 2d 64 65 70 74 68 29 29 0a 20 20 20 20 20 20 20 20 20 20 20	ish-subtree--depth))............
20840	20 20 20 20 20 20 28 6e 65 78 74 20 28 63 61 72 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 28	......(next.(car.(split-string.(
20860	73 75 62 73 74 72 69 6e 67 20 74 61 72 67 65 74 20 28 6c 65 6e 67 74 68 20 64 69 72 29 29 20 22	substring.target.(length.dir))."
20880	2f 22 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28	/"))))..............(goto-char.(
208a0	64 69 72 65 64 2d 73 75 62 64 69 72 2d 6d 69 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	dired-subdir-min))..............
208c0	28 67 6f 74 6f 2d 63 68 61 72 20 28 6e 65 78 74 2d 73 69 6e 67 6c 65 2d 70 72 6f 70 65 72 74 79	(goto-char.(next-single-property
208e0	2d 63 68 61 6e 67 65 20 28 70 6f 69 6e 74 29 20 27 64 69 72 65 64 2d 66 69 6c 65 6e 61 6d 65 29	-change.(point).'dired-filename)
20900	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 2d 31 29	)..............(forward-line.-1)
20920	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 54 41 52 47 45 54 20 69 73 20 65 69 74 68 65	..............;;.TARGET.is.eithe
20940	72 20 6e 6f 74 20 65 78 69 73 74 20 6f 72 20 62 65 69 6e 67 20 68 69 64 64 65 6e 20 28 23 31 33	r.not.exist.or.being.hidden.(#13
20960	35 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 64 69 72 76 69 73 68 2d 73	5)..............(when.(dirvish-s
20980	75 62 74 72 65 65 2d 2d 6d 6f 76 65 2d 74 6f 2d 66 69 6c 65 20 6e 65 78 74 20 64 65 70 74 68 29	ubtree--move-to-file.next.depth)
209a0	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65	................(dirvish-subtree
209c0	2d 65 78 70 61 6e 64 2d 74 6f 20 74 61 72 67 65 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20	-expand-to.target))))...........
209e0	28 28 73 74 72 69 6e 67 2d 70 72 65 66 69 78 2d 70 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e	((string-prefix-p.(expand-file-n
20a00	61 6d 65 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 20 64 69 72 29 0a 20 20 20 20	ame.default-directory).dir).....
20a20	20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 64 69 72 65 64 2d 73 75 62 64 69 72 2d	.......(goto-char.(dired-subdir-
20a40	6d 69 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 6e 65 78	min))............(goto-char.(nex
20a60	74 2d 73 69 6e 67 6c 65 2d 70 72 6f 70 65 72 74 79 2d 63 68 61 6e 67 65 20 28 70 6f 69 6e 74 29	t-single-property-change.(point)
20a80	20 27 64 69 72 65 64 2d 66 69 6c 65 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 64	.'dired-filename))............(d
20aa0	69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 65 78 70 61 6e 64 2d 74 6f 20 74 61 72 67 65 74 29	irvish-subtree-expand-to.target)
20ac0	29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 76	))))..;;;###autoload.(defun.dirv
20ae0	69 73 68 2d 73 75 62 74 72 65 65 2d 75 70 20 28 29 0a 20 20 22 4a 75 6d 70 20 74 6f 20 62 65 67	ish-subtree-up.()..."Jump.to.beg
20b00	69 6e 6e 69 6e 67 20 6f 66 20 63 75 72 72 65 6e 74 20 73 75 62 74 72 65 65 2e 22 0a 20 20 28 69	inning.of.current.subtree."...(i
20b20	6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 77 68 65 6e 2d 6c 65 74 20 28 28 6f 76 20 28 64 69	nteractive)...(when-let.((ov.(di
20b40	72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2d 70 61 72 65 6e 74 29 29 29 0a 20 20 20 20 28 67 6f	rvish-subtree--parent))).....(go
20b60	74 6f 2d 63 68 61 72 20 28 6f 76 65 72 6c 61 79 2d 73 74 61 72 74 20 6f 76 29 29 0a 20 20 20 20	to-char.(overlay-start.ov)).....
20b80	28 64 69 72 65 64 2d 70 72 65 76 69 6f 75 73 2d 6c 69 6e 65 20 31 29 29 29 0a 0a 3b 3b 3b 23 23	(dired-previous-line.1)))..;;;##
20ba0	23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65	#autoload.(defun.dirvish-subtree
20bc0	2d 72 65 6d 6f 76 65 20 28 29 0a 20 20 22 52 65 6d 6f 76 65 20 73 75 62 74 72 65 65 20 61 74 20	-remove.()..."Remove.subtree.at.
20be0	70 6f 69 6e 74 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 77 68 65 6e 2d	point."...(interactive)...(when-
20c00	6c 65 74 2a 20 28 28 6f 76 20 28 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2d 70 61 72 65	let*.((ov.(dirvish-subtree--pare
20c20	6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 65 67 20 28 6f 76 65 72 6c 61 79	nt))...............(beg.(overlay
20c40	2d 73 74 61 72 74 20 6f 76 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 6e 64 20 28	-start.ov))...............(end.(
20c60	6f 76 65 72 6c 61 79 2d 65 6e 64 20 6f 76 29 29 29 0a 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72	overlay-end.ov))).....(goto-char
20c80	20 62 65 67 29 0a 20 20 20 20 28 64 69 72 65 64 2d 70 72 65 76 69 6f 75 73 2d 6c 69 6e 65 20 31	.beg).....(dired-previous-line.1
20ca0	29 0a 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 6f 20 69 6e 20 28 6f 76 65 72 6c 61 79	).....(cl-loop.for.o.in.(overlay
20cc0	73 2d 69 6e 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 20 20	s-in.(point-min).(point-max))...
20ce0	20 20 20 20 20 20 20 20 20 20 20 77 68 65 6e 20 28 61 6e 64 20 28 6f 76 65 72 6c 61 79 2d 67 65	...........when.(and.(overlay-ge
20d00	74 20 6f 20 27 64 69 72 65 64 2d 73 75 62 74 72 65 65 2d 64 65 70 74 68 29 0a 20 20 20 20 20 20	t.o.'dired-subtree-depth).......
20d20	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3e 3d 20 28 6f 76 65 72 6c 61 79 2d 73 74	.................(>=.(overlay-st
20d40	61 72 74 20 6f 29 20 62 65 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	art.o).beg).....................
20d60	20 20 20 28 3c 3d 20 28 6f 76 65 72 6c 61 79 2d 65 6e 64 20 6f 29 20 65 6e 64 29 29 0a 20 20 20	...(<=.(overlay-end.o).end))....
20d80	20 20 20 20 20 20 20 20 20 20 64 6f 20 28 73 65 74 71 20 64 69 72 76 69 73 68 2d 73 75 62 74 72	..........do.(setq.dirvish-subtr
20da0	65 65 2d 2d 6f 76 65 72 6c 61 79 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ee--overlays....................
20dc0	20 20 20 28 64 65 6c 71 20 6f 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2d 6f 76 65 72	...(delq.o.dirvish-subtree--over
20de0	6c 61 79 73 29 29 29 0a 20 20 20 20 28 77 69 74 68 2d 73 69 6c 65 6e 74 2d 6d 6f 64 69 66 69 63	lays))).....(with-silent-modific
20e00	61 74 69 6f 6e 73 0a 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 72 65 67 69 6f 6e 20 28 6f 76 65	ations.......(delete-region.(ove
20e20	72 6c 61 79 2d 73 74 61 72 74 20 6f 76 29 20 28 6f 76 65 72 6c 61 79 2d 65 6e 64 20 6f 76 29 29	rlay-start.ov).(overlay-end.ov))
20e40	29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 76 69	)))..;;;###autoload.(defun.dirvi
20e60	73 68 2d 73 75 62 74 72 65 65 2d 63 6c 65 61 72 20 28 29 0a 20 20 22 43 6c 65 61 72 20 61 6c 6c	sh-subtree-clear.()..."Clear.all
20e80	20 73 75 62 74 72 65 65 73 20 69 6e 20 74 68 65 20 62 75 66 66 65 72 2e 22 0a 20 20 28 69 6e 74	.subtrees.in.the.buffer."...(int
20ea0	65 72 61 63 74 69 76 65 29 0a 20 20 28 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2d 72 65	eractive)...(dirvish-subtree--re
20ec0	76 65 72 74 20 74 29 0a 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29	vert.t)...(goto-char.(point-min)
20ee0	29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2d 76 69 65 77	))..(defun.dirvish-subtree--view
20f00	2d 66 69 6c 65 20 28 29 0a 20 20 22 56 69 65 77 20 66 69 6c 65 20 6e 6f 64 65 20 75 73 69 6e 67	-file.()..."View.file.node.using
20f20	20 60 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 66 69 6c 65 2d 76 69 65 77 65 72 27 2e 22	.`dirvish-subtree-file-viewer'."
20f40	0a 20 20 28 6c 65 74 2a 20 28 28 69 6e 64 65 78 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a	...(let*.((index.(dirvish-prop.:
20f60	69 6e 64 65 78 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 20 28 6f 72 20 28 61 6e 64 20	index))..........(file.(or.(and.
20f80	28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 72 65 6d 6f 74 65 29 0a 20 20 20 20 20 20 20 20 20	(dirvish-prop.:remote)..........
20fa0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 52 65 6d 6f	...............(user-error."Remo
20fc0	74 65 20 66 69 6c 65 20 60 25 73 27 20 6e 6f 74 20 70 72 65 76 69 65 77 65 64 22 20 69 6e 64 65	te.file.`%s'.not.previewed".inde
20fe0	78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 6e 64 65 78 29 29 0a 20	x))....................index))..
21000	20 20 20 20 20 20 20 20 28 62 75 66 20 28 6f 72 20 28 67 65 74 2d 66 69 6c 65 2d 62 75 66 66 65	........(buf.(or.(get-file-buffe
21020	72 20 66 69 6c 65 29 20 28 66 69 6e 64 2d 66 69 6c 65 2d 6e 6f 73 65 6c 65 63 74 20 66 69 6c 65	r.file).(find-file-noselect.file
21040	29 29 29 0a 20 20 20 20 20 20 20 20 20 6f 72 69 67 2d 62 75 66 29 0a 20 20 20 20 28 77 68 65 6e	)))..........orig-buf).....(when
21060	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 0a 20 20 20 20 20 20	.(with-current-buffer.buf.......
21080	20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 20 28 67 6f 74 6f 2d 63 68 61 72	......(save-excursion.(goto-char
210a0	20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.(point-min))...................
210c0	20 20 20 20 20 20 20 20 20 20 28 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 5c 30 22 20 6e	..........(search-forward."\0".n
210e0	69 6c 20 27 6e 6f 65 72 72 6f 72 29 29 29 0a 20 20 20 20 20 20 28 6b 69 6c 6c 2d 62 75 66 66 65	il.'noerror))).......(kill-buffe
21100	72 20 62 75 66 29 0a 20 20 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 42 69 6e 61 72 79	r.buf).......(user-error."Binary
21120	20 66 69 6c 65 20 60 25 73 27 20 6e 6f 74 20 70 72 65 76 69 65 77 65 64 22 20 66 69 6c 65 29 29	.file.`%s'.not.previewed".file))
21140	0a 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 6f 72 20 28	.....(with-selected-window.(or.(
21160	67 65 74 2d 62 75 66 66 65 72 2d 77 69 6e 64 6f 77 20 62 75 66 29 20 28 6e 65 78 74 2d 77 69 6e	get-buffer-window.buf).(next-win
21180	64 6f 77 29 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 6f 72 69 67 2d 62 75 66 20 28 63 75 72 72	dow)).......(setq.orig-buf.(curr
211a0	65 6e 74 2d 62 75 66 66 65 72 29 29 0a 20 20 20 20 20 20 28 73 77 69 74 63 68 2d 74 6f 2d 62 75	ent-buffer)).......(switch-to-bu
211c0	66 66 65 72 20 62 75 66 29 0a 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 64 69 72 76 69 73 68	ffer.buf).......(funcall.dirvish
211e0	2d 73 75 62 74 72 65 65 2d 66 69 6c 65 2d 76 69 65 77 65 72 20 6f 72 69 67 2d 62 75 66 29 29 29	-subtree-file-viewer.orig-buf)))
21200	29 0a 0a 28 64 65 66 61 6c 69 61 73 20 27 64 69 72 76 69 73 68 2d 74 6f 67 67 6c 65 2d 73 75 62	)..(defalias.'dirvish-toggle-sub
21220	74 72 65 65 20 23 27 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 74 6f 67 67 6c 65 0a 20 20	tree.#'dirvish-subtree-toggle...
21240	22 49 6e 73 65 72 74 20 73 75 62 74 72 65 65 20 61 74 20 70 6f 69 6e 74 20 6f 72 20 72 65 6d 6f	"Insert.subtree.at.point.or.remo
21260	76 65 20 69 74 20 69 66 20 69 74 20 77 61 73 20 6e 6f 74 20 70 72 65 73 65 6e 74 2e 22 29 0a 3b	ve.it.if.it.was.not.present.").;
21280	3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 73 75 62	;;###autoload.(defun.dirvish-sub
212a0	74 72 65 65 2d 74 6f 67 67 6c 65 20 28 29 0a 20 20 22 49 6e 73 65 72 74 20 73 75 62 74 72 65 65	tree-toggle.()..."Insert.subtree
212c0	20 61 74 20 70 6f 69 6e 74 20 6f 72 20 72 65 6d 6f 76 65 20 69 74 20 69 66 20 69 74 20 77 61 73	.at.point.or.remove.it.if.it.was
212e0	20 6e 6f 74 20 70 72 65 73 65 6e 74 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20	.not.present."...(interactive)..
21300	20 28 69 66 20 28 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2d 65 78 70 61 6e 64 65 64 2d	.(if.(dirvish-subtree--expanded-
21320	70 29 0a 20 20 20 20 20 20 28 70 72 6f 67 6e 20 28 64 69 72 65 64 2d 6e 65 78 74 2d 6c 69 6e 65	p).......(progn.(dired-next-line
21340	20 31 29 20 28 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 72 65 6d 6f 76 65 29 29 0a 20 20	.1).(dirvish-subtree-remove))...
21360	20 20 28 63 6f 6e 64 69 74 69 6f 6e 2d 63 61 73 65 20 65 72 72 20 28 64 69 72 76 69 73 68 2d 73	..(condition-case.err.(dirvish-s
21380	75 62 74 72 65 65 2d 2d 69 6e 73 65 72 74 29 0a 20 20 20 20 20 20 28 66 69 6c 65 2d 65 72 72 6f	ubtree--insert).......(file-erro
213a0	72 20 28 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2d 76 69 65 77 2d 66 69 6c 65 29 29 0a	r.(dirvish-subtree--view-file)).
213c0	20 20 20 20 20 20 28 65 72 72 6f 72 20 28 6d 65 73 73 61 67 65 20 22 25 73 22 20 28 63 64 72 20	......(error.(message."%s".(cdr.
213e0	65 72 72 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65	err))))))..(defun.dirvish-subtre
21400	65 2d 74 6f 67 67 6c 65 2d 6f 72 2d 6f 70 65 6e 20 28 65 76 29 0a 20 20 22 54 6f 67 67 6c 65 20	e-toggle-or-open.(ev)..."Toggle.
21420	74 68 65 20 73 75 62 74 72 65 65 20 69 66 20 69 6e 20 61 20 64 69 72 6c 69 6e 65 2c 20 6f 74 68	the.subtree.if.in.a.dirline,.oth
21440	65 72 77 69 73 65 20 6f 70 65 6e 20 74 68 65 20 66 69 6c 65 2e 0a 54 68 69 73 20 63 6f 6d 6d 61	erwise.open.the.file..This.comma
21460	6e 64 20 74 61 6b 65 73 20 61 20 6d 6f 75 73 65 20 65 76 65 6e 74 20 45 56 20 61 73 20 69 74 73	nd.takes.a.mouse.event.EV.as.its
21480	20 61 72 67 6d 65 6e 74 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 65 22 29 0a 20	.argment."...(interactive."e")..
214a0	20 28 6c 65 74 20 28 28 77 69 6e 20 28 70 6f 73 6e 2d 77 69 6e 64 6f 77 20 28 65 76 65 6e 74 2d	.(let.((win.(posn-window.(event-
214c0	65 6e 64 20 65 76 29 29 29 0a 20 20 20 20 20 20 20 20 28 70 6f 73 20 28 70 6f 73 6e 2d 70 6f 69	end.ev))).........(pos.(posn-poi
214e0	6e 74 20 28 65 76 65 6e 74 2d 65 6e 64 20 65 76 29 29 29 29 0a 20 20 20 20 28 75 6e 6c 65 73 73	nt.(event-end.ev)))).....(unless
21500	20 28 77 69 6e 64 6f 77 70 20 77 69 6e 29 20 28 65 72 72 6f 72 20 22 4e 6f 20 66 69 6c 65 20 63	.(windowp.win).(error."No.file.c
21520	68 6f 73 65 6e 22 29 29 0a 20 20 20 20 28 73 65 6c 65 63 74 2d 77 69 6e 64 6f 77 20 77 69 6e 29	hosen")).....(select-window.win)
21540	0a 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 28 77 69 6e 64 6f	.....(with-current-buffer.(windo
21560	77 2d 62 75 66 66 65 72 20 77 69 6e 29 0a 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 70	w-buffer.win).......(goto-char.p
21580	6f 73 29 0a 20 20 20 20 20 20 28 63 6f 6e 64 69 74 69 6f 6e 2d 63 61 73 65 20 6e 69 6c 0a 20 20	os).......(condition-case.nil...
215a0	20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 74 6f 67 67 6c 65 29	........(dirvish-subtree-toggle)
215c0	0a 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 28 64 69 72 76 69 73 68 2d 66 69 6e 64 2d 65 6e	.........(error.(dirvish-find-en
215e0	74 72 79 2d 61 20 28 64 69 72 65 64 2d 67 65 74 2d 66 69 6c 65 2d 66 6f 72 2d 76 69 73 69 74 29	try-a.(dired-get-file-for-visit)
21600	29 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 77 69 6e 64 6f 77 2d 6c 69 76 65 2d 70 20 77 69	)))).....(when.(window-live-p.wi
21620	6e 29 20 28 73 65 6c 65 63 74 2d 77 69 6e 64 6f 77 20 77 69 6e 29 29 29 29 0a 0a 3b 3b 3b 23 23	n).(select-window.win))))..;;;##
21640	23 61 75 74 6f 6c 6f 61 64 20 28 61 75 74 6f 6c 6f 61 64 20 27 64 69 72 76 69 73 68 2d 73 75 62	#autoload.(autoload.'dirvish-sub
21660	74 72 65 65 2d 6d 65 6e 75 20 22 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 22 20 6e 69 6c 20	tree-menu."dirvish-subtree".nil.
21680	74 29 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 70 72 65 66 69 78 20 64 69 72 76	t).(transient-define-prefix.dirv
216a0	69 73 68 2d 73 75 62 74 72 65 65 2d 6d 65 6e 75 20 28 29 0a 20 20 22 48 65 6c 70 20 6d 65 6e 75	ish-subtree-menu.()..."Help.menu
216c0	20 66 6f 72 20 60 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 2a 27 20 63 6f 6d 6d 61 6e 64	.for.`dirvish-subtree-*'.command
216e0	73 2e 22 0a 20 20 5b 3a 64 65 73 63 72 69 70 74 69 6f 6e 0a 20 20 20 28 6c 61 6d 62 64 61 20 28	s."...[:description....(lambda.(
21700	29 20 28 64 69 72 76 69 73 68 2d 2d 66 6f 72 6d 61 74 2d 6d 65 6e 75 2d 68 65 61 64 69 6e 67 20	).(dirvish--format-menu-heading.
21720	22 4d 61 6e 61 67 65 20 73 75 62 74 72 65 65 73 22 29 29 0a 20 20 20 28 22 54 41 42 22 20 22 54	"Manage.subtrees"))....("TAB"."T
21740	6f 67 67 6c 65 20 73 75 62 74 72 65 65 22 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 76 69	oggle.subtree".............dirvi
21760	73 68 2d 73 75 62 74 72 65 65 2d 74 6f 67 67 6c 65 20 3a 74 72 61 6e 73 69 65 6e 74 20 74 29 0a	sh-subtree-toggle.:transient.t).
21780	20 20 20 28 22 74 22 20 22 20 20 45 78 70 61 6e 64 20 75 6e 74 69 6c 20 74 61 72 67 65 74 22 20	...("t"."..Expand.until.target".
217a0	20 20 20 20 20 20 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 65 78 70 61 6e 64 2d 74 6f	.......dirvish-subtree-expand-to
217c0	29 0a 20 20 20 28 22 75 22 20 22 20 20 4d 6f 76 65 20 75 70 20 31 20 64 65 70 74 68 20 6c 65 76	)....("u"."..Move.up.1.depth.lev
217e0	65 6c 22 20 20 20 20 20 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 75 70 29 0a 20 20 20	el"......dirvish-subtree-up)....
21800	28 22 72 22 20 22 20 20 52 65 6d 6f 76 65 20 63 75 72 72 65 6e 74 20 73 75 62 74 72 65 65 22 20	("r"."..Remove.current.subtree".
21820	20 20 20 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 72 65 6d 6f 76 65 29 0a 20 20 20 28	....dirvish-subtree-remove)....(
21840	22 63 22 20 22 20 20 52 65 6d 6f 76 65 20 61 6c 6c 20 73 75 62 74 72 65 65 73 22 20 20 20 20 20	"c"."..Remove.all.subtrees".....
21860	20 20 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 63 6c 65 61 72 29 5d 29 0a 0a 28 70 72	...dirvish-subtree-clear)])..(pr
21880	6f 76 69 64 65 20 27 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 29 0a 3b 3b 3b 20 64 69 72 76	ovide.'dirvish-subtree).;;;.dirv
218a0	69 73 68 2d 73 75 62 74 72 65 65 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00	ish-subtree.el.ends.here........
218c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
218e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
21900	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
21920	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
21940	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
21960	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
21980	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
219a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
219c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
219e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
21a00	64 69 72 76 69 73 68 2d 32 30 32 33 30 35 31 39 2e 31 35 30 30 2f 64 69 72 76 69 73 68 2d 76 63	dirvish-20230519.1500/dirvish-vc
21a20	2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	.el.............................
21a40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
21a60	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
21a80	30 30 31 36 32 31 30 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 30 35 34 00 20 30 00 00 00	0016210.00000000000.015054..0...
21aa0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
21ac0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
21ae0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
21b00	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...................
21b20	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...................
21b40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
21b60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
21b80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
21ba0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
21bc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
21be0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
21c00	3b 3b 3b 20 64 69 72 76 69 73 68 2d 76 63 2e 65 6c 20 2d 2d 2d 20 56 65 72 73 69 6f 6e 2d 63 6f	;;;.dirvish-vc.el.---.Version-co
21c20	6e 74 72 6f 6c 20 69 6e 74 65 67 72 61 74 69 6f 6e 20 66 6f 72 20 44 69 72 76 69 73 68 20 2d 2a	ntrol.integration.for.Dirvish.-*
21c40	2d 20 6c 65 78 69 63 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	-.lexical-binding:.t.-*-..;;.Cop
21c60	79 72 69 67 68 74 20 28 43 29 20 32 30 32 31 2d 32 30 32 32 20 41 6c 65 78 20 4c 75 0a 3b 3b 20	yright.(C).2021-2022.Alex.Lu.;;.
21c80	41 75 74 68 6f 72 20 3a 20 41 6c 65 78 20 4c 75 20 3c 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62	Author.:.Alex.Lu.<https://github
21ca0	2e 63 6f 6d 2f 61 6c 65 78 6c 75 69 67 69 74 3e 0a 3b 3b 20 56 65 72 73 69 6f 6e 3a 20 32 2e 30	.com/alexluigit>.;;.Version:.2.0
21cc0	2e 35 33 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 66 69 6c 65 73 2c 20 63 6f 6e 76 65 6e 69 65	.53.;;.Keywords:.files,.convenie
21ce0	6e 63 65 0a 3b 3b 20 48 6f 6d 65 70 61 67 65 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e	nce.;;.Homepage:.https://github.
21d00	63 6f 6d 2f 61 6c 65 78 6c 75 69 67 69 74 2f 64 69 72 76 69 73 68 0a 3b 3b 20 53 50 44 58 2d 4c	com/alexluigit/dirvish.;;.SPDX-L
21d20	69 63 65 6e 73 65 2d 49 64 65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61	icense-Identifier:.GPL-3.0-or-la
21d40	74 65 72 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 20 53 68 6f 77 20 76 65	ter..;;;.Commentary:..;;.Show.ve
21d60	72 73 69 6f 6e 2d 63 6f 6e 74 72 6f 6c 20 69 6e 66 6f 20 73 75 63 68 20 61 73 20 67 69 74 20 63	rsion-control.info.such.as.git.c
21d80	6f 6d 6d 69 74 20 6d 65 73 73 61 67 65 20 61 74 20 72 6f 6f 74 20 77 69 6e 64 6f 77 20 61 6e 64	ommit.message.at.root.window.and
21da0	20 67 69 74 0a 3b 3b 20 64 69 66 66 20 61 74 20 70 72 65 76 69 65 77 20 77 69 6e 64 6f 77 20 69	.git.;;.diff.at.preview.window.i
21dc0	6e 20 44 69 72 76 69 73 68 2e 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20	n.Dirvish...;;;.Code:..(require.
21de0	27 64 69 72 76 69 73 68 29 0a 28 64 65 66 69 6e 65 2d 66 72 69 6e 67 65 2d 62 69 74 6d 61 70 20	'dirvish).(define-fringe-bitmap.
21e00	27 64 69 72 76 69 73 68 2d 76 63 2d 67 75 74 74 65 72 20 5b 32 35 30 5d 20 6e 69 6c 20 6e 69 6c	'dirvish-vc-gutter.[250].nil.nil
21e20	20 27 28 63 65 6e 74 65 72 20 72 65 70 65 61 74 65 64 29 29 0a 0a 28 64 65 66 63 6c 61 73 73 20	.'(center.repeated))..(defclass.
21e40	64 69 72 76 69 73 68 2d 76 63 2d 70 72 65 76 69 65 77 20 28 74 72 61 6e 73 69 65 6e 74 2d 73 77	dirvish-vc-preview.(transient-sw
21e60	69 74 63 68 65 73 29 20 28 29 0a 20 20 22 43 6c 61 73 73 20 66 6f 72 20 64 69 72 76 69 73 68 20	itches).()..."Class.for.dirvish.
21e80	76 63 2d 2a 20 70 72 65 76 69 65 77 20 64 69 73 70 61 74 63 68 65 72 73 2e 22 29 0a 0a 28 64 65	vc-*.preview.dispatchers.")..(de
21ea0	66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 76 63 2d 73 74 61 74 65 2d 66 61 63 65 2d 61 6c	fcustom.dirvish-vc-state-face-al
21ec0	69 73 74 0a 20 20 27 28 28 75 70 2d 74 6f 2d 64 61 74 65 20 20 20 20 20 20 20 2e 20 6e 69 6c 29	ist...'((up-to-date.........nil)
21ee0	0a 20 20 20 20 28 65 64 69 74 65 64 20 20 20 20 20 20 20 20 20 20 20 2e 20 76 63 2d 65 64 69 74	.....(edited.............vc-edit
21f00	65 64 2d 73 74 61 74 65 29 0a 20 20 20 20 28 61 64 64 65 64 20 20 20 20 20 20 20 20 20 20 20 20	ed-state).....(added............
21f20	2e 20 76 63 2d 6c 6f 63 61 6c 6c 79 2d 61 64 64 65 64 2d 73 74 61 74 65 29 0a 20 20 20 20 28 72	..vc-locally-added-state).....(r
21f40	65 6d 6f 76 65 64 20 20 20 20 20 20 20 20 20 20 2e 20 76 63 2d 72 65 6d 6f 76 65 64 2d 73 74 61	emoved............vc-removed-sta
21f60	74 65 29 0a 20 20 20 20 28 6d 69 73 73 69 6e 67 20 20 20 20 20 20 20 20 20 20 2e 20 76 63 2d 6d	te).....(missing............vc-m
21f80	69 73 73 69 6e 67 2d 73 74 61 74 65 29 0a 20 20 20 20 28 6e 65 65 64 73 2d 6d 65 72 67 65 20 20	issing-state).....(needs-merge..
21fa0	20 20 20 20 2e 20 64 69 72 76 69 73 68 2d 76 63 2d 6e 65 65 64 73 2d 6d 65 72 67 65 2d 66 61 63	......dirvish-vc-needs-merge-fac
21fc0	65 29 0a 20 20 20 20 28 63 6f 6e 66 6c 69 63 74 20 20 20 20 20 20 20 20 20 2e 20 76 63 2d 63 6f	e).....(conflict...........vc-co
21fe0	6e 66 6c 69 63 74 2d 73 74 61 74 65 29 0a 20 20 20 20 28 75 6e 6c 6f 63 6b 65 64 2d 63 68 61 6e	nflict-state).....(unlocked-chan
22000	67 65 73 20 2e 20 76 63 2d 6c 6f 63 6b 65 64 2d 73 74 61 74 65 29 0a 20 20 20 20 28 6e 65 65 64	ges...vc-locked-state).....(need
22020	73 2d 75 70 64 61 74 65 20 20 20 20 20 2e 20 76 63 2d 6e 65 65 64 73 2d 75 70 64 61 74 65 2d 73	s-update.......vc-needs-update-s
22040	74 61 74 65 29 0a 20 20 20 20 28 69 67 6e 6f 72 65 64 20 20 20 20 20 20 20 20 20 20 2e 20 64 69	tate).....(ignored............di
22060	72 65 64 2d 69 67 6e 6f 72 65 64 29 0a 20 20 20 20 28 75 6e 72 65 67 69 73 74 65 72 65 64 20 20	red-ignored).....(unregistered..
22080	20 20 20 2e 20 64 69 72 76 69 73 68 2d 76 63 2d 75 6e 72 65 67 69 73 74 65 72 65 64 2d 66 61 63	.....dirvish-vc-unregistered-fac
220a0	65 29 29 0a 20 20 22 41 6c 69 73 74 20 6f 66 20 28 56 43 2d 53 54 41 54 45 20 2e 20 46 41 43 45	e))..."Alist.of.(VC-STATE...FACE
220c0	29 2e 0a 54 68 69 73 20 76 61 6c 75 65 20 69 73 20 63 6f 6e 73 75 6d 65 64 20 62 79 20 60 76 63	)..This.value.is.consumed.by.`vc
220e0	2d 73 74 61 74 65 27 20 61 74 74 72 69 62 75 74 65 20 69 6e 20 44 69 72 76 69 73 68 2e 20 20 46	-state'.attribute.in.Dirvish...F
22100	41 43 45 0a 69 73 20 74 68 65 20 66 61 63 65 20 75 73 65 64 20 66 6f 72 20 74 68 61 74 20 56 43	ACE.is.the.face.used.for.that.VC
22120	2d 53 54 41 54 45 2e 20 20 53 65 65 20 60 76 63 2d 73 74 61 74 65 27 20 69 6e 20 28 69 6e 0a 76	-STATE...See.`vc-state'.in.(in.v
22140	63 2d 68 6f 6f 6b 73 2e 65 6c 29 20 66 6f 72 20 64 65 74 61 69 6c 20 65 78 70 6c 61 6e 61 74 69	c-hooks.el).for.detail.explanati
22160	6f 6e 20 6f 66 20 74 68 65 73 65 20 73 74 61 74 65 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64	on.of.these.states."...:group.'d
22180	69 72 76 69 73 68 0a 20 20 3a 74 79 70 65 20 27 28 61 6c 69 73 74 20 3a 6b 65 79 2d 74 79 70 65	irvish...:type.'(alist.:key-type
221a0	20 73 79 6d 62 6f 6c 20 3a 76 61 6c 75 65 2d 74 79 70 65 20 27 28 73 79 6d 62 6f 6c 20 3a 74 61	.symbol.:value-type.'(symbol.:ta
221c0	67 20 22 46 61 63 65 22 29 29 29 0a 0a 28 64 65 66 66 61 63 65 20 64 69 72 76 69 73 68 2d 76 63	g."Face")))..(defface.dirvish-vc
221e0	2d 6e 65 65 64 73 2d 6d 65 72 67 65 2d 66 61 63 65 0a 20 20 27 28 28 28 28 62 61 63 6b 67 72 6f	-needs-merge-face...'((((backgro
22200	75 6e 64 20 64 61 72 6b 29 29 20 28 3a 62 61 63 6b 67 72 6f 75 6e 64 20 22 23 35 30 30 66 32 39	und.dark)).(:background."#500f29
22220	22 29 29 0a 20 20 20 20 28 74 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3a 62	")).....(t...................(:b
22240	61 63 6b 67 72 6f 75 6e 64 20 22 23 65 66 63 62 63 66 22 29 29 29 0a 20 20 22 46 61 63 65 20 75	ackground."#efcbcf")))..."Face.u
22260	73 65 64 20 66 6f 72 20 60 6e 65 65 64 73 2d 6d 65 72 67 65 27 20 76 63 20 73 74 61 74 65 20 69	sed.for.`needs-merge'.vc.state.i
22280	6e 20 74 68 65 20 44 69 72 76 69 73 68 20 62 75 66 66 65 72 2e 22 0a 20 20 3a 67 72 6f 75 70 20	n.the.Dirvish.buffer."...:group.
222a0	27 64 69 72 76 69 73 68 29 0a 0a 28 64 65 66 66 61 63 65 20 64 69 72 76 69 73 68 2d 76 63 2d 75	'dirvish)..(defface.dirvish-vc-u
222c0	6e 72 65 67 69 73 74 65 72 65 64 2d 66 61 63 65 0a 20 20 27 28 28 74 20 28 3a 69 6e 68 65 72 69	nregistered-face...'((t.(:inheri
222e0	74 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 63 6f 6e 73 74 61 6e 74 2d 66 61 63 65 29 29 29 0a 20 20 22	t.font-lock-constant-face)))..."
22300	46 61 63 65 20 75 73 65 64 20 66 6f 72 20 60 75 6e 72 65 67 69 73 74 65 72 65 64 27 20 76 63 20	Face.used.for.`unregistered'.vc.
22320	73 74 61 74 65 20 69 6e 20 74 68 65 20 44 69 72 76 69 73 68 20 62 75 66 66 65 72 2e 22 0a 20 20	state.in.the.Dirvish.buffer."...
22340	3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 29 0a 0a 28 64 65 66 66 61 63 65 20 64 69 72 76 69	:group.'dirvish)..(defface.dirvi
22360	73 68 2d 67 69 74 2d 63 6f 6d 6d 69 74 2d 6d 65 73 73 61 67 65 2d 66 61 63 65 0a 20 20 27 28 28	sh-git-commit-message-face...'((
22380	74 20 28 3a 69 6e 68 65 72 69 74 20 64 69 72 65 64 2d 69 67 6e 6f 72 65 64 20 3a 75 6e 64 65 72	t.(:inherit.dired-ignored.:under
223a0	6c 69 6e 65 20 6e 69 6c 20 3a 62 61 63 6b 67 72 6f 75 6e 64 20 75 6e 73 70 65 63 69 66 69 65 64	line.nil.:background.unspecified
223c0	29 29 29 0a 20 20 22 46 61 63 65 20 66 6f 72 20 63 6f 6d 6d 69 74 20 6d 65 73 73 61 67 65 20 6f	)))..."Face.for.commit.message.o
223e0	76 65 72 6c 61 79 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 29 0a 0a 28 64	verlays."...:group.'dirvish)..(d
22400	65 66 76 61 72 20 76 63 2d 64 69 72 2d 70 72 6f 63 65 73 73 2d 62 75 66 66 65 72 29 0a 0a 28 63	efvar.vc-dir-process-buffer)..(c
22420	6c 2d 64 65 66 6d 65 74 68 6f 64 20 74 72 61 6e 73 69 65 6e 74 2d 69 6e 66 69 78 2d 73 65 74 20	l-defmethod.transient-infix-set.
22440	28 28 6f 62 6a 20 64 69 72 76 69 73 68 2d 76 63 2d 70 72 65 76 69 65 77 29 20 76 61 6c 75 65 29	((obj.dirvish-vc-preview).value)
22460	0a 20 20 22 53 65 74 20 72 65 6c 65 76 61 6e 74 20 76 61 6c 75 65 20 69 6e 20 44 49 52 56 49 53	..."Set.relevant.value.in.DIRVIS
22480	48 2d 56 43 2d 50 52 45 56 49 45 57 20 69 6e 73 74 61 6e 63 65 20 4f 42 4a 20 74 6f 20 56 41 4c	H-VC-PREVIEW.instance.OBJ.to.VAL
224a0	55 45 2e 22 0a 20 20 28 6f 73 65 74 20 6f 62 6a 20 76 61 6c 75 65 20 76 61 6c 75 65 29 0a 20 20	UE."...(oset.obj.value.value)...
224c0	28 6c 65 74 2a 20 28 28 64 76 20 28 64 69 72 76 69 73 68 2d 63 75 72 72 29 29 0a 20 20 20 20 20	(let*.((dv.(dirvish-curr))......
224e0	20 20 20 20 28 62 75 66 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 0a 20 20 20 20 20	....(buf.(current-buffer))......
22500	20 20 20 20 28 6f 6c 64 2d 6c 61 79 6f 75 74 20 28 63 61 72 20 28 64 76 2d 6c 61 79 6f 75 74 20	....(old-layout.(car.(dv-layout.
22520	64 76 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 6e 65 77 2d 6c 61 79 6f 75 74 20 28 75 6e 6c 65	dv)))..........(new-layout.(unle
22540	73 73 20 6f 6c 64 2d 6c 61 79 6f 75 74 20 28 63 64 72 20 28 64 76 2d 6c 61 79 6f 75 74 20 64 76	ss.old-layout.(cdr.(dv-layout.dv
22560	29 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 6e 65 77 2d 64 70 73 20 28 73 65 71 2d 64 69 66 66	))))..........(new-dps.(seq-diff
22580	65 72 65 6e 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 76 69 73	erence....................dirvis
225a0	68 2d 70 72 65 76 69 65 77 2d 64 69 73 70 61 74 63 68 65 72 73 20 27 28 76 63 2d 64 69 66 66 20	h-preview-dispatchers.'(vc-diff.
225c0	76 63 2d 6c 6f 67 20 76 63 2d 62 6c 61 6d 65 29 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 76 61	vc-log.vc-blame)))).....(when.va
225e0	6c 75 65 20 28 70 75 73 68 20 28 69 6e 74 65 72 6e 20 28 66 6f 72 6d 61 74 20 22 25 73 22 20 76	lue.(push.(intern.(format."%s".v
22600	61 6c 75 65 29 29 20 6e 65 77 2d 64 70 73 29 29 0a 20 20 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c	alue)).new-dps)).....(setq-local
22620	20 64 69 72 76 69 73 68 2d 2d 77 6f 72 6b 69 6e 67 2d 70 72 65 76 69 65 77 2d 64 69 73 70 61 74	.dirvish--working-preview-dispat
22640	68 63 68 65 72 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d	hchers.................(dirvish-
22660	2d 70 72 65 76 69 65 77 2d 64 70 73 2d 76 61 6c 69 64 61 74 65 20 6e 65 77 2d 64 70 73 29 29 0a	-preview-dps-validate.new-dps)).
22680	20 20 20 20 28 69 66 20 28 6e 6f 74 20 6e 65 77 2d 6c 61 79 6f 75 74 29 0a 20 20 20 20 20 20 20	....(if.(not.new-layout)........
226a0	20 28 64 69 72 76 69 73 68 2d 2d 70 72 65 76 69 65 77 2d 75 70 64 61 74 65 20 64 76 20 28 64 69	.(dirvish--preview-update.dv.(di
226c0	72 76 69 73 68 2d 70 72 6f 70 20 3a 69 6e 64 65 78 29 29 0a 20 20 20 20 20 20 28 71 75 69 74 2d	rvish-prop.:index)).......(quit-
226e0	77 69 6e 64 6f 77 20 6e 69 6c 20 28 64 76 2d 72 6f 6f 74 2d 77 69 6e 64 6f 77 20 64 76 29 29 0a	window.nil.(dv-root-window.dv)).
22700	20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 77 69 6e 64 6f 77 20 74 72 61 6e 73 69 65 6e 74 2d 2d	......(delete-window.transient--
22720	77 69 6e 64 6f 77 29 0a 20 20 20 20 20 20 28 73 65 74 63 61 72 20 28 64 76 2d 6c 61 79 6f 75 74	window).......(setcar.(dv-layout
22740	20 64 76 29 20 6e 65 77 2d 6c 61 79 6f 75 74 29 0a 20 20 20 20 20 20 28 73 77 69 74 63 68 2d 74	.dv).new-layout).......(switch-t
22760	6f 2d 62 75 66 66 65 72 20 62 75 66 29 0a 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 2d 69 6e	o-buffer.buf).......(dirvish--in
22780	69 74 2d 73 65 73 73 69 6f 6e 20 64 76 29 29 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74 2d 64 65	it-session.dv))))..(transient-de
227a0	66 69 6e 65 2d 69 6e 66 69 78 20 64 69 72 76 69 73 68 2d 76 63 2d 70 72 65 76 69 65 77 2d 69 66	fine-infix.dirvish-vc-preview-if
227c0	78 20 28 29 0a 20 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 20 22 50 72 65 76 69 65 77 20 73 74 79	x.()...:description."Preview.sty
227e0	6c 65 22 0a 20 20 3a 63 6c 61 73 73 20 27 64 69 72 76 69 73 68 2d 76 63 2d 70 72 65 76 69 65 77	le"...:class.'dirvish-vc-preview
22800	0a 20 20 3a 61 72 67 75 6d 65 6e 74 2d 66 6f 72 6d 61 74 20 22 76 63 2d 25 73 22 0a 20 20 3a 61	...:argument-format."vc-%s"...:a
22820	72 67 75 6d 65 6e 74 2d 72 65 67 65 78 70 20 22 5c 5c 28 76 63 2d 5c 5c 28 6c 6f 67 5c 5c 7c 64	rgument-regexp."\\(vc-\\(log\\\|d
22840	69 66 66 5c 5c 7c 62 6c 61 6d 65 5c 5c 29 5c 5c 29 22 0a 20 20 3a 63 68 6f 69 63 65 73 20 27 28	iff\\\|blame\\)\\)"...:choices.'(
22860	22 6c 6f 67 22 20 22 64 69 66 66 22 20 22 62 6c 61 6d 65 22 29 29 0a 0a 28 64 69 72 76 69 73 68	"log"."diff"."blame"))..(dirvish
22880	2d 64 65 66 69 6e 65 2d 61 74 74 72 69 62 75 74 65 20 76 63 2d 73 74 61 74 65 0a 20 20 22 54 68	-define-attribute.vc-state..."Th
228a0	65 20 76 65 72 73 69 6f 6e 20 63 6f 6e 74 72 6f 6c 20 73 74 61 74 65 20 61 74 20 6c 65 66 74 20	e.version.control.state.at.left.
228c0	66 72 69 6e 67 65 2e 22 0a 20 20 3a 77 68 65 6e 20 28 61 6e 64 20 28 64 69 72 76 69 73 68 2d 70	fringe."...:when.(and.(dirvish-p
228e0	72 6f 70 20 3a 76 63 2d 62 61 63 6b 65 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f	rop.:vc-backend)..............(o
22900	72 20 28 73 65 74 2d 77 69 6e 64 6f 77 2d 66 72 69 6e 67 65 73 20 6e 69 6c 20 35 20 31 29 20 74	r.(set-window-fringes.nil.5.1).t
22920	29 29 0a 20 20 28 6c 65 74 2a 20 28 28 73 74 61 74 65 20 28 64 69 72 76 69 73 68 2d 61 74 74 72	))...(let*.((state.(dirvish-attr
22940	69 62 75 74 65 2d 63 61 63 68 65 20 66 2d 6e 61 6d 65 20 3a 76 63 2d 73 74 61 74 65 29 29 0a 20	ibute-cache.f-name.:vc-state))..
22960	20 20 20 20 20 20 20 20 28 66 61 63 65 20 28 61 6c 69 73 74 2d 67 65 74 20 73 74 61 74 65 20 64	........(face.(alist-get.state.d
22980	69 72 76 69 73 68 2d 76 63 2d 73 74 61 74 65 2d 66 61 63 65 2d 61 6c 69 73 74 29 29 0a 20 20 20	irvish-vc-state-face-alist))....
229a0	20 20 20 20 20 20 28 64 69 73 70 6c 61 79 20 28 61 6e 64 20 66 61 63 65 20 60 28 6c 65 66 74 2d	......(display.(and.face.`(left-
229c0	66 72 69 6e 67 65 20 64 69 72 76 69 73 68 2d 76 63 2d 67 75 74 74 65 72 20 2e 20 2c 28 63 6f 6e	fringe.dirvish-vc-gutter...,(con
229e0	73 20 66 61 63 65 20 6e 69 6c 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 67 75 74 74 65 72 2d	s.face.nil))))..........(gutter-
22a00	73 74 72 20 28 61 6e 64 20 64 69 73 70 6c 61 79 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 21 22	str.(and.display.(propertize."!"
22a20	20 27 64 69 73 70 6c 61 79 20 64 69 73 70 6c 61 79 29 29 29 20 6f 76 29 0a 20 20 20 20 28 77 68	.'display.display))).ov).....(wh
22a40	65 6e 20 67 75 74 74 65 72 2d 73 74 72 0a 20 20 20 20 20 20 28 70 72 6f 67 31 20 60 28 6f 76 20	en.gutter-str.......(prog1.`(ov.
22a60	2e 20 2c 28 73 65 74 71 20 6f 76 20 28 6d 61 6b 65 2d 6f 76 65 72 6c 61 79 20 66 2d 62 65 67 20	..,(setq.ov.(make-overlay.f-beg.
22a80	66 2d 62 65 67 29 29 29 0a 20 20 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 76	f-beg))).........(overlay-put.ov
22aa0	20 27 62 65 66 6f 72 65 2d 73 74 72 69 6e 67 20 67 75 74 74 65 72 2d 73 74 72 29 29 29 29 29 0a	.'before-string.gutter-str))))).
22ac0	0a 28 64 69 72 76 69 73 68 2d 64 65 66 69 6e 65 2d 61 74 74 72 69 62 75 74 65 20 67 69 74 2d 6d	.(dirvish-define-attribute.git-m
22ae0	73 67 0a 20 20 22 41 70 70 65 6e 64 20 67 69 74 20 63 6f 6d 6d 69 74 20 6d 65 73 73 61 67 65 20	sg..."Append.git.commit.message.
22b00	74 6f 20 66 69 6c 65 6e 61 6d 65 2e 22 0a 20 20 3a 69 6e 64 65 78 20 31 0a 20 20 3a 77 68 65 6e	to.filename."...:index.1...:when
22b20	20 28 61 6e 64 20 28 65 71 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 76 63 2d 62 61 63 6b	.(and.(eq.(dirvish-prop.:vc-back
22b40	65 6e 64 29 20 27 47 69 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 64 69	end).'Git)..............(not.(di
22b60	72 76 69 73 68 2d 70 72 6f 70 20 3a 72 65 6d 6f 74 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20	rvish-prop.:remote))............
22b80	20 20 28 3e 20 77 69 6e 2d 77 69 64 74 68 20 36 35 29 29 0a 20 20 28 6c 65 74 2a 20 28 28 69 6e	..(>.win-width.65))...(let*.((in
22ba0	66 6f 20 28 64 69 72 76 69 73 68 2d 61 74 74 72 69 62 75 74 65 2d 63 61 63 68 65 20 66 2d 6e 61	fo.(dirvish-attribute-cache.f-na
22bc0	6d 65 20 3a 67 69 74 2d 6d 73 67 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 61 63 65 20 28 6f 72	me.:git-msg))..........(face.(or
22be0	20 68 6c 2d 66 61 63 65 20 27 64 69 72 76 69 73 68 2d 67 69 74 2d 63 6f 6d 6d 69 74 2d 6d 65 73	.hl-face.'dirvish-git-commit-mes
22c00	73 61 67 65 2d 66 61 63 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 73 74 72 20 28 63 6f 6e 63 61	sage-face))..........(str.(conca
22c20	74 20 28 73 75 62 73 74 72 69 6e 67 20 28 63 6f 6e 63 61 74 20 22 20 20 22 20 69 6e 66 6f 29 20	t.(substring.(concat."..".info).
22c40	30 20 2d 31 29 20 22 20 22 29 29 29 0a 20 20 20 20 28 61 64 64 2d 66 61 63 65 2d 74 65 78 74 2d	0.-1)."."))).....(add-face-text-
22c60	70 72 6f 70 65 72 74 79 20 30 20 28 6c 65 6e 67 74 68 20 73 74 72 29 20 66 61 63 65 20 74 20 73	property.0.(length.str).face.t.s
22c80	74 72 29 0a 20 20 20 20 60 28 6c 65 66 74 20 2e 20 2c 73 74 72 29 29 29 0a 0a 28 64 69 72 76 69	tr).....`(left...,str)))..(dirvi
22ca0	73 68 2d 64 65 66 69 6e 65 2d 70 72 65 76 69 65 77 20 76 63 2d 64 69 66 66 20 28 65 78 74 29 0a	sh-define-preview.vc-diff.(ext).
22cc0	20 20 22 55 73 65 20 6f 75 74 70 75 74 20 6f 66 20 60 76 63 2d 64 69 66 66 27 20 61 73 20 70 72	.."Use.output.of.`vc-diff'.as.pr
22ce0	65 76 69 65 77 2e 22 0a 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 64 69 72 76 69 73 68 2d 70 72	eview."...(when.(and.(dirvish-pr
22d00	6f 70 20 3a 76 63 2d 62 61 63 6b 65 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f	op.:vc-backend)..............(no
22d20	74 20 28 6d 65 6d 62 65 72 20 65 78 74 20 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 65 78 74 73	t.(member.ext.dirvish-media-exts
22d40	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 6c 65 74 66 20 28 28 28 73 79 6d 62	))..............(cl-letf.(((symb
22d60	6f 6c 2d 66 75 6e 63 74 69 6f 6e 20 27 70 6f 70 2d 74 6f 2d 62 75 66 66 65 72 29 20 23 27 69 67	ol-function.'pop-to-buffer).#'ig
22d80	6e 6f 72 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 73	nore)........................((s
22da0	79 6d 62 6f 6c 2d 66 75 6e 63 74 69 6f 6e 20 27 6d 65 73 73 61 67 65 29 20 23 27 69 67 6e 6f 72	ymbol-function.'message).#'ignor
22dc0	65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 76 63 2d 64 69 66 66 29 29 29 0a 20	e))................(vc-diff)))..
22de0	20 20 20 27 28 62 75 66 66 65 72 20 2e 20 22 2a 76 63 2d 64 69 66 66 2a 22 29 29 29 0a 0a 28 64	...'(buffer..."vc-diff")))..(d
22e00	69 72 76 69 73 68 2d 64 65 66 69 6e 65 2d 70 72 65 76 69 65 77 20 76 63 2d 6c 6f 67 20 28 29 0a	irvish-define-preview.vc-log.().
22e20	20 20 22 55 73 65 20 6f 75 74 70 75 74 20 6f 66 20 60 76 63 2d 70 72 69 6e 74 2d 6c 6f 67 27 20	.."Use.output.of.`vc-print-log'.
22e40	61 73 20 70 72 65 76 69 65 77 2e 22 0a 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 64 69 72 76 69	as.preview."...(when.(and.(dirvi
22e60	73 68 2d 70 72 6f 70 20 3a 76 63 2d 62 61 63 6b 65 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20 20	sh-prop.:vc-backend)............
22e80	20 20 28 63 6c 2d 6c 65 74 66 20 28 28 28 73 79 6d 62 6f 6c 2d 66 75 6e 63 74 69 6f 6e 20 27 70	..(cl-letf.(((symbol-function.'p
22ea0	6f 70 2d 74 6f 2d 62 75 66 66 65 72 29 20 23 27 69 67 6e 6f 72 65 29 29 0a 20 20 20 20 20 20 20	op-to-buffer).#'ignore))........
22ec0	20 20 20 20 20 20 20 20 28 70 72 6f 67 31 20 74 20 28 76 63 2d 70 72 69 6e 74 2d 6c 6f 67 29 29	........(prog1.t.(vc-print-log))
22ee0	29 29 0a 20 20 20 20 27 28 62 75 66 66 65 72 20 2e 20 22 2a 76 63 2d 63 68 61 6e 67 65 2d 6c 6f	)).....'(buffer..."*vc-change-lo
22f00	67 2a 22 29 29 29 0a 0a 28 64 69 72 76 69 73 68 2d 64 65 66 69 6e 65 2d 70 72 65 76 69 65 77 20	g*")))..(dirvish-define-preview.
22f20	76 63 2d 62 6c 61 6d 65 20 28 66 69 6c 65 20 65 78 74 20 70 72 65 76 69 65 77 2d 77 69 6e 64 6f	vc-blame.(file.ext.preview-windo
22f40	77 20 64 76 29 0a 20 20 22 55 73 65 20 6f 75 74 70 75 74 20 6f 66 20 60 76 63 2d 61 6e 6e 6f 74	w.dv)..."Use.output.of.`vc-annot
22f60	61 74 65 27 20 28 66 69 6c 65 29 20 6f 72 20 60 76 63 2d 64 69 72 27 20 28 64 69 72 29 20 61 73	ate'.(file).or.`vc-dir'.(dir).as
22f80	20 70 72 65 76 69 65 77 2e 22 0a 20 20 28 77 68 65 6e 2d 6c 65 74 2a 20 28 28 62 6b 20 28 64 69	.preview."...(when-let*.((bk.(di
22fa0	72 76 69 73 68 2d 70 72 6f 70 20 3a 76 63 2d 62 61 63 6b 65 6e 64 29 29 0a 20 20 20 20 20 20 20	rvish-prop.:vc-backend))........
22fc0	20 20 20 20 20 20 20 28 6f 72 69 67 2d 62 75 66 6c 69 73 74 20 28 62 75 66 66 65 72 2d 6c 69 73	.......(orig-buflist.(buffer-lis
22fe0	74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 73 70 6c 61 79 2d 62 75 66 66 65	t))...............(display-buffe
23000	72 2d 61 6c 69 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 28 28 22 5c 5c 2a 5c 5c	r-alist................'(("\\*\\
23020	28 41 6e 6e 6f 74 61 74 65 20 5c 5c 7c 76 63 2d 64 69 72 5c 5c 29 2e 2a 5c 5c 2a 22 0a 20 20 20	(Annotate.\\\|vc-dir\\).\\"....
23040	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 73 70 6c 61 79 2d 62 75 66 66 65 72 2d 73	...............(display-buffer-s
23060	61 6d 65 2d 77 69 6e 64 6f 77 29 29 29 29 29 0a 20 20 20 20 28 69 66 20 28 66 69 6c 65 2d 64 69	ame-window))))).....(if.(file-di
23080	72 65 63 74 6f 72 79 2d 70 20 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 73 65	rectory-p.file).........(with-se
230a0	6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 20 70 72 65 76 69 65 77 2d 77 69 6e 64 6f 77 0a 20 20 20	lected-window.preview-window....
230c0	20 20 20 20 20 20 20 28 76 63 2d 64 69 72 20 66 69 6c 65 20 62 6b 29 0a 20 20 20 20 20 20 20 20	.......(vc-dir.file.bk).........
230e0	20 20 28 63 6c 2d 70 75 73 68 6e 65 77 20 76 63 2d 64 69 72 2d 70 72 6f 63 65 73 73 2d 62 75 66	..(cl-pushnew.vc-dir-process-buf
23100	66 65 72 20 28 64 76 2d 70 72 65 76 69 65 77 2d 62 75 66 66 65 72 73 20 64 76 29 29 0a 20 20 20	fer.(dv-preview-buffers.dv))....
23120	20 20 20 20 20 20 20 60 28 62 75 66 66 65 72 20 2e 20 2c 28 63 75 72 72 65 6e 74 2d 62 75 66 66	.......`(buffer...,(current-buff
23140	65 72 29 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 2d 6c 65 74 2a 20 28 28 66 69 6c 65 20 28 61	er))).......(when-let*.((file.(a
23160	6e 64 20 28 6e 6f 74 20 28 6d 65 6d 62 65 72 20 65 78 74 20 64 69 72 76 69 73 68 2d 6d 65 64 69	nd.(not.(member.ext.dirvish-medi
23180	61 2d 65 78 74 73 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	a-exts))........................
231a0	20 20 20 20 20 20 28 6e 6f 74 20 28 6d 65 6d 71 20 28 76 63 2d 73 74 61 74 65 20 66 69 6c 65 20	......(not.(memq.(vc-state.file.
231c0	62 6b 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	bk).............................
231e0	20 20 20 20 20 20 20 20 20 20 20 20 27 28 75 6e 72 65 67 69 73 74 65 72 65 64 20 69 67 6e 6f 72	............'(unregistered.ignor
23200	65 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ed)))...........................
23220	20 20 20 66 69 6c 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 2d 62	...file))...................(f-b
23240	75 66 20 28 63 64 72 20 28 64 69 72 76 69 73 68 2d 2d 66 69 6e 64 2d 66 69 6c 65 2d 74 65 6d 70	uf.(cdr.(dirvish--find-file-temp
23260	6f 72 61 72 69 6c 79 20 66 69 6c 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	orarily.file))).................
23280	20 20 28 28 62 75 66 66 65 72 70 20 66 2d 62 75 66 29 29 29 0a 20 20 20 20 20 20 20 20 28 75 6e	..((bufferp.f-buf))).........(un
232a0	6c 65 73 73 20 28 6d 65 6d 71 20 66 2d 62 75 66 20 6f 72 69 67 2d 62 75 66 6c 69 73 74 29 0a 20	less.(memq.f-buf.orig-buflist)..
232c0	20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 66 2d 62 75 66 20 28 64 76 2d 70 72 65 76 69 65 77	.........(push.f-buf.(dv-preview
232e0	2d 62 75 66 66 65 72 73 20 64 76 29 29 29 0a 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 73 65 6c	-buffers.dv))).........(with-sel
23300	65 63 74 65 64 2d 77 69 6e 64 6f 77 20 70 72 65 76 69 65 77 2d 77 69 6e 64 6f 77 0a 20 20 20 20	ected-window.preview-window.....
23320	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 66 2d 62 75 66	......(with-current-buffer.f-buf
23340	0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 6c 65 74 66 20 28 28 28 73 79 6d 62 6f 6c 2d	.............(cl-letf.(((symbol-
23360	66 75 6e 63 74 69 6f 6e 20 27 6d 65 73 73 61 67 65 29 20 23 27 69 67 6e 6f 72 65 29 29 0a 20 20	function.'message).#'ignore))...
23380	20 20 20 20 20 20 20 20 20 20 20 20 28 76 63 2d 61 6e 6e 6f 74 61 74 65 20 66 69 6c 65 20 6e 69	............(vc-annotate.file.ni
233a0	6c 20 27 66 75 6c 6c 73 63 61 6c 65 20 6e 69 6c 20 6e 69 6c 20 62 6b 29 29 0a 20 20 20 20 20 20	l.'fullscale.nil.nil.bk)).......
233c0	20 20 20 20 20 20 28 63 6c 2d 70 75 73 68 6e 65 77 20 28 77 69 6e 64 6f 77 2d 62 75 66 66 65 72	......(cl-pushnew.(window-buffer
233e0	29 20 28 64 76 2d 70 72 65 76 69 65 77 2d 62 75 66 66 65 72 73 20 64 76 29 29 0a 20 20 20 20 20	).(dv-preview-buffers.dv))......
23400	20 20 20 20 20 20 20 60 28 62 75 66 66 65 72 20 2e 20 2c 28 77 69 6e 64 6f 77 2d 62 75 66 66 65	.......`(buffer...,(window-buffe
23420	72 29 29 29 29 29 29 29 29 0a 0a 28 64 69 72 76 69 73 68 2d 64 65 66 69 6e 65 2d 6d 6f 64 65 2d	r))))))))..(dirvish-define-mode-
23440	6c 69 6e 65 20 76 63 2d 69 6e 66 6f 0a 20 20 22 56 65 72 73 69 6f 6e 20 63 6f 6e 74 72 6f 6c 20	line.vc-info..."Version.control.
23460	69 6e 66 6f 20 73 75 63 68 20 61 73 20 67 69 74 20 62 72 61 6e 63 68 2e 22 0a 20 20 28 77 68 65	info.such.as.git.branch."...(whe
23480	6e 2d 6c 65 74 2a 20 28 28 28 3e 20 28 77 69 6e 64 6f 77 2d 77 69 64 74 68 29 20 33 30 29 29 0a	n-let*.(((>.(window-width).30)).
234a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 6b 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20	..............(bk.(dirvish-prop.
234c0	3a 76 63 2d 62 61 63 6b 65 6e 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 6c 2d	:vc-backend))...............(ml-
234e0	73 74 72 20 28 76 63 2d 63 61 6c 6c 2d 62 61 63 6b 65 6e 64 20 62 6b 20 27 6d 6f 64 65 2d 6c 69	str.(vc-call-backend.bk.'mode-li
23500	6e 65 2d 73 74 72 69 6e 67 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 29 0a 20 20	ne-string.default-directory))...
23520	20 20 20 20 20 20 20 20 20 20 20 20 28 62 6b 2d 73 74 72 20 28 66 6f 72 6d 61 74 20 22 25 73 3a	............(bk-str.(format."%s:
23540	22 20 62 6b 29 29 29 0a 20 20 20 20 28 66 6f 72 6d 61 74 20 22 20 25 73 20 25 73 20 22 0a 20 20	".bk))).....(format.".%s.%s."...
23560	20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 62 6b 2d 73 74 72 20 27 66 61	..........(propertize.bk-str.'fa
23580	63 65 20 27 62 6f 6c 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a	ce.'bold).............(propertiz
235a0	65 20 28 73 75 62 73 74 72 69 6e 67 20 6d 6c 2d 73 74 72 20 28 6c 65 6e 67 74 68 20 62 6b 2d 73	e.(substring.ml-str.(length.bk-s
235c0	74 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 61	tr)).........................'fa
235e0	63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 62 75 69 6c 74 69 6e 2d 66 61 63 65 29 29 29 29 0a 0a	ce.'font-lock-builtin-face))))..
23600	3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 20 28 61 75 74 6f 6c 6f 61 64 20 27 64 69 72 76 69 73	;;;###autoload.(autoload.'dirvis
23620	68 2d 76 63 2d 6d 65 6e 75 20 22 64 69 72 76 69 73 68 2d 76 63 22 20 6e 69 6c 20 74 29 0a 28 74	h-vc-menu."dirvish-vc".nil.t).(t
23640	72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 70 72 65 66 69 78 20 64 69 72 76 69 73 68 2d 76	ransient-define-prefix.dirvish-v
23660	63 2d 6d 65 6e 75 20 28 29 0a 20 20 22 48 65 6c 70 20 6d 65 6e 75 20 66 6f 72 20 66 65 61 74 75	c-menu.()..."Help.menu.for.featu
23680	72 65 73 20 69 6e 20 60 64 69 72 76 69 73 68 2d 76 63 27 2e 22 0a 20 20 3a 69 6e 69 74 2d 76 61	res.in.`dirvish-vc'."...:init-va
236a0	6c 75 65 0a 20 20 28 6c 61 6d 62 64 61 20 28 6f 29 20 28 6f 73 65 74 20 6f 20 76 61 6c 75 65 20	lue...(lambda.(o).(oset.o.value.
236c0	28 6d 61 70 63 61 72 20 28 6c 61 6d 62 64 61 20 28 64 29 20 28 66 6f 72 6d 61 74 20 22 25 73 22	(mapcar.(lambda.(d).(format."%s"
236e0	20 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.d))............................
23700	20 20 20 20 64 69 72 76 69 73 68 2d 70 72 65 76 69 65 77 2d 64 69 73 70 61 74 63 68 65 72 73 29	....dirvish-preview-dispatchers)
23720	29 29 0a 20 20 5b 3a 64 65 73 63 72 69 70 74 69 6f 6e 0a 20 20 20 28 6c 61 6d 62 64 61 20 28 29	))...[:description....(lambda.()
23740	20 28 64 69 72 76 69 73 68 2d 2d 66 6f 72 6d 61 74 2d 6d 65 6e 75 2d 68 65 61 64 69 6e 67 20 22	.(dirvish--format-menu-heading."
23760	56 65 72 73 69 6f 6e 20 63 6f 6e 74 72 6f 6c 20 63 6f 6d 6d 61 6e 64 73 22 29 29 0a 20 20 20 28	Version.control.commands"))....(
23780	22 76 22 20 64 69 72 76 69 73 68 2d 76 63 2d 70 72 65 76 69 65 77 2d 69 66 78 0a 20 20 20 20 3a	"v".dirvish-vc-preview-ifx.....:
237a0	69 66 20 28 6c 61 6d 62 64 61 20 28 29 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 76 63 2d	if.(lambda.().(dirvish-prop.:vc-
237c0	62 61 63 6b 65 6e 64 29 29 29 0a 20 20 20 28 22 6e 22 20 22 44 6f 20 74 68 65 20 6e 65 78 74 20	backend)))....("n"."Do.the.next.
237e0	61 63 74 69 6f 6e 22 20 64 69 72 65 64 2d 76 63 2d 6e 65 78 74 2d 61 63 74 69 6f 6e 0a 20 20 20	action".dired-vc-next-action....
23800	20 3a 69 66 20 28 6c 61 6d 62 64 61 20 28 29 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 76	.:if.(lambda.().(dirvish-prop.:v
23820	63 2d 62 61 63 6b 65 6e 64 29 29 29 0a 20 20 20 28 22 63 22 20 22 43 72 65 61 74 65 20 72 65 70	c-backend)))....("c"."Create.rep
23840	6f 22 20 76 63 2d 63 72 65 61 74 65 2d 72 65 70 6f 29 5d 29 0a 0a 28 70 72 6f 76 69 64 65 20 27	o".vc-create-repo)])..(provide.'
23860	64 69 72 76 69 73 68 2d 76 63 29 0a 3b 3b 3b 20 64 69 72 76 69 73 68 2d 76 63 2e 65 6c 20 65 6e	dirvish-vc).;;;.dirvish-vc.el.en
23880	64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	ds.here.........................
238a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
238c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
238e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
23900	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
23920	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
23940	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
23960	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
23980	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
239a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
239c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
239e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
23a00	64 69 72 76 69 73 68 2d 32 30 32 33 30 35 31 39 2e 31 35 30 30 2f 64 69 72 76 69 73 68 2d 77 69	dirvish-20230519.1500/dirvish-wi
23a20	64 67 65 74 73 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	dgets.el........................
23a40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
23a60	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
23a80	30 30 37 31 34 35 30 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 36 31 32 31 00 20 30 00 00 00	0071450.00000000000.016121..0...
23aa0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
23ac0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
23ae0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
23b00	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...................
23b20	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...................
23b40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
23b60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
23b80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
23ba0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
23bc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
23be0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
23c00	3b 3b 3b 20 64 69 72 76 69 73 68 2d 77 69 64 67 65 74 73 2e 65 6c 20 2d 2d 2d 20 43 6f 72 65 20	;;;.dirvish-widgets.el.---.Core.
23c20	77 69 64 67 65 74 73 20 69 6e 20 64 69 72 76 69 73 68 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62	widgets.in.dirvish.-*-.lexical-b
23c40	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 28 43 29 20	inding:.t.-*-..;;.Copyright.(C).
23c60	32 30 32 31 2d 32 30 32 32 20 41 6c 65 78 20 4c 75 0a 3b 3b 20 41 75 74 68 6f 72 20 3a 20 41 6c	2021-2022.Alex.Lu.;;.Author.:.Al
23c80	65 78 20 4c 75 20 3c 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 61 6c 65 78 6c 75	ex.Lu.<https://github.com/alexlu
23ca0	69 67 69 74 3e 0a 3b 3b 20 56 65 72 73 69 6f 6e 3a 20 32 2e 30 2e 35 33 0a 3b 3b 20 4b 65 79 77	igit>.;;.Version:.2.0.53.;;.Keyw
23cc0	6f 72 64 73 3a 20 66 69 6c 65 73 2c 20 63 6f 6e 76 65 6e 69 65 6e 63 65 0a 3b 3b 20 48 6f 6d 65	ords:.files,.convenience.;;.Home
23ce0	70 61 67 65 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 61 6c 65 78 6c 75 69	page:.https://github.com/alexlui
23d00	67 69 74 2f 64 69 72 76 69 73 68 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d 49 64 65 6e	git/dirvish.;;.SPDX-License-Iden
23d20	74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 65 72 0a 0a 3b 3b 3b 20 43 6f	tifier:.GPL-3.0-or-later..;;;.Co
23d40	6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 20 54 68 69 73 20 6c 69 62 72 61 72 79 20 70 72 6f 76 69	mmentary:..;;.This.library.provi
23d60	64 65 73 20 63 6f 72 65 20 61 74 74 72 69 62 75 74 65 73 20 2f 20 6d 6f 64 65 2d 6c 69 6e 65 20	des.core.attributes./.mode-line.
23d80	73 65 67 6d 65 6e 74 73 20 2f 20 70 72 65 76 69 65 77 0a 3b 3b 20 64 69 73 70 61 74 63 68 65 72	segments./.preview.;;.dispatcher
23da0	73 20 28 66 61 73 74 20 61 6e 64 20 6e 6f 6e 2d 62 6c 6f 63 6b 69 6e 67 20 6d 65 64 69 61 20 66	s.(fast.and.non-blocking.media.f
23dc0	69 6c 65 73 20 70 72 65 76 69 65 77 29 20 66 6f 72 20 64 69 72 76 69 73 68 2e 0a 3b 3b 0a 3b 3b	iles.preview).for.dirvish..;;.;;
23de0	20 41 74 74 72 69 62 75 74 65 73 3a 0a 3b 3b 20 60 66 69 6c 65 2d 73 69 7a 65 27 2c 20 60 66 69	.Attributes:.;;.`file-size',.`fi
23e00	6c 65 2d 74 69 6d 65 27 0a 3b 3b 0a 3b 3b 20 4d 6f 64 65 2d 6c 69 6e 65 20 73 65 67 6d 65 6e 74	le-time'.;;.;;.Mode-line.segment
23e20	73 3a 0a 3b 3b 20 60 70 61 74 68 27 2c 20 60 73 79 6d 6c 69 6e 6b 27 2c 20 60 6f 6d 69 74 27 2c	s:.;;.`path',.`symlink',.`omit',
23e40	20 60 73 6f 72 74 27 2c 20 60 69 6e 64 65 78 27 2c 20 60 66 72 65 65 2d 73 70 61 63 65 27 2c 20	.`sort',.`index',.`free-space',.
23e60	60 66 69 6c 65 2d 6c 69 6e 6b 2d 6e 75 6d 62 65 72 27 2c 0a 3b 3b 20 60 66 69 6c 65 2d 75 73 65	`file-link-number',.;;.`file-use
23e80	72 27 2c 20 60 66 69 6c 65 2d 67 72 6f 75 70 27 2c 20 60 66 69 6c 65 2d 74 69 6d 65 27 2c 20 60	r',.`file-group',.`file-time',.`
23ea0	66 69 6c 65 2d 73 69 7a 65 27 2c 20 60 66 69 6c 65 2d 6d 6f 64 65 73 27 2c 0a 3b 3b 20 60 66 69	file-size',.`file-modes',.;;.`fi
23ec0	6c 65 2d 69 6e 6f 64 65 2d 6e 75 6d 62 65 72 27 2c 20 60 66 69 6c 65 2d 64 65 76 69 63 65 2d 6e	le-inode-number',.`file-device-n
23ee0	75 6d 62 65 72 27 0a 3b 3b 0a 3b 3b 20 50 72 65 76 69 65 77 20 64 69 73 70 61 74 63 68 65 72 73	umber'.;;.;;.Preview.dispatchers
23f00	20 28 61 6c 6c 20 65 6e 61 62 6c 65 64 20 62 79 20 64 65 66 61 75 6c 74 29 3a 0a 3b 3b 20 60 69	.(all.enabled.by.default):.;;.`i
23f20	6d 61 67 65 27 2c 20 60 67 69 66 27 2c 20 60 76 69 64 65 6f 27 2c 20 60 65 70 75 62 27 2c 20 60	mage',.`gif',.`video',.`epub',.`
23f40	61 72 63 68 69 76 65 27 2c 20 60 70 64 66 27 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71	archive',.`pdf'..;;;.Code:..(req
23f60	75 69 72 65 20 27 64 69 72 76 69 73 68 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69	uire.'dirvish)..(defcustom.dirvi
23f80	73 68 2d 74 69 6d 65 2d 66 6f 72 6d 61 74 2d 73 74 72 69 6e 67 20 22 25 79 2d 25 6d 2d 25 64 20	sh-time-format-string."%y-%m-%d.
23fa0	25 52 22 0a 20 20 22 46 4f 52 4d 41 54 2d 53 54 52 49 4e 47 20 66 6f 72 20 60 66 69 6c 65 2d 74	%R"..."FORMAT-STRING.for.`file-t
23fc0	69 6d 65 27 20 6d 6f 64 65 20 6c 69 6e 65 20 73 65 67 6d 65 6e 74 2e 0a 54 68 69 73 20 76 61 6c	ime'.mode.line.segment..This.val
23fe0	75 65 20 69 73 20 70 61 73 73 65 64 20 74 6f 20 66 75 6e 63 74 69 6f 6e 20 60 66 6f 72 6d 61 74	ue.is.passed.to.function.`format
24000	2d 74 69 6d 65 2d 73 74 72 69 6e 67 27 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73	-time-string'."...:group.'dirvis
24020	68 20 3a 74 79 70 65 20 27 73 74 72 69 6e 67 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72	h.:type.'string)..(defcustom.dir
24040	76 69 73 68 2d 70 61 74 68 2d 73 65 70 61 72 61 74 6f 72 73 20 27 28 22 20 20 e2 8c 82 22 20 22	vish-path-separators.'("....."."
24060	20 20 e2 88 80 22 20 22 20 e2 8b 97 20 22 29 0a 20 20 22 53 65 70 61 72 61 74 6f 72 73 20 69 6e	.....".".....")..."Separators.in
24080	20 70 61 74 68 20 6d 6f 64 65 20 6c 69 6e 65 20 73 65 67 6d 65 6e 74 2e 0a 54 68 65 20 76 61 6c	.path.mode.line.segment..The.val
240a0	75 65 20 69 73 20 61 20 6c 69 73 74 20 77 69 74 68 20 33 20 65 6c 65 6d 65 6e 74 73 3a 0a 2d 20	ue.is.a.list.with.3.elements:.-.
240c0	69 63 6f 6e 20 66 6f 72 20 68 6f 6d 65 20 64 69 72 65 63 74 6f 72 79 20 5b 7e 5d 0a 2d 20 69 63	icon.for.home.directory.[~].-.ic
240e0	6f 6e 20 66 6f 72 20 72 6f 6f 74 20 64 69 72 65 63 74 6f 72 79 20 5b 2f 5d 0a 2d 20 69 63 6f 6e	on.for.root.directory.[/].-.icon
24100	20 66 6f 72 20 70 61 74 68 20 73 65 70 61 72 61 74 6f 72 73 20 5b 2f 5d 22 0a 20 20 3a 67 72 6f	.for.path.separators.[/]"...:gro
24120	75 70 20 27 64 69 72 76 69 73 68 20 3a 74 79 70 65 20 27 28 72 65 70 65 61 74 20 28 73 74 72 69	up.'dirvish.:type.'(repeat.(stri
24140	6e 67 20 3a 74 61 67 20 22 70 61 74 68 20 73 65 70 61 72 61 74 6f 72 22 29 29 29 0a 0a 28 64 65	ng.:tag."path.separator")))..(de
24160	66 76 61 72 20 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 63 61 63 68 65 2d 70 6f 6f 6c 20 27	fvar.dirvish-media--cache-pool.'
24180	28 29 29 0a 28 64 65 66 76 61 72 20 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 61 75 74 6f 2d	()).(defvar.dirvish-media--auto-
241a0	63 61 63 68 65 2d 74 69 6d 65 72 20 6e 69 6c 29 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76	cache-timer.nil).(defcustom.dirv
241c0	69 73 68 2d 6d 65 64 69 61 2d 61 75 74 6f 2d 63 61 63 68 65 2d 74 68 72 65 73 68 6f 6c 64 20 27	ish-media-auto-cache-threshold.'
241e0	28 35 30 30 20 2e 20 34 29 0a 20 20 22 47 65 6e 65 72 61 74 65 20 63 61 63 68 65 20 69 6d 61 67	(500...4)..."Generate.cache.imag
24200	65 73 20 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 2e 0a 54 68 65 20 76 61 6c 75 65 20 73 68 6f 75	es.automatically..The.value.shou
24220	6c 64 20 62 65 20 61 20 63 6f 6e 73 20 63 65 6c 6c 20 28 46 49 4c 45 2d 43 4f 55 4e 54 20 2e 20	ld.be.a.cons.cell.(FILE-COUNT...
24240	50 52 4f 43 2d 43 4f 55 4e 54 29 20 77 68 65 72 65 0a 62 6f 74 68 20 46 49 4c 45 2d 43 4f 55 4e	PROC-COUNT).where.both.FILE-COUN
24260	54 20 61 6e 64 20 50 52 4f 43 2d 43 4f 55 4e 54 20 73 68 6f 75 6c 64 20 62 65 20 61 20 69 6e 74	T.and.PROC-COUNT.should.be.a.int
24280	65 67 65 72 2e 20 20 44 69 72 65 63 74 6f 72 69 65 73 0a 77 69 74 68 20 66 69 6c 65 20 63 6f 75	eger...Directories.with.file.cou
242a0	6e 74 20 6c 65 73 73 20 74 68 61 6e 20 46 49 4c 45 2d 43 4f 55 4e 54 20 61 72 65 20 63 61 63 68	nt.less.than.FILE-COUNT.are.cach
242c0	65 64 20 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 2c 0a 50 52 4f 43 2d 43 4f 55 4e 54 20 69 73 20	ed.automatically,.PROC-COUNT.is.
242e0	74 68 65 20 6d 61 78 20 6e 75 6d 62 65 72 20 6f 66 20 63 61 63 68 65 20 70 72 6f 63 65 73 73 65	the.max.number.of.cache.processe
24300	73 2e 20 20 49 66 20 74 68 69 73 0a 76 61 72 69 61 62 6c 65 20 69 73 20 6e 69 6c 2c 20 74 68 65	s...If.this.variable.is.nil,.the
24320	20 61 75 74 6f 20 63 61 63 68 69 6e 67 20 69 73 20 64 69 73 61 62 6c 65 64 2e 22 0a 20 20 3a 67	.auto.caching.is.disabled."...:g
24340	72 6f 75 70 20 27 64 69 72 76 69 73 68 0a 20 20 3a 74 79 70 65 20 27 28 63 6f 6e 73 20 28 69 6e	roup.'dirvish...:type.'(cons.(in
24360	74 65 67 65 72 20 3a 74 61 67 20 22 4d 61 78 20 6e 75 6d 62 65 72 20 6f 66 20 64 69 72 65 63 74	teger.:tag."Max.number.of.direct
24380	6f 72 79 20 66 69 6c 65 73 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 74 65	ory.files")................(inte
243a0	67 65 72 20 3a 74 61 67 20 22 4d 61 78 20 6e 75 6d 62 65 72 20 6f 66 20 63 61 63 68 65 20 70 72	ger.:tag."Max.number.of.cache.pr
243c0	6f 63 65 73 73 22 29 29 0a 20 20 3a 73 65 74 20 28 6c 61 6d 62 64 61 20 28 6b 20 76 29 0a 20 20	ocess"))...:set.(lambda.(k.v)...
243e0	20 20 20 20 20 20 20 28 73 65 74 20 6b 20 76 29 0a 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28	.......(set.k.v)..........(and.(
24400	74 69 6d 65 72 70 20 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 61 75 74 6f 2d 63 61 63 68 65	timerp.dirvish-media--auto-cache
24420	2d 74 69 6d 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6e 63 65 6c 2d 74 69	-timer)...............(cancel-ti
24440	6d 65 72 20 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 61 75 74 6f 2d 63 61 63 68 65 2d 74 69	mer.dirvish-media--auto-cache-ti
24460	6d 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 76 0a 20 20 20 20 20 20 20	mer))..........(unless.v........
24480	20 20 20 20 28 73 65 74 71 20 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 61 75 74 6f 2d 63 61	....(setq.dirvish-media--auto-ca
244a0	63 68 65 2d 74 69 6d 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 75 6e 2d	che-timer..................(run-
244c0	77 69 74 68 2d 74 69 6d 65 72 20 30 20 30 2e 32 35 20 23 27 64 69 72 76 69 73 68 2d 6d 65 64 69	with-timer.0.0.25.#'dirvish-medi
244e0	61 2d 2d 61 75 74 6f 63 61 63 68 65 29 29 29 29 29 0a 0a 28 64 65 66 69 6e 65 2d 6f 62 73 6f 6c	a--autocache)))))..(define-obsol
24500	65 74 65 2d 76 61 72 69 61 62 6c 65 2d 61 6c 69 61 73 20 27 64 69 72 76 69 73 68 2d 6d 65 64 69	ete-variable-alias.'dirvish-medi
24520	61 2d 61 75 74 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 27 64 69 72 76 69 73 68 2d 73 68 6f 77 2d	a-auto-properties.'dirvish-show-
24540	6d 65 64 69 61 2d 70 72 6f 70 65 72 74 69 65 73 20 22 53 65 70 20 32 38 2c 20 32 30 32 32 22 29	media-properties."Sep.28,.2022")
24560	0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 73 68 6f 77 2d 6d 65 64 69 61 2d 70	.(defcustom.dirvish-show-media-p
24580	72 6f 70 65 72 74 69 65 73 0a 20 20 28 61 6e 64 20 28 65 78 65 63 75 74 61 62 6c 65 2d 66 69 6e	roperties...(and.(executable-fin
245a0	64 20 22 6d 65 64 69 61 69 6e 66 6f 22 29 20 28 65 78 65 63 75 74 61 62 6c 65 2d 66 69 6e 64 20	d."mediainfo").(executable-find.
245c0	22 70 64 66 69 6e 66 6f 22 29 20 74 29 0a 20 20 22 53 68 6f 77 20 6d 65 64 69 61 20 70 72 6f 70	"pdfinfo").t)..."Show.media.prop
245e0	65 72 74 69 65 73 20 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 69 6e 20 70 72 65 76 69 65 77 20	erties.automatically.in.preview.
24600	77 69 6e 64 6f 77 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 20 3a 74 79 70 65	window."...:group.'dirvish.:type
24620	20 27 62 6f 6f 6c 65 61 6e 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 64 69 72 76 69 73 68 2d 6d 65	.'boolean)..(defconst.dirvish-me
24640	64 69 61 2d 2d 65 6d 62 65 64 64 65 64 2d 76 69 64 65 6f 2d 74 68 75 6d 62 0a 20 20 28 73 74 72	dia--embedded-video-thumb...(str
24660	69 6e 67 2d 6d 61 74 63 68 20 22 70 72 65 66 65 72 20 65 6d 62 65 64 64 65 64 20 69 6d 61 67 65	ing-match."prefer.embedded.image
24680	22 20 28 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e 64 2d 74 6f 2d 73 74 72 69 6e 67 20 22 66 66 6d 70	".(shell-command-to-string."ffmp
246a0	65 67 74 68 75 6d 62 6e 61 69 6c 65 72 20 2d 68 22 29 29 29 0a 28 64 65 66 63 6f 6e 73 74 20 64	egthumbnailer.-h"))).(defconst.d
246c0	69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 69 6d 67 2d 6d 61 78 2d 77 69 64 74 68 20 32 34 30 30	irvish-media--img-max-width.2400
246e0	29 0a 28 64 65 66 63 6f 6e 73 74 20 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 69 6d 67 2d 73	).(defconst.dirvish-media--img-s
24700	63 61 6c 65 2d 68 20 30 2e 37 35 29 0a 28 64 65 66 63 6f 6e 73 74 20 64 69 72 76 69 73 68 2d 6d	cale-h.0.75).(defconst.dirvish-m
24720	65 64 69 61 2d 2d 69 6d 67 2d 73 63 61 6c 65 2d 77 20 30 2e 39 32 29 0a 28 64 65 66 63 6f 6e 73	edia--img-scale-w.0.92).(defcons
24740	74 20 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 69 6e 66 6f 0a 20 20 22 47 65 6e 65 72 61 6c	t.dirvish-media--info..."General
24760	3b 28 46 75 6c 6c 2d 6e 61 6d 65 20 2e 20 5c 22 5c 22 25 46 69 6c 65 4e 61 6d 65 25 5c 22 5c 22	;(Full-name...\"\"%FileName%\"\"
24780	29 28 46 6f 72 6d 61 74 20 2e 20 5c 22 5c 22 25 46 6f 72 6d 61 74 25 5c 22 5c 22 29 28 46 69 6c	)(Format...\"\"%Format%\"\")(Fil
247a0	65 2d 73 69 7a 65 20 2e 20 5c 22 5c 22 25 46 69 6c 65 53 69 7a 65 2f 53 74 72 69 6e 67 31 25 5c	e-size...\"\"%FileSize/String1%\
247c0	22 5c 22 29 28 44 75 72 61 74 69 6f 6e 20 2e 20 5c 22 5c 22 25 44 75 72 61 74 69 6f 6e 2f 53 74	"\")(Duration...\"\"%Duration/St
247e0	72 69 6e 67 33 25 5c 22 5c 22 29 0a 49 6d 61 67 65 3b 28 57 69 64 74 68 20 2e 20 5c 22 5c 22 25	ring3%\"\").Image;(Width...\"\"%
24800	57 69 64 74 68 2f 53 74 72 69 6e 67 25 5c 22 5c 22 29 28 48 65 69 67 68 74 20 2e 20 5c 22 5c 22	Width/String%\"\")(Height...\"\"
24820	25 48 65 69 67 68 74 2f 53 74 72 69 6e 67 25 5c 22 5c 22 29 28 42 69 74 2d 64 65 70 74 68 20 2e	%Height/String%\"\")(Bit-depth..
24840	20 5c 22 5c 22 25 42 69 74 44 65 70 74 68 2f 53 74 72 69 6e 67 25 5c 22 5c 22 29 28 43 6f 6c 6f	.\"\"%BitDepth/String%\"\")(Colo
24860	72 2d 73 70 61 63 65 20 2e 20 5c 22 5c 22 25 43 6f 6c 6f 72 53 70 61 63 65 25 5c 22 5c 22 29 28	r-space...\"\"%ColorSpace%\"\")(
24880	43 68 72 6f 6d 61 2d 73 75 62 73 61 6d 70 6c 69 6e 67 20 2e 20 5c 22 5c 22 25 43 68 72 6f 6d 61	Chroma-subsampling...\"\"%Chroma
248a0	53 75 62 73 61 6d 70 6c 69 6e 67 25 5c 22 5c 22 29 28 43 6f 6d 70 72 65 73 73 69 6f 6e 2d 6d 6f	Subsampling%\"\")(Compression-mo
248c0	64 65 20 2e 20 5c 22 5c 22 25 43 6f 6d 70 72 65 73 73 69 6f 6e 5f 4d 6f 64 65 2f 53 74 72 69 6e	de...\"\"%Compression_Mode/Strin
248e0	67 25 5c 22 5c 22 29 0a 56 69 64 65 6f 3b 28 52 65 73 6f 6c 75 74 69 6f 6e 20 2e 20 5c 22 5c 22	g%\"\").Video;(Resolution...\"\"
24900	25 57 69 64 74 68 25 20 78 20 25 48 65 69 67 68 74 25 5c 22 5c 22 29 28 56 69 64 65 6f 2d 63 6f	%Width%.x.%Height%\"\")(Video-co
24920	64 65 63 20 2e 20 5c 22 5c 22 25 43 6f 64 65 63 49 44 25 5c 22 5c 22 29 28 46 72 61 6d 65 72 61	dec...\"\"%CodecID%\"\")(Framera
24940	74 65 20 2e 20 5c 22 5c 22 25 46 72 61 6d 65 52 61 74 65 25 5c 22 5c 22 29 28 56 69 64 65 6f 2d	te...\"\"%FrameRate%\"\")(Video-
24960	62 69 74 72 61 74 65 20 2e 20 5c 22 5c 22 25 42 69 74 52 61 74 65 2f 53 74 72 69 6e 67 25 5c 22	bitrate...\"\"%BitRate/String%\"
24980	5c 22 29 0a 41 75 64 69 6f 3b 28 41 75 64 69 6f 2d 63 6f 64 65 63 20 2e 20 5c 22 5c 22 25 43 6f	\").Audio;(Audio-codec...\"\"%Co
249a0	64 65 63 49 44 25 5c 22 5c 22 29 28 41 75 64 69 6f 2d 62 69 74 72 61 74 65 20 2e 20 5c 22 5c 22	decID%\"\")(Audio-bitrate...\"\"
249c0	25 42 69 74 52 61 74 65 2f 53 74 72 69 6e 67 25 5c 22 5c 22 29 28 41 75 64 69 6f 2d 73 61 6d 70	%BitRate/String%\"\")(Audio-samp
249e0	6c 69 6e 67 2d 72 61 74 65 20 2e 20 5c 22 5c 22 25 53 61 6d 70 6c 69 6e 67 52 61 74 65 2f 53 74	ling-rate...\"\"%SamplingRate/St
24a00	72 69 6e 67 25 5c 22 5c 22 29 28 41 75 64 69 6f 2d 63 68 61 6e 6e 65 6c 73 20 2e 20 5c 22 5c 22	ring%\"\")(Audio-channels...\"\"
24a20	25 43 68 61 6e 6e 65 6c 4c 61 79 6f 75 74 25 5c 22 5c 22 29 22 29 0a 0a 28 64 65 66 66 61 63 65	%ChannelLayout%\"\")")..(defface
24a40	20 64 69 72 76 69 73 68 2d 66 72 65 65 2d 73 70 61 63 65 0a 20 20 27 28 28 74 20 28 3a 69 6e 68	.dirvish-free-space...'((t.(:inh
24a60	65 72 69 74 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 63 6f 6e 73 74 61 6e 74 2d 66 61 63 65 29 29 29 0a	erit.font-lock-constant-face))).
24a80	20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 60 66 72 65 65 2d 73 70 61 63 65 27 20 6d 6f	.."Face.used.for.`free-space'.mo
24aa0	64 65 2d 6c 69 6e 65 20 73 65 67 6d 65 6e 74 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76	de-line.segment."...:group.'dirv
24ac0	69 73 68 29 0a 0a 28 64 65 66 66 61 63 65 20 64 69 72 76 69 73 68 2d 66 69 6c 65 2d 6c 69 6e 6b	ish)..(defface.dirvish-file-link
24ae0	2d 6e 75 6d 62 65 72 0a 20 20 27 28 28 74 20 28 3a 69 6e 68 65 72 69 74 20 66 6f 6e 74 2d 6c 6f	-number...'((t.(:inherit.font-lo
24b00	63 6b 2d 63 6f 6e 73 74 61 6e 74 2d 66 61 63 65 29 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64	ck-constant-face)))..."Face.used
24b20	20 66 6f 72 20 66 69 6c 65 20 6c 69 6e 6b 20 6e 75 6d 62 65 72 20 6d 6f 64 65 2d 6c 69 6e 65 20	.for.file.link.number.mode-line.
24b40	73 65 67 6d 65 6e 74 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 29 0a 0a 28 64	segment."...:group.'dirvish)..(d
24b60	65 66 66 61 63 65 20 64 69 72 76 69 73 68 2d 66 69 6c 65 2d 75 73 65 72 2d 69 64 0a 20 20 27 28	efface.dirvish-file-user-id...'(
24b80	28 74 20 28 3a 69 6e 68 65 72 69 74 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 70 72 65 70 72 6f 63 65 73	(t.(:inherit.font-lock-preproces
24ba0	73 6f 72 2d 66 61 63 65 29 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 66 69 6c	sor-face)))..."Face.used.for.fil
24bc0	65 20 73 69 7a 65 20 61 74 74 72 69 62 75 74 65 73 20 2f 20 6d 6f 64 65 2d 6c 69 6e 65 20 73 65	e.size.attributes./.mode-line.se
24be0	67 6d 65 6e 74 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 29 0a 0a 28 64 65 66	gment."...:group.'dirvish)..(def
24c00	66 61 63 65 20 64 69 72 76 69 73 68 2d 66 69 6c 65 2d 67 72 6f 75 70 2d 69 64 0a 20 20 27 28 28	face.dirvish-file-group-id...'((
24c20	74 20 28 3a 69 6e 68 65 72 69 74 20 64 69 72 76 69 73 68 2d 66 69 6c 65 2d 75 73 65 72 2d 69 64	t.(:inherit.dirvish-file-user-id
24c40	29 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 66 69 6c 65 20 67 72 6f 75 70 20	)))..."Face.used.for.file.group.
24c60	69 64 20 6d 6f 64 65 2d 6c 69 6e 65 20 73 65 67 6d 65 6e 74 2e 22 0a 20 20 3a 67 72 6f 75 70 20	id.mode-line.segment."...:group.
24c80	27 64 69 72 76 69 73 68 29 0a 0a 28 64 65 66 66 61 63 65 20 64 69 72 76 69 73 68 2d 66 69 6c 65	'dirvish)..(defface.dirvish-file
24ca0	2d 74 69 6d 65 0a 20 20 27 28 28 74 20 28 3a 69 6e 68 65 72 69 74 20 73 68 61 64 6f 77 20 3a 75	-time...'((t.(:inherit.shadow.:u
24cc0	6e 64 65 72 6c 69 6e 65 20 6e 69 6c 20 3a 69 74 61 6c 69 63 20 6e 69 6c 29 29 29 0a 20 20 22 46	nderline.nil.:italic.nil)))..."F
24ce0	61 63 65 20 75 73 65 64 20 66 6f 72 20 66 69 6c 65 20 61 63 63 65 73 73 2f 6d 6f 64 69 66 79 2f	ace.used.for.file.access/modify/
24d00	63 68 61 6e 67 65 20 74 69 6d 65 20 6d 6f 64 65 2d 6c 69 6e 65 20 73 65 67 6d 65 6e 74 2e 22 0a	change.time.mode-line.segment.".
24d20	20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 29 0a 0a 28 64 65 66 66 61 63 65 20 64 69 72	..:group.'dirvish)..(defface.dir
24d40	76 69 73 68 2d 66 69 6c 65 2d 73 69 7a 65 0a 20 20 27 28 28 74 20 28 3a 69 6e 68 65 72 69 74 20	vish-file-size...'((t.(:inherit.
24d60	63 6f 6d 70 6c 65 74 69 6f 6e 73 2d 61 6e 6e 6f 74 61 74 69 6f 6e 73 20 3a 75 6e 64 65 72 6c 69	completions-annotations.:underli
24d80	6e 65 20 6e 69 6c 20 3a 69 74 61 6c 69 63 20 6e 69 6c 29 29 29 0a 20 20 22 46 61 63 65 20 75 73	ne.nil.:italic.nil)))..."Face.us
24da0	65 64 20 66 6f 72 20 64 69 73 70 6c 61 79 20 66 69 6c 65 20 73 69 7a 65 20 61 74 74 72 69 62 75	ed.for.display.file.size.attribu
24dc0	74 65 73 20 2f 20 6d 6f 64 65 2d 6c 69 6e 65 20 73 65 67 6d 65 6e 74 2e 22 0a 20 20 3a 67 72 6f	tes./.mode-line.segment."...:gro
24de0	75 70 20 27 64 69 72 76 69 73 68 29 0a 0a 28 64 65 66 66 61 63 65 20 64 69 72 76 69 73 68 2d 66	up.'dirvish)..(defface.dirvish-f
24e00	69 6c 65 2d 6d 6f 64 65 73 0a 20 20 27 28 28 74 20 28 3a 69 6e 68 65 72 69 74 20 66 6f 6e 74 2d	ile-modes...'((t.(:inherit.font-
24e20	6c 6f 63 6b 2d 62 75 69 6c 74 69 6e 2d 66 61 63 65 29 29 29 0a 20 20 22 46 61 63 65 20 75 73 65	lock-builtin-face)))..."Face.use
24e40	64 20 66 6f 72 20 66 69 6c 65 20 6d 6f 64 65 20 28 70 72 69 76 69 6c 65 67 65 29 20 6d 6f 64 65	d.for.file.mode.(privilege).mode
24e60	2d 6c 69 6e 65 20 73 65 67 6d 65 6e 74 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73	-line.segment."...:group.'dirvis
24e80	68 29 0a 0a 28 64 65 66 66 61 63 65 20 64 69 72 76 69 73 68 2d 66 69 6c 65 2d 69 6e 6f 64 65 2d	h)..(defface.dirvish-file-inode-
24ea0	6e 75 6d 62 65 72 0a 20 20 27 28 28 74 20 28 3a 69 6e 68 65 72 69 74 20 64 69 72 76 69 73 68 2d	number...'((t.(:inherit.dirvish-
24ec0	66 69 6c 65 2d 6c 69 6e 6b 2d 6e 75 6d 62 65 72 29 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64	file-link-number)))..."Face.used
24ee0	20 66 6f 72 20 66 69 6c 65 20 69 6e 6f 64 65 20 6e 75 6d 62 65 72 20 6d 6f 64 65 2d 6c 69 6e 65	.for.file.inode.number.mode-line
24f00	20 73 65 67 6d 65 6e 74 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 29 0a 0a 28	.segment."...:group.'dirvish)..(
24f20	64 65 66 66 61 63 65 20 64 69 72 76 69 73 68 2d 66 69 6c 65 2d 64 65 76 69 63 65 2d 6e 75 6d 62	defface.dirvish-file-device-numb
24f40	65 72 0a 20 20 27 28 28 74 20 28 3a 69 6e 68 65 72 69 74 20 64 69 72 76 69 73 68 2d 66 69 6c 65	er...'((t.(:inherit.dirvish-file
24f60	2d 6c 69 6e 6b 2d 6e 75 6d 62 65 72 29 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72	-link-number)))..."Face.used.for
24f80	20 66 69 6c 65 73 79 73 74 65 6d 20 64 65 76 69 63 65 20 6e 75 6d 62 65 72 20 6d 6f 64 65 2d 6c	.filesystem.device.number.mode-l
24fa0	69 6e 65 20 73 65 67 6d 65 6e 74 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 29	ine.segment."...:group.'dirvish)
24fc0	0a 0a 28 64 65 66 66 61 63 65 20 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 69 6e 66 6f 2d 68 65	..(defface.dirvish-media-info-he
24fe0	61 64 69 6e 67 0a 20 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 28 64 69 72 65 64 2d 68 65 61	ading...'((t.:inherit.(dired-hea
25000	64 65 72 20 62 6f 6c 64 29 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 66 6f 72 20 68 65 61	der.bold)))..."Face.used.for.hea
25020	64 69 6e 67 20 6f 66 20 6d 65 64 69 61 20 70 72 6f 70 65 72 74 79 20 67 72 6f 75 70 73 2e 22 0a	ding.of.media.property.groups.".
25040	20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 29 0a 0a 28 64 65 66 66 61 63 65 20 64 69 72	..:group.'dirvish)..(defface.dir
25060	76 69 73 68 2d 6d 65 64 69 61 2d 69 6e 66 6f 2d 70 72 6f 70 65 72 74 79 2d 6b 65 79 0a 20 20 27	vish-media-info-property-key...'
25080	28 28 74 20 3a 69 6e 68 65 72 69 74 20 28 69 74 61 6c 69 63 29 29 29 0a 20 20 22 46 61 63 65 20	((t.:inherit.(italic)))..."Face.
250a0	75 73 65 64 20 66 6f 72 20 65 6d 65 72 67 65 20 67 72 6f 75 70 20 74 69 74 6c 65 2e 22 0a 20 20	used.for.emerge.group.title."...
250c0	3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 29 0a 0a 3b 3b 3b 3b 20 48 65 6c 70 65 72 73 0a 0a	:group.'dirvish)..;;;;.Helpers..
250e0	28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 2d 61 74 74 72 2d 73 69 7a 65 2d 68 75 6d 61 6e 2d	(defun.dirvish--attr-size-human-
25100	72 65 61 64 61 62 6c 65 20 28 66 69 6c 65 2d 73 69 7a 65 29 0a 20 20 22 50 72 6f 64 75 63 65 20	readable.(file-size)..."Produce.
25120	61 20 73 74 72 69 6e 67 20 73 68 6f 77 69 6e 67 20 46 49 4c 45 2d 53 49 5a 45 20 69 6e 20 68 75	a.string.showing.FILE-SIZE.in.hu
25140	6d 61 6e 2d 72 65 61 64 61 62 6c 65 20 66 6f 72 6d 2e 22 0a 20 20 28 6c 65 74 20 28 28 70 6f 77	man-readable.form."...(let.((pow
25160	65 72 20 31 30 32 34 2e 30 29 0a 20 20 20 20 20 20 20 20 28 70 72 65 66 69 78 65 73 20 27 28 22	er.1024.0).........(prefixes.'("
25180	22 20 22 6b 22 20 22 4d 22 20 22 47 22 20 22 54 22 20 22 50 22 20 22 45 22 20 22 5a 22 20 22 59	"."k"."M"."G"."T"."P"."E"."Z"."Y
251a0	22 29 29 29 0a 20 20 20 20 28 77 68 69 6c 65 20 28 61 6e 64 20 28 3e 3d 20 66 69 6c 65 2d 73 69	"))).....(while.(and.(>=.file-si
251c0	7a 65 20 70 6f 77 65 72 29 20 28 63 64 72 20 70 72 65 66 69 78 65 73 29 29 0a 20 20 20 20 20 20	ze.power).(cdr.prefixes)).......
251e0	28 73 65 74 71 20 66 69 6c 65 2d 73 69 7a 65 20 28 2f 20 66 69 6c 65 2d 73 69 7a 65 20 70 6f 77	(setq.file-size.(/.file-size.pow
25200	65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 70 72 65 66 69 78 65 73 20 28 63 64 72 20 70 72	er).............prefixes.(cdr.pr
25220	65 66 69 78 65 73 29 29 29 0a 20 20 20 20 28 73 75 62 73 74 72 69 6e 67 20 28 66 6f 72 6d 61 74	efixes))).....(substring.(format
25240	20 28 69 66 20 28 61 6e 64 20 28 3c 20 66 69 6c 65 2d 73 69 7a 65 20 31 30 29 0a 20 20 20 20 20	.(if.(and.(<.file-size.10)......
25260	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 3e 3d 20 28	...........................(>=.(
25280	6d 6f 64 20 66 69 6c 65 2d 73 69 7a 65 20 31 2e 30 29 20 30 2e 30 35 29 0a 20 20 20 20 20 20 20	mod.file-size.1.0).0.05)........
252a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3c 20 28 6d 6f 64	.........................(<.(mod
252c0	20 66 69 6c 65 2d 73 69 7a 65 20 31 2e 30 29 20 30 2e 39 35 29 29 0a 20 20 20 20 20 20 20 20 20	.file-size.1.0).0.95))..........
252e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 20 20 20 20 20 20 25 2e 31 66 25 73 25	.................."......%.1f%s%
25300	73 22 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 22 20 20 20	s".........................."...
25320	20 20 20 25 2e 30 66 25 73 25 73 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	...%.0f%s%s")...................
25340	20 20 20 20 20 66 69 6c 65 2d 73 69 7a 65 20 28 63 61 72 20 70 72 65 66 69 78 65 73 29 0a 20 20	.....file-size.(car.prefixes)...
25360	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 64 69 72 76 69 73	.....................(if.(dirvis
25380	68 2d 70 72 6f 70 20 3a 67 75 69 29 20 22 20 22 20 22 22 29 29 0a 20 20 20 20 20 20 20 20 20 20	h-prop.:gui).".".""))...........
253a0	20 20 20 20 20 2d 36 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 2d 66 69 6c 65	.....-6)))..(defun.dirvish--file
253c0	2d 61 74 74 72 2d 73 69 7a 65 20 28 6e 61 6d 65 20 61 74 74 72 73 29 0a 20 20 22 47 65 74 20 66	-attr-size.(name.attrs)..."Get.f
253e0	69 6c 65 20 73 69 7a 65 20 6f 66 20 66 69 6c 65 20 4e 41 4d 45 20 66 72 6f 6d 20 41 54 54 52 53	ile.size.of.file.NAME.from.ATTRS
25400	2e 22 0a 20 20 28 63 6f 6e 64 20 28 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 72 65 6d 6f 74	."...(cond.((dirvish-prop.:remot
25420	65 29 0a 20 20 20 20 20 20 20 20 20 28 73 75 62 73 74 72 69 6e 67 20 28 66 6f 72 6d 61 74 20 22	e)..........(substring.(format."
25440	20 20 20 20 20 20 25 73 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	......%s%s".....................
25460	20 20 20 20 20 20 20 20 28 6f 72 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 2d 73 69 7a 65	........(or.(file-attribute-size
25480	20 61 74 74 72 73 29 20 22 3f 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.attrs)."?")....................
254a0	20 20 20 20 20 20 20 20 20 28 69 66 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 67 75 69 29	.........(if.(dirvish-prop.:gui)
254c0	20 22 20 22 20 22 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2d 36	."."."")).....................-6
254e0	29 29 0a 20 20 20 20 20 20 20 20 28 28 73 74 72 69 6e 67 70 20 28 66 69 6c 65 2d 61 74 74 72 69	)).........((stringp.(file-attri
25500	62 75 74 65 2d 74 79 70 65 20 61 74 74 72 73 29 29 0a 20 20 20 20 20 20 20 20 20 28 6c 65 74 20	bute-type.attrs))..........(let.
25520	28 28 63 74 20 28 64 69 72 76 69 73 68 2d 61 74 74 72 69 62 75 74 65 2d 63 61 63 68 65 20 6e 61	((ct.(dirvish-attribute-cache.na
25540	6d 65 20 3a 66 2d 63 6f 75 6e 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	me.:f-count.....................
25560	20 28 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	.(condition-case.nil............
25580	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 66 69 6c 65 73 20 28 64 69 72 65	..............(let.((files.(dire
255a0	63 74 6f 72 79 2d 66 69 6c 65 73 20 6e 61 6d 65 20 6e 69 6c 20 6e 69 6c 20 74 29 29 29 0a 20 20	ctory-files.name.nil.nil.t)))...
255c0	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 64 69 72 76 69 73	.........................(dirvis
255e0	68 2d 2d 61 74 74 72 2d 73 69 7a 65 2d 68 75 6d 61 6e 2d 72 65 61 64 61 62 6c 65 0a 20 20 20 20	h--attr-size-human-readable.....
25600	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2d 20 28 6c 65 6e 67	........................(-.(leng
25620	74 68 20 66 69 6c 65 73 29 20 32 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	th.files).2)))..................
25640	20 20 20 20 20 20 28 66 69 6c 65 2d 65 72 72 6f 72 20 27 66 69 6c 65 29 29 29 29 29 0a 20 20 20	......(file-error.'file)))))....
25660	20 20 20 20 20 20 20 20 28 69 66 20 28 6e 6f 74 20 28 65 71 20 63 74 20 27 66 69 6c 65 29 29 20	........(if.(not.(eq.ct.'file)).
25680	63 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 61 74 74 72 69 62 75	ct..............(dirvish-attribu
256a0	74 65 2d 63 61 63 68 65 20 6e 61 6d 65 20 3a 66 2d 73 69 7a 65 0a 20 20 20 20 20 20 20 20 20 20	te-cache.name.:f-size...........
256c0	20 20 20 20 20 28 64 69 72 76 69 73 68 2d 2d 61 74 74 72 2d 73 69 7a 65 2d 68 75 6d 61 6e 2d 72	.....(dirvish--attr-size-human-r
256e0	65 61 64 61 62 6c 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 61	eadable..................(file-a
25700	74 74 72 69 62 75 74 65 2d 73 69 7a 65 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 73 20 6e	ttribute-size.(file-attributes.n
25720	61 6d 65 29 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 28 66 69 6c 65 2d 61 74 74 72 69 62	ame))))))).........((file-attrib
25740	75 74 65 2d 74 79 70 65 20 61 74 74 72 73 29 0a 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28	ute-type.attrs)..........(let.((
25760	63 74 20 28 64 69 72 76 69 73 68 2d 61 74 74 72 69 62 75 74 65 2d 63 61 63 68 65 20 6e 61 6d 65	ct.(dirvish-attribute-cache.name
25780	20 3a 66 2d 63 6f 75 6e 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	.:f-count......................(
257a0	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..............
257c0	20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 66 69 6c 65 73 20 28 64 69 72 65 63 74	............(let.((files.(direct
257e0	6f 72 79 2d 66 69 6c 65 73 20 6e 61 6d 65 20 6e 69 6c 20 6e 69 6c 20 74 29 29 29 0a 20 20 20 20	ory-files.name.nil.nil.t))).....
25800	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 76 69 73 68 2d	.......................(dirvish-
25820	2d 61 74 74 72 2d 73 69 7a 65 2d 68 75 6d 61 6e 2d 72 65 61 64 61 62 6c 65 0a 20 20 20 20 20 20	-attr-size-human-readable.......
25840	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2d 20 28 6c 65 6e 67 74 68	......................(-.(length
25860	20 66 69 6c 65 73 29 20 32 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.files).2)))....................
25880	20 20 20 20 28 66 69 6c 65 2d 65 72 72 6f 72 20 27 6e 6f 2d 70 65 72 6d 69 73 73 69 6f 6e 29 29	....(file-error.'no-permission))
258a0	29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 65 71 20 63 74 20 27 6e 6f 2d 70 65	)))............(if.(eq.ct.'no-pe
258c0	72 6d 69 73 73 69 6f 6e 29 20 22 20 2d 2d 2d 2d 20 22 20 63 74 29 29 29 0a 20 20 20 20 20 20 20	rmission).".----.".ct)))........
258e0	20 28 74 20 28 64 69 72 76 69 73 68 2d 61 74 74 72 69 62 75 74 65 2d 63 61 63 68 65 20 6e 61 6d	.(t.(dirvish-attribute-cache.nam
25900	65 20 3a 66 2d 73 69 7a 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d	e.:f-size..............(dirvish-
25920	2d 61 74 74 72 2d 73 69 7a 65 2d 68 75 6d 61 6e 2d 72 65 61 64 61 62 6c 65 0a 20 20 20 20 20 20	-attr-size-human-readable.......
25940	20 20 20 20 20 20 20 20 28 6f 72 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 2d 73 69 7a 65	........(or.(file-attribute-size
25960	20 61 74 74 72 73 29 20 30 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d	.attrs).0))))))..(defun.dirvish-
25980	2d 66 69 6c 65 2d 61 74 74 72 2d 74 69 6d 65 20 28 6e 61 6d 65 20 61 74 74 72 73 29 0a 20 20 22	-file-attr-time.(name.attrs)..."
259a0	46 69 6c 65 20 4e 41 4d 45 27 73 20 6d 6f 64 69 66 69 65 64 20 74 69 6d 65 20 66 72 6f 6d 20 41	File.NAME's.modified.time.from.A
259c0	54 54 52 53 2e 22 0a 20 20 28 69 66 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 72 65 6d 6f	TTRS."...(if.(dirvish-prop.:remo
259e0	74 65 29 0a 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 20 20 25 73 20 22 20 28 6f 72 20 28 66	te).......(format."..%s.".(or.(f
25a00	69 6c 65 2d 61 74 74 72 69 62 75 74 65 2d 6d 6f 64 69 66 69 63 61 74 69 6f 6e 2d 74 69 6d 65 20	ile-attribute-modification-time.
25a20	61 74 74 72 73 29 20 22 3f 22 29 29 0a 20 20 20 20 28 66 6f 72 6d 61 74 20 22 20 20 25 73 20 22	attrs)."?")).....(format."..%s."
25a40	20 28 64 69 72 76 69 73 68 2d 61 74 74 72 69 62 75 74 65 2d 63 61 63 68 65 20 6e 61 6d 65 20 3a	.(dirvish-attribute-cache.name.:
25a60	66 2d 74 69 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 28 66 6f	f-time.......................(fo
25a80	72 6d 61 74 2d 74 69 6d 65 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	rmat-time-string................
25aa0	20 20 20 20 20 20 20 20 64 69 72 76 69 73 68 2d 74 69 6d 65 2d 66 6f 72 6d 61 74 2d 73 74 72 69	........dirvish-time-format-stri
25ac0	6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d	ng........................(file-
25ae0	61 74 74 72 69 62 75 74 65 2d 6d 6f 64 69 66 69 63 61 74 69 6f 6e 2d 74 69 6d 65 20 61 74 74 72	attribute-modification-time.attr
25b00	73 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 2d 66 6f 72 6d 61 74 2d	s))))))..(defun.dirvish--format-
25b20	66 69 6c 65 2d 61 74 74 72 20 28 61 74 74 72 2d 6e 61 6d 65 29 0a 20 20 22 52 65 74 75 72 6e 20	file-attr.(attr-name)..."Return.
25b40	61 20 73 74 72 69 6e 67 20 6f 66 20 63 75 72 73 6f 72 20 66 69 6c 65 27 73 20 61 74 74 72 69 62	a.string.of.cursor.file's.attrib
25b60	75 74 65 20 41 54 54 52 2d 4e 41 4d 45 2e 22 0a 20 20 28 77 68 65 6e 2d 6c 65 74 2a 20 28 28 6e	ute.ATTR-NAME."...(when-let*.((n
25b80	61 6d 65 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 69 6e 64 65 78 29 29 0a 20 20 20 20 20	ame.(dirvish-prop.:index))......
25ba0	20 20 20 20 20 20 20 20 20 28 61 74 74 72 73 20 28 64 69 72 76 69 73 68 2d 61 74 74 72 69 62 75	.........(attrs.(dirvish-attribu
25bc0	74 65 2d 63 61 63 68 65 20 6e 61 6d 65 20 3a 62 75 69 6c 74 69 6e 29 29 0a 20 20 20 20 20 20 20	te-cache.name.:builtin))........
25be0	20 20 20 20 20 20 20 28 61 74 74 72 2d 67 65 74 74 65 72 20 28 69 6e 74 65 72 6e 20 28 66 6f 72	.......(attr-getter.(intern.(for
25c00	6d 61 74 20 22 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 2d 25 73 22 20 61 74 74 72 2d 6e 61 6d	mat."file-attribute-%s".attr-nam
25c20	65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 74 74 72 2d 66 61 63 65 20 28 69	e)))...............(attr-face.(i
25c40	6e 74 65 72 6e 20 28 66 6f 72 6d 61 74 20 22 64 69 72 76 69 73 68 2d 66 69 6c 65 2d 25 73 22 20	ntern.(format."dirvish-file-%s".
25c60	61 74 74 72 2d 6e 61 6d 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 74 74 72	attr-name)))...............(attr
25c80	2d 76 61 6c 20 28 61 6e 64 20 61 74 74 72 73 20 28 66 75 6e 63 61 6c 6c 20 61 74 74 72 2d 67 65	-val.(and.attrs.(funcall.attr-ge
25ca0	74 74 65 72 20 61 74 74 72 73 29 29 29 29 0a 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28	tter.attrs)))).....(propertize.(
25cc0	66 6f 72 6d 61 74 20 22 25 73 22 20 61 74 74 72 2d 76 61 6c 29 20 27 66 61 63 65 20 61 74 74 72	format."%s".attr-val).'face.attr
25ce0	2d 66 61 63 65 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d	-face)))..(defun.dirvish-media--
25d00	63 61 63 68 65 2d 70 61 74 68 20 28 66 69 6c 65 20 26 6f 70 74 69 6f 6e 61 6c 20 62 61 73 65 20	cache-path.(file.&optional.base.
25d20	65 78 74 20 6e 6f 2d 6d 6b 64 69 72 29 0a 20 20 22 47 65 74 20 46 49 4c 45 27 73 20 63 61 63 68	ext.no-mkdir)..."Get.FILE's.cach
25d40	65 20 70 61 74 68 2e 0a 42 41 53 45 20 69 73 20 61 20 73 74 72 69 6e 67 20 69 6e 64 69 63 61 74	e.path..BASE.is.a.string.indicat
25d60	69 6e 67 20 74 68 65 20 73 75 62 64 69 72 20 6f 66 20 60 64 69 72 76 69 73 68 2d 63 61 63 68 65	ing.the.subdir.of.`dirvish-cache
25d80	2d 64 69 72 27 20 74 6f 0a 75 73 65 2e 20 20 45 58 54 20 69 73 20 61 20 73 75 66 66 69 78 20 73	-dir'.to.use...EXT.is.a.suffix.s
25da0	75 63 68 20 61 73 20 5c 22 2e 6a 70 67 5c 22 20 74 68 61 74 20 69 73 20 61 74 74 61 63 68 65 64	uch.as.\".jpg\".that.is.attached
25dc0	20 74 6f 20 46 49 4c 45 2e 0a 41 20 6e 65 77 20 64 69 72 65 63 74 6f 72 79 20 69 73 20 63 72 65	.to.FILE..A.new.directory.is.cre
25de0	61 74 65 64 20 75 6e 6c 65 73 73 20 4e 4f 2d 4d 4b 44 49 52 2e 22 0a 20 20 28 6c 65 74 2a 20 28	ated.unless.NO-MKDIR."...(let*.(
25e00	28 66 69 6c 65 20 28 69 66 20 28 6d 65 6d 71 20 73 79 73 74 65 6d 2d 74 79 70 65 20 27 28 77 69	(file.(if.(memq.system-type.'(wi
25e20	6e 64 6f 77 73 2d 6e 74 20 6d 73 2d 64 6f 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ndows-nt.ms-dos))...............
25e40	20 20 20 20 20 28 63 6f 6e 63 61 74 20 22 2f 22 20 28 72 65 70 6c 61 63 65 2d 72 65 67 65 78 70	.....(concat."/".(replace-regexp
25e60	2d 69 6e 2d 73 74 72 69 6e 67 20 22 3a 22 20 22 22 20 66 69 6c 65 29 29 20 66 69 6c 65 29 29 0a	-in-string.":"."".file)).file)).
25e80	20 20 20 20 20 20 20 20 20 28 63 61 63 68 65 20 28 63 6f 6e 63 61 74 20 64 69 72 76 69 73 68 2d	.........(cache.(concat.dirvish-
25ea0	63 61 63 68 65 2d 64 69 72 20 62 61 73 65 20 66 69 6c 65 29 29 29 0a 20 20 20 20 28 61 6e 64 20	cache-dir.base.file))).....(and.
25ec0	28 6e 6f 74 20 6e 6f 2d 6d 6b 64 69 72 29 20 28 6e 6f 74 20 28 66 69 6c 65 2d 65 78 69 73 74 73	(not.no-mkdir).(not.(file-exists
25ee0	2d 70 20 63 61 63 68 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 6d 61 6b 65 2d 64 69 72 65 63 74	-p.cache))..........(make-direct
25f00	6f 72 79 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 63 61 63 68 65 29 20	ory.(file-name-directory.cache).
25f20	74 29 29 0a 20 20 20 20 28 63 6f 6e 63 61 74 20 63 61 63 68 65 20 65 78 74 29 29 29 0a 0a 28 64	t)).....(concat.cache.ext)))..(d
25f40	65 66 75 6e 20 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 63 61 63 68 65 2d 73 65 6e 74 69 6e	efun.dirvish-media--cache-sentin
25f60	65 6c 20 28 70 72 6f 63 20 5f 65 78 69 74 63 6f 64 65 29 0a 20 20 22 53 65 6e 74 69 6e 65 6c 20	el.(proc._exitcode)..."Sentinel.
25f80	66 6f 72 20 69 6d 61 67 65 20 63 61 63 68 65 20 70 72 6f 63 65 73 73 20 50 52 4f 43 2e 22 0a 20	for.image.cache.process.PROC."..
25fa0	20 28 77 68 65 6e 2d 6c 65 74 2a 20 28 28 64 76 20 28 6f 72 20 28 64 69 72 76 69 73 68 2d 63 75	.(when-let*.((dv.(or.(dirvish-cu
25fc0	72 72 29 20 64 69 72 76 69 73 68 2d 2d 74 68 69 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	rr).dirvish--this)).............
25fe0	20 20 28 70 61 74 68 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 69 6e 64 65 78 29 29 29 0a	..(path.(dirvish-prop.:index))).
26000	20 20 20 20 28 61 6e 64 20 28 65 71 75 61 6c 20 70 61 74 68 20 28 70 72 6f 63 65 73 73 2d 67 65	....(and.(equal.path.(process-ge
26020	74 20 70 72 6f 63 20 27 70 61 74 68 29 29 0a 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68	t.proc.'path))..........(dirvish
26040	2d 64 65 62 6f 75 6e 63 65 20 6e 69 6c 20 28 64 69 72 76 69 73 68 2d 2d 70 72 65 76 69 65 77 2d	-debounce.nil.(dirvish--preview-
26060	75 70 64 61 74 65 20 64 76 20 70 61 74 68 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76	update.dv.path)))))..(defun.dirv
26080	69 73 68 2d 6d 65 64 69 61 2d 2d 61 75 74 6f 63 61 63 68 65 20 28 29 0a 20 20 22 50 6f 70 20 61	ish-media--autocache.()..."Pop.a
260a0	6e 64 20 72 75 6e 20 74 68 65 20 63 61 63 68 65 20 74 61 73 6b 73 20 69 6e 20 60 64 69 72 76 69	nd.run.the.cache.tasks.in.`dirvi
260c0	73 68 2d 6d 65 64 69 61 2d 2d 63 61 63 68 65 2d 70 6f 6f 6c 27 2e 22 0a 20 20 28 77 68 65 6e 20	sh-media--cache-pool'."...(when.
260e0	28 61 6e 64 20 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 63 61 63 68 65 2d 70 6f 6f 6c 0a 20	(and.dirvish-media--cache-pool..
26100	20 20 20 20 20 20 20 20 20 20 20 20 28 3c 20 28 6c 65 6e 67 74 68 20 28 70 72 6f 63 65 73 73 2d	............(<.(length.(process-
26120	6c 69 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 63 64 72 20	list)).................(or.(cdr.
26140	64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 61 75 74 6f 2d 63 61 63 68 65 2d 74 68 72 65 73 68 6f	dirvish-media-auto-cache-thresho
26160	6c 64 29 20 30 29 29 29 0a 20 20 20 20 28 6c 65 74 20 28 70 72 6f 63 65 73 73 2d 63 6f 6e 6e 65	ld).0))).....(let.(process-conne
26180	63 74 69 6f 6e 2d 74 79 70 65 20 70 72 6f 63 29 0a 20 20 20 20 20 20 28 70 63 61 73 65 2d 6c 65	ction-type.proc).......(pcase-le
261a0	74 2a 20 28 28 60 28 2c 70 72 6f 63 6e 61 6d 65 20 2e 20 28 2c 70 61 74 68 20 2c 5f 77 69 64 74	t*.((`(,procname...(,path.,_widt
261c0	68 20 2c 63 6d 64 20 2c 61 72 67 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	h.,cmd.,args))..................
261e0	20 20 20 28 70 6f 70 20 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 63 61 63 68 65 2d 70 6f 6f	...(pop.dirvish-media--cache-poo
26200	6c 29 29 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 70 61 74 68 0a 20 20 20 20 20 20 20 20	l))).........(when.path.........
26220	20 20 28 73 65 74 71 20 70 72 6f 63 20 28 61 70 70 6c 79 20 23 27 73 74 61 72 74 2d 70 72 6f 63	..(setq.proc.(apply.#'start-proc
26240	65 73 73 20 70 72 6f 63 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ess.procname....................
26260	20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 2d 75 74 69 6c 2d 62 75 66 66 65 72 20 22	.........(dirvish--util-buffer."
26280	69 6d 67 2d 63 61 63 68 65 22 29 20 63 6d 64 20 61 72 67 73 29 29 0a 20 20 20 20 20 20 20 20 20	img-cache").cmd.args))..........
262a0	20 28 70 72 6f 63 65 73 73 2d 70 75 74 20 70 72 6f 63 20 27 70 61 74 68 20 70 61 74 68 29 0a 20	.(process-put.proc.'path.path)..
262c0	20 20 20 20 20 20 20 20 20 28 73 65 74 2d 70 72 6f 63 65 73 73 2d 73 65 6e 74 69 6e 65 6c 20 70	.........(set-process-sentinel.p
262e0	72 6f 63 20 23 27 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 63 61 63 68 65 2d 73 65 6e 74 69	roc.#'dirvish-media--cache-senti
26300	6e 65 6c 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d	nel))))))..(defun.dirvish-media-
26320	2d 67 72 6f 75 70 2d 68 65 61 64 69 6e 67 20 28 67 72 6f 75 70 2d 74 69 74 6c 65 73 29 0a 20 20	-group-heading.(group-titles)...
26340	22 46 6f 72 6d 61 74 20 6d 65 64 69 61 20 67 72 6f 75 70 20 68 65 61 64 69 6e 67 20 69 6e 20 44	"Format.media.group.heading.in.D
26360	69 72 76 69 73 68 20 70 72 65 76 69 65 77 20 62 75 66 66 65 72 2e 0a 47 52 4f 55 50 2d 54 49 54	irvish.preview.buffer..GROUP-TIT
26380	4c 45 53 20 69 73 20 61 20 6c 69 73 74 20 6f 66 20 67 72 6f 75 70 20 74 69 74 6c 65 73 2e 22 0a	LES.is.a.list.of.group.titles.".
263a0	20 20 28 6c 65 74 20 28 28 70 72 65 66 69 78 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 20 20 20	..(let.((prefix.(propertize."...
263c0	20 22 20 27 66 61 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.".'face........................
263e0	20 20 20 20 20 27 28 3a 69 6e 68 65 72 69 74 20 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 69 6e	.....'(:inherit.dirvish-media-in
26400	66 6f 2d 68 65 61 64 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	fo-heading......................
26420	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 74 72 69 6b 65 2d 74 68 72 6f 75 67	..................:strike-throug
26440	68 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 28 74 69 74 6c 65 20 28 70 72 6f 70 65 72 74 69 7a	h.t))).........(title.(propertiz
26460	65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 20 25 73 20 22	e.................(format.".%s."
26480	20 28 6d 61 70 63 6f 6e 63 61 74 20 23 27 63 6f 6e 63 61 74 20 67 72 6f 75 70 2d 74 69 74 6c 65	.(mapconcat.#'concat.group-title
264a0	73 20 22 20 26 20 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20	s.".&.")).................'face.
264c0	27 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 69 6e 66 6f 2d 68 65 61 64 69 6e 67 29 29 0a 20 20	'dirvish-media-info-heading))...
264e0	20 20 20 20 20 20 28 73 75 66 66 69 78 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 20 22 20 27 64	......(suffix.(propertize.".".'d
26500	69 73 70 6c 61 79 20 27 28 73 70 61 63 65 20 3a 61 6c 69 67 6e 2d 74 6f 20 72 69 67 68 74 29 0a	isplay.'(space.:align-to.right).
26520	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 61 63	............................'fac
26540	65 20 27 28 3a 69 6e 68 65 72 69 74 20 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 69 6e 66 6f 2d	e.'(:inherit.dirvish-media-info-
26560	68 65 61 64 69 6e 67 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	heading.........................
26580	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 74 72 69 6b 65 2d 74 68 72	.....................:strike-thr
265a0	6f 75 67 68 20 74 29 29 29 29 0a 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 25 73 25 73 5c 6e	ough.t)))).....(format."%s%s%s\n
265c0	5c 6e 22 20 70 72 65 66 69 78 20 74 69 74 6c 65 20 73 75 66 66 69 78 29 29 29 0a 0a 28 64 65 66	\n".prefix.title.suffix)))..(def
265e0	75 6e 20 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 6d 65 74 61 64 61 74 61 2d 66 72 6f 6d 2d	un.dirvish-media--metadata-from-
26600	6d 65 64 69 61 69 6e 66 6f 20 28 66 69 6c 65 29 0a 20 20 22 52 65 74 75 72 6e 20 72 65 73 75 6c	mediainfo.(file)..."Return.resul
26620	74 20 73 74 72 69 6e 67 20 66 72 6f 6d 20 63 6f 6d 6d 61 6e 64 20 60 6d 65 64 69 61 69 6e 66 6f	t.string.from.command.`mediainfo
26640	27 20 66 6f 72 20 46 49 4c 45 2e 22 0a 20 20 28 72 65 61 64 20 28 66 6f 72 6d 61 74 20 22 28 25	'.for.FILE."...(read.(format."(%
26660	73 29 22 20 28 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e 64 2d 74 6f 2d 73 74 72 69 6e 67 0a 20 20 20	s)".(shell-command-to-string....
26680	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 74 20 22 6d 65	.....................(format."me
266a0	64 69 61 69 6e 66 6f 20 2d 2d 4f 75 74 70 75 74 3d 27 25 73 27 20 25 73 22 0a 20 20 20 20 20 20	diainfo.--Output='%s'.%s".......
266c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 76 69 73	..........................dirvis
266e0	68 2d 6d 65 64 69 61 2d 2d 69 6e 66 6f 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	h-media--info...................
26700	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 68 65 6c 6c 2d 71 75 6f 74 65 2d 61 72 67 75 6d	..............(shell-quote-argum
26720	65 6e 74 20 66 69 6c 65 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 6d	ent.file))))))..(defun.dirvish-m
26740	65 64 69 61 2d 2d 6d 65 74 61 64 61 74 61 2d 66 72 6f 6d 2d 70 64 66 69 6e 66 6f 20 28 66 69 6c	edia--metadata-from-pdfinfo.(fil
26760	65 29 0a 20 20 22 52 65 74 75 72 6e 20 72 65 73 75 6c 74 20 73 74 72 69 6e 67 20 66 72 6f 6d 20	e)..."Return.result.string.from.
26780	63 6f 6d 6d 61 6e 64 20 60 70 64 66 69 6e 66 6f 27 20 66 6f 72 20 46 49 4c 45 2e 22 0a 20 20 28	command.`pdfinfo'.for.FILE."...(
267a0	63 6c 2d 6c 6f 6f 70 20 77 69 74 68 20 6f 75 74 20 3d 20 28 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e	cl-loop.with.out.=.(shell-comman
267c0	64 2d 74 6f 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	d-to-string.....................
267e0	20 20 20 28 66 6f 72 6d 61 74 20 22 70 64 66 69 6e 66 6f 20 25 73 22 20 28 73 68 65 6c 6c 2d 71	...(format."pdfinfo.%s".(shell-q
26800	75 6f 74 65 2d 61 72 67 75 6d 65 6e 74 20 66 69 6c 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20	uote-argument.file)))...........
26820	20 77 69 74 68 20 6c 69 6e 65 73 20 3d 20 28 72 65 6d 6f 76 65 20 22 22 20 28 73 70 6c 69 74 2d	.with.lines.=.(remove."".(split-
26840	73 74 72 69 6e 67 20 6f 75 74 20 22 5c 6e 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 66 6f 72	string.out."\n"))............for
26860	20 6c 69 6e 65 20 69 6e 20 6c 69 6e 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 28 74	.line.in.lines............for.(t
26880	69 74 6c 65 20 63 6f 6e 74 65 6e 74 29 20 3d 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 6c 69	itle.content).=.(split-string.li
268a0	6e 65 20 22 3a 5c 73 2b 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 63 6f 6e 63 61 74 20 28 66 6f	ne.":\s+")............concat.(fo
268c0	72 6d 61 74 20 22 20 20 20 20 20 20 20 25 73 3a 5c 74 25 73 5c 6e 22 0a 20 20 20 20 20 20 20 20	rmat.".......%s:\t%s\n".........
268e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 74 69	..................(propertize.ti
26900	74 6c 65 20 27 66 61 63 65 20 27 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 69 6e 66 6f 2d 70 72	tle.'face.'dirvish-media-info-pr
26920	6f 70 65 72 74 79 2d 6b 65 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	operty-key).....................
26940	20 20 20 20 20 20 63 6f 6e 74 65 6e 74 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68	......content)))..(defun.dirvish
26960	2d 6d 65 64 69 61 2d 2d 66 6f 72 6d 61 74 2d 6d 65 74 61 64 61 74 61 20 28 6d 65 64 69 61 69 6e	-media--format-metadata.(mediain
26980	66 6f 20 70 72 6f 70 65 72 74 69 65 73 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 66 6f 72 6d 61	fo.properties)..."Return.a.forma
269a0	74 74 65 64 20 73 74 72 69 6e 67 20 6f 66 20 50 52 4f 50 45 52 54 49 45 53 20 66 72 6f 6d 20 4d	tted.string.of.PROPERTIES.from.M
269c0	45 44 49 41 49 4e 46 4f 2e 22 0a 20 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 70 72 6f 70 20 69	EDIAINFO."...(cl-loop.for.prop.i
269e0	6e 20 70 72 6f 70 65 72 74 69 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 70 2d 6e 61	n.properties............for.p-na
26a00	6d 65 20 3d 20 28 72 65 70 6c 61 63 65 2d 72 65 67 65 78 70 2d 69 6e 2d 73 74 72 69 6e 67 0a 20	me.=.(replace-regexp-in-string..
26a20	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 2d 22 20 22	..........................."-"."
26a40	20 22 20 28 66 6f 72 6d 61 74 20 22 25 73 22 20 70 72 6f 70 29 29 0a 20 20 20 20 20 20 20 20 20	.".(format."%s".prop))..........
26a60	20 20 66 6f 72 20 69 6e 66 6f 20 3d 20 28 61 6c 69 73 74 2d 67 65 74 20 70 72 6f 70 20 6d 65 64	..for.info.=.(alist-get.prop.med
26a80	69 61 69 6e 66 6f 29 0a 20 20 20 20 20 20 20 20 20 20 20 63 6f 6e 63 61 74 20 28 66 6f 72 6d 61	iainfo)............concat.(forma
26aa0	74 20 22 20 20 20 20 20 20 20 25 73 3a 5c 74 25 73 5c 6e 22 0a 20 20 20 20 20 20 20 20 20 20 20	t.".......%s:\t%s\n"............
26ac0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 70 2d 6e 61 6d	...............(propertize.p-nam
26ae0	65 20 27 66 61 63 65 20 27 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 69 6e 66 6f 2d 70 72 6f 70	e.'face.'dirvish-media-info-prop
26b00	65 72 74 79 2d 6b 65 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	erty-key).......................
26b20	20 20 20 20 69 6e 66 6f 29 29 29 0a 0a 3b 3b 3b 3b 20 41 74 74 72 69 62 75 74 65 73 0a 0a 28 64	....info)))..;;;;.Attributes..(d
26b40	69 72 76 69 73 68 2d 64 65 66 69 6e 65 2d 61 74 74 72 69 62 75 74 65 20 66 69 6c 65 2d 73 69 7a	irvish-define-attribute.file-siz
26b60	65 0a 20 20 22 46 69 6c 65 20 73 69 7a 65 20 6f 72 20 64 69 72 65 63 74 6f 72 69 65 73 20 66 69	e..."File.size.or.directories.fi
26b80	6c 65 20 63 6f 75 6e 74 20 61 74 20 72 69 67 68 74 20 66 72 69 6e 67 65 2e 22 0a 20 20 3a 69 6e	le.count.at.right.fringe."...:in
26ba0	64 65 78 20 31 0a 20 20 3a 77 68 65 6e 20 28 61 6e 64 20 64 69 72 65 64 2d 68 69 64 65 2d 64 65	dex.1...:when.(and.dired-hide-de
26bc0	74 61 69 6c 73 2d 6d 6f 64 65 20 28 3e 20 77 69 6e 2d 77 69 64 74 68 20 32 35 29 29 0a 20 20 28	tails-mode.(>.win-width.25))...(
26be0	6c 65 74 2a 20 28 28 73 74 72 20 28 63 6f 6e 63 61 74 20 28 64 69 72 76 69 73 68 2d 2d 66 69 6c	let*.((str.(concat.(dirvish--fil
26c00	65 2d 61 74 74 72 2d 73 69 7a 65 20 66 2d 6e 61 6d 65 20 66 2d 61 74 74 72 73 29 29 29 0a 20 20	e-attr-size.f-name.f-attrs)))...
26c20	20 20 20 20 20 20 20 28 66 61 63 65 20 28 6f 72 20 68 6c 2d 66 61 63 65 20 27 64 69 72 76 69 73	.......(face.(or.hl-face.'dirvis
26c40	68 2d 66 69 6c 65 2d 73 69 7a 65 29 29 29 0a 20 20 20 20 28 61 64 64 2d 66 61 63 65 2d 74 65 78	h-file-size))).....(add-face-tex
26c60	74 2d 70 72 6f 70 65 72 74 79 20 30 20 28 6c 65 6e 67 74 68 20 73 74 72 29 20 66 61 63 65 20 74	t-property.0.(length.str).face.t
26c80	20 73 74 72 29 0a 20 20 20 20 60 28 72 69 67 68 74 20 2e 20 2c 73 74 72 29 29 29 0a 0a 28 64 69	.str).....`(right...,str)))..(di
26ca0	72 76 69 73 68 2d 64 65 66 69 6e 65 2d 61 74 74 72 69 62 75 74 65 20 66 69 6c 65 2d 74 69 6d 65	rvish-define-attribute.file-time
26cc0	0a 20 20 22 46 69 6c 65 27 73 20 6d 6f 64 69 66 69 65 64 20 74 69 6d 65 20 61 74 20 72 69 67 68	..."File's.modified.time.at.righ
26ce0	74 20 66 72 69 6e 67 65 20 62 65 66 6f 72 65 20 74 68 65 20 66 69 6c 65 20 73 69 7a 65 2e 22 0a	t.fringe.before.the.file.size.".
26d00	20 20 3a 77 68 65 6e 20 28 61 6e 64 20 64 69 72 65 64 2d 68 69 64 65 2d 64 65 74 61 69 6c 73 2d	..:when.(and.dired-hide-details-
26d20	6d 6f 64 65 20 28 3e 20 77 69 6e 2d 77 69 64 74 68 20 36 30 29 29 0a 20 20 28 6c 65 74 2a 20 28	mode.(>.win-width.60))...(let*.(
26d40	28 73 74 72 20 28 63 6f 6e 63 61 74 20 28 64 69 72 76 69 73 68 2d 2d 66 69 6c 65 2d 61 74 74 72	(str.(concat.(dirvish--file-attr
26d60	2d 74 69 6d 65 20 66 2d 6e 61 6d 65 20 66 2d 61 74 74 72 73 29 29 29 0a 20 20 20 20 20 20 20 20	-time.f-name.f-attrs))).........
26d80	20 28 66 61 63 65 20 28 6f 72 20 68 6c 2d 66 61 63 65 20 27 64 69 72 76 69 73 68 2d 66 69 6c 65	.(face.(or.hl-face.'dirvish-file
26da0	2d 74 69 6d 65 29 29 29 0a 20 20 20 20 28 61 64 64 2d 66 61 63 65 2d 74 65 78 74 2d 70 72 6f 70	-time))).....(add-face-text-prop
26dc0	65 72 74 79 20 30 20 28 6c 65 6e 67 74 68 20 73 74 72 29 20 66 61 63 65 20 74 20 73 74 72 29 0a	erty.0.(length.str).face.t.str).
26de0	20 20 20 20 60 28 72 69 67 68 74 20 2e 20 2c 73 74 72 29 29 29 0a 0a 3b 3b 3b 3b 20 4d 6f 64 65	....`(right...,str)))..;;;;.Mode
26e00	20 6c 69 6e 65 20 73 65 67 6d 65 6e 74 73 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 2d	.line.segments..(defun.dirvish--
26e20	72 65 67 69 73 74 65 72 2d 70 61 74 68 2d 73 65 67 20 28 73 65 67 6d 65 6e 74 20 70 61 74 68 20	register-path-seg.(segment.path.
26e40	66 61 63 65 29 0a 20 20 22 52 65 67 69 73 74 65 72 20 6d 6f 64 65 20 6c 69 6e 65 20 70 61 74 68	face)..."Register.mode.line.path
26e60	20 53 45 47 4d 45 4e 54 20 77 69 74 68 20 74 61 72 67 65 74 20 50 41 54 48 20 61 6e 64 20 46 41	.SEGMENT.with.target.PATH.and.FA
26e80	43 45 2e 22 0a 20 20 28 70 72 6f 70 65 72 74 69 7a 65 0a 20 20 20 73 65 67 6d 65 6e 74 20 27 66	CE."...(propertize....segment.'f
26ea0	61 63 65 20 66 61 63 65 20 27 6d 6f 75 73 65 2d 66 61 63 65 20 27 68 69 67 68 6c 69 67 68 74 0a	ace.face.'mouse-face.'highlight.
26ec0	20 20 20 27 68 65 6c 70 2d 65 63 68 6f 20 22 6d 6f 75 73 65 2d 31 3a 20 76 69 73 69 74 20 74 68	...'help-echo."mouse-1:.visit.th
26ee0	69 73 20 64 69 72 65 63 74 6f 72 79 22 0a 20 20 20 27 6b 65 79 6d 61 70 20 60 28 68 65 61 64 65	is.directory"....'keymap.`(heade
26f00	72 2d 6c 69 6e 65 20 6b 65 79 6d 61 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	r-line.keymap...................
26f20	20 20 20 20 20 20 20 28 6d 6f 75 73 65 2d 31 20 2e 20 28 6c 61 6d 62 64 61 20 28 5f 65 76 29 0a	.......(mouse-1...(lambda.(_ev).
26f40	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	................................
26f60	20 20 20 20 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 65 22 29 0a 20 20 20 20 20 20 20 20	......(interactive."e").........
26f80	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64	..............................(d
26fa0	69 72 76 69 73 68 2d 66 69 6e 64 2d 65 6e 74 72 79 2d 61 20 2c 70 61 74 68 29 29 29 29 29 29 0a	irvish-find-entry-a.,path)))))).
26fc0	0a 28 64 69 72 76 69 73 68 2d 64 65 66 69 6e 65 2d 6d 6f 64 65 2d 6c 69 6e 65 20 70 61 74 68 0a	.(dirvish-define-mode-line.path.
26fe0	20 20 22 50 61 74 68 20 6f 66 20 66 69 6c 65 20 75 6e 64 65 72 20 74 68 65 20 63 75 72 73 6f 72	.."Path.of.file.under.the.cursor
27000	2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 64 69 72 65 63 74 6f 72 79 2d 61 62 62 72 65 76 2d 61 6c	."...(let*.((directory-abbrev-al
27020	69 73 74 20 6e 69 6c 29 20 3b 20 54 4f 44 4f 3a 20 73 75 70 70 6f 72 74 20 63 75 73 74 6f 6d 20	ist.nil).;.TODO:.support.custom.
27040	60 64 69 72 65 63 74 6f 72 79 2d 61 62 62 72 65 76 2d 61 6c 69 73 74 27 0a 20 20 20 20 20 20 20	`directory-abbrev-alist'........
27060	20 20 28 69 6e 64 65 78 20 28 64 69 72 65 64 2d 63 75 72 72 65 6e 74 2d 64 69 72 65 63 74 6f 72	..(index.(dired-current-director
27080	79 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 61 63 65 20 28 69 66 20 28 64 69 72 76 69 73 68 2d	y))..........(face.(if.(dirvish-
270a0	2d 77 69 6e 64 6f 77 2d 73 65 6c 65 63 74 65 64 2d 70 20 64 76 29 20 27 64 69 72 65 64 2d 68 65	-window-selected-p.dv).'dired-he
270c0	61 64 65 72 20 27 73 68 61 64 6f 77 29 29 0a 20 20 20 20 20 20 20 20 20 28 72 6d 74 20 28 64 69	ader.'shadow))..........(rmt.(di
270e0	72 76 69 73 68 2d 70 72 6f 70 20 3a 72 65 6d 6f 74 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 61	rvish-prop.:remote))..........(a
27100	62 76 6e 61 6d 65 20 28 69 66 20 72 6d 74 20 28 66 69 6c 65 2d 6c 6f 63 61 6c 2d 6e 61 6d 65 20	bvname.(if.rmt.(file-local-name.
27120	69 6e 64 65 78 29 20 28 61 62 62 72 65 76 69 61 74 65 2d 66 69 6c 65 2d 6e 61 6d 65 20 69 6e 64	index).(abbreviate-file-name.ind
27140	65 78 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 68 6f 73 74 20 28 70 72 6f 70 65 72 74 69 7a 65	ex)))..........(host.(propertize
27160	20 28 69 66 20 72 6d 74 20 28 63 6f 6e 63 61 74 20 22 20 22 20 28 73 75 62 73 74 72 69 6e 67 20	.(if.rmt.(concat.".".(substring.
27180	72 6d 74 20 31 29 29 20 22 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	rmt.1))."").....................
271a0	20 20 20 20 20 20 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 62 75 69 6c 74 69 6e 2d	.......'face.'font-lock-builtin-
271c0	66 61 63 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 73 65 67 73 20 28 6e 62 75 74 6c 61 73 74 20	face))..........(segs.(nbutlast.
271e0	28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 61 62 76 6e 61 6d 65 20 22 2f 22 29 29 29 0a 20 20 20	(split-string.abvname."/")))....
27200	20 20 20 20 20 20 28 73 63 6f 70 65 20 28 70 63 61 73 65 20 28 63 61 72 20 73 65 67 73 29 0a 20	......(scope.(pcase.(car.segs)..
27220	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 22 7e 22 20 28 64 69 72 76 69 73 68 2d 2d	.................("~".(dirvish--
27240	72 65 67 69 73 74 65 72 2d 70 61 74 68 2d 73 65 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	register-path-seg...............
27260	20 20 20 20 20 20 20 20 20 20 28 6e 74 68 20 30 20 64 69 72 76 69 73 68 2d 70 61 74 68 2d 73 65	..........(nth.0.dirvish-path-se
27280	70 61 72 61 74 6f 72 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	parators).......................
272a0	20 20 28 63 6f 6e 63 61 74 20 72 6d 74 20 22 7e 2f 22 29 20 66 61 63 65 29 29 0a 20 20 20 20 20	..(concat.rmt."~/").face))......
272c0	20 20 20 20 20 20 20 20 20 20 20 20 20 28 22 22 20 28 64 69 72 76 69 73 68 2d 2d 72 65 67 69 73	.............("".(dirvish--regis
272e0	74 65 72 2d 70 61 74 68 2d 73 65 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ter-path-seg....................
27300	20 20 20 20 20 28 6e 74 68 20 31 20 64 69 72 76 69 73 68 2d 70 61 74 68 2d 73 65 70 61 72 61 74	.....(nth.1.dirvish-path-separat
27320	6f 72 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e	ors)........................(con
27340	63 61 74 20 72 6d 74 20 22 2f 22 29 20 66 61 63 65 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 28	cat.rmt."/").face))))..........(
27360	70 61 74 68 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 69 64 78 20 66 72 6f 6d 20 32 0a 20 20 20	path.(cl-loop.for.idx.from.2....
27380	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 73 70 20 3d 20 28 66	.....................for.sp.=.(f
273a0	6f 72 6d 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ormat...........................
273c0	20 20 20 20 20 20 20 20 22 25 73 25 73 22 20 28 6f 72 20 72 6d 74 20 22 22 29 0a 20 20 20 20 20	........"%s%s".(or.rmt."")......
273e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61	.............................(ma
27400	70 63 6f 6e 63 61 74 20 23 27 63 6f 6e 63 61 74 20 28 73 65 71 2d 74 61 6b 65 20 73 65 67 73 20	pconcat.#'concat.(seq-take.segs.
27420	69 64 78 29 20 22 2f 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	idx)."/"))......................
27440	20 20 20 66 6f 72 20 73 20 69 6e 20 28 63 64 72 20 73 65 67 73 29 20 63 6f 6e 63 61 74 0a 20 20	...for.s.in.(cdr.segs).concat...
27460	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 74 20 22 25	......................(format."%
27480	73 25 73 22 20 28 6e 74 68 20 32 20 64 69 72 76 69 73 68 2d 70 61 74 68 2d 73 65 70 61 72 61 74	s%s".(nth.2.dirvish-path-separat
274a0	6f 72 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ors)............................
274c0	20 20 20 20 20 28 64 69 72 76 69 73 68 2d 2d 72 65 67 69 73 74 65 72 2d 70 61 74 68 2d 73 65 67	.....(dirvish--register-path-seg
274e0	20 73 20 73 70 20 66 61 63 65 29 29 29 29 29 0a 20 20 20 20 28 72 65 70 6c 61 63 65 2d 72 65 67	.s.sp.face))))).....(replace-reg
27500	65 78 70 2d 69 6e 2d 73 74 72 69 6e 67 20 22 25 22 20 22 25 25 25 25 22 20 28 66 6f 72 6d 61 74	exp-in-string."%"."%%%%".(format
27520	20 22 25 73 25 73 25 73 20 22 20 68 6f 73 74 20 73 63 6f 70 65 20 70 61 74 68 29 29 29 29 0a 0a	."%s%s%s.".host.scope.path))))..
27540	28 64 69 72 76 69 73 68 2d 64 65 66 69 6e 65 2d 6d 6f 64 65 2d 6c 69 6e 65 20 73 6f 72 74 0a 20	(dirvish-define-mode-line.sort..
27560	20 22 43 75 72 72 65 6e 74 20 73 6f 72 74 20 63 72 69 74 65 72 69 61 2e 22 0a 20 20 28 6c 65 74	."Current.sort.criteria."...(let
27580	2a 20 28 28 73 77 69 74 63 68 65 73 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 64 69 72 65 64	*.((switches.(split-string.dired
275a0	2d 61 63 74 75 61 6c 2d 73 77 69 74 63 68 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 28 63 72 69	-actual-switches))..........(cri
275c0	74 20 28 63 6f 6e 64 20 28 64 69 72 65 64 2d 73 6f 72 74 2d 69 6e 68 69 62 69 74 20 22 44 49 53	t.(cond.(dired-sort-inhibit."DIS
275e0	41 42 4c 45 44 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 6d	ABLED")......................((m
27600	65 6d 62 65 72 20 22 2d 2d 73 6f 72 74 3d 6e 6f 6e 65 22 20 73 77 69 74 63 68 65 73 29 20 22 6e	ember."--sort=none".switches)."n
27620	6f 6e 65 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 6d 65 6d	one")......................((mem
27640	62 65 72 20 22 2d 2d 73 6f 72 74 3d 74 69 6d 65 22 20 73 77 69 74 63 68 65 73 29 20 22 74 69 6d	ber."--sort=time".switches)."tim
27660	65 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 6d 65 6d 62 65	e")......................((membe
27680	72 20 22 2d 2d 73 6f 72 74 3d 76 65 72 73 69 6f 6e 22 20 73 77 69 74 63 68 65 73 29 20 22 76 65	r."--sort=version".switches)."ve
276a0	72 73 69 6f 6e 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 6d	rsion")......................((m
276c0	65 6d 62 65 72 20 22 2d 2d 73 6f 72 74 3d 73 69 7a 65 22 20 73 77 69 74 63 68 65 73 29 20 22 73	ember."--sort=size".switches)."s
276e0	69 7a 65 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 6d 65 6d	ize")......................((mem
27700	62 65 72 20 22 2d 2d 73 6f 72 74 3d 65 78 74 65 6e 73 69 6f 6e 22 20 73 77 69 74 63 68 65 73 29	ber."--sort=extension".switches)
27720	20 22 65 78 74 65 6e 73 69 6f 6e 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	."extension")...................
27740	20 20 20 28 28 6d 65 6d 62 65 72 20 22 2d 2d 73 6f 72 74 3d 77 69 64 74 68 22 20 73 77 69 74 63	...((member."--sort=width".switc
27760	68 65 73 29 20 22 77 69 64 74 68 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	hes)."width")...................
27780	20 20 20 28 74 20 22 6e 61 6d 65 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 74 69 6d 65 20 28	...(t."name")))..........(time.(
277a0	63 6f 6e 64 20 28 28 6d 65 6d 62 65 72 20 22 2d 2d 74 69 6d 65 3d 75 73 65 22 20 73 77 69 74 63	cond.((member."--time=use".switc
277c0	68 65 73 29 20 22 75 73 65 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	hes)."use").....................
277e0	20 28 28 6d 65 6d 62 65 72 20 22 2d 2d 74 69 6d 65 3d 63 74 69 6d 65 22 20 73 77 69 74 63 68 65	.((member."--time=ctime".switche
27800	73 29 20 22 63 74 69 6d 65 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	s)."ctime").....................
27820	20 28 28 6d 65 6d 62 65 72 20 22 2d 2d 74 69 6d 65 3d 62 69 72 74 68 22 20 73 77 69 74 63 68 65	.((member."--time=birth".switche
27840	73 29 20 22 62 69 72 74 68 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	s)."birth").....................
27860	20 28 74 20 22 6d 74 69 6d 65 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 72 65 76 20 28 69 66	.(t."mtime")))..........(rev.(if
27880	20 28 6d 65 6d 62 65 72 20 22 2d 2d 72 65 76 65 72 73 65 22 20 73 77 69 74 63 68 65 73 29 20 22	.(member."--reverse".switches)."
278a0	e2 86 93 22 20 22 e2 86 91 22 29 29 29 0a 20 20 20 20 28 66 6f 72 6d 61 74 20 22 20 25 73 20 25	..."."..."))).....(format.".%s.%
278c0	73 7c 25 73 20 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 72	s\|%s.".............(propertize.r
278e0	65 76 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 63 6f 6e 73 74 61 6e 74 2d 66 61 63	ev.'face.'font-lock-constant-fac
27900	65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 63 72 69 74 20	e).............(propertize.crit.
27920	27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 74 79 70 65 2d 66 61 63 65 29 0a 20 20 20 20	'face.'font-lock-type-face).....
27940	20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 74 69 6d 65 20 27 66 61 63 65 20 27	........(propertize.time.'face.'
27960	66 6f 6e 74 2d 6c 6f 63 6b 2d 64 6f 63 2d 66 61 63 65 29 29 29 29 0a 0a 28 64 69 72 76 69 73 68	font-lock-doc-face))))..(dirvish
27980	2d 64 65 66 69 6e 65 2d 6d 6f 64 65 2d 6c 69 6e 65 20 6f 6d 69 74 0a 20 20 22 41 20 60 64 69 72	-define-mode-line.omit..."A.`dir
279a0	65 64 2d 6f 6d 69 74 2d 6d 6f 64 65 27 20 69 6e 64 69 63 61 74 6f 72 2e 22 0a 20 20 28 61 6e 64	ed-omit-mode'.indicator."...(and
279c0	20 28 62 6f 75 6e 64 2d 61 6e 64 2d 74 72 75 65 2d 70 20 64 69 72 65 64 2d 6f 6d 69 74 2d 6d 6f	.(bound-and-true-p.dired-omit-mo
279e0	64 65 29 0a 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 4f 6d 69 74 22 20 27 66	de)........(propertize."Omit".'f
27a00	61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 6e 65 67 61 74 69 6f 6e 2d 63 68 61 72 2d 66 61 63	ace.'font-lock-negation-char-fac
27a20	65 29 29 29 0a 0a 28 64 69 72 76 69 73 68 2d 64 65 66 69 6e 65 2d 6d 6f 64 65 2d 6c 69 6e 65 20	e)))..(dirvish-define-mode-line.
27a40	73 79 6d 6c 69 6e 6b 0a 20 20 22 53 68 6f 77 20 74 68 65 20 74 72 75 65 6e 61 6d 65 20 6f 66 20	symlink..."Show.the.truename.of.
27a60	73 79 6d 6c 69 6e 6b 20 66 69 6c 65 20 75 6e 64 65 72 20 74 68 65 20 63 75 72 73 6f 72 2e 22 0a	symlink.file.under.the.cursor.".
27a80	20 20 28 77 68 65 6e 2d 6c 65 74 2a 20 28 28 6e 61 6d 65 20 28 64 69 72 76 69 73 68 2d 70 72 6f	..(when-let*.((name.(dirvish-pro
27aa0	70 20 3a 69 6e 64 65 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 72 75 65 6e 61	p.:index))...............(truena
27ac0	6d 65 20 28 63 64 72 20 28 64 69 72 76 69 73 68 2d 61 74 74 72 69 62 75 74 65 2d 63 61 63 68 65	me.(cdr.(dirvish-attribute-cache
27ae0	20 6e 61 6d 65 20 3a 74 79 70 65 29 29 29 29 0a 20 20 20 20 28 66 6f 72 6d 61 74 20 22 20 25 73	.name.:type)))).....(format.".%s
27b00	20 25 73 20 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 e2	.%s.".............(propertize.".
27b20	86 92 22 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 63 6f 6d 6d 65 6e 74 2d 64 65 6c	..".'face.'font-lock-comment-del
27b40	69 6d 69 74 65 72 2d 66 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72	imiter-face).............(proper
27b60	74 69 7a 65 20 74 72 75 65 6e 61 6d 65 20 27 66 61 63 65 20 27 64 69 72 65 64 2d 73 79 6d 6c 69	tize.truename.'face.'dired-symli
27b80	6e 6b 29 29 29 29 0a 0a 28 64 69 72 76 69 73 68 2d 64 65 66 69 6e 65 2d 6d 6f 64 65 2d 6c 69 6e	nk))))..(dirvish-define-mode-lin
27ba0	65 20 69 6e 64 65 78 0a 20 20 22 43 75 72 72 65 6e 74 20 66 69 6c 65 27 73 20 69 6e 64 65 78 20	e.index..."Current.file's.index.
27bc0	61 6e 64 20 74 6f 74 61 6c 20 66 69 6c 65 73 20 63 6f 75 6e 74 2e 22 0a 20 20 28 6c 65 74 20 28	and.total.files.count."...(let.(
27be0	28 63 75 72 2d 70 6f 73 20 28 2d 20 28 6c 69 6e 65 2d 6e 75 6d 62 65 72 2d 61 74 2d 70 6f 73 20	(cur-pos.(-.(line-number-at-pos.
27c00	28 70 6f 69 6e 74 29 29 20 31 29 29 0a 20 20 20 20 20 20 20 20 28 66 69 6e 2d 70 6f 73 20 28 6e	(point)).1)).........(fin-pos.(n
27c20	75 6d 62 65 72 2d 74 6f 2d 73 74 72 69 6e 67 20 28 2d 20 28 6c 69 6e 65 2d 6e 75 6d 62 65 72 2d	umber-to-string.(-.(line-number-
27c40	61 74 2d 70 6f 73 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 20 32 29 29 29 29 0a 20 20 20 20 28 66	at-pos.(point-max)).2)))).....(f
27c60	6f 72 6d 61 74 20 22 20 25 64 20 2f 20 25 73 20 22 20 63 75 72 2d 70 6f 73 20 28 70 72 6f 70 65	ormat.".%d./.%s.".cur-pos.(prope
27c80	72 74 69 7a 65 20 66 69 6e 2d 70 6f 73 20 27 66 61 63 65 20 27 62 6f 6c 64 29 29 29 29 0a 0a 28	rtize.fin-pos.'face.'bold))))..(
27ca0	64 69 72 76 69 73 68 2d 64 65 66 69 6e 65 2d 6d 6f 64 65 2d 6c 69 6e 65 20 66 72 65 65 2d 73 70	dirvish-define-mode-line.free-sp
27cc0	61 63 65 0a 20 20 22 41 6d 6f 75 6e 74 20 6f 66 20 66 72 65 65 20 73 70 61 63 65 20 6f 6e 20 60	ace..."Amount.of.free.space.on.`
27ce0	64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 27 27 73 20 66 69 6c 65 20 73 79 73 74 65 6d	default-directory''s.file.system
27d00	2e 22 0a 20 20 28 6c 65 74 20 28 28 66 72 65 65 2d 73 70 61 63 65 20 28 6f 72 20 28 64 69 72 76	."...(let.((free-space.(or.(dirv
27d20	69 73 68 2d 70 72 6f 70 20 3a 66 72 65 65 2d 73 70 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 20	ish-prop.:free-space)...........
27d40	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 65 74 2d 66 72 65 65 2d 64 69 73 6b 2d 73 70 61	..............(get-free-disk-spa
27d60	63 65 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 20 22 22 29 29 29 0a 20 20 20 20	ce.default-directory).""))).....
27d80	28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 66 72 65 65 2d 73 70 61 63 65 20 66 72 65 65 2d 73	(dirvish-prop.:free-space.free-s
27da0	70 61 63 65 29 0a 20 20 20 20 28 66 6f 72 6d 61 74 20 22 20 25 73 20 25 73 20 22 20 28 70 72 6f	pace).....(format.".%s.%s.".(pro
27dc0	70 65 72 74 69 7a 65 20 66 72 65 65 2d 73 70 61 63 65 20 27 66 61 63 65 20 27 64 69 72 76 69 73	pertize.free-space.'face.'dirvis
27de0	68 2d 66 72 65 65 2d 73 70 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65	h-free-space).............(prope
27e00	72 74 69 7a 65 20 22 66 72 65 65 22 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 64 6f	rtize."free".'face.'font-lock-do
27e20	63 2d 66 61 63 65 29 29 29 29 0a 0a 28 64 69 72 76 69 73 68 2d 64 65 66 69 6e 65 2d 6d 6f 64 65	c-face))))..(dirvish-define-mode
27e40	2d 6c 69 6e 65 20 66 69 6c 65 2d 6c 69 6e 6b 2d 6e 75 6d 62 65 72 0a 20 20 22 4e 75 6d 62 65 72	-line.file-link-number..."Number
27e60	20 6f 66 20 6c 69 6e 6b 73 20 74 6f 20 66 69 6c 65 2e 22 0a 20 20 28 64 69 72 76 69 73 68 2d 2d	.of.links.to.file."...(dirvish--
27e80	66 6f 72 6d 61 74 2d 66 69 6c 65 2d 61 74 74 72 20 27 6c 69 6e 6b 2d 6e 75 6d 62 65 72 29 29 0a	format-file-attr.'link-number)).
27ea0	0a 28 64 69 72 76 69 73 68 2d 64 65 66 69 6e 65 2d 6d 6f 64 65 2d 6c 69 6e 65 20 66 69 6c 65 2d	.(dirvish-define-mode-line.file-
27ec0	75 73 65 72 0a 20 20 22 55 73 65 72 20 6e 61 6d 65 20 6f 66 20 66 69 6c 65 2e 22 0a 20 20 28 77	user..."User.name.of.file."...(w
27ee0	68 65 6e 2d 6c 65 74 2a 20 28 28 6e 61 6d 65 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 69	hen-let*.((name.(dirvish-prop.:i
27f00	6e 64 65 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 74 74 72 73 20 28 64 69 72	ndex))...............(attrs.(dir
27f20	76 69 73 68 2d 61 74 74 72 69 62 75 74 65 2d 63 61 63 68 65 20 6e 61 6d 65 20 3a 62 75 69 6c 74	vish-attribute-cache.name.:built
27f40	69 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 69 64 20 28 61 6e 64 20 61 74 74	in))...............(uid.(and.att
27f60	72 73 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 2d 75 73 65 72 2d 69 64 20 61 74 74 72 73	rs.(file-attribute-user-id.attrs
27f80	29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 61 6d 65 20 28 69 66 20 28 64 69	)))...............(uname.(if.(di
27fa0	72 76 69 73 68 2d 70 72 6f 70 20 3a 72 65 6d 6f 74 65 29 20 75 69 64 20 28 75 73 65 72 2d 6c 6f	rvish-prop.:remote).uid.(user-lo
27fc0	67 69 6e 2d 6e 61 6d 65 20 75 69 64 29 29 29 29 0a 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65	gin-name.uid)))).....(propertize
27fe0	20 75 6e 61 6d 65 20 27 66 61 63 65 20 27 64 69 72 76 69 73 68 2d 66 69 6c 65 2d 75 73 65 72 2d	.uname.'face.'dirvish-file-user-
28000	69 64 29 29 29 0a 0a 28 64 69 72 76 69 73 68 2d 64 65 66 69 6e 65 2d 6d 6f 64 65 2d 6c 69 6e 65	id)))..(dirvish-define-mode-line
28020	20 66 69 6c 65 2d 67 72 6f 75 70 0a 20 20 22 47 72 6f 75 70 20 6e 61 6d 65 20 6f 66 20 66 69 6c	.file-group..."Group.name.of.fil
28040	65 2e 22 0a 20 20 28 77 68 65 6e 2d 6c 65 74 2a 20 28 28 6e 61 6d 65 20 28 64 69 72 76 69 73 68	e."...(when-let*.((name.(dirvish
28060	2d 70 72 6f 70 20 3a 69 6e 64 65 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 74	-prop.:index))...............(at
28080	74 72 73 20 28 64 69 72 76 69 73 68 2d 61 74 74 72 69 62 75 74 65 2d 63 61 63 68 65 20 6e 61 6d	trs.(dirvish-attribute-cache.nam
280a0	65 20 3a 62 75 69 6c 74 69 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 69 64 20	e.:builtin))...............(gid.
280c0	28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 2d 67 72 6f 75 70 2d 69 64 20 61 74 74 72 73 29 29	(file-attribute-group-id.attrs))
280e0	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6e 61 6d 65 20 28 69 66 20 28 64 69 72 76 69	...............(gname.(if.(dirvi
28100	73 68 2d 70 72 6f 70 20 3a 72 65 6d 6f 74 65 29 20 67 69 64 20 28 67 72 6f 75 70 2d 6e 61 6d 65	sh-prop.:remote).gid.(group-name
28120	20 67 69 64 29 29 29 29 0a 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 67 6e 61 6d 65 20 27	.gid)))).....(propertize.gname.'
28140	66 61 63 65 20 27 64 69 72 76 69 73 68 2d 66 69 6c 65 2d 67 72 6f 75 70 2d 69 64 29 29 29 0a 0a	face.'dirvish-file-group-id)))..
28160	28 64 69 72 76 69 73 68 2d 64 65 66 69 6e 65 2d 6d 6f 64 65 2d 6c 69 6e 65 20 66 69 6c 65 2d 74	(dirvish-define-mode-line.file-t
28180	69 6d 65 0a 20 20 22 4c 61 73 74 20 6d 6f 64 69 66 69 63 61 74 69 6f 6e 20 74 69 6d 65 20 6f 66	ime..."Last.modification.time.of
281a0	20 66 69 6c 65 2e 22 0a 20 20 28 77 68 65 6e 2d 6c 65 74 2a 20 28 28 6e 61 6d 65 20 28 64 69 72	.file."...(when-let*.((name.(dir
281c0	76 69 73 68 2d 70 72 6f 70 20 3a 69 6e 64 65 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	vish-prop.:index))..............
281e0	20 28 61 74 74 72 73 20 28 64 69 72 76 69 73 68 2d 61 74 74 72 69 62 75 74 65 2d 63 61 63 68 65	.(attrs.(dirvish-attribute-cache
28200	20 6e 61 6d 65 20 3a 62 75 69 6c 74 69 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	.name.:builtin))...............(
28220	66 2d 6d 74 69 6d 65 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 2d 6d 6f 64 69 66 69 63 61	f-mtime.(file-attribute-modifica
28240	74 69 6f 6e 2d 74 69 6d 65 20 61 74 74 72 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	tion-time.attrs))...............
28260	28 74 69 6d 65 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20	(time-string................(if.
28280	28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 72 65 6d 6f 74 65 29 20 66 2d 6d 74 69 6d 65 0a 20	(dirvish-prop.:remote).f-mtime..
282a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 2d 74 69 6d 65 2d 73 74 72	................(format-time-str
282c0	69 6e 67 20 64 69 72 76 69 73 68 2d 74 69 6d 65 2d 66 6f 72 6d 61 74 2d 73 74 72 69 6e 67 20 66	ing.dirvish-time-format-string.f
282e0	2d 6d 74 69 6d 65 29 29 29 29 0a 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 22 20 28 70 72 6f	-mtime)))).....(format."%s".(pro
28300	70 65 72 74 69 7a 65 20 74 69 6d 65 2d 73 74 72 69 6e 67 20 27 66 61 63 65 20 27 64 69 72 76 69	pertize.time-string.'face.'dirvi
28320	73 68 2d 66 69 6c 65 2d 74 69 6d 65 29 29 29 29 0a 0a 28 64 69 72 76 69 73 68 2d 64 65 66 69 6e	sh-file-time))))..(dirvish-defin
28340	65 2d 6d 6f 64 65 2d 6c 69 6e 65 20 66 69 6c 65 2d 73 69 7a 65 0a 20 20 22 46 69 6c 65 20 73 69	e-mode-line.file-size..."File.si
28360	7a 65 20 6f 66 20 66 69 6c 65 73 20 6f 72 20 66 69 6c 65 20 63 6f 75 6e 74 20 6f 66 20 64 69 72	ze.of.files.or.file.count.of.dir
28380	65 63 74 6f 72 69 65 73 2e 22 0a 20 20 28 77 68 65 6e 2d 6c 65 74 2a 20 28 28 6e 61 6d 65 20 28	ectories."...(when-let*.((name.(
283a0	64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 69 6e 64 65 78 29 29 0a 20 20 20 20 20 20 20 20 20 20	dirvish-prop.:index))...........
283c0	20 20 20 20 28 61 74 74 72 73 20 28 64 69 72 76 69 73 68 2d 61 74 74 72 69 62 75 74 65 2d 63 61	....(attrs.(dirvish-attribute-ca
283e0	63 68 65 20 6e 61 6d 65 20 3a 62 75 69 6c 74 69 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	che.name.:builtin)).............
28400	20 20 28 73 69 7a 65 20 28 64 69 72 76 69 73 68 2d 2d 66 69 6c 65 2d 61 74 74 72 2d 73 69 7a 65	..(size.(dirvish--file-attr-size
28420	20 6e 61 6d 65 20 61 74 74 72 73 29 29 29 0a 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 22 20	.name.attrs))).....(format."%s".
28440	28 70 72 6f 70 65 72 74 69 7a 65 20 73 69 7a 65 20 27 66 61 63 65 20 27 64 69 72 76 69 73 68 2d	(propertize.size.'face.'dirvish-
28460	66 69 6c 65 2d 73 69 7a 65 29 29 29 29 0a 0a 28 64 69 72 76 69 73 68 2d 64 65 66 69 6e 65 2d 6d	file-size))))..(dirvish-define-m
28480	6f 64 65 2d 6c 69 6e 65 20 66 69 6c 65 2d 6d 6f 64 65 73 0a 20 20 22 46 69 6c 65 20 6d 6f 64 65	ode-line.file-modes..."File.mode
284a0	73 2c 20 61 73 20 61 20 73 74 72 69 6e 67 20 6f 66 20 74 65 6e 20 6c 65 74 74 65 72 73 20 6f 72	s,.as.a.string.of.ten.letters.or
284c0	20 64 61 73 68 65 73 20 61 73 20 69 6e 20 6c 73 20 2d 6c 2e 22 0a 20 20 28 64 69 72 76 69 73 68	.dashes.as.in.ls.-l."...(dirvish
284e0	2d 2d 66 6f 72 6d 61 74 2d 66 69 6c 65 2d 61 74 74 72 20 27 6d 6f 64 65 73 29 29 0a 0a 28 64 69	--format-file-attr.'modes))..(di
28500	72 76 69 73 68 2d 64 65 66 69 6e 65 2d 6d 6f 64 65 2d 6c 69 6e 65 20 66 69 6c 65 2d 69 6e 6f 64	rvish-define-mode-line.file-inod
28520	65 2d 6e 75 6d 62 65 72 0a 20 20 22 46 69 6c 65 27 73 20 69 6e 6f 64 65 20 6e 75 6d 62 65 72 2c	e-number..."File's.inode.number,
28540	20 61 73 20 61 20 6e 6f 6e 6e 65 67 61 74 69 76 65 20 69 6e 74 65 67 65 72 2e 22 0a 20 20 28 64	.as.a.nonnegative.integer."...(d
28560	69 72 76 69 73 68 2d 2d 66 6f 72 6d 61 74 2d 66 69 6c 65 2d 61 74 74 72 20 27 69 6e 6f 64 65 2d	irvish--format-file-attr.'inode-
28580	6e 75 6d 62 65 72 29 29 0a 0a 28 64 69 72 76 69 73 68 2d 64 65 66 69 6e 65 2d 6d 6f 64 65 2d 6c	number))..(dirvish-define-mode-l
285a0	69 6e 65 20 66 69 6c 65 2d 64 65 76 69 63 65 2d 6e 75 6d 62 65 72 0a 20 20 22 46 69 6c 65 73 79	ine.file-device-number..."Filesy
285c0	73 74 65 6d 20 64 65 76 69 63 65 20 6e 75 6d 62 65 72 2c 20 61 73 20 61 6e 20 69 6e 74 65 67 65	stem.device.number,.as.an.intege
285e0	72 2e 22 0a 20 20 28 64 69 72 76 69 73 68 2d 2d 66 6f 72 6d 61 74 2d 66 69 6c 65 2d 61 74 74 72	r."...(dirvish--format-file-attr
28600	20 27 64 65 76 69 63 65 2d 6e 75 6d 62 65 72 29 29 0a 0a 3b 3b 3b 3b 20 50 72 65 76 69 65 77 20	.'device-number))..;;;;.Preview.
28620	64 69 73 70 61 74 63 68 65 72 73 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 64 69 72 76 69	dispatchers..(cl-defmethod.dirvi
28640	73 68 2d 62 75 69 6c 64 2d 63 61 63 68 65 20 28 26 63 6f 6e 74 65 78 74 20 28 28 64 69 73 70 6c	sh-build-cache.(&context.((displ
28660	61 79 2d 67 72 61 70 68 69 63 2d 70 29 20 28 65 71 6c 20 74 29 29 29 0a 20 20 22 43 61 63 68 65	ay-graphic-p).(eql.t)))..."Cache
28680	20 69 6d 61 67 65 2f 76 69 64 65 6f 2d 74 68 75 6d 62 6e 61 69 6c 20 77 68 65 6e 20 60 44 49 53	.image/video-thumbnail.when.`DIS
286a0	50 4c 41 59 2d 47 52 41 50 48 49 43 2d 50 27 2e 22 0a 20 20 28 77 68 65 6e 2d 6c 65 74 2a 20 28	PLAY-GRAPHIC-P'."...(when-let*.(
286c0	28 64 76 20 28 64 69 72 76 69 73 68 2d 63 75 72 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	(dv.(dirvish-curr)).............
286e0	20 20 28 28 6e 6f 74 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 72 65 6d 6f 74 65 29 29 29	..((not.(dirvish-prop.:remote)))
28700	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 63 61 72 20 28 64 76 2d 6c 61 79 6f 75 74 20	...............((car.(dv-layout.
28720	64 76 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 6e 20 28 64 76 2d 70 72 65	dv)))...............(win.(dv-pre
28740	76 69 65 77 2d 77 69 6e 64 6f 77 20 64 76 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	view-window.dv))...............(
28760	28 77 69 6e 64 6f 77 2d 6c 69 76 65 2d 70 20 77 69 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20	(window-live-p.win))............
28780	20 20 20 28 77 69 64 74 68 20 28 77 69 6e 64 6f 77 2d 77 69 64 74 68 20 77 69 6e 29 29 0a 20 20	...(width.(window-width.win))...
287a0	20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 73 20 28 68 61 73 68 2d 74 61 62 6c 65 2d 6b	............(files.(hash-table-k
287c0	65 79 73 20 64 69 72 76 69 73 68 2d 2d 61 74 74 72 73 2d 68 61 73 68 29 29 0a 20 20 20 20 20 20	eys.dirvish--attrs-hash)).......
287e0	20 20 20 20 20 20 20 20 28 28 3c 20 28 6c 65 6e 67 74 68 20 66 69 6c 65 73 29 0a 20 20 20 20 20	........((<.(length.files)......
28800	20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 63 61 72 20 64 69 72 76 69 73 68 2d 6d 65	.............(or.(car.dirvish-me
28820	64 69 61 2d 61 75 74 6f 2d 63 61 63 68 65 2d 74 68 72 65 73 68 6f 6c 64 29 20 30 29 29 29 29 0a	dia-auto-cache-threshold).0)))).
28840	20 20 20 20 28 63 6c 2d 6c 6f 6f 70 0a 20 20 20 20 20 77 69 74 68 20 66 6e 73 20 3d 20 27 28 64	....(cl-loop......with.fns.=.'(d
28860	69 72 76 69 73 68 2d 69 6d 61 67 65 2d 64 70 20 64 69 72 76 69 73 68 2d 76 69 64 65 6f 2d 64 70	irvish-image-dp.dirvish-video-dp
28880	20 64 69 72 76 69 73 68 2d 65 70 75 62 2d 64 70 29 0a 20 20 20 20 20 66 6f 72 20 66 69 6c 65 20	.dirvish-epub-dp)......for.file.
288a0	69 6e 20 28 64 69 72 65 63 74 6f 72 79 2d 66 69 6c 65 73 20 64 65 66 61 75 6c 74 2d 64 69 72 65	in.(directory-files.default-dire
288c0	63 74 6f 72 79 20 74 29 0a 20 20 20 20 20 66 6f 72 20 65 78 74 20 3d 20 28 64 6f 77 6e 63 61 73	ctory.t)......for.ext.=.(downcas
288e0	65 20 28 6f 72 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 65 78 74 65 6e 73 69 6f 6e 20 66 69 6c 65 29	e.(or.(file-name-extension.file)
28900	20 22 22 29 29 0a 20 20 20 20 20 66 6f 72 20 28 63 6d 64 20 2e 20 61 72 67 73 29 20 3d 20 28 63	.""))......for.(cmd...args).=.(c
28920	6c 2d 6c 6f 6f 70 20 66 6f 72 20 66 6e 20 69 6e 20 66 6e 73 0a 20 20 20 20 20 20 20 20 20 20 20	l-loop.for.fn.in.fns............
28940	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 28 6b 20 2e 20 76	......................for.(k...v
28960	29 20 3d 20 28 66 75 6e 63 61 6c 6c 20 66 6e 20 66 69 6c 65 20 65 78 74 20 77 69 6e 20 64 76 29	).=.(funcall.fn.file.ext.win.dv)
28980	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	................................
289a0	20 20 74 68 65 72 65 69 73 20 28 61 6e 64 20 28 65 71 20 6b 20 27 63 61 63 68 65 29 20 76 29 29	..thereis.(and.(eq.k.'cache).v))
289c0	0a 20 20 20 20 20 77 68 65 6e 20 63 6d 64 20 64 6f 20 28 70 75 73 68 20 28 63 6f 6e 73 20 28 66	......when.cmd.do.(push.(cons.(f
289e0	6f 72 6d 61 74 20 22 25 73 2d 25 73 2d 69 6d 67 2d 63 61 63 68 65 22 20 66 69 6c 65 20 77 69 64	ormat."%s-%s-img-cache".file.wid
28a00	74 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	th).............................
28a20	20 28 6c 69 73 74 20 66 69 6c 65 20 77 69 64 74 68 20 63 6d 64 20 61 72 67 73 29 29 0a 20 20 20	.(list.file.width.cmd.args))....
28a40	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 76 69 73 68 2d 6d 65 64 69	....................dirvish-medi
28a60	61 2d 2d 63 61 63 68 65 2d 70 6f 6f 6c 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64	a--cache-pool))))..(cl-defmethod
28a80	20 64 69 72 76 69 73 68 2d 63 6c 65 61 6e 2d 63 61 63 68 65 20 28 26 63 6f 6e 74 65 78 74 20 28	.dirvish-clean-cache.(&context.(
28aa0	28 64 69 73 70 6c 61 79 2d 67 72 61 70 68 69 63 2d 70 29 20 28 65 71 6c 20 74 29 29 29 0a 20 20	(display-graphic-p).(eql.t)))...
28ac0	22 43 6c 65 61 6e 20 63 61 63 68 65 20 69 6d 61 67 65 73 20 66 6f 72 20 6d 61 72 6b 65 64 20 66	"Clean.cache.images.for.marked.f
28ae0	69 6c 65 73 20 77 68 65 6e 20 60 44 49 53 50 4c 41 59 2d 47 52 41 50 48 49 43 2d 50 27 2e 22 0a	iles.when.`DISPLAY-GRAPHIC-P'.".
28b00	20 20 28 77 68 65 6e 2d 6c 65 74 2a 20 28 28 77 69 6e 20 28 64 76 2d 70 72 65 76 69 65 77 2d 77	..(when-let*.((win.(dv-preview-w
28b20	69 6e 64 6f 77 20 28 64 69 72 76 69 73 68 2d 63 75 72 72 29 29 29 0a 20 20 20 20 20 20 20 20 20	indow.(dirvish-curr)))..........
28b40	20 20 20 20 20 28 73 69 7a 65 20 28 61 6e 64 20 28 77 69 6e 64 6f 77 2d 6c 69 76 65 2d 70 20 77	.....(size.(and.(window-live-p.w
28b60	69 6e 29 20 28 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 69 6d 67 2d 73 69 7a 65 20 77 69 6e	in).(dirvish-media--img-size.win
28b80	29 29 29 29 0a 20 20 20 20 28 63 6c 65 61 72 2d 69 6d 61 67 65 2d 63 61 63 68 65 29 0a 20 20 20	)))).....(clear-image-cache)....
28ba0	20 28 73 65 74 71 20 73 69 7a 65 20 28 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 69 6d 67 2d	.(setq.size.(dirvish-media--img-
28bc0	73 69 7a 65 20 77 69 6e 29 29 0a 20 20 20 20 28 64 6f 6c 69 73 74 20 28 66 69 6c 65 20 28 64 69	size.win)).....(dolist.(file.(di
28be0	72 65 64 2d 67 65 74 2d 6d 61 72 6b 65 64 2d 66 69 6c 65 73 29 29 0a 20 20 20 20 20 20 28 6d 61	red-get-marked-files)).......(ma
28c00	70 63 20 23 27 64 65 6c 65 74 65 2d 66 69 6c 65 20 28 66 69 6c 65 2d 65 78 70 61 6e 64 2d 77 69	pc.#'delete-file.(file-expand-wi
28c20	6c 64 63 61 72 64 73 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	ldcards.........................
28c40	20 20 20 28 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 63 61 63 68 65 2d 70 61 74 68 0a 20 20	...(dirvish-media--cache-path...
28c60	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 66 69 6c 65 20 28	..........................file.(
28c80	66 6f 72 6d 61 74 20 22 69 6d 61 67 65 73 2f 25 73 22 20 73 69 7a 65 29 20 22 2e 2a 22 20 74 29	format."images/%s".size).".*".t)
28ca0	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 74 29 29 29	............................t)))
28cc0	29 29 0a 0a 28 63 6c 2d 64 65 66 67 65 6e 65 72 69 63 20 64 69 72 76 69 73 68 2d 6d 65 64 69 61	))..(cl-defgeneric.dirvish-media
28ce0	2d 6d 65 74 61 64 61 74 61 20 28 66 69 6c 65 29 0a 20 20 22 47 65 74 20 6d 65 64 69 61 20 66 69	-metadata.(file)..."Get.media.fi
28d00	6c 65 20 46 49 4c 45 27 73 20 6d 65 74 61 64 61 74 61 2e 22 29 0a 0a 28 63 6c 2d 64 65 66 6d 65	le.FILE's.metadata.")..(cl-defme
28d20	74 68 6f 64 20 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 6d 65 74 61 64 61 74 61 20 28 28 66 69	thod.dirvish-media-metadata.((fi
28d40	6c 65 20 28 68 65 61 64 20 69 6d 61 67 65 29 29 29 0a 20 20 22 47 65 74 20 6d 65 74 61 64 61 74	le.(head.image)))..."Get.metadat
28d60	61 20 66 6f 72 20 69 6d 61 67 65 20 46 49 4c 45 2e 22 0a 20 20 28 6c 65 74 20 28 28 6d 69 6e 66	a.for.image.FILE."...(let.((minf
28d80	6f 20 28 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 6d 65 74 61 64 61 74 61 2d 66 72 6f 6d 2d	o.(dirvish-media--metadata-from-
28da0	6d 65 64 69 61 69 6e 66 6f 20 28 63 64 72 20 66 69 6c 65 29 29 29 29 0a 20 20 20 20 28 66 6f 72	mediainfo.(cdr.file)))).....(for
28dc0	6d 61 74 20 22 25 73 25 73 5c 6e 25 73 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69	mat."%s%s\n%s%s".............(di
28de0	72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 67 72 6f 75 70 2d 68 65 61 64 69 6e 67 20 27 28 22 49 6d	rvish-media--group-heading.'("Im
28e00	61 67 65 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 6d 65 64 69	age")).............(dirvish-medi
28e20	61 2d 2d 66 6f 72 6d 61 74 2d 6d 65 74 61 64 61 74 61 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	a--format-metadata..............
28e40	6d 69 6e 66 6f 20 27 28 57 69 64 74 68 20 48 65 69 67 68 74 20 43 6f 6c 6f 72 2d 73 70 61 63 65	minfo.'(Width.Height.Color-space
28e60	20 43 68 72 6f 6d 61 2d 73 75 62 73 61 6d 70 6c 69 6e 67 20 42 69 74 2d 64 65 70 74 68 20 43 6f	.Chroma-subsampling.Bit-depth.Co
28e80	6d 70 72 65 73 73 69 6f 6e 2d 6d 6f 64 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69	mpression-mode)).............(di
28ea0	72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 67 72 6f 75 70 2d 68 65 61 64 69 6e 67 20 27 28 22 47 65	rvish-media--group-heading.'("Ge
28ec0	6e 65 72 61 6c 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 6d 65	neral")).............(dirvish-me
28ee0	64 69 61 2d 2d 66 6f 72 6d 61 74 2d 6d 65 74 61 64 61 74 61 20 6d 69 6e 66 6f 20 27 28 46 75 6c	dia--format-metadata.minfo.'(Ful
28f00	6c 2d 6e 61 6d 65 20 46 6f 72 6d 61 74 20 46 69 6c 65 2d 73 69 7a 65 29 29 29 29 29 0a 0a 28 63	l-name.Format.File-size)))))..(c
28f20	6c 2d 64 65 66 6d 65 74 68 6f 64 20 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 6d 65 74 61 64 61	l-defmethod.dirvish-media-metada
28f40	74 61 20 28 28 66 69 6c 65 20 28 68 65 61 64 20 76 69 64 65 6f 29 29 29 0a 20 20 22 47 65 74 20	ta.((file.(head.video)))..."Get.
28f60	6d 65 74 61 64 61 74 61 20 66 6f 72 20 76 69 64 65 6f 20 46 49 4c 45 2e 22 0a 20 20 28 6c 65 74	metadata.for.video.FILE."...(let
28f80	20 28 28 6d 69 6e 66 6f 20 28 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 6d 65 74 61 64 61 74	.((minfo.(dirvish-media--metadat
28fa0	61 2d 66 72 6f 6d 2d 6d 65 64 69 61 69 6e 66 6f 20 28 63 64 72 20 66 69 6c 65 29 29 29 29 0a 20	a-from-mediainfo.(cdr.file))))..
28fc0	20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 25 73 5c 6e 25 73 25 73 5c 6e 25 73 25 73 22 0a 20 20	...(format."%s%s\n%s%s\n%s%s"...
28fe0	20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 67 72 6f 75 70 2d	..........(dirvish-media--group-
29000	68 65 61 64 69 6e 67 20 27 28 22 47 65 6e 65 72 61 6c 22 29 29 0a 20 20 20 20 20 20 20 20 20 20	heading.'("General"))...........
29020	20 20 28 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 66 6f 72 6d 61 74 2d 6d 65 74 61 64 61 74	..(dirvish-media--format-metadat
29040	61 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 6d 69 6e 66 6f 20 27 28 46 75 6c 6c 2d 6e 61 6d 65	a..............minfo.'(Full-name
29060	20 46 6f 72 6d 61 74 20 46 69 6c 65 2d 73 69 7a 65 20 44 75 72 61 74 69 6f 6e 29 29 0a 20 20 20	.Format.File-size.Duration))....
29080	20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 67 72 6f 75 70 2d 68	.........(dirvish-media--group-h
290a0	65 61 64 69 6e 67 20 27 28 22 56 69 64 65 6f 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28	eading.'("Video")).............(
290c0	64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 66 6f 72 6d 61 74 2d 6d 65 74 61 64 61 74 61 0a 20	dirvish-media--format-metadata..
290e0	20 20 20 20 20 20 20 20 20 20 20 20 6d 69 6e 66 6f 20 27 28 52 65 73 6f 6c 75 74 69 6f 6e 20 56	............minfo.'(Resolution.V
29100	69 64 65 6f 2d 63 6f 64 65 63 20 46 72 61 6d 65 72 61 74 65 20 56 69 64 65 6f 2d 62 69 74 72 61	ideo-codec.Framerate.Video-bitra
29120	74 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d	te)).............(dirvish-media-
29140	2d 67 72 6f 75 70 2d 68 65 61 64 69 6e 67 20 27 28 22 41 75 64 69 6f 22 29 29 0a 20 20 20 20 20	-group-heading.'("Audio"))......
29160	20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 66 6f 72 6d 61 74 2d 6d 65	.......(dirvish-media--format-me
29180	74 61 64 61 74 61 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 6d 69 6e 66 6f 20 27 28 41 75 64 69	tadata..............minfo.'(Audi
291a0	6f 2d 63 6f 64 65 63 20 41 75 64 69 6f 2d 62 69 74 72 61 74 65 20 41 75 64 69 6f 2d 73 61 6d 70	o-codec.Audio-bitrate.Audio-samp
291c0	6c 69 6e 67 2d 72 61 74 65 20 41 75 64 69 6f 2d 63 68 61 6e 6e 65 6c 73 29 29 29 29 29 0a 0a 28	ling-rate.Audio-channels)))))..(
291e0	63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 6d 65 74 61 64	cl-defmethod.dirvish-media-metad
29200	61 74 61 20 28 28 66 69 6c 65 20 28 68 65 61 64 20 70 64 66 29 29 29 0a 20 20 22 47 65 74 20 6d	ata.((file.(head.pdf)))..."Get.m
29220	65 74 61 64 61 74 61 20 66 6f 72 20 70 64 66 20 46 49 4c 45 2e 22 0a 20 20 28 66 6f 72 6d 61 74	etadata.for.pdf.FILE."...(format
29240	20 22 25 73 25 73 22 20 28 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 67 72 6f 75 70 2d 68 65	."%s%s".(dirvish-media--group-he
29260	61 64 69 6e 67 20 27 28 22 50 44 46 20 69 6e 66 6f 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 28	ading.'("PDF.info"))...........(
29280	64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 6d 65 74 61 64 61 74 61 2d 66 72 6f 6d 2d 70 64 66	dirvish-media--metadata-from-pdf
292a0	69 6e 66 6f 20 28 63 64 72 20 66 69 6c 65 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f	info.(cdr.file))))..(cl-defmetho
292c0	64 20 64 69 72 76 69 73 68 2d 70 72 65 76 69 65 77 2d 64 69 73 70 61 74 63 68 20 28 28 72 65 63	d.dirvish-preview-dispatch.((rec
292e0	69 70 65 20 28 68 65 61 64 20 69 6d 67 29 29 20 64 76 29 0a 20 20 22 49 6e 73 65 72 74 20 52 45	ipe.(head.img)).dv)..."Insert.RE
29300	43 49 50 45 20 61 73 20 61 6e 20 69 6d 61 67 65 20 61 74 20 70 72 65 76 69 65 77 20 77 69 6e 64	CIPE.as.an.image.at.preview.wind
29320	6f 77 20 6f 66 20 44 56 2e 22 0a 20 20 28 6c 65 74 20 28 28 62 75 66 20 28 64 69 72 76 69 73 68	ow.of.DV."...(let.((buf.(dirvish
29340	2d 2d 75 74 69 6c 2d 62 75 66 66 65 72 20 27 70 72 65 76 69 65 77 20 64 76 20 6e 69 6c 20 74 29	--util-buffer.'preview.dv.nil.t)
29360	29 0a 20 20 20 20 20 20 20 20 28 69 6d 67 20 28 63 64 72 20 72 65 63 69 70 65 29 29 29 0a 20 20	).........(img.(cdr.recipe)))...
29380	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 0a 20 20 20 20 20	..(with-current-buffer.buf......
293a0	20 28 65 72 61 73 65 2d 62 75 66 66 65 72 29 20 28 72 65 6d 6f 76 65 2d 6f 76 65 72 6c 61 79 73	.(erase-buffer).(remove-overlays
293c0	29 0a 20 20 20 20 20 20 28 66 6f 6e 74 2d 6c 6f 63 6b 2d 6d 6f 64 65 20 2d 31 29 0a 20 20 20 20	).......(font-lock-mode.-1).....
293e0	20 20 28 69 6e 73 65 72 74 20 22 20 22 29 0a 20 20 20 20 20 20 28 61 64 64 2d 74 65 78 74 2d 70	..(insert.".").......(add-text-p
29400	72 6f 70 65 72 74 69 65 73 20 31 20 32 20 60 28 64 69 73 70 6c 61 79 20 2c 69 6d 67 20 72 65 61	roperties.1.2.`(display.,img.rea
29420	72 2d 6e 6f 6e 73 74 69 63 6b 79 20 74 20 6b 65 79 6d 61 70 20 2c 69 6d 61 67 65 2d 6d 61 70 29	r-nonsticky.t.keymap.,image-map)
29440	29 0a 20 20 20 20 20 20 28 70 63 61 73 65 2d 6c 65 74 20 28 28 60 28 2c 69 77 20 2e 20 2c 69 68	).......(pcase-let.((`(,iw...,ih
29460	29 20 28 69 6d 61 67 65 2d 73 69 7a 65 20 69 6d 67 29 29 29 0a 20 20 20 20 20 20 20 20 28 6c 65	).(image-size.img))).........(le
29480	74 2a 20 28 28 70 2d 77 69 6e 64 6f 77 20 28 64 76 2d 70 72 65 76 69 65 77 2d 77 69 6e 64 6f 77	t*.((p-window.(dv-preview-window
294a0	20 64 76 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 2d 70 61 64 20 28 6d 61 78	.dv))................(w-pad.(max
294c0	20 28 72 6f 75 6e 64 20 28 2f 20 28 2d 20 28 77 69 6e 64 6f 77 2d 77 69 64 74 68 20 70 2d 77 69	.(round.(/.(-.(window-width.p-wi
294e0	6e 64 6f 77 29 20 69 77 29 20 32 29 29 20 30 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ndow).iw).2)).0))...............
29500	20 28 68 2d 70 61 64 20 28 6d 61 78 20 28 72 6f 75 6e 64 20 28 2f 20 28 2d 20 28 77 69 6e 64 6f	.(h-pad.(max.(round.(/.(-.(windo
29520	77 2d 68 65 69 67 68 74 20 70 2d 77 69 6e 64 6f 77 29 20 69 68 29 20 32 29 29 20 30 29 29 29 0a	w-height.p-window).ih).2)).0))).
29540	20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 31 29 0a 20 20 20 20 20 20 20 20	..........(goto-char.1).........
29560	20 20 28 69 6e 73 65 72 74 20 28 6d 61 6b 65 2d 73 74 72 69 6e 67 20 28 69 66 20 64 69 72 76 69	..(insert.(make-string.(if.dirvi
29580	73 68 2d 73 68 6f 77 2d 6d 65 64 69 61 2d 70 72 6f 70 65 72 74 69 65 73 20 32 20 68 2d 70 61 64	sh-show-media-properties.2.h-pad
295a0	29 20 3f 5c 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 6b 65 2d 73	).?\n)...................(make-s
295c0	74 72 69 6e 67 20 77 2d 70 61 64 20 3f 5c 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65	tring.w-pad.?\s))...........(whe
295e0	6e 20 64 69 72 76 69 73 68 2d 73 68 6f 77 2d 6d 65 64 69 61 2d 70 72 6f 70 65 72 74 69 65 73 0a	n.dirvish-show-media-properties.
29600	20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 62 65 67 20 28 70 72 6f 67 6e 20 28	............(let*.((beg.(progn.(
29620	67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 20 28 70 6f 69 6e 74 29 29 29	goto-char.(point-max)).(point)))
29640	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 20 28 77 69 74 68 2d	....................(file.(with-
29660	63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 28 63 64 72 20 28 64 76 2d 69 6e 64 65 78 20 64 76	current-buffer.(cdr.(dv-index.dv
29680	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64	))............................(d
296a0	69 72 76 69 73 68 2d 70 72 6f 70 20 3a 69 6e 64 65 78 29 29 29 0a 20 20 20 20 20 20 20 20 20 20	irvish-prop.:index)))...........
296c0	20 20 20 20 20 20 20 20 20 28 65 78 74 20 28 64 6f 77 6e 63 61 73 65 20 28 6f 72 20 28 66 69 6c	.........(ext.(downcase.(or.(fil
296e0	65 2d 6e 61 6d 65 2d 65 78 74 65 6e 73 69 6f 6e 20 66 69 6c 65 29 20 22 22 29 29 29 0a 20 20 20	e-name-extension.file)."")))....
29700	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 79 70 65 20 28 63 6f 6e 64 20 28 28 6d 65	................(type.(cond.((me
29720	6d 62 65 72 20 65 78 74 20 64 69 72 76 69 73 68 2d 69 6d 61 67 65 2d 65 78 74 73 29 20 27 69 6d	mber.ext.dirvish-image-exts).'im
29740	61 67 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	age)............................
29760	20 20 20 20 28 28 6d 65 6d 62 65 72 20 65 78 74 20 64 69 72 76 69 73 68 2d 76 69 64 65 6f 2d 65	....((member.ext.dirvish-video-e
29780	78 74 73 29 20 27 76 69 64 65 6f 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	xts).'video)....................
297a0	20 20 20 20 20 20 20 20 20 20 20 20 28 28 61 6e 64 20 28 6d 65 6d 71 20 27 70 64 66 2d 70 72 65	............((and.(memq.'pdf-pre
297c0	66 61 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	face............................
297e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 76 69 73 68 2d 70 72 65 76 69 65 77 2d	................dirvish-preview-
29800	64 69 73 70 61 74 63 68 65 72 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	dispatchers)....................
29820	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 75 61 6c 20 65 78 74 20 22 70 64	..................(equal.ext."pd
29840	66 22 29 20 27 70 64 66 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	f").'pdf))......................
29860	20 20 20 20 20 20 20 20 20 20 28 74 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 4e 6f 74 20 61 20	..........(t.(user-error."Not.a.
29880	6d 65 64 69 61 20 66 69 6c 65 22 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b	media.file")))))...............;
298a0	3b 20 65 6e 73 75 72 65 20 74 68 65 20 63 6f 6e 74 65 6e 74 20 69 73 20 68 69 67 68 65 72 20 74	;.ensure.the.content.is.higher.t
298c0	68 61 6e 20 74 68 65 20 77 69 6e 64 6f 77 20 68 65 69 67 68 74 20 74 6f 20 61 76 6f 69 64 0a 20	han.the.window.height.to.avoid..
298e0	20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 75 6e 65 78 70 65 63 74 65 64 20 61 75 74 6f 20	.............;;.unexpected.auto.
29900	73 63 72 6f 6c 6c 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20	scrolling...............(insert.
29920	22 5c 6e 5c 6e 5c 6e 22 20 28 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 6d 65 74 61 64 61 74 61	"\n\n\n".(dirvish-media-metadata
29940	20 28 63 6f 6e 73 20 74 79 70 65 20 66 69 6c 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	.(cons.type.file))..............
29960	20 20 20 20 20 20 20 20 20 28 6d 61 6b 65 2d 73 74 72 69 6e 67 20 28 2a 20 68 2d 70 61 64 20 32	.........(make-string.(*.h-pad.2
29980	29 20 3f 5c 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6c 69 67 6e 2d 72 65 67	).?\n))...............(align-reg
299a0	65 78 70 20 62 65 67 20 28 70 6f 69 6e 74 29 20 22 5c 5c 28 5c 5c 5c 74 5c 5c 29 5b 5e 5c 5c 5c	exp.beg.(point)."\$\\\t\$[^\\\
299c0	74 5c 5c 5c 6e 5d 2b 22 20 31 20 34 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67	t\\\n]+".1.4.t)...............(g
299e0	6f 74 6f 2d 63 68 61 72 20 31 29 29 29 29 29 0a 20 20 20 20 20 20 62 75 66 29 29 29 0a 0a 28 63	oto-char.1))))).......buf)))..(c
29a00	6c 2d 64 65 66 6d 65 74 68 6f 64 20 64 69 72 76 69 73 68 2d 70 72 65 76 69 65 77 2d 64 69 73 70	l-defmethod.dirvish-preview-disp
29a20	61 74 63 68 20 28 28 72 65 63 69 70 65 20 28 68 65 61 64 20 63 61 63 68 65 29 29 20 64 76 29 0a	atch.((recipe.(head.cache)).dv).
29a40	20 20 22 47 65 6e 65 72 61 74 65 20 63 61 63 68 65 20 69 6d 61 67 65 20 61 63 63 6f 72 64 69 6e	.."Generate.cache.image.accordin
29a60	67 20 74 6f 20 52 45 43 49 50 45 20 61 6e 64 20 73 65 73 73 69 6f 6e 20 44 56 2e 22 0a 20 20 28	g.to.RECIPE.and.session.DV."...(
29a80	6c 65 74 2a 20 28 28 70 61 74 68 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 69 6e 64 65 78	let*.((path.(dirvish-prop.:index
29aa0	29 29 0a 20 20 20 20 20 20 20 20 20 28 62 75 66 20 28 64 69 72 76 69 73 68 2d 2d 75 74 69 6c 2d	))..........(buf.(dirvish--util-
29ac0	62 75 66 66 65 72 20 27 70 72 65 76 69 65 77 20 64 76 20 6e 69 6c 20 74 29 29 0a 20 20 20 20 20	buffer.'preview.dv.nil.t))......
29ae0	20 20 20 20 28 6e 61 6d 65 20 28 66 6f 72 6d 61 74 20 22 25 73 2d 25 73 2d 69 6d 67 2d 63 61 63	....(name.(format."%s-%s-img-cac
29b00	68 65 22 20 70 61 74 68 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	he".path........................
29b20	28 77 69 6e 64 6f 77 2d 77 69 64 74 68 20 28 64 76 2d 70 72 65 76 69 65 77 2d 77 69 6e 64 6f 77	(window-width.(dv-preview-window
29b40	20 64 76 29 29 29 29 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 28 67 65 74 2d 70 72 6f 63 65 73	.dv))))).....(unless.(get-proces
29b60	73 20 6e 61 6d 65 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 64 69 72 76 69 73 68 2d 6d 65 64 69	s.name).......(setq.dirvish-medi
29b80	61 2d 2d 63 61 63 68 65 2d 70 6f 6f 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 6c 65 74	a--cache-pool.............(delet
29ba0	65 20 28 61 73 73 6f 63 20 6e 61 6d 65 20 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 63 61 63	e.(assoc.name.dirvish-media--cac
29bc0	68 65 2d 70 6f 6f 6c 29 20 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 63 61 63 68 65 2d 70 6f	he-pool).dirvish-media--cache-po
29be0	6f 6c 29 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 70 72 6f 63 20 28 61 70 70 6c 79 20 23 27	ol)).......(let.((proc.(apply.#'
29c00	73 74 61 72 74 2d 70 72 6f 63 65 73 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	start-process...................
29c20	20 20 20 20 20 20 20 6e 61 6d 65 20 28 64 69 72 76 69 73 68 2d 2d 75 74 69 6c 2d 62 75 66 66 65	.......name.(dirvish--util-buffe
29c40	72 20 22 69 6d 67 2d 63 61 63 68 65 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	r."img-cache")..................
29c60	20 20 20 20 20 20 20 20 28 63 61 64 72 20 72 65 63 69 70 65 29 20 28 63 64 64 72 20 72 65 63 69	........(cadr.recipe).(cddr.reci
29c80	70 65 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 70 72 6f 63 65 73 73 2d 70 75 74 20 70 72 6f 63	pe)))).........(process-put.proc
29ca0	20 27 70 61 74 68 20 70 61 74 68 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 2d 70 72 6f 63 65 73	.'path.path).........(set-proces
29cc0	73 2d 73 65 6e 74 69 6e 65 6c 20 70 72 6f 63 20 23 27 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d	s-sentinel.proc.#'dirvish-media-
29ce0	2d 63 61 63 68 65 2d 73 65 6e 74 69 6e 65 6c 29 29 29 0a 20 20 20 20 28 77 69 74 68 2d 63 75 72	-cache-sentinel))).....(with-cur
29d00	72 65 6e 74 2d 62 75 66 66 65 72 20 62 75 66 0a 20 20 20 20 20 20 28 65 72 61 73 65 2d 62 75 66	rent-buffer.buf.......(erase-buf
29d20	66 65 72 29 20 28 72 65 6d 6f 76 65 2d 6f 76 65 72 6c 61 79 73 29 0a 20 20 20 20 20 20 28 69 6e	fer).(remove-overlays).......(in
29d40	73 65 72 74 20 22 20 5b 44 69 72 76 69 73 68 5d 20 47 65 6e 65 72 61 74 69 6e 67 20 69 6d 61 67	sert.".[Dirvish].Generating.imag
29d60	65 20 63 61 63 68 65 2e 2e 2e 22 29 20 62 75 66 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76	e.cache...").buf)))..(defun.dirv
29d80	69 73 68 2d 6d 65 64 69 61 2d 2d 69 6d 67 2d 73 69 7a 65 20 28 77 69 6e 64 6f 77 20 26 6f 70 74	ish-media--img-size.(window.&opt
29da0	69 6f 6e 61 6c 20 68 65 69 67 68 74 29 0a 20 20 22 47 65 74 20 63 6f 72 72 65 73 70 6f 6e 64 69	ional.height)..."Get.correspondi
29dc0	6e 67 20 69 6d 61 67 65 20 77 69 64 74 68 20 6f 72 20 48 45 49 47 48 54 20 69 6e 20 57 49 4e 44	ng.image.width.or.HEIGHT.in.WIND
29de0	4f 57 2e 22 0a 20 20 28 6c 65 74 20 28 28 73 69 7a 65 20 28 69 66 20 68 65 69 67 68 74 20 28 2a	OW."...(let.((size.(if.height.(*
29e00	20 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 69 6d 67 2d 73 63 61 6c 65 2d 68 20 28 77 69 6e	.dirvish-media--img-scale-h.(win
29e20	64 6f 77 2d 70 69 78 65 6c 2d 68 65 69 67 68 74 20 77 69 6e 64 6f 77 29 29 0a 20 20 20 20 20 20	dow-pixel-height.window)).......
29e40	20 20 20 20 20 20 20 20 20 20 28 6d 69 6e 20 28 2a 20 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d	..........(min.(*.dirvish-media-
29e60	2d 69 6d 67 2d 73 63 61 6c 65 2d 77 20 28 77 69 6e 64 6f 77 2d 70 69 78 65 6c 2d 77 69 64 74 68	-img-scale-w.(window-pixel-width
29e80	20 77 69 6e 64 6f 77 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64	.window))......................d
29ea0	69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 69 6d 67 2d 6d 61 78 2d 77 69 64 74 68 29 29 29 29 0a	irvish-media--img-max-width)))).
29ec0	20 20 20 20 28 66 6c 6f 6f 72 20 73 69 7a 65 29 29 29 0a 0a 28 64 69 72 76 69 73 68 2d 64 65 66	....(floor.size)))..(dirvish-def
29ee0	69 6e 65 2d 70 72 65 76 69 65 77 20 61 75 64 69 6f 20 28 66 69 6c 65 20 65 78 74 29 0a 20 20 22	ine-preview.audio.(file.ext)..."
29f00	50 72 65 76 69 65 77 20 61 75 64 69 6f 20 66 69 6c 65 73 20 62 79 20 70 72 69 6e 74 69 6e 67 20	Preview.audio.files.by.printing.
29f20	69 74 73 20 6d 65 74 61 64 61 74 61 2e 0a 52 65 71 75 69 72 65 3a 20 60 6d 65 64 69 61 69 6e 66	its.metadata..Require:.`mediainf
29f40	6f 27 20 28 65 78 65 63 75 74 61 62 6c 65 29 22 0a 20 20 3a 72 65 71 75 69 72 65 20 28 22 6d 65	o'.(executable)"...:require.("me
29f60	64 69 61 69 6e 66 6f 22 29 0a 20 20 28 77 68 65 6e 20 28 6d 65 6d 62 65 72 20 65 78 74 20 64 69	diainfo")...(when.(member.ext.di
29f80	72 76 69 73 68 2d 61 75 64 69 6f 2d 65 78 74 73 29 20 60 28 73 68 65 6c 6c 20 2e 20 28 22 6d 65	rvish-audio-exts).`(shell...("me
29fa0	64 69 61 69 6e 66 6f 22 20 2c 66 69 6c 65 29 29 29 29 0a 0a 28 64 69 72 76 69 73 68 2d 64 65 66	diainfo".,file))))..(dirvish-def
29fc0	69 6e 65 2d 70 72 65 76 69 65 77 20 69 6d 61 67 65 20 28 66 69 6c 65 20 65 78 74 20 70 72 65 76	ine-preview.image.(file.ext.prev
29fe0	69 65 77 2d 77 69 6e 64 6f 77 29 0a 20 20 22 50 72 65 76 69 65 77 20 69 6d 61 67 65 20 66 69 6c	iew-window)..."Preview.image.fil
2a000	65 73 2e 0a 52 65 71 75 69 72 65 3a 20 60 63 6f 6e 76 65 72 74 27 20 28 65 78 65 63 75 74 61 62	es..Require:.`convert'.(executab
2a020	6c 65 20 66 72 6f 6d 20 60 69 6d 61 67 65 6d 61 67 69 63 6b 27 20 73 75 69 74 65 29 22 0a 20 20	le.from.`imagemagick'.suite)"...
2a040	3a 72 65 71 75 69 72 65 20 28 22 63 6f 6e 76 65 72 74 22 29 0a 20 20 28 77 68 65 6e 20 28 6d 65	:require.("convert")...(when.(me
2a060	6d 62 65 72 20 65 78 74 20 64 69 72 76 69 73 68 2d 69 6d 61 67 65 2d 65 78 74 73 29 0a 20 20 20	mber.ext.dirvish-image-exts)....
2a080	20 28 6c 65 74 2a 20 28 28 77 20 28 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 69 6d 67 2d 73	.(let*.((w.(dirvish-media--img-s
2a0a0	69 7a 65 20 70 72 65 76 69 65 77 2d 77 69 6e 64 6f 77 29 29 0a 20 20 20 20 20 20 20 20 20 20 20	ize.preview-window))............
2a0c0	28 68 20 28 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 69 6d 67 2d 73 69 7a 65 20 70 72 65 76	(h.(dirvish-media--img-size.prev
2a0e0	69 65 77 2d 77 69 6e 64 6f 77 20 27 68 65 69 67 68 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20	iew-window.'height))............
2a100	28 63 61 63 68 65 20 28 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 63 61 63 68 65 2d 70 61 74	(cache.(dirvish-media--cache-pat
2a120	68 20 66 69 6c 65 20 28 66 6f 72 6d 61 74 20 22 69 6d 61 67 65 73 2f 25 73 22 20 77 29 20 22 2e	h.file.(format."images/%s".w).".
2a140	6a 70 67 22 29 29 29 0a 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 66 69 6c 65 2d 65 78 69 73 74	jpg"))).......(cond.((file-exist
2a160	73 2d 70 20 63 61 63 68 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 69 6d 67 20 2e 20	s-p.cache)..............`(img...
2a180	2c 28 63 72 65 61 74 65 2d 69 6d 61 67 65 20 63 61 63 68 65 20 6e 69 6c 20 6e 69 6c 20 3a 6d 61	,(create-image.cache.nil.nil.:ma
2a1a0	78 2d 77 69 64 74 68 20 77 20 3a 6d 61 78 2d 68 65 69 67 68 74 20 68 29 29 29 0a 20 20 20 20 20	x-width.w.:max-height.h)))......
2a1c0	20 20 20 20 20 20 20 28 28 61 6e 64 20 28 3c 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 2d	.......((and.(<.(file-attribute-
2a1e0	73 69 7a 65 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 73 20 66 69 6c 65 29 29 20 32 35 30	size.(file-attributes.file)).250
2a200	30 30 30 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 6d 62 65 72 20 65	000)...................(member.e
2a220	78 74 20 27 28 22 6a 70 67 22 20 22 6a 70 65 67 22 20 22 70 6e 67 22 20 22 69 63 6f 22 20 22 69	xt.'("jpg"."jpeg"."png"."ico"."i
2a240	63 6e 73 22 20 22 62 6d 70 22 20 22 73 76 67 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	cns"."bmp"."svg"))).............
2a260	20 60 28 69 6d 67 20 2e 20 2c 28 63 72 65 61 74 65 2d 69 6d 61 67 65 20 66 69 6c 65 20 6e 69 6c	.`(img...,(create-image.file.nil
2a280	20 6e 69 6c 20 3a 6d 61 78 2d 77 69 64 74 68 20 77 20 3a 6d 61 78 2d 68 65 69 67 68 74 20 68 29	.nil.:max-width.w.:max-height.h)
2a2a0	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 74 20 60 28 63 61 63 68 65 20 2e 20 28 22 63 6f	)).............(t.`(cache...("co
2a2c0	6e 76 65 72 74 22 20 2c 66 69 6c 65 20 22 2d 64 65 66 69 6e 65 22 20 22 6a 70 65 67 3a 65 78 74	nvert".,file."-define"."jpeg:ext
2a2e0	65 6e 74 3d 33 30 30 6b 62 22 20 22 2d 72 65 73 69 7a 65 22 0a 20 20 20 20 20 20 20 20 20 20 20	ent=300kb"."-resize"............
2a300	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 6e 75 6d 62 65 72 2d 74 6f 2d 73 74 72 69 6e	...............,(number-to-strin
2a320	67 20 77 29 20 2c 63 61 63 68 65 29 29 29 29 29 29 29 0a 0a 28 64 69 72 76 69 73 68 2d 64 65 66	g.w).,cache)))))))..(dirvish-def
2a340	69 6e 65 2d 70 72 65 76 69 65 77 20 67 69 66 20 28 66 69 6c 65 20 65 78 74 29 0a 20 20 22 50 72	ine-preview.gif.(file.ext)..."Pr
2a360	65 76 69 65 77 20 67 69 66 20 69 6d 61 67 65 73 20 77 69 74 68 20 61 6e 69 6d 61 74 69 6f 6e 73	eview.gif.images.with.animations
2a380	2e 22 0a 20 20 28 77 68 65 6e 20 28 65 71 75 61 6c 20 65 78 74 20 22 67 69 66 22 29 0a 20 20 20	."...(when.(equal.ext."gif")....
2a3a0	20 28 6c 65 74 20 28 28 67 69 66 20 28 64 69 72 76 69 73 68 2d 2d 66 69 6e 64 2d 66 69 6c 65 2d	.(let.((gif.(dirvish--find-file-
2a3c0	74 65 6d 70 6f 72 61 72 69 6c 79 20 66 69 6c 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 61	temporarily.file))...........(ca
2a3e0	6c 6c 62 61 63 6b 20 28 6c 61 6d 62 64 61 20 28 72 63 70 29 0a 20 20 20 20 20 20 20 20 20 20 20	llback.(lambda.(rcp)............
2a400	20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 2d 6c 65 74 2a 20 28 28 62 75 66 20 28 63 64 72	...........(when-let*.((buf.(cdr
2a420	20 72 63 70 29 29 20 28 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 20 62 75 66 29 29 29 0a 20 20	.rcp)).((buffer-live-p.buf)))...
2a440	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72	......................(with-curr
2a460	65 6e 74 2d 62 75 66 66 65 72 20 62 75 66 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ent-buffer.buf..................
2a480	20 20 20 20 20 20 20 20 20 28 69 6d 61 67 65 2d 61 6e 69 6d 61 74 65 20 28 67 65 74 2d 63 68 61	.........(image-animate.(get-cha
2a4a0	72 2d 70 72 6f 70 65 72 74 79 20 31 20 27 64 69 73 70 6c 61 79 29 29 29 29 29 29 29 0a 20 20 20	r-property.1.'display)))))))....
2a4c0	20 20 20 28 72 75 6e 2d 77 69 74 68 2d 69 64 6c 65 2d 74 69 6d 65 72 20 31 20 6e 69 6c 20 63 61	...(run-with-idle-timer.1.nil.ca
2a4e0	6c 6c 62 61 63 6b 20 67 69 66 29 20 67 69 66 29 29 29 0a 0a 28 64 69 72 76 69 73 68 2d 64 65 66	llback.gif).gif)))..(dirvish-def
2a500	69 6e 65 2d 70 72 65 76 69 65 77 20 76 69 64 65 6f 20 28 66 69 6c 65 20 65 78 74 20 70 72 65 76	ine-preview.video.(file.ext.prev
2a520	69 65 77 2d 77 69 6e 64 6f 77 29 0a 20 20 22 50 72 65 76 69 65 77 20 76 69 64 65 6f 20 66 69 6c	iew-window)..."Preview.video.fil
2a540	65 73 2e 0a 52 65 71 75 69 72 65 3a 20 60 66 66 6d 70 65 67 74 68 75 6d 62 6e 61 69 6c 65 72 27	es..Require:.`ffmpegthumbnailer'
2a560	20 28 65 78 65 63 75 74 61 62 6c 65 29 22 0a 20 20 3a 72 65 71 75 69 72 65 20 28 22 66 66 6d 70	.(executable)"...:require.("ffmp
2a580	65 67 74 68 75 6d 62 6e 61 69 6c 65 72 22 29 0a 20 20 28 77 68 65 6e 20 28 6d 65 6d 62 65 72 20	egthumbnailer")...(when.(member.
2a5a0	65 78 74 20 64 69 72 76 69 73 68 2d 76 69 64 65 6f 2d 65 78 74 73 29 0a 20 20 20 20 28 6c 65 74	ext.dirvish-video-exts).....(let
2a5c0	2a 20 28 28 77 69 64 74 68 20 28 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 69 6d 67 2d 73 69	*.((width.(dirvish-media--img-si
2a5e0	7a 65 20 70 72 65 76 69 65 77 2d 77 69 6e 64 6f 77 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28	ze.preview-window))............(
2a600	68 65 69 67 68 74 20 28 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 69 6d 67 2d 73 69 7a 65 20	height.(dirvish-media--img-size.
2a620	70 72 65 76 69 65 77 2d 77 69 6e 64 6f 77 20 27 68 65 69 67 68 74 29 29 0a 20 20 20 20 20 20 20	preview-window.'height))........
2a640	20 20 20 20 28 63 61 63 68 65 20 28 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 63 61 63 68 65	....(cache.(dirvish-media--cache
2a660	2d 70 61 74 68 20 66 69 6c 65 20 28 66 6f 72 6d 61 74 20 22 69 6d 61 67 65 73 2f 25 73 22 20 77	-path.file.(format."images/%s".w
2a680	69 64 74 68 29 20 22 2e 6a 70 67 22 29 29 29 0a 20 20 20 20 20 20 28 69 66 20 28 66 69 6c 65 2d	idth).".jpg"))).......(if.(file-
2a6a0	65 78 69 73 74 73 2d 70 20 63 61 63 68 65 29 0a 20 20 20 20 20 20 20 20 20 20 60 28 69 6d 67 20	exists-p.cache)...........`(img.
2a6c0	2e 20 2c 28 63 72 65 61 74 65 2d 69 6d 61 67 65 20 63 61 63 68 65 20 6e 69 6c 20 6e 69 6c 20 3a	..,(create-image.cache.nil.nil.:
2a6e0	6d 61 78 2d 77 69 64 74 68 20 77 69 64 74 68 20 3a 6d 61 78 2d 68 65 69 67 68 74 20 68 65 69 67	max-width.width.:max-height.heig
2a700	68 74 29 29 0a 20 20 20 20 20 20 20 20 60 28 63 61 63 68 65 20 2e 20 28 22 66 66 6d 70 65 67 74	ht)).........`(cache...("ffmpegt
2a720	68 75 6d 62 6e 61 69 6c 65 72 22 20 22 2d 69 22 20 2c 66 69 6c 65 20 22 2d 6f 22 20 2c 63 61 63	humbnailer"."-i".,file."-o".,cac
2a740	68 65 20 22 2d 73 22 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	he."-s".........................
2a760	20 2c 28 6e 75 6d 62 65 72 2d 74 6f 2d 73 74 72 69 6e 67 20 77 69 64 74 68 29 0a 20 20 20 20 20	.,(number-to-string.width)......
2a780	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 69 66 20 64 69 72 76 69 73 68	....................,(if.dirvish
2a7a0	2d 6d 65 64 69 61 2d 2d 65 6d 62 65 64 64 65 64 2d 76 69 64 65 6f 2d 74 68 75 6d 62 20 22 2d 6d	-media--embedded-video-thumb."-m
2a7c0	22 20 22 22 29 29 29 29 29 29 29 0a 0a 28 64 69 72 76 69 73 68 2d 64 65 66 69 6e 65 2d 70 72 65	"."")))))))..(dirvish-define-pre
2a7e0	76 69 65 77 20 65 70 75 62 20 28 66 69 6c 65 20 70 72 65 76 69 65 77 2d 77 69 6e 64 6f 77 29 0a	view.epub.(file.preview-window).
2a800	20 20 22 50 72 65 76 69 65 77 20 65 70 75 62 20 66 69 6c 65 73 2e 0a 52 65 71 75 69 72 65 3a 20	.."Preview.epub.files..Require:.
2a820	60 65 70 75 62 2d 74 68 75 6d 62 6e 61 69 6c 65 72 27 20 28 65 78 65 63 75 74 61 62 6c 65 29 22	`epub-thumbnailer'.(executable)"
2a840	0a 20 20 3a 72 65 71 75 69 72 65 20 28 22 65 70 75 62 2d 74 68 75 6d 62 6e 61 69 6c 65 72 22 29	...:require.("epub-thumbnailer")
2a860	0a 20 20 28 77 68 65 6e 20 28 65 71 75 61 6c 20 65 78 74 20 22 65 70 75 62 22 29 0a 20 20 20 20	...(when.(equal.ext."epub").....
2a880	28 6c 65 74 2a 20 28 28 77 69 64 74 68 20 28 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 69 6d	(let*.((width.(dirvish-media--im
2a8a0	67 2d 73 69 7a 65 20 70 72 65 76 69 65 77 2d 77 69 6e 64 6f 77 29 29 0a 20 20 20 20 20 20 20 20	g-size.preview-window)).........
2a8c0	20 20 20 28 68 65 69 67 68 74 20 28 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 69 6d 67 2d 73	...(height.(dirvish-media--img-s
2a8e0	69 7a 65 20 70 72 65 76 69 65 77 2d 77 69 6e 64 6f 77 20 27 68 65 69 67 68 74 29 29 0a 20 20 20	ize.preview-window.'height))....
2a900	20 20 20 20 20 20 20 20 28 63 61 63 68 65 20 28 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 63	........(cache.(dirvish-media--c
2a920	61 63 68 65 2d 70 61 74 68 20 66 69 6c 65 20 28 66 6f 72 6d 61 74 20 22 69 6d 61 67 65 73 2f 25	ache-path.file.(format."images/%
2a940	73 22 20 77 69 64 74 68 29 20 22 2e 6a 70 67 22 29 29 29 0a 20 20 20 20 20 20 28 69 66 20 28 66	s".width).".jpg"))).......(if.(f
2a960	69 6c 65 2d 65 78 69 73 74 73 2d 70 20 63 61 63 68 65 29 0a 20 20 20 20 20 20 20 20 20 20 60 28	ile-exists-p.cache)...........`(
2a980	69 6d 67 20 2e 20 2c 28 63 72 65 61 74 65 2d 69 6d 61 67 65 20 63 61 63 68 65 20 6e 69 6c 20 6e	img...,(create-image.cache.nil.n
2a9a0	69 6c 20 3a 6d 61 78 2d 77 69 64 74 68 20 77 69 64 74 68 20 3a 6d 61 78 2d 68 65 69 67 68 74 20	il.:max-width.width.:max-height.
2a9c0	68 65 69 67 68 74 29 29 0a 20 20 20 20 20 20 20 20 60 28 63 61 63 68 65 20 2e 20 28 22 65 70 75	height)).........`(cache...("epu
2a9e0	62 2d 74 68 75 6d 62 6e 61 69 6c 65 72 22 20 2c 66 69 6c 65 20 2c 63 61 63 68 65 20 2c 28 6e 75	b-thumbnailer".,file.,cache.,(nu
2aa00	6d 62 65 72 2d 74 6f 2d 73 74 72 69 6e 67 20 77 69 64 74 68 29 29 29 29 29 29 29 0a 0a 28 64 69	mber-to-string.width)))))))..(di
2aa20	72 76 69 73 68 2d 64 65 66 69 6e 65 2d 70 72 65 76 69 65 77 20 70 64 66 20 28 66 69 6c 65 20 65	rvish-define-preview.pdf.(file.e
2aa40	78 74 29 0a 20 20 22 50 72 65 76 69 65 77 20 70 64 66 20 66 69 6c 65 73 2e 0a 52 65 71 75 69 72	xt)..."Preview.pdf.files..Requir
2aa60	65 3a 20 60 70 64 66 2d 74 6f 6f 6c 73 27 20 28 45 6d 61 63 73 20 70 61 63 6b 61 67 65 29 22 0a	e:.`pdf-tools'.(Emacs.package)".
2aa80	20 20 28 77 68 65 6e 20 28 65 71 75 61 6c 20 65 78 74 20 22 70 64 66 22 29 0a 20 20 20 20 28 69	..(when.(equal.ext."pdf").....(i
2aaa0	66 20 28 66 65 61 74 75 72 65 70 20 27 70 64 66 2d 74 6f 6f 6c 73 29 20 28 64 69 72 76 69 73 68	f.(featurep.'pdf-tools).(dirvish
2aac0	2d 2d 66 69 6e 64 2d 66 69 6c 65 2d 74 65 6d 70 6f 72 61 72 69 6c 79 20 66 69 6c 65 29 0a 20 20	--find-file-temporarily.file)...
2aae0	20 20 20 20 27 28 69 6e 66 6f 20 2e 20 22 45 6d 61 63 73 20 70 61 63 6b 61 67 65 20 27 70 64 66	....'(info..."Emacs.package.'pdf
2ab00	2d 74 6f 6f 6c 73 27 20 69 73 20 72 65 71 75 69 72 65 64 20 74 6f 20 70 72 65 76 69 65 77 20 70	-tools'.is.required.to.preview.p
2ab20	64 66 20 64 6f 63 75 6d 65 6e 74 73 22 29 29 29 29 0a 0a 28 64 69 72 76 69 73 68 2d 64 65 66 69	df.documents"))))..(dirvish-defi
2ab40	6e 65 2d 70 72 65 76 69 65 77 20 70 64 66 2d 70 72 65 66 61 63 65 20 28 66 69 6c 65 20 65 78 74	ne-preview.pdf-preface.(file.ext
2ab60	20 70 72 65 76 69 65 77 2d 77 69 6e 64 6f 77 29 0a 20 20 22 44 69 73 70 6c 61 79 20 74 68 65 20	.preview-window)..."Display.the.
2ab80	70 72 65 66 61 63 65 20 69 6d 61 67 65 20 61 73 20 70 72 65 76 69 65 77 20 66 6f 72 20 70 64 66	preface.image.as.preview.for.pdf
2aba0	20 66 69 6c 65 73 2e 22 0a 20 20 3a 72 65 71 75 69 72 65 20 28 22 70 64 66 74 6f 70 70 6d 22 29	.files."...:require.("pdftoppm")
2abc0	0a 20 20 28 77 68 65 6e 20 28 65 71 75 61 6c 20 65 78 74 20 22 70 64 66 22 29 0a 20 20 20 20 28	...(when.(equal.ext."pdf").....(
2abe0	6c 65 74 2a 20 28 28 77 69 64 74 68 20 28 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 69 6d 67	let*.((width.(dirvish-media--img
2ac00	2d 73 69 7a 65 20 70 72 65 76 69 65 77 2d 77 69 6e 64 6f 77 29 29 0a 20 20 20 20 20 20 20 20 20	-size.preview-window))..........
2ac20	20 20 28 68 65 69 67 68 74 20 28 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 69 6d 67 2d 73 69	..(height.(dirvish-media--img-si
2ac40	7a 65 20 70 72 65 76 69 65 77 2d 77 69 6e 64 6f 77 20 27 68 65 69 67 68 74 29 29 0a 20 20 20 20	ze.preview-window.'height)).....
2ac60	20 20 20 20 20 20 20 28 63 61 63 68 65 20 28 64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 2d 63 61	.......(cache.(dirvish-media--ca
2ac80	63 68 65 2d 70 61 74 68 20 66 69 6c 65 20 28 66 6f 72 6d 61 74 20 22 69 6d 61 67 65 73 2f 25 73	che-path.file.(format."images/%s
2aca0	22 20 77 69 64 74 68 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 61 63 68 65 2d 6a 70 67	".width)))............(cache-jpg
2acc0	20 28 63 6f 6e 63 61 74 20 63 61 63 68 65 20 22 2e 6a 70 67 22 29 29 29 0a 20 20 20 20 20 20 28	.(concat.cache.".jpg"))).......(
2ace0	69 66 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 63 61 63 68 65 2d 6a 70 67 29 0a 20 20 20	if.(file-exists-p.cache-jpg)....
2ad00	20 20 20 20 20 20 20 60 28 69 6d 67 20 2e 20 2c 28 63 72 65 61 74 65 2d 69 6d 61 67 65 20 63 61	.......`(img...,(create-image.ca
2ad20	63 68 65 2d 6a 70 67 20 6e 69 6c 20 6e 69 6c 20 3a 6d 61 78 2d 77 69 64 74 68 20 77 69 64 74 68	che-jpg.nil.nil.:max-width.width
2ad40	20 3a 6d 61 78 2d 68 65 69 67 68 74 20 68 65 69 67 68 74 29 29 0a 20 20 20 20 20 20 20 20 60 28	.:max-height.height)).........`(
2ad60	63 61 63 68 65 20 2e 20 28 22 70 64 66 74 6f 70 70 6d 22 20 22 2d 6a 70 65 67 22 20 22 2d 66 22	cache...("pdftoppm"."-jpeg"."-f"
2ad80	20 22 31 22 20 22 2d 73 69 6e 67 6c 65 66 69 6c 65 22 20 2c 66 69 6c 65 20 2c 63 61 63 68 65 29	."1"."-singlefile".,file.,cache)
2ada0	29 29 29 29 29 0a 0a 28 64 69 72 76 69 73 68 2d 64 65 66 69 6e 65 2d 70 72 65 76 69 65 77 20 61	)))))..(dirvish-define-preview.a
2adc0	72 63 68 69 76 65 20 28 66 69 6c 65 20 65 78 74 29 0a 20 20 22 50 72 65 76 69 65 77 20 61 72 63	rchive.(file.ext)..."Preview.arc
2ade0	68 69 76 65 20 66 69 6c 65 73 2e 0a 52 65 71 75 69 72 65 3a 20 60 7a 69 70 69 6e 66 6f 27 20 28	hive.files..Require:.`zipinfo'.(
2ae00	65 78 65 63 75 74 61 62 6c 65 29 0a 52 65 71 75 69 72 65 3a 20 60 74 61 72 27 20 28 65 78 65 63	executable).Require:.`tar'.(exec
2ae20	75 74 61 62 6c 65 29 22 0a 20 20 3a 72 65 71 75 69 72 65 20 28 22 7a 69 70 69 6e 66 6f 22 20 22	utable)"...:require.("zipinfo"."
2ae40	74 61 72 22 29 0a 20 20 28 63 6f 6e 64 20 28 28 65 71 75 61 6c 20 65 78 74 20 22 7a 69 70 22 29	tar")...(cond.((equal.ext."zip")
2ae60	20 60 28 73 68 65 6c 6c 20 2e 20 28 22 7a 69 70 69 6e 66 6f 22 20 2c 66 69 6c 65 29 29 29 0a 20	.`(shell...("zipinfo".,file)))..
2ae80	20 20 20 20 20 20 20 28 28 6d 65 6d 62 65 72 20 65 78 74 20 27 28 22 74 61 72 22 20 22 7a 73 74	.......((member.ext.'("tar"."zst
2aea0	22 20 22 62 7a 32 22 20 22 62 7a 22 20 22 67 7a 22 20 22 78 7a 22 20 22 74 67 7a 22 29 29 0a 20	"."bz2"."bz"."gz"."xz"."tgz"))..
2aec0	20 20 20 20 20 20 20 20 60 28 73 68 65 6c 6c 20 2e 20 28 22 74 61 72 22 20 22 2d 74 76 66 22 20	........`(shell...("tar"."-tvf".
2aee0	2c 66 69 6c 65 29 29 29 29 29 0a 0a 28 70 72 6f 76 69 64 65 20 27 64 69 72 76 69 73 68 2d 77 69	,file)))))..(provide.'dirvish-wi
2af00	64 67 65 74 73 29 0a 3b 3b 3b 20 64 69 72 76 69 73 68 2d 77 69 64 67 65 74 73 2e 65 6c 20 65 6e	dgets).;;;.dirvish-widgets.el.en
2af20	64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	ds.here.........................
2af40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
2af60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
2af80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
2afa0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
2afc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
2afe0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
2b000	64 69 72 76 69 73 68 2d 32 30 32 33 30 35 31 39 2e 31 35 30 30 2f 64 69 72 76 69 73 68 2d 79 61	dirvish-20230519.1500/dirvish-ya
2b020	6e 6b 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	nk.el...........................
2b040	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
2b060	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
2b080	30 30 36 35 37 30 31 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 34 31 37 00 20 30 00 00 00	0065701.00000000000.015417..0...
2b0a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
2b0c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
2b0e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
2b100	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...................
2b120	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...................
2b140	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
2b160	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
2b180	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
2b1a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
2b1c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
2b1e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
2b200	3b 3b 3b 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2e 65 6c 20 2d 2d 2d 20 4d 75 6c 74 69 2d 73 74	;;;.dirvish-yank.el.---.Multi-st
2b220	61 67 65 20 61 6e 64 20 61 73 79 6e 63 20 63 6f 70 79 2f 70 61 73 74 65 2f 6c 69 6e 6b 20 75 74	age.and.async.copy/paste/link.ut
2b240	69 6c 69 74 69 65 73 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 20 74 20 2d	ilities.-*-.lexical-binding:.t.-
2b260	2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 32 31 2d 32 30 32 32 20 41	*-..;;.Copyright.(C).2021-2022.A
2b280	6c 65 78 20 4c 75 0a 3b 3b 20 41 75 74 68 6f 72 20 3a 20 41 6c 65 78 20 4c 75 20 3c 68 74 74 70	lex.Lu.;;.Author.:.Alex.Lu.<http
2b2a0	73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 61 6c 65 78 6c 75 69 67 69 74 3e 0a 3b 3b 20 56 65	s://github.com/alexluigit>.;;.Ve
2b2c0	72 73 69 6f 6e 3a 20 32 2e 30 2e 35 33 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 66 69 6c 65 73	rsion:.2.0.53.;;.Keywords:.files
2b2e0	2c 20 63 6f 6e 76 65 6e 69 65 6e 63 65 0a 3b 3b 20 48 6f 6d 65 70 61 67 65 3a 20 68 74 74 70 73	,.convenience.;;.Homepage:.https
2b300	3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 61 6c 65 78 6c 75 69 67 69 74 2f 64 69 72 76 69 73 68	://github.com/alexluigit/dirvish
2b320	0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d 49 64 65 6e 74 69 66 69 65 72 3a 20 47 50 4c	.;;.SPDX-License-Identifier:.GPL
2b340	2d 33 2e 30 2d 6f 72 2d 6c 61 74 65 72 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a	-3.0-or-later..;;;.Commentary:..
2b360	3b 3b 20 4d 75 6c 74 69 2d 73 74 61 67 65 20 61 6e 64 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 20	;;.Multi-stage.and.asynchronous.
2b380	63 6f 70 79 2f 70 61 73 74 65 2f 6c 69 6e 6b 20 75 74 69 6c 69 74 69 65 73 20 69 6e 20 44 69 72	copy/paste/link.utilities.in.Dir
2b3a0	76 69 73 68 2e 0a 0a 3b 3b 20 57 69 74 68 20 74 68 65 20 6d 75 6c 74 69 2d 73 74 61 67 65 20 6f	vish...;;.With.the.multi-stage.o
2b3c0	70 65 72 61 74 69 6f 6e 73 2c 20 79 6f 75 20 63 61 6e 20 67 61 74 68 65 72 20 66 69 6c 65 73 20	perations,.you.can.gather.files.
2b3e0	66 72 6f 6d 20 6d 75 6c 74 69 70 6c 65 20 44 69 72 65 64 0a 3b 3b 20 62 75 66 66 65 72 73 20 69	from.multiple.Dired.;;.buffers.i
2b400	6e 74 6f 20 61 20 73 69 6e 67 6c 65 20 22 63 6c 69 70 62 6f 61 72 64 22 2c 20 74 68 65 6e 20 63	nto.a.single."clipboard",.then.c
2b420	6f 70 79 20 6f 72 20 6d 6f 76 65 20 61 6c 6c 20 6f 66 20 74 68 65 6d 20 74 6f 20 74 68 65 0a 3b	opy.or.move.all.of.them.to.the.;
2b440	3b 20 74 61 72 67 65 74 20 6c 6f 63 61 74 69 6f 6e 2e 0a 0a 3b 3b 20 48 65 72 65 20 61 72 65 20	;.target.location...;;.Here.are.
2b460	74 68 65 20 61 76 61 69 6c 61 62 6c 65 20 63 6f 6d 6d 61 6e 64 73 3a 0a 3b 3b 20 4e 6f 74 65 20	the.available.commands:.;;.Note.
2b480	74 68 61 74 20 74 68 65 79 20 61 72 65 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 20 61 6e 64 20 77	that.they.are.asynchronous.and.w
2b4a0	6f 72 6b 20 6f 6e 20 62 6f 74 68 20 6c 6f 63 61 6c 68 6f 73 74 20 61 6e 64 20 72 65 6d 6f 74 65	ork.on.both.localhost.and.remote
2b4c0	20 68 6f 73 74 2e 0a 3b 3b 20 2d 20 60 64 69 72 76 69 73 68 2d 79 61 6e 6b 27 0a 3b 3b 20 2d 20	.host..;;.-.`dirvish-yank'.;;.-.
2b4e0	60 64 69 72 76 69 73 68 2d 6d 6f 76 65 27 0a 3b 3b 20 2d 20 60 64 69 72 76 69 73 68 2d 73 79 6d	`dirvish-move'.;;.-.`dirvish-sym
2b500	6c 69 6e 6b 27 0a 3b 3b 20 2d 20 60 64 69 72 76 69 73 68 2d 72 65 6c 61 74 69 76 65 2d 73 79 6d	link'.;;.-.`dirvish-relative-sym
2b520	6c 69 6e 6b 27 0a 3b 3b 20 2d 20 60 64 69 72 76 69 73 68 2d 68 61 72 64 6c 69 6e 6b 27 0a 3b 3b	link'.;;.-.`dirvish-hardlink'.;;
2b540	20 2d 20 60 64 69 72 76 69 73 68 2d 72 73 79 6e 63 27 20 28 72 65 71 75 69 72 65 73 20 27 72 73	.-.`dirvish-rsync'.(requires.'rs
2b560	79 6e 63 27 20 65 78 65 63 75 74 61 62 6c 65 29 0a 3b 3b 20 2d 20 60 64 69 72 76 69 73 68 2d 72	ync'.executable).;;.-.`dirvish-r
2b580	73 79 6e 63 2d 74 72 61 6e 73 69 65 6e 74 27 20 28 72 65 71 75 69 72 65 73 20 27 72 73 79 6e 63	sync-transient'.(requires.'rsync
2b5a0	27 20 65 78 65 63 75 74 61 62 6c 65 29 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69	'.executable)..;;;.Code:..(requi
2b5c0	72 65 20 27 64 69 72 65 64 2d 61 75 78 29 0a 28 72 65 71 75 69 72 65 20 27 64 69 72 76 69 73 68	re.'dired-aux).(require.'dirvish
2b5e0	29 0a 28 72 65 71 75 69 72 65 20 27 74 72 61 6d 70 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64	).(require.'tramp)..(defcustom.d
2b600	69 72 76 69 73 68 2d 79 61 6e 6b 2d 73 6f 75 72 63 65 73 20 27 61 6c 6c 0a 20 20 22 54 68 65 20	irvish-yank-sources.'all..."The.
2b620	77 61 79 20 74 6f 20 63 6f 6c 6c 65 63 74 20 73 6f 75 72 63 65 20 66 69 6c 65 73 2e 0a 54 68 65	way.to.collect.source.files..The
2b640	20 76 61 6c 75 65 20 63 61 6e 20 62 65 20 61 20 73 79 6d 62 6f 6c 20 6f 72 20 61 20 66 75 6e 63	.value.can.be.a.symbol.or.a.func
2b660	74 69 6f 6e 20 74 68 61 74 20 72 65 74 75 72 6e 73 20 61 20 66 69 6c 65 73 65 74 2e 22 0a 20 20	tion.that.returns.a.fileset."...
2b680	3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 0a 20 20 3a 74 79 70 65 20 27 28 63 68 6f 69 63 65	:group.'dirvish...:type.'(choice
2b6a0	20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 4d 61 72 6b 65 64 20 66 69 6c 65 73 20 69 6e 20 63 75	.(const.:tag."Marked.files.in.cu
2b6c0	72 72 65 6e 74 20 62 75 66 66 65 72 22 20 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 20 20	rrent.buffer".buffer)...........
2b6e0	20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 4d 61 72 6b 65 64 20 66 69 6c 65 73	.......(const.:tag."Marked.files
2b700	20 69 6e 20 63 75 72 72 65 6e 74 20 73 65 73 73 69 6f 6e 22 20 73 65 73 73 69 6f 6e 29 0a 20 20	.in.current.session".session)...
2b720	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 4d 61 72 6b	...............(const.:tag."Mark
2b740	65 64 20 66 69 6c 65 73 20 69 6e 20 61 6c 6c 20 44 69 72 65 64 20 62 75 66 66 65 72 73 22 20 61	ed.files.in.all.Dired.buffers".a
2b760	6c 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 74 69 6f 6e 20 3a	ll)..................(function.:
2b780	74 61 67 20 22 43 75 73 74 6f 6d 20 66 75 6e 63 74 69 6f 6e 22 29 29 29 0a 0a 28 64 65 66 63 75	tag."Custom.function")))..(defcu
2b7a0	73 74 6f 6d 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 61 75 74 6f 2d 75 6e 6d 61 72 6b 20 74 0a	stom.dirvish-yank-auto-unmark.t.
2b7c0	20 20 22 43 6f 6e 74 72 6f 6c 20 69 66 20 79 61 6e 6b 20 63 6f 6d 6d 61 6e 64 73 20 73 68 6f 75	.."Control.if.yank.commands.shou
2b7e0	6c 64 20 75 6e 6d 61 72 6b 20 77 68 65 6e 20 63 6f 6d 70 6c 65 74 65 2e 22 0a 20 20 3a 67 72 6f	ld.unmark.when.complete."...:gro
2b800	75 70 20 27 64 69 72 76 69 73 68 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 29 0a 0a 28 64 65	up.'dirvish.:type.'boolean)..(de
2b820	66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 6f 76 65 72 77 72 69 74 65 2d 65	fcustom.dirvish-yank-overwrite-e
2b840	78 69 73 74 69 6e 67 2d 66 69 6c 65 73 20 27 61 73 6b 0a 20 20 22 57 68 65 74 68 65 72 20 74 6f	xisting-files.'ask..."Whether.to
2b860	20 6f 76 65 72 77 72 69 74 65 20 65 78 69 73 74 69 6e 67 20 66 69 6c 65 73 20 77 68 65 6e 20 63	.overwrite.existing.files.when.c
2b880	61 6c 6c 69 6e 67 20 79 61 6e 6b 20 63 6f 6d 6d 61 6e 64 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20	alling.yank.commands."...:group.
2b8a0	27 64 69 72 76 69 73 68 0a 20 20 3a 74 79 70 65 20 27 28 63 68 6f 69 63 65 20 28 63 6f 6e 73 74	'dirvish...:type.'(choice.(const
2b8c0	20 3a 74 61 67 20 22 70 72 6f 6d 70 74 20 66 6f 72 20 63 6f 6e 66 69 72 6d 61 74 69 6f 6e 22 20	.:tag."prompt.for.confirmation".
2b8e0	61 73 6b 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 3a 74 61	ask)..................(const.:ta
2b900	67 20 22 61 6c 77 61 79 73 20 6f 76 65 72 77 72 69 74 65 22 20 61 6c 77 61 79 73 29 0a 20 20 20	g."always.overwrite".always)....
2b920	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 73 6b 69 70 20	..............(const.:tag."skip.
2b940	74 72 61 6e 73 66 65 72 72 69 6e 67 20 66 69 6c 65 73 20 77 69 74 68 20 73 61 6d 65 20 6e 61 6d	transferring.files.with.same.nam
2b960	65 73 22 20 73 6b 69 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73	es".skip)..................(cons
2b980	74 20 3a 74 61 67 20 22 6f 76 65 72 77 72 69 74 65 20 61 6e 64 20 62 61 63 6b 75 70 20 74 68 65	t.:tag."overwrite.and.backup.the
2b9a0	20 6f 72 69 67 69 6e 61 6c 20 66 69 6c 65 22 20 62 61 63 6b 75 70 29 29 29 0a 0a 28 64 65 66 63	.original.file".backup)))..(defc
2b9c0	75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 6e 65 77 2d 6e 61 6d 65 2d 73 74 79 6c	ustom.dirvish-yank-new-name-styl
2b9e0	65 20 27 61 70 70 65 6e 64 2d 74 6f 2d 65 78 74 0a 20 20 22 43 6f 6e 74 72 6f 6c 20 74 68 65 20	e.'append-to-ext..."Control.the.
2ba00	77 61 79 20 74 6f 20 63 6f 6d 70 6f 73 65 20 6e 65 77 20 66 69 6c 65 6e 61 6d 65 2e 22 0a 20 20	way.to.compose.new.filename."...
2ba20	3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 0a 20 20 3a 74 79 70 65 20 27 28 63 68 6f 69 63 65	:group.'dirvish...:type.'(choice
2ba40	20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 61 70 70 65 6e 64 20 49 4e 44 45 58 7e 20 74 6f 20 66	.(const.:tag."append.INDEX~.to.f
2ba60	69 6c 65 20 65 78 74 65 6e 73 69 6f 6e 22 20 61 70 70 65 6e 64 2d 74 6f 2d 65 78 74 29 0a 20 20	ile.extension".append-to-ext)...
2ba80	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 61 70 70 65	...............(const.:tag."appe
2baa0	6e 64 20 49 4e 44 45 58 7e 20 74 6f 20 66 69 6c 65 20 6e 61 6d 65 22 20 61 70 70 65 6e 64 2d 74	nd.INDEX~.to.file.name".append-t
2bac0	6f 2d 66 69 6c 65 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f	o-filename)..................(co
2bae0	6e 73 74 20 3a 74 61 67 20 22 70 72 65 70 65 6e 64 20 49 4e 44 45 58 7e 20 74 6f 20 66 69 6c 65	nst.:tag."prepend.INDEX~.to.file
2bb00	20 6e 61 6d 65 22 20 70 72 65 70 65 6e 64 2d 74 6f 2d 66 69 6c 65 6e 61 6d 65 29 29 29 0a 0a 28	.name".prepend-to-filename)))..(
2bb20	64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 72 73 79 6e 63 2d 70 72 6f	defcustom.dirvish-yank-rsync-pro
2bb40	67 72 61 6d 20 22 72 73 79 6e 63 22 0a 20 20 22 54 68 65 20 72 73 79 6e 63 20 62 69 6e 61 72 79	gram."rsync"..."The.rsync.binary
2bb60	20 74 68 61 74 20 77 65 20 61 72 65 20 67 6f 69 6e 67 20 74 6f 20 75 73 65 2e 22 0a 20 20 3a 74	.that.we.are.going.to.use."...:t
2bb80	79 70 65 20 27 73 74 72 69 6e 67 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 29 0a 0a 28 64	ype.'string.:group.'dirvish)..(d
2bba0	65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 72 73 79 6e 63 2d 61 72 67 73	efcustom.dirvish-yank-rsync-args
2bbc0	20 27 28 22 2d 2d 61 72 63 68 69 76 65 22 20 22 2d 2d 76 65 72 62 6f 73 65 22 20 22 2d 2d 63 6f	.'("--archive"."--verbose"."--co
2bbe0	6d 70 72 65 73 73 22 20 22 2d 2d 69 6e 66 6f 3d 70 72 6f 67 72 65 73 73 32 22 29 0a 20 20 22 54	mpress"."--info=progress2")..."T
2bc00	68 65 20 64 65 66 61 75 6c 74 20 6f 70 74 69 6f 6e 73 20 66 6f 72 20 74 68 65 20 72 73 79 6e 63	he.default.options.for.the.rsync
2bc20	20 63 6f 6d 6d 61 6e 64 2e 22 0a 20 20 3a 74 79 70 65 20 27 6c 69 73 74 20 3a 67 72 6f 75 70 20	.command."...:type.'list.:group.
2bc40	27 64 69 72 76 69 73 68 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 79 61	'dirvish)..(defcustom.dirvish-ya
2bc60	6e 6b 2d 6b 65 65 70 2d 73 75 63 63 65 73 73 2d 6c 6f 67 20 74 0a 20 20 22 49 66 20 6e 6f 6e 2d	nk-keep-success-log.t..."If.non-
2bc80	6e 69 6c 20 74 68 65 6e 20 6b 65 65 70 20 6c 6f 67 73 20 6f 66 20 61 6c 6c 20 63 6f 6d 70 6c 65	nil.then.keep.logs.of.all.comple
2bca0	74 65 64 20 79 61 6e 6b 73 2e 0a 42 79 20 64 65 66 61 75 6c 74 20 6f 6e 6c 79 20 6c 6f 67 73 20	ted.yanks..By.default.only.logs.
2bcc0	66 6f 72 20 79 61 6e 6b 73 20 74 68 61 74 20 66 69 6e 69 73 68 65 64 20 77 69 74 68 20 61 6e 20	for.yanks.that.finished.with.an.
2bce0	65 72 72 6f 72 20 61 72 65 0a 6b 65 70 74 20 61 6c 69 76 65 2e 22 0a 20 20 3a 74 79 70 65 20 27	error.are.kept.alive."...:type.'
2bd00	62 6f 6f 6c 65 61 6e 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 29 0a 0a 3b 3b 3b 23 23 23	boolean.:group.'dirvish)..;;;###
2bd20	61 75 74 6f 6c 6f 61 64 20 28 61 75 74 6f 6c 6f 61 64 20 27 64 69 72 76 69 73 68 2d 79 61 6e 6b	autoload.(autoload.'dirvish-yank
2bd40	2d 6d 65 6e 75 20 22 64 69 72 76 69 73 68 2d 79 61 6e 6b 22 20 6e 69 6c 20 74 29 0a 28 64 65 66	-menu."dirvish-yank".nil.t).(def
2bd60	63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 6b 65 79 73 0a 20 20 27 28 28 22 79	custom.dirvish-yank-keys...'(("y
2bd80	22 20 22 59 61 6e 6b 20 28 70 61 73 74 65 29 20 68 65 72 65 22 20 20 20 20 20 20 20 20 20 20 20	"."Yank.(paste).here"...........
2bda0	64 69 72 76 69 73 68 2d 79 61 6e 6b 29 0a 20 20 20 20 28 22 6d 22 20 22 4d 6f 76 65 20 68 65 72	dirvish-yank).....("m"."Move.her
2bdc0	65 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 76 69 73 68 2d 6d 6f 76	e"...................dirvish-mov
2bde0	65 29 0a 20 20 20 20 28 22 73 22 20 22 4d 61 6b 65 20 73 79 6d 6c 69 6e 6b 73 20 68 65 72 65 22	e).....("s"."Make.symlinks.here"
2be00	20 20 20 20 20 20 20 20 20 20 64 69 72 76 69 73 68 2d 73 79 6d 6c 69 6e 6b 29 0a 20 20 20 20 28	..........dirvish-symlink).....(
2be20	22 72 22 20 22 4d 61 6b 65 20 72 65 6c 61 74 69 76 65 20 73 79 6d 6c 69 6e 6b 73 20 68 65 72 65	"r"."Make.relative.symlinks.here
2be40	22 20 64 69 72 76 69 73 68 2d 72 65 6c 61 74 69 76 65 2d 73 79 6d 6c 69 6e 6b 29 0a 20 20 20 20	".dirvish-relative-symlink).....
2be60	28 22 68 22 20 22 4d 61 6b 65 20 68 61 72 64 6c 69 6e 6b 73 20 68 65 72 65 22 20 20 20 20 20 20	("h"."Make.hardlinks.here"......
2be80	20 20 20 64 69 72 76 69 73 68 2d 68 61 72 64 6c 69 6e 6b 29 29 0a 20 20 22 59 41 4e 4b 2d 4b 45	...dirvish-hardlink))..."YANK-KE
2bea0	59 73 20 66 6f 72 20 63 6f 6d 6d 61 6e 64 20 60 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 6d 65 6e	Ys.for.command.`dirvish-yank-men
2bec0	75 27 2e 0a 41 20 59 41 4e 4b 2d 4b 45 59 20 69 73 20 61 20 28 4b 45 59 20 44 4f 43 20 43 4d 44	u'..A.YANK-KEY.is.a.(KEY.DOC.CMD
2bee0	29 20 61 6c 69 73 74 20 77 68 65 72 65 20 4b 45 59 20 69 73 20 74 68 65 20 6b 65 79 20 74 6f 0a	).alist.where.KEY.is.the.key.to.
2bf00	69 6e 76 6f 6b 65 20 74 68 65 20 43 4d 44 2c 20 44 4f 43 20 69 73 20 74 68 65 20 64 6f 63 75 6d	invoke.the.CMD,.DOC.is.the.docum
2bf20	65 6e 74 61 74 69 6f 6e 20 73 74 72 69 6e 67 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76	entation.string."...:group.'dirv
2bf40	69 73 68 20 3a 74 79 70 65 20 27 61 6c 69 73 74 0a 20 20 3a 73 65 74 0a 20 20 28 6c 61 6d 62 64	ish.:type.'alist...:set...(lambd
2bf60	61 20 28 6b 20 76 29 0a 20 20 20 20 28 73 65 74 20 6b 20 76 29 0a 20 20 20 20 28 65 76 61 6c 0a	a.(k.v).....(set.k.v).....(eval.
2bf80	20 20 20 20 20 60 28 74 72 61 6e 73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 70 72 65 66 69 78 20 64	.....`(transient-define-prefix.d
2bfa0	69 72 76 69 73 68 2d 79 61 6e 6b 2d 6d 65 6e 75 20 28 29 0a 20 20 20 20 20 20 20 20 22 59 61 6e	irvish-yank-menu.()........."Yan
2bfc0	6b 20 63 6f 6d 6d 61 6e 64 73 20 6d 65 6e 75 2e 22 0a 20 20 20 20 20 20 20 20 5b 3a 64 65 73 63	k.commands.menu.".........[:desc
2bfe0	72 69 70 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 29 20 28 64 69 72	ription..........(lambda.().(dir
2c000	76 69 73 68 2d 2d 66 6f 72 6d 61 74 2d 6d 65 6e 75 2d 68 65 61 64 69 6e 67 20 22 53 65 6c 65 63	vish--format-menu-heading."Selec
2c020	74 20 79 61 6e 6b 20 6f 70 65 72 61 74 69 6f 6e 20 6f 6e 20 6d 61 72 6b 65 64 20 66 69 6c 65 73	t.yank.operation.on.marked.files
2c040	3a 22 29 29 0a 20 20 20 20 20 20 20 20 20 2c 40 76 5d 0a 20 20 20 20 20 20 20 20 28 69 6e 74 65	:"))..........,@v].........(inte
2c060	72 61 63 74 69 76 65 29 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 64 65 72 69 76 65 64 2d 6d 6f	ractive).........(if.(derived-mo
2c080	64 65 2d 70 20 27 64 69 72 65 64 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 74	de-p.'dired-mode).............(t
2c0a0	72 61 6e 73 69 65 6e 74 2d 73 65 74 75 70 20 27 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 6d 65 6e	ransient-setup.'dirvish-yank-men
2c0c0	75 29 0a 20 20 20 20 20 20 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 4e 6f 74 20 69 6e	u)...........(user-error."Not.in
2c0e0	20 61 20 44 69 72 76 69 73 68 20 62 75 66 66 65 72 22 29 29 29 29 29 29 0a 0a 28 64 65 66 63 6f	.a.Dirvish.buffer"))))))..(defco
2c100	6e 73 74 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 66 6e 2d 73 74 72 69 6e 67 0a 20 20 27 28 28	nst.dirvish-yank-fn-string...'((
2c120	64 69 72 65 64 2d 63 6f 70 79 2d 66 69 6c 65 20 2e 20 22 43 6f 70 79 69 6e 67 22 29 0a 20 20 20	dired-copy-file..."Copying")....
2c140	20 28 64 69 72 65 64 2d 72 65 6e 61 6d 65 2d 66 69 6c 65 20 2e 20 22 4d 6f 76 69 6e 67 22 29 0a	.(dired-rename-file..."Moving").
2c160	20 20 20 20 28 64 69 72 65 64 2d 68 61 72 64 6c 69 6e 6b 20 2e 20 22 48 61 72 64 6c 69 6e 6b 22	....(dired-hardlink..."Hardlink"
2c180	29 0a 20 20 20 20 28 6d 61 6b 65 2d 73 79 6d 62 6f 6c 69 63 2d 6c 69 6e 6b 20 2e 20 22 53 79 6d	).....(make-symbolic-link..."Sym
2c1a0	6c 69 6e 6b 22 29 0a 20 20 20 20 28 64 69 72 65 64 2d 6d 61 6b 65 2d 72 65 6c 61 74 69 76 65 2d	link").....(dired-make-relative-
2c1c0	73 79 6d 6c 69 6e 6b 20 2e 20 22 52 65 6c 61 74 69 76 65 20 73 79 6d 6c 69 6e 6b 22 29 0a 20 20	symlink..."Relative.symlink")...
2c1e0	20 20 28 72 73 79 6e 63 20 2e 20 22 52 73 79 6e 63 22 29 29 29 0a 28 64 65 66 76 61 72 20 64 69	..(rsync..."Rsync"))).(defvar.di
2c200	72 76 69 73 68 2d 79 61 6e 6b 2d 6c 6f 67 2d 62 75 66 66 65 72 73 20 6e 69 6c 29 0a 3b 3b 20 63	rvish-yank-log-buffers.nil).;;.c
2c220	6f 70 69 65 64 20 66 72 6f 6d 20 60 64 69 72 65 64 2d 61 73 79 6e 63 27 20 61 6e 64 20 60 64 69	opied.from.`dired-async'.and.`di
2c240	72 65 64 2d 72 73 79 6e 63 27 0a 28 64 65 66 63 6f 6e 73 74 20 64 69 72 76 69 73 68 2d 79 61 6e	red-rsync'.(defconst.dirvish-yan
2c260	6b 2d 65 6e 76 2d 76 61 72 69 61 62 6c 65 73 2d 72 65 67 65 78 70 0a 20 20 22 5c 5c 60 5c 5c 28	k-env-variables-regexp..."\\`\\(
2c280	74 72 61 6d 70 2d 5c 5c 28 64 65 66 61 75 6c 74 5c 5c 7c 63 6f 6e 6e 65 63 74 69 6f 6e 5c 5c 7c	tramp-\\(default\\\|connection\\\|
2c2a0	72 65 6d 6f 74 65 5c 5c 29 5c 5c 7c 61 6e 67 65 2d 66 74 70 5c 5c 29 2d 2e 2a 22 0a 20 20 22 56	remote\\)\\\|ange-ftp\\)-.*"..."V
2c2c0	61 72 69 61 62 6c 65 73 20 6d 61 74 63 68 69 6e 67 20 74 68 69 73 20 72 65 67 65 78 70 20 77 69	ariables.matching.this.regexp.wi
2c2e0	6c 6c 20 62 65 20 6c 6f 61 64 65 64 20 6f 6e 20 43 68 69 6c 64 20 45 6d 61 63 73 2e 22 29 0a 3b	ll.be.loaded.on.Child.Emacs.").;
2c300	3b 20 6d 61 74 63 68 65 73 20 22 45 6e 74 65 72 20 70 61 73 73 70 68 72 61 73 65 20 66 6f 72 20	;.matches."Enter.passphrase.for.
2c320	6b 65 79 20 2e 2e 2e 22 20 28 73 73 68 29 20 61 6e 64 20 22 70 61 73 73 77 6f 72 64 20 66 6f 72	key....".(ssh).and."password.for
2c340	20 2e 2e 2e 22 20 28 73 61 6d 62 61 29 0a 28 64 65 66 76 61 72 20 64 69 72 76 69 73 68 2d 70 61	....".(samba).(defvar.dirvish-pa
2c360	73 73 70 68 72 61 73 65 2d 73 74 61 6c 6c 2d 72 65 67 65 78 0a 20 20 22 5c 5c 28 45 6e 74 65 72	ssphrase-stall-regex..."\\(Enter
2c380	20 5c 5c 29 3f 5b 50 70 5d 61 73 73 5c 5c 28 77 6f 72 64 5c 5c 7c 70 68 72 61 73 65 5c 5c 29 20	.\\)?[Pp]ass\$word\\\|phrase\$.
2c3a0	66 6f 72 5c 5c 28 20 6b 65 79 5c 5c 29 3f 22 0a 20 20 22 41 20 72 65 67 65 78 20 74 6f 20 64 65	for\$.key\$?"..."A.regex.to.de
2c3c0	74 65 63 74 20 70 61 73 73 70 68 72 61 73 65 20 70 72 6f 6d 70 74 73 2e 22 29 0a 28 64 65 66 76	tect.passphrase.prompts.").(defv
2c3e0	61 72 20 64 69 72 76 69 73 68 2d 70 65 72 63 65 6e 74 2d 63 6f 6d 70 6c 65 74 65 2d 72 65 67 65	ar.dirvish-percent-complete-rege
2c400	78 20 22 5b 5b 3a 64 69 67 69 74 3a 5d 5d 5c 5c 7b 31 2c 33 5c 5c 7d 25 22 0a 20 20 22 41 20 72	x."[[:digit:]]\\{1,3\\}%"..."A.r
2c420	65 67 65 78 20 74 6f 20 65 78 74 72 61 63 74 20 74 68 65 20 25 20 63 6f 6d 70 6c 65 74 65 20 66	egex.to.extract.the.%.complete.f
2c440	72 6f 6d 20 61 20 66 69 6c 65 2e 22 29 0a 28 64 65 66 76 61 72 20 64 69 72 76 69 73 68 2d 79 61	rom.a.file.").(defvar.dirvish-ya
2c460	6e 6b 2d 2d 72 65 6d 6f 74 65 2d 70 6f 72 74 66 77 64 0a 20 20 22 73 73 68 20 2d 70 20 25 64 20	nk--remote-portfwd..."ssh.-p.%d.
2c480	2d 6f 20 53 74 72 69 63 74 48 6f 73 74 4b 65 79 43 68 65 63 6b 69 6e 67 3d 6e 6f 20 2d 6f 20 55	-o.StrictHostKeyChecking=no.-o.U
2c4a0	73 65 72 4b 6e 6f 77 6e 48 6f 73 74 73 46 69 6c 65 3d 2f 64 65 76 2f 6e 75 6c 6c 22 0a 20 20 22	serKnownHostsFile=/dev/null"..."
2c4c0	41 6e 20 65 78 70 6c 69 63 69 74 20 73 73 68 20 63 6f 6d 6d 61 6e 64 20 66 6f 72 20 72 73 79 6e	An.explicit.ssh.command.for.rsyn
2c4e0	63 20 74 6f 20 75 73 65 20 70 6f 72 74 20 66 6f 72 77 61 72 64 65 64 20 70 72 6f 78 79 2e 0a 54	c.to.use.port.forwarded.proxy..T
2c500	68 65 20 73 74 72 69 6e 67 20 69 73 20 74 72 65 61 74 65 64 20 61 73 20 61 20 66 6f 72 6d 61 74	he.string.is.treated.as.a.format
2c520	20 73 74 72 69 6e 67 20 77 68 65 72 65 20 25 64 20 69 73 20 72 65 70 6c 61 63 65 64 20 77 69 74	.string.where.%d.is.replaced.wit
2c540	68 20 74 68 65 0a 72 65 73 75 6c 74 73 20 6f 66 20 60 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 2d	h.the.results.of.`dirvish-yank--
2c560	67 65 74 2d 72 65 6d 6f 74 65 2d 70 6f 72 74 27 2e 22 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76	get-remote-port'.")..(defun.dirv
2c580	69 73 68 2d 79 61 6e 6b 2d 2d 67 65 74 2d 72 65 6d 6f 74 65 2d 70 6f 72 74 20 28 29 0a 20 20 22	ish-yank--get-remote-port.()..."
2c5a0	52 65 74 75 72 6e 20 74 68 65 20 72 65 6d 6f 74 65 20 70 6f 72 74 20 77 65 20 73 68 61 6c 6c 20	Return.the.remote.port.we.shall.
2c5c0	75 73 65 20 66 6f 72 20 74 68 65 20 72 65 76 65 72 73 65 20 70 6f 72 74 2d 66 6f 72 77 61 72 64	use.for.the.reverse.port-forward
2c5e0	2e 22 0a 20 20 28 2b 20 35 30 30 30 30 20 28 6c 65 6e 67 74 68 20 64 69 72 76 69 73 68 2d 79 61	."...(+.50000.(length.dirvish-ya
2c600	6e 6b 2d 6c 6f 67 2d 62 75 66 66 65 72 73 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73	nk-log-buffers)))..(defun.dirvis
2c620	68 2d 79 61 6e 6b 2d 2d 67 65 74 2d 73 72 63 73 20 28 26 6f 70 74 69 6f 6e 61 6c 20 72 61 6e 67	h-yank--get-srcs.(&optional.rang
2c640	65 29 0a 20 20 22 47 65 74 20 61 6c 6c 20 6d 61 72 6b 65 64 20 66 69 6c 65 6e 61 6d 65 73 20 69	e)..."Get.all.marked.filenames.i
2c660	6e 20 52 41 4e 47 45 2e 0a 52 41 4e 47 45 20 63 61 6e 20 62 65 20 60 62 75 66 66 65 72 27 2c 20	n.RANGE..RANGE.can.be.`buffer',.
2c680	60 73 65 73 73 69 6f 6e 27 2c 20 60 61 6c 6c 27 2e 22 0a 20 20 28 73 65 74 71 20 72 61 6e 67 65	`session',.`all'."...(setq.range
2c6a0	20 28 6f 72 20 72 61 6e 67 65 20 27 62 75 66 66 65 72 29 29 0a 20 20 28 63 6c 2d 72 65 6d 6f 76	.(or.range.'buffer))...(cl-remov
2c6c0	65 2d 64 75 70 6c 69 63 61 74 65 73 0a 20 20 20 28 63 6c 2d 6c 6f 6f 70 0a 20 20 20 20 77 69 74	e-duplicates....(cl-loop.....wit
2c6e0	68 20 63 61 73 65 2d 66 6f 6c 64 2d 73 65 61 72 63 68 20 3d 20 6e 69 6c 0a 20 20 20 20 77 69 74	h.case-fold-search.=.nil.....wit
2c700	68 20 72 65 67 65 78 70 20 3d 20 28 64 69 72 65 64 2d 6d 61 72 6b 65 72 2d 72 65 67 65 78 70 29	h.regexp.=.(dired-marker-regexp)
2c720	0a 20 20 20 20 77 69 74 68 20 62 75 66 66 65 72 73 20 3d 20 28 70 63 61 73 65 20 72 61 6e 67 65	.....with.buffers.=.(pcase.range
2c740	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 62 75 66 66 65 72 20 28	......................('buffer.(
2c760	6c 69 73 74 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20 20 20 20 20 20	list.(current-buffer))).........
2c780	20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 73 65 73 73 69 6f 6e 20 28 6d 61 70 63 61 72 20 23	.............('session.(mapcar.#
2c7a0	27 63 64 72 20 28 64 76 2d 72 6f 6f 74 73 20 28 64 69 72 76 69 73 68 2d 63 75 72 72 29 29 29 29	'cdr.(dv-roots.(dirvish-curr))))
2c7c0	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 61 6c 6c 20 28 63 6c 2d	......................('all.(cl-
2c7e0	6c 6f 6f 70 20 66 6f 72 20 62 20 69 6e 20 28 62 75 66 66 65 72 2d 6c 69 73 74 29 0a 20 20 20 20	loop.for.b.in.(buffer-list).....
2c800	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	................................
2c820	77 68 65 6e 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 62 0a 20 20 20 20	when.(with-current-buffer.b.....
2c840	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	................................
2c860	20 20 20 20 20 20 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	.......(eq.major-mode.'dired-mod
2c880	65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	e)).............................
2c8a0	20 20 20 20 20 20 20 20 63 6f 6c 6c 65 63 74 20 62 29 29 29 0a 20 20 20 20 66 6f 72 20 62 75 66	........collect.b))).....for.buf
2c8c0	66 65 72 20 69 6e 20 28 73 65 71 2d 66 69 6c 74 65 72 20 23 27 62 75 66 66 65 72 2d 6c 69 76 65	fer.in.(seq-filter.#'buffer-live
2c8e0	2d 70 20 62 75 66 66 65 72 73 29 20 61 70 70 65 6e 64 0a 20 20 20 20 28 77 69 74 68 2d 63 75 72	-p.buffers).append.....(with-cur
2c900	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 77 68 65 6e 20 28	rent-buffer.buffer.......(when.(
2c920	73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74	save-excursion.(goto-char.(point
2c940	2d 6d 69 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	-min))..........................
2c960	20 20 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 72 65 67 65 78 70 20 6e 69 6c	...(re-search-forward.regexp.nil
2c980	20 74 29 29 0a 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 6d 61 70 2d 6f 76 65 72 2d 6d 61 72	.t)).........(dired-map-over-mar
2c9a0	6b 73 20 28 64 69 72 65 64 2d 67 65 74 2d 66 69 6c 65 6e 61 6d 65 29 20 6e 69 6c 29 29 29 29 0a	ks.(dired-get-filename).nil)))).
2c9c0	20 20 20 3a 74 65 73 74 20 23 27 65 71 75 61 6c 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69	...:test.#'equal))..(defun.dirvi
2c9e0	73 68 2d 79 61 6e 6b 2d 2d 72 65 61 64 2d 64 65 73 74 20 28 6d 65 74 68 6f 64 29 0a 20 20 22 52	sh-yank--read-dest.(method)..."R
2ca00	65 61 64 20 64 65 73 74 20 64 69 72 20 66 6f 72 20 4d 45 54 48 4f 44 20 77 68 65 6e 20 70 72 65	ead.dest.dir.for.METHOD.when.pre
2ca20	66 69 78 65 64 20 77 69 74 68 20 60 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 27 2e	fixed.with.`current-prefix-arg'.
2ca40	22 0a 20 20 28 6c 69 73 74 20 28 77 68 65 6e 20 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61	"...(list.(when.current-prefix-a
2ca60	72 67 0a 20 20 20 20 20 20 20 20 20 20 28 72 65 61 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 28 66 6f	rg...........(read-file-name.(fo
2ca80	72 6d 61 74 20 22 25 73 20 66 69 6c 65 73 20 74 6f 3a 20 22 20 6d 65 74 68 6f 64 29 0a 20 20 20	rmat."%s.files.to:.".method)....
2caa0	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 64 77	.......................(dired-dw
2cac0	69 6d 2d 74 61 72 67 65 74 2d 64 69 72 65 63 74 6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20	im-target-directory)............
2cae0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 20 6e 69 6c 20 6e 69 6c 20 27 66 69 6c 65	...............nil.nil.nil.'file
2cb00	2d 64 69 72 65 63 74 6f 72 79 2d 70 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68	-directory-p))))..(defun.dirvish
2cb20	2d 79 61 6e 6b 2d 2d 66 69 6c 65 6e 61 6d 65 2d 66 6f 72 2d 72 73 79 6e 63 20 28 66 69 6c 65 29	-yank--filename-for-rsync.(file)
2cb40	0a 20 20 22 52 65 66 6f 72 6d 61 74 20 61 20 74 72 61 6d 70 20 46 49 4c 45 20 74 6f 20 6f 6e 65	..."Reformat.a.tramp.FILE.to.one
2cb60	20 75 73 61 62 6c 65 20 66 6f 72 20 72 73 79 6e 63 2e 22 0a 20 20 28 69 66 20 28 74 72 61 6d 70	.usable.for.rsync."...(if.(tramp
2cb80	2d 74 72 61 6d 70 2d 66 69 6c 65 2d 70 20 66 69 6c 65 29 0a 20 20 20 20 20 20 28 77 69 74 68 2d	-tramp-file-p.file).......(with-
2cba0	70 61 72 73 65 64 2d 74 72 61 6d 70 2d 66 69 6c 65 2d 6e 61 6d 65 20 66 69 6c 65 20 74 66 6f 70	parsed-tramp-file-name.file.tfop
2cbc0	0a 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 25 73 3a 25 73 22 20 28 69 66 20 74	.........(format."%s%s:%s".(if.t
2cbe0	66 6f 70 2d 75 73 65 72 20 28 66 6f 72 6d 61 74 20 22 25 73 40 22 20 74 66 6f 70 2d 75 73 65 72	fop-user.(format."%s@".tfop-user
2cc00	29 20 22 22 29 20 74 66 6f 70 2d 68 6f 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	)."").tfop-host.................
2cc20	28 73 68 65 6c 6c 2d 71 75 6f 74 65 2d 61 72 67 75 6d 65 6e 74 20 74 66 6f 70 2d 6c 6f 63 61 6c	(shell-quote-argument.tfop-local
2cc40	6e 61 6d 65 29 29 29 0a 20 20 20 20 28 73 68 65 6c 6c 2d 71 75 6f 74 65 2d 61 72 67 75 6d 65 6e	name))).....(shell-quote-argumen
2cc60	74 20 66 69 6c 65 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 70	t.file)))..(defun.dirvish-yank-p
2cc80	72 6f 63 2d 73 65 6e 74 69 6e 65 6c 20 28 70 72 6f 63 20 5f 65 78 69 74 29 0a 20 20 22 53 65 6e	roc-sentinel.(proc._exit)..."Sen
2cca0	74 69 6e 65 6c 20 66 6f 72 20 79 61 6e 6b 20 74 61 73 6b 20 50 52 4f 43 2e 22 0a 20 20 28 70 63	tinel.for.yank.task.PROC."...(pc
2ccc0	61 73 65 2d 6c 65 74 20 28 28 70 72 6f 63 2d 62 75 66 20 28 70 72 6f 63 65 73 73 2d 62 75 66 66	ase-let.((proc-buf.(process-buff
2cce0	65 72 20 70 72 6f 63 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 60 28 2c 62 75 66 66	er.proc))...............(`(,buff
2cd00	65 72 20 2c 5f 20 2c 5f 20 2c 6d 65 74 68 6f 64 29 20 28 70 72 6f 63 65 73 73 2d 67 65 74 20 70	er.,_.,_.,method).(process-get.p
2cd20	72 6f 63 20 27 64 65 74 61 69 6c 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74	roc.'details))...............(st
2cd40	61 74 75 73 20 28 70 72 6f 63 65 73 73 2d 73 74 61 74 75 73 20 70 72 6f 63 29 29 0a 20 20 20 20	atus.(process-status.proc)).....
2cd60	20 20 20 20 20 20 20 20 20 20 28 73 75 63 63 65 73 73 20 28 65 71 20 28 70 72 6f 63 65 73 73 2d	..........(success.(eq.(process-
2cd80	65 78 69 74 2d 73 74 61 74 75 73 20 70 72 6f 63 29 20 30 29 29 29 0a 20 20 20 20 28 77 68 65 6e	exit-status.proc).0))).....(when
2cda0	20 28 6d 65 6d 71 20 73 74 61 74 75 73 20 27 28 65 78 69 74 20 73 69 67 6e 61 6c 29 29 0a 20 20	.(memq.status.'(exit.signal))...
2cdc0	20 20 20 20 28 69 66 20 28 61 6e 64 20 73 75 63 63 65 73 73 20 28 6e 6f 74 20 64 69 72 76 69 73	....(if.(and.success.(not.dirvis
2cde0	68 2d 79 61 6e 6b 2d 6b 65 65 70 2d 73 75 63 63 65 73 73 2d 6c 6f 67 29 29 0a 20 20 20 20 20 20	h-yank-keep-success-log)).......
2ce00	20 20 20 20 28 6b 69 6c 6c 2d 62 75 66 66 65 72 20 70 72 6f 63 2d 62 75 66 29 0a 20 20 20 20 20	....(kill-buffer.proc-buf)......
2ce20	20 20 20 28 6c 65 74 20 28 28 63 6f 6d 70 2d 62 75 66 66 65 72 20 28 64 69 72 76 69 73 68 2d 2d	...(let.((comp-buffer.(dirvish--
2ce40	75 74 69 6c 2d 62 75 66 66 65 72 20 22 63 6f 6d 70 6c 65 74 65 2d 79 61 6e 6b 2d 6c 6f 67 22 20	util-buffer."complete-yank-log".
2ce60	6e 69 6c 20 6e 69 6c 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72	nil.nil.t)))...........(with-cur
2ce80	72 65 6e 74 2d 62 75 66 66 65 72 20 63 6f 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20	rent-buffer.comp-buffer.........
2cea0	20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 20 20 20 20	....(goto-char.(point-max)).....
2cec0	20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 5c 6e 5c 6e 22 20 28 66 6f 72 6d 61 74 20 22	........(insert."\n\n".(format."
2cee0	25 73 22 20 6d 65 74 68 6f 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	%s".method).....................
2cf00	22 20 66 69 6e 69 73 68 65 64 20 40 20 22 20 28 63 75 72 72 65 6e 74 2d 74 69 6d 65 2d 73 74 72	".finished.@.".(current-time-str
2cf20	69 6e 67 29 20 22 5c 6e 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 2d 62	ing)."\n").............(insert-b
2cf40	75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 20 70 72 6f 63 2d 62 75 66 29 0a 20 20 20 20 20 20	uffer-substring.proc-buf).......
2cf60	20 20 20 20 20 20 28 6b 69 6c 6c 2d 62 75 66 66 65 72 20 70 72 6f 63 2d 62 75 66 29 0a 20 20 20	......(kill-buffer.proc-buf)....
2cf80	20 20 20 20 20 20 20 20 20 3b 3b 20 74 72 75 6e 63 61 74 65 20 6f 6c 64 20 6c 6f 67 73 0a 20 20	.........;;.truncate.old.logs...
2cfa0	20 20 20 20 20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20	..........(save-excursion.......
2cfc0	20 20 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 72 65 67 69 6f 6e 0a 20 20 20 20 20 20 20 20 20	........(delete-region..........
2cfe0	20 20 20 20 20 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	......(point-min)...............
2d000	20 28 6c 65 74 20 28 28 6d 61 78 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 0a 20 20 20 20 20 20	.(let.((max.(point-max))).......
2d020	20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 3c 20 6d 61 78 20 32 30 30 30 30 29 0a 20 20 20	...........(if.(<.max.20000)....
2d040	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 0a 20 20	..................(point-min)...
2d060	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 6d 61 78 29	.................(goto-char.max)
2d080	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 6f 74 69 6d 65 73 20 28 5f 6e	....................(dotimes.(_n
2d0a0	20 34 30 29 20 28 62 61 63 6b 77 61 72 64 2d 70 61 72 61 67 72 61 70 68 29 29 0a 20 20 20 20 20	.40).(backward-paragraph))......
2d0c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6f 69 6e 74 29 29 29 29 29 0a 20 20 20 20 20 20	..............(point))))).......
2d0e0	20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 73 75 63 63 65 73 73 0a 20 20 20 20 20 20 20 20 20 20	......(unless.success...........
2d100	20 20 20 20 28 6d 65 73 73 61 67 65 20 22 59 61 6e 6b 20 66 69 6e 69 73 68 65 64 20 77 69 74 68	....(message."Yank.finished.with
2d120	20 61 6e 20 65 72 72 6f 72 3a 20 73 65 65 20 62 75 66 66 65 72 20 25 73 20 66 6f 72 20 64 65 74	.an.error:.see.buffer.%s.for.det
2d140	61 69 6c 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 6d	ails"........................com
2d160	70 2d 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6f 70 2d 74 6f 2d	p-buffer)...............(pop-to-
2d180	62 75 66 66 65 72 20 63 6f 6d 70 2d 62 75 66 66 65 72 29 29 29 29 29 0a 20 20 20 20 20 20 28 73	buffer.comp-buffer))))).......(s
2d1a0	65 74 71 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 6c 6f 67 2d 62 75 66 66 65 72 73 20 28 72 65	etq.dirvish-yank-log-buffers.(re
2d1c0	6d 6f 76 65 20 70 72 6f 63 2d 62 75 66 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 6c 6f 67 2d 62	move.proc-buf.dirvish-yank-log-b
2d1e0	75 66 66 65 72 73 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 65 71 20 62 75 66 66 65 72 20	uffers)).......(when.(eq.buffer.
2d200	28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 0a 20 20 20 20 20 20 20 20 28 77 69 74 68 2d	(current-buffer)).........(with-
2d220	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 20 20 20 20	current-buffer.buffer...........
2d240	28 72 65 76 65 72 74 2d 62 75 66 66 65 72 29 20 28 64 69 72 76 69 73 68 2d 75 70 64 61 74 65 2d	(revert-buffer).(dirvish-update-
2d260	62 6f 64 79 2d 68 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 79 61 6e	body-h))))))..(defun.dirvish-yan
2d280	6b 2d 70 72 6f 63 2d 66 69 6c 74 65 72 20 28 70 72 6f 63 20 73 74 72 69 6e 67 29 0a 20 20 22 46	k-proc-filter.(proc.string)..."F
2d2a0	69 6c 74 65 72 20 66 6f 72 20 79 61 6e 6b 20 74 61 73 6b 20 50 52 4f 43 27 73 20 53 54 52 49 4e	ilter.for.yank.task.PROC's.STRIN
2d2c0	47 2e 22 0a 20 20 28 6c 65 74 20 28 28 70 72 6f 63 2d 62 75 66 20 28 70 72 6f 63 65 73 73 2d 62	G."...(let.((proc-buf.(process-b
2d2e0	75 66 66 65 72 20 70 72 6f 63 29 29 29 0a 20 20 20 20 3b 3b 20 63 68 65 63 6b 20 66 6f 72 20 70	uffer.proc))).....;;.check.for.p
2d300	61 73 73 70 68 72 61 73 65 20 70 72 6f 6d 70 74 0a 20 20 20 20 28 77 68 65 6e 20 28 73 74 72 69	assphrase.prompt.....(when.(stri
2d320	6e 67 2d 6d 61 74 63 68 20 64 69 72 76 69 73 68 2d 70 61 73 73 70 68 72 61 73 65 2d 73 74 61 6c	ng-match.dirvish-passphrase-stal
2d340	6c 2d 72 65 67 65 78 20 73 74 72 69 6e 67 29 0a 20 20 20 20 20 20 28 70 72 6f 63 65 73 73 2d 73	l-regex.string).......(process-s
2d360	65 6e 64 2d 73 74 72 69 6e 67 20 70 72 6f 63 20 28 63 6f 6e 63 61 74 20 28 72 65 61 64 2d 70 61	end-string.proc.(concat.(read-pa
2d380	73 73 77 64 20 73 74 72 69 6e 67 29 20 22 5c 6e 22 29 29 29 0a 20 20 20 20 3b 3b 20 41 6e 73 77	sswd.string)."\n"))).....;;.Answ
2d3a0	65 72 20 79 65 73 20 66 6f 72 20 60 6c 61 72 67 65 20 66 69 6c 65 27 20 70 72 6f 6d 70 74 0a 20	er.yes.for.`large.file'.prompt..
2d3c0	20 20 20 28 77 68 65 6e 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 46 69 6c 65 20 2e 2a 20	...(when.(string-match."File..*.
2d3e0	69 73 20 6c 61 72 67 65 5c 5c 28 2e 2a 5c 5c 29 2c 20 72 65 61 6c 6c 79 20 63 6f 70 79 22 20 73	is.large\$.*\$,.really.copy".s
2d400	74 72 69 6e 67 29 0a 20 20 20 20 20 20 28 70 72 6f 63 65 73 73 2d 73 65 6e 64 2d 73 74 72 69 6e	tring).......(process-send-strin
2d420	67 20 70 72 6f 63 20 22 79 5c 6e 22 29 29 0a 20 20 20 20 28 6c 65 74 20 28 28 6f 6c 64 2d 70 72	g.proc."y\n")).....(let.((old-pr
2d440	6f 63 65 73 73 2d 6d 61 72 6b 20 28 70 72 6f 63 65 73 73 2d 6d 61 72 6b 20 70 72 6f 63 29 29 29	ocess-mark.(process-mark.proc)))
2d460	0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 20 70 72 6f 63	.......(when.(buffer-live-p.proc
2d480	2d 62 75 66 29 0a 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	-buf).........(with-current-buff
2d4a0	65 72 20 70 72 6f 63 2d 62 75 66 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 73 74 72	er.proc-buf...........(when.(str
2d4c0	69 6e 67 2d 6d 61 74 63 68 20 64 69 72 76 69 73 68 2d 70 65 72 63 65 6e 74 2d 63 6f 6d 70 6c 65	ing-match.dirvish-percent-comple
2d4e0	74 65 2d 72 65 67 65 78 20 73 74 72 69 6e 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69	te-regex.string).............(di
2d500	72 76 69 73 68 2d 70 72 6f 70 20 3a 79 61 6e 6b 2d 70 65 72 63 65 6e 74 20 28 6d 61 74 63 68 2d	rvish-prop.:yank-percent.(match-
2d520	73 74 72 69 6e 67 20 30 20 73 74 72 69 6e 67 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 66	string.0.string)).............(f
2d540	6f 72 63 65 2d 6d 6f 64 65 2d 6c 69 6e 65 2d 75 70 64 61 74 65 20 74 29 29 0a 20 20 20 20 20 20	orce-mode-line-update.t)).......
2d560	20 20 20 20 28 6c 65 74 20 28 28 6d 6f 76 69 6e 67 20 28 3d 20 28 70 6f 69 6e 74 29 20 6f 6c 64	....(let.((moving.(=.(point).old
2d580	2d 70 72 6f 63 65 73 73 2d 6d 61 72 6b 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 61	-process-mark))).............(sa
2d5a0	76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f	ve-excursion...............(goto
2d5c0	2d 63 68 61 72 20 6f 6c 64 2d 70 72 6f 63 65 73 73 2d 6d 61 72 6b 29 0a 20 20 20 20 20 20 20 20	-char.old-process-mark).........
2d5e0	20 20 20 20 20 20 28 69 6e 73 65 72 74 20 73 74 72 69 6e 67 29 0a 20 20 20 20 20 20 20 20 20 20	......(insert.string)...........
2d600	20 20 20 20 28 73 65 74 2d 6d 61 72 6b 65 72 20 28 70 72 6f 63 65 73 73 2d 6d 61 72 6b 20 70 72	....(set-marker.(process-mark.pr
2d620	6f 63 29 20 28 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 6d 6f	oc).(point))).............(if.mo
2d640	76 69 6e 67 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 72 6f 63 65 73 73 2d 6d 61 72 6b 20 70 72	ving.(goto-char.(process-mark.pr
2d660	6f 63 29 29 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 79 61 6e 6b	oc)))))))))..(defun.dirvish-yank
2d680	2d 2d 65 78 65 63 75 74 65 20 28 63 6d 64 20 64 65 74 61 69 6c 73 20 26 6f 70 74 69 6f 6e 61 6c	--execute.(cmd.details.&optional
2d6a0	20 62 61 74 63 68 29 0a 20 20 22 45 78 65 63 75 74 65 20 43 4d 44 2c 20 70 75 74 20 44 45 54 41	.batch)..."Execute.CMD,.put.DETA
2d6c0	49 4c 53 20 69 6e 74 6f 20 74 68 65 20 70 72 6f 63 65 73 73 2e 0a 57 68 65 6e 20 42 41 54 43 48	ILS.into.the.process..When.BATCH
2d6e0	2c 20 65 78 65 63 75 74 65 20 74 68 65 20 63 6f 6d 6d 61 6e 64 20 75 73 69 6e 67 20 60 65 6d 61	,.execute.the.command.using.`ema
2d700	63 73 20 2d 71 20 2d 62 61 74 63 68 27 2e 22 0a 20 20 28 70 63 61 73 65 2d 6c 65 74 2a 20 28 28	cs.-q.-batch'."...(pcase-let*.((
2d720	70 72 6f 63 65 73 73 2d 63 6f 6e 6e 65 63 74 69 6f 6e 2d 74 79 70 65 20 6e 69 6c 29 20 28 6e 61	process-connection-type.nil).(na
2d740	6d 65 20 22 2a 64 69 72 76 69 73 68 2d 79 61 6e 6b 2a 22 29 0a 20 20 20 20 20 20 20 20 20 20 20	me."dirvish-yank")............
2d760	20 20 20 20 28 62 75 66 20 28 64 69 72 76 69 73 68 2d 2d 75 74 69 6c 2d 62 75 66 66 65 72 0a 20	....(buf.(dirvish--util-buffer..
2d780	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 74 20 22 79 61 6e	....................(format."yan
2d7a0	6b 40 25 73 22 20 28 63 75 72 72 65 6e 74 2d 74 69 6d 65 2d 73 74 72 69 6e 67 29 29 20 6e 69 6c	k@%s".(current-time-string)).nil
2d7c0	20 6e 69 6c 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 60 28 2c 5f 20 2c 5f	.nil.t))................(`(,_.,_
2d7e0	20 2c 64 65 73 74 20 2c 5f 29 20 64 65 74 61 69 6c 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	.,dest.,_).details).............
2d800	20 20 20 28 70 72 6f 63 20 28 69 66 20 62 61 74 63 68 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	...(proc.(if.batch..............
2d820	20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 71 20 28 69 66 20 28 66 69 6c 65 2d	............(let*.((q.(if.(file-
2d840	72 65 6d 6f 74 65 2d 70 20 64 65 73 74 29 20 22 2d 71 22 20 22 2d 51 22 29 29 0a 20 20 20 20 20	remote-p.dest)."-q"."-Q"))......
2d860	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 63 20 28 6c	...........................(c.(l
2d880	69 73 74 20 64 69 72 76 69 73 68 2d 65 6d 61 63 73 2d 62 69 6e 20 71 20 22 2d 62 61 74 63 68 22	ist.dirvish-emacs-bin.q."-batch"
2d8a0	20 22 2d 2d 65 76 61 6c 22 20 63 6d 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	."--eval".cmd)))................
2d8c0	20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 6b 65 2d 70 72 6f 63 65 73 73 20 3a 6e 61 6d 65 20	............(make-process.:name.
2d8e0	6e 61 6d 65 20 3a 62 75 66 66 65 72 20 62 75 66 20 3a 63 6f 6d 6d 61 6e 64 20 63 29 29 0a 20 20	name.:buffer.buf.:command.c))...
2d900	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 61 72 74 2d 70 72 6f 63	.....................(start-proc
2d920	65 73 73 2d 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e 64 20 6e 61 6d 65 20 62 75 66 20 63 6d 64 29 29	ess-shell-command.name.buf.cmd))
2d940	29 29 0a 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 62 75 66 20	)).....(with-current-buffer.buf.
2d960	28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 79 61 6e 6b 2d 64 65 74 61 69 6c 73 20 64 65 74 61	(dirvish-prop.:yank-details.deta
2d980	69 6c 73 29 29 0a 20 20 20 20 28 70 72 6f 63 65 73 73 2d 70 75 74 20 70 72 6f 63 20 27 64 65 74	ils)).....(process-put.proc.'det
2d9a0	61 69 6c 73 20 64 65 74 61 69 6c 73 29 0a 20 20 20 20 28 73 65 74 2d 70 72 6f 63 65 73 73 2d 73	ails.details).....(set-process-s
2d9c0	65 6e 74 69 6e 65 6c 20 70 72 6f 63 20 23 27 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 70 72 6f 63	entinel.proc.#'dirvish-yank-proc
2d9e0	2d 73 65 6e 74 69 6e 65 6c 29 0a 20 20 20 20 28 73 65 74 2d 70 72 6f 63 65 73 73 2d 66 69 6c 74	-sentinel).....(set-process-filt
2da00	65 72 20 70 72 6f 63 20 23 27 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 70 72 6f 63 2d 66 69 6c 74	er.proc.#'dirvish-yank-proc-filt
2da20	65 72 29 0a 20 20 20 20 28 77 68 65 6e 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 61 75 74 6f 2d	er).....(when.dirvish-yank-auto-
2da40	75 6e 6d 61 72 6b 0a 20 20 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 62 75 66 20 69 6e	unmark.......(cl-loop.for.buf.in
2da60	20 28 62 75 66 66 65 72 2d 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 6f	.(buffer-list)................do
2da80	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 0a 20 20 20 20 20 20	.(with-current-buffer.buf.......
2daa0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f	..............(when.(eq.major-mo
2dac0	64 65 20 27 64 69 72 65 64 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	de.'dired-mode).................
2dae0	20 20 20 20 20 20 28 64 69 72 65 64 2d 75 6e 6d 61 72 6b 2d 61 6c 6c 2d 6d 61 72 6b 73 29 29 29	......(dired-unmark-all-marks)))
2db00	29 29 0a 20 20 20 20 28 70 75 73 68 20 62 75 66 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 6c 6f	)).....(push.buf.dirvish-yank-lo
2db20	67 2d 62 75 66 66 65 72 73 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 79 61 6e	g-buffers)))..(defun.dirvish-yan
2db40	6b 2d 2d 6e 65 77 62 61 73 65 20 28 62 61 73 65 2d 6e 61 6d 65 20 66 69 6c 65 73 65 74 20 64 65	k--newbase.(base-name.fileset.de
2db60	73 74 29 0a 20 20 22 45 6e 73 75 72 65 20 61 6e 20 75 6e 69 71 75 65 20 66 69 6c 65 6e 61 6d 65	st)..."Ensure.an.unique.filename
2db80	20 66 6f 72 20 42 41 53 45 2d 4e 41 4d 45 20 61 74 20 44 45 53 54 20 77 69 74 68 20 46 49 4c 45	.for.BASE-NAME.at.DEST.with.FILE
2dba0	53 45 54 2e 22 0a 20 20 28 6c 65 74 20 28 28 62 6e 61 6d 65 7e 20 62 61 73 65 2d 6e 61 6d 65 29	SET."...(let.((bname~.base-name)
2dbc0	20 28 69 64 78 20 31 29 29 0a 20 20 20 20 28 77 68 69 6c 65 20 28 6d 65 6d 62 65 72 20 62 6e 61	.(idx.1)).....(while.(member.bna
2dbe0	6d 65 7e 20 66 69 6c 65 73 65 74 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 62 6e 61 6d 65 7e 0a	me~.fileset).......(setq.bname~.
2dc00	20 20 20 20 20 20 20 20 20 20 20 20 28 70 63 61 73 65 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d	............(pcase.dirvish-yank-
2dc20	6e 65 77 2d 6e 61 6d 65 2d 73 74 79 6c 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 61	new-name-style...............('a
2dc40	70 70 65 6e 64 2d 74 6f 2d 65 78 74 20 28 66 6f 72 6d 61 74 20 22 25 73 25 73 7e 22 20 62 61 73	ppend-to-ext.(format."%s%s~".bas
2dc60	65 2d 6e 61 6d 65 20 69 64 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 61 70 70	e-name.idx))...............('app
2dc80	65 6e 64 2d 74 6f 2d 66 69 6c 65 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	end-to-filename................(
2dca0	66 6f 72 6d 61 74 20 22 25 73 25 73 7e 2e 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	format."%s%s~.%s"...............
2dcc0	20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 73 61 6e 73 2d 65 78 74 65 6e 73 69	.........(file-name-sans-extensi
2dce0	6f 6e 20 62 61 73 65 2d 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	on.base-name)...................
2dd00	20 20 20 20 20 69 64 78 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 65 78 74 65 6e 73 69 6f 6e 20 62 61	.....idx.(file-name-extension.ba
2dd20	73 65 2d 6e 61 6d 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 70 72 65 70 65	se-name)))...............('prepe
2dd40	6e 64 2d 74 6f 2d 66 69 6c 65 6e 61 6d 65 20 28 66 6f 72 6d 61 74 20 22 25 73 7e 25 73 22 20 69	nd-to-filename.(format."%s~%s".i
2dd60	64 78 20 62 61 73 65 2d 6e 61 6d 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 69 64 78 20	dx.base-name))).............idx.
2dd80	28 31 2b 20 69 64 78 29 29 29 0a 20 20 20 20 28 63 6f 6e 73 20 28 65 78 70 61 6e 64 2d 66 69 6c	(1+.idx))).....(cons.(expand-fil
2dda0	65 2d 6e 61 6d 65 20 62 61 73 65 2d 6e 61 6d 65 20 64 65 73 74 29 20 28 65 78 70 61 6e 64 2d 66	e-name.base-name.dest).(expand-f
2ddc0	69 6c 65 2d 6e 61 6d 65 20 62 6e 61 6d 65 7e 20 64 65 73 74 29 29 29 29 0a 0a 28 64 65 66 75 6e	ile-name.bname~.dest))))..(defun
2dde0	20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 2d 66 69 6c 65 6e 61 6d 65 2d 70 61 69 72 73 20 28 6d	.dirvish-yank--filename-pairs.(m
2de00	65 74 68 6f 64 20 73 72 63 73 20 64 65 73 74 29 0a 20 20 22 47 65 6e 65 72 61 74 65 20 66 69 6c	ethod.srcs.dest)..."Generate.fil
2de20	65 20 6e 61 6d 65 20 70 61 69 72 73 20 66 72 6f 6d 20 53 52 43 53 20 61 6e 64 20 44 45 53 54 20	e.name.pairs.from.SRCS.and.DEST.
2de40	66 6f 72 20 79 61 6e 6b 20 4d 45 54 48 4f 44 2e 22 0a 20 20 28 63 6c 2d 6c 6f 6f 70 0a 20 20 20	for.yank.METHOD."...(cl-loop....
2de60	77 69 74 68 20 6f 76 65 72 77 72 69 74 65 20 3d 20 28 65 71 20 64 69 72 76 69 73 68 2d 79 61 6e	with.overwrite.=.(eq.dirvish-yan
2de80	6b 2d 6f 76 65 72 77 72 69 74 65 2d 65 78 69 73 74 69 6e 67 2d 66 69 6c 65 73 20 27 61 6c 77 61	k-overwrite-existing-files.'alwa
2dea0	79 73 29 0a 20 20 20 77 69 74 68 20 62 61 63 6b 75 70 20 3d 20 28 65 71 20 64 69 72 76 69 73 68	ys)....with.backup.=.(eq.dirvish
2dec0	2d 79 61 6e 6b 2d 6f 76 65 72 77 72 69 74 65 2d 65 78 69 73 74 69 6e 67 2d 66 69 6c 65 73 20 27	-yank-overwrite-existing-files.'
2dee0	62 61 63 6b 75 70 29 0a 20 20 20 77 69 74 68 20 73 6b 69 70 20 3d 20 28 65 71 20 64 69 72 76 69	backup)....with.skip.=.(eq.dirvi
2df00	73 68 2d 79 61 6e 6b 2d 6f 76 65 72 77 72 69 74 65 2d 65 78 69 73 74 69 6e 67 2d 66 69 6c 65 73	sh-yank-overwrite-existing-files
2df20	20 27 73 6b 69 70 29 0a 20 20 20 77 69 74 68 20 28 72 65 73 75 6c 74 20 74 6f 2d 72 65 6e 61 6d	.'skip)....with.(result.to-renam
2df40	65 29 20 3d 20 28 29 0a 20 20 20 77 69 74 68 20 64 66 69 6c 65 73 20 3d 20 28 64 69 72 65 63 74	e).=.()....with.dfiles.=.(direct
2df60	6f 72 79 2d 66 69 6c 65 73 20 64 65 73 74 20 6e 69 6c 20 6e 69 6c 20 74 29 0a 20 20 20 66 6f 72	ory-files.dest.nil.nil.t)....for
2df80	20 73 72 63 20 69 6e 20 73 72 63 73 0a 20 20 20 66 6f 72 20 68 65 6c 70 2d 66 6f 72 6d 20 3d 20	.src.in.srcs....for.help-form.=.
2dfa0	28 66 6f 72 6d 61 74 2d 6d 65 73 73 61 67 65 20 22 5c 0a 46 69 6c 65 20 60 25 73 27 20 65 78 69	(format-message."\.File.`%s'.exi
2dfc0	73 74 73 2c 20 74 79 70 65 20 6f 6e 65 20 6f 66 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 6b	sts,.type.one.of.the.following.k
2dfe0	65 79 73 20 74 6f 20 63 6f 6e 74 69 6e 75 65 2e 0a 0a 2d 20 60 79 27 20 6f 72 20 53 50 43 20 74	eys.to.continue...-.`y'.or.SPC.t
2e000	6f 20 6f 76 65 72 77 72 69 74 65 20 74 68 69 73 20 66 69 6c 65 20 57 49 54 48 4f 55 54 20 62 61	o.overwrite.this.file.WITHOUT.ba
2e020	63 6b 75 70 0a 2d 20 60 21 27 20 61 6e 73 77 65 72 20 60 79 27 20 28 6f 76 65 72 77 72 69 74 65	ckup.-.`!'.answer.`y'.(overwrite
2e040	29 20 66 6f 72 20 61 6c 6c 20 72 65 6d 61 69 6e 69 6e 67 20 66 69 6c 65 73 0a 2d 20 60 6e 27 20	).for.all.remaining.files.-.`n'.
2e060	6f 72 20 44 45 4c 20 74 6f 20 73 6b 69 70 20 74 68 69 73 20 66 69 6c 65 0a 2d 20 60 4e 27 20 61	or.DEL.to.skip.this.file.-.`N'.a
2e080	6e 73 77 65 72 20 60 6e 27 20 28 73 6b 69 70 29 20 66 6f 72 20 61 6c 6c 20 72 65 6d 61 69 6e 69	nswer.`n'.(skip).for.all.remaini
2e0a0	6e 67 20 66 69 6c 65 73 0a 2d 20 60 62 27 20 74 6f 20 6f 76 65 72 77 72 69 74 65 20 61 6e 64 20	ng.files.-.`b'.to.overwrite.and.
2e0c0	62 61 63 6b 75 70 20 74 68 69 73 20 66 69 6c 65 73 0a 2d 20 60 42 27 20 61 6e 73 77 65 72 20 60	backup.this.files.-.`B'.answer.`
2e0e0	62 27 20 28 6f 76 65 72 77 72 69 74 65 20 61 6e 64 20 62 61 63 6b 75 70 29 20 66 6f 72 20 61 6c	b'.(overwrite.and.backup).for.al
2e100	6c 20 72 65 6d 61 69 6e 69 6e 67 20 66 69 6c 65 73 0a 2d 20 60 71 27 20 6f 72 20 45 53 43 20 74	l.remaining.files.-.`q'.or.ESC.t
2e120	6f 20 61 62 6f 72 74 20 74 68 65 20 74 61 73 6b 22 20 73 72 63 29 0a 20 20 20 66 6f 72 20 62 61	o.abort.the.task".src)....for.ba
2e140	73 65 20 3d 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 72 65 63 74 6f 72 79 20 73 72 63	se.=.(file-name-nondirectory.src
2e160	29 0a 20 20 20 66 6f 72 20 63 6f 6c 6c 69 73 69 6f 6e 20 3d 20 28 6d 65 6d 62 65 72 20 62 61 73	)....for.collision.=.(member.bas
2e180	65 20 64 66 69 6c 65 73 29 20 64 6f 0a 20 20 20 28 63 6f 6e 64 20 28 28 65 71 75 61 6c 20 73 72	e.dfiles).do....(cond.((equal.sr
2e1a0	63 20 28 63 6f 6e 63 61 74 20 64 65 73 74 20 62 61 73 65 29 29 0a 20 20 20 20 20 20 20 20 20 20	c.(concat.dest.base))...........
2e1c0	3b 3b 20 75 73 65 72 20 6d 61 79 20 77 61 6e 74 20 74 6f 20 6d 61 6b 65 20 73 79 6d 6c 69 6e 6b	;;.user.may.want.to.make.symlink
2e1e0	20 69 6e 20 74 68 65 20 73 61 6d 65 20 64 69 72 65 63 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20	.in.the.same.directory..........
2e200	20 28 69 66 20 28 6d 65 6d 71 20 6d 65 74 68 6f 64 20 27 28 64 69 72 65 64 2d 6d 61 6b 65 2d 72	.(if.(memq.method.'(dired-make-r
2e220	65 6c 61 74 69 76 65 2d 73 79 6d 6c 69 6e 6b 20 6d 61 6b 65 2d 73 79 6d 62 6f 6c 69 63 2d 6c 69	elative-symlink.make-symbolic-li
2e240	6e 6b 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 28 63 6f 6e 73 20 73	nk))...............(push.(cons.s
2e260	72 63 20 28 63 64 72 20 28 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 2d 6e 65 77 62 61 73 65 20 62	rc.(cdr.(dirvish-yank--newbase.b
2e280	61 73 65 20 64 66 69 6c 65 73 20 64 65 73 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	ase.dfiles.dest)))..............
2e2a0	20 20 20 20 20 20 20 72 65 73 75 6c 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 75 73 65 72	.......result).............(user
2e2c0	2d 65 72 72 6f 72 20 22 53 6f 75 72 63 65 20 61 6e 64 20 74 61 72 67 65 74 20 61 72 65 20 74 68	-error."Source.and.target.are.th
2e2e0	65 20 73 61 6d 65 20 66 69 6c 65 20 60 25 73 27 22 20 73 72 63 29 29 29 0a 20 20 20 20 20 20 20	e.same.file.`%s'".src)))........
2e300	20 20 28 6f 76 65 72 77 72 69 74 65 20 28 70 75 73 68 20 28 63 6f 6e 73 20 73 72 63 20 64 65 73	..(overwrite.(push.(cons.src.des
2e320	74 29 20 72 65 73 75 6c 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 28 61 6e 64 20 62 61 63 6b 75	t).result))..........((and.backu
2e340	70 20 63 6f 6c 6c 69 73 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 28 64 69	p.collision)...........(push.(di
2e360	72 76 69 73 68 2d 79 61 6e 6b 2d 2d 6e 65 77 62 61 73 65 20 62 61 73 65 20 64 66 69 6c 65 73 20	rvish-yank--newbase.base.dfiles.
2e380	64 65 73 74 29 20 74 6f 2d 72 65 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68	dest).to-rename)...........(push
2e3a0	20 28 63 6f 6e 73 20 73 72 63 20 64 65 73 74 29 20 72 65 73 75 6c 74 29 29 0a 20 20 20 20 20 20	.(cons.src.dest).result)).......
2e3c0	20 20 20 28 28 61 6e 64 20 73 6b 69 70 20 63 6f 6c 6c 69 73 69 6f 6e 29 29 0a 20 20 20 20 20 20	...((and.skip.collision)).......
2e3e0	20 20 20 28 63 6f 6c 6c 69 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 63 61 73 65	...(collision...........(cl-case
2e400	20 28 72 65 61 64 2d 63 68 61 72 2d 63 68 6f 69 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	.(read-char-choice..............
2e420	20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 28 66 6f 72 6d 61 74 2d 6d 65 73 73 61 67 65 20 22	.......(concat.(format-message."
2e440	4f 76 65 72 77 72 69 74 65 20 60 25 73 27 3f 22 20 62 61 73 65 29 0a 20 20 20 20 20 20 20 20 20	Overwrite.`%s'?".base)..........
2e460	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 74 20 22 20 5b 54 79	...................(format.".[Ty
2e480	70 65 20 79 6e 21 62 71 20 6f 72 20 25 73 5d 20 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	pe.yn!bq.or.%s]."...............
2e4a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6b 65 79 2d 64 65 73 63 72	......................(key-descr
2e4c0	69 70 74 69 6f 6e 20 28 76 65 63 74 6f 72 20 68 65 6c 70 2d 63 68 61 72 29 29 29 29 0a 20 20 20	iption.(vector.help-char))))....
2e4e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 28 3f 79 20 3f 5c 73 20 3f 21 20 3f 6e 20	.................'(?y.?\s.?!.?n.
2e500	3f 5c 31 37 37 20 3f 4e 20 3f 62 20 3f 42 20 3f 71 20 3f 5c 65 29 29 0a 20 20 20 20 20 20 20 20	?\177.?N.?b.?B.?q.?\e)).........
2e520	20 20 20 20 28 28 3f 79 20 3f 5c 73 29 20 28 70 75 73 68 20 28 63 6f 6e 73 20 73 72 63 20 64 65	....((?y.?\s).(push.(cons.src.de
2e540	73 74 29 20 72 65 73 75 6c 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 3f 21 20 28 73 65	st).result)).............(?!.(se
2e560	74 71 20 6f 76 65 72 77 72 69 74 65 20 74 29 20 28 70 75 73 68 20 28 63 6f 6e 73 20 73 72 63 20	tq.overwrite.t).(push.(cons.src.
2e580	64 65 73 74 29 20 72 65 73 75 6c 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 28 3f 6e 20	dest).result)).............((?n.
2e5a0	3f 5c 31 37 37 29 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 3f 4e 20 28 73 65 74	?\177).nil).............(?N.(set
2e5c0	71 20 73 6b 69 70 20 74 29 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 3f 62 20 28	q.skip.t).nil).............(?b.(
2e5e0	70 75 73 68 20 28 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 2d 6e 65 77 62 61 73 65 20 62 61 73 65	push.(dirvish-yank--newbase.base
2e600	20 64 66 69 6c 65 73 20 64 65 73 74 29 20 74 6f 2d 72 65 6e 61 6d 65 29 0a 20 20 20 20 20 20 20	.dfiles.dest).to-rename)........
2e620	20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 28 63 6f 6e 73 20 73 72 63 20 64 65 73 74 29 20 72	.........(push.(cons.src.dest).r
2e640	65 73 75 6c 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 3f 42 20 28 73 65 74 71 20 62 61	esult)).............(?B.(setq.ba
2e660	63 6b 75 70 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 28 64	ckup.t).................(push.(d
2e680	69 72 76 69 73 68 2d 79 61 6e 6b 2d 2d 6e 65 77 62 61 73 65 20 62 61 73 65 20 64 66 69 6c 65 73	irvish-yank--newbase.base.dfiles
2e6a0	20 64 65 73 74 29 20 74 6f 2d 72 65 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.dest).to-rename)...............
2e6c0	20 20 28 70 75 73 68 20 28 63 6f 6e 73 20 73 72 63 20 64 65 73 74 29 20 72 65 73 75 6c 74 29 29	..(push.(cons.src.dest).result))
2e6e0	0a 20 20 20 20 20 20 20 20 20 20 20 20 28 28 3f 71 20 3f 5c 65 29 20 28 75 73 65 72 2d 65 72 72	.............((?q.?\e).(user-err
2e700	6f 72 20 22 44 69 72 76 69 73 68 5b 69 6e 66 6f 5d 3a 20 79 61 6e 6b 20 74 61 73 6b 20 61 62 6f	or."Dirvish[info]:.yank.task.abo
2e720	72 74 65 64 22 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 74 20 28 70 75 73 68 20 28 63 6f 6e	rted"))))..........(t.(push.(con
2e740	73 20 73 72 63 20 64 65 73 74 29 20 72 65 73 75 6c 74 29 29 29 0a 20 20 20 66 69 6e 61 6c 6c 79	s.src.dest).result)))....finally
2e760	20 72 65 74 75 72 6e 0a 20 20 20 28 70 72 6f 67 31 20 72 65 73 75 6c 74 0a 20 20 20 20 20 28 63	.return....(prog1.result......(c
2e780	6c 2d 6c 6f 6f 70 20 66 6f 72 20 28 66 72 6f 6d 20 2e 20 74 6f 29 20 69 6e 20 74 6f 2d 72 65 6e	l-loop.for.(from...to).in.to-ren
2e7a0	61 6d 65 20 64 6f 20 28 72 65 6e 61 6d 65 2d 66 69 6c 65 20 66 72 6f 6d 20 74 6f 29 29 29 29 29	ame.do.(rename-file.from.to)))))
2e7c0	0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 69 6e 6a 65 63 74 2d 65 6e 76	..(defun.dirvish-yank-inject-env
2e7e0	20 28 69 6e 63 6c 75 64 65 2d 72 65 67 65 78 70 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 60 73	.(include-regexp)..."Return.a.`s
2e800	65 74 71 27 20 66 6f 72 6d 20 74 68 61 74 20 72 65 70 6c 69 63 61 74 65 73 20 70 61 72 74 20 6f	etq'.form.that.replicates.part.o
2e820	66 20 74 68 65 20 63 61 6c 6c 69 6e 67 20 65 6e 76 69 72 6f 6e 6d 65 6e 74 2e 0a 49 74 20 73 65	f.the.calling.environment..It.se
2e840	74 73 20 74 68 65 20 76 61 6c 75 65 20 66 6f 72 20 65 76 65 72 79 20 76 61 72 69 61 62 6c 65 20	ts.the.value.for.every.variable.
2e860	6d 61 74 63 68 69 6e 67 20 49 4e 43 4c 55 44 45 2d 52 45 47 45 58 50 2e 22 0a 20 20 60 28 73 65	matching.INCLUDE-REGEXP."...`(se
2e880	74 71 20 2c 40 28 6c 65 74 20 28 62 69 6e 64 69 6e 67 73 29 0a 20 20 20 20 20 20 20 20 20 20 20	tq.,@(let.(bindings)............
2e8a0	20 20 28 6d 61 70 61 74 6f 6d 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64	..(mapatoms...............(lambd
2e8c0	61 20 28 73 79 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28	a.(sym).................(let*.((
2e8e0	73 6e 61 6d 65 20 28 61 6e 64 20 28 62 6f 75 6e 64 70 20 73 79 6d 29 20 28 73 79 6d 62 6f 6c 2d	sname.(and.(boundp.sym).(symbol-
2e900	6e 61 6d 65 20 73 79 6d 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	name.sym))).....................
2e920	20 20 20 28 76 61 6c 75 65 20 28 61 6e 64 20 73 6e 61 6d 65 20 28 73 79 6d 62 6f 6c 2d 76 61 6c	...(value.(and.sname.(symbol-val
2e940	75 65 20 73 79 6d 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68	ue.sym))))...................(wh
2e960	65 6e 20 28 61 6e 64 20 73 6e 61 6d 65 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 69 6e 63 6c	en.(and.sname.(string-match.incl
2e980	75 64 65 2d 72 65 67 65 78 70 20 73 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ude-regexp.sname)...............
2e9a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 73 74 72 69 6e 67 2d 6d 61 74 63	...............(not.(string-matc
2e9c0	68 20 22 2d 73 79 6e 74 61 78 2d 74 61 62 6c 65 5c 5c 27 22 20 73 6e 61 6d 65 29 29 29 0a 20 20	h."-syntax-table\\'".sname)))...
2e9e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 6f 72 20 28 73	..................(unless.(or.(s
2ea00	74 72 69 6e 67 70 20 76 61 6c 75 65 29 20 28 6d 65 6d 71 20 76 61 6c 75 65 20 27 28 6e 69 6c 20	tringp.value).(memq.value.'(nil.
2ea20	74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	t)).............................
2ea40	20 20 20 20 28 6e 75 6d 62 65 72 70 20 76 61 6c 75 65 29 20 28 76 65 63 74 6f 72 70 20 76 61 6c	....(numberp.value).(vectorp.val
2ea60	75 65 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 28 73 65 74 71	ue)).......................(setq
2ea80	20 76 61 6c 75 65 20 60 28 71 75 6f 74 65 20 2c 76 61 6c 75 65 29 29 29 0a 20 20 20 20 20 20 20	.value.`(quote.,value)))........
2eaa0	20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 62 69 6e 64 69 6e 67 73 20 28 63 6f 6e	.............(setq.bindings.(con
2eac0	73 20 76 61 6c 75 65 20 62 69 6e 64 69 6e 67 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	s.value.bindings)...............
2eae0	20 20 20 20 20 20 20 20 20 20 20 20 62 69 6e 64 69 6e 67 73 20 28 63 6f 6e 73 20 73 79 6d 20 62	............bindings.(cons.sym.b
2eb00	69 6e 64 69 6e 67 73 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 62 69 6e 64 69	indings))))))..............bindi
2eb20	6e 67 73 29 29 29 0a 0a 3b 3b 20 54 68 61 6e 6b 73 20 74 6f 20 60 64 69 72 65 64 2d 72 73 79 6e	ngs)))..;;.Thanks.to.`dired-rsyn
2eb40	63 2e 65 6c 27 0a 3b 3b 20 61 6c 73 6f 20 73 65 65 3a 20 68 74 74 70 73 3a 2f 2f 75 6e 69 78 2e	c.el'.;;.also.see:.https://unix.
2eb60	73 74 61 63 6b 65 78 63 68 61 6e 67 65 2e 63 6f 6d 2f 71 75 65 73 74 69 6f 6e 73 2f 31 38 33 35	stackexchange.com/questions/1835
2eb80	30 34 2f 68 6f 77 2d 74 6f 2d 72 73 79 6e 63 2d 66 69 6c 65 73 2d 62 65 74 77 65 65 6e 2d 74 77	04/how-to-rsync-files-between-tw
2eba0	6f 2d 72 65 6d 6f 74 65 73 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 2d	o-remotes..(defun.dirvish-yank--
2ebc0	72 73 79 6e 63 2d 61 72 67 73 20 28 29 0a 20 20 22 52 65 74 72 69 65 76 65 20 72 73 79 6e 63 20	rsync-args.()..."Retrieve.rsync.
2ebe0	61 72 67 73 20 66 6f 72 20 63 75 72 72 65 6e 74 20 73 65 73 73 69 6f 6e 20 6f 72 20 64 65 66 61	args.for.current.session.or.defa
2ec00	75 6c 74 20 6f 6e 65 73 2e 22 0a 20 20 28 6f 72 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a	ult.ones."...(or.(dirvish-prop.:
2ec20	72 73 79 6e 63 2d 73 77 69 74 63 68 65 73 29 0a 20 20 20 20 20 20 64 69 72 76 69 73 68 2d 79 61	rsync-switches).......dirvish-ya
2ec40	6e 6b 2d 72 73 79 6e 63 2d 61 72 67 73 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d	nk-rsync-args))..(defun.dirvish-
2ec60	79 61 6e 6b 2d 2d 62 75 69 6c 64 2d 72 73 79 6e 63 2d 63 6f 6d 6d 61 6e 64 20 28 29 0a 20 20 22	yank--build-rsync-command.()..."
2ec80	43 6f 6d 70 6f 73 65 20 72 73 79 6e 63 20 63 6f 6d 6d 61 6e 64 20 61 6e 64 20 61 72 67 73 20 69	Compose.rsync.command.and.args.i
2eca0	6e 74 6f 20 74 68 65 20 73 74 72 69 6e 67 2e 22 0a 20 20 28 66 6f 72 6d 61 74 20 22 25 73 20 25	nto.the.string."...(format."%s.%
2ecc0	73 22 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 72 73 79 6e 63 2d 70 72 6f 67 72 61 6d 0a 20 20	s".dirvish-yank-rsync-program...
2ece0	20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 2d 6a 6f 69 6e 20 28 64 69 72 76 69 73 68 2d 79 61	........(string-join.(dirvish-ya
2ed00	6e 6b 2d 2d 72 73 79 6e 63 2d 61 72 67 73 29 20 22 20 22 29 29 29 0a 0a 28 64 65 66 75 6e 20 64	nk--rsync-args).".")))..(defun.d
2ed20	69 72 76 69 73 68 2d 79 61 6e 6b 2d 72 32 72 2d 68 61 6e 64 6c 65 72 20 28 73 72 63 73 20 64 65	irvish-yank-r2r-handler.(srcs.de
2ed40	73 74 20 73 68 6f 73 74 20 64 68 6f 73 74 29 0a 20 20 22 43 6f 6e 73 74 72 75 63 74 20 61 6e 64	st.shost.dhost)..."Construct.and
2ed60	20 74 72 69 67 67 65 72 20 61 6e 20 72 73 79 6e 63 20 72 75 6e 20 66 6f 72 20 72 65 6d 6f 74 65	.trigger.an.rsync.run.for.remote
2ed80	20 63 6f 70 79 2e 0a 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 73 79 6e 63 20 53 52 43 53 20 6f 6e	.copy..This.command.sync.SRCS.on
2eda0	20 53 48 4f 53 54 20 74 6f 20 44 45 53 54 20 6f 6e 20 44 48 4f 53 54 2e 22 0a 20 20 28 6c 65 74	.SHOST.to.DEST.on.DHOST."...(let
2edc0	2a 20 28 28 64 75 73 65 72 20 28 77 69 74 68 2d 70 61 72 73 65 64 2d 74 72 61 6d 70 2d 66 69 6c	*.((duser.(with-parsed-tramp-fil
2ede0	65 2d 6e 61 6d 65 20 64 65 73 74 20 74 66 6f 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	e-name.dest.tfop................
2ee00	20 20 20 28 6f 72 20 74 66 6f 70 2d 75 73 65 72 20 28 67 65 74 65 6e 76 20 22 55 53 45 52 22 29	...(or.tfop-user.(getenv."USER")
2ee20	29 29 29 0a 20 20 20 20 20 20 20 20 20 28 70 6f 72 74 20 28 64 69 72 76 69 73 68 2d 79 61 6e 6b	)))..........(port.(dirvish-yank
2ee40	2d 2d 67 65 74 2d 72 65 6d 6f 74 65 2d 70 6f 72 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 64 65	--get-remote-port))..........(de
2ee60	73 74 20 28 73 68 65 6c 6c 2d 71 75 6f 74 65 2d 61 72 67 75 6d 65 6e 74 20 28 66 69 6c 65 2d 6c	st.(shell-quote-argument.(file-l
2ee80	6f 63 61 6c 2d 6e 61 6d 65 20 64 65 73 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 72 73 79 6e	ocal-name.dest)))..........(rsyn
2eea0	63 2d 63 6d 64 0a 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 5c 22 25 73 20 2d 65	c-cmd...........(format."\"%s.-e
2eec0	20 5c 5c 5c 22 25 73 5c 5c 5c 22 20 25 73 20 25 73 40 6c 6f 63 61 6c 68 6f 73 74 3a 25 73 5c 22	.\\\"%s\\\".%s.%s@localhost:%s\"
2eee0	22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 79 61 6e	"...................(dirvish-yan
2ef00	6b 2d 2d 62 75 69 6c 64 2d 72 73 79 6e 63 2d 63 6f 6d 6d 61 6e 64 29 0a 20 20 20 20 20 20 20 20	k--build-rsync-command).........
2ef20	20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 2d	..........(format.dirvish-yank--
2ef40	72 65 6d 6f 74 65 2d 70 6f 72 74 66 77 64 20 70 6f 72 74 29 0a 20 20 20 20 20 20 20 20 20 20 20	remote-portfwd.port)............
2ef60	20 20 20 20 20 20 20 28 73 74 72 69 6e 67 2d 6a 6f 69 6e 20 73 72 63 73 20 22 20 22 29 20 64 75	.......(string-join.srcs.".").du
2ef80	73 65 72 20 64 65 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 62 69 6e 64 2d 61 64 64 72 20 28	ser.dest))..........(bind-addr.(
2efa0	66 6f 72 6d 61 74 20 22 6c 6f 63 61 6c 68 6f 73 74 3a 25 64 3a 25 73 3a 32 32 22 20 70 6f 72 74	format."localhost:%d:%s:22".port
2efc0	20 64 68 6f 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 63 6d 64 20 28 73 74 72 69 6e 67 2d 6a	.dhost))..........(cmd.(string-j
2efe0	6f 69 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 22 73 73 68 22 20 22	oin................(list."ssh"."
2f000	2d 41 22 20 22 2d 52 22 20 62 69 6e 64 2d 61 64 64 72 20 73 68 6f 73 74 20 72 73 79 6e 63 2d 63	-A"."-R".bind-addr.shost.rsync-c
2f020	6d 64 29 20 22 20 22 29 29 29 0a 20 20 20 20 28 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 2d 65 78	md)."."))).....(dirvish-yank--ex
2f040	65 63 75 74 65 20 63 6d 64 20 28 6c 69 73 74 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29	ecute.cmd.(list.(current-buffer)
2f060	20 73 72 63 73 20 64 65 73 74 20 27 72 73 79 6e 63 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69	.srcs.dest.'rsync))))..(defun.di
2f080	72 76 69 73 68 2d 79 61 6e 6b 2d 6c 32 66 72 2d 68 61 6e 64 6c 65 72 20 28 73 72 63 73 20 64 65	rvish-yank-l2fr-handler.(srcs.de
2f0a0	73 74 29 0a 20 20 22 45 78 65 63 75 74 65 20 61 20 6c 6f 63 61 6c 20 74 6f 2f 66 72 6f 6d 20 72	st)..."Execute.a.local.to/from.r
2f0c0	65 6d 6f 74 65 20 72 73 79 6e 63 20 63 6f 6d 6d 61 6e 64 20 66 6f 72 20 53 52 43 53 20 61 6e 64	emote.rsync.command.for.SRCS.and
2f0e0	20 44 45 53 54 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 73 72 63 73 20 28 6d 61 70 63 61 72 20 23	.DEST."...(let*.((srcs.(mapcar.#
2f100	27 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 2d 66 69 6c 65 6e 61 6d 65 2d 66 6f 72 2d 72 73 79 6e	'dirvish-yank--filename-for-rsyn
2f120	63 20 73 72 63 73 29 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 73 74 20 28 64 69 72 76 69 73 68	c.srcs))..........(dest.(dirvish
2f140	2d 79 61 6e 6b 2d 2d 66 69 6c 65 6e 61 6d 65 2d 66 6f 72 2d 72 73 79 6e 63 20 64 65 73 74 29 29	-yank--filename-for-rsync.dest))
2f160	0a 20 20 20 20 20 20 20 20 20 28 72 73 79 6e 63 2d 63 6d 64 20 28 66 6c 61 74 74 65 6e 2d 74 72	..........(rsync-cmd.(flatten-tr
2f180	65 65 20 28 6c 69 73 74 20 28 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 2d 62 75 69 6c 64 2d 72 73	ee.(list.(dirvish-yank--build-rs
2f1a0	79 6e 63 2d 63 6f 6d 6d 61 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ync-command)....................
2f1c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 72 63 73 20 64 65 73 74 29 29	.....................srcs.dest))
2f1e0	29 0a 20 20 20 20 20 20 20 20 20 28 63 6d 64 20 28 73 74 72 69 6e 67 2d 6a 6f 69 6e 20 72 73 79	)..........(cmd.(string-join.rsy
2f200	6e 63 2d 63 6d 64 20 22 20 22 29 29 29 0a 20 20 20 20 28 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d	nc-cmd."."))).....(dirvish-yank-
2f220	2d 65 78 65 63 75 74 65 20 63 6d 64 20 28 6c 69 73 74 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66	-execute.cmd.(list.(current-buff
2f240	65 72 29 20 73 72 63 73 20 64 65 73 74 20 27 72 73 79 6e 63 29 29 29 29 0a 0a 28 64 65 66 75 6e	er).srcs.dest.'rsync))))..(defun
2f260	20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 64 65 66 61 75 6c 74 2d 68 61 6e 64 6c 65 72 20 28 6d	.dirvish-yank-default-handler.(m
2f280	65 74 68 6f 64 20 73 72 63 73 20 64 65 73 74 29 0a 20 20 22 45 78 65 63 75 74 65 20 79 61 6e 6b	ethod.srcs.dest)..."Execute.yank
2f2a0	20 4d 45 54 48 4f 44 20 6f 6e 20 53 52 43 53 20 74 6f 20 44 45 53 54 2e 22 0a 20 20 28 6c 65 74	.METHOD.on.SRCS.to.DEST."...(let
2f2c0	2a 20 28 28 70 61 69 72 73 20 28 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 2d 66 69 6c 65 6e 61 6d	*.((pairs.(dirvish-yank--filenam
2f2e0	65 2d 70 61 69 72 73 20 6d 65 74 68 6f 64 20 73 72 63 73 20 64 65 73 74 29 29 0a 20 20 20 20 20	e-pairs.method.srcs.dest))......
2f300	20 20 20 20 28 63 6f 75 6e 74 20 28 66 6c 6f 61 74 20 28 6c 65 6e 67 74 68 20 70 61 69 72 73 29	....(count.(float.(length.pairs)
2f320	29 29 0a 20 20 20 20 20 20 20 20 20 28 63 6d 64 20 60 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20	))..........(cmd.`(progn........
2f340	20 20 20 20 20 20 20 20 20 20 28 72 65 71 75 69 72 65 20 27 64 69 72 65 64 2d 61 75 78 29 0a 20	..........(require.'dired-aux)..
2f360	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 71 75 69 72 65 20 27 64 69 72 65 64 2d	................(require.'dired-
2f380	78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 28 64 69 72 76 69 73 68 2d 79 61	x)..................,(dirvish-ya
2f3a0	6e 6b 2d 69 6e 6a 65 63 74 2d 65 6e 76 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 65 6e 76 2d 76	nk-inject-env.dirvish-yank-env-v
2f3c0	61 72 69 61 62 6c 65 73 2d 72 65 67 65 78 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ariables-regexp)................
2f3e0	20 20 28 63 6c 2d 6c 6f 6f 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 69 74	..(cl-loop...................wit
2f400	68 20 64 69 72 65 64 2d 72 65 63 75 72 73 69 76 65 2d 63 6f 70 69 65 73 20 3d 20 27 61 6c 77 61	h.dired-recursive-copies.=.'alwa
2f420	79 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 69 74 68 20 64 69 72 65 64 2d	ys...................with.dired-
2f440	63 6f 70 79 2d 70 72 65 73 65 72 76 65 2d 74 69 6d 65 20 3d 20 2c 64 69 72 65 64 2d 63 6f 70 79	copy-preserve-time.=.,dired-copy
2f460	2d 70 72 65 73 65 72 76 65 2d 74 69 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	-preserve-time..................
2f480	20 66 6f 72 20 69 64 78 20 66 72 6f 6d 20 31 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.for.idx.from.1.................
2f4a0	20 20 66 6f 72 20 28 66 72 6f 6d 20 2e 20 74 6f 29 20 69 6e 20 27 28 2c 40 70 61 69 72 73 29 0a	..for.(from...to).in.'(,@pairs).
2f4c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 70 65 72 63 65 6e 74 20 3d 20	..................for.percent.=.
2f4e0	28 69 66 20 28 65 71 20 28 66 6c 6f 61 74 20 69 64 78 29 20 2c 63 6f 75 6e 74 29 20 31 30 30 0a	(if.(eq.(float.idx).,count).100.
2f500	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	................................
2f520	20 20 28 66 6c 6f 6f 72 20 28 2a 20 28 2f 20 69 64 78 20 2c 63 6f 75 6e 74 29 20 31 30 30 29 29	..(floor.(*.(/.idx.,count).100))
2f540	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 6f 20 28 70 72 6f 67 6e 20 28 6d	)...................do.(progn.(m
2f560	65 73 73 61 67 65 20 22 25 73 20 2d 3e 20 25 73 20 5b 25 73 25 25 5d 22 20 66 72 6f 6d 20 74 6f	essage."%s.->.%s.[%s%%]".from.to
2f580	20 70 65 72 63 65 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.percent).......................
2f5a0	20 20 20 20 20 20 28 63 6f 6e 64 69 74 69 6f 6e 2d 63 61 73 65 20 65 72 72 0a 20 20 20 20 20 20	......(condition-case.err.......
2f5c0	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 75 6e 63 61	..........................(funca
2f5e0	6c 6c 20 23 27 2c 6d 65 74 68 6f 64 20 66 72 6f 6d 20 74 6f 20 74 29 0a 20 20 20 20 20 20 20 20	ll.#',method.from.to.t).........
2f600	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 65 72 72 6f	......................(file-erro
2f620	72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	r...............................
2f640	20 28 6d 65 73 73 61 67 65 20 22 25 73 3a 20 25 73 5c 6e 22 20 28 63 61 72 20 65 72 72 29 20 28	.(message."%s:.%s\n".(car.err).(
2f660	63 64 72 20 65 72 72 29 29 20 6e 69 6c 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	cdr.err)).nil)))................
2f680	20 20 20 66 69 6e 61 6c 6c 79 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 62 20 69 6e 20 28 62 75	...finally.(cl-loop.for.b.in.(bu
2f6a0	66 66 65 72 2d 6c 69 73 74 29 20 74 68 65 72 65 69 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	ffer-list).thereis..............
2f6c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 73 74 72 69	......................(and.(stri
2f6e0	6e 67 2d 6d 61 74 63 68 20 22 5c 5c 60 5c 5c 2a 66 74 70 2e 2a 22 0a 20 20 20 20 20 20 20 20 20	ng-match."\\`\\ftp."..........
2f700	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	................................
2f720	20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 2d 6e 61 6d 65 20 62 29 29 0a 20 20	.............(buffer-name.b))...
2f740	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	................................
2f760	20 20 20 20 20 20 28 70 72 6f 67 31 20 62 20 28 6b 69 6c 6c 2d 62 75 66 66 65 72 20 62 29 29 29	......(prog1.b.(kill-buffer.b)))
2f780	29 29 29 29 29 0a 20 20 20 20 28 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 2d 65 78 65 63 75 74 65	))))).....(dirvish-yank--execute
2f7a0	0a 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 53 22 20 63 6d 64 29 20 28 6c 69 73 74 20 28 63	......(format."%S".cmd).(list.(c
2f7c0	75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 20 73 72 63 73 20 64 65 73 74 20 6d 65 74 68 6f 64 29	urrent-buffer).srcs.dest.method)
2f7e0	20 27 62 61 74 63 68 29 29 29 0a 0a 3b 3b 20 63 6f 70 69 65 64 20 66 72 6f 6d 20 60 64 69 72 65	.'batch)))..;;.copied.from.`dire
2f800	64 2d 72 73 79 6e 63 27 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 2d 65 78	d-rsync'.(defun.dirvish-yank--ex
2f820	74 72 61 63 74 2d 68 6f 73 74 2d 66 72 6f 6d 2d 74 72 61 6d 70 20 28 66 69 6c 65 2d 6f 72 2d 70	tract-host-from-tramp.(file-or-p
2f840	61 74 68 20 26 6f 70 74 69 6f 6e 61 6c 20 73 70 6c 69 74 2d 75 73 65 72 29 0a 20 20 22 45 78 74	ath.&optional.split-user)..."Ext
2f860	72 61 63 74 20 74 68 65 20 74 72 61 6d 70 20 68 6f 73 74 20 70 61 72 74 20 6f 66 20 46 49 4c 45	ract.the.tramp.host.part.of.FILE
2f880	2d 4f 52 2d 50 41 54 48 2e 0a 49 74 20 53 50 4c 49 54 2d 55 53 45 52 20 69 73 20 73 65 74 20 77	-OR-PATH..It.SPLIT-USER.is.set.w
2f8a0	65 20 72 65 6d 6f 76 65 20 74 68 65 20 75 73 65 72 40 20 70 61 72 74 20 61 73 20 77 65 6c 6c 2e	e.remove.the.user@.part.as.well.
2f8c0	20 20 57 65 20 61 73 73 75 6d 65 0a 68 6f 73 74 73 20 64 6f 6e 27 74 20 6e 65 65 64 20 71 75 6f	..We.assume.hosts.don't.need.quo
2f8e0	74 69 6e 67 2e 22 0a 20 20 28 77 69 74 68 2d 70 61 72 73 65 64 2d 74 72 61 6d 70 2d 66 69 6c 65	ting."...(with-parsed-tramp-file
2f900	2d 6e 61 6d 65 20 66 69 6c 65 2d 6f 72 2d 70 61 74 68 20 74 66 6f 70 0a 20 20 20 20 28 69 66 20	-name.file-or-path.tfop.....(if.
2f920	28 6f 72 20 73 70 6c 69 74 2d 75 73 65 72 20 28 6e 6f 74 20 74 66 6f 70 2d 75 73 65 72 29 29 20	(or.split-user.(not.tfop-user)).
2f940	74 66 6f 70 2d 68 6f 73 74 0a 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 40 25 73 22 20	tfop-host.......(format."%s@%s".
2f960	74 66 6f 70 2d 75 73 65 72 20 74 66 6f 70 2d 68 6f 73 74 29 29 29 29 0a 0a 28 64 65 66 75 6e 20	tfop-user.tfop-host))))..(defun.
2f980	64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 2d 65 78 74 72 61 63 74 2d 72 65 6d 6f 74 65 20 28 66 69	dirvish-yank--extract-remote.(fi
2f9a0	6c 65 73 29 0a 20 20 22 47 65 74 20 73 74 72 69 6e 67 20 69 64 65 6e 74 69 66 79 69 6e 67 20 74	les)..."Get.string.identifying.t
2f9c0	68 65 20 72 65 6d 6f 74 65 20 63 6f 6e 6e 65 63 74 69 6f 6e 20 6f 66 20 46 49 4c 45 53 2e 22 0a	he.remote.connection.of.FILES.".
2f9e0	20 20 28 63 6c 2d 6c 6f 6f 70 20 77 69 74 68 20 68 6f 73 74 73 20 3d 20 28 29 20 66 6f 72 20 66	..(cl-loop.with.hosts.=.().for.f
2fa00	20 69 6e 20 66 69 6c 65 73 20 66 6f 72 20 68 20 3d 20 28 66 69 6c 65 2d 72 65 6d 6f 74 65 2d 70	.in.files.for.h.=.(file-remote-p
2fa20	20 66 29 0a 20 20 20 20 20 20 20 20 20 20 20 64 6f 20 28 63 6c 2d 70 75 73 68 6e 65 77 20 68 20	.f)............do.(cl-pushnew.h.
2fa40	68 6f 73 74 73 20 3a 74 65 73 74 20 23 27 65 71 75 61 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20	hosts.:test.#'equal)............
2fa60	77 68 65 6e 20 28 3e 20 28 6c 65 6e 67 74 68 20 68 6f 73 74 73 29 20 31 29 0a 20 20 20 20 20 20	when.(>.(length.hosts).1).......
2fa80	20 20 20 20 20 64 6f 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 44 69 72 76 69 73 68 5b 65 72 72	.....do.(user-error."Dirvish[err
2faa0	6f 72 5d 3a 20 53 4f 55 52 43 45 73 20 6e 65 65 64 20 74 6f 20 62 65 20 69 6e 20 74 68 65 20 73	or]:.SOURCEs.need.to.be.in.the.s
2fac0	61 6d 65 20 68 6f 73 74 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 66 69 6e 61 6c 6c 79 20 72 65	ame.host")............finally.re
2fae0	74 75 72 6e 20 28 63 61 72 20 68 6f 73 74 73 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69	turn.(car.hosts)))..(defun.dirvi
2fb00	73 68 2d 79 61 6e 6b 2d 2d 61 70 70 6c 79 20 28 6d 65 74 68 6f 64 20 64 65 73 74 29 0a 20 20 22	sh-yank--apply.(method.dest)..."
2fb20	41 70 70 6c 79 20 79 61 6e 6b 20 4d 45 54 48 4f 44 20 74 6f 20 44 45 53 54 2e 22 0a 20 20 28 73	Apply.yank.METHOD.to.DEST."...(s
2fb40	65 74 71 20 64 65 73 74 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 28 6f 72 20 64	etq.dest.(expand-file-name.(or.d
2fb60	65 73 74 20 28 64 69 72 65 64 2d 63 75 72 72 65 6e 74 2d 64 69 72 65 63 74 6f 72 79 29 29 29 29	est.(dired-current-directory))))
2fb80	0a 20 20 28 6c 65 74 20 28 28 73 72 63 73 20 28 6f 72 20 28 61 6e 64 20 28 66 75 6e 63 74 69 6f	...(let.((srcs.(or.(and.(functio
2fba0	6e 70 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 73 6f 75 72 63 65 73 29 0a 20 20 20 20 20 20 20	np.dirvish-yank-sources)........
2fbc0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 64 69 72 76 69 73 68	................(funcall.dirvish
2fbe0	2d 79 61 6e 6b 2d 73 6f 75 72 63 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	-yank-sources)).................
2fc00	20 20 28 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 2d 67 65 74 2d 73 72 63 73 20 64 69 72 76 69 73	..(dirvish-yank--get-srcs.dirvis
2fc20	68 2d 79 61 6e 6b 2d 73 6f 75 72 63 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	h-yank-sources).................
2fc40	20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 44 69 72 76 69 73 68 5b 65 72 72 6f 72 5d 3a 20 6e	..(user-error."Dirvish[error]:.n
2fc60	6f 20 6d 61 72 6b 65 64 20 66 69 6c 65 73 22 29 29 29 29 0a 20 20 20 20 28 64 69 72 76 69 73 68	o.marked.files")))).....(dirvish
2fc80	2d 79 61 6e 6b 2d 64 65 66 61 75 6c 74 2d 68 61 6e 64 6c 65 72 20 6d 65 74 68 6f 64 20 73 72 63	-yank-default-handler.method.src
2fca0	73 20 64 65 73 74 29 29 29 0a 0a 28 64 69 72 76 69 73 68 2d 64 65 66 69 6e 65 2d 6d 6f 64 65 2d	s.dest)))..(dirvish-define-mode-
2fcc0	6c 69 6e 65 20 79 61 6e 6b 0a 20 20 22 50 72 6f 67 72 65 73 73 20 6f 66 20 79 61 6e 6b 20 74 61	line.yank..."Progress.of.yank.ta
2fce0	73 6b 73 2e 22 0a 20 20 28 6c 65 74 20 28 28 6e 75 6d 62 65 72 2d 6f 66 2d 74 61 73 6b 73 20 28	sks."...(let.((number-of-tasks.(
2fd00	6c 65 6e 67 74 68 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 6c 6f 67 2d 62 75 66 66 65 72 73 29	length.dirvish-yank-log-buffers)
2fd20	29 29 0a 20 20 20 20 28 63 6f 6e 64 20 28 28 3d 20 6e 75 6d 62 65 72 2d 6f 66 2d 74 61 73 6b 73	)).....(cond.((=.number-of-tasks
2fd40	20 30 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 28 3d 20 6e 75 6d 62 65 72 2d 6f 66 2d 74 61 73	.0))...........((=.number-of-tas
2fd60	6b 73 20 31 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 70 63 61 73 65 2d 6c 65 74 2a 20 28 28 62	ks.1)............(pcase-let*.((b
2fd80	75 66 20 28 63 61 72 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 6c 6f 67 2d 62 75 66 66 65 72 73	uf.(car.dirvish-yank-log-buffers
2fda0	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 60 28 2c 5f	)).........................(`(,_
2fdc0	20 2c 73 72 63 73 20 2c 64 65 73 74 20 2c 6d 65 74 68 6f 64 29 0a 20 20 20 20 20 20 20 20 20 20	.,srcs.,dest.,method)...........
2fde0	20 20 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	...............(with-current-buf
2fe00	66 65 72 20 62 75 66 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 79 61 6e 6b 2d 64 65 74 61	fer.buf.(dirvish-prop.:yank-deta
2fe20	69 6c 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	ils))).........................(
2fe40	70 65 72 63 65 6e 74 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	percent.(with-current-buffer.buf
2fe60	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	................................
2fe80	20 20 20 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 79 61 6e 6b 2d 70 65 72 63 65 6e 74 29	....(dirvish-prop.:yank-percent)
2fea0	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e	)).........................(coun
2fec0	74 20 28 6c 65 6e 67 74 68 20 73 72 63 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28	t.(length.srcs)))..............(
2fee0	66 6f 72 6d 61 74 20 22 25 73 25 73 3a 20 25 73 20 e2 87 9b 20 25 73 20 22 0a 20 20 20 20 20 20	format."%s%s:.%s.....%s.".......
2ff00	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 0a 20 20 20 20 20	...............(propertize......
2ff20	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 22 20 28 61	.................(format."%s".(a
2ff40	6c 69 73 74 2d 67 65 74 20 6d 65 74 68 6f 64 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 66 6e 2d	list-get.method.dirvish-yank-fn-
2ff60	73 74 72 69 6e 67 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 27	string)).......................'
2ff80	66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 63 6f 6e 73 74 61 6e 74 2d 66 61 63 65 29 0a 20	face.'font-lock-constant-face)..
2ffa0	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 6e 6f 74 20 70 65 72	....................(if.(not.per
2ffc0	63 65 6e 74 29 20 22 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	cent).""........................
2ffe0	28 70 72 6f 70 65 72 74 69 7a 65 20 28 66 6f 72 6d 61 74 20 22 20 5b 20 25 73 25 25 25 25 25 25	(propertize.(format.".[.%s%%%%%%
30000	25 25 20 20 5d 20 22 20 70 65 72 63 65 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	%%..].".percent)................
30020	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 27 73 75 63 63 65	....................'face.'succe
30040	73 73 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 70 72 6f 70 65	ss))......................(prope
30060	72 74 69 7a 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20	rtize.......................(if.
30080	28 3d 20 63 6f 75 6e 74 20 31 29 20 28 63 61 72 20 73 72 63 73 29 20 28 66 6f 72 6d 61 74 20 22	(=.count.1).(car.srcs).(format."
300a0	25 73 20 66 69 6c 65 73 22 20 63 6f 75 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	%s.files".count))...............
300c0	20 20 20 20 20 20 20 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 6b 65 79 77 6f 72 64	........'face.'font-lock-keyword
300e0	2d 66 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f	-face)......................(pro
30100	70 65 72 74 69 7a 65 20 64 65 73 74 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 64 6f	pertize.dest.'face.'font-lock-do
30120	63 2d 66 61 63 65 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 28 3e 20 6e 75 6d 62 65 72 2d	c-face))))...........((>.number-
30140	6f 66 2d 74 61 73 6b 73 20 31 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22	of-tasks.1)............(format."
30160	20 25 73 20 25 73 25 73 20 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70	.%s.%s%s."....................(p
30180	72 6f 70 65 72 74 69 7a 65 20 28 6e 75 6d 62 65 72 2d 74 6f 2d 73 74 72 69 6e 67 20 6e 75 6d 62	ropertize.(number-to-string.numb
301a0	65 72 2d 6f 66 2d 74 61 73 6b 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	er-of-tasks)....................
301c0	20 20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 6b 65 79	............'face.'font-lock-key
301e0	77 6f 72 64 2d 66 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70	word-face)....................(p
30200	72 6f 70 65 72 74 69 7a 65 20 22 72 75 6e 6e 69 6e 67 20 79 61 6e 6b 20 74 61 73 6b 22 20 27 66	ropertize."running.yank.task".'f
30220	61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 64 6f 63 2d 66 61 63 65 29 0a 20 20 20 20 20 20 20	ace.'font-lock-doc-face)........
30240	20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28 69 66 20 28 3e 20 6e	............(propertize.(if.(>.n
30260	75 6d 62 65 72 2d 6f 66 2d 74 61 73 6b 73 20 31 29 20 22 73 22 20 22 22 29 0a 20 20 20 20 20 20	umber-of-tasks.1)."s"."").......
30280	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 27	.........................'face.'
302a0	66 6f 6e 74 2d 6c 6f 63 6b 2d 64 6f 63 2d 66 61 63 65 29 29 29 29 29 29 0a 0a 3b 3b 3b 23 23 23	font-lock-doc-face))))))..;;;###
302c0	61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 20 28 26 6f	autoload.(defun.dirvish-yank.(&o
302e0	70 74 69 6f 6e 61 6c 20 64 65 73 74 29 0a 20 20 22 50 61 73 74 65 20 6d 61 72 6b 65 64 20 66 69	ptional.dest)..."Paste.marked.fi
30300	6c 65 73 20 74 6f 20 44 45 53 54 2e 0a 50 72 6f 6d 70 74 20 66 6f 72 20 44 45 53 54 20 77 68 65	les.to.DEST..Prompt.for.DEST.whe
30320	6e 20 70 72 65 66 69 78 65 64 20 77 69 74 68 20 5c 5c 5b 75 6e 69 76 65 72 73 61 6c 2d 61 72 67	n.prefixed.with.\\[universal-arg
30340	75 6d 65 6e 74 5d 2c 20 69 74 0a 64 65 66 61 75 6c 74 73 20 74 6f 20 60 64 69 72 65 64 2d 63 75	ument],.it.defaults.to.`dired-cu
30360	72 72 65 6e 74 2d 64 69 72 65 63 74 6f 72 79 2e 27 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76	rrent-directory.'"...(interactiv
30380	65 20 28 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 2d 72 65 61 64 2d 64 65 73 74 20 27 79 61 6e 6b	e.(dirvish-yank--read-dest.'yank
303a0	29 29 0a 20 20 28 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 2d 61 70 70 6c 79 20 27 64 69 72 65 64	))...(dirvish-yank--apply.'dired
303c0	2d 63 6f 70 79 2d 66 69 6c 65 20 64 65 73 74 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61	-copy-file.dest))..;;;###autoloa
303e0	64 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 6d 6f 76 65 20 28 26 6f 70 74 69 6f 6e 61 6c	d.(defun.dirvish-move.(&optional
30400	20 64 65 73 74 29 0a 20 20 22 4d 6f 76 65 20 6d 61 72 6b 65 64 20 66 69 6c 65 73 20 74 6f 20 44	.dest)..."Move.marked.files.to.D
30420	45 53 54 2e 0a 50 72 6f 6d 70 74 20 66 6f 72 20 44 45 53 54 20 77 68 65 6e 20 70 72 65 66 69 78	EST..Prompt.for.DEST.when.prefix
30440	65 64 20 77 69 74 68 20 5c 5c 5b 75 6e 69 76 65 72 73 61 6c 2d 61 72 67 75 6d 65 6e 74 5d 2c 20	ed.with.\\[universal-argument],.
30460	69 74 0a 64 65 66 61 75 6c 74 73 20 74 6f 20 60 64 69 72 65 64 2d 63 75 72 72 65 6e 74 2d 64 69	it.defaults.to.`dired-current-di
30480	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 20 28 64 69 72 76 69	rectory'."...(interactive.(dirvi
304a0	73 68 2d 79 61 6e 6b 2d 2d 72 65 61 64 2d 64 65 73 74 20 27 6d 6f 76 65 29 29 0a 20 20 28 64 69	sh-yank--read-dest.'move))...(di
304c0	72 76 69 73 68 2d 79 61 6e 6b 2d 2d 61 70 70 6c 79 20 27 64 69 72 65 64 2d 72 65 6e 61 6d 65 2d	rvish-yank--apply.'dired-rename-
304e0	66 69 6c 65 20 64 65 73 74 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66	file.dest))..;;;###autoload.(def
30500	75 6e 20 64 69 72 76 69 73 68 2d 73 79 6d 6c 69 6e 6b 20 28 26 6f 70 74 69 6f 6e 61 6c 20 64 65	un.dirvish-symlink.(&optional.de
30520	73 74 29 0a 20 20 22 53 79 6d 6c 69 6e 6b 20 6d 61 72 6b 65 64 20 66 69 6c 65 73 20 74 6f 20 44	st)..."Symlink.marked.files.to.D
30540	45 53 54 2e 0a 50 72 6f 6d 70 74 20 66 6f 72 20 44 45 53 54 20 77 68 65 6e 20 70 72 65 66 69 78	EST..Prompt.for.DEST.when.prefix
30560	65 64 20 77 69 74 68 20 5c 5c 5b 75 6e 69 76 65 72 73 61 6c 2d 61 72 67 75 6d 65 6e 74 5d 2c 20	ed.with.\\[universal-argument],.
30580	69 74 0a 64 65 66 61 75 6c 74 73 20 74 6f 20 60 64 69 72 65 64 2d 63 75 72 72 65 6e 74 2d 64 69	it.defaults.to.`dired-current-di
305a0	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 20 28 64 69 72 76 69	rectory'."...(interactive.(dirvi
305c0	73 68 2d 79 61 6e 6b 2d 2d 72 65 61 64 2d 64 65 73 74 20 27 73 79 6d 6c 69 6e 6b 29 29 0a 20 20	sh-yank--read-dest.'symlink))...
305e0	28 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 2d 61 70 70 6c 79 20 27 6d 61 6b 65 2d 73 79 6d 62 6f	(dirvish-yank--apply.'make-symbo
30600	6c 69 63 2d 6c 69 6e 6b 20 64 65 73 74 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a	lic-link.dest))..;;;###autoload.
30620	28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 72 65 6c 61 74 69 76 65 2d 73 79 6d 6c 69 6e 6b 20	(defun.dirvish-relative-symlink.
30640	28 26 6f 70 74 69 6f 6e 61 6c 20 64 65 73 74 29 0a 20 20 22 53 69 6d 69 6c 61 72 20 74 6f 20 60	(&optional.dest)..."Similar.to.`
30660	64 69 72 76 69 73 68 2d 73 79 6d 6c 69 6e 6b 27 2c 20 62 75 74 20 6c 69 6e 6b 20 66 69 6c 65 73	dirvish-symlink',.but.link.files
30680	20 72 65 6c 61 74 69 76 65 6c 79 2e 0a 50 72 6f 6d 70 74 20 66 6f 72 20 44 45 53 54 20 77 68 65	.relatively..Prompt.for.DEST.whe
306a0	6e 20 70 72 65 66 69 78 65 64 20 77 69 74 68 20 5c 5c 5b 75 6e 69 76 65 72 73 61 6c 2d 61 72 67	n.prefixed.with.\\[universal-arg
306c0	75 6d 65 6e 74 5d 2c 20 69 74 0a 64 65 66 61 75 6c 74 73 20 74 6f 20 60 64 69 72 65 64 2d 63 75	ument],.it.defaults.to.`dired-cu
306e0	72 72 65 6e 74 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	rrent-directory'."...(interactiv
30700	65 20 28 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 2d 72 65 61 64 2d 64 65 73 74 20 27 72 65 6c 61	e.(dirvish-yank--read-dest.'rela
30720	6c 69 6e 6b 29 29 0a 20 20 28 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 2d 61 70 70 6c 79 20 27 64	link))...(dirvish-yank--apply.'d
30740	69 72 65 64 2d 6d 61 6b 65 2d 72 65 6c 61 74 69 76 65 2d 73 79 6d 6c 69 6e 6b 20 64 65 73 74 29	ired-make-relative-symlink.dest)
30760	29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68	)..;;;###autoload.(defun.dirvish
30780	2d 68 61 72 64 6c 69 6e 6b 20 28 26 6f 70 74 69 6f 6e 61 6c 20 64 65 73 74 29 0a 20 20 22 48 61	-hardlink.(&optional.dest)..."Ha
307a0	72 64 6c 69 6e 6b 20 6d 61 72 6b 65 64 20 66 69 6c 65 73 20 74 6f 20 44 45 53 54 2e 0a 50 72 6f	rdlink.marked.files.to.DEST..Pro
307c0	6d 70 74 20 66 6f 72 20 44 45 53 54 20 77 68 65 6e 20 70 72 65 66 69 78 65 64 20 77 69 74 68 20	mpt.for.DEST.when.prefixed.with.
307e0	5c 5c 5b 75 6e 69 76 65 72 73 61 6c 2d 61 72 67 75 6d 65 6e 74 5d 2c 20 69 74 0a 64 65 66 61 75	\\[universal-argument],.it.defau
30800	6c 74 73 20 74 6f 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	lts.to.`dired-current-directory'
30820	2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 28 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d	."...(interactive.(dirvish-yank-
30840	2d 72 65 61 64 2d 64 65 73 74 20 27 68 61 72 64 6c 69 6e 6b 29 29 0a 20 20 28 64 69 72 76 69 73	-read-dest.'hardlink))...(dirvis
30860	68 2d 79 61 6e 6b 2d 2d 61 70 70 6c 79 20 27 64 69 72 65 64 2d 68 61 72 64 6c 69 6e 6b 20 64 65	h-yank--apply.'dired-hardlink.de
30880	73 74 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 76	st))..;;;###autoload.(defun.dirv
308a0	69 73 68 2d 72 73 79 6e 63 20 28 64 65 73 74 29 0a 20 20 22 52 73 79 6e 63 20 6d 61 72 6b 65 64	ish-rsync.(dest)..."Rsync.marked
308c0	20 66 69 6c 65 73 20 74 6f 20 44 45 53 54 2c 20 70 72 6f 6d 70 74 20 66 6f 72 20 44 45 53 54 20	.files.to.DEST,.prompt.for.DEST.
308e0	69 66 20 6e 6f 74 20 63 61 6c 6c 65 64 20 77 69 74 68 2e 0a 49 66 20 65 69 74 68 65 72 20 74 68	if.not.called.with..If.either.th
30900	65 20 73 6f 75 72 63 65 73 20 6f 72 20 74 68 65 20 44 45 53 54 20 69 73 20 6c 6f 63 61 74 65 64	e.sources.or.the.DEST.is.located
30920	20 69 6e 20 61 20 72 65 6d 6f 74 65 20 68 6f 73 74 2c 0a 74 68 65 20 60 64 69 72 76 69 73 68 2d	.in.a.remote.host,.the.`dirvish-
30940	79 61 6e 6b 2d 72 73 79 6e 63 2d 70 72 6f 67 72 61 6d 27 20 61 6e 64 20 60 64 69 72 76 69 73 68	yank-rsync-program'.and.`dirvish
30960	2d 79 61 6e 6b 2d 72 73 79 6e 63 2d 61 72 67 73 27 0a 61 72 65 20 75 73 65 64 20 74 6f 20 74 72	-yank-rsync-args'.are.used.to.tr
30980	61 6e 73 66 65 72 20 74 68 65 20 66 69 6c 65 73 2e 0a 0a 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20	ansfer.the.files...This.command.
309a0	72 65 71 75 69 72 65 73 20 70 72 6f 70 65 72 20 73 73 68 20 61 75 74 68 65 6e 74 69 63 61 74 69	requires.proper.ssh.authenticati
309c0	6f 6e 20 73 65 74 75 70 20 74 6f 20 77 6f 72 6b 0a 63 6f 72 72 65 63 74 6c 79 20 66 6f 72 20 66	on.setup.to.work.correctly.for.f
309e0	69 6c 65 20 74 72 61 6e 73 66 65 72 20 69 6e 76 6f 6c 76 69 6e 67 20 72 65 6d 6f 74 65 20 68 6f	ile.transfer.involving.remote.ho
30a00	73 74 73 2c 20 62 65 63 61 75 73 65 20 72 73 79 6e 63 0a 63 6f 6d 6d 61 6e 64 20 69 73 20 61 6c	sts,.because.rsync.command.is.al
30a20	77 61 79 73 20 72 75 6e 20 6c 6f 63 61 6c 6c 79 2c 20 74 68 65 20 70 61 73 73 77 6f 72 64 20 70	ways.run.locally,.the.password.p
30a40	72 6f 6d 70 74 73 20 6d 61 79 20 6c 65 61 64 20 74 6f 0a 75 6e 65 78 70 65 63 74 65 64 20 65 72	rompts.may.lead.to.unexpected.er
30a60	72 6f 72 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 28 64 69 72 76 69 73 68 2d 79	rors."...(interactive.(dirvish-y
30a80	61 6e 6b 2d 2d 72 65 61 64 2d 64 65 73 74 20 27 72 73 79 6e 63 29 29 0a 20 20 28 73 65 74 71 20	ank--read-dest.'rsync))...(setq.
30aa0	64 65 73 74 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 28 6f 72 20 64 65 73 74 20	dest.(expand-file-name.(or.dest.
30ac0	28 64 69 72 65 64 2d 63 75 72 72 65 6e 74 2d 64 69 72 65 63 74 6f 72 79 29 29 29 29 0a 20 20 28	(dired-current-directory))))...(
30ae0	6c 65 74 2a 20 28 28 64 76 65 63 20 28 61 6e 64 20 28 74 72 61 6d 70 2d 74 72 61 6d 70 2d 66 69	let*.((dvec.(and.(tramp-tramp-fi
30b00	6c 65 2d 70 20 64 65 73 74 29 20 28 74 72 61 6d 70 2d 64 69 73 73 65 63 74 2d 66 69 6c 65 2d 6e	le-p.dest).(tramp-dissect-file-n
30b20	61 6d 65 20 64 65 73 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 73 72 63 73 20 28 6f 72 20 28	ame.dest)))..........(srcs.(or.(
30b40	61 6e 64 20 28 66 75 6e 63 74 69 6f 6e 70 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 73 6f 75 72	and.(functionp.dirvish-yank-sour
30b60	63 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75	ces).........................(fu
30b80	6e 63 61 6c 6c 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 73 6f 75 72 63 65 73 29 29 0a 20 20 20	ncall.dirvish-yank-sources))....
30ba0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 2d 67	................(dirvish-yank--g
30bc0	65 74 2d 73 72 63 73 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 73 6f 75 72 63 65 73 29 0a 20 20	et-srcs.dirvish-yank-sources)...
30be0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 44 69	.................(user-error."Di
30c00	72 76 69 73 68 5b 65 72 72 6f 72 5d 3a 20 6e 6f 20 6d 61 72 6b 65 64 20 66 69 6c 65 73 22 29 29	rvish[error]:.no.marked.files"))
30c20	29 0a 20 20 20 20 20 20 20 20 20 28 73 72 63 2d 30 20 28 70 72 6f 67 31 20 28 63 61 72 20 73 72	)..........(src-0.(prog1.(car.sr
30c40	63 73 29 20 28 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 2d 65 78 74 72 61 63 74 2d 72 65 6d 6f 74	cs).(dirvish-yank--extract-remot
30c60	65 20 73 72 63 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 73 76 65 63 20 28 61 6e 64 20 28 74	e.srcs)))..........(svec.(and.(t
30c80	72 61 6d 70 2d 74 72 61 6d 70 2d 66 69 6c 65 2d 70 20 73 72 63 2d 30 29 20 28 74 72 61 6d 70 2d	ramp-tramp-file-p.src-0).(tramp-
30ca0	64 69 73 73 65 63 74 2d 66 69 6c 65 2d 6e 61 6d 65 20 73 72 63 2d 30 29 29 29 29 0a 20 20 20 20	dissect-file-name.src-0)))).....
30cc0	28 63 6f 6e 64 0a 20 20 20 20 20 3b 3b 20 73 68 6f 73 74 20 61 6e 64 20 64 68 6f 73 74 20 61 72	(cond......;;.shost.and.dhost.ar
30ce0	65 20 64 69 66 66 65 72 65 6e 74 20 72 65 6d 6f 74 65 20 68 6f 73 74 73 0a 20 20 20 20 20 28 28	e.different.remote.hosts......((
30d00	61 6e 64 20 73 76 65 63 20 64 76 65 63 20 28 6e 6f 74 20 28 74 72 61 6d 70 2d 6c 6f 63 61 6c 2d	and.svec.dvec.(not.(tramp-local-
30d20	68 6f 73 74 2d 70 20 73 76 65 63 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 74	host-p.svec))............(not.(t
30d40	72 61 6d 70 2d 6c 6f 63 61 6c 2d 68 6f 73 74 2d 70 20 64 76 65 63 29 29 29 0a 20 20 20 20 20 20	ramp-local-host-p.dvec))).......
30d60	28 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 72 32 72 2d 68 61 6e 64 6c 65 72 0a 20 20 20 20 20 20	(dirvish-yank-r2r-handler.......
30d80	20 73 72 63 73 20 64 65 73 74 20 28 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 2d 65 78 74 72 61 63	.srcs.dest.(dirvish-yank--extrac
30da0	74 2d 68 6f 73 74 2d 66 72 6f 6d 2d 74 72 61 6d 70 20 73 72 63 2d 30 29 0a 20 20 20 20 20 20 20	t-host-from-tramp.src-0)........
30dc0	28 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 2d 65 78 74 72 61 63 74 2d 68 6f 73 74 2d 66 72 6f 6d	(dirvish-yank--extract-host-from
30de0	2d 74 72 61 6d 70 20 64 65 73 74 20 74 29 29 29 0a 20 20 20 20 20 3b 3b 20 65 69 74 68 65 72 20	-tramp.dest.t)))......;;.either.
30e00	73 68 6f 73 74 2c 20 64 68 6f 73 74 20 6f 72 20 62 6f 74 68 20 61 72 65 20 6c 6f 63 61 6c 68 6f	shost,.dhost.or.both.are.localho
30e20	73 74 0a 20 20 20 20 20 28 74 20 28 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 6c 32 66 72 2d 68 61	st......(t.(dirvish-yank-l2fr-ha
30e40	6e 64 6c 65 72 20 73 72 63 73 20 64 65 73 74 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72	ndler.srcs.dest)))))..(defun.dir
30e60	76 69 73 68 2d 79 61 6e 6b 2d 2d 72 73 79 6e 63 2d 74 72 61 6e 73 69 65 6e 74 2d 69 6e 69 74 2d	vish-yank--rsync-transient-init-
30e80	76 61 6c 75 65 20 28 6f 62 6a 29 0a 20 20 22 53 65 6c 65 63 74 20 69 6e 69 74 20 76 61 6c 75 65	value.(obj)..."Select.init.value
30ea0	73 20 66 72 6f 6d 20 74 68 65 20 6c 6f 63 61 6c 20 73 65 73 73 69 6f 6e 20 6f 72 20 65 6d 61 63	s.from.the.local.session.or.emac
30ec0	73 20 73 65 73 73 69 6f 6e 20 6f 72 20 73 61 76 65 64 20 74 72 61 6e 73 69 65 6e 74 20 76 61 6c	s.session.or.saved.transient.val
30ee0	75 65 73 2e 22 0a 20 20 28 69 66 2d 6c 65 74 20 28 28 73 65 73 73 69 6f 6e 2d 73 77 69 74 63 68	ues."...(if-let.((session-switch
30f00	65 73 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 72 73 79 6e 63 2d 73 77 69 74 63 68 65 73	es.(dirvish-prop.:rsync-switches
30f20	29 29 29 0a 20 20 20 20 20 20 73 65 73 73 69 6f 6e 2d 73 77 69 74 63 68 65 73 0a 20 20 20 20 3b	))).......session-switches.....;
30f40	3b 20 64 6f 6e 74 20 74 6f 75 63 68 20 69 66 20 69 74 20 69 73 20 61 6c 72 65 64 61 79 20 73 65	;.dont.touch.if.it.is.alreday.se
30f60	74 0a 20 20 20 20 28 69 66 20 28 73 6c 6f 74 2d 62 6f 75 6e 64 70 20 6f 62 6a 20 27 76 61 6c 75	t.....(if.(slot-boundp.obj.'valu
30f80	65 29 0a 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 6f 62 6a 20 76 61 6c 75 65 29 0a 20 20 20 20	e).........(oref.obj.value).....
30fa0	20 20 3b 3b 20 63 68 65 63 6b 20 73 61 76 65 64 20 76 61 6c 75 65 73 0a 20 20 20 20 20 20 28 69	..;;.check.saved.values.......(i
30fc0	66 2d 6c 65 74 20 28 28 73 61 76 65 64 20 28 61 73 73 71 20 28 6f 72 65 66 20 6f 62 6a 20 63 6f	f-let.((saved.(assq.(oref.obj.co
30fe0	6d 6d 61 6e 64 29 20 74 72 61 6e 73 69 65 6e 74 2d 76 61 6c 75 65 73 29 29 29 0a 20 20 20 20 20	mmand).transient-values)))......
31000	20 20 20 20 20 28 63 64 72 20 73 61 76 65 64 29 0a 20 20 20 20 20 20 20 20 3b 3b 20 75 73 65 20	.....(cdr.saved).........;;.use.
31020	66 6c 61 67 73 20 73 65 74 20 76 69 61 20 64 65 66 63 75 73 74 6f 6d 20 61 74 20 6c 61 73 74 20	flags.set.via.defcustom.at.last.
31040	72 65 73 6f 72 74 0a 20 20 20 20 20 20 20 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 72 73 79 6e	resort.........dirvish-yank-rsyn
31060	63 2d 61 72 67 73 29 29 29 29 0a 0a 3b 3b 20 69 6e 73 70 69 72 65 64 20 62 79 20 60 64 69 72 65	c-args))))..;;.inspired.by.`dire
31080	64 2d 72 73 79 6e 63 2d 74 72 61 6e 73 69 65 6e 74 27 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61	d-rsync-transient'.;;;###autoloa
310a0	64 20 28 61 75 74 6f 6c 6f 61 64 20 27 64 69 72 76 69 73 68 2d 72 73 79 6e 63 2d 74 72 61 6e 73	d.(autoload.'dirvish-rsync-trans
310c0	69 65 6e 74 20 22 64 69 72 76 69 73 68 2d 79 61 6e 6b 22 20 6e 69 6c 20 74 29 0a 28 74 72 61 6e	ient."dirvish-yank".nil.t).(tran
310e0	73 69 65 6e 74 2d 64 65 66 69 6e 65 2d 70 72 65 66 69 78 20 64 69 72 76 69 73 68 2d 72 73 79 6e	sient-define-prefix.dirvish-rsyn
31100	63 2d 74 72 61 6e 73 69 65 6e 74 20 28 29 0a 20 20 22 54 72 61 6e 73 69 65 6e 74 20 63 6f 6d 6d	c-transient.()..."Transient.comm
31120	61 6e 64 20 66 6f 72 20 60 64 69 72 76 69 73 68 2d 72 73 79 6e 63 27 2e 22 0a 20 20 3a 69 6e 69	and.for.`dirvish-rsync'."...:ini
31140	74 2d 76 61 6c 75 65 20 28 6c 61 6d 62 64 61 20 28 6f 29 20 28 6f 73 65 74 20 6f 20 76 61 6c 75	t-value.(lambda.(o).(oset.o.valu
31160	65 20 28 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 2d 72 73 79 6e 63 2d 74 72 61 6e 73 69 65 6e 74	e.(dirvish-yank--rsync-transient
31180	2d 69 6e 69 74 2d 76 61 6c 75 65 20 6f 29 29 29 0a 20 20 5b 22 43 6f 6d 6d 6f 6e 20 41 72 67 75	-init-value.o)))...["Common.Argu
311a0	6d 65 6e 74 73 22 0a 20 20 20 28 22 2d 61 22 20 22 61 72 63 68 69 76 65 20 6d 6f 64 65 3b 20 65	ments"....("-a"."archive.mode;.e
311c0	71 75 61 6c 73 20 74 6f 20 2d 72 6c 70 74 67 6f 44 22 20 28 22 2d 61 22 20 22 2d 2d 61 72 63 68	quals.to.-rlptgoD".("-a"."--arch
311e0	69 76 65 22 29 29 0a 20 20 20 28 22 2d 73 22 20 22 6e 6f 20 73 70 61 63 65 2d 73 70 6c 69 74 74	ive"))....("-s"."no.space-splitt
31200	69 6e 67 3b 20 75 73 65 66 75 6c 20 77 68 65 6e 20 72 65 6d 6f 74 65 20 66 69 6c 65 6e 61 6d 65	ing;.useful.when.remote.filename
31220	73 20 63 6f 6e 74 61 69 6e 20 73 70 61 63 65 73 22 20 28 22 2d 73 22 20 22 2d 2d 70 72 6f 74 65	s.contain.spaces".("-s"."--prote
31240	63 74 2d 61 72 67 73 22 29 20 3a 6c 65 76 65 6c 20 34 29 0a 20 20 20 28 22 2d 72 22 20 22 72 65	ct-args").:level.4)....("-r"."re
31260	63 75 72 73 65 20 69 6e 74 6f 20 64 69 72 65 63 74 6f 72 69 65 73 22 20 28 22 2d 72 22 20 22 2d	curse.into.directories".("-r"."-
31280	2d 72 65 63 75 72 73 69 76 65 22 29 20 3a 6c 65 76 65 6c 20 35 29 0a 20 20 20 28 22 2d 7a 22 20	-recursive").:level.5)....("-z".
312a0	22 63 6f 6d 70 72 65 73 73 20 66 69 6c 65 20 64 61 74 61 20 64 75 72 69 6e 67 20 74 68 65 20 74	"compress.file.data.during.the.t
312c0	72 61 6e 73 66 65 72 22 20 28 22 2d 7a 22 20 22 2d 2d 63 6f 6d 70 72 65 73 73 22 29 29 5d 0a 0a	ransfer".("-z"."--compress"))]..
312e0	20 20 5b 22 46 69 6c 65 73 20 73 65 6c 65 63 74 69 6f 6e 20 61 72 67 73 22 0a 20 20 20 28 22 2d	..["Files.selection.args"....("-
31300	43 22 20 22 61 75 74 6f 2d 69 67 6e 6f 72 65 20 66 69 6c 65 73 20 69 6e 20 74 68 65 20 73 61 6d	C"."auto-ignore.files.in.the.sam
31320	65 20 77 61 79 20 43 56 53 20 64 6f 65 73 22 20 28 22 2d 43 22 20 22 2d 2d 63 76 73 2d 65 78 63	e.way.CVS.does".("-C"."--cvs-exc
31340	6c 75 64 65 22 29 20 3a 6c 65 76 65 6c 20 34 29 0a 20 20 20 28 22 3d 65 22 20 22 65 78 63 6c 75	lude").:level.4)....("=e"."exclu
31360	64 65 20 66 69 6c 65 73 20 6d 61 74 63 68 69 6e 67 20 50 41 54 54 45 52 4e 22 20 22 2d 2d 65 78	de.files.matching.PATTERN"."--ex
31380	63 6c 75 64 65 3d 22 0a 20 20 20 20 3a 6d 75 6c 74 69 2d 76 61 6c 75 65 20 72 65 70 65 61 74 20	clude=".....:multi-value.repeat.
313a0	3a 72 65 61 64 65 72 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 2d 72 73 79 6e 63 2d 74 72 61 6e	:reader.dirvish-yank--rsync-tran
313c0	73 69 65 6e 74 2d 72 65 61 64 2d 6d 75 6c 74 69 70 6c 65 0a 20 20 20 20 3a 70 72 6f 6d 70 74 20	sient-read-multiple.....:prompt.
313e0	22 65 78 63 6c 75 64 65 20 28 65 2e 67 2e 20 e2 80 98 2a 2e 67 69 74 e2 80 99 20 6f 72 20 e2 80	"exclude.(e.g.....*.git....or...
31400	98 2a 2e 62 69 6e 2c 2a 2e 65 6c 63 e2 80 99 29 3a 20 22 29 0a 20 20 20 28 22 3d 69 22 20 22 69	..bin,.elc...):.")....("=i"."i
31420	6e 63 6c 75 64 65 20 66 69 6c 65 73 20 6d 61 74 63 68 69 6e 67 20 50 41 54 54 45 52 4e 22 20 22	nclude.files.matching.PATTERN"."
31440	2d 2d 69 6e 63 6c 75 64 65 3d 22 0a 20 20 20 20 3a 6d 75 6c 74 69 2d 76 61 6c 75 65 20 72 65 70	--include=".....:multi-value.rep
31460	65 61 74 20 3a 72 65 61 64 65 72 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 2d 72 73 79 6e 63 2d	eat.:reader.dirvish-yank--rsync-
31480	74 72 61 6e 73 69 65 6e 74 2d 72 65 61 64 2d 6d 75 6c 74 69 70 6c 65 0a 20 20 20 20 3a 70 72 6f	transient-read-multiple.....:pro
314a0	6d 70 74 20 22 69 6e 63 6c 75 64 65 20 28 65 2e 67 2e 20 e2 80 98 2a 2e 70 64 66 e2 80 99 20 6f	mpt."include.(e.g.....*.pdf....o
314c0	72 20 e2 80 98 2a 2e 6f 72 67 2c 2a 2e 65 6c e2 80 99 29 3a 20 22 20 3a 6c 65 76 65 6c 20 35 29	r.....org,.el...):.".:level.5)
314e0	5d 0a 0a 20 20 5b 22 53 65 6e 64 65 72 20 73 70 65 63 69 66 69 63 20 61 72 67 73 22 0a 20 20 20	]....["Sender.specific.args"....
31500	28 22 2d 4c 22 20 22 74 72 61 6e 73 66 6f 72 6d 20 73 79 6d 6c 69 6e 6b 20 69 6e 74 6f 20 72 65	("-L"."transform.symlink.into.re
31520	66 65 72 65 6e 74 20 66 69 6c 65 2f 64 69 72 22 20 28 22 2d 4c 22 20 22 2d 2d 63 6f 70 79 2d 6c	ferent.file/dir".("-L"."--copy-l
31540	69 6e 6b 73 22 29 20 3a 6c 65 76 65 6c 20 34 29 0a 20 20 20 28 22 2d 78 22 20 22 64 6f 6e 27 74	inks").:level.4)....("-x"."don't
31560	20 63 72 6f 73 73 20 66 69 6c 65 73 79 73 74 65 6d 20 62 6f 75 6e 64 61 72 69 65 73 22 20 28 22	.cross.filesystem.boundaries".("
31580	2d 78 22 20 22 2d 2d 6f 6e 65 2d 66 69 6c 65 2d 73 79 73 74 65 6d 22 29 20 3a 6c 65 76 65 6c 20	-x"."--one-file-system").:level.
315a0	35 29 0a 20 20 20 28 22 2d 6c 22 20 22 63 6f 70 79 20 73 79 6d 6c 69 6e 6b 73 20 61 73 20 73 79	5)....("-l"."copy.symlinks.as.sy
315c0	6d 6c 69 6e 6b 73 22 20 28 22 2d 6c 22 20 22 2d 2d 6c 69 6e 6b 73 22 29 20 3a 6c 65 76 65 6c 20	mlinks".("-l"."--links").:level.
315e0	35 29 0a 20 20 20 28 22 2d 63 22 20 22 73 6b 69 70 20 62 61 73 65 64 20 6f 6e 20 63 68 65 63 6b	5)....("-c"."skip.based.on.check
31600	73 75 6d 2c 20 6e 6f 74 20 6d 6f 64 2d 74 69 6d 65 20 26 20 73 69 7a 65 22 20 28 22 2d 63 22 20	sum,.not.mod-time.&.size".("-c".
31620	22 2d 2d 63 68 65 63 6b 73 75 6d 22 29 20 3a 6c 65 76 65 6c 20 36 29 0a 20 20 20 28 22 2d 6d 22	"--checksum").:level.6)....("-m"
31640	20 22 70 72 75 6e 65 20 65 6d 70 74 79 20 64 69 72 65 63 74 6f 72 79 20 63 68 61 69 6e 73 20 66	."prune.empty.directory.chains.f
31660	72 6f 6d 20 66 69 6c 65 2d 6c 69 73 74 22 20 28 22 2d 6d 22 20 22 2d 2d 70 72 75 6e 65 2d 65 6d	rom.file-list".("-m"."--prune-em
31680	70 74 79 2d 64 69 72 73 22 29 20 3a 6c 65 76 65 6c 20 36 29 0a 20 20 20 28 22 2d 2d 73 69 7a 65	pty-dirs").:level.6)....("--size
316a0	2d 6f 6e 6c 79 22 20 22 73 6b 69 70 20 66 69 6c 65 73 20 74 68 61 74 20 6d 61 74 63 68 20 69 6e	-only"."skip.files.that.match.in
316c0	20 73 69 7a 65 22 20 22 2d 2d 73 69 7a 65 2d 6f 6e 6c 79 22 20 3a 6c 65 76 65 6c 20 36 29 5d 0a	.size"."--size-only".:level.6)].
316e0	20 20 5b 22 52 65 63 65 69 76 65 72 20 73 70 65 63 69 66 69 63 20 61 72 67 73 22 0a 20 20 20 28	..["Receiver.specific.args"....(
31700	22 2d 52 22 20 22 75 73 65 20 72 65 6c 61 74 69 76 65 20 70 61 74 68 20 6e 61 6d 65 73 22 20 28	"-R"."use.relative.path.names".(
31720	22 2d 52 22 20 22 2d 2d 72 65 6c 61 74 69 76 65 22 29 20 3a 6c 65 76 65 6c 20 34 29 0a 20 20 20	"-R"."--relative").:level.4)....
31740	28 22 2d 75 22 20 22 73 6b 69 70 20 66 69 6c 65 73 20 74 68 61 74 20 61 72 65 20 6e 65 77 65 72	("-u"."skip.files.that.are.newer
31760	20 6f 6e 20 74 68 65 20 72 65 63 65 69 76 65 72 22 20 28 22 2d 75 22 20 22 2d 2d 75 70 64 61 74	.on.the.receiver".("-u"."--updat
31780	65 22 29 20 3a 6c 65 76 65 6c 20 34 29 0a 20 20 20 28 22 3d 64 22 20 22 64 65 6c 65 74 65 20 65	e").:level.4)....("=d"."delete.e
317a0	78 74 72 61 6e 65 6f 75 73 20 66 69 6c 65 73 20 66 72 6f 6d 20 64 65 73 74 20 64 69 72 73 22 20	xtraneous.files.from.dest.dirs".
317c0	22 2d 2d 64 65 6c 65 74 65 22 20 3a 6c 65 76 65 6c 20 34 29 0a 20 20 20 28 22 2d 62 22 20 22 6d	"--delete".:level.4)....("-b"."m
317e0	61 6b 65 20 62 61 63 6b 75 70 73 22 20 28 22 2d 62 22 20 22 2d 2d 62 61 63 6b 75 70 22 29 20 3a	ake.backups".("-b"."--backup").:
31800	6c 65 76 65 6c 20 35 29 0a 20 20 20 28 22 3d 62 73 22 20 22 62 61 63 6b 75 70 20 73 75 66 66 69	level.5)....("=bs"."backup.suffi
31820	78 22 20 22 2d 2d 73 75 66 66 69 78 3d 22 0a 20 20 20 20 3a 70 72 6f 6d 70 74 20 22 62 61 63 6b	x"."--suffix=".....:prompt."back
31840	75 70 20 73 75 66 66 69 78 3a 20 22 0a 20 20 20 20 3a 72 65 61 64 65 72 20 28 6c 61 6d 62 64 61	up.suffix:.".....:reader.(lambda
31860	20 28 70 72 6f 6d 70 74 20 26 6f 70 74 69 6f 6e 61 6c 20 5f 69 6e 69 74 69 61 6c 2d 69 6e 70 75	.(prompt.&optional._initial-inpu
31880	74 20 68 69 73 74 6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6d 70 6c 65	t.history)...............(comple
318a0	74 69 6e 67 2d 72 65 61 64 20 70 72 6f 6d 70 74 20 6e 69 6c 20 6e 69 6c 20 6e 69 6c 20 6e 69 6c	ting-read.prompt.nil.nil.nil.nil
318c0	20 68 69 73 74 6f 72 79 29 29 0a 20 20 20 20 3a 6c 65 76 65 6c 20 35 29 0a 20 20 20 28 22 2d 6e	.history)).....:level.5)....("-n
318e0	75 6d 22 20 22 64 6f 6e 27 74 20 6d 61 70 20 75 69 64 2f 67 69 64 20 76 61 6c 75 65 73 20 62 79	um"."don't.map.uid/gid.values.by
31900	20 75 73 65 72 2f 67 72 6f 75 70 20 6e 61 6d 65 22 20 22 2d 2d 6e 75 6d 65 72 69 63 2d 69 64 73	.user/group.name"."--numeric-ids
31920	22 20 3a 6c 65 76 65 6c 20 35 29 0a 20 20 20 28 22 2d 65 78 22 20 22 73 6b 69 70 20 63 72 65 61	".:level.5)....("-ex"."skip.crea
31940	74 69 6e 67 20 6e 65 77 20 66 69 6c 65 73 20 6f 6e 20 72 65 63 65 69 76 65 72 22 20 22 2d 2d 65	ting.new.files.on.receiver"."--e
31960	78 69 73 74 69 6e 67 22 20 3a 6c 65 76 65 6c 20 36 29 0a 20 20 20 28 22 2d 4b 22 20 22 74 72 65	xisting".:level.6)....("-K"."tre
31980	61 74 20 73 79 6d 6c 69 6e 6b 65 64 20 64 69 72 20 6f 6e 20 72 65 63 65 69 76 65 72 20 61 73 20	at.symlinked.dir.on.receiver.as.
319a0	64 69 72 22 20 28 22 2d 4b 22 20 22 2d 2d 6b 65 65 70 2d 64 69 72 6c 69 6e 6b 73 22 29 20 3a 6c	dir".("-K"."--keep-dirlinks").:l
319c0	65 76 65 6c 20 36 29 5d 0a 0a 20 20 5b 22 49 6e 66 6f 72 6d 61 74 69 6f 6e 20 6f 75 74 70 75 74	evel.6)]....["Information.output
319e0	22 0a 20 20 20 28 22 2d 76 22 20 22 69 6e 63 72 65 61 73 65 20 76 65 72 62 6f 73 69 74 79 22 20	"....("-v"."increase.verbosity".
31a00	28 22 2d 76 22 20 22 2d 2d 76 65 72 62 6f 73 65 22 29 29 0a 20 20 20 28 22 2d 69 22 20 22 6f 75	("-v"."--verbose"))....("-i"."ou
31a20	74 70 75 74 20 61 20 63 68 61 6e 67 65 2d 73 75 6d 6d 61 72 79 20 66 6f 72 20 61 6c 6c 20 75 70	tput.a.change-summary.for.all.up
31a40	64 61 74 65 73 22 20 22 2d 69 22 20 3a 6c 65 76 65 6c 20 35 29 0a 20 20 20 28 22 2d 68 22 20 22	dates"."-i".:level.5)....("-h"."
31a60	6f 75 74 70 75 74 20 6e 75 6d 62 65 72 73 20 69 6e 20 61 20 68 75 6d 61 6e 2d 72 65 61 64 61 62	output.numbers.in.a.human-readab
31a80	6c 65 20 66 6f 72 6d 61 74 22 20 22 2d 68 22 20 3a 6c 65 76 65 6c 20 35 29 0a 20 20 20 28 22 3d	le.format"."-h".:level.5)....("=
31aa0	49 22 20 22 70 65 72 2d 66 69 6c 65 20 28 31 29 20 6f 72 20 74 6f 74 61 6c 20 74 72 61 6e 73 66	I"."per-file.(1).or.total.transf
31ac0	65 72 20 28 32 29 20 70 72 6f 67 72 65 73 73 22 20 22 2d 2d 69 6e 66 6f 3d 22 0a 20 20 20 20 3a	er.(2).progress"."--info=".....:
31ae0	63 68 6f 69 63 65 73 20 28 22 70 72 6f 67 72 65 73 73 31 22 20 22 70 72 6f 67 72 65 73 73 32 22	choices.("progress1"."progress2"
31b00	29 20 3a 6c 65 76 65 6c 20 34 29 5d 0a 20 20 5b 22 41 63 74 69 6f 6e 22 0a 20 20 20 5b 28 22 52	).:level.4)]...["Action"....[("R
31b20	45 54 22 20 22 41 70 70 6c 79 20 73 77 69 74 63 68 65 73 20 61 6e 64 20 63 6f 70 79 22 20 64 69	ET"."Apply.switches.and.copy".di
31b40	72 76 69 73 68 2d 79 61 6e 6b 2d 2d 72 73 79 6e 63 2d 61 70 70 6c 79 2d 73 77 69 74 63 68 65 73	rvish-yank--rsync-apply-switches
31b60	2d 61 6e 64 2d 63 6f 70 79 29 5d 5d 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 79 61	-and-copy)]])..(defun.dirvish-ya
31b80	6e 6b 2d 2d 72 73 79 6e 63 2d 74 72 61 6e 73 69 65 6e 74 2d 72 65 61 64 2d 6d 75 6c 74 69 70 6c	nk--rsync-transient-read-multipl
31ba0	65 20 28 70 72 6f 6d 70 74 20 26 6f 70 74 69 6f 6e 61 6c 20 5f 69 6e 69 74 69 61 6c 2d 69 6e 70	e.(prompt.&optional._initial-inp
31bc0	75 74 20 68 69 73 74 6f 72 79 29 0a 20 20 22 52 65 61 64 20 6d 75 6c 74 69 70 6c 65 20 76 61 6c	ut.history)..."Read.multiple.val
31be0	75 65 73 20 61 66 74 65 72 20 50 52 4f 4d 50 54 20 77 69 74 68 20 6f 70 74 69 6f 6e 61 6c 20 49	ues.after.PROMPT.with.optional.I
31c00	4e 49 54 49 41 4c 5f 49 4e 50 55 54 20 61 6e 64 20 48 49 53 54 4f 52 59 2e 22 0a 20 20 28 6c 65	NITIAL_INPUT.and.HISTORY."...(le
31c20	74 20 28 28 63 72 6d 2d 73 65 70 61 72 61 74 6f 72 20 22 2c 22 29 29 0a 20 20 20 20 28 63 6f 6d	t.((crm-separator.",")).....(com
31c40	70 6c 65 74 69 6e 67 2d 72 65 61 64 2d 6d 75 6c 74 69 70 6c 65 20 70 72 6f 6d 70 74 20 6e 69 6c	pleting-read-multiple.prompt.nil
31c60	20 6e 69 6c 20 6e 69 6c 20 6e 69 6c 20 68 69 73 74 6f 72 79 29 29 29 0a 0a 3b 3b 3b 23 23 23 61	.nil.nil.nil.history)))..;;;###a
31c80	75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 2d 72 73 79	utoload.(defun.dirvish-yank--rsy
31ca0	6e 63 2d 61 70 70 6c 79 2d 73 77 69 74 63 68 65 73 2d 61 6e 64 2d 63 6f 70 79 20 28 61 72 67 73	nc-apply-switches-and-copy.(args
31cc0	29 0a 20 20 22 45 78 65 63 75 74 65 20 72 73 79 6e 63 20 63 6f 6d 6d 61 6e 64 20 67 65 6e 65 72	)..."Execute.rsync.command.gener
31ce0	61 74 65 64 20 62 79 20 74 72 61 6e 73 69 65 6e 74 20 41 52 47 53 2e 22 0a 20 20 28 69 6e 74 65	ated.by.transient.ARGS."...(inte
31d00	72 61 63 74 69 76 65 20 28 6c 69 73 74 20 28 74 72 61 6e 73 69 65 6e 74 2d 61 72 67 73 20 74 72	ractive.(list.(transient-args.tr
31d20	61 6e 73 69 65 6e 74 2d 63 75 72 72 65 6e 74 2d 63 6f 6d 6d 61 6e 64 29 29 29 0a 20 20 28 64 69	ansient-current-command)))...(di
31d40	72 76 69 73 68 2d 70 72 6f 70 20 3a 72 73 79 6e 63 2d 73 77 69 74 63 68 65 73 20 61 72 67 73 29	rvish-prop.:rsync-switches.args)
31d60	0a 20 20 28 63 61 6c 6c 2d 69 6e 74 65 72 61 63 74 69 76 65 6c 79 20 23 27 64 69 72 76 69 73 68	...(call-interactively.#'dirvish
31d80	2d 72 73 79 6e 63 29 29 0a 0a 0a 28 70 72 6f 76 69 64 65 20 27 64 69 72 76 69 73 68 2d 79 61 6e	-rsync))...(provide.'dirvish-yan
31da0	6b 29 0a 3b 3b 3b 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2e 65 6c 20 65 6e 64 73 20 68 65 72 65	k).;;;.dirvish-yank.el.ends.here
31dc0	0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
31de0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
31e00	64 69 72 76 69 73 68 2d 32 30 32 33 30 35 31 39 2e 31 35 30 30 2f 64 69 72 76 69 73 68 2e 65 6c	dirvish-20230519.1500/dirvish.el
31e20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
31e40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
31e60	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
31e80	30 31 37 33 32 30 35 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 34 35 36 00 20 30 00 00 00	0173205.00000000000.014456..0...
31ea0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
31ec0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
31ee0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
31f00	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...................
31f20	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...................
31f40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
31f60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
31f80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
31fa0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
31fc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
31fe0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
32000	3b 3b 3b 20 64 69 72 76 69 73 68 2e 65 6c 20 2d 2d 2d 20 41 20 6d 6f 64 65 72 6e 20 66 69 6c 65	;;;.dirvish.el.---.A.modern.file
32020	20 6d 61 6e 61 67 65 72 20 62 61 73 65 64 20 6f 6e 20 64 69 72 65 64 20 6d 6f 64 65 20 2d 2a 2d	.manager.based.on.dired.mode.-*-
32040	20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 20 74 20 2d 2a 2d 0a 3b 3b 20 43 6f 70 79 72	.lexical-binding:.t.-*-.;;.Copyr
32060	69 67 68 74 20 28 43 29 20 32 30 32 31 2d 32 30 32 32 20 41 6c 65 78 20 4c 75 0a 0a 3b 3b 20 41	ight.(C).2021-2022.Alex.Lu..;;.A
32080	75 74 68 6f 72 20 3a 20 41 6c 65 78 20 4c 75 20 3c 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e	uthor.:.Alex.Lu.<https://github.
320a0	63 6f 6d 2f 61 6c 65 78 6c 75 69 67 69 74 3e 0a 3b 3b 20 56 65 72 73 69 6f 6e 3a 20 32 2e 30 2e	com/alexluigit>.;;.Version:.2.0.
320c0	35 33 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 66 69 6c 65 73 2c 20 63 6f 6e 76 65 6e 69 65 6e	53.;;.Keywords:.files,.convenien
320e0	63 65 0a 3b 3b 20 48 6f 6d 65 70 61 67 65 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63	ce.;;.Homepage:.https://github.c
32100	6f 6d 2f 61 6c 65 78 6c 75 69 67 69 74 2f 64 69 72 76 69 73 68 0a 3b 3b 20 53 50 44 58 2d 4c 69	om/alexluigit/dirvish.;;.SPDX-Li
32120	63 65 6e 73 65 2d 49 64 65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74	cense-Identifier:.GPL-3.0-or-lat
32140	65 72 0a 3b 3b 20 50 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	er.;;.Package-Requires:.((emacs.
32160	22 32 37 2e 31 22 29 20 28 74 72 61 6e 73 69 65 6e 74 20 22 30 2e 33 2e 37 22 29 29 0a 0a 3b 3b	"27.1").(transient."0.3.7"))..;;
32180	20 54 68 69 73 20 66 69 6c 65 20 69 73 20 6e 6f 74 20 70 61 72 74 20 6f 66 20 47 4e 55 20 45 6d	.This.file.is.not.part.of.GNU.Em
321a0	61 63 73 2e 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 3b 3b 20 41 20 6d 69 6e 69 6d	acs...;;;.Commentary:.;;.A.minim
321c0	61 6c 69 73 74 69 63 20 79 65 74 20 76 65 72 73 61 74 69 6c 65 20 66 69 6c 65 20 6d 61 6e 61 67	alistic.yet.versatile.file.manag
321e0	65 72 20 62 61 73 65 64 20 6f 6e 20 44 69 72 65 64 2e 0a 3b 3b 20 54 68 69 73 20 70 61 63 6b 61	er.based.on.Dired..;;.This.packa
32200	67 65 20 67 69 76 65 73 20 44 69 72 65 64 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 66 65 61	ge.gives.Dired.the.following.fea
32220	74 75 72 65 73 3a 0a 3b 3b 0a 3b 3b 20 2d 20 4d 75 6c 74 69 70 6c 65 20 77 69 6e 64 6f 77 20 6c	tures:.;;.;;.-.Multiple.window.l
32240	61 79 6f 75 74 73 0a 3b 3b 20 2d 20 41 6c 77 61 79 73 20 61 76 61 69 6c 61 62 6c 65 20 66 69 6c	ayouts.;;.-.Always.available.fil
32260	65 20 70 72 65 76 69 65 77 0a 3b 3b 20 2d 20 49 73 6f 6c 61 74 65 64 20 73 65 73 73 69 6f 6e 73	e.preview.;;.-.Isolated.sessions
32280	0a 3b 3b 20 2d 20 41 20 6d 6f 64 65 72 6e 20 61 6e 64 20 63 6f 6d 70 6f 73 61 62 6c 65 20 75 73	.;;.-.A.modern.and.composable.us
322a0	65 72 20 69 6e 74 65 72 66 61 63 65 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72	er.interface..;;;.Code:..(requir
322c0	65 20 27 64 69 72 65 64 29 0a 28 72 65 71 75 69 72 65 20 27 74 72 61 6e 73 69 65 6e 74 29 0a 28	e.'dired).(require.'transient).(
322e0	64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 61 6e 73 69 2d 63 6f 6c 6f 72 2d 61 70 70 6c	declare-function.ansi-color-appl
32300	79 2d 6f 6e 2d 72 65 67 69 6f 6e 20 22 61 6e 73 69 2d 63 6f 6c 6f 72 22 29 0a 28 64 65 63 6c 61	y-on-region."ansi-color").(decla
32320	72 65 2d 66 75 6e 63 74 69 6f 6e 20 64 69 72 76 69 73 68 2d 66 64 2d 66 69 6e 64 20 22 64 69 72	re-function.dirvish-fd-find."dir
32340	76 69 73 68 2d 66 64 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 64 69 72 76	vish-fd").(declare-function.dirv
32360	69 73 68 2d 6e 6f 73 65 6c 65 63 74 2d 74 72 61 6d 70 20 22 64 69 72 76 69 73 68 2d 65 78 74 72	ish-noselect-tramp."dirvish-extr
32380	61 73 22 29 0a 0a 3b 3b 3b 3b 20 55 73 65 72 20 4f 70 74 69 6f 6e 73 0a 0a 28 64 65 66 67 72 6f	as")..;;;;.User.Options..(defgro
323a0	75 70 20 64 69 72 76 69 73 68 20 6e 69 6c 20 22 41 20 62 65 74 74 65 72 20 44 69 72 65 64 2e 22	up.dirvish.nil."A.better.Dired."
323c0	20 3a 67 72 6f 75 70 20 27 64 69 72 65 64 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76	.:group.'dired)..(defcustom.dirv
323e0	69 73 68 2d 61 74 74 72 69 62 75 74 65 73 20 27 28 66 69 6c 65 2d 73 69 7a 65 29 0a 20 20 22 46	ish-attributes.'(file-size)..."F
32400	69 6c 65 20 61 74 74 72 69 62 75 74 65 73 20 73 68 6f 77 69 6e 67 20 69 6e 20 66 69 6c 65 20 6c	ile.attributes.showing.in.file.l
32420	69 6e 65 73 2e 0a 44 69 72 76 69 73 68 20 73 68 69 70 73 20 77 69 74 68 20 74 68 65 73 65 20 61	ines..Dirvish.ships.with.these.a
32440	74 74 72 69 62 75 74 65 73 3a 0a 0a 2d 20 60 73 75 62 74 72 65 65 2d 73 74 61 74 65 27 3a 20 41	ttributes:..-.`subtree-state':.A
32460	20 69 6e 64 69 63 61 74 6f 72 20 66 6f 72 20 64 69 72 65 63 74 6f 72 79 20 65 78 70 61 6e 64 69	.indicator.for.directory.expandi
32480	6e 67 20 73 74 61 74 65 2e 0a 2d 20 60 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 27 3a 20 46 69 6c	ng.state..-.`all-the-icons':.Fil
324a0	65 20 69 63 6f 6e 73 20 70 72 6f 76 69 64 65 64 20 62 79 20 60 61 6c 6c 2d 74 68 65 2d 69 63 6f	e.icons.provided.by.`all-the-ico
324c0	6e 73 2e 65 6c 27 2e 0a 2d 20 60 6e 65 72 64 2d 69 63 6f 6e 73 27 3a 20 46 69 6c 65 20 69 63 6f	ns.el'..-.`nerd-icons':.File.ico
324e0	6e 73 20 70 72 6f 76 69 64 65 64 20 62 79 20 60 6e 65 72 64 2d 69 63 6f 6e 73 2e 65 6c 27 2e 0a	ns.provided.by.`nerd-icons.el'..
32500	2d 20 60 76 73 63 6f 64 65 2d 69 63 6f 6e 27 3a 20 46 69 6c 65 20 69 63 6f 6e 73 20 70 72 6f 76	-.`vscode-icon':.File.icons.prov
32520	69 64 65 64 20 62 79 20 60 76 73 63 6f 64 65 2d 69 63 6f 6e 2e 65 6c 27 2e 0a 2d 20 60 63 6f 6c	ided.by.`vscode-icon.el'..-.`col
32540	6c 61 70 73 65 27 3a 20 43 6f 6c 6c 61 70 73 65 20 75 6e 69 71 75 65 20 6e 65 73 74 65 64 20 70	lapse':.Collapse.unique.nested.p
32560	61 74 68 73 2e 0a 2d 20 60 67 69 74 2d 6d 73 67 27 3a 20 41 70 70 65 6e 64 20 67 69 74 20 63 6f	aths..-.`git-msg':.Append.git.co
32580	6d 6d 69 74 20 6d 65 73 73 61 67 65 20 74 6f 20 66 69 6c 65 6e 61 6d 65 2e 0a 2d 20 60 76 63 2d	mmit.message.to.filename..-.`vc-
325a0	73 74 61 74 65 27 3a 20 54 68 65 20 76 65 72 73 69 6f 6e 20 63 6f 6e 74 72 6f 6c 20 73 74 61 74	state':.The.version.control.stat
325c0	65 20 61 74 20 6c 65 66 74 20 66 72 69 6e 67 65 2e 0a 2d 20 60 66 69 6c 65 2d 73 69 7a 65 27 3a	e.at.left.fringe..-.`file-size':
325e0	20 66 69 6c 65 20 73 69 7a 65 20 6f 72 20 64 69 72 65 63 74 6f 72 69 65 73 20 66 69 6c 65 20 63	.file.size.or.directories.file.c
32600	6f 75 6e 74 20 61 74 20 72 69 67 68 74 20 66 72 69 6e 67 65 2e 0a 2d 20 60 66 69 6c 65 2d 74 69	ount.at.right.fringe..-.`file-ti
32620	6d 65 27 3a 20 53 68 6f 77 20 66 69 6c 65 20 6d 6f 64 69 66 69 63 61 74 69 6f 6e 20 74 69 6d 65	me':.Show.file.modification.time
32640	20 62 65 66 6f 72 65 20 74 68 65 20 60 66 69 6c 65 2d 73 69 7a 65 27 2e 22 0a 20 20 3a 67 72 6f	.before.the.`file-size'."...:gro
32660	75 70 20 27 64 69 72 76 69 73 68 20 3a 74 79 70 65 20 27 28 72 65 70 65 61 74 20 28 73 79 6d 62	up.'dirvish.:type.'(repeat.(symb
32680	6f 6c 20 3a 74 61 67 20 22 44 69 72 76 69 73 68 20 61 74 74 72 69 62 75 74 65 22 29 29 29 0a 0a	ol.:tag."Dirvish.attribute")))..
326a0	28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 70 72 65 76 69 65 77 2d 64 69 73 70 61	(defcustom.dirvish-preview-dispa
326c0	74 63 68 65 72 73 20 27 28 69 6d 61 67 65 20 67 69 66 20 76 69 64 65 6f 20 61 75 64 69 6f 20 65	tchers.'(image.gif.video.audio.e
326e0	70 75 62 20 61 72 63 68 69 76 65 20 70 64 66 29 0a 20 20 22 4c 69 73 74 20 6f 66 20 70 72 65 76	pub.archive.pdf)..."List.of.prev
32700	69 65 77 20 64 69 73 70 61 74 63 68 65 72 73 2e 0a 45 61 63 68 20 64 69 73 70 61 74 63 68 65 72	iew.dispatchers..Each.dispatcher
32720	20 69 6e 20 74 68 69 73 20 6c 69 73 74 20 68 61 6e 64 6c 65 73 20 74 68 65 20 76 61 6c 69 64 61	.in.this.list.handles.the.valida
32740	74 69 6f 6e 20 61 6e 64 20 70 72 65 76 69 65 77 0a 63 6f 6e 74 65 6e 74 20 67 65 6e 65 72 61 74	tion.and.preview.content.generat
32760	69 6f 6e 20 66 6f 72 20 74 68 65 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 66 69 6c 65 74 79	ion.for.the.corresponding.filety
32780	70 65 2e 0a 0a 54 68 65 20 64 65 66 61 75 6c 74 20 76 61 6c 75 65 20 63 6f 6e 74 61 69 6e 73 3a	pe...The.default.value.contains:
327a0	0a 0a 2d 20 69 6d 61 67 65 3a 20 70 72 65 76 69 65 77 20 69 6d 61 67 65 20 66 69 6c 65 73 2c 20	..-.image:.preview.image.files,.
327c0	72 65 71 75 69 72 65 73 20 60 69 6d 61 67 65 6d 61 67 69 63 6b 27 2e 0a 2d 20 67 69 66 3a 20 70	requires.`imagemagick'..-.gif:.p
327e0	72 65 76 69 65 77 20 47 49 46 20 69 6d 61 67 65 20 66 69 6c 65 73 20 77 69 74 68 20 61 6e 69 6d	review.GIF.image.files.with.anim
32800	61 74 69 6f 6e 2e 0a 2d 20 76 69 64 65 6f 3a 20 70 72 65 76 69 65 77 20 76 69 64 65 6f 73 20 66	ation..-.video:.preview.videos.f
32820	69 6c 65 73 20 77 69 74 68 20 74 68 75 6d 62 6e 61 69 6c 2c 20 72 65 71 75 69 72 65 73 20 60 66	iles.with.thumbnail,.requires.`f
32840	66 6d 70 65 67 74 68 75 6d 62 6e 61 69 6c 65 72 27 2e 0a 2d 20 61 75 64 69 6f 3a 20 70 72 65 76	fmpegthumbnailer'..-.audio:.prev
32860	69 65 77 20 61 75 64 69 6f 20 66 69 6c 65 73 20 77 69 74 68 20 6d 65 74 61 64 61 74 61 2c 20 72	iew.audio.files.with.metadata,.r
32880	65 71 75 69 72 65 73 20 60 6d 65 64 69 61 69 6e 66 6f 27 2e 0a 2d 20 65 70 75 62 3a 20 70 72 65	equires.`mediainfo'..-.epub:.pre
328a0	76 69 65 77 20 65 70 75 62 20 64 6f 63 75 6d 65 6e 74 73 2c 20 72 65 71 75 69 72 65 73 20 60 65	view.epub.documents,.requires.`e
328c0	70 75 62 2d 74 68 75 6d 62 6e 61 69 6c 65 72 27 2e 0a 2d 20 70 64 66 3a 20 70 72 65 76 69 65 77	pub-thumbnailer'..-.pdf:.preview
328e0	20 70 64 66 20 64 6f 63 75 6d 65 6e 74 73 20 76 69 61 20 60 70 64 66 2d 74 6f 6f 6c 73 27 2e 0a	.pdf.documents.via.`pdf-tools'..
32900	2d 20 61 72 63 68 69 76 65 3a 20 70 72 65 76 69 65 77 20 61 72 63 68 69 76 65 20 66 69 6c 65 73	-.archive:.preview.archive.files
32920	20 73 75 63 68 20 61 73 20 2e 74 61 72 2c 20 2e 7a 69 70 2c 20 72 65 71 75 69 72 65 73 20 60 74	.such.as..tar,..zip,.requires.`t
32940	61 72 27 20 2f 20 60 75 6e 7a 69 70 27 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73	ar'./.`unzip'."...:group.'dirvis
32960	68 20 3a 74 79 70 65 20 27 28 72 65 70 65 61 74 20 28 73 79 6d 62 6f 6c 20 3a 74 61 67 20 22 44	h.:type.'(repeat.(symbol.:tag."D
32980	69 72 76 69 73 68 20 70 72 65 76 69 65 77 20 6d 65 74 68 6f 64 73 22 29 29 29 0a 0a 28 64 65 66	irvish.preview.methods")))..(def
329a0	63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 70 72 65 76 69 65 77 2d 64 69 73 61 62 6c 65 64 2d	custom.dirvish-preview-disabled-
329c0	65 78 74 73 20 27 28 22 69 73 6f 22 20 22 62 69 6e 22 20 22 65 78 65 22 20 22 67 70 67 22 20 22	exts.'("iso"."bin"."exe"."gpg"."
329e0	65 6c 63 22 20 22 65 6c 6e 22 29 0a 20 20 22 44 6f 20 6e 6f 74 20 70 72 65 76 69 65 77 20 66 69	elc"."eln")..."Do.not.preview.fi
32a00	6c 65 73 20 65 6e 64 20 77 69 74 68 20 74 68 65 73 65 20 65 78 74 65 6e 73 69 6f 6e 73 2e 22 0a	les.end.with.these.extensions.".
32a20	20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 20 3a 74 79 70 65 20 27 28 72 65 70 65 61 74	..:group.'dirvish.:type.'(repeat
32a40	20 28 73 74 72 69 6e 67 20 3a 74 61 67 20 22 46 69 6c 65 20 6e 61 6d 65 20 65 78 74 65 6e 73 69	.(string.:tag."File.name.extensi
32a60	6f 6e 22 29 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 70 72 65 76 69	on")))..(defcustom.dirvish-previ
32a80	65 77 2d 65 6e 76 69 72 6f 6e 6d 65 6e 74 0a 20 20 27 28 28 69 6e 68 69 62 69 74 2d 6d 65 73 73	ew-environment...'((inhibit-mess
32aa0	61 67 65 20 2e 20 74 29 20 28 6e 6f 6e 2d 65 73 73 65 6e 74 69 61 6c 20 2e 20 74 29 20 28 64 65	age...t).(non-essential...t).(de
32ac0	6c 61 79 2d 6d 6f 64 65 2d 68 6f 6f 6b 73 20 2e 20 74 29 0a 20 20 20 20 28 65 6e 61 62 6c 65 2d	lay-mode-hooks...t).....(enable-
32ae0	64 69 72 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 73 20 2e 20 6e 69 6c 29 20 28 65 6e 61 62	dir-local-variables...nil).(enab
32b00	6c 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 73 20 2e 20 3a 73 61 66 65 29 29 0a 20 20 22	le-local-variables...:safe))..."
32b20	56 61 72 69 61 62 6c 65 73 20 77 68 69 63 68 20 61 72 65 20 62 6f 75 6e 64 20 66 6f 72 20 64 65	Variables.which.are.bound.for.de
32b40	66 61 75 6c 74 20 66 69 6c 65 20 70 72 65 76 69 65 77 20 64 69 73 70 61 74 63 68 65 72 2e 0a 43	fault.file.preview.dispatcher..C
32b60	72 65 64 69 74 3a 20 63 6f 70 69 65 64 20 66 72 6f 6d 20 60 63 6f 6e 73 75 6c 74 2d 70 72 65 76	redit:.copied.from.`consult-prev
32b80	69 65 77 2d 76 61 72 69 61 62 6c 65 73 27 20 69 6e 20 60 63 6f 6e 73 75 6c 74 2e 65 6c 27 2e 22	iew-variables'.in.`consult.el'."
32ba0	0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 20 3a 74 79 70 65 20 27 61 6c 69 73 74 29	...:group.'dirvish.:type.'alist)
32bc0	0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 63 61 63 68 65 2d 64 69 72 0a 20	..(defcustom.dirvish-cache-dir..
32be0	20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 64 69 72 76 69 73 68 2f 22 20 75 73	.(expand-file-name."dirvish/".us
32c00	65 72 2d 65 6d 61 63 73 2d 64 69 72 65 63 74 6f 72 79 29 0a 20 20 22 50 72 65 76 69 65 77 20 2f	er-emacs-directory)..."Preview./
32c20	20 74 68 75 6d 62 6e 61 69 6c 20 63 61 63 68 65 20 64 69 72 65 63 74 6f 72 79 20 66 6f 72 20 64	.thumbnail.cache.directory.for.d
32c40	69 72 76 69 73 68 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 20 3a 74 79 70 65	irvish."...:group.'dirvish.:type
32c60	20 27 73 74 72 69 6e 67 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 64 65	.'string)..(defcustom.dirvish-de
32c80	66 61 75 6c 74 2d 6c 61 79 6f 75 74 20 27 28 31 20 30 2e 31 31 20 30 2e 35 35 29 0a 20 20 22 44	fault-layout.'(1.0.11.0.55)..."D
32ca0	65 66 61 75 6c 74 20 6c 61 79 6f 75 74 20 72 65 63 69 70 65 20 66 6f 72 20 66 75 6c 6c 73 63 72	efault.layout.recipe.for.fullscr
32cc0	65 65 6e 20 44 69 72 76 69 73 68 20 73 65 73 73 69 6f 6e 73 2e 0a 54 68 65 20 76 61 6c 75 65 20	een.Dirvish.sessions..The.value.
32ce0	68 61 73 20 74 68 65 20 66 6f 72 6d 20 28 44 45 50 54 48 20 4d 41 58 2d 50 41 52 45 4e 54 2d 57	has.the.form.(DEPTH.MAX-PARENT-W
32d00	49 44 54 48 20 50 52 45 56 49 45 57 2d 57 49 44 54 48 29 2e 0a 44 45 50 54 48 20 63 6f 6e 74 72	IDTH.PREVIEW-WIDTH)..DEPTH.contr
32d20	6f 6c 73 20 74 68 65 20 6e 75 6d 62 65 72 20 6f 66 20 77 69 6e 64 6f 77 73 20 64 69 73 70 6c 61	ols.the.number.of.windows.displa
32d40	79 69 6e 67 20 70 61 72 65 6e 74 0a 64 69 72 65 63 74 6f 72 69 65 73 2e 20 20 49 74 20 63 61 6e	ying.parent.directories...It.can
32d60	20 62 65 20 30 20 69 66 20 79 6f 75 20 64 6f 6e 27 74 20 6e 65 65 64 20 74 68 65 20 70 61 72 65	.be.0.if.you.don't.need.the.pare
32d80	6e 74 0a 64 69 72 65 63 74 6f 72 69 65 73 2e 20 20 4d 41 58 2d 50 41 52 45 4e 54 2d 57 49 44 54	nt.directories...MAX-PARENT-WIDT
32da0	48 20 63 6f 6e 74 72 6f 6c 73 20 74 68 65 20 6d 61 78 20 77 69 64 74 68 20 61 6c 6c 6f 63 61 74	H.controls.the.max.width.allocat
32dc0	65 64 0a 74 6f 20 65 61 63 68 20 70 61 72 65 6e 74 20 77 69 6e 64 6f 77 73 2e 20 20 50 52 45 56	ed.to.each.parent.windows...PREV
32de0	49 45 57 2d 57 49 44 54 48 20 63 6f 6e 74 72 6f 6c 73 20 74 68 65 20 77 69 64 74 68 0a 61 6c 6c	IEW-WIDTH.controls.the.width.all
32e00	6f 63 61 74 65 64 20 74 6f 20 70 72 65 76 69 65 77 20 77 69 6e 64 6f 77 2e 20 20 54 68 65 20 64	ocated.to.preview.window...The.d
32e20	65 66 61 75 6c 74 20 76 61 6c 75 65 20 70 72 6f 76 69 64 65 73 20 61 0a 31 3a 33 3a 35 20 28 61	efault.value.provides.a.1:3:5.(a
32e40	70 70 72 6f 78 69 6d 61 74 65 6c 79 29 20 70 61 6e 65 20 72 61 74 69 6f 2e 20 20 41 6c 73 6f 20	pproximately).pane.ratio...Also.
32e60	73 65 65 0a 60 64 69 72 76 69 73 68 2d 6c 61 79 6f 75 74 2d 72 65 63 69 70 65 73 27 20 69 6e 20	see.`dirvish-layout-recipes'.in.
32e80	60 64 69 72 76 69 73 68 2d 65 78 74 72 61 73 2e 65 6c 27 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27	`dirvish-extras.el'."...:group.'
32ea0	64 69 72 76 69 73 68 20 3a 74 79 70 65 20 27 28 6c 69 73 74 20 28 69 6e 74 65 67 65 72 20 3a 74	dirvish.:type.'(list.(integer.:t
32ec0	61 67 20 22 6e 75 6d 62 65 72 20 6f 66 20 70 61 72 65 6e 74 20 77 69 6e 64 6f 77 73 22 29 0a 20	ag."number.of.parent.windows")..
32ee0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66	..............................(f
32f00	6c 6f 61 74 20 3a 74 61 67 20 22 6d 61 78 20 77 69 64 74 68 20 6f 66 20 70 61 72 65 6e 74 20 77	loat.:tag."max.width.of.parent.w
32f20	69 6e 64 6f 77 73 22 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	indows")........................
32f40	20 20 20 20 20 20 20 20 28 66 6c 6f 61 74 20 3a 74 61 67 20 22 77 69 64 74 68 20 6f 66 20 70 72	........(float.:tag."width.of.pr
32f60	65 76 69 65 77 20 77 69 6e 64 6f 77 73 22 29 29 29 0a 0a 28 64 65 66 66 61 63 65 20 64 69 72 76	eview.windows")))..(defface.dirv
32f80	69 73 68 2d 68 6c 2d 6c 69 6e 65 0a 20 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 68 69 67 68	ish-hl-line...'((t.:inherit.high
32fa0	6c 69 67 68 74 20 3a 65 78 74 65 6e 64 20 74 29 29 0a 20 20 22 46 61 63 65 20 66 6f 72 20 44 69	light.:extend.t))..."Face.for.Di
32fc0	72 76 69 73 68 20 6c 69 6e 65 20 68 69 67 68 6c 69 67 68 74 69 6e 67 2e 22 0a 20 20 3a 67 72 6f	rvish.line.highlighting."...:gro
32fe0	75 70 20 27 64 69 72 76 69 73 68 29 0a 0a 28 64 65 66 69 6e 65 2d 6f 62 73 6f 6c 65 74 65 2d 76	up.'dirvish)..(define-obsolete-v
33000	61 72 69 61 62 6c 65 2d 61 6c 69 61 73 20 27 64 69 72 76 69 73 68 2d 6d 6f 64 65 2d 6c 69 6e 65	ariable-alias.'dirvish-mode-line
33020	2d 70 6f 73 69 74 69 6f 6e 20 27 64 69 72 76 69 73 68 2d 75 73 65 2d 6d 6f 64 65 2d 6c 69 6e 65	-position.'dirvish-use-mode-line
33040	20 22 41 75 67 20 35 2c 20 32 30 32 32 22 29 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69	."Aug.5,.2022").(defcustom.dirvi
33060	73 68 2d 75 73 65 2d 6d 6f 64 65 2d 6c 69 6e 65 20 74 0a 20 20 22 57 68 65 74 68 65 72 20 74 6f	sh-use-mode-line.t..."Whether.to
33080	20 64 69 73 70 6c 61 79 20 6d 6f 64 65 20 6c 69 6e 65 20 69 6e 20 64 69 72 76 69 73 68 20 62 75	.display.mode.line.in.dirvish.bu
330a0	66 66 65 72 73 2e 0a 54 68 65 20 76 61 6c 69 64 20 76 61 6c 75 65 20 61 72 65 3a 0a 2d 20 6e 69	ffers..The.valid.value.are:.-.ni
330c0	6c 3a 20 68 69 64 65 20 6d 6f 64 65 20 6c 69 6e 65 20 69 6e 20 64 69 72 76 69 73 68 20 73 65 73	l:.hide.mode.line.in.dirvish.ses
330e0	73 69 6f 6e 73 0a 2d 20 67 6c 6f 62 61 6c 3a 20 64 69 73 70 6c 61 79 20 74 68 65 20 6d 6f 64 65	sions.-.global:.display.the.mode
33100	20 6c 69 6e 65 20 61 63 72 6f 73 73 20 61 6c 6c 20 70 61 6e 65 73 0a 2d 20 74 20 28 61 6e 64 20	.line.across.all.panes.-.t.(and.
33120	6f 74 68 65 72 73 29 3a 20 44 69 73 70 6c 61 79 20 74 68 65 20 6d 6f 64 65 20 6c 69 6e 65 20 61	others):.Display.the.mode.line.a
33140	63 72 6f 73 73 20 64 69 72 65 63 74 6f 72 79 20 70 61 6e 65 73 22 0a 20 20 3a 67 72 6f 75 70 20	cross.directory.panes"...:group.
33160	27 64 69 72 76 69 73 68 0a 20 20 3a 74 79 70 65 20 27 28 63 68 6f 69 63 65 20 28 63 6f 6e 73 74	'dirvish...:type.'(choice.(const
33180	20 3a 74 61 67 20 22 44 6f 20 6e 6f 74 20 73 68 6f 77 20 74 68 65 20 6d 6f 64 65 20 6c 69 6e 65	.:tag."Do.not.show.the.mode.line
331a0	22 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 3a	".nil)..................(const.:
331c0	74 61 67 20 22 44 69 73 70 6c 61 79 20 74 68 65 20 6d 6f 64 65 20 6c 69 6e 65 20 61 63 72 6f 73	tag."Display.the.mode.line.acros
331e0	73 20 64 69 72 65 63 74 6f 72 79 20 70 61 6e 65 73 22 20 74 29 0a 20 20 20 20 20 20 20 20 20 20	s.directory.panes".t)...........
33200	20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 4d 61 6b 65 20 74 68 65 20 6d 6f 64	.......(const.:tag."Make.the.mod
33220	65 20 6c 69 6e 65 20 73 70 61 6e 20 61 6c 6c 20 70 61 6e 65 73 22 20 67 6c 6f 62 61 6c 29 29 29	e.line.span.all.panes".global)))
33240	0a 0a 28 64 65 66 69 6e 65 2d 6f 62 73 6f 6c 65 74 65 2d 76 61 72 69 61 62 6c 65 2d 61 6c 69 61	..(define-obsolete-variable-alia
33260	73 20 27 64 69 72 76 69 73 68 2d 68 65 61 64 65 72 2d 6c 69 6e 65 2d 70 6f 73 69 74 69 6f 6e 20	s.'dirvish-header-line-position.
33280	27 64 69 72 76 69 73 68 2d 75 73 65 2d 68 65 61 64 65 72 2d 6c 69 6e 65 20 22 41 75 67 20 35 2c	'dirvish-use-header-line."Aug.5,
332a0	20 32 30 32 32 22 29 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 75 73 65 2d 68	.2022").(defcustom.dirvish-use-h
332c0	65 61 64 65 72 2d 6c 69 6e 65 20 74 0a 20 20 22 4c 69 6b 65 20 60 64 69 72 76 69 73 68 2d 75 73	eader-line.t..."Like.`dirvish-us
332e0	65 2d 6d 6f 64 65 2d 6c 69 6e 65 27 2c 20 62 75 74 20 66 6f 72 20 68 65 61 64 65 72 20 6c 69 6e	e-mode-line',.but.for.header.lin
33300	65 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 20 3a 74 79 70 65 20 27 73 79 6d	e."...:group.'dirvish.:type.'sym
33320	62 6f 6c 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 6d 6f 64 65 2d 6c 69	bol)..(defcustom.dirvish-mode-li
33340	6e 65 2d 68 65 69 67 68 74 20 33 30 0a 20 20 22 48 65 69 67 68 74 20 6f 66 20 44 69 72 76 69 73	ne-height.30..."Height.of.Dirvis
33360	68 27 73 20 6d 6f 64 65 20 6c 69 6e 65 2e 0a 54 68 65 20 76 61 6c 75 65 20 73 68 6f 75 6c 64 20	h's.mode.line..The.value.should.
33380	62 65 20 61 20 63 6f 6e 73 20 63 65 6c 6c 20 28 48 2d 57 49 4e 20 2e 20 48 2d 46 52 41 4d 45 29	be.a.cons.cell.(H-WIN...H-FRAME)
333a0	2c 20 77 68 65 72 65 20 48 2d 57 49 4e 0a 61 6e 64 20 48 2d 46 52 41 4d 45 20 72 65 70 72 65 73	,.where.H-WIN.and.H-FRAME.repres
333c0	65 6e 74 20 74 68 65 20 68 65 69 67 68 74 20 6f 66 20 6d 6f 64 65 20 6c 69 6e 65 20 69 6e 20 73	ent.the.height.of.mode.line.in.s
333e0	69 6e 67 6c 65 20 77 69 6e 64 6f 77 0a 73 74 61 74 65 20 61 6e 64 20 66 75 6c 6c 66 72 61 6d 65	ingle.window.state.and.fullframe
33400	20 73 74 61 74 65 20 72 65 73 70 65 63 74 69 76 65 6c 79 2e 20 20 49 66 20 74 68 69 73 20 76 61	.state.respectively...If.this.va
33420	6c 75 65 20 69 73 20 61 0a 69 6e 74 65 67 65 72 20 49 4e 54 2c 20 69 74 20 69 73 20 73 65 65 6e	lue.is.a.integer.INT,.it.is.seen
33440	20 61 73 20 61 20 73 68 6f 72 74 68 61 6e 64 20 66 6f 72 20 28 49 4e 54 20 2e 20 49 4e 54 29 2e	.as.a.shorthand.for.(INT...INT).
33460	22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 0a 20 20 3a 74 79 70 65 20 27 28 63 68	"...:group.'dirvish...:type.'(ch
33480	6f 69 63 65 20 69 6e 74 65 72 67 65 72 20 28 63 6f 6e 73 20 69 6e 74 65 67 65 72 20 69 6e 74 65	oice.interger.(cons.integer.inte
334a0	67 65 72 29 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 68 65 61 64 65	ger)))..(defcustom.dirvish-heade
334c0	72 2d 6c 69 6e 65 2d 68 65 69 67 68 74 20 33 30 0a 20 20 22 4c 69 6b 65 20 60 64 69 72 76 69 73	r-line-height.30..."Like.`dirvis
334e0	68 2d 6d 6f 64 65 2d 6c 69 6e 65 2d 68 65 69 67 68 74 27 2c 20 62 75 74 20 66 6f 72 20 68 65 61	h-mode-line-height',.but.for.hea
33500	64 65 72 20 6c 69 6e 65 2e 22 0a 20 20 3a 74 79 70 65 20 27 28 63 68 6f 69 63 65 20 69 6e 74 65	der.line."...:type.'(choice.inte
33520	72 67 65 72 20 28 63 6f 6e 73 20 69 6e 74 65 67 65 72 20 69 6e 74 65 67 65 72 29 29 29 0a 0a 28	rger.(cons.integer.integer)))..(
33540	64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 6d 6f 64 65 2d 6c 69 6e 65 2d 66 6f 72 6d	defcustom.dirvish-mode-line-form
33560	61 74 0a 20 20 27 28 3a 6c 65 66 74 20 28 73 6f 72 74 20 6f 6d 69 74 20 73 79 6d 6c 69 6e 6b 29	at...'(:left.(sort.omit.symlink)
33580	20 3a 72 69 67 68 74 20 28 69 6e 64 65 78 29 29 0a 20 20 22 4d 6f 64 65 20 6c 69 6e 65 20 53 45	.:right.(index))..."Mode.line.SE
335a0	47 4d 45 4e 54 73 20 61 6c 69 67 6e 65 64 20 74 6f 20 6c 65 66 74 2f 72 69 67 68 74 20 72 65 73	GMENTs.aligned.to.left/right.res
335c0	70 65 63 74 69 76 65 6c 79 2e 0a 48 65 72 65 20 61 72 65 20 61 6c 6c 20 74 68 65 20 70 72 65 64	pectively..Here.are.all.the.pred
335e0	65 66 69 6e 65 64 20 73 65 67 6d 65 6e 74 73 20 79 6f 75 20 63 61 6e 20 63 68 6f 6f 73 65 20 66	efined.segments.you.can.choose.f
33600	72 6f 6d 3a 0a 0a 2a 20 42 61 73 69 63 73 20 28 66 72 6f 6d 20 60 64 69 72 76 69 73 68 2d 65 78	rom:..*.Basics.(from.`dirvish-ex
33620	74 72 61 73 27 29 0a 60 70 61 74 68 27 3a 20 64 69 72 65 63 74 6f 72 79 20 70 61 74 68 20 75 6e	tras').`path':.directory.path.un
33640	64 65 72 20 74 68 65 20 63 75 72 73 6f 72 2e 0a 60 73 79 6d 6c 69 6e 6b 27 3a 20 74 61 72 67 65	der.the.cursor..`symlink':.targe
33660	74 20 6f 66 20 73 79 6d 6c 69 6e 6b 20 75 6e 64 65 72 20 74 68 65 20 63 75 72 73 6f 72 2e 0a 60	t.of.symlink.under.the.cursor..`
33680	73 6f 72 74 27 3a 20 73 6f 72 74 20 63 72 69 74 65 72 69 61 20 61 70 70 6c 69 65 64 20 69 6e 20	sort':.sort.criteria.applied.in.
336a0	63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2e 0a 60 6f 6d 69 74 27 3a 20 61 20 60 64 69 72 65 64	current.buffer..`omit':.a.`dired
336c0	2d 6f 6d 69 74 2d 6d 6f 64 65 27 20 69 6e 64 69 63 61 74 6f 72 2e 0a 60 69 6e 64 65 78 27 3a 20	-omit-mode'.indicator..`index':.
336e0	6c 69 6e 65 20 6e 75 6d 62 65 72 20 2f 20 74 6f 74 61 6c 20 6c 69 6e 65 20 63 6f 75 6e 74 2e 0a	line.number./.total.line.count..
33700	60 66 72 65 65 2d 73 70 61 63 65 27 3a 20 61 6d 6f 75 6e 74 20 6f 66 20 66 72 65 65 20 73 70 61	`free-space':.amount.of.free.spa
33720	63 65 20 6f 6e 20 60 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 27 27 73 20 66 69 6c 65	ce.on.`default-directory''s.file
33740	20 73 79 73 74 65 6d 2e 0a 4f 74 68 65 72 73 20 61 72 65 20 73 65 6c 66 2d 65 78 70 6c 61 6e 61	.system..Others.are.self-explana
33760	74 6f 72 79 3a 0a 60 66 69 6c 65 2d 73 69 7a 65 27 2c 20 60 66 69 6c 65 2d 6d 6f 64 65 73 27 2c	tory:.`file-size',.`file-modes',
33780	20 60 66 69 6c 65 2d 6c 69 6e 6b 2d 6e 75 6d 62 65 72 27 2c 20 60 66 69 6c 65 2d 75 73 65 72 27	.`file-link-number',.`file-user'
337a0	2c 0a 60 66 69 6c 65 2d 67 72 6f 75 70 27 2c 60 66 69 6c 65 2d 74 69 6d 65 27 2c 60 66 69 6c 65	,.`file-group',`file-time',`file
337c0	2d 69 6e 6f 64 65 2d 6e 75 6d 62 65 72 27 2c 60 66 69 6c 65 2d 64 65 76 69 63 65 2d 6e 75 6d 62	-inode-number',`file-device-numb
337e0	65 72 27 2e 0a 0a 2a 20 4d 69 73 63 73 0a 60 76 63 2d 69 6e 66 6f 27 3a 20 76 65 72 73 69 6f 6e	er'...*.Miscs.`vc-info':.version
33800	20 63 6f 6e 74 72 6f 6c 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 28 66 72 6f 6d 20 60 64 69 72 76	.control.information.(from.`dirv
33820	69 73 68 2d 76 63 27 29 2e 0a 60 79 61 6e 6b 27 3a 20 66 69 6c 65 20 74 72 61 6e 73 66 65 72 20	ish-vc')..`yank':.file.transfer.
33840	70 72 6f 67 72 65 73 73 20 28 66 72 6f 6d 20 60 64 69 72 76 69 73 68 2d 79 61 6e 6b 27 29 2e 0a	progress.(from.`dirvish-yank')..
33860	0a 53 65 74 20 69 74 20 74 6f 20 6e 69 6c 20 74 6f 20 75 73 65 20 74 68 65 20 64 65 66 61 75 6c	.Set.it.to.nil.to.use.the.defaul
33880	74 20 60 6d 6f 64 65 2d 6c 69 6e 65 2d 66 6f 72 6d 61 74 27 2e 22 0a 20 20 3a 67 72 6f 75 70 20	t.`mode-line-format'."...:group.
338a0	27 64 69 72 76 69 73 68 20 3a 74 79 70 65 20 27 70 6c 69 73 74 29 0a 0a 28 64 65 66 63 75 73 74	'dirvish.:type.'plist)..(defcust
338c0	6f 6d 20 64 69 72 76 69 73 68 2d 68 65 61 64 65 72 2d 6c 69 6e 65 2d 66 6f 72 6d 61 74 0a 20 20	om.dirvish-header-line-format...
338e0	27 28 3a 6c 65 66 74 20 28 70 61 74 68 29 20 3a 72 69 67 68 74 20 28 29 29 0a 20 20 22 4c 69 6b	'(:left.(path).:right.())..."Lik
33900	65 20 60 64 69 72 76 69 73 68 2d 6d 6f 64 65 2d 6c 69 6e 65 2d 66 6f 72 6d 61 74 27 2c 20 62 75	e.`dirvish-mode-line-format',.bu
33920	74 20 66 6f 72 20 68 65 61 64 65 72 20 6c 69 6e 65 20 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64	t.for.header.line.."...:group.'d
33940	69 72 76 69 73 68 20 3a 74 79 70 65 20 27 70 6c 69 73 74 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d	irvish.:type.'plist)..(defcustom
33960	20 64 69 72 76 69 73 68 2d 68 69 64 65 2d 64 65 74 61 69 6c 73 20 74 0a 20 20 22 57 68 65 74 68	.dirvish-hide-details.t..."Wheth
33980	65 72 20 74 6f 20 68 69 64 65 20 64 65 74 61 69 6c 65 64 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20	er.to.hide.detailed.information.
339a0	6f 6e 20 73 65 73 73 69 6f 6e 20 73 74 61 72 74 75 70 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64	on.session.startup."...:group.'d
339c0	69 72 76 69 73 68 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 29 0a 0a 28 64 65 66 63 75 73 74	irvish.:type.'boolean)..(defcust
339e0	6f 6d 20 64 69 72 76 69 73 68 2d 68 69 64 65 2d 63 75 72 73 6f 72 20 74 0a 20 20 22 57 68 65 74	om.dirvish-hide-cursor.t..."Whet
33a00	68 65 72 20 74 6f 20 68 69 64 65 20 63 75 72 73 6f 72 20 69 6e 20 64 69 72 76 69 73 68 20 62 75	her.to.hide.cursor.in.dirvish.bu
33a20	66 66 65 72 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 20 3a 74 79 70 65 20	ffers."...:group.'dirvish.:type.
33a40	27 62 6f 6f 6c 65 61 6e 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 64 69 72 76 69 73 68 2d 65 6d 61	'boolean)..(defconst.dirvish-ema
33a60	63 73 2d 62 69 6e 0a 20 20 28 63 6f 6e 64 0a 20 20 20 28 28 61 6e 64 20 69 6e 76 6f 63 61 74 69	cs-bin...(cond....((and.invocati
33a80	6f 6e 2d 64 69 72 65 63 74 6f 72 79 20 69 6e 76 6f 63 61 74 69 6f 6e 2d 6e 61 6d 65 29 0a 20 20	on-directory.invocation-name)...
33aa0	20 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 28 63 6f 6e 63 61 74 20 28 66 69 6c	..(expand-file-name.(concat.(fil
33ac0	65 2d 6e 61 6d 65 2d 61 73 2d 64 69 72 65 63 74 6f 72 79 20 69 6e 76 6f 63 61 74 69 6f 6e 2d 64	e-name-as-directory.invocation-d
33ae0	69 72 65 63 74 6f 72 79 29 20 69 6e 76 6f 63 61 74 69 6f 6e 2d 6e 61 6d 65 29 29 29 0a 20 20 20	irectory).invocation-name)))....
33b00	28 28 65 71 20 73 79 73 74 65 6d 2d 74 79 70 65 20 27 64 61 72 77 69 6e 29 0a 20 20 20 20 22 2f	((eq.system-type.'darwin)....."/
33b20	41 70 70 6c 69 63 61 74 69 6f 6e 73 2f 45 6d 61 63 73 2e 61 70 70 2f 43 6f 6e 74 65 6e 74 73 2f	Applications/Emacs.app/Contents/
33b40	4d 61 63 4f 53 2f 45 6d 61 63 73 22 29 0a 20 20 20 28 74 20 22 65 6d 61 63 73 22 29 29 29 0a 28	MacOS/Emacs")....(t."emacs"))).(
33b60	64 65 66 63 6f 6e 73 74 20 64 69 72 76 69 73 68 2d 69 6d 61 67 65 2d 65 78 74 73 20 27 28 22 77	defconst.dirvish-image-exts.'("w
33b80	65 62 70 22 20 22 77 6d 66 22 20 22 70 63 78 22 20 22 78 69 66 22 20 22 77 62 6d 70 22 20 22 76	ebp"."wmf"."pcx"."xif"."wbmp"."v
33ba0	74 66 22 20 22 74 61 70 22 20 22 73 31 6a 22 20 22 73 6a 70 22 20 22 73 6a 70 67 22 20 22 73 31	tf"."tap"."s1j"."sjp"."sjpg"."s1
33bc0	67 22 20 22 73 67 69 22 20 22 73 67 69 66 22 20 22 73 31 6e 22 20 22 73 70 6e 22 20 22 73 70 6e	g"."sgi"."sgif"."s1n"."spn"."spn
33be0	67 22 20 22 78 79 7a 65 22 20 22 72 67 62 65 22 20 22 68 64 72 22 20 22 62 31 36 22 20 22 6d 64	g"."xyze"."rgbe"."hdr"."b16"."md
33c00	69 22 20 22 61 70 6e 67 22 20 22 69 63 6f 22 20 22 70 67 62 22 20 22 72 6c 63 22 20 22 6d 6d 72	i"."apng"."ico"."pgb"."rlc"."mmr
33c20	22 20 22 66 73 74 22 20 22 66 70 78 22 20 22 66 62 73 22 20 22 64 78 66 22 20 22 64 77 67 22 20	"."fst"."fpx"."fbs"."dxf"."dwg".
33c40	22 64 6a 76 22 20 22 75 76 76 67 22 20 22 75 76 67 22 20 22 75 76 76 69 22 20 22 75 76 69 22 20	"djv"."uvvg"."uvg"."uvvi"."uvi".
33c60	22 61 7a 76 22 20 22 70 73 64 22 20 22 74 66 78 22 20 22 74 33 38 22 20 22 73 76 67 7a 22 20 22	"azv"."psd"."tfx"."t38"."svgz"."
33c80	73 76 67 22 20 22 70 74 69 22 20 22 62 74 66 22 20 22 62 74 69 66 22 20 22 6b 74 78 32 22 20 22	svg"."pti"."btf"."btif"."ktx2"."
33ca0	6b 74 78 22 20 22 6a 78 73 73 22 20 22 6a 78 73 69 22 20 22 6a 78 73 63 22 20 22 6a 78 73 22 20	ktx"."jxss"."jxsi"."jxsc"."jxs".
33cc0	22 6a 78 72 73 22 20 22 6a 78 72 61 22 20 22 6a 78 72 22 20 22 6a 78 6c 22 20 22 6a 70 66 22 20	"jxrs"."jxra"."jxr"."jxl"."jpf".
33ce0	22 6a 70 78 22 20 22 6a 70 67 6d 22 20 22 6a 70 6d 22 20 22 6a 66 69 66 22 20 22 6a 68 63 22 20	"jpx"."jpgm"."jpm"."jfif"."jhc".
33d00	22 6a 70 68 22 20 22 6a 70 67 32 22 20 22 6a 70 32 22 20 22 6a 6c 73 22 20 22 68 73 6a 32 22 20	"jph"."jpg2"."jp2"."jls"."hsj2".
33d20	22 68 65 6a 32 22 20 22 68 65 69 66 73 22 20 22 68 65 69 66 22 20 22 68 65 69 63 73 22 20 22 68	"hej2"."heifs"."heif"."heics"."h
33d40	65 69 63 22 20 22 66 74 73 22 20 22 66 69 74 22 20 22 66 69 74 73 22 20 22 65 6d 66 22 20 22 64	eic"."fts"."fit"."fits"."emf"."d
33d60	72 6c 65 22 20 22 63 67 6d 22 20 22 64 69 62 22 20 22 62 6d 70 22 20 22 68 69 66 22 20 22 61 76	rle"."cgm"."dib"."bmp"."hif"."av
33d80	69 66 22 20 22 61 76 63 73 22 20 22 61 76 63 69 22 20 22 65 78 72 22 20 22 66 61 78 22 20 22 69	if"."avcs"."avci"."exr"."fax"."i
33da0	63 6f 6e 22 20 22 69 65 66 22 20 22 6a 70 67 22 20 22 6d 61 63 70 22 20 22 70 62 6d 22 20 22 70	con"."ief"."jpg"."macp"."pbm"."p
33dc0	67 6d 22 20 22 70 69 63 74 22 20 22 70 6e 67 22 20 22 70 6e 6d 22 20 22 70 70 6d 22 20 22 72 61	gm"."pict"."png"."pnm"."ppm"."ra
33de0	73 22 20 22 72 67 62 22 20 22 74 67 61 22 20 22 74 69 66 22 20 22 74 69 66 66 22 20 22 78 62 6d	s"."rgb"."tga"."tif"."tiff"."xbm
33e00	22 20 22 78 70 6d 22 20 22 78 77 64 22 20 22 6a 70 65 22 20 22 6a 70 65 67 22 20 22 63 72 32 22	"."xpm"."xwd"."jpe"."jpeg"."cr2"
33e20	20 22 61 72 77 22 29 29 0a 28 64 65 66 63 6f 6e 73 74 20 64 69 72 76 69 73 68 2d 61 75 64 69 6f	."arw")).(defconst.dirvish-audio
33e40	2d 65 78 74 73 20 27 28 22 61 70 65 22 20 22 73 74 6d 22 20 22 73 33 6d 22 20 22 72 61 22 20 22	-exts.'("ape"."stm"."s3m"."ra"."
33e60	72 6d 22 20 22 72 61 6d 22 20 22 77 6d 61 22 20 22 77 61 78 22 20 22 6d 33 75 22 20 22 6d 65 64	rm"."ram"."wma"."wax"."m3u"."med
33e80	22 20 22 36 36 39 22 20 22 6d 74 6d 22 20 22 6d 31 35 22 20 22 75 6e 69 22 20 22 75 6c 74 22 20	"."669"."mtm"."m15"."uni"."ult".
33ea0	22 6d 6b 61 22 20 22 66 6c 61 63 22 20 22 61 78 61 22 20 22 6b 61 72 22 20 22 6d 69 64 69 22 20	"mka"."flac"."axa"."kar"."midi".
33ec0	22 6d 69 64 22 20 22 73 31 6d 22 20 22 73 6d 70 22 20 22 73 6d 70 33 22 20 22 72 69 70 22 20 22	"mid"."s1m"."smp"."smp3"."rip"."
33ee0	6d 75 6c 74 69 74 72 61 63 6b 22 20 22 65 63 65 6c 70 39 36 30 30 22 20 22 65 63 65 6c 70 37 34	multitrack"."ecelp9600"."ecelp74
33f00	37 30 22 20 22 65 63 65 6c 70 34 38 30 30 22 20 22 76 62 6b 22 20 22 70 79 61 22 20 22 6c 76 70	70"."ecelp4800"."vbk"."pya"."lvp
33f20	22 20 22 70 6c 6a 22 20 22 64 74 73 68 64 22 20 22 64 74 73 22 20 22 6d 6c 70 22 20 22 65 6f 6c	"."plj"."dtshd"."dts"."mlp"."eol
33f40	22 20 22 75 76 76 61 22 20 22 75 76 61 22 20 22 6b 6f 7a 22 20 22 78 68 65 22 20 22 6c 6f 61 73	"."uvva"."uva"."koz"."xhe"."loas
33f60	22 20 22 73 6f 66 61 22 20 22 73 6d 76 22 20 22 71 63 70 22 20 22 70 73 69 64 22 20 22 73 69 64	"."sofa"."smv"."qcp"."psid"."sid
33f80	22 20 22 73 70 78 22 20 22 6f 70 75 73 22 20 22 6f 67 67 22 20 22 6f 67 61 22 20 22 6d 70 31 22	"."spx"."opus"."ogg"."oga"."mp1"
33fa0	20 22 6d 70 67 61 22 20 22 6d 34 61 22 20 22 6d 78 6d 66 22 20 22 6d 68 61 73 22 20 22 6c 31 36	."mpga"."m4a"."mxmf"."mhas"."l16
33fc0	22 20 22 6c 62 63 22 20 22 65 76 77 22 20 22 65 6e 77 22 20 22 65 76 62 22 20 22 65 76 63 22 20	"."lbc"."evw"."enw"."evb"."evc".
33fe0	22 64 6c 73 22 20 22 6f 6d 67 22 20 22 61 61 33 22 20 22 61 74 33 22 20 22 61 74 78 22 20 22 61	"dls"."omg"."aa3"."at3"."atx"."a
34000	61 6c 22 20 22 61 63 6e 22 20 22 61 77 62 22 20 22 61 6d 72 22 20 22 61 63 33 22 20 22 61 73 73	al"."acn"."awb"."amr"."ac3"."ass
34020	22 20 22 61 61 63 22 20 22 61 64 74 73 22 20 22 37 32 36 22 20 22 61 62 73 22 20 22 61 69 66 22	"."aac"."adts"."726"."abs"."aif"
34040	20 22 61 69 66 63 22 20 22 61 69 66 66 22 20 22 61 75 22 20 22 6d 70 32 22 20 22 6d 70 33 22 20	."aifc"."aiff"."au"."mp2"."mp3".
34060	22 6d 70 32 61 22 20 22 6d 70 61 22 20 22 6d 70 61 32 22 20 22 6d 70 65 67 61 22 20 22 73 6e 64	"mp2a"."mpa"."mpa2"."mpega"."snd
34080	22 20 22 76 6f 78 22 20 22 77 61 76 22 29 29 0a 28 64 65 66 63 6f 6e 73 74 20 64 69 72 76 69 73	"."vox"."wav")).(defconst.dirvis
340a0	68 2d 76 69 64 65 6f 2d 65 78 74 73 20 27 28 22 66 34 76 22 20 22 72 6d 76 62 22 20 22 77 76 78	h-video-exts.'("f4v"."rmvb"."wvx
340c0	22 20 22 77 6d 78 22 20 22 77 6d 76 22 20 22 77 6d 22 20 22 61 73 78 22 20 22 6d 6b 33 64 22 20	"."wmx"."wmv"."wm"."asx"."mk3d".
340e0	22 6d 6b 76 22 20 22 66 78 6d 22 20 22 66 6c 76 22 20 22 61 78 76 22 20 22 77 65 62 6d 22 20 22	"mkv"."fxm"."flv"."axv"."webm"."
34100	76 69 76 22 20 22 79 74 22 20 22 73 31 71 22 20 22 73 6d 6f 22 20 22 73 6d 6f 76 22 20 22 73 73	viv"."yt"."s1q"."smo"."smov"."ss
34120	77 22 20 22 73 73 77 66 22 20 22 73 31 34 22 20 22 73 31 31 22 20 22 73 6d 70 67 22 20 22 73 6d	w"."sswf"."s14"."s11"."smpg"."sm
34140	6b 22 20 22 62 6b 32 22 20 22 62 69 6b 22 20 22 6e 69 6d 22 20 22 70 79 76 22 20 22 6d 34 75 22	k"."bk2"."bik"."nim"."pyv"."m4u"
34160	20 22 6d 78 75 22 20 22 66 76 74 22 20 22 64 76 62 22 20 22 75 76 76 76 22 20 22 75 76 76 22 20	."mxu"."fvt"."dvb"."uvvv"."uvv".
34180	22 75 76 76 73 22 20 22 75 76 73 22 20 22 75 76 76 70 22 20 22 75 76 70 22 20 22 75 76 76 75 22	"uvvs"."uvs"."uvvp"."uvp"."uvvu"
341a0	20 22 75 76 75 22 20 22 75 76 76 6d 22 20 22 75 76 6d 22 20 22 75 76 76 68 22 20 22 75 76 68 22	."uvu"."uvvm"."uvm"."uvvh"."uvh"
341c0	20 22 6f 67 76 22 20 22 6d 32 76 22 20 22 6d 31 76 22 20 22 6d 34 76 22 20 22 6d 70 67 34 22 20	."ogv"."m2v"."m1v"."m4v"."mpg4".
341e0	22 6d 70 34 22 20 22 6d 6a 70 32 22 20 22 6d 6a 32 22 20 22 6d 34 73 22 20 22 33 67 70 70 32 22	"mp4"."mjp2"."mj2"."m4s"."3gpp2"
34200	20 22 33 67 32 22 20 22 33 67 70 70 22 20 22 33 67 70 22 20 22 61 76 69 22 20 22 6d 6f 76 22 20	."3g2"."3gpp"."3gp"."avi"."mov".
34220	22 6d 6f 76 69 65 22 20 22 6d 70 65 22 20 22 6d 70 65 67 22 20 22 6d 70 65 67 76 22 20 22 6d 70	"movie"."mpe"."mpeg"."mpegv"."mp
34240	67 22 20 22 6d 70 76 22 20 22 71 74 22 20 22 76 62 73 22 29 29 0a 28 64 65 66 63 6f 6e 73 74 20	g"."mpv"."qt"."vbs")).(defconst.
34260	64 69 72 76 69 73 68 2d 6d 65 64 69 61 2d 65 78 74 73 20 28 61 70 70 65 6e 64 20 64 69 72 76 69	dirvish-media-exts.(append.dirvi
34280	73 68 2d 69 6d 61 67 65 2d 65 78 74 73 20 64 69 72 76 69 73 68 2d 76 69 64 65 6f 2d 65 78 74 73	sh-image-exts.dirvish-video-exts
342a0	20 64 69 72 76 69 73 68 2d 61 75 64 69 6f 2d 65 78 74 73 20 27 28 22 70 64 66 22 20 22 65 70 75	.dirvish-audio-exts.'("pdf"."epu
342c0	62 22 20 22 67 69 66 22 29 29 29 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 6f	b"."gif"))).(defcustom.dirvish-o
342e0	70 65 6e 2d 77 69 74 68 2d 70 72 6f 67 72 61 6d 73 0a 20 20 28 6c 65 74 20 28 28 6d 70 76 20 28	pen-with-programs...(let.((mpv.(
34300	6f 72 20 28 65 78 65 63 75 74 61 62 6c 65 2d 66 69 6e 64 20 22 6d 70 76 22 29 20 22 6d 70 76 22	or.(executable-find."mpv")."mpv"
34320	29 29 29 0a 20 20 20 20 60 28 28 2c 64 69 72 76 69 73 68 2d 61 75 64 69 6f 2d 65 78 74 73 20 2e	))).....`((,dirvish-audio-exts..
34340	20 28 2c 6d 70 76 20 22 2d 2d 70 72 6f 66 69 6c 65 3d 62 75 69 6c 74 69 6e 2d 70 73 65 75 64 6f	.(,mpv."--profile=builtin-pseudo
34360	2d 67 75 69 22 20 22 25 66 22 29 29 0a 20 20 20 20 20 20 28 2c 64 69 72 76 69 73 68 2d 76 69 64	-gui"."%f")).......(,dirvish-vid
34380	65 6f 2d 65 78 74 73 20 2e 20 28 2c 6d 70 76 20 22 25 66 22 29 29 29 29 0a 20 20 22 4f 70 65 6e	eo-exts...(,mpv."%f"))))..."Open
343a0	20 63 65 72 74 61 69 6e 20 66 69 6c 65 20 74 79 70 65 73 20 75 73 69 6e 67 20 65 78 74 65 72 6e	.certain.file.types.using.extern
343c0	61 6c 20 70 72 6f 67 72 61 6d 73 2e 0a 54 68 65 20 76 61 6c 75 65 20 73 68 6f 75 6c 64 20 62 65	al.programs..The.value.should.be
343e0	20 61 6e 20 61 73 73 6f 63 69 61 74 69 6f 6e 20 6c 69 73 74 20 77 68 65 72 65 20 65 61 63 68 20	.an.association.list.where.each.
34400	65 6c 65 6d 65 6e 74 20 69 73 20 6f 66 0a 74 68 65 20 66 6f 72 6d 20 28 45 58 54 53 20 2e 20 28	element.is.of.the.form.(EXTS...(
34420	43 4d 44 20 2e 20 41 52 47 53 29 29 2e 20 20 45 58 54 53 20 69 73 20 61 20 6c 69 73 74 20 6f 66	CMD...ARGS))...EXTS.is.a.list.of
34440	20 66 69 6c 65 20 6e 61 6d 65 0a 65 78 74 65 6e 73 69 6f 6e 73 2e 20 20 57 68 65 6e 20 6f 70 65	.file.name.extensions...When.ope
34460	6e 69 6e 67 20 61 20 66 69 6c 65 20 77 68 6f 73 65 20 66 69 6c 65 6e 61 6d 65 20 65 6e 64 73 20	ning.a.file.whose.filename.ends.
34480	77 69 74 68 20 6f 6e 65 20 6f 66 0a 74 68 65 20 45 58 54 53 20 75 73 69 6e 67 20 60 64 69 72 65	with.one.of.the.EXTS.using.`dire
344a0	64 2d 66 69 6e 64 2d 66 69 6c 65 27 2c 20 61 20 73 75 62 70 72 6f 63 65 73 73 20 61 63 63 6f 72	d-find-file',.a.subprocess.accor
344c0	64 69 6e 67 20 74 6f 20 43 4d 44 0a 61 6e 64 20 69 74 73 20 41 52 47 53 20 69 73 20 69 73 73 75	ding.to.CMD.and.its.ARGS.is.issu
344e0	65 64 20 74 6f 20 6f 70 65 6e 20 74 68 65 20 66 69 6c 65 20 65 78 74 65 72 6e 61 6c 6c 79 2e 20	ed.to.open.the.file.externally..
34500	20 54 68 65 20 73 70 65 63 69 61 6c 0a 70 6c 61 63 65 68 6f 6c 64 65 72 20 5c 22 25 66 5c 22 20	.The.special.placeholder.\"%f\".
34520	69 6e 20 74 68 65 20 41 52 47 53 20 69 73 20 72 65 70 6c 61 63 65 64 20 62 79 20 74 68 65 20 46	in.the.ARGS.is.replaced.by.the.F
34540	49 4c 45 4e 41 4d 45 20 61 74 0a 72 75 6e 74 69 6d 65 2e 20 20 53 65 74 20 69 74 20 74 6f 20 6e	ILENAME.at.runtime...Set.it.to.n
34560	69 6c 20 64 69 73 61 62 6c 65 73 20 74 68 69 73 20 66 65 61 74 75 72 65 2e 22 0a 20 20 3a 67 72	il.disables.this.feature."...:gr
34580	6f 75 70 20 27 64 69 72 76 69 73 68 0a 20 20 3a 74 79 70 65 20 27 28 61 6c 69 73 74 20 3a 6b 65	oup.'dirvish...:type.'(alist.:ke
345a0	79 2d 74 79 70 65 20 28 28 72 65 70 65 61 74 20 73 74 72 69 6e 67 29 20 3a 74 61 67 20 22 46 69	y-type.((repeat.string).:tag."Fi
345c0	6c 65 20 65 78 74 65 6e 73 69 6f 6e 73 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	le.extensions").................
345e0	3a 76 61 6c 75 65 2d 74 79 70 65 20 28 28 72 65 70 65 61 74 20 73 74 72 69 6e 67 29 20 3a 74 61	:value-type.((repeat.string).:ta
34600	67 20 22 45 78 74 65 72 6e 61 6c 20 63 6f 6d 6d 61 6e 64 20 61 6e 64 20 61 72 67 73 22 29 29 29	g."External.command.and.args")))
34620	0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 72 65 75 73 65 2d 73 65 73 73 69	..(defcustom.dirvish-reuse-sessi
34640	6f 6e 20 74 0a 20 20 22 57 68 65 74 68 65 72 20 74 6f 20 72 65 75 73 65 20 74 68 65 20 68 69 64	on.t..."Whether.to.reuse.the.hid
34660	64 65 6e 20 73 65 73 73 69 6f 6e 73 2e 0a 49 66 20 6e 6f 6e 2d 6e 69 6c 2c 20 44 69 72 76 69 73	den.sessions..If.non-nil,.Dirvis
34680	68 20 6b 65 65 70 73 20 74 68 65 20 73 65 73 73 69 6f 6e 27 73 20 6c 61 73 74 20 62 75 66 66 65	h.keeps.the.session's.last.buffe
346a0	72 20 61 6c 69 76 65 20 6f 6e 0a 65 78 69 74 2e 20 20 54 68 65 20 68 69 64 64 65 6e 20 73 65 73	r.alive.on.exit...The.hidden.ses
346c0	73 69 6f 6e 20 63 61 6e 20 62 65 20 72 65 75 73 65 64 20 69 6e 20 74 68 65 20 66 75 74 75 72 65	sion.can.be.reused.in.the.future
346e0	20 62 79 20 63 6f 6d 6d 61 6e 64 0a 60 64 69 72 76 69 73 68 27 20 61 6e 64 20 66 72 69 65 6e 64	.by.command.`dirvish'.and.friend
34700	73 2e 20 20 49 66 20 74 68 65 20 76 61 6c 75 65 20 69 73 20 5c 5c 3d 27 72 65 73 75 6d 65 2c 20	s...If.the.value.is.\\='resume,.
34720	64 69 72 76 69 73 68 0a 65 78 68 69 62 69 74 73 20 74 68 65 20 6c 61 73 74 20 65 6e 74 72 79 20	dirvish.exhibits.the.last.entry.
34740	6f 66 20 74 68 65 20 68 69 64 64 65 6e 20 73 65 73 73 69 6f 6e 20 75 6e 6c 65 73 73 20 74 68 65	of.the.hidden.session.unless.the
34760	20 50 41 54 48 0a 61 72 67 75 6d 65 6e 74 20 69 73 20 73 70 65 63 69 66 69 65 64 20 76 69 61 20	.PATH.argument.is.specified.via.
34780	70 72 6f 6d 70 74 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 20 3a 74 79 70 65	prompt."...:group.'dirvish.:type
347a0	20 27 28 63 68 6f 69 63 65 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 44 6f 20 6e 6f 74 20 72 65	.'(choice.(const.:tag."Do.not.re
347c0	75 73 65 20 74 68 65 20 73 65 73 73 69 6f 6e 2c 20 71 75 69 74 20 69 74 20 63 6f 6d 70 6c 65 74	use.the.session,.quit.it.complet
347e0	65 6c 79 22 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ely".nil).......................
34800	20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 52 65 75 73 65 20 74 68	...........(const.:tag."Reuse.th
34820	65 20 73 65 73 73 69 6f 6e 20 61 6e 64 20 6f 70 65 6e 20 6e 65 77 20 70 61 74 68 20 77 68 65 6e	e.session.and.open.new.path.when
34840	20 72 65 75 73 69 6e 67 22 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.reusing".t)....................
34860	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 52 65 75 73 65	..............(const.:tag."Reuse
34880	20 74 68 65 20 73 65 73 73 69 6f 6e 20 61 6e 64 20 72 65 73 75 6d 65 20 69 74 73 20 6c 61 73 74	.the.session.and.resume.its.last
348a0	20 65 6e 74 72 79 20 77 68 65 6e 20 72 65 75 73 69 6e 67 22 20 72 65 73 75 6d 65 29 29 29 0a 0a	.entry.when.reusing".resume)))..
348c0	28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 72 65 64 69 73 70 6c 61 79 2d 64 65 62	(defcustom.dirvish-redisplay-deb
348e0	6f 75 6e 63 65 20 30 2e 30 32 0a 20 20 22 49 6e 70 75 74 20 64 65 62 6f 75 6e 63 65 20 66 6f 72	ounce.0.02..."Input.debounce.for
34900	20 64 69 72 76 69 73 68 20 55 49 20 72 65 64 69 73 70 6c 61 79 2e 0a 54 68 65 20 55 49 20 6f 66	.dirvish.UI.redisplay..The.UI.of
34920	20 64 69 72 76 69 73 68 20 69 73 20 72 65 66 72 65 73 68 65 64 20 6f 6e 6c 79 20 77 68 65 6e 20	.dirvish.is.refreshed.only.when.
34940	74 68 65 72 65 20 68 61 73 20 6e 6f 74 20 62 65 65 6e 20 6e 65 77 0a 69 6e 70 75 74 20 66 6f 72	there.has.not.been.new.input.for
34960	20 60 64 69 72 76 69 73 68 2d 72 65 64 69 73 70 6c 61 79 2d 64 65 62 6f 75 6e 63 65 27 20 73 65	.`dirvish-redisplay-debounce'.se
34980	63 6f 6e 64 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 20 3a 74 79 70 65 20	conds."...:group.'dirvish.:type.
349a0	27 66 6c 6f 61 74 29 0a 0a 28 63 6c 2d 64 65 66 67 65 6e 65 72 69 63 20 64 69 72 76 69 73 68 2d	'float)..(cl-defgeneric.dirvish-
349c0	63 6c 65 61 6e 2d 63 61 63 68 65 20 28 29 20 22 43 6c 65 61 6e 20 63 61 63 68 65 20 66 6f 72 20	clean-cache.()."Clean.cache.for.
349e0	73 65 6c 65 63 74 65 64 20 66 69 6c 65 73 2e 22 20 6e 69 6c 29 0a 28 63 6c 2d 64 65 66 67 65 6e	selected.files.".nil).(cl-defgen
34a00	65 72 69 63 20 64 69 72 76 69 73 68 2d 62 75 69 6c 64 2d 63 61 63 68 65 20 28 29 20 22 42 75 69	eric.dirvish-build-cache.()."Bui
34a20	6c 64 20 63 61 63 68 65 20 66 6f 72 20 63 75 72 72 65 6e 74 20 64 69 72 65 63 74 6f 72 79 2e 22	ld.cache.for.current.directory."
34a40	20 6e 69 6c 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 61 66 74 65 72 2d	.nil)..(defcustom.dirvish-after-
34a60	72 65 76 65 72 74 2d 68 6f 6f 6b 20 27 28 64 69 72 76 69 73 68 2d 63 6c 65 61 6e 2d 63 61 63 68	revert-hook.'(dirvish-clean-cach
34a80	65 29 0a 20 20 22 45 78 65 63 75 74 65 64 20 61 66 74 65 72 20 60 72 65 76 65 72 74 2d 62 75 66	e)..."Executed.after.`revert-buf
34aa0	66 65 72 27 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 20 3a 74 79 70 65 20 27	fer'."...:group.'dirvish.:type.'
34ac0	68 6f 6f 6b 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68 2d 73 65 74 75 70 2d	hook)..(defcustom.dirvish-setup-
34ae0	68 6f 6f 6b 20 27 28 64 69 72 76 69 73 68 2d 62 75 69 6c 64 2d 63 61 63 68 65 29 0a 20 20 22 45	hook.'(dirvish-build-cache)..."E
34b00	78 65 63 75 74 65 64 20 61 66 74 65 72 20 74 68 65 20 44 69 72 65 64 20 62 75 66 66 65 72 20 69	xecuted.after.the.Dired.buffer.i
34b20	73 20 73 68 6f 77 65 64 20 75 70 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 20	s.showed.up."...:group.'dirvish.
34b40	3a 74 79 70 65 20 27 68 6f 6f 6b 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 64 69 72 76 69 73 68	:type.'hook)..(defcustom.dirvish
34b60	2d 66 69 6e 64 2d 65 6e 74 72 79 2d 68 6f 6f 6b 20 27 28 64 69 72 76 69 73 68 2d 69 6e 73 65 72	-find-entry-hook.'(dirvish-inser
34b80	74 2d 65 6e 74 72 79 2d 68 29 0a 20 20 22 45 78 65 63 75 74 65 64 20 61 66 74 65 72 20 66 69 6e	t-entry-h)..."Executed.after.fin
34ba0	64 69 6e 67 20 61 20 65 6e 74 72 79 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68	ding.a.entry."...:group.'dirvish
34bc0	20 3a 74 79 70 65 20 27 68 6f 6f 6b 29 0a 0a 3b 3b 3b 3b 20 49 6e 74 65 72 6e 61 6c 20 76 61 72	.:type.'hook)..;;;;.Internal.var
34be0	69 61 62 6c 65 73 0a 0a 28 64 65 66 76 61 72 20 64 69 72 76 69 73 68 2d 73 63 6f 70 65 73 20 27	iables..(defvar.dirvish-scopes.'
34c00	28 3a 66 72 61 6d 65 20 73 65 6c 65 63 74 65 64 2d 66 72 61 6d 65 20 3a 74 61 62 20 74 61 62 2d	(:frame.selected-frame.:tab.tab-
34c20	62 61 72 2d 2d 63 75 72 72 65 6e 74 2d 74 61 62 2d 69 6e 64 65 78 0a 20 20 20 20 20 20 20 20 20	bar--current-tab-index..........
34c40	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 70 65 72 73 70 20 67 65	.......................:persp.ge
34c60	74 2d 63 75 72 72 65 6e 74 2d 70 65 72 73 70 20 3a 70 65 72 73 70 65 63 74 69 76 65 20 70 65 72	t-current-persp.:perspective.per
34c80	73 70 2d 63 75 72 72 29 29 0a 28 64 65 66 76 61 72 20 64 69 72 76 69 73 68 2d 6c 69 62 72 61 72	sp-curr)).(defvar.dirvish-librar
34ca0	69 65 73 0a 20 20 27 28 28 64 69 72 76 69 73 68 2d 77 69 64 67 65 74 73 20 20 70 61 74 68 20 73	ies...'((dirvish-widgets..path.s
34cc0	79 6d 6c 69 6e 6b 20 73 6f 72 74 20 6f 6d 69 74 20 69 6e 64 65 78 20 66 72 65 65 2d 73 70 61 63	ymlink.sort.omit.index.free-spac
34ce0	65 20 66 69 6c 65 2d 6c 69 6e 6b 2d 6e 75 6d 62 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	e.file-link-number..............
34d00	20 20 20 20 20 20 20 20 20 66 69 6c 65 2d 75 73 65 72 20 66 69 6c 65 2d 67 72 6f 75 70 20 66 69	.........file-user.file-group.fi
34d20	6c 65 2d 74 69 6d 65 20 66 69 6c 65 2d 73 69 7a 65 20 66 69 6c 65 2d 6d 6f 64 65 73 0a 20 20 20	le-time.file-size.file-modes....
34d40	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 69 6c 65 2d 69 6e 6f 64 65 2d 6e 75	...................file-inode-nu
34d60	6d 62 65 72 20 66 69 6c 65 2d 64 65 76 69 63 65 2d 6e 75 6d 62 65 72 0a 20 20 20 20 20 20 20 20	mber.file-device-number.........
34d80	20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 75 64 69 6f 20 69 6d 61 67 65 20 67 69 66 20 76 69	..............audio.image.gif.vi
34da0	64 65 6f 20 65 70 75 62 20 70 64 66 20 70 64 66 2d 70 72 65 66 61 63 65 20 61 72 63 68 69 76 65	deo.epub.pdf.pdf-preface.archive
34dc0	29 0a 20 20 20 20 28 64 69 72 76 69 73 68 2d 76 63 20 20 20 20 20 20 20 76 63 2d 73 74 61 74 65	).....(dirvish-vc.......vc-state
34de0	20 67 69 74 2d 6d 73 67 20 76 63 2d 64 69 66 66 20 76 63 2d 62 6c 61 6d 65 20 76 63 2d 6c 6f 67	.git-msg.vc-diff.vc-blame.vc-log
34e00	20 76 63 2d 69 6e 66 6f 29 0a 20 20 20 20 28 64 69 72 76 69 73 68 2d 69 63 6f 6e 73 20 20 20 20	.vc-info).....(dirvish-icons....
34e20	61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 20 6e 65 72 64 2d 69 63 6f 6e 73 20 76 73 63 6f 64 65 2d	all-the-icons.nerd-icons.vscode-
34e40	69 63 6f 6e 29 0a 20 20 20 20 28 64 69 72 76 69 73 68 2d 63 6f 6c 6c 61 70 73 65 20 63 6f 6c 6c	icon).....(dirvish-collapse.coll
34e60	61 70 73 65 29 0a 20 20 20 20 28 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 20 20 73 75 62 74	apse).....(dirvish-subtree..subt
34e80	72 65 65 2d 73 74 61 74 65 29 0a 20 20 20 20 28 64 69 72 76 69 73 68 2d 79 61 6e 6b 20 20 20 20	ree-state).....(dirvish-yank....
34ea0	20 79 61 6e 6b 29 29 29 0a 28 64 65 66 76 61 72 20 64 69 72 76 69 73 68 2d 6d 6f 64 65 2d 6d 61	.yank))).(defvar.dirvish-mode-ma
34ec0	70 0a 20 20 28 6c 65 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	p...(let.((map.(make-sparse-keym
34ee0	61 70 29 29 29 0a 20 20 20 20 28 73 65 74 2d 6b 65 79 6d 61 70 2d 70 61 72 65 6e 74 20 6d 61 70	ap))).....(set-keymap-parent.map
34f00	20 64 69 72 65 64 2d 6d 6f 64 65 2d 6d 61 70 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79	.dired-mode-map).....(define-key
34f20	20 6d 61 70 20 28 6b 62 64 20 22 3f 22 29 20 27 64 69 72 76 69 73 68 2d 64 69 73 70 61 74 63 68	.map.(kbd."?").'dirvish-dispatch
34f40	29 0a 20 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 71 22 29 20	).....(define-key.map.(kbd."q").
34f60	27 64 69 72 76 69 73 68 2d 71 75 69 74 29 20 6d 61 70 29 0a 20 20 22 4b 65 79 6d 61 70 20 75 73	'dirvish-quit).map)..."Keymap.us
34f80	65 64 20 69 6e 20 64 69 72 76 69 73 68 20 62 75 66 66 65 72 73 2e 22 29 0a 28 64 65 66 76 61 72	ed.in.dirvish.buffers.").(defvar
34fa0	20 64 69 72 76 69 73 68 2d 72 65 64 69 73 70 6c 61 79 2d 64 65 62 6f 75 6e 63 65 2d 74 69 6d 65	.dirvish-redisplay-debounce-time
34fc0	72 20 6e 69 6c 29 0a 28 64 65 66 76 61 72 20 64 69 72 76 69 73 68 2d 2d 68 69 73 74 6f 72 79 20	r.nil).(defvar.dirvish--history.
34fe0	6e 69 6c 29 0a 28 64 65 66 76 61 72 20 64 69 72 76 69 73 68 2d 2d 72 65 73 65 74 2d 6b 65 79 77	nil).(defvar.dirvish--reset-keyw
35000	6f 72 64 73 20 27 28 3a 66 72 65 65 2d 73 70 61 63 65 20 3a 63 6f 6e 74 65 6e 74 2d 62 65 67 69	ords.'(:free-space.:content-begi
35020	6e 29 29 0a 28 64 65 66 76 61 72 20 64 69 72 76 69 73 68 2d 2d 73 65 6c 65 63 74 65 64 2d 77 69	n)).(defvar.dirvish--selected-wi
35040	6e 64 6f 77 20 6e 69 6c 29 0a 28 64 65 66 76 61 72 20 64 69 72 76 69 73 68 2d 2d 6d 6f 64 65 2d	ndow.nil).(defvar.dirvish--mode-
35060	6c 69 6e 65 2d 66 6d 74 20 6e 69 6c 29 0a 28 64 65 66 76 61 72 20 64 69 72 76 69 73 68 2d 2d 68	line-fmt.nil).(defvar.dirvish--h
35080	65 61 64 65 72 2d 6c 69 6e 65 2d 66 6d 74 20 6e 69 6c 29 0a 28 64 65 66 76 61 72 20 64 69 72 76	eader-line-fmt.nil).(defvar.dirv
350a0	69 73 68 2d 2d 73 65 73 73 69 6f 6e 2d 68 61 73 68 20 28 6d 61 6b 65 2d 68 61 73 68 2d 74 61 62	ish--session-hash.(make-hash-tab
350c0	6c 65 29 29 0a 28 64 65 66 76 61 72 20 64 69 72 76 69 73 68 2d 2d 70 61 72 65 6e 74 2d 68 61 73	le)).(defvar.dirvish--parent-has
350e0	68 20 28 6d 61 6b 65 2d 68 61 73 68 2d 74 61 62 6c 65 20 3a 74 65 73 74 20 23 27 65 71 75 61 6c	h.(make-hash-table.:test.#'equal
35100	29 29 0a 28 64 65 66 76 61 72 20 64 69 72 76 69 73 68 2d 2d 74 68 69 73 20 6e 69 6c 29 0a 28 64	)).(defvar.dirvish--this.nil).(d
35120	65 66 76 61 72 20 64 69 72 76 69 73 68 2d 2d 61 76 61 69 6c 61 62 6c 65 2d 61 74 74 72 73 20 27	efvar.dirvish--available-attrs.'
35140	28 29 29 0a 28 64 65 66 76 61 72 20 64 69 72 76 69 73 68 2d 2d 61 76 61 69 6c 61 62 6c 65 2d 70	()).(defvar.dirvish--available-p
35160	72 65 76 69 65 77 2d 64 69 73 70 61 74 63 68 65 72 73 20 27 28 29 29 0a 28 64 65 66 76 61 72 20	review-dispatchers.'()).(defvar.
35180	64 69 72 76 69 73 68 2d 2d 77 6f 72 6b 69 6e 67 2d 61 74 74 72 73 20 27 28 29 29 0a 28 64 65 66	dirvish--working-attrs.'()).(def
351a0	76 61 72 20 64 69 72 76 69 73 68 2d 2d 77 6f 72 6b 69 6e 67 2d 70 72 65 76 69 65 77 2d 64 69 73	var.dirvish--working-preview-dis
351c0	70 61 74 68 63 68 65 72 73 20 27 28 29 29 0a 28 64 65 66 76 61 72 20 69 6d 61 67 65 2d 64 69 72	pathchers.'()).(defvar.image-dir
351e0	65 64 2d 74 68 75 6d 62 6e 61 69 6c 2d 62 75 66 66 65 72 29 0a 28 64 65 66 76 61 72 2d 6c 6f 63	ed-thumbnail-buffer).(defvar-loc
35200	61 6c 20 64 69 72 76 69 73 68 2d 2d 70 72 6f 70 73 20 27 28 29 29 0a 28 64 65 66 76 61 72 2d 6c	al.dirvish--props.'()).(defvar-l
35220	6f 63 61 6c 20 64 69 72 76 69 73 68 2d 2d 61 74 74 72 73 2d 68 61 73 68 20 6e 69 6c 29 0a 0a 3b	ocal.dirvish--attrs-hash.nil)..;
35240	3b 3b 3b 20 4d 61 63 72 6f 73 0a 0a 28 64 65 66 6d 61 63 72 6f 20 64 69 72 76 69 73 68 2d 70 72	;;;.Macros..(defmacro.dirvish-pr
35260	6f 70 20 28 70 72 6f 70 20 26 72 65 73 74 20 62 6f 64 79 29 0a 20 20 22 52 65 74 72 69 76 65 20	op.(prop.&rest.body)..."Retrive.
35280	50 52 4f 50 20 66 72 6f 6d 20 60 64 69 72 76 69 73 68 2d 2d 70 72 6f 70 73 27 2e 0a 53 65 74 20	PROP.from.`dirvish--props'..Set.
352a0	74 68 65 20 50 52 4f 50 20 77 69 74 68 20 42 4f 44 59 20 69 66 20 67 69 76 65 6e 2e 22 0a 20 20	the.PROP.with.BODY.if.given."...
352c0	28 64 65 63 6c 61 72 65 20 28 69 6e 64 65 6e 74 20 64 65 66 75 6e 29 29 0a 20 20 60 28 6c 65 74	(declare.(indent.defun))...`(let
352e0	2a 20 28 28 70 61 69 72 20 28 61 73 73 71 20 2c 70 72 6f 70 20 64 69 72 76 69 73 68 2d 2d 70 72	*.((pair.(assq.,prop.dirvish--pr
35300	6f 70 73 29 29 20 28 76 61 6c 20 28 63 64 72 20 70 61 69 72 29 29 29 0a 20 20 20 20 20 2c 28 69	ops)).(val.(cdr.pair)))......,(i
35320	66 20 62 6f 64 79 20 60 28 70 72 6f 67 31 20 28 73 65 74 71 20 76 61 6c 20 2c 40 62 6f 64 79 29	f.body.`(prog1.(setq.val.,@body)
35340	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 70 61 69 72 20 28 73 65 74	...................(if.pair.(set
35360	63 64 72 20 28 61 73 73 71 20 2c 70 72 6f 70 20 64 69 72 76 69 73 68 2d 2d 70 72 6f 70 73 29 20	cdr.(assq.,prop.dirvish--props).
35380	76 61 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 28	val).....................(push.(
353a0	63 6f 6e 73 20 2c 70 72 6f 70 20 76 61 6c 29 20 64 69 72 76 69 73 68 2d 2d 70 72 6f 70 73 29 29	cons.,prop.val).dirvish--props))
353c0	29 0a 20 20 20 20 20 20 20 20 60 76 61 6c 29 29 29 0a 0a 28 64 65 66 6d 61 63 72 6f 20 64 69 72	).........`val)))..(defmacro.dir
353e0	76 69 73 68 2d 64 65 62 6f 75 6e 63 65 20 28 6c 61 62 65 6c 20 26 72 65 73 74 20 62 6f 64 79 29	vish-debounce.(label.&rest.body)
35400	0a 20 20 22 44 65 62 6f 75 6e 63 69 6e 67 20 74 68 65 20 65 78 65 63 75 74 69 6f 6e 20 6f 66 20	..."Debouncing.the.execution.of.
35420	42 4f 44 59 20 75 6e 64 65 72 20 4c 41 42 45 4c 2e 0a 54 68 65 20 42 4f 44 59 20 72 75 6e 73 20	BODY.under.LABEL..The.BODY.runs.
35440	6f 6e 6c 79 20 77 68 65 6e 20 74 68 65 72 65 20 68 61 73 20 6e 6f 74 20 62 65 65 6e 20 6e 65 77	only.when.there.has.not.been.new
35460	20 69 6e 70 75 74 20 66 6f 72 20 44 45 42 4f 55 4e 43 45 0a 73 65 63 6f 6e 64 73 2e 20 20 44 45	.input.for.DEBOUNCE.seconds...DE
35480	42 4f 55 4e 43 45 20 64 65 66 61 75 6c 74 73 20 74 6f 20 60 64 69 72 76 69 73 68 2d 72 65 64 69	BOUNCE.defaults.to.`dirvish-redi
354a0	73 70 6c 61 79 2d 64 65 62 6f 75 6e 63 65 27 2e 22 0a 20 20 28 64 65 63 6c 61 72 65 20 28 69 6e	splay-debounce'."...(declare.(in
354c0	64 65 6e 74 20 64 65 66 75 6e 29 29 0a 20 20 28 73 65 74 71 20 6c 61 62 65 6c 20 28 6f 72 20 6c	dent.defun))...(setq.label.(or.l
354e0	61 62 65 6c 20 22 72 65 64 69 73 70 6c 61 79 22 29 29 0a 20 20 28 6c 65 74 2a 20 28 28 64 65 62	abel."redisplay"))...(let*.((deb
35500	6f 75 6e 63 65 20 28 69 6e 74 65 72 6e 20 28 66 6f 72 6d 61 74 20 22 64 69 72 76 69 73 68 2d 25	ounce.(intern.(format."dirvish-%
35520	73 2d 64 65 62 6f 75 6e 63 65 22 20 6c 61 62 65 6c 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 74	s-debounce".label)))..........(t
35540	69 6d 65 72 20 28 69 6e 74 65 72 6e 20 28 66 6f 72 6d 61 74 20 22 64 69 72 76 69 73 68 2d 25 73	imer.(intern.(format."dirvish-%s
35560	2d 64 65 62 6f 75 6e 63 65 2d 74 69 6d 65 72 22 20 6c 61 62 65 6c 29 29 29 0a 20 20 20 20 20 20	-debounce-timer".label))).......
35580	20 20 20 28 66 6e 20 60 28 6c 61 6d 62 64 61 20 28 29 20 28 69 67 6e 6f 72 65 2d 65 72 72 6f 72	...(fn.`(lambda.().(ignore-error
355a0	73 20 2c 40 62 6f 64 79 29 29 29 29 0a 20 20 20 20 60 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20	s.,@body)))).....`(progn........
355c0	28 61 6e 64 20 28 74 69 6d 65 72 70 20 2c 74 69 6d 65 72 29 20 28 63 61 6e 63 65 6c 2d 74 69 6d	(and.(timerp.,timer).(cancel-tim
355e0	65 72 20 2c 74 69 6d 65 72 29 29 0a 20 20 20 20 20 20 20 28 73 65 74 71 20 2c 74 69 6d 65 72 20	er.,timer))........(setq.,timer.
35600	28 72 75 6e 2d 77 69 74 68 2d 69 64 6c 65 2d 74 69 6d 65 72 20 2c 64 65 62 6f 75 6e 63 65 20 6e	(run-with-idle-timer.,debounce.n
35620	69 6c 20 2c 66 6e 29 29 29 29 29 0a 0a 28 64 65 66 6d 61 63 72 6f 20 64 69 72 76 69 73 68 2d 64	il.,fn)))))..(defmacro.dirvish-d
35640	65 66 69 6e 65 2d 61 74 74 72 69 62 75 74 65 20 28 6e 61 6d 65 20 64 6f 63 73 74 72 69 6e 67 20	efine-attribute.(name.docstring.
35660	26 72 65 73 74 20 62 6f 64 79 29 0a 20 20 22 44 65 66 69 6e 65 20 61 20 44 69 72 76 69 73 68 20	&rest.body)..."Define.a.Dirvish.
35680	61 74 74 72 69 62 75 74 65 20 4e 41 4d 45 2e 0a 41 6e 20 61 74 74 72 69 62 75 74 65 20 63 6f 6e	attribute.NAME..An.attribute.con
356a0	74 61 69 6e 73 20 61 20 70 61 69 72 20 6f 66 20 70 72 65 64 69 63 61 74 65 2f 72 65 6e 64 65 72	tains.a.pair.of.predicate/render
356c0	69 6e 67 20 66 75 6e 63 74 69 6f 6e 73 0a 74 68 61 74 20 61 72 65 20 62 65 69 6e 67 20 63 61 6c	ing.functions.that.are.being.cal
356e0	6c 65 64 20 6f 6e 20 60 70 6f 73 74 2d 63 6f 6d 6d 61 6e 64 2d 68 6f 6f 6b 27 2e 20 20 54 68 65	led.on.`post-command-hook'...The
35700	20 70 72 65 64 69 63 61 74 65 20 66 6e 0a 74 61 6b 65 73 20 63 75 72 72 65 6e 74 20 44 56 20 61	.predicate.fn.takes.current.DV.a
35720	73 20 61 72 67 75 6d 65 6e 74 20 61 6e 64 20 69 73 20 65 78 65 63 75 74 65 64 20 6f 6e 63 65 2e	s.argument.and.is.executed.once.
35740	20 20 57 68 65 6e 20 69 74 0a 65 76 61 6c 75 61 74 65 73 20 74 6f 20 74 2c 20 74 68 65 20 72 65	..When.it.evaluates.to.t,.the.re
35760	6e 64 65 72 69 6e 67 20 66 6e 20 72 75 6e 73 20 42 4f 44 59 20 66 6f 72 20 65 76 65 72 79 20 6c	ndering.fn.runs.BODY.for.every.l
35780	69 6e 65 20 77 69 74 68 0a 66 6f 6c 6c 6f 77 69 6e 67 20 61 72 67 75 6d 65 6e 74 73 3a 0a 0a 2d	ine.with.following.arguments:..-
357a0	20 60 66 2d 62 65 67 27 20 20 20 66 72 6f 6d 20 60 64 69 72 65 64 2d 6d 6f 76 65 2d 74 6f 2d 66	.`f-beg'...from.`dired-move-to-f
357c0	69 6c 65 6e 61 6d 65 27 0a 2d 20 60 66 2d 65 6e 64 27 20 20 20 66 72 6f 6d 20 60 64 69 72 65 64	ilename'.-.`f-end'...from.`dired
357e0	2d 6d 6f 76 65 2d 74 6f 2d 65 6e 64 2d 6f 66 2d 66 69 6c 65 6e 61 6d 65 27 0a 2d 20 60 66 2d 73	-move-to-end-of-filename'.-.`f-s
35800	74 72 27 20 20 20 66 72 6f 6d 20 28 60 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 27 20 46	tr'...from.(`buffer-substring'.F
35820	2d 42 45 47 20 46 2d 45 4e 44 29 0a 2d 20 60 66 2d 6e 61 6d 65 27 20 20 66 72 6f 6d 20 60 64 69	-BEG.F-END).-.`f-name'..from.`di
35840	72 65 64 2d 67 65 74 2d 66 69 6c 65 6e 61 6d 65 27 0a 2d 20 60 66 2d 61 74 74 72 73 27 20 66 72	red-get-filename'.-.`f-attrs'.fr
35860	6f 6d 20 60 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 73 27 0a 2d 20 60 66 2d 74 79 70 65 27 20	om.`file-attributes'.-.`f-type'.
35880	20 66 72 6f 6d 20 60 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 2d 70 27 20 61 6c 6f 6e 67 20 77	.from.`file-directory-p'.along.w
358a0	69 74 68 20 60 66 69 6c 65 2d 73 79 6d 6c 69 6e 6b 2d 70 27 0a 2d 20 60 6c 2d 62 65 67 27 20 20	ith.`file-symlink-p'.-.`l-beg'..
358c0	20 66 72 6f 6d 20 60 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 27 0a	.from.`line-beginning-position'.
358e0	2d 20 60 6c 2d 65 6e 64 27 20 20 20 66 72 6f 6d 20 60 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74	-.`l-end'...from.`line-end-posit
35900	69 6f 6e 27 0a 2d 20 60 68 6c 2d 66 61 63 65 27 20 61 20 66 61 63 65 20 74 68 61 74 20 69 73 20	ion'.-.`hl-face'.a.face.that.is.
35920	6f 6e 6c 79 20 70 61 73 73 65 64 20 69 6e 20 6f 6e 20 63 75 72 72 65 6e 74 20 6c 69 6e 65 0a 0a	only.passed.in.on.current.line..
35940	44 4f 43 53 54 52 49 4e 47 20 69 73 20 74 68 65 20 64 6f 63 73 74 72 69 6e 67 20 66 6f 72 20 74	DOCSTRING.is.the.docstring.for.t
35960	68 65 20 61 74 74 72 69 62 75 74 65 2e 20 20 41 6e 20 6f 70 74 69 6f 6e 61 6c 0a 60 3a 77 69 64	he.attribute...An.optional.`:wid
35980	74 68 27 20 6b 65 79 77 6f 72 64 20 69 73 20 75 73 65 64 20 74 6f 20 64 65 63 6c 61 72 65 20 74	th'.keyword.is.used.to.declare.t
359a0	68 65 20 6c 65 6e 67 74 68 20 6f 66 20 74 68 65 20 61 74 74 72 69 62 75 74 65 2e 22 0a 20 20 28	he.length.of.the.attribute."...(
359c0	64 65 63 6c 61 72 65 20 28 69 6e 64 65 6e 74 20 64 65 66 75 6e 29 20 28 64 6f 63 2d 73 74 72 69	declare.(indent.defun).(doc-stri
359e0	6e 67 20 32 29 29 0a 20 20 28 6c 65 74 20 28 28 6f 76 20 28 69 6e 74 65 72 6e 20 28 66 6f 72 6d	ng.2))...(let.((ov.(intern.(form
35a00	61 74 20 22 64 69 72 76 69 73 68 2d 25 73 2d 6f 76 22 20 6e 61 6d 65 29 29 29 0a 20 20 20 20 20	at."dirvish-%s-ov".name)))......
35a20	20 20 20 28 72 65 6e 64 65 72 20 28 69 6e 74 65 72 6e 20 28 66 6f 72 6d 61 74 20 22 64 69 72 76	...(render.(intern.(format."dirv
35a40	69 73 68 2d 61 74 74 72 69 62 75 74 65 2d 25 73 2d 72 64 22 20 6e 61 6d 65 29 29 29 0a 20 20 20	ish-attribute-%s-rd".name)))....
35a60	20 20 20 20 20 28 61 72 67 73 20 27 28 66 2d 62 65 67 20 66 2d 65 6e 64 20 66 2d 73 74 72 20 66	.....(args.'(f-beg.f-end.f-str.f
35a80	2d 6e 61 6d 65 20 66 2d 61 74 74 72 73 20 66 2d 74 79 70 65 20 6c 2d 62 65 67 20 6c 2d 65 6e 64	-name.f-attrs.f-type.l-beg.l-end
35aa0	20 68 6c 2d 66 61 63 65 29 29 0a 20 20 20 20 20 20 20 20 6f 70 74 69 6f 6e 73 29 0a 20 20 20 20	.hl-face)).........options).....
35ac0	28 77 68 69 6c 65 20 28 6b 65 79 77 6f 72 64 70 20 28 63 61 72 20 62 6f 64 79 29 29 20 28 64 6f	(while.(keywordp.(car.body)).(do
35ae0	74 69 6d 65 73 20 28 5f 20 32 29 20 28 70 75 73 68 20 28 70 6f 70 20 62 6f 64 79 29 20 6f 70 74	times.(_.2).(push.(pop.body).opt
35b00	69 6f 6e 73 29 29 29 0a 20 20 20 20 28 73 65 74 71 20 6f 70 74 69 6f 6e 73 20 28 72 65 76 65 72	ions))).....(setq.options.(rever
35b20	73 65 20 6f 70 74 69 6f 6e 73 29 29 0a 20 20 20 20 60 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20	se.options)).....`(progn........
35b40	28 61 64 64 2d 74 6f 2d 6c 69 73 74 0a 20 20 20 20 20 20 20 20 27 64 69 72 76 69 73 68 2d 2d 61	(add-to-list.........'dirvish--a
35b60	76 61 69 6c 61 62 6c 65 2d 61 74 74 72 73 0a 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 27 2c 6e	vailable-attrs.........(cons.',n
35b80	61 6d 65 20 27 28 2c 28 6f 72 20 28 70 6c 69 73 74 2d 67 65 74 20 6f 70 74 69 6f 6e 73 20 3a 69	ame.'(,(or.(plist-get.options.:i
35ba0	6e 64 65 78 29 20 30 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	ndex).0)........................
35bc0	2c 28 6f 72 20 28 70 6c 69 73 74 2d 67 65 74 20 6f 70 74 69 6f 6e 73 20 3a 77 69 64 74 68 29 20	,(or.(plist-get.options.:width).
35be0	30 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 2c 28 6f 72 20 28	0)........................,(or.(
35c00	70 6c 69 73 74 2d 67 65 74 20 6f 70 74 69 6f 6e 73 20 3a 77 68 65 6e 29 20 74 29 0a 20 20 20 20	plist-get.options.:when).t).....
35c20	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 72 65 6e 64 65 72 20 2c 6f 76 20 2c	...................,render.,ov.,
35c40	64 6f 63 73 74 72 69 6e 67 29 29 29 0a 20 20 20 20 20 20 20 28 64 65 66 75 6e 20 2c 72 65 6e 64	docstring)))........(defun.,rend
35c60	65 72 20 2c 61 72 67 73 20 28 69 67 6e 6f 72 65 20 2c 40 61 72 67 73 29 20 2c 40 62 6f 64 79 29	er.,args.(ignore.,@args).,@body)
35c80	29 29 29 0a 0a 28 64 65 66 6d 61 63 72 6f 20 64 69 72 76 69 73 68 2d 61 74 74 72 69 62 75 74 65	)))..(defmacro.dirvish-attribute
35ca0	2d 63 61 63 68 65 20 28 66 69 6c 65 20 61 74 74 72 69 62 75 74 65 20 26 72 65 73 74 20 62 6f 64	-cache.(file.attribute.&rest.bod
35cc0	79 29 0a 20 20 22 47 65 74 20 46 49 4c 45 27 73 20 41 54 54 52 49 42 55 54 45 20 66 72 6f 6d 20	y)..."Get.FILE's.ATTRIBUTE.from.
35ce0	60 64 69 72 76 69 73 68 2d 2d 61 74 74 72 73 2d 68 61 73 68 27 2e 0a 57 68 65 6e 20 74 68 65 20	`dirvish--attrs-hash'..When.the.
35d00	61 74 74 72 69 62 75 74 65 20 64 6f 65 73 20 6e 6f 74 20 65 78 69 73 74 2c 20 73 65 74 20 69 74	attribute.does.not.exist,.set.it
35d20	20 77 69 74 68 20 42 4f 44 59 2e 22 0a 20 20 28 64 65 63 6c 61 72 65 20 28 69 6e 64 65 6e 74 20	.with.BODY."...(declare.(indent.
35d40	64 65 66 75 6e 29 29 0a 20 20 60 28 6c 65 74 2a 20 28 28 6d 64 35 20 28 69 6e 74 65 72 6e 20 28	defun))...`(let*.((md5.(intern.(
35d60	73 65 63 75 72 65 2d 68 61 73 68 20 27 6d 64 35 20 2c 66 69 6c 65 29 29 29 0a 20 20 20 20 20 20	secure-hash.'md5.,file))).......
35d80	20 20 20 20 28 68 61 73 68 20 28 67 65 74 68 61 73 68 20 6d 64 35 20 64 69 72 76 69 73 68 2d 2d	....(hash.(gethash.md5.dirvish--
35da0	61 74 74 72 73 2d 68 61 73 68 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 61 63 68 65 64 20 28	attrs-hash))...........(cached.(
35dc0	70 6c 69 73 74 2d 67 65 74 20 68 61 73 68 20 2c 61 74 74 72 69 62 75 74 65 29 29 0a 20 20 20 20	plist-get.hash.,attribute)).....
35de0	20 20 20 20 20 20 28 61 74 74 72 20 28 6f 72 20 63 61 63 68 65 64 20 2c 40 62 6f 64 79 29 29 29	......(attr.(or.cached.,@body)))
35e00	0a 20 20 20 20 20 28 75 6e 6c 65 73 73 20 63 61 63 68 65 64 0a 20 20 20 20 20 20 20 28 70 75 74	......(unless.cached........(put
35e20	68 61 73 68 20 6d 64 35 20 28 61 70 70 65 6e 64 20 68 61 73 68 20 28 6c 69 73 74 20 2c 61 74 74	hash.md5.(append.hash.(list.,att
35e40	72 69 62 75 74 65 20 61 74 74 72 29 29 20 64 69 72 76 69 73 68 2d 2d 61 74 74 72 73 2d 68 61 73	ribute.attr)).dirvish--attrs-has
35e60	68 29 29 0a 20 20 20 20 20 61 74 74 72 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 61 63 72 6f 20 64 69	h))......attr))..(cl-defmacro.di
35e80	72 76 69 73 68 2d 64 65 66 69 6e 65 2d 70 72 65 76 69 65 77 20 28 6e 61 6d 65 20 26 6f 70 74 69	rvish-define-preview.(name.&opti
35ea0	6f 6e 61 6c 20 61 72 67 6c 69 73 74 20 64 6f 63 73 74 72 69 6e 67 20 26 72 65 73 74 20 62 6f 64	onal.arglist.docstring.&rest.bod
35ec0	79 29 0a 20 20 22 44 65 66 69 6e 65 20 61 20 44 69 72 76 69 73 68 20 70 72 65 76 69 65 77 20 64	y)..."Define.a.Dirvish.preview.d
35ee0	69 73 70 61 74 63 68 65 72 20 4e 41 4d 45 2e 0a 41 20 64 69 72 76 69 73 68 20 70 72 65 76 69 65	ispatcher.NAME..A.dirvish.previe
35f00	77 20 64 69 73 70 61 74 63 68 65 72 20 69 73 20 61 20 66 75 6e 63 74 69 6f 6e 20 63 6f 6e 73 75	w.dispatcher.is.a.function.consu
35f20	6d 65 64 20 62 79 0a 20 60 64 69 72 76 69 73 68 2d 70 72 65 76 69 65 77 2d 64 69 73 70 61 74 63	med.by..`dirvish-preview-dispatc
35f40	68 27 20 77 68 69 63 68 20 74 61 6b 65 73 20 60 66 69 6c 65 27 20 28 66 69 6c 65 6e 61 6d 65 20	h'.which.takes.`file'.(filename.
35f60	75 6e 64 65 72 0a 20 74 68 65 20 63 75 72 73 6f 72 29 20 61 6e 64 20 60 70 72 65 76 69 65 77 2d	under..the.cursor).and.`preview-
35f80	77 69 6e 64 6f 77 27 20 61 73 20 41 52 47 4c 49 53 54 2e 20 20 44 4f 43 53 54 52 49 4e 47 20 61	window'.as.ARGLIST...DOCSTRING.a
35fa0	6e 64 20 42 4f 44 59 0a 20 69 73 20 74 68 65 20 64 6f 63 73 74 72 69 6e 67 20 61 6e 64 20 62 6f	nd.BODY..is.the.docstring.and.bo
35fc0	64 79 20 66 6f 72 20 74 68 69 73 20 66 75 6e 63 74 69 6f 6e 2e 22 0a 20 20 28 64 65 63 6c 61 72	dy.for.this.function."...(declar
35fe0	65 20 28 69 6e 64 65 6e 74 20 64 65 66 75 6e 29 20 28 64 6f 63 2d 73 74 72 69 6e 67 20 33 29 29	e.(indent.defun).(doc-string.3))
36000	0a 20 20 28 6c 65 74 2a 20 28 28 64 70 2d 6e 61 6d 65 20 28 69 6e 74 65 72 6e 20 28 66 6f 72 6d	...(let*.((dp-name.(intern.(form
36020	61 74 20 22 64 69 72 76 69 73 68 2d 25 73 2d 64 70 22 20 6e 61 6d 65 29 29 29 0a 20 20 20 20 20	at."dirvish-%s-dp".name)))......
36040	20 20 20 20 28 64 65 66 61 75 6c 74 2d 61 72 67 6c 69 73 74 20 27 28 66 69 6c 65 20 65 78 74 20	....(default-arglist.'(file.ext.
36060	70 72 65 76 69 65 77 2d 77 69 6e 64 6f 77 20 64 76 29 29 0a 20 20 20 20 20 20 20 20 20 28 69 67	preview-window.dv))..........(ig
36080	6e 6f 72 65 2d 6c 69 73 74 20 28 63 6c 2d 73 65 74 2d 64 69 66 66 65 72 65 6e 63 65 20 64 65 66	nore-list.(cl-set-difference.def
360a0	61 75 6c 74 2d 61 72 67 6c 69 73 74 20 61 72 67 6c 69 73 74 29 29 0a 20 20 20 20 20 20 20 20 20	ault-arglist.arglist))..........
360c0	28 6b 65 79 77 6f 72 64 73 20 60 28 3a 64 6f 63 20 2c 64 6f 63 73 74 72 69 6e 67 29 29 29 0a 20	(keywords.`(:doc.,docstring)))..
360e0	20 20 20 28 77 68 69 6c 65 20 28 6b 65 79 77 6f 72 64 70 20 28 63 61 72 20 62 6f 64 79 29 29 20	...(while.(keywordp.(car.body)).
36100	28 64 6f 74 69 6d 65 73 20 28 5f 20 32 29 20 28 70 75 73 68 20 28 70 6f 70 20 62 6f 64 79 29 20	(dotimes.(_.2).(push.(pop.body).
36120	6b 65 79 77 6f 72 64 73 29 29 29 0a 20 20 20 20 60 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 28	keywords))).....`(progn........(
36140	61 64 64 2d 74 6f 2d 6c 69 73 74 0a 20 20 20 20 20 20 20 20 27 64 69 72 76 69 73 68 2d 2d 61 76	add-to-list.........'dirvish--av
36160	61 69 6c 61 62 6c 65 2d 70 72 65 76 69 65 77 2d 64 69 73 70 61 74 63 68 65 72 73 20 28 63 6f 6e	ailable-preview-dispatchers.(con
36180	73 20 27 2c 6e 61 6d 65 20 27 2c 6b 65 79 77 6f 72 64 73 29 29 0a 20 20 20 20 20 20 20 28 64 65	s.',name.',keywords))........(de
361a0	66 75 6e 20 2c 64 70 2d 6e 61 6d 65 20 2c 64 65 66 61 75 6c 74 2d 61 72 67 6c 69 73 74 20 28 69	fun.,dp-name.,default-arglist.(i
361c0	67 6e 6f 72 65 20 2c 40 69 67 6e 6f 72 65 2d 6c 69 73 74 29 20 2c 40 62 6f 64 79 29 29 29 29 0a	gnore.,@ignore-list).,@body)))).
361e0	0a 28 64 65 66 6d 61 63 72 6f 20 64 69 72 76 69 73 68 2d 64 65 66 69 6e 65 2d 6d 6f 64 65 2d 6c	.(defmacro.dirvish-define-mode-l
36200	69 6e 65 20 28 6e 61 6d 65 20 26 6f 70 74 69 6f 6e 61 6c 20 64 6f 63 73 74 72 69 6e 67 20 26 72	ine.(name.&optional.docstring.&r
36220	65 73 74 20 62 6f 64 79 29 0a 20 20 22 44 65 66 69 6e 65 20 61 20 6d 6f 64 65 20 6c 69 6e 65 20	est.body)..."Define.a.mode.line.
36240	73 65 67 6d 65 6e 74 20 4e 41 4d 45 20 77 69 74 68 20 42 4f 44 59 20 61 6e 64 20 44 4f 43 53 54	segment.NAME.with.BODY.and.DOCST
36260	52 49 4e 47 2e 22 0a 20 20 28 64 65 63 6c 61 72 65 20 28 69 6e 64 65 6e 74 20 64 65 66 75 6e 29	RING."...(declare.(indent.defun)
36280	20 28 64 6f 63 2d 73 74 72 69 6e 67 20 32 29 29 0a 20 20 28 6c 65 74 20 28 28 6d 6c 2d 6e 61 6d	.(doc-string.2))...(let.((ml-nam
362a0	65 20 28 69 6e 74 65 72 6e 20 28 66 6f 72 6d 61 74 20 22 64 69 72 76 69 73 68 2d 25 73 2d 6d 6c	e.(intern.(format."dirvish-%s-ml
362c0	22 20 6e 61 6d 65 29 29 29 29 0a 20 20 20 20 60 28 64 65 66 75 6e 20 2c 6d 6c 2d 6e 61 6d 65 20	".name)))).....`(defun.,ml-name.
362e0	28 64 76 29 20 2c 64 6f 63 73 74 72 69 6e 67 20 28 69 67 6e 6f 72 65 20 64 76 29 20 2c 40 62 6f	(dv).,docstring.(ignore.dv).,@bo
36300	64 79 29 29 29 0a 0a 3b 3b 3b 3b 20 48 65 6c 70 65 72 73 0a 0a 28 64 65 66 75 6e 20 64 69 72 76	dy)))..;;;;.Helpers..(defun.dirv
36320	69 73 68 2d 2d 68 69 64 65 2d 64 69 72 65 64 2d 68 65 61 64 65 72 20 28 29 0a 20 20 22 48 69 64	ish--hide-dired-header.()..."Hid
36340	65 20 74 68 65 20 44 69 72 65 64 20 68 65 61 64 65 72 2e 22 0a 20 20 28 72 65 6d 6f 76 65 2d 6f	e.the.Dired.header."...(remove-o
36360	76 65 72 6c 61 79 73 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 20 28 70 6f 69 6e 74 29 20 27 64 69 72	verlays.(point-min).(point).'dir
36380	65 64 2d 68 65 61 64 65 72 20 74 29 0a 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20	ed-header.t)...(save-excursion..
363a0	20 20 20 28 6c 65 74 2a 20 28 28 62 65 67 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74	...(let*.((beg.(goto-char.(point
363c0	2d 6d 69 6e 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6e 65 78 74 2d 66 69 6c 65 20 28 6e	-min)))............(next-file.(n
363e0	65 78 74 2d 73 69 6e 67 6c 65 2d 70 72 6f 70 65 72 74 79 2d 63 68 61 6e 67 65 20 62 65 67 20 27	ext-single-property-change.beg.'
36400	64 69 72 65 64 2d 66 69 6c 65 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 65 6e 64	dired-filename))............(end
36420	20 28 6f 72 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 63 6f 6e 74 65 6e 74 2d 62 65 67 69	.(or.(dirvish-prop.:content-begi
36440	6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 6e 6f 74	n).....................(and.(not
36460	20 6e 65 78 74 2d 66 69 6c 65 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 20 20 20 20 20 20 20	.next-file).(point-max))........
36480	20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 20 28 67 6f 74 6f 2d 63 68 61 72 20 6e	.............(progn.(goto-char.n
364a0	65 78 74 2d 66 69 6c 65 29 20 28 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69	ext-file).(line-beginning-positi
364c0	6f 6e 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6f 20 28 6d 61 6b 65 2d 6f 76 65 72 6c	on))))............(o.(make-overl
364e0	61 79 20 62 65 67 20 65 6e 64 29 29 29 0a 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 70 72 6f	ay.beg.end))).......(dirvish-pro
36500	70 20 3a 63 6f 6e 74 65 6e 74 2d 62 65 67 69 6e 20 65 6e 64 29 0a 20 20 20 20 20 20 28 6f 76 65	p.:content-begin.end).......(ove
36520	72 6c 61 79 2d 70 75 74 20 6f 20 27 64 69 72 65 64 2d 68 65 61 64 65 72 20 74 29 0a 20 20 20 20	rlay-put.o.'dired-header.t).....
36540	20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 20 27 69 6e 76 69 73 69 62 6c 65 0a 20 20 20 20	..(overlay-put.o.'invisible.....
36560	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 63 64 72 20 64 69 72 65 64	...............(cond.((cdr.dired
36580	2d 73 75 62 64 69 72 2d 61 6c 69 73 74 29 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	-subdir-alist).nil).............
365a0	20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 75 73 65 2d 68 65 61 64 65 72	.............(dirvish-use-header
365c0	2d 6c 69 6e 65 20 74 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 2d 64	-line.t))))))..(defun.dirvish--d
365e0	69 73 70 6c 61 79 2d 62 75 66 66 65 72 20 28 62 75 66 66 65 72 20 61 6c 69 73 74 29 0a 20 20 22	isplay-buffer.(buffer.alist)..."
36600	54 72 79 20 64 69 73 70 6c 61 79 69 6e 67 20 42 55 46 46 45 52 20 77 69 74 68 20 41 4c 49 53 54	Try.displaying.BUFFER.with.ALIST
36620	2e 0a 54 68 69 73 20 73 70 6c 69 74 73 20 74 68 65 20 77 69 6e 64 6f 77 20 61 74 20 74 68 65 20	..This.splits.the.window.at.the.
36640	64 65 73 69 67 6e 61 74 65 64 20 73 69 64 65 20 6f 66 20 74 68 65 20 66 72 61 6d 65 2e 0a 41 4c	designated.side.of.the.frame..AL
36660	49 53 54 20 69 73 20 77 69 6e 64 6f 77 20 61 72 67 75 6d 65 6e 74 73 20 70 61 73 73 65 64 20 74	IST.is.window.arguments.passed.t
36680	6f 20 60 77 69 6e 64 6f 77 2d 2d 64 69 73 70 6c 61 79 2d 62 75 66 66 65 72 27 2e 22 0a 20 20 28	o.`window--display-buffer'."...(
366a0	6c 65 74 2a 20 28 28 73 69 64 65 20 28 63 64 72 20 28 61 73 73 71 20 27 73 69 64 65 20 61 6c 69	let*.((side.(cdr.(assq.'side.ali
366c0	73 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 77 69 6e 64 6f 77 2d 63 6f 6e 66 69 67 75 72 61	st)))..........(window-configura
366e0	74 69 6f 6e 2d 63 68 61 6e 67 65 2d 68 6f 6f 6b 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 28	tion-change-hook.nil)..........(
36700	77 69 64 74 68 20 28 6f 72 20 28 63 64 72 20 28 61 73 73 71 20 27 77 69 6e 64 6f 77 2d 77 69 64	width.(or.(cdr.(assq.'window-wid
36720	74 68 20 61 6c 69 73 74 29 29 20 30 2e 35 29 29 0a 20 20 20 20 20 20 20 20 20 28 68 65 69 67 68	th.alist)).0.5))..........(heigh
36740	74 20 28 63 64 72 20 28 61 73 73 71 20 27 77 69 6e 64 6f 77 2d 68 65 69 67 68 74 20 61 6c 69 73	t.(cdr.(assq.'window-height.alis
36760	74 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 73 69 7a 65 20 28 6f 72 20 68 65 69 67 68 74 20 28	t)))..........(size.(or.height.(
36780	63 65 69 6c 69 6e 67 20 28 2a 20 28 66 72 61 6d 65 2d 77 69 64 74 68 29 20 77 69 64 74 68 29 29	ceiling.(*.(frame-width).width))
367a0	29 29 0a 20 20 20 20 20 20 20 20 20 28 73 70 6c 69 74 2d 77 69 64 74 68 2d 74 68 72 65 73 68 6f	))..........(split-width-thresho
367c0	6c 64 20 30 29 0a 20 20 20 20 20 20 20 20 20 28 69 67 6e 6f 72 65 2d 77 69 6e 64 6f 77 2d 70 61	ld.0)..........(ignore-window-pa
367e0	72 61 6d 65 74 65 72 73 20 74 29 0a 20 20 20 20 20 20 20 20 20 28 6e 65 77 2d 77 69 6e 64 6f 77	rameters.t)..........(new-window
36800	20 28 73 70 6c 69 74 2d 77 69 6e 64 6f 77 2d 6e 6f 2d 65 72 72 6f 72 20 6e 69 6c 20 73 69 7a 65	.(split-window-no-error.nil.size
36820	20 73 69 64 65 29 29 29 0a 20 20 20 20 28 77 69 6e 64 6f 77 2d 2d 64 69 73 70 6c 61 79 2d 62 75	.side))).....(window--display-bu
36840	66 66 65 72 20 62 75 66 66 65 72 20 6e 65 77 2d 77 69 6e 64 6f 77 20 27 77 69 6e 64 6f 77 20 61	ffer.buffer.new-window.'window.a
36860	6c 69 73 74 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 2d 6b 69 6c 6c 2d 62 75	list)))..(defun.dirvish--kill-bu
36880	66 66 65 72 20 28 62 75 66 66 65 72 29 0a 20 20 22 4b 69 6c 6c 20 42 55 46 46 45 52 20 77 69 74	ffer.(buffer)..."Kill.BUFFER.wit
368a0	68 6f 75 74 20 73 69 64 65 20 65 66 66 65 63 74 73 2e 22 0a 20 20 28 61 6e 64 20 28 62 75 66 66	hout.side.effects."...(and.(buff
368c0	65 72 2d 6c 69 76 65 2d 70 20 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 28 63 6c 2d 6c 65 74	er-live-p.buffer)........(cl-let
368e0	66 20 28 28 28 73 79 6d 62 6f 6c 2d 66 75 6e 63 74 69 6f 6e 20 27 75 6e 64 6f 2d 74 72 65 65 2d	f.(((symbol-function.'undo-tree-
36900	73 61 76 65 2d 68 69 73 74 6f 72 79 2d 66 72 6f 6d 2d 68 6f 6f 6b 29 20 23 27 69 67 6e 6f 72 65	save-history-from-hook).#'ignore
36920	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 73 79 6d 62 6f 6c 2d 66 75 6e 63	)..................((symbol-func
36940	74 69 6f 6e 20 27 72 65 63 65 6e 74 66 2d 74 72 61 63 6b 2d 63 6c 6f 73 65 64 2d 66 69 6c 65 29	tion.'recentf-track-closed-file)
36960	20 23 27 69 67 6e 6f 72 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 6b 69 6c 6c 2d	.#'ignore))..........(let.(kill-
36980	62 75 66 66 65 72 2d 71 75 65 72 79 2d 66 75 6e 63 74 69 6f 6e 73 29 20 28 6b 69 6c 6c 2d 62 75	buffer-query-functions).(kill-bu
369a0	66 66 65 72 20 62 75 66 66 65 72 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68	ffer.buffer)))))..(defun.dirvish
369c0	2d 2d 67 65 74 2d 70 72 6f 6a 65 63 74 2d 72 6f 6f 74 20 28 26 6f 70 74 69 6f 6e 61 6c 20 64 69	--get-project-root.(&optional.di
369e0	72 65 63 74 6f 72 79 29 0a 20 20 22 47 65 74 20 70 72 6f 6a 65 63 74 20 72 6f 6f 74 20 70 61 74	rectory)..."Get.project.root.pat
36a00	68 20 6f 66 20 44 49 52 45 43 54 4f 52 59 2e 22 0a 20 20 28 77 68 65 6e 2d 6c 65 74 2a 20 28 28	h.of.DIRECTORY."...(when-let*.((
36a20	70 6a 20 28 70 72 6f 6a 65 63 74 2d 63 75 72 72 65 6e 74 20 6e 69 6c 20 64 69 72 65 63 74 6f 72	pj.(project-current.nil.director
36a40	79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6a 2d 72 6f 6f 74 20 28 63 61 72 20	y))...............(pj-root.(car.
36a60	28 77 69 74 68 2d 6e 6f 2d 77 61 72 6e 69 6e 67 73 20 28 70 72 6f 6a 65 63 74 2d 72 6f 6f 74 73	(with-no-warnings.(project-roots
36a80	20 70 6a 29 29 29 29 29 0a 20 20 20 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 70	.pj))))).....(expand-file-name.p
36aa0	6a 2d 72 6f 6f 74 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 2d 67 65 74 2d 70	j-root)))..(defun.dirvish--get-p
36ac0	61 72 65 6e 74 2d 70 61 74 68 20 28 70 61 74 68 29 0a 20 20 22 47 65 74 20 70 61 72 65 6e 74 20	arent-path.(path)..."Get.parent.
36ae0	64 69 72 65 63 74 6f 72 79 20 6f 66 20 50 41 54 48 2e 22 0a 20 20 28 66 69 6c 65 2d 6e 61 6d 65	directory.of.PATH."...(file-name
36b00	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.
36b20	28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 70 61 74 68 29 29 29 29 0a 0a 28 64 65 66	(expand-file-name.path))))..(def
36b40	75 6e 20 64 69 72 76 69 73 68 2d 2d 61 70 70 65 6e 64 2d 6d 65 74 61 64 61 74 61 20 28 6d 65 74	un.dirvish--append-metadata.(met
36b60	61 64 61 74 61 20 63 6f 6d 70 6c 65 74 69 6f 6e 73 29 0a 20 20 22 41 70 70 65 6e 64 20 4d 45 54	adata.completions)..."Append.MET
36b80	41 44 41 54 41 20 66 6f 72 20 6d 69 6e 69 62 75 66 66 65 72 20 43 4f 4d 50 4c 45 54 49 4f 4e 53	ADATA.for.minibuffer.COMPLETIONS
36ba0	2e 22 0a 20 20 28 6c 65 74 20 28 28 65 6e 74 72 79 20 28 69 66 20 28 66 75 6e 63 74 69 6f 6e 70	."...(let.((entry.(if.(functionp
36bc0	20 6d 65 74 61 64 61 74 61 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28	.metadata)....................`(
36be0	6d 65 74 61 64 61 74 61 20 28 61 6e 6e 6f 74 61 74 69 6f 6e 2d 66 75 6e 63 74 69 6f 6e 20 2e 20	metadata.(annotation-function...
36c00	2c 6d 65 74 61 64 61 74 61 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 6d	,metadata))..................`(m
36c20	65 74 61 64 61 74 61 20 28 63 61 74 65 67 6f 72 79 20 2e 20 2c 6d 65 74 61 64 61 74 61 29 29 29	etadata.(category...,metadata)))
36c40	29 29 0a 20 20 20 20 28 6c 61 6d 62 64 61 20 28 73 74 72 69 6e 67 20 70 72 65 64 20 61 63 74 69	)).....(lambda.(string.pred.acti
36c60	6f 6e 29 0a 20 20 20 20 20 20 28 69 66 20 28 65 71 20 61 63 74 69 6f 6e 20 27 6d 65 74 61 64 61	on).......(if.(eq.action.'metada
36c80	74 61 29 0a 20 20 20 20 20 20 20 20 20 20 65 6e 74 72 79 0a 20 20 20 20 20 20 20 20 28 63 6f 6d	ta)...........entry.........(com
36ca0	70 6c 65 74 65 2d 77 69 74 68 2d 61 63 74 69 6f 6e 20 61 63 74 69 6f 6e 20 63 6f 6d 70 6c 65 74	plete-with-action.action.complet
36cc0	69 6f 6e 73 20 73 74 72 69 6e 67 20 70 72 65 64 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69	ions.string.pred)))))..(defun.di
36ce0	72 76 69 73 68 2d 2d 77 69 6e 64 6f 77 2d 73 65 6c 65 63 74 65 64 2d 70 20 28 64 76 29 0a 20 20	rvish--window-selected-p.(dv)...
36d00	22 52 65 74 75 72 6e 20 74 20 69 66 20 73 65 73 73 69 6f 6e 20 44 56 20 69 73 20 73 65 6c 65 63	"Return.t.if.session.DV.is.selec
36d20	74 65 64 2e 22 0a 20 20 28 65 71 20 28 69 66 20 28 63 61 72 20 28 64 76 2d 6c 61 79 6f 75 74 20	ted."...(eq.(if.(car.(dv-layout.
36d40	64 76 29 29 20 28 64 76 2d 72 6f 6f 74 2d 77 69 6e 64 6f 77 20 64 76 29 20 28 66 72 61 6d 65 2d	dv)).(dv-root-window.dv).(frame-
36d60	73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 29 29 0a 20 20 20 20 20 20 64 69 72 76 69 73 68 2d	selected-window)).......dirvish-
36d80	2d 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69	-selected-window))..(defun.dirvi
36da0	73 68 2d 2d 73 63 6f 70 65 73 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 63 6f 6d 70 75 74 65 64	sh--scopes.()..."Return.computed
36dc0	20 73 63 6f 70 65 73 20 61 63 63 6f 72 64 69 6e 67 20 74 6f 20 60 64 69 72 76 69 73 68 2d 73 63	.scopes.according.to.`dirvish-sc
36de0	6f 70 65 73 27 2e 22 0a 20 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 28 6b 20 76 29 20 6f 6e 20	opes'."...(cl-loop.for.(k.v).on.
36e00	64 69 72 76 69 73 68 2d 73 63 6f 70 65 73 20 62 79 20 27 63 64 64 72 0a 20 20 20 20 20 20 20 20	dirvish-scopes.by.'cddr.........
36e20	20 20 20 61 70 70 65 6e 64 20 28 6c 69 73 74 20 6b 20 28 61 6e 64 20 28 66 75 6e 63 74 69 6f 6e	...append.(list.k.(and.(function
36e40	70 20 76 29 20 28 66 75 6e 63 61 6c 6c 20 76 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72	p.v).(funcall.v)))))..(defun.dir
36e60	76 69 73 68 2d 2d 66 6f 72 6d 61 74 2d 6d 65 6e 75 2d 68 65 61 64 69 6e 67 20 28 74 69 74 6c 65	vish--format-menu-heading.(title
36e80	20 26 6f 70 74 69 6f 6e 61 6c 20 6e 6f 74 65 29 0a 20 20 22 46 6f 72 6d 61 74 20 54 49 54 4c 45	.&optional.note)..."Format.TITLE
36ea0	20 61 73 20 61 20 6d 65 6e 75 20 68 65 61 64 69 6e 67 2e 0a 57 68 65 6e 20 4e 4f 54 45 20 69 73	.as.a.menu.heading..When.NOTE.is
36ec0	20 6e 6f 6e 2d 6e 69 6c 2c 20 61 70 70 65 6e 64 20 69 74 20 74 68 65 20 6e 65 78 74 20 6c 69 6e	.non-nil,.append.it.the.next.lin
36ee0	65 2e 22 0a 20 20 28 6c 65 74 20 28 28 6e 6f 2d 77 62 20 28 3d 20 28 66 72 61 6d 65 2d 62 6f 74	e."...(let.((no-wb.(=.(frame-bot
36f00	74 6f 6d 2d 64 69 76 69 64 65 72 2d 77 69 64 74 68 29 20 30 29 29 29 0a 20 20 20 20 28 66 6f 72	tom-divider-width).0))).....(for
36f20	6d 61 74 20 22 25 73 25 73 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72	mat."%s%s%s".............(proper
36f40	74 69 7a 65 20 74 69 74 6c 65 20 27 66 61 63 65 20 60 28 3a 69 6e 68 65 72 69 74 20 64 69 72 65	tize.title.'face.`(:inherit.dire
36f60	64 2d 6d 61 72 6b 20 3a 6f 76 65 72 6c 69 6e 65 20 2c 6e 6f 2d 77 62 29 0a 20 20 20 20 20 20 20	d-mark.:overline.,no-wb)........
36f80	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 64 69 73 70 6c 61 79 20 27 28 28 68 65 69	.................'display.'((hei
36fa0	67 68 74 20 31 2e 31 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69	ght.1.1))).............(properti
36fc0	7a 65 20 22 20 22 20 27 66 61 63 65 20 60 28 3a 69 6e 68 65 72 69 74 20 64 69 72 65 64 2d 6d 61	ze.".".'face.`(:inherit.dired-ma
36fe0	72 6b 20 3a 6f 76 65 72 6c 69 6e 65 20 2c 6e 6f 2d 77 62 29 0a 20 20 20 20 20 20 20 20 20 20 20	rk.:overline.,no-wb)............
37000	20 20 20 20 20 20 20 20 20 20 20 20 20 27 64 69 73 70 6c 61 79 20 27 28 73 70 61 63 65 20 3a 61	.............'display.'(space.:a
37020	6c 69 67 6e 2d 74 6f 20 72 69 67 68 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f	lign-to.right)).............(pro
37040	70 65 72 74 69 7a 65 20 28 69 66 20 6e 6f 74 65 20 28 63 6f 6e 63 61 74 20 22 5c 6e 22 20 6e 6f	pertize.(if.note.(concat."\n".no
37060	74 65 29 20 22 22 29 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 64 6f 63 2d 66 61 63	te)."").'face.'font-lock-doc-fac
37080	65 29 29 29 29 0a 0a 3b 3b 3b 3b 20 43 6f 72 65 0a 0a 28 64 65 66 73 75 62 73 74 20 64 69 72 76	e))))..;;;;.Core..(defsubst.dirv
370a0	69 73 68 2d 63 75 72 72 20 28 29 0a 20 20 22 47 65 74 20 73 65 6c 65 63 74 65 64 20 44 69 72 76	ish-curr.()..."Get.selected.Dirv
370c0	69 73 68 20 73 65 73 73 69 6f 6e 2e 22 0a 20 20 28 67 65 74 68 61 73 68 20 28 64 69 72 76 69 73	ish.session."...(gethash.(dirvis
370e0	68 2d 70 72 6f 70 20 3a 64 76 29 20 64 69 72 76 69 73 68 2d 2d 73 65 73 73 69 6f 6e 2d 68 61 73	h-prop.:dv).dirvish--session-has
37100	68 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 2d 75 74 69 6c 2d 62 75 66 66 65 72	h))..(defun.dirvish--util-buffer
37120	20 28 74 79 70 65 20 26 6f 70 74 69 6f 6e 61 6c 20 64 76 20 6e 6f 2d 63 72 65 61 74 65 20 69 6e	.(type.&optional.dv.no-create.in
37140	68 69 62 69 74 2d 68 69 64 69 6e 67 29 0a 20 20 22 52 65 74 75 72 6e 20 73 65 73 73 69 6f 6e 20	hibit-hiding)..."Return.session.
37160	44 56 27 73 20 75 74 69 6c 69 74 79 20 62 75 66 66 65 72 20 6f 66 20 54 59 50 45 20 28 64 65 66	DV's.utility.buffer.of.TYPE.(def
37180	61 75 6c 74 73 20 74 6f 20 60 74 65 6d 70 27 29 2e 0a 49 66 20 4e 4f 2d 43 52 45 41 54 45 20 69	aults.to.`temp')..If.NO-CREATE.i
371a0	73 20 6e 6f 6e 2d 6e 69 6c 2c 20 64 6f 20 6e 6f 74 20 63 72 65 61 74 65 20 74 68 65 20 62 75 66	s.non-nil,.do.not.create.the.buf
371c0	66 65 72 2e 0a 49 66 20 49 4e 48 49 42 49 54 2d 48 49 44 49 4e 47 20 69 73 20 6e 6f 6e 2d 6e 69	fer..If.INHIBIT-HIDING.is.non-ni
371e0	6c 2c 20 64 6f 20 6e 6f 74 20 68 69 64 65 20 74 68 65 20 62 75 66 66 65 72 2e 22 0a 20 20 28 6c	l,.do.not.hide.the.buffer."...(l
37200	65 74 2a 20 28 28 69 64 20 28 69 66 20 64 76 20 28 66 6f 72 6d 61 74 20 22 2d 25 73 2a 22 20 28	et.((id.(if.dv.(format."-%s".(
37220	64 76 2d 6e 61 6d 65 20 64 76 29 29 20 22 2a 22 29 29 0a 20 20 20 20 20 20 20 20 20 28 6e 61 6d	dv-name.dv))."*"))..........(nam
37240	65 20 28 66 6f 72 6d 61 74 20 22 25 73 2a 44 69 72 76 69 73 68 2d 25 73 25 73 22 20 28 69 66 20	e.(format."%s*Dirvish-%s%s".(if.
37260	69 6e 68 69 62 69 74 2d 68 69 64 69 6e 67 20 22 22 20 22 20 22 29 20 74 79 70 65 20 69 64 29 29	inhibit-hiding."".".").type.id))
37280	29 0a 20 20 20 20 28 69 66 20 6e 6f 2d 63 72 65 61 74 65 20 28 67 65 74 2d 62 75 66 66 65 72 20	).....(if.no-create.(get-buffer.
372a0	6e 61 6d 65 29 20 28 67 65 74 2d 62 75 66 66 65 72 2d 63 72 65 61 74 65 20 6e 61 6d 65 29 29 29	name).(get-buffer-create.name)))
372c0	29 0a 0a 28 63 6c 2d 64 65 66 73 74 72 75 63 74 20 28 64 69 72 76 69 73 68 20 28 3a 63 6f 6e 63	)..(cl-defstruct.(dirvish.(:conc
372e0	2d 6e 61 6d 65 20 64 76 2d 29 29 0a 20 20 22 44 65 66 69 6e 65 20 64 69 72 76 69 73 68 20 64 61	-name.dv-))..."Define.dirvish.da
37300	74 61 20 74 79 70 65 2e 22 0a 20 20 28 74 79 70 65 20 28 29 20 3a 64 6f 63 75 6d 65 6e 74 61 74	ta.type."...(type.().:documentat
37320	69 6f 6e 20 22 69 73 20 74 68 65 20 28 54 59 50 45 20 46 49 58 45 44 2d 57 49 44 54 48 20 44 45	ion."is.the.(TYPE.FIXED-WIDTH.DE
37340	44 49 43 41 54 45 44 20 52 4f 4f 54 2d 57 49 4e 2d 46 4e 20 46 49 4c 45 2d 4f 50 45 4e 2d 46 4e	DICATED.ROOT-WIN-FN.FILE-OPEN-FN
37360	29 20 73 74 72 75 63 74 2e 22 29 0a 20 20 28 6c 61 79 6f 75 74 20 28 63 6f 6e 73 20 6e 69 6c 20	).struct.")...(layout.(cons.nil.
37380	64 69 72 76 69 73 68 2d 64 65 66 61 75 6c 74 2d 6c 61 79 6f 75 74 29 20 3a 64 6f 63 75 6d 65 6e	dirvish-default-layout).:documen
373a0	74 61 74 69 6f 6e 20 22 69 73 20 74 68 65 20 77 6f 72 6b 69 6e 67 20 6c 61 79 6f 75 74 73 2e 22	tation."is.the.working.layouts."
373c0	29 0a 20 20 28 6c 73 2d 73 77 69 74 63 68 65 73 20 64 69 72 65 64 2d 6c 69 73 74 69 6e 67 2d 73	)...(ls-switches.dired-listing-s
373e0	77 69 74 63 68 65 73 20 3a 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 22 69 73 20 74 68 65 20 6c	witches.:documentation."is.the.l
37400	69 73 74 69 6e 67 20 73 77 69 74 63 68 65 73 2e 22 29 0a 20 20 28 72 6f 6f 74 2d 77 69 6e 64 6f	isting.switches.")...(root-windo
37420	77 20 6e 69 6c 20 3a 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 22 69 73 20 74 68 65 20 6d 61 69	w.nil.:documentation."is.the.mai
37440	6e 20 77 69 6e 64 6f 77 20 63 72 65 61 74 65 64 20 62 79 20 52 4f 4f 54 2d 57 49 4e 44 4f 57 2d	n.window.created.by.ROOT-WINDOW-
37460	46 4e 2e 22 29 0a 20 20 28 73 63 6f 70 65 73 20 28 29 20 3a 64 6f 63 75 6d 65 6e 74 61 74 69 6f	FN.")...(scopes.().:documentatio
37480	6e 20 22 61 72 65 20 74 68 65 20 5c 22 65 6e 76 69 72 6f 6e 6d 65 6e 74 73 5c 22 20 73 75 63 68	n."are.the.\"environments\".such
374a0	20 61 73 20 69 6e 69 74 20 66 72 61 6d 65 20 6f 66 20 74 68 69 73 20 73 65 73 73 69 6f 6e 2e 22	.as.init.frame.of.this.session."
374c0	29 0a 20 20 28 70 72 65 76 69 65 77 2d 62 75 66 66 65 72 73 20 28 29 20 3a 64 6f 63 75 6d 65 6e	)...(preview-buffers.().:documen
374e0	74 61 74 69 6f 6e 20 22 68 6f 6c 64 73 20 61 6c 6c 20 66 69 6c 65 20 70 72 65 76 69 65 77 20 62	tation."holds.all.file.preview.b
37500	75 66 66 65 72 73 20 69 6e 20 74 68 69 73 20 73 65 73 73 69 6f 6e 2e 22 29 0a 20 20 28 70 72 65	uffers.in.this.session.")...(pre
37520	76 69 65 77 2d 77 69 6e 64 6f 77 20 6e 69 6c 20 3a 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 22	view-window.nil.:documentation."
37540	69 73 20 74 68 65 20 77 69 6e 64 6f 77 20 74 6f 20 64 69 73 70 6c 61 79 20 70 72 65 76 69 65 77	is.the.window.to.display.preview
37560	20 62 75 66 66 65 72 2e 22 29 0a 20 20 28 6e 61 6d 65 20 28 63 6c 2d 67 65 6e 73 79 6d 29 20 3a	.buffer.")...(name.(cl-gensym).:
37580	64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 22 69 73 20 61 6e 20 75 6e 69 71 75 65 20 73 79 6d 62	documentation."is.an.unique.symb
375a0	6f 6c 20 66 6f 72 20 65 76 65 72 79 20 73 65 73 73 69 6f 6e 2e 22 29 0a 20 20 28 77 69 6e 63 6f	ol.for.every.session.")...(winco
375c0	6e 66 20 28 63 75 72 72 65 6e 74 2d 77 69 6e 64 6f 77 2d 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e	nf.(current-window-configuration
375e0	29 20 3a 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 22 69 73 20 74 68 65 20 73 61 76 65 64 20 77	).:documentation."is.the.saved.w
37600	69 6e 64 6f 77 20 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e 2e 22 29 0a 20 20 28 69 6e 64 65 78 20	indow.configuration.")...(index.
37620	28 29 20 3a 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 22 69 73 20 61 20 28 44 49 52 20 2e 20 43	().:documentation."is.a.(DIR...C
37640	4f 52 52 45 53 50 4f 4e 44 49 4e 47 2d 42 55 46 46 45 52 29 20 63 6f 6e 73 20 6f 66 20 52 4f 4f	ORRESPONDING-BUFFER).cons.of.ROO
37660	54 2d 57 49 4e 44 4f 57 2e 22 29 0a 20 20 28 72 6f 6f 74 73 20 28 29 20 3a 64 6f 63 75 6d 65 6e	T-WINDOW.")...(roots.().:documen
37680	74 61 74 69 6f 6e 20 22 69 73 20 74 68 65 20 6c 69 73 74 20 6f 66 20 61 6c 6c 20 49 4e 44 45 58	tation."is.the.list.of.all.INDEX
376a0	73 2e 22 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 2d 66 69 6e 64 2d 72 65 75 73	s."))..(defun.dirvish--find-reus
376c0	61 62 6c 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20 74 79 70 65 29 0a 20 20 22 52 65 74 75 72 6e 20	able.(&optional.type)..."Return.
376e0	74 68 65 20 66 69 72 73 74 20 6d 61 74 63 68 65 64 20 72 65 75 73 61 62 6c 65 20 73 65 73 73 69	the.first.matched.reusable.sessi
37700	6f 6e 20 77 69 74 68 20 54 59 50 45 2e 22 0a 20 20 28 77 68 65 6e 20 64 69 72 76 69 73 68 2d 72	on.with.TYPE."...(when.dirvish-r
37720	65 75 73 65 2d 73 65 73 73 69 6f 6e 0a 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 77 69 74 68 20 73	euse-session.....(cl-loop.with.s
37740	63 6f 70 65 73 20 3d 20 28 64 69 72 76 69 73 68 2d 2d 73 63 6f 70 65 73 29 0a 20 20 20 20 20 20	copes.=.(dirvish--scopes).......
37760	20 20 20 20 20 20 20 66 6f 72 20 64 76 20 69 6e 20 28 68 61 73 68 2d 74 61 62 6c 65 2d 76 61 6c	.......for.dv.in.(hash-table-val
37780	75 65 73 20 64 69 72 76 69 73 68 2d 2d 73 65 73 73 69 6f 6e 2d 68 61 73 68 29 0a 20 20 20 20 20	ues.dirvish--session-hash)......
377a0	20 20 20 20 20 20 20 20 77 68 65 6e 20 28 61 6e 64 20 28 65 71 20 74 79 70 65 20 28 63 61 72 20	........when.(and.(eq.type.(car.
377c0	28 64 76 2d 74 79 70 65 20 64 76 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	(dv-type.dv)))..................
377e0	20 20 20 20 20 20 28 65 71 75 61 6c 20 28 64 76 2d 73 63 6f 70 65 73 20 64 76 29 20 73 63 6f 70	......(equal.(dv-scopes.dv).scop
37800	65 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 6c 6c 65 63 74 20 64 76 29 29 29 0a	es))..............collect.dv))).
37820	0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 6e 65 77 20 28 26 72 65 73 74 20 61 72 67 73 29	.(defun.dirvish-new.(&rest.args)
37840	0a 20 20 22 43 72 65 61 74 65 20 61 6e 64 20 73 61 76 65 20 61 20 6e 65 77 20 64 69 72 76 69 73	..."Create.and.save.a.new.dirvis
37860	68 20 73 74 72 75 63 74 20 74 6f 20 60 64 69 72 76 69 73 68 2d 2d 73 65 73 73 69 6f 6e 2d 68 61	h.struct.to.`dirvish--session-ha
37880	73 68 27 2e 0a 41 52 47 53 20 69 73 20 61 20 6c 69 73 74 20 6f 66 20 6b 65 79 77 6f 72 64 20 61	sh'..ARGS.is.a.list.of.keyword.a
378a0	72 67 75 6d 65 6e 74 73 20 66 6f 72 20 60 64 69 72 76 69 73 68 27 20 73 74 72 75 63 74 2e 22 0a	rguments.for.`dirvish'.struct.".
378c0	20 20 28 6c 65 74 20 28 73 6c 6f 74 73 20 6e 65 77 29 0a 20 20 20 20 28 77 68 69 6c 65 20 28 6b	..(let.(slots.new).....(while.(k
378e0	65 79 77 6f 72 64 70 20 28 63 61 72 20 61 72 67 73 29 29 20 28 64 6f 74 69 6d 65 73 20 28 5f 20	eywordp.(car.args)).(dotimes.(_.
37900	32 29 20 28 70 75 73 68 20 28 70 6f 70 20 61 72 67 73 29 20 73 6c 6f 74 73 29 29 29 0a 20 20 20	2).(push.(pop.args).slots)))....
37920	20 28 73 65 74 71 20 6e 65 77 20 28 61 70 70 6c 79 20 23 27 6d 61 6b 65 2d 64 69 72 76 69 73 68	.(setq.new.(apply.#'make-dirvish
37940	20 28 72 65 76 65 72 73 65 20 73 6c 6f 74 73 29 29 20 64 69 72 76 69 73 68 2d 2d 74 68 69 73 20	.(reverse.slots)).dirvish--this.
37960	6e 65 77 29 0a 20 20 20 20 28 70 75 74 68 61 73 68 20 28 64 76 2d 6e 61 6d 65 20 6e 65 77 29 20	new).....(puthash.(dv-name.new).
37980	6e 65 77 20 64 69 72 76 69 73 68 2d 2d 73 65 73 73 69 6f 6e 2d 68 61 73 68 29 0a 20 20 20 20 28	new.dirvish--session-hash).....(
379a0	64 69 72 76 69 73 68 2d 2d 63 68 65 63 6b 2d 64 65 70 73 29 0a 20 20 20 20 28 64 69 72 76 69 73	dirvish--check-deps).....(dirvis
379c0	68 2d 2d 63 72 65 61 74 65 2d 72 6f 6f 74 2d 77 69 6e 64 6f 77 20 6e 65 77 29 20 6e 65 77 29 29	h--create-root-window.new).new))
379e0	0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 6b 69 6c 6c 20 28 64 76 29 0a 20 20 22 4b 69	..(defun.dirvish-kill.(dv)..."Ki
37a00	6c 6c 20 74 68 65 20 64 69 72 76 69 73 68 20 69 6e 73 74 61 6e 63 65 20 44 56 2e 22 0a 20 20 28	ll.the.dirvish.instance.DV."...(
37a20	6c 65 74 20 28 28 69 6e 64 65 78 20 28 63 64 72 20 28 64 76 2d 69 6e 64 65 78 20 64 76 29 29 29	let.((index.(cdr.(dv-index.dv)))
37a40	29 0a 20 20 20 20 28 69 66 20 28 6e 6f 74 20 28 63 61 72 20 28 64 76 2d 6c 61 79 6f 75 74 20 64	).....(if.(not.(car.(dv-layout.d
37a60	76 29 29 29 0a 20 20 20 20 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 28 5f 64 20 2e 20	v))).........(cl-loop.for.(_d...
37a80	62 29 20 69 6e 20 28 64 76 2d 72 6f 6f 74 73 20 64 76 29 20 77 68 65 6e 0a 20 20 20 20 20 20 20	b).in.(dv-roots.dv).when........
37aa0	20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 67 65 74 2d 62 75 66 66 65 72 2d 77 69 6e 64 6f	..........(not.(get-buffer-windo
37ac0	77 20 62 29 29 20 64 6f 20 28 6b 69 6c 6c 2d 62 75 66 66 65 72 20 62 29 0a 20 20 20 20 20 20 20	w.b)).do.(kill-buffer.b)........
37ae0	20 20 20 20 20 20 20 20 20 20 66 69 6e 61 6c 6c 79 20 28 73 65 74 66 20 28 64 76 2d 69 6e 64 65	..........finally.(setf.(dv-inde
37b00	78 20 64 76 29 20 28 63 61 72 20 28 64 76 2d 72 6f 6f 74 73 20 64 76 29 29 29 29 0a 20 20 20 20	x.dv).(car.(dv-roots.dv)))).....
37b20	20 20 28 77 68 65 6e 20 64 69 72 76 69 73 68 2d 75 73 65 2d 68 65 61 64 65 72 2d 6c 69 6e 65 0a	..(when.dirvish-use-header-line.
37b40	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 69 6e 64	........(with-current-buffer.ind
37b60	65 78 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 68 65 61 64 65 72 2d 6c 69 6e 65 2d 66	ex...........(setq.header-line-f
37b80	6f 72 6d 61 74 20 64 69 72 76 69 73 68 2d 2d 68 65 61 64 65 72 2d 6c 69 6e 65 2d 66 6d 74 29 29	ormat.dirvish--header-line-fmt))
37ba0	29 0a 20 20 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 28 5f 64 20 2e 20 62 29 20 69 6e	).......(cl-loop.for.(_d...b).in
37bc0	20 28 64 76 2d 72 6f 6f 74 73 20 64 76 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 68	.(dv-roots.dv)................wh
37be0	65 6e 20 28 6e 6f 74 20 28 65 71 20 62 20 69 6e 64 65 78 29 29 20 64 6f 20 28 6b 69 6c 6c 2d 62	en.(not.(eq.b.index)).do.(kill-b
37c00	75 66 66 65 72 20 62 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 2d 6c 65 74 20 28 28 77 63 6f 6e	uffer.b)).......(when-let.((wcon
37c20	66 20 28 64 76 2d 77 69 6e 63 6f 6e 66 20 64 76 29 29 29 20 28 73 65 74 2d 77 69 6e 64 6f 77 2d	f.(dv-winconf.dv))).(set-window-
37c40	63 6f 6e 66 69 67 75 72 61 74 69 6f 6e 20 77 63 6f 6e 66 29 29 29 0a 20 20 20 20 28 6d 61 70 63	configuration.wconf))).....(mapc
37c60	20 23 27 64 69 72 76 69 73 68 2d 2d 6b 69 6c 6c 2d 62 75 66 66 65 72 20 28 64 76 2d 70 72 65 76	.#'dirvish--kill-buffer.(dv-prev
37c80	69 65 77 2d 62 75 66 66 65 72 73 20 64 76 29 29 0a 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f	iew-buffers.dv)).....(cl-loop.fo
37ca0	72 20 62 20 69 6e 20 28 62 75 66 66 65 72 2d 6c 69 73 74 29 20 66 6f 72 20 62 6e 20 3d 20 28 62	r.b.in.(buffer-list).for.bn.=.(b
37cc0	75 66 66 65 72 2d 6e 61 6d 65 20 62 29 20 77 68 65 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	uffer-name.b).when..............
37ce0	28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 28 66 6f 72 6d 61 74 20 22 20 3f 5c 5c 2a 44 69	(string-match-p.(format.".?\\*Di
37d00	72 76 69 73 68 2d 2e 2a 2d 25 73 5c 5c 2a 22 20 28 64 76 2d 6e 61 6d 65 20 64 76 29 29 20 62 6e	rvish-.-%s\\".(dv-name.dv)).bn
37d20	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 64 6f 20 28 64 69 72 76 69 73 68 2d 2d 6b 69 6c 6c	)..............do.(dirvish--kill
37d40	2d 62 75 66 66 65 72 20 62 29 29 0a 20 20 20 20 28 73 65 74 71 20 64 69 72 76 69 73 68 2d 2d 70	-buffer.b)).....(setq.dirvish--p
37d60	61 72 65 6e 74 2d 68 61 73 68 20 28 6d 61 6b 65 2d 68 61 73 68 2d 74 61 62 6c 65 20 3a 74 65 73	arent-hash.(make-hash-table.:tes
37d80	74 20 23 27 65 71 75 61 6c 29 29 0a 20 20 20 20 28 63 6f 6e 64 20 28 64 69 72 76 69 73 68 2d 72	t.#'equal)).....(cond.(dirvish-r
37da0	65 75 73 65 2d 73 65 73 73 69 6f 6e 20 28 73 65 74 66 20 28 64 76 2d 77 69 6e 63 6f 6e 66 20 64	euse-session.(setf.(dv-winconf.d
37dc0	76 29 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 74 20 28 6d 61 70 63 20 28 70 63 61	v).nil))...........(t.(mapc.(pca
37de0	73 65 2d 6c 61 6d 62 64 61 20 28 60 28 2c 5f 20 2e 20 2c 62 29 29 20 28 6b 69 6c 6c 2d 62 75 66	se-lambda.(`(,_...,b)).(kill-buf
37e00	66 65 72 20 62 29 29 20 28 64 76 2d 72 6f 6f 74 73 20 64 76 29 29 29 29 0a 20 20 20 20 28 73 65	fer.b)).(dv-roots.dv)))).....(se
37e20	74 71 20 64 69 72 76 69 73 68 2d 2d 74 68 69 73 20 6e 69 6c 29 29 29 0a 0a 28 64 65 66 75 6e 20	tq.dirvish--this.nil)))..(defun.
37e40	64 69 72 76 69 73 68 2d 2d 63 72 65 61 74 65 2d 72 6f 6f 74 2d 77 69 6e 64 6f 77 20 28 64 76 29	dirvish--create-root-window.(dv)
37e60	0a 20 20 22 43 72 65 61 74 65 20 72 6f 6f 74 20 77 69 6e 64 6f 77 20 6f 66 20 44 56 2e 22 0a 20	..."Create.root.window.of.DV."..
37e80	20 28 6c 65 74 2a 20 28 28 66 6e 20 28 6f 72 20 28 6e 74 68 20 33 20 28 64 76 2d 74 79 70 65 20	.(let*.((fn.(or.(nth.3.(dv-type.
37ea0	64 76 29 29 20 27 66 72 61 6d 65 2d 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 29 29 20 28 77	dv)).'frame-selected-window)).(w
37ec0	20 28 66 75 6e 63 61 6c 6c 20 66 6e 29 29 29 0a 20 20 20 20 28 73 65 74 66 20 28 64 76 2d 72 6f	.(funcall.fn))).....(setf.(dv-ro
37ee0	6f 74 2d 77 69 6e 64 6f 77 20 64 76 29 20 77 29 20 77 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72	ot-window.dv).w).w))..(defun.dir
37f00	76 69 73 68 2d 2d 70 72 65 76 69 65 77 2d 64 70 73 2d 76 61 6c 69 64 61 74 65 20 28 26 6f 70 74	vish--preview-dps-validate.(&opt
37f20	69 6f 6e 61 6c 20 64 70 73 29 0a 20 20 22 43 68 65 63 6b 20 69 66 20 74 68 65 20 72 65 71 75 69	ional.dps)..."Check.if.the.requi
37f40	72 65 6d 65 6e 74 73 20 6f 66 20 64 69 73 70 61 74 63 68 65 72 73 20 44 50 53 20 61 72 65 20 6d	rements.of.dispatchers.DPS.are.m
37f60	65 74 2e 22 0a 20 20 28 63 6c 2d 6c 6f 6f 70 20 77 69 74 68 20 64 70 73 20 3d 20 28 6f 72 20 64	et."...(cl-loop.with.dps.=.(or.d
37f80	70 73 20 64 69 72 76 69 73 68 2d 70 72 65 76 69 65 77 2d 64 69 73 70 61 74 63 68 65 72 73 29 0a	ps.dirvish-preview-dispatchers).
37fa0	20 20 20 20 20 20 20 20 20 20 20 77 69 74 68 20 72 65 73 20 3d 20 28 70 72 6f 67 31 20 27 28 29	...........with.res.=.(prog1.'()
37fc0	20 28 72 65 71 75 69 72 65 20 27 72 65 63 65 6e 74 66 29 20 28 72 65 71 75 69 72 65 20 27 61 6e	.(require.'recentf).(require.'an
37fe0	73 69 2d 63 6f 6c 6f 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 77 69 74 68 20 66 6d 74 20 3d	si-color))............with.fmt.=
38000	20 22 5b 44 69 72 76 69 73 68 5d 3a 20 69 6e 73 74 61 6c 6c 20 27 25 73 27 20 65 78 65 63 75 74	."[Dirvish]:.install.'%s'.execut
38020	61 62 6c 65 20 74 6f 20 70 72 65 76 69 65 77 20 25 73 20 66 69 6c 65 73 2e 22 0a 20 20 20 20 20	able.to.preview.%s.files."......
38040	20 20 20 20 20 20 66 6f 72 20 64 70 20 69 6e 20 28 61 70 70 65 6e 64 20 27 28 64 69 73 61 62 6c	......for.dp.in.(append.'(disabl
38060	65 29 20 64 70 73 20 27 28 64 65 66 61 75 6c 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 66 6f	e).dps.'(default))............fo
38080	72 20 69 6e 66 6f 20 3d 20 28 61 6c 69 73 74 2d 67 65 74 20 64 70 20 64 69 72 76 69 73 68 2d 2d	r.info.=.(alist-get.dp.dirvish--
380a0	61 76 61 69 6c 61 62 6c 65 2d 70 72 65 76 69 65 77 2d 64 69 73 70 61 74 63 68 65 72 73 29 0a 20	available-preview-dispatchers)..
380c0	20 20 20 20 20 20 20 20 20 20 66 6f 72 20 72 65 71 75 69 72 65 6d 65 6e 74 73 20 3d 20 28 70 6c	..........for.requirements.=.(pl
380e0	69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 72 65 71 75 69 72 65 29 0a 20 20 20 20 20 20 20 20 20	ist-get.info.:require)..........
38100	20 20 66 6f 72 20 6d 65 74 20 3d 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 64 6f 20 28 70 72 6f	..for.met.=.t............do.(pro
38120	67 6e 20 28 64 6f 6c 69 73 74 20 28 70 6b 67 20 72 65 71 75 69 72 65 6d 65 6e 74 73 29 0a 20 20	gn.(dolist.(pkg.requirements)...
38140	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 65 78	.....................(unless.(ex
38160	65 63 75 74 61 62 6c 65 2d 66 69 6e 64 20 70 6b 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	ecutable-find.pkg)..............
38180	20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 66 6d 74 20 70 6b 67 20 64 70 29	............(message.fmt.pkg.dp)
381a0	20 28 73 65 74 71 20 6d 65 74 20 6e 69 6c 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.(setq.met.nil)))...............
381c0	20 20 20 20 20 20 20 28 77 68 65 6e 20 6d 65 74 20 28 70 75 73 68 20 28 69 6e 74 65 72 6e 20 28	.......(when.met.(push.(intern.(
381e0	66 6f 72 6d 61 74 20 22 64 69 72 76 69 73 68 2d 25 73 2d 64 70 22 20 64 70 29 29 20 72 65 73 29	format."dirvish-%s-dp".dp)).res)
38200	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 66 69 6e 61 6c 6c 79 20 72 65 74 75 72 6e 20 28 72 65	))............finally.return.(re
38220	76 65 72 73 65 20 72 65 73 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 2d 61 74	verse.res)))..(defun.dirvish--at
38240	74 72 73 2d 65 78 70 61 6e 64 20 28 61 74 74 72 73 29 0a 20 20 22 45 78 70 61 6e 64 20 41 54 54	trs-expand.(attrs)..."Expand.ATT
38260	52 53 20 74 6f 20 60 64 69 72 76 69 73 68 2d 2d 77 6f 72 6b 69 6e 67 2d 61 74 74 72 73 27 2e 22	RS.to.`dirvish--working-attrs'."
38280	0a 20 20 28 73 6f 72 74 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 61 74 74 72 20 69 6e 20 61 74	...(sort.(cl-loop.for.attr.in.at
382a0	74 72 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 6c 73 74 20 3d 20 28	trs..................for.lst.=.(
382c0	61 6c 69 73 74 2d 67 65 74 20 61 74 74 72 20 64 69 72 76 69 73 68 2d 2d 61 76 61 69 6c 61 62 6c	alist-get.attr.dirvish--availabl
382e0	65 2d 61 74 74 72 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 28 69	e-attrs)..................for.(i
38300	64 78 20 77 69 64 74 68 20 70 72 65 64 20 72 65 6e 64 65 72 20 6f 76 20 5f 29 20 3d 20 6c 73 74	dx.width.pred.render.ov._).=.lst
38320	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 6c 6c 65 63 74 20 28 6c 69 73 74 20	..................collect.(list.
38340	69 64 78 20 28 65 76 61 6c 20 77 69 64 74 68 29 20 70 72 65 64 20 72 65 6e 64 65 72 20 6f 76 29	idx.(eval.width).pred.render.ov)
38360	29 0a 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 61 20 62 29 20 28 3c 20 28 63 61 72 20	).........(lambda.(a.b).(<.(car.
38380	61 29 20 28 63 61 72 20 62 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 2d	a).(car.b)))))..(defun.dirvish--
383a0	63 68 65 63 6b 2d 64 65 70 73 20 28 29 0a 20 20 22 52 65 6d 6f 76 65 20 69 6e 76 61 6c 69 64 20	check-deps.()..."Remove.invalid.
383c0	77 69 64 67 65 74 73 2c 20 72 61 69 73 65 20 77 61 72 6e 69 6e 67 73 20 66 6f 72 20 6d 69 73 73	widgets,.raise.warnings.for.miss
383e0	69 6e 67 20 64 65 70 65 6e 64 65 6e 63 69 65 73 2e 22 0a 20 20 28 63 6c 2d 6c 6f 6f 70 0a 20 20	ing.dependencies."...(cl-loop...
38400	20 77 69 74 68 20 28 6d 20 2e 20 68 29 20 3d 20 28 63 6f 6e 73 20 64 69 72 76 69 73 68 2d 6d 6f	.with.(m...h).=.(cons.dirvish-mo
38420	64 65 2d 6c 69 6e 65 2d 66 6f 72 6d 61 74 20 64 69 72 76 69 73 68 2d 68 65 61 64 65 72 2d 6c 69	de-line-format.dirvish-header-li
38440	6e 65 2d 66 6f 72 6d 61 74 29 0a 20 20 20 77 69 74 68 20 28 6d 6c 2d 6c 20 2e 20 6d 6c 2d 72 29	ne-format)....with.(ml-l...ml-r)
38460	20 3d 20 28 63 6f 6e 73 20 28 70 6c 69 73 74 2d 67 65 74 20 6d 20 3a 6c 65 66 74 29 20 28 70 6c	.=.(cons.(plist-get.m.:left).(pl
38480	69 73 74 2d 67 65 74 20 6d 20 3a 72 69 67 68 74 29 29 0a 20 20 20 77 69 74 68 20 28 68 6c 2d 6c	ist-get.m.:right))....with.(hl-l
384a0	20 2e 20 68 6c 2d 72 29 20 3d 20 28 63 6f 6e 73 20 28 70 6c 69 73 74 2d 67 65 74 20 68 20 3a 6c	...hl-r).=.(cons.(plist-get.h.:l
384c0	65 66 74 29 20 28 70 6c 69 73 74 2d 67 65 74 20 68 20 3a 72 69 67 68 74 29 29 0a 20 20 20 77 69	eft).(plist-get.h.:right))....wi
384e0	74 68 20 66 65 61 74 2d 72 65 71 73 20 3d 20 28 61 70 70 65 6e 64 20 64 69 72 76 69 73 68 2d 70	th.feat-reqs.=.(append.dirvish-p
38500	72 65 76 69 65 77 2d 64 69 73 70 61 74 63 68 65 72 73 20 6d 6c 2d 6c 20 6d 6c 2d 72 20 68 6c 2d	review-dispatchers.ml-l.ml-r.hl-
38520	6c 20 68 6c 2d 72 29 0a 20 20 20 77 69 74 68 20 61 74 74 72 73 20 3d 20 27 28 68 6c 2d 6c 69 6e	l.hl-r)....with.attrs.=.'(hl-lin
38540	65 20 73 79 6d 6c 69 6e 6b 2d 74 61 72 67 65 74 29 0a 20 20 20 66 6f 72 20 28 6c 69 62 20 2e 20	e.symlink-target)....for.(lib...
38560	66 65 61 74 29 20 69 6e 20 64 69 72 76 69 73 68 2d 6c 69 62 72 61 72 69 65 73 20 64 6f 0a 20 20	feat).in.dirvish-libraries.do...
38580	20 28 6c 65 74 20 28 28 6d 2d 61 74 74 72 20 28 63 6c 2d 69 6e 74 65 72 73 65 63 74 69 6f 6e 20	.(let.((m-attr.(cl-intersection.
385a0	66 65 61 74 20 64 69 72 76 69 73 68 2d 61 74 74 72 69 62 75 74 65 73 29 29 0a 20 20 20 20 20 20	feat.dirvish-attributes)).......
385c0	20 20 20 28 66 65 61 74 2d 69 6e 2d 6c 69 62 20 28 63 6c 2d 69 6e 74 65 72 73 65 63 74 69 6f 6e	...(feat-in-lib.(cl-intersection
385e0	20 66 65 61 74 20 66 65 61 74 2d 72 65 71 73 29 29 29 0a 20 20 20 20 20 28 77 68 65 6e 20 28 6f	.feat.feat-reqs)))......(when.(o
38600	72 20 6d 2d 61 74 74 72 20 66 65 61 74 2d 69 6e 2d 6c 69 62 29 20 28 72 65 71 75 69 72 65 20 6c	r.m-attr.feat-in-lib).(require.l
38620	69 62 29 29 0a 20 20 20 20 20 28 61 6e 64 20 6d 2d 61 74 74 72 20 28 73 65 74 71 20 61 74 74 72	ib))......(and.m-attr.(setq.attr
38640	73 20 28 61 70 70 65 6e 64 20 61 74 74 72 73 20 6d 2d 61 74 74 72 29 29 29 29 0a 20 20 20 66 69	s.(append.attrs.m-attr))))....fi
38660	6e 61 6c 6c 79 0a 20 20 20 28 73 65 74 66 20 64 69 72 76 69 73 68 2d 2d 6d 6f 64 65 2d 6c 69 6e	nally....(setf.dirvish--mode-lin
38680	65 2d 66 6d 74 20 28 64 69 72 76 69 73 68 2d 2d 6d 6f 64 65 2d 6c 69 6e 65 2d 66 6d 74 2d 73 65	e-fmt.(dirvish--mode-line-fmt-se
386a0	74 74 65 72 20 6d 6c 2d 6c 20 6d 6c 2d 72 29 29 0a 20 20 20 28 73 65 74 66 20 64 69 72 76 69 73	tter.ml-l.ml-r))....(setf.dirvis
386c0	68 2d 2d 68 65 61 64 65 72 2d 6c 69 6e 65 2d 66 6d 74 20 28 64 69 72 76 69 73 68 2d 2d 6d 6f 64	h--header-line-fmt.(dirvish--mod
386e0	65 2d 6c 69 6e 65 2d 66 6d 74 2d 73 65 74 74 65 72 20 68 6c 2d 6c 20 68 6c 2d 72 20 74 29 29 0a	e-line-fmt-setter.hl-l.hl-r.t)).
38700	20 20 20 28 73 65 74 66 20 64 69 72 76 69 73 68 2d 2d 77 6f 72 6b 69 6e 67 2d 70 72 65 76 69 65	...(setf.dirvish--working-previe
38720	77 2d 64 69 73 70 61 74 68 63 68 65 72 73 20 28 64 69 72 76 69 73 68 2d 2d 70 72 65 76 69 65 77	w-dispathchers.(dirvish--preview
38740	2d 64 70 73 2d 76 61 6c 69 64 61 74 65 29 29 0a 20 20 20 28 73 65 74 66 20 64 69 72 76 69 73 68	-dps-validate))....(setf.dirvish
38760	2d 2d 77 6f 72 6b 69 6e 67 2d 61 74 74 72 73 20 28 64 69 72 76 69 73 68 2d 2d 61 74 74 72 73 2d	--working-attrs.(dirvish--attrs-
38780	65 78 70 61 6e 64 20 61 74 74 72 73 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68	expand.attrs))))..(defun.dirvish
387a0	2d 2d 72 65 6e 64 65 72 2d 61 74 74 72 73 2d 31 20 28 68 65 69 67 68 74 20 77 69 64 74 68 20 70	--render-attrs-1.(height.width.p
387c0	6f 73 20 72 65 6d 6f 74 65 20 66 6e 73 20 6f 76 20 61 6c 69 67 6e 2d 74 6f 29 0a 20 20 22 48 45	os.remote.fns.ov.align-to)..."HE
387e0	49 47 48 54 20 57 49 44 54 48 20 50 4f 53 20 52 45 4d 4f 54 45 20 46 4e 53 20 4f 56 20 41 4c 49	IGHT.WIDTH.POS.REMOTE.FNS.OV.ALI
38800	47 4e 2d 54 4f 2e 22 0a 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 28 2d 20 30 20 68 65 69	GN-TO."...(forward-line.(-.0.hei
38820	67 68 74 29 29 0a 20 20 28 63 6c 2d 64 6f 74 69 6d 65 73 20 28 5f 20 28 2a 20 28 69 66 20 28 65	ght))...(cl-dotimes.(_.(*.(if.(e
38840	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 20 32 20 35 29 20 68	q.major-mode.'dired-mode).2.5).h
38860	65 69 67 68 74 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 65 6f 62 70 29 20 28 63 6c 2d 72 65 74	eight)).....(when.(eobp).(cl-ret
38880	75 72 6e 29 29 0a 20 20 20 20 28 6c 65 74 20 28 28 66 2d 62 65 67 20 28 64 69 72 65 64 2d 6d 6f	urn)).....(let.((f-beg.(dired-mo
388a0	76 65 2d 74 6f 2d 66 69 6c 65 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 2d 65 6e	ve-to-filename))...........(f-en
388c0	64 20 28 64 69 72 65 64 2d 6d 6f 76 65 2d 74 6f 2d 65 6e 64 2d 6f 66 2d 66 69 6c 65 6e 61 6d 65	d.(dired-move-to-end-of-filename
388e0	20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c 2d 62 65 67 20 28 6c 69 6e 65 2d 62 65 67 69	.t))...........(l-beg.(line-begi
38900	6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 29 29 20 28 6c 2d 65 6e 64 20 28 6c 69 6e 65 2d 65 6e	nning-position)).(l-end.(line-en
38920	64 2d 70 6f 73 69 74 69 6f 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 2d 77 69 64 20 30 29	d-position))...........(f-wid.0)
38940	20 66 2d 73 74 72 20 66 2d 6e 61 6d 65 20 66 2d 61 74 74 72 73 20 66 2d 74 79 70 65 20 68 6c 2d	.f-str.f-name.f-attrs.f-type.hl-
38960	66 61 63 65 20 6c 65 66 74 20 72 69 67 68 74 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 68 6c 2d	face.left.right).......(setq.hl-
38980	66 61 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 65 71 20 28 6f 72 20 66 2d	face.............(and.(eq.(or.f-
389a0	62 65 67 20 6c 2d 62 65 67 29 20 70 6f 73 29 20 64 69 72 76 69 73 68 2d 68 69 64 65 2d 63 75 72	beg.l-beg).pos).dirvish-hide-cur
389c0	73 6f 72 20 27 64 69 72 76 69 73 68 2d 68 6c 2d 6c 69 6e 65 29 29 0a 20 20 20 20 20 20 28 77 68	sor.'dirvish-hl-line)).......(wh
389e0	65 6e 20 66 2d 62 65 67 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 66 2d 73 74 72 20 28 62 75	en.f-beg.........(setq.f-str.(bu
38a00	66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 20 66 2d 62 65 67 20 66 2d 65 6e 64 29 0a 20 20 20 20	ffer-substring.f-beg.f-end).....
38a20	20 20 20 20 20 20 20 20 20 20 66 2d 77 69 64 20 28 73 74 72 69 6e 67 2d 77 69 64 74 68 20 66 2d	..........f-wid.(string-width.f-
38a40	73 74 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 2d 6e 61 6d 65 20 28 63 6f 6e 63 61	str)...............f-name.(conca
38a60	74 20 28 64 69 72 65 64 2d 63 75 72 72 65 6e 74 2d 64 69 72 65 63 74 6f 72 79 29 20 66 2d 73 74	t.(dired-current-directory).f-st
38a80	72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 2d 61 74 74 72 73 20 28 64 69 72 76 69 73	r)...............f-attrs.(dirvis
38aa0	68 2d 61 74 74 72 69 62 75 74 65 2d 63 61 63 68 65 20 66 2d 6e 61 6d 65 20 3a 62 75 69 6c 74 69	h-attribute-cache.f-name.:builti
38ac0	6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73	n.........................(unles
38ae0	73 20 72 65 6d 6f 74 65 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 73 20 66 2d 6e 61 6d 65	s.remote.(file-attributes.f-name
38b00	29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 2d 74 79 70 65 20 28 64 69 72 76 69 73	)))...............f-type.(dirvis
38b20	68 2d 61 74 74 72 69 62 75 74 65 2d 63 61 63 68 65 20 66 2d 6e 61 6d 65 20 3a 74 79 70 65 0a 20	h-attribute-cache.f-name.:type..
38b40	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 63 68 20	......................(let.((ch.
38b60	28 70 72 6f 67 6e 20 28 62 61 63 6b 2d 74 6f 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 29 20 28 63 68	(progn.(back-to-indentation).(ch
38b80	61 72 2d 61 66 74 65 72 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ar-after))))....................
38ba0	20 20 20 20 20 20 60 28 2c 28 69 66 20 28 65 71 20 63 68 20 31 30 30 29 20 27 64 69 72 20 27 66	......`(,(if.(eq.ch.100).'dir.'f
38bc0	69 6c 65 29 20 2e 20 6e 69 6c 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28	ile)...nil)))).........(unless.(
38be0	67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 66 2d 62 65 67 20 27 6d 6f 75 73 65 2d 66	get-text-property.f-beg.'mouse-f
38c00	61 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 69 6e 73 65 72 74 2d 73 65 74	ace)...........(dired-insert-set
38c20	2d 70 72 6f 70 65 72 74 69 65 73 20 6c 2d 62 65 67 20 6c 2d 65 6e 64 29 29 29 0a 20 20 20 20 20	-properties.l-beg.l-end)))......
38c40	20 28 63 6c 2d 6c 6f 6f 70 0a 20 20 20 20 20 20 20 66 6f 72 20 66 6e 20 69 6e 20 28 69 66 20 66	.(cl-loop........for.fn.in.(if.f
38c60	2d 62 65 67 20 66 6e 73 20 27 28 64 69 72 76 69 73 68 2d 61 74 74 72 69 62 75 74 65 2d 68 6c 2d	-beg.fns.'(dirvish-attribute-hl-
38c80	6c 69 6e 65 2d 72 64 29 29 0a 20 20 20 20 20 20 20 66 6f 72 20 28 6b 20 2e 20 76 29 20 3d 20 28	line-rd))........for.(k...v).=.(
38ca0	66 75 6e 63 61 6c 6c 20 66 6e 20 66 2d 62 65 67 20 66 2d 65 6e 64 20 66 2d 73 74 72 20 66 2d 6e	funcall.fn.f-beg.f-end.f-str.f-n
38cc0	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 20 20 20 20 20 20	ame.............................
38ce0	20 20 66 2d 61 74 74 72 73 20 66 2d 74 79 70 65 20 6c 2d 62 65 67 20 6c 2d 65 6e 64 20 68 6c 2d	..f-attrs.f-type.l-beg.l-end.hl-
38d00	66 61 63 65 29 0a 20 20 20 20 20 20 20 64 6f 20 28 70 63 61 73 65 20 6b 20 28 27 6f 76 20 28 6f	face)........do.(pcase.k.('ov.(o
38d20	76 65 72 6c 61 79 2d 70 75 74 20 76 20 6f 76 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	verlay-put.v.ov.t)).............
38d40	20 20 20 20 20 28 27 6c 65 66 74 20 28 73 65 74 71 20 6c 65 66 74 20 28 63 6f 6e 63 61 74 20 76	.....('left.(setq.left.(concat.v
38d60	20 6c 65 66 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 72 69 67 68	.left)))..................('righ
38d80	74 20 28 73 65 74 71 20 72 69 67 68 74 20 28 63 6f 6e 63 61 74 20 76 20 72 69 67 68 74 29 29 29	t.(setq.right.(concat.v.right)))
38da0	29 0a 20 20 20 20 20 20 20 66 69 6e 61 6c 6c 79 0a 20 20 20 20 20 20 20 28 70 72 6f 67 31 20 28	)........finally........(prog1.(
38dc0	75 6e 6c 65 73 73 20 28 6f 72 20 6c 65 66 74 20 72 69 67 68 74 29 20 28 63 6c 2d 72 65 74 75 72	unless.(or.left.right).(cl-retur
38de0	6e 29 29 0a 20 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 6c 65 6e 31 20 28 6c 65 6e 67 74	n))..........(let*.((len1.(lengt
38e00	68 20 72 69 67 68 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 6d 61 69	h.right)).................(remai
38e20	6e 20 28 2d 20 77 69 64 74 68 20 6c 65 6e 31 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	n.(-.width.len1.................
38e40	20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74	...........(or.(get-text-propert
38e60	79 20 6c 2d 62 65 67 20 27 6c 69 6e 65 2d 70 72 65 66 69 78 29 20 30 29 29 29 0a 20 20 20 20 20	y.l-beg.'line-prefix).0)))......
38e80	20 20 20 20 20 20 20 20 20 20 20 28 6c 65 6e 32 20 28 6d 69 6e 20 28 6c 65 6e 67 74 68 20 6c 65	...........(len2.(min.(length.le
38ea0	66 74 29 20 28 6d 61 78 20 30 20 28 2d 20 72 65 6d 61 69 6e 20 66 2d 77 69 64 20 31 29 29 29 29	ft).(max.0.(-.remain.f-wid.1))))
38ec0	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 76 6c 20 28 6d 61 6b 65 2d 6f 76 65 72	.................(ovl.(make-over
38ee0	6c 61 79 20 66 2d 65 6e 64 20 66 2d 65 6e 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	lay.f-end.f-end))...............
38f00	20 20 28 72 2d 70 6f 73 20 28 69 66 20 28 3e 20 72 65 6d 61 69 6e 20 66 2d 77 69 64 29 20 6c 2d	..(r-pos.(if.(>.remain.f-wid).l-
38f20	65 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65	end..........................(le
38f40	74 20 28 28 65 6e 64 20 28 2b 20 66 2d 62 65 67 20 72 65 6d 61 69 6e 29 29 0a 20 20 20 20 20 20	t.((end.(+.f-beg.remain)).......
38f60	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 66 66 73 65 74	.........................(offset
38f80	20 28 2d 20 66 2d 77 69 64 20 28 6c 65 6e 67 74 68 20 66 2d 73 74 72 29 29 29 29 0a 20 20 20 20	.(-.f-wid.(length.f-str)))).....
38fa0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2d 20 65 6e 64 20 6f 66	.......................(-.end.of
38fc0	66 73 65 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 70 65 63 20 60	fset)))).................(spec.`
38fe0	28 73 70 61 63 65 20 3a 61 6c 69 67 6e 2d 74 6f 20 28 2d 20 72 69 67 68 74 2d 66 72 69 6e 67 65	(space.:align-to.(-.right-fringe
39000	20 2c 6c 65 6e 31 20 2c 61 6c 69 67 6e 2d 74 6f 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	.,len1.,align-to))).............
39020	20 20 20 20 28 73 70 63 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 20 22 20 27 64 69 73 70 6c 61	....(spc.(propertize.".".'displa
39040	79 20 73 70 65 63 20 27 66 61 63 65 20 68 6c 2d 66 61 63 65 29 29 0a 20 20 20 20 20 20 20 20 20	y.spec.'face.hl-face))..........
39060	20 20 20 20 20 20 20 28 6f 76 72 20 28 6d 61 6b 65 2d 6f 76 65 72 6c 61 79 20 72 2d 70 6f 73 20	.......(ovr.(make-overlay.r-pos.
39080	72 2d 70 6f 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74	r-pos)))............(overlay-put
390a0	20 6f 76 6c 20 27 64 69 72 76 69 73 68 2d 6c 2d 65 6e 64 2d 6f 76 20 74 29 0a 20 20 20 20 20 20	.ovl.'dirvish-l-end-ov.t).......
390c0	20 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 76 6c 20 27 61 66 74 65 72 2d 73 74 72	.....(overlay-put.ovl.'after-str
390e0	69 6e 67 20 28 73 75 62 73 74 72 69 6e 67 20 28 6f 72 20 6c 65 66 74 20 22 22 29 20 30 20 6c 65	ing.(substring.(or.left."").0.le
39100	6e 32 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 76 72	n2))............(overlay-put.ovr
39120	20 27 64 69 72 76 69 73 68 2d 72 2d 65 6e 64 2d 6f 76 20 74 29 0a 20 20 20 20 20 20 20 20 20 20	.'dirvish-r-end-ov.t)...........
39140	20 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 76 72 20 27 61 66 74 65 72 2d 73 74 72 69 6e 67 20	.(overlay-put.ovr.'after-string.
39160	28 63 6f 6e 63 61 74 20 73 70 63 20 72 69 67 68 74 29 29 29 29 29 29 0a 20 20 20 20 28 66 6f 72	(concat.spc.right)))))).....(for
39180	77 61 72 64 2d 6c 69 6e 65 20 31 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 2d	ward-line.1)))..(defun.dirvish--
391a0	72 65 6e 64 65 72 2d 61 74 74 72 73 20 28 26 6f 70 74 69 6f 6e 61 6c 20 63 6c 65 61 72 29 0a 20	render-attrs.(&optional.clear)..
391c0	20 22 52 65 6e 64 65 72 20 6f 72 20 43 4c 45 41 52 20 61 74 74 72 69 62 75 74 65 73 20 69 6e 20	."Render.or.CLEAR.attributes.in.
391e0	44 56 27 73 20 64 69 72 76 69 73 68 20 62 75 66 66 65 72 2e 22 0a 20 20 28 63 6c 2d 6c 6f 6f 70	DV's.dirvish.buffer."...(cl-loop
39200	20 77 69 74 68 20 72 65 6d 6f 74 65 20 3d 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 72 65	.with.remote.=.(dirvish-prop.:re
39220	6d 6f 74 65 29 20 77 69 74 68 20 67 75 69 20 3d 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a	mote).with.gui.=.(dirvish-prop.:
39240	67 75 69 29 0a 20 20 20 20 20 20 20 20 20 20 20 77 69 74 68 20 66 6e 73 20 3d 20 28 29 20 77 69	gui)............with.fns.=.().wi
39260	74 68 20 68 65 69 67 68 74 20 3d 20 28 66 72 61 6d 65 2d 68 65 69 67 68 74 29 0a 20 20 20 20 20	th.height.=.(frame-height)......
39280	20 20 20 20 20 20 77 69 74 68 20 72 65 6d 61 69 6e 20 3d 20 28 2d 20 28 77 69 6e 64 6f 77 2d 77	......with.remain.=.(-.(window-w
392a0	69 64 74 68 29 20 28 69 66 20 67 75 69 20 31 20 32 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 66	idth).(if.gui.1.2))............f
392c0	6f 72 20 28 5f 20 77 69 64 74 68 20 70 72 65 64 20 72 65 6e 64 65 72 20 6f 76 29 20 69 6e 20 64	or.(_.width.pred.render.ov).in.d
392e0	69 72 76 69 73 68 2d 2d 77 6f 72 6b 69 6e 67 2d 61 74 74 72 73 0a 20 20 20 20 20 20 20 20 20 20	irvish--working-attrs...........
39300	20 64 6f 20 28 72 65 6d 6f 76 65 2d 6f 76 65 72 6c 61 79 73 20 28 70 6f 69 6e 74 2d 6d 69 6e 29	.do.(remove-overlays.(point-min)
39320	20 28 70 6f 69 6e 74 2d 6d 61 78 29 20 6f 76 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 77 68	.(point-max).ov.t)............wh
39340	65 6e 20 28 65 76 61 6c 20 70 72 65 64 20 60 28 28 77 69 6e 2d 77 69 64 74 68 20 2e 20 2c 72 65	en.(eval.pred.`((win-width...,re
39360	6d 61 69 6e 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 64 6f 20 28 73 65 74 71 20 72 65 6d 61	main)))............do.(setq.rema
39380	69 6e 20 28 2d 20 72 65 6d 61 69 6e 20 77 69 64 74 68 29 29 20 28 70 75 73 68 20 72 65 6e 64 65	in.(-.remain.width)).(push.rende
393a0	72 20 66 6e 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 69 6e 69 74 69 61 6c 6c 79 0a 20 20 20 20	r.fns)............initially.....
393c0	20 20 20 20 20 20 20 28 72 65 6d 6f 76 65 2d 6f 76 65 72 6c 61 79 73 20 28 70 6f 69 6e 74 2d 6d	.......(remove-overlays.(point-m
393e0	69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 20 27 64 69 72 76 69 73 68 2d 6c 2d 65 6e 64 2d 6f	in).(point-max).'dirvish-l-end-o
39400	76 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 72 65 6d 6f 76 65 2d 6f 76 65 72 6c 61 79 73	v.t)............(remove-overlays
39420	20 28 70 6f 69 6e 74 2d 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 20 27 64 69 72 76 69 73	.(point-min).(point-max).'dirvis
39440	68 2d 72 2d 65 6e 64 2d 6f 76 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 66 69 6e 61 6c 6c 79	h-r-end-ov.t)............finally
39460	0a 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 73 69 6c 65 6e 74 2d 6d 6f 64 69 66 69 63	............(with-silent-modific
39480	61 74 69 6f 6e 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 63 6c 65 61	ations..............(unless.clea
394a0	72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e	r................(save-excursion
394c0	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 2d 72 65 6e 64	..................(dirvish--rend
394e0	65 72 2d 61 74 74 72 73 2d 31 20 68 65 69 67 68 74 20 72 65 6d 61 69 6e 20 28 70 6f 69 6e 74 29	er-attrs-1.height.remain.(point)
39500	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	................................
39520	20 20 20 20 20 20 20 20 20 20 20 72 65 6d 6f 74 65 20 66 6e 73 20 6f 76 20 28 69 66 20 67 75 69	...........remote.fns.ov.(if.gui
39540	20 30 20 32 29 29 29 29 29 29 29 0a 0a 3b 3b 3b 3b 20 41 64 76 69 63 65 73 0a 0a 28 64 65 66 75	.0.2)))))))..;;;;.Advices..(defu
39560	6e 20 64 69 72 76 69 73 68 2d 66 69 6e 64 2d 65 6e 74 72 79 2d 61 20 28 26 6f 70 74 69 6f 6e 61	n.dirvish-find-entry-a.(&optiona
39580	6c 20 65 6e 74 72 79 29 0a 20 20 22 46 69 6e 64 20 45 4e 54 52 59 20 69 6e 20 63 75 72 72 65 6e	l.entry)..."Find.ENTRY.in.curren
395a0	74 20 64 69 72 76 69 73 68 20 73 65 73 73 69 6f 6e 2e 0a 45 4e 54 52 59 20 63 61 6e 20 62 65 20	t.dirvish.session..ENTRY.can.be.
395c0	61 20 66 69 6c 65 6e 61 6d 65 20 6f 72 20 61 20 73 74 72 69 6e 67 20 77 69 74 68 20 66 6f 72 6d	a.filename.or.a.string.with.form
395e0	61 74 20 6f 66 0a 60 64 69 72 76 69 73 68 2d 66 64 2d 62 75 66 6e 61 6d 65 27 20 75 73 65 64 20	at.of.`dirvish-fd-bufname'.used.
39600	74 6f 20 71 75 65 72 79 20 6f 72 20 63 72 65 61 74 65 20 61 20 60 66 64 27 20 72 65 73 75 6c 74	to.query.or.create.a.`fd'.result
39620	0a 62 75 66 66 65 72 2c 20 69 74 20 64 65 66 61 75 6c 74 73 20 74 6f 20 66 69 6c 65 6e 61 6d 65	.buffer,.it.defaults.to.filename
39640	20 75 6e 64 65 72 20 74 68 65 20 63 75 72 73 6f 72 20 77 68 65 6e 20 69 74 20 69 73 20 6e 69 6c	.under.the.cursor.when.it.is.nil
39660	2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 65 6e 74 72 79 20 28 6f 72 20 65 6e 74 72 79 20 28 64 69	."...(let*.((entry.(or.entry.(di
39680	72 65 64 2d 67 65 74 2d 66 69 6c 65 6e 61 6d 65 20 6e 69 6c 20 74 29 29 29 0a 20 20 20 20 20 20	red-get-filename.nil.t))).......
396a0	20 20 20 28 62 75 66 66 65 72 20 28 63 6f 6e 64 20 28 28 73 74 72 69 6e 67 2d 70 72 65 66 69 78	...(buffer.(cond.((string-prefix
396c0	2d 70 20 22 f0 9f 94 8d 22 20 65 6e 74 72 79 29 20 28 64 69 72 76 69 73 68 2d 66 64 2d 66 69 6e	-p."....".entry).(dirvish-fd-fin
396e0	64 20 65 6e 74 72 79 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	d.entry)).......................
39700	20 28 28 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 65 6e 74 72 79 29 20 28 64 69 72 65	.((file-directory-p.entry).(dire
39720	64 2d 6e 6f 73 65 6c 65 63 74 20 65 6e 74 72 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	d-noselect.entry))..............
39740	20 20 20 20 20 20 20 20 20 20 28 28 73 74 72 69 6e 67 2d 73 75 66 66 69 78 2d 70 20 22 2f 22 20	..........((string-suffix-p."/".
39760	65 6e 74 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	entry).........................(
39780	75 73 65 72 2d 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	user-error......................
397a0	20 20 20 20 28 63 6f 6e 63 61 74 20 65 6e 74 72 79 20 22 20 69 73 20 6e 6f 74 20 61 20 76 61 6c	....(concat.entry.".is.not.a.val
397c0	69 64 20 64 69 72 65 63 74 6f 72 79 22 29 29 29 29 29 29 0a 20 20 20 20 28 69 66 20 62 75 66 66	id.directory")))))).....(if.buff
397e0	65 72 20 28 73 77 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 20 62 75 66 66 65 72 29 0a 20 20 20	er.(switch-to-buffer.buffer)....
39800	20 20 20 28 6c 65 74 2a 20 28 28 65 78 74 20 28 64 6f 77 6e 63 61 73 65 20 28 6f 72 20 28 66 69	...(let*.((ext.(downcase.(or.(fi
39820	6c 65 2d 6e 61 6d 65 2d 65 78 74 65 6e 73 69 6f 6e 20 65 6e 74 72 79 29 20 22 22 29 29 29 0a 20	le-name-extension.entry)."")))..
39840	20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e	............(file.(expand-file-n
39860	61 6d 65 20 65 6e 74 72 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 63 65 73	ame.entry))..............(proces
39880	73 2d 63 6f 6e 6e 65 63 74 69 6f 6e 2d 74 79 70 65 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20	s-connection-type.nil)..........
398a0	20 20 20 20 28 65 78 20 28 63 6c 2d 6c 6f 6f 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	....(ex.(cl-loop................
398c0	20 20 20 66 6f 72 20 28 65 78 74 73 20 2e 20 28 63 6d 64 20 2e 20 61 72 67 73 29 29 20 69 6e 20	...for.(exts...(cmd...args)).in.
398e0	64 69 72 76 69 73 68 2d 6f 70 65 6e 2d 77 69 74 68 2d 70 72 6f 67 72 61 6d 73 0a 20 20 20 20 20	dirvish-open-with-programs......
39900	20 20 20 20 20 20 20 20 20 20 20 20 20 74 68 65 72 65 69 73 20 28 61 6e 64 20 28 6e 6f 74 20 28	.............thereis.(and.(not.(
39920	64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 72 65 6d 6f 74 65 29 29 0a 20 20 20 20 20 20 20 20 20	dirvish-prop.:remote))..........
39940	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 78 65 63 75 74 61 62 6c	......................(executabl
39960	65 2d 66 69 6e 64 20 63 6d 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	e-find.cmd).....................
39980	20 20 20 20 20 20 20 20 20 20 20 28 6d 65 6d 62 65 72 20 65 78 74 20 65 78 74 73 29 0a 20 20 20	...........(member.ext.exts)....
399a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 70 70	............................(app
399c0	65 6e 64 20 28 6c 69 73 74 20 63 6d 64 29 20 61 72 67 73 29 29 29 29 29 0a 20 20 20 20 20 20 20	end.(list.cmd).args)))))........
399e0	20 28 69 66 20 65 78 20 28 61 70 70 6c 79 20 23 27 73 74 61 72 74 2d 70 72 6f 63 65 73 73 20 22	.(if.ex.(apply.#'start-process."
39a00	22 20 6e 69 6c 20 22 6e 6f 68 75 70 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	".nil."nohup"...................
39a20	20 20 20 20 28 63 6c 2d 73 75 62 73 74 69 74 75 74 65 20 66 69 6c 65 20 22 25 66 22 20 65 78 20	....(cl-substitute.file."%f".ex.
39a40	3a 74 65 73 74 20 27 73 74 72 69 6e 67 3d 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2a	:test.'string=))...........(let*
39a60	20 28 28 64 76 20 28 64 69 72 76 69 73 68 2d 63 75 72 72 29 29 20 28 66 6e 20 28 6e 74 68 20 34	.((dv.(dirvish-curr)).(fn.(nth.4
39a80	20 28 64 76 2d 74 79 70 65 20 64 76 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66	.(dv-type.dv)))).............(if
39aa0	20 66 6e 20 28 66 75 6e 63 61 6c 6c 20 66 6e 29 20 28 64 69 72 76 69 73 68 2d 6b 69 6c 6c 20 64	.fn.(funcall.fn).(dirvish-kill.d
39ac0	76 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 69 6e 64 2d 66 69 6c 65 20 66 69 6c 65 29 29	v)))...........(find-file.file))
39ae0	29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 69 6e 73 65 72 74 2d 73 75 62 64	))))..(defun.dirvish-insert-subd
39b00	69 72 2d 61 20 28 64 69 72 6e 61 6d 65 20 26 72 65 73 74 20 5f 29 0a 20 20 22 53 65 74 75 70 20	ir-a.(dirname.&rest._)..."Setup.
39b20	6e 65 77 6c 79 20 69 6e 73 65 72 74 65 64 20 73 75 62 64 69 72 20 44 49 52 4e 41 4d 45 20 66 6f	newly.inserted.subdir.DIRNAME.fo
39b40	72 20 74 68 69 73 20 44 69 72 76 69 73 68 20 62 75 66 66 65 72 2e 22 0a 20 20 28 64 69 72 76 69	r.this.Dirvish.buffer."...(dirvi
39b60	73 68 2d 2d 68 69 64 65 2d 64 69 72 65 64 2d 68 65 61 64 65 72 29 0a 20 20 28 64 69 72 76 69 73	sh--hide-dired-header)...(dirvis
39b80	68 2d 64 61 74 61 2d 66 6f 72 2d 64 69 72 20 64 69 72 6e 61 6d 65 20 28 63 75 72 72 65 6e 74 2d	h-data-for-dir.dirname.(current-
39ba0	62 75 66 66 65 72 29 20 6e 69 6c 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 77 64	buffer).nil))..(defun.dirvish-wd
39bc0	69 72 65 64 2d 65 6e 74 65 72 2d 61 20 28 26 72 65 73 74 20 5f 29 0a 20 20 22 41 64 76 69 63 65	ired-enter-a.(&rest._)..."Advice
39be0	20 66 6f 72 20 60 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	.for.`wdired-change-to-wdired-mo
39c00	64 65 27 2e 22 0a 20 20 28 77 68 65 6e 20 64 69 72 76 69 73 68 2d 68 69 64 65 2d 63 75 72 73 6f	de'."...(when.dirvish-hide-curso
39c20	72 20 28 64 69 72 65 64 2d 6d 6f 76 65 2d 74 6f 2d 65 6e 64 2d 6f 66 2d 66 69 6c 65 6e 61 6d 65	r.(dired-move-to-end-of-filename
39c40	20 74 29 29 0a 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 63 75 72 73 6f 72 2d 74 79 70 65 20 27	.t))...(setq-local.cursor-type.'
39c60	68 6f 6c 6c 6f 77 29 0a 20 20 28 77 68 65 6e 20 28 62 6f 75 6e 64 70 20 27 65 76 69 6c 2d 6e 6f	hollow)...(when.(boundp.'evil-no
39c80	72 6d 61 6c 2d 73 74 61 74 65 2d 63 75 72 73 6f 72 29 0a 20 20 20 20 28 73 65 74 71 2d 6c 6f 63	rmal-state-cursor).....(setq-loc
39ca0	61 6c 20 65 76 69 6c 2d 6e 6f 72 6d 61 6c 2d 73 74 61 74 65 2d 63 75 72 73 6f 72 20 27 68 6f 6c	al.evil-normal-state-cursor.'hol
39cc0	6c 6f 77 29 29 0a 20 20 28 64 69 72 76 69 73 68 2d 2d 72 65 6e 64 65 72 2d 61 74 74 72 73 20 27	low))...(dirvish--render-attrs.'
39ce0	63 6c 65 61 72 29 0a 20 20 28 72 65 6d 6f 76 65 2d 68 6f 6f 6b 20 27 77 69 6e 64 6f 77 2d 63 6f	clear)...(remove-hook.'window-co
39d00	6e 66 69 67 75 72 61 74 69 6f 6e 2d 63 68 61 6e 67 65 2d 68 6f 6f 6b 20 23 27 64 69 72 76 69 73	nfiguration-change-hook.#'dirvis
39d20	68 2d 77 69 6e 63 6f 6e 66 2d 63 68 61 6e 67 65 2d 68 20 74 29 0a 20 20 28 72 65 6d 6f 76 65 2d	h-winconf-change-h.t)...(remove-
39d40	68 6f 6f 6b 20 27 70 6f 73 74 2d 63 6f 6d 6d 61 6e 64 2d 68 6f 6f 6b 20 23 27 64 69 72 76 69 73	hook.'post-command-hook.#'dirvis
39d60	68 2d 75 70 64 61 74 65 2d 62 6f 64 79 2d 68 20 74 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76	h-update-body-h.t))..(defun.dirv
39d80	69 73 68 2d 74 68 75 6d 62 2d 62 75 66 2d 61 20 28 66 6e 29 0a 20 20 22 41 64 76 69 63 65 20 66	ish-thumb-buf-a.(fn)..."Advice.f
39da0	6f 72 20 46 4e 20 60 69 6d 61 67 65 2d 64 69 72 65 64 2d 63 72 65 61 74 65 2d 74 68 75 6d 62 6e	or.FN.`image-dired-create-thumbn
39dc0	61 69 6c 2d 62 75 66 66 65 72 27 2e 22 0a 20 20 28 77 68 65 6e 2d 6c 65 74 20 28 28 64 76 20 64	ail-buffer'."...(when-let.((dv.d
39de0	69 72 76 69 73 68 2d 2d 74 68 69 73 29 20 28 28 64 76 2d 70 72 65 76 69 65 77 2d 77 69 6e 64 6f	irvish--this).((dv-preview-windo
39e00	77 20 64 76 29 29 29 0a 20 20 20 20 28 64 69 72 76 69 73 68 2d 2d 69 6e 69 74 2d 73 65 73 73 69	w.dv))).....(dirvish--init-sessi
39e20	6f 6e 20 64 76 29 0a 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	on.dv).....(with-selected-window
39e40	20 28 64 76 2d 70 72 65 76 69 65 77 2d 77 69 6e 64 6f 77 20 64 76 29 0a 20 20 20 20 20 20 28 73	.(dv-preview-window.dv).......(s
39e60	77 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 20 69 6d 61 67 65 2d 64 69 72 65 64 2d 74 68 75 6d	witch-to-buffer.image-dired-thum
39e80	62 6e 61 69 6c 2d 62 75 66 66 65 72 29 29 29 0a 20 20 28 6c 65 74 20 28 28 62 75 66 20 28 66 75	bnail-buffer)))...(let.((buf.(fu
39ea0	6e 63 61 6c 6c 20 66 6e 29 29 0a 20 20 20 20 20 20 20 20 28 66 75 6e 20 28 6c 61 6d 62 64 61 20	ncall.fn)).........(fun.(lambda.
39ec0	28 29 20 28 6c 65 74 20 28 28 62 75 66 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79	().(let.((buf.(get-text-property
39ee0	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	................................
39f00	28 70 6f 69 6e 74 29 20 27 61 73 73 6f 63 69 61 74 65 64 2d 64 69 72 65 64 2d 62 75 66 66 65 72	(point).'associated-dired-buffer
39f20	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 61 6e 64 20 28 62	)))......................(and.(b
39f40	75 66 66 65 72 2d 6c 69 76 65 2d 70 20 62 75 66 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	uffer-live-p.buf)...............
39f60	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 72	............(with-current-buffer
39f80	20 62 75 66 20 28 64 69 72 76 69 73 68 2d 2d 72 65 6e 64 65 72 2d 61 74 74 72 73 29 29 29 29 29	.buf.(dirvish--render-attrs)))))
39fa0	29 29 0a 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 62 75 66 20	)).....(with-current-buffer.buf.
39fc0	28 61 64 64 2d 68 6f 6f 6b 20 27 70 6f 73 74 2d 63 6f 6d 6d 61 6e 64 2d 68 6f 6f 6b 20 66 75 6e	(add-hook.'post-command-hook.fun
39fe0	20 6e 69 6c 20 74 29 29 20 62 75 66 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 64	.nil.t)).buf))..(defun.dirvish-d
3a000	69 72 65 64 2d 6e 6f 73 65 6c 65 63 74 2d 61 20 28 66 6e 20 64 69 72 20 26 6f 70 74 69 6f 6e 61	ired-noselect-a.(fn.dir.&optiona
3a020	6c 20 66 6c 61 67 73 29 0a 20 20 22 52 65 74 75 72 6e 20 62 75 66 66 65 72 20 66 6f 72 20 44 49	l.flags)..."Return.buffer.for.DI
3a040	52 20 77 69 74 68 20 46 4c 41 47 53 2c 20 46 4e 20 69 73 20 60 64 69 72 65 64 2d 6e 6f 73 65 6c	R.with.FLAGS,.FN.is.`dired-nosel
3a060	65 63 74 27 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 6b 65 79 20 28 66 69 6c 65 2d 6e 61 6d 65 2d	ect'."...(let*.((key.(file-name-
3a080	61 73 2d 64 69 72 65 63 74 6f 72 79 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 64	as-directory.(expand-file-name.d
3a0a0	69 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 74 68 69 73 20 64 69 72 76 69 73 68 2d 2d 74 68	ir)))..........(this.dirvish--th
3a0c0	69 73 29 0a 20 20 20 20 20 20 20 20 20 28 64 76 20 28 69 66 20 28 61 6e 64 20 74 68 69 73 20 28	is)..........(dv.(if.(and.this.(
3a0e0	65 71 20 74 68 69 73 2d 63 6f 6d 6d 61 6e 64 20 27 64 69 72 65 64 2d 6f 74 68 65 72 2d 66 72 61	eq.this-command.'dired-other-fra
3a100	6d 65 29 29 20 28 64 69 72 76 69 73 68 2d 6e 65 77 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	me)).(dirvish-new)..............
3a120	20 20 28 6f 72 20 74 68 69 73 20 28 63 61 72 20 28 64 69 72 76 69 73 68 2d 2d 66 69 6e 64 2d 72	..(or.this.(car.(dirvish--find-r
3a140	65 75 73 61 62 6c 65 29 29 20 28 64 69 72 76 69 73 68 2d 6e 65 77 29 29 29 29 0a 20 20 20 20 20	eusable)).(dirvish-new))))......
3a160	20 20 20 20 28 62 6e 61 6d 65 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 29 0a 20 20 20	....(bname.buffer-file-name)....
3a180	20 20 20 20 20 20 28 72 65 6d 6f 74 65 20 28 66 69 6c 65 2d 72 65 6d 6f 74 65 2d 70 20 64 69 72	......(remote.(file-remote-p.dir
3a1a0	29 29 0a 20 20 20 20 20 20 20 20 20 28 66 6c 61 67 73 20 28 6f 72 20 66 6c 61 67 73 20 28 64 76	))..........(flags.(or.flags.(dv
3a1c0	2d 6c 73 2d 73 77 69 74 63 68 65 73 20 64 76 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 62 75 66	-ls-switches.dv)))..........(buf
3a1e0	66 65 72 20 28 61 6c 69 73 74 2d 67 65 74 20 6b 65 79 20 28 64 76 2d 72 6f 6f 74 73 20 64 76 29	fer.(alist-get.key.(dv-roots.dv)
3a200	20 6e 69 6c 20 6e 69 6c 20 23 27 65 71 75 61 6c 29 29 0a 20 20 20 20 20 20 20 20 20 28 6e 65 77	.nil.nil.#'equal))..........(new
3a220	2d 62 75 66 66 65 72 2d 70 20 28 6e 6f 74 20 62 75 66 66 65 72 29 29 29 0a 20 20 20 20 28 69 66	-buffer-p.(not.buffer))).....(if
3a240	20 74 68 69 73 20 28 73 65 74 2d 77 69 6e 64 6f 77 2d 64 65 64 69 63 61 74 65 64 2d 70 20 6e 69	.this.(set-window-dedicated-p.ni
3a260	6c 20 6e 69 6c 29 20 28 73 65 74 63 61 72 20 28 64 76 2d 6c 61 79 6f 75 74 20 64 76 29 20 6e 69	l.nil).(setcar.(dv-layout.dv).ni
3a280	6c 29 29 0a 20 20 20 20 28 77 68 65 6e 20 6e 65 77 2d 62 75 66 66 65 72 2d 70 0a 20 20 20 20 20	l)).....(when.new-buffer-p......
3a2a0	20 28 69 66 20 28 6e 6f 74 20 72 65 6d 6f 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74	.(if.(not.remote)...........(let
3a2c0	20 28 28 64 69 72 65 64 2d 62 75 66 66 65 72 73 20 6e 69 6c 29 29 20 3b 20 64 69 73 61 62 6c 65	.((dired-buffers.nil)).;.disable
3a2e0	20 72 65 75 73 65 20 66 72 6f 6d 20 64 69 72 65 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73	.reuse.from.dired.............(s
3a300	65 74 71 20 62 75 66 66 65 72 20 28 61 70 70 6c 79 20 66 6e 20 28 6c 69 73 74 20 64 69 72 20 66	etq.buffer.(apply.fn.(list.dir.f
3a320	6c 61 67 73 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 72 65 71 75 69 72 65 20 27 64 69 72 76 69	lags)))).........(require.'dirvi
3a340	73 68 2d 65 78 74 72 61 73 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 62 75 66 66 65 72 20	sh-extras).........(setq.buffer.
3a360	28 64 69 72 76 69 73 68 2d 6e 6f 73 65 6c 65 63 74 2d 74 72 61 6d 70 20 66 6e 20 64 69 72 20 66	(dirvish-noselect-tramp.fn.dir.f
3a380	6c 61 67 73 20 72 65 6d 6f 74 65 29 29 29 0a 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65	lags.remote))).......(with-curre
3a3a0	6e 74 2d 62 75 66 66 65 72 20 62 75 66 66 65 72 20 28 64 69 72 76 69 73 68 2d 69 6e 69 74 2d 64	nt-buffer.buffer.(dirvish-init-d
3a3c0	69 72 65 64 2d 62 75 66 66 65 72 29 29 0a 20 20 20 20 20 20 28 70 75 73 68 20 28 63 6f 6e 73 20	ired-buffer)).......(push.(cons.
3a3e0	6b 65 79 20 62 75 66 66 65 72 29 20 28 64 76 2d 72 6f 6f 74 73 20 64 76 29 29 0a 20 20 20 20 20	key.buffer).(dv-roots.dv))......
3a400	20 28 70 75 73 68 20 28 63 6f 6e 73 20 6b 65 79 20 62 75 66 66 65 72 29 20 64 69 72 65 64 2d 62	.(push.(cons.key.buffer).dired-b
3a420	75 66 66 65 72 73 29 29 0a 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65	uffers)).....(with-current-buffe
3a440	72 20 62 75 66 66 65 72 0a 20 20 20 20 20 20 28 63 6f 6e 64 20 28 6e 65 77 2d 62 75 66 66 65 72	r.buffer.......(cond.(new-buffer
3a460	2d 70 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 28 61 6e 64 20 28 6e 6f 74 20 72	-p.nil).............((and.(not.r
3a480	65 6d 6f 74 65 29 20 28 6e 6f 74 20 28 65 71 75 61 6c 20 66 6c 61 67 73 20 64 69 72 65 64 2d 61	emote).(not.(equal.flags.dired-a
3a4a0	63 74 75 61 6c 2d 73 77 69 74 63 68 65 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28	ctual-switches)))..............(
3a4c0	64 69 72 65 64 2d 73 6f 72 74 2d 6f 74 68 65 72 20 66 6c 61 67 73 29 29 0a 20 20 20 20 20 20 20	dired-sort-other.flags))........
3a4e0	20 20 20 20 20 28 28 65 71 20 64 69 72 65 64 2d 61 75 74 6f 2d 72 65 76 65 72 74 2d 62 75 66 66	.....((eq.dired-auto-revert-buff
3a500	65 72 20 74 29 20 28 72 65 76 65 72 74 2d 62 75 66 66 65 72 29 29 0a 09 20 20 20 20 28 28 66 75	er.t).(revert-buffer))......((fu
3a520	6e 63 74 69 6f 6e 70 20 64 69 72 65 64 2d 61 75 74 6f 2d 72 65 76 65 72 74 2d 62 75 66 66 65 72	nctionp.dired-auto-revert-buffer
3a540	29 0a 09 20 20 20 20 20 28 77 68 65 6e 20 28 66 75 6e 63 61 6c 6c 20 64 69 72 65 64 2d 61 75 74	).......(when.(funcall.dired-aut
3a560	6f 2d 72 65 76 65 72 74 2d 62 75 66 66 65 72 20 64 69 72 29 20 28 72 65 76 65 72 74 2d 62 75 66	o-revert-buffer.dir).(revert-buf
3a580	66 65 72 29 29 29 29 0a 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 64 76 20	fer)))).......(dirvish-prop.:dv.
3a5a0	28 64 76 2d 6e 61 6d 65 20 64 76 29 29 0a 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 70 72 6f	(dv-name.dv)).......(dirvish-pro
3a5c0	70 20 3a 67 75 69 20 28 64 69 73 70 6c 61 79 2d 67 72 61 70 68 69 63 2d 70 29 29 0a 20 20 20 20	p.:gui.(display-graphic-p)).....
3a5e0	20 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 72 65 6d 6f 74 65 20 72 65 6d 6f 74 65 29 0a	..(dirvish-prop.:remote.remote).
3a600	20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 72 6f 6f 74 20 6b 65 79 29 0a 20	......(dirvish-prop.:root.key)..
3a620	20 20 20 20 20 28 77 68 65 6e 20 62 6e 61 6d 65 20 28 64 69 72 65 64 2d 67 6f 74 6f 2d 66 69 6c	.....(when.bname.(dired-goto-fil
3a640	65 20 62 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 28 73 65 74 66 20 28 64 76 2d 69 6e 64 65 78 20	e.bname)).......(setf.(dv-index.
3a660	64 76 29 20 28 63 6f 6e 73 20 6b 65 79 20 62 75 66 66 65 72 29 29 0a 20 20 20 20 20 20 28 72 75	dv).(cons.key.buffer)).......(ru
3a680	6e 2d 68 6f 6f 6b 2d 77 69 74 68 2d 61 72 67 73 20 27 64 69 72 76 69 73 68 2d 66 69 6e 64 2d 65	n-hook-with-args.'dirvish-find-e
3a6a0	6e 74 72 79 2d 68 6f 6f 6b 20 6b 65 79 20 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 62 75 66 66	ntry-hook.key.buffer).......buff
3a6c0	65 72 29 29 29 0a 0a 3b 3b 3b 3b 20 48 6f 6f 6b 73 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73	er)))..;;;;.Hooks..(defun.dirvis
3a6e0	68 2d 61 70 70 6c 79 2d 61 6e 73 69 63 6f 6c 6f 72 2d 68 20 28 5f 77 69 6e 20 70 6f 73 29 0a 20	h-apply-ansicolor-h.(_win.pos)..
3a700	20 22 55 70 64 61 74 65 20 64 69 72 76 69 73 68 20 61 6e 73 69 63 6f 6c 6f 72 20 69 6e 20 70 72	."Update.dirvish.ansicolor.in.pr
3a720	65 76 69 65 77 20 77 69 6e 64 6f 77 20 66 72 6f 6d 20 50 4f 53 2e 22 0a 20 20 28 61 6e 73 69 2d	eview.window.from.POS."...(ansi-
3a740	63 6f 6c 6f 72 2d 61 70 70 6c 79 2d 6f 6e 2d 72 65 67 69 6f 6e 0a 20 20 20 28 67 6f 74 6f 2d 63	color-apply-on-region....(goto-c
3a760	68 61 72 20 70 6f 73 29 20 28 70 72 6f 67 6e 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 28 66	har.pos).(progn.(forward-line.(f
3a780	72 61 6d 65 2d 68 65 69 67 68 74 29 29 20 28 70 6f 69 6e 74 29 29 29 29 0a 0a 28 64 65 66 75 6e	rame-height)).(point))))..(defun
3a7a0	20 64 69 72 76 69 73 68 2d 75 70 64 61 74 65 2d 62 6f 64 79 2d 68 20 28 26 6f 70 74 69 6f 6e 61	.dirvish-update-body-h.(&optiona
3a7c0	6c 20 66 6f 72 63 65 29 0a 20 20 22 55 70 64 61 74 65 20 55 49 20 6f 66 20 63 75 72 72 65 6e 74	l.force)..."Update.UI.of.current
3a7e0	20 44 69 72 76 69 73 68 2e 0a 57 68 65 6e 20 46 4f 52 43 45 2c 20 65 6e 73 75 72 65 20 74 68 65	.Dirvish..When.FORCE,.ensure.the
3a800	20 70 72 65 76 69 65 77 20 67 65 74 20 72 65 66 72 65 73 68 65 64 2e 22 0a 20 20 28 77 68 65 6e	.preview.get.refreshed."...(when
3a820	2d 6c 65 74 20 28 28 64 76 20 28 64 69 72 76 69 73 68 2d 63 75 72 72 29 29 29 0a 20 20 20 20 28	-let.((dv.(dirvish-curr))).....(
3a840	63 6f 6e 64 20 28 28 6e 6f 74 20 64 69 72 76 69 73 68 2d 68 69 64 65 2d 63 75 72 73 6f 72 29 29	cond.((not.dirvish-hide-cursor))
3a860	0a 20 20 20 20 20 20 20 20 20 20 28 28 65 6f 62 70 29 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65	...........((eobp).(forward-line
3a880	20 2d 31 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 28 63 64 72 20 64 69 72 65 64 2d 73 75 62 64	.-1))...........((cdr.dired-subd
3a8a0	69 72 2d 61 6c 69 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 28 61 6e 64 20 28 62 6f 62 70	ir-alist))...........((and.(bobp
3a8c0	29 20 64 69 72 76 69 73 68 2d 75 73 65 2d 68 65 61 64 65 72 2d 6c 69 6e 65 29 0a 20 20 20 20 20	).dirvish-use-header-line)......
3a8e0	20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a	......(goto-char.(dirvish-prop.:
3a900	63 6f 6e 74 65 6e 74 2d 62 65 67 69 6e 29 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 64 69 72 76	content-begin)))).....(when.dirv
3a920	69 73 68 2d 68 69 64 65 2d 63 75 72 73 6f 72 20 28 64 69 72 65 64 2d 6d 6f 76 65 2d 74 6f 2d 66	ish-hide-cursor.(dired-move-to-f
3a940	69 6c 65 6e 61 6d 65 29 29 0a 20 20 20 20 28 64 69 72 76 69 73 68 2d 2d 72 65 6e 64 65 72 2d 61	ilename)).....(dirvish--render-a
3a960	74 74 72 73 29 0a 20 20 20 20 28 77 68 65 6e 2d 6c 65 74 20 28 28 66 69 6c 65 6e 61 6d 65 20 28	ttrs).....(when-let.((filename.(
3a980	64 69 72 65 64 2d 67 65 74 2d 66 69 6c 65 6e 61 6d 65 20 6e 69 6c 20 74 29 29 29 0a 20 20 20 20	dired-get-filename.nil.t))).....
3a9a0	20 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 69 6e 64 65 78 20 66 69 6c 65 6e 61 6d 65 29	..(dirvish-prop.:index.filename)
3a9c0	0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 68 2d 62 75 66 20 28 64 69 72 76 69 73 68 2d 2d 75 74	.......(let.((h-buf.(dirvish--ut
3a9e0	69 6c 2d 62 75 66 66 65 72 20 27 68 65 61 64 65 72 20 64 76 20 74 29 29 0a 20 20 20 20 20 20 20	il-buffer.'header.dv.t))........
3aa00	20 20 20 20 20 28 66 2d 62 75 66 20 28 64 69 72 76 69 73 68 2d 2d 75 74 69 6c 2d 62 75 66 66 65	.....(f-buf.(dirvish--util-buffe
3aa20	72 20 27 66 6f 6f 74 65 72 20 64 76 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61	r.'footer.dv.t)).............(la
3aa40	73 74 2d 69 6e 64 65 78 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 6c 61 73 74 2d 69 6e 64	st-index.(dirvish-prop.:last-ind
3aa60	65 78 29 29 29 0a 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 6c 61 73	ex))).........(dirvish-prop.:las
3aa80	74 2d 69 6e 64 65 78 20 66 69 6c 65 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 28 64 69 72 76 69	t-index.filename).........(dirvi
3aaa0	73 68 2d 64 65 62 6f 75 6e 63 65 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 6e	sh-debounce.nil...........(if.(n
3aac0	6f 74 20 28 63 61 72 20 28 64 76 2d 6c 61 79 6f 75 74 20 64 76 29 29 29 0a 20 20 20 20 20 20 20	ot.(car.(dv-layout.dv)))........
3aae0	20 20 20 20 20 20 20 28 61 6e 64 20 28 3c 20 65 6d 61 63 73 2d 6d 61 6a 6f 72 2d 76 65 72 73 69	.......(and.(<.emacs-major-versi
3ab00	6f 6e 20 32 39 29 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 29	on.29).(force-mode-line-update))
3ab20	0a 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 64 69 72 76 69 73 68 2d	.............(when.(and.dirvish-
3ab40	75 73 65 2d 6d 6f 64 65 2d 6c 69 6e 65 20 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 20 66 2d 62	use-mode-line.(buffer-live-p.f-b
3ab60	75 66 29 29 0a 20 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	uf))...............(with-current
3ab80	2d 62 75 66 66 65 72 20 66 2d 62 75 66 20 28 66 6f 72 63 65 2d 6d 6f 64 65 2d 6c 69 6e 65 2d 75	-buffer.f-buf.(force-mode-line-u
3aba0	70 64 61 74 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20	pdate))).............(when.(and.
3abc0	64 69 72 76 69 73 68 2d 75 73 65 2d 68 65 61 64 65 72 2d 6c 69 6e 65 20 28 62 75 66 66 65 72 2d	dirvish-use-header-line.(buffer-
3abe0	6c 69 76 65 2d 70 20 68 2d 62 75 66 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69	live-p.h-buf))...............(wi
3ac00	74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 68 2d 62 75 66 20 28 66 6f 72 63 65 2d 6d	th-current-buffer.h-buf.(force-m
3ac20	6f 64 65 2d 6c 69 6e 65 2d 75 70 64 61 74 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28	ode-line-update))).............(
3ac40	77 68 65 6e 20 28 6f 72 20 66 6f 72 63 65 20 28 6e 6f 74 20 28 65 71 75 61 6c 20 6c 61 73 74 2d	when.(or.force.(not.(equal.last-
3ac60	69 6e 64 65 78 20 66 69 6c 65 6e 61 6d 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	index.filename)))...............
3ac80	28 64 69 72 76 69 73 68 2d 2d 70 72 65 76 69 65 77 2d 75 70 64 61 74 65 20 64 76 20 66 69 6c 65	(dirvish--preview-update.dv.file
3aca0	6e 61 6d 65 29 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 69 6e 73	name))))))))..(defun.dirvish-ins
3acc0	65 72 74 2d 65 6e 74 72 79 2d 68 20 28 65 6e 74 72 79 20 62 75 66 66 65 72 29 0a 20 20 22 41 64	ert-entry-h.(entry.buffer)..."Ad
3ace0	64 20 45 4e 54 52 59 20 6f 72 20 42 55 46 46 45 52 20 6e 61 6d 65 20 74 6f 20 60 64 69 72 76 69	d.ENTRY.or.BUFFER.name.to.`dirvi
3ad00	73 68 2d 2d 68 69 73 74 6f 72 79 27 2e 22 0a 20 20 28 6c 65 74 20 28 28 65 6e 74 72 79 20 28 69	sh--history'."...(let.((entry.(i
3ad20	66 20 28 73 74 72 69 6e 67 2d 70 72 65 66 69 78 2d 70 20 22 f0 9f 94 8d 22 20 65 6e 74 72 79 29	f.(string-prefix-p."....".entry)
3ad40	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 2d 6e 61 6d 65	....................(buffer-name
3ad60	20 62 75 66 66 65 72 29 20 65 6e 74 72 79 29 29 29 0a 20 20 20 20 28 73 65 74 71 20 64 69 72 76	.buffer).entry))).....(setq.dirv
3ad80	69 73 68 2d 2d 68 69 73 74 6f 72 79 20 28 73 65 71 2d 74 61 6b 65 20 28 70 75 73 68 20 65 6e 74	ish--history.(seq-take.(push.ent
3ada0	72 79 20 64 69 72 76 69 73 68 2d 2d 68 69 73 74 6f 72 79 29 20 32 30 30 29 29 29 29 0a 0a 28 64	ry.dirvish--history).200))))..(d
3adc0	65 66 75 6e 20 64 69 72 76 69 73 68 2d 6b 69 6c 6c 2d 62 75 66 66 65 72 2d 68 20 28 29 0a 20 20	efun.dirvish-kill-buffer-h.()...
3ade0	22 52 65 6d 6f 76 65 20 62 75 66 66 65 72 20 66 72 6f 6d 20 73 65 73 73 69 6f 6e 27 73 20 62 75	"Remove.buffer.from.session's.bu
3ae00	66 66 65 72 20 6c 69 73 74 2e 22 0a 20 20 28 77 68 65 6e 2d 6c 65 74 20 28 28 64 76 20 28 64 69	ffer.list."...(when-let.((dv.(di
3ae20	72 76 69 73 68 2d 63 75 72 72 29 29 20 28 62 75 66 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65	rvish-curr)).(buf.(current-buffe
3ae40	72 29 29 29 0a 20 20 20 20 28 6c 65 74 20 28 28 77 69 6e 20 28 67 65 74 2d 62 75 66 66 65 72 2d	r))).....(let.((win.(get-buffer-
3ae60	77 69 6e 64 6f 77 20 62 75 66 29 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 77 69 6e 64 6f	window.buf))).......(when.(windo
3ae80	77 2d 6c 69 76 65 2d 70 20 77 69 6e 29 20 28 73 65 74 2d 77 69 6e 64 6f 77 2d 64 65 64 69 63 61	w-live-p.win).(set-window-dedica
3aea0	74 65 64 2d 70 20 77 69 6e 20 6e 69 6c 29 29 29 0a 20 20 20 20 28 73 65 74 66 20 28 64 76 2d 72	ted-p.win.nil))).....(setf.(dv-r
3aec0	6f 6f 74 73 20 64 76 29 20 28 63 6c 2d 72 65 6d 6f 76 65 2d 69 66 20 28 6c 61 6d 62 64 61 20 28	oots.dv).(cl-remove-if.(lambda.(
3aee0	69 29 20 28 65 71 20 28 63 64 72 20 69 29 20 62 75 66 29 29 20 28 64 76 2d 72 6f 6f 74 73 20 64	i).(eq.(cdr.i).buf)).(dv-roots.d
3af00	76 29 29 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 28 64 76 2d 72 6f 6f 74 73 20 64 76 29 0a 20	v))).....(unless.(dv-roots.dv)..
3af20	20 20 20 20 20 28 77 68 65 6e 2d 6c 65 74 20 28 28 6c 61 79 6f 75 74 20 28 63 61 72 20 28 64 76	.....(when-let.((layout.(car.(dv
3af40	2d 6c 61 79 6f 75 74 20 64 76 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	-layout.dv)))..................(
3af60	77 63 6f 6e 66 20 28 64 76 2d 77 69 6e 63 6f 6e 66 20 64 76 29 29 0a 20 20 20 20 20 20 20 20 20	wconf.(dv-winconf.dv))..........
3af80	20 20 20 20 20 20 20 20 28 28 65 71 20 62 75 66 20 28 77 69 6e 64 6f 77 2d 62 75 66 66 65 72 20	........((eq.buf.(window-buffer.
3afa0	28 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 73	(selected-window))))).........(s
3afc0	65 74 2d 77 69 6e 64 6f 77 2d 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e 20 77 63 6f 6e 66 29 29 0a	et-window-configuration.wconf)).
3afe0	20 20 20 20 20 20 28 72 65 6d 68 61 73 68 20 28 64 76 2d 6e 61 6d 65 20 64 76 29 20 64 69 72 76	......(remhash.(dv-name.dv).dirv
3b000	69 73 68 2d 2d 73 65 73 73 69 6f 6e 2d 68 61 73 68 29 0a 20 20 20 20 20 20 28 63 6c 2d 6c 6f 6f	ish--session-hash).......(cl-loo
3b020	70 20 66 6f 72 20 62 20 69 6e 20 28 62 75 66 66 65 72 2d 6c 69 73 74 29 20 66 6f 72 20 62 6e 20	p.for.b.in.(buffer-list).for.bn.
3b040	3d 20 28 62 75 66 66 65 72 2d 6e 61 6d 65 20 62 29 20 77 68 65 6e 0a 20 20 20 20 20 20 20 20 20	=.(buffer-name.b).when..........
3b060	20 20 20 20 20 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 28 66 6f 72 6d 61 74 20 22 20	......(string-match-p.(format.".
3b080	3f 5c 5c 2a 44 69 72 76 69 73 68 2d 2e 2a 2d 25 73 5c 5c 2a 22 20 28 64 76 2d 6e 61 6d 65 20 64	?\\Dirvish-.-%s\\*".(dv-name.d
3b0a0	76 29 29 20 62 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 6f 20 28 64 69 72 76 69	v)).bn)................do.(dirvi
3b0c0	73 68 2d 2d 6b 69 6c 6c 2d 62 75 66 66 65 72 20 62 29 29 0a 20 20 20 20 20 20 28 73 65 74 71 20	sh--kill-buffer.b)).......(setq.
3b0e0	64 69 72 76 69 73 68 2d 2d 74 68 69 73 20 6e 69 6c 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69	dirvish--this.nil))))..(defun.di
3b100	72 76 69 73 68 2d 73 65 6c 65 63 74 69 6f 6e 2d 63 68 61 6e 67 65 2d 68 20 28 26 6f 70 74 69 6f	rvish-selection-change-h.(&optio
3b120	6e 61 6c 20 5f 66 72 61 6d 65 2d 6f 72 2d 77 69 6e 64 6f 77 29 0a 20 20 22 53 61 76 65 20 63 75	nal._frame-or-window)..."Save.cu
3b140	72 72 65 6e 74 20 73 65 73 73 69 6f 6e 20 74 6f 20 66 72 61 6d 65 20 70 61 72 61 6d 65 74 65 72	rrent.session.to.frame.parameter
3b160	73 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 77 20 28 66 72 61 6d 65 2d 73 65 6c 65 63 74 65 64 2d	s."...(let*.((w.(frame-selected-
3b180	77 69 6e 64 6f 77 29 29 20 28 62 20 28 77 69 6e 64 6f 77 2d 62 75 66 66 65 72 20 77 29 29 20 28	window)).(b.(window-buffer.w)).(
3b1a0	64 76 20 28 64 69 72 76 69 73 68 2d 63 75 72 72 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 20 28 28	dv.(dirvish-curr))).....(cond.((
3b1c0	61 6e 64 20 64 76 20 28 6d 69 6e 69 62 75 66 66 65 72 70 20 28 77 69 6e 64 6f 77 2d 62 75 66 66	and.dv.(minibufferp.(window-buff
3b1e0	65 72 20 64 69 72 76 69 73 68 2d 2d 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 29 29 29 0a 20	er.dirvish--selected-window)))..
3b200	20 20 20 20 20 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	..........(with-selected-window.
3b220	28 64 69 72 76 69 73 68 2d 2d 63 72 65 61 74 65 2d 72 6f 6f 74 2d 77 69 6e 64 6f 77 20 64 76 29	(dirvish--create-root-window.dv)
3b240	0a 20 20 20 20 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	..............(switch-to-buffer.
3b260	62 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 2d 69 6e 69 74 2d 73	b)..............(dirvish--init-s
3b280	65 73 73 69 6f 6e 20 64 76 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 28 61 63 74 69 76 65 2d	ession.dv)))...........((active-
3b2a0	6d 69 6e 69 62 75 66 66 65 72 2d 77 69 6e 64 6f 77 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 74	minibuffer-window))...........(t
3b2c0	20 28 73 65 74 71 20 64 69 72 76 69 73 68 2d 2d 74 68 69 73 20 64 76 29 29 29 0a 20 20 20 20 28	.(setq.dirvish--this.dv))).....(
3b2e0	73 65 74 71 20 64 69 72 76 69 73 68 2d 2d 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 20 77 29	setq.dirvish--selected-window.w)
3b300	29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 77 69 6e 63 6f 6e 66 2d 63 68 61 6e 67	))..(defun.dirvish-winconf-chang
3b320	65 2d 68 20 28 29 0a 20 20 22 52 65 73 74 6f 72 65 20 68 69 64 64 65 6e 20 73 65 73 73 69 6f 6e	e-h.()..."Restore.hidden.session
3b340	73 20 6f 6e 20 62 75 66 66 65 72 20 73 77 69 74 63 68 69 6e 67 2e 22 0a 20 20 28 6c 65 74 20 28	s.on.buffer.switching."...(let.(
3b360	28 64 76 20 28 64 69 72 76 69 73 68 2d 63 75 72 72 29 29 29 0a 20 20 20 20 28 73 65 74 66 20 28	(dv.(dirvish-curr))).....(setf.(
3b380	64 76 2d 72 6f 6f 74 2d 77 69 6e 64 6f 77 20 64 76 29 20 28 67 65 74 2d 62 75 66 66 65 72 2d 77	dv-root-window.dv).(get-buffer-w
3b3a0	69 6e 64 6f 77 20 28 63 64 72 20 28 64 76 2d 69 6e 64 65 78 20 64 76 29 29 29 29 0a 20 20 20 20	indow.(cdr.(dv-index.dv)))).....
3b3c0	28 64 69 72 76 69 73 68 2d 75 70 64 61 74 65 2d 62 6f 64 79 2d 68 20 27 66 6f 72 63 65 2d 70 72	(dirvish-update-body-h.'force-pr
3b3e0	65 76 69 65 77 2d 75 70 64 61 74 65 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d	eview-update)))..(defun.dirvish-
3b400	77 69 6e 62 75 66 2d 63 68 61 6e 67 65 2d 68 20 28 66 72 61 6d 65 2d 6f 72 2d 77 69 6e 64 6f 77	winbuf-change-h.(frame-or-window
3b420	29 0a 20 20 22 52 65 62 75 69 6c 64 20 6c 61 79 6f 75 74 20 6f 6e 63 65 20 62 75 66 66 65 72 20	)..."Rebuild.layout.once.buffer.
3b440	69 6e 20 46 52 41 4d 45 2d 4f 52 2d 57 49 4e 44 4f 57 20 63 68 61 6e 67 65 64 2e 22 0a 20 20 28	in.FRAME-OR-WINDOW.changed."...(
3b460	6c 65 74 20 28 28 77 69 6e 20 28 66 72 61 6d 65 2d 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77	let.((win.(frame-selected-window
3b480	20 66 72 61 6d 65 2d 6f 72 2d 77 69 6e 64 6f 77 29 29 29 0a 20 20 20 20 28 77 69 74 68 2d 63 75	.frame-or-window))).....(with-cu
3b4a0	72 72 65 6e 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 29	rrent-buffer.(window-buffer.win)
3b4c0	0a 20 20 20 20 20 20 28 77 68 65 6e 2d 6c 65 74 20 28 28 64 76 20 28 64 69 72 76 69 73 68 2d 63	.......(when-let.((dv.(dirvish-c
3b4e0	75 72 72 29 29 29 20 28 64 69 72 76 69 73 68 2d 2d 69 6e 69 74 2d 73 65 73 73 69 6f 6e 20 64 76	urr))).(dirvish--init-session.dv
3b500	29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 74 61 62 2d 6e 65 77 2d 70 6f	)))))..(defun.dirvish-tab-new-po
3b520	73 74 2d 68 20 28 5f 74 61 62 29 0a 20 20 22 44 6f 20 6e 6f 74 20 72 65 75 73 65 20 73 65 73 73	st-h.(_tab)..."Do.not.reuse.sess
3b540	69 6f 6e 73 20 66 72 6f 6d 20 6f 74 68 65 72 20 74 61 62 73 2e 22 0a 20 20 28 73 65 74 71 20 64	ions.from.other.tabs."...(setq.d
3b560	69 72 76 69 73 68 2d 2d 74 68 69 73 20 6e 69 6c 29 29 0a 0a 3b 3b 3b 3b 20 50 72 65 76 69 65 77	irvish--this.nil))..;;;;.Preview
3b580	0a 0a 28 64 69 72 76 69 73 68 2d 64 65 66 69 6e 65 2d 70 72 65 76 69 65 77 20 64 69 73 61 62 6c	..(dirvish-define-preview.disabl
3b5a0	65 20 28 66 69 6c 65 20 65 78 74 29 0a 20 20 22 44 69 73 61 62 6c 65 20 70 72 65 76 69 65 77 20	e.(file.ext)..."Disable.preview.
3b5c0	69 6e 20 73 6f 6d 65 20 63 61 73 65 73 2e 22 0a 20 20 28 63 6f 6e 64 0a 20 20 20 28 28 6e 6f 74	in.some.cases."...(cond....((not
3b5e0	20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 66 69 6c 65 29 29 0a 20 20 20 20 60 28 69 6e 66	.(file-exists-p.file)).....`(inf
3b600	6f 20 2e 20 2c 28 66 6f 72 6d 61 74 20 22 25 73 20 64 6f 65 73 20 6e 6f 74 20 65 78 69 73 74 22	o...,(format."%s.does.not.exist"
3b620	20 66 69 6c 65 29 29 29 0a 20 20 20 28 28 6e 6f 74 20 28 66 69 6c 65 2d 72 65 61 64 61 62 6c 65	.file)))....((not.(file-readable
3b640	2d 70 20 66 69 6c 65 29 29 0a 20 20 20 20 60 28 69 6e 66 6f 20 2e 20 2c 28 66 6f 72 6d 61 74 20	-p.file)).....`(info...,(format.
3b660	22 25 73 20 69 73 20 6e 6f 74 20 72 65 61 64 61 62 6c 65 22 20 66 69 6c 65 29 29 29 0a 20 20 20	"%s.is.not.readable".file)))....
3b680	28 28 6d 65 6d 62 65 72 20 65 78 74 20 64 69 72 76 69 73 68 2d 70 72 65 76 69 65 77 2d 64 69 73	((member.ext.dirvish-preview-dis
3b6a0	61 62 6c 65 64 2d 65 78 74 73 29 0a 20 20 20 20 60 28 69 6e 66 6f 20 2e 20 2c 28 66 6f 72 6d 61	abled-exts).....`(info...,(forma
3b6c0	74 20 22 50 72 65 76 69 65 77 20 66 6f 72 20 25 73 20 68 61 73 20 62 65 65 6e 20 64 69 73 61 62	t."Preview.for.%s.has.been.disab
3b6e0	6c 65 64 22 20 66 69 6c 65 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 2d	led".file)))))..(defun.dirvish--
3b700	66 69 6e 64 2d 66 69 6c 65 2d 74 65 6d 70 6f 72 61 72 69 6c 79 20 28 6e 61 6d 65 29 0a 20 20 22	find-file-temporarily.(name)..."
3b720	4f 70 65 6e 20 66 69 6c 65 20 4e 41 4d 45 20 74 65 6d 70 6f 72 61 72 69 6c 79 20 66 6f 72 20 70	Open.file.NAME.temporarily.for.p
3b740	72 65 76 69 65 77 2e 22 0a 20 20 28 63 6c 2d 6c 65 74 66 20 28 28 28 73 79 6d 62 6f 6c 2d 66 75	review."...(cl-letf.(((symbol-fu
3b760	6e 63 74 69 6f 6e 20 27 72 65 63 65 6e 74 66 2d 74 72 61 63 6b 2d 6f 70 65 6e 65 64 2d 66 69 6c	nction.'recentf-track-opened-fil
3b780	65 29 20 23 27 69 67 6e 6f 72 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 28 73 79 6d 62 6f	e).#'ignore).............((symbo
3b7a0	6c 2d 66 75 6e 63 74 69 6f 6e 20 27 75 6e 64 6f 2d 74 72 65 65 2d 73 61 76 65 2d 68 69 73 74 6f	l-function.'undo-tree-save-histo
3b7c0	72 79 2d 66 72 6f 6d 2d 68 6f 6f 6b 29 20 23 27 69 67 6e 6f 72 65 29 0a 20 20 20 20 20 20 20 20	ry-from-hook).#'ignore).........
3b7e0	20 20 20 20 28 28 73 79 6d 62 6f 6c 2d 66 75 6e 63 74 69 6f 6e 20 27 66 6c 79 63 68 65 63 6b 2d	....((symbol-function.'flycheck-
3b800	6d 6f 64 65 2d 6f 6e 2d 73 61 66 65 29 20 23 27 69 67 6e 6f 72 65 29 29 0a 20 20 20 20 28 6c 65	mode-on-safe).#'ignore)).....(le
3b820	74 2a 20 28 28 76 63 2d 66 6f 6c 6c 6f 77 2d 73 79 6d 6c 69 6e 6b 73 20 74 29 0a 20 20 20 20 20	t*.((vc-follow-symlinks.t)......
3b840	20 20 20 20 20 20 28 76 61 72 73 20 28 6d 61 70 63 61 72 20 28 70 63 61 73 65 2d 6c 61 6d 62 64	......(vars.(mapcar.(pcase-lambd
3b860	61 20 28 60 28 2c 6b 20 2e 20 2c 76 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	a.(`(,k...,v))..................
3b880	20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 6b 20 76 20 28 64 65 66 61 75 6c 74 2d 76 61 6c	..........(list.k.v.(default-val
3b8a0	75 65 20 6b 29 20 28 73 79 6d 62 6f 6c 2d 76 61 6c 75 65 20 6b 29 29 29 0a 20 20 20 20 20 20 20	ue.k).(symbol-value.k)))........
3b8c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 76 69 73 68 2d 70 72 65 76 69 65	..................dirvish-previe
3b8e0	77 2d 65 6e 76 69 72 6f 6e 6d 65 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 62 75 66 20	w-environment))............(buf.
3b900	28 75 6e 77 69 6e 64 2d 70 72 6f 74 65 63 74 20 28 70 72 6f 67 6e 20 28 70 63 61 73 65 2d 64 6f	(unwind-protect.(progn.(pcase-do
3b920	6c 69 73 74 20 28 60 28 2c 6b 20 2c 76 20 2e 20 2c 5f 29 20 76 61 72 73 29 0a 20 20 20 20 20 20	list.(`(,k.,v...,_).vars).......
3b940	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	................................
3b960	20 20 20 28 73 65 74 2d 64 65 66 61 75 6c 74 20 6b 20 76 29 20 28 73 65 74 20 6b 20 76 29 29 0a	...(set-default.k.v).(set.k.v)).
3b980	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	................................
3b9a0	20 20 20 20 20 20 20 28 66 69 6e 64 2d 66 69 6c 65 2d 6e 6f 73 65 6c 65 63 74 20 6e 61 6d 65 20	.......(find-file-noselect.name.
3b9c0	27 6e 6f 77 61 72 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 63 61	'nowarn))...................(pca
3b9e0	73 65 2d 64 6f 6c 69 73 74 20 28 60 28 2c 6b 20 2c 5f 20 2c 64 20 2c 76 29 20 76 61 72 73 29 0a	se-dolist.(`(,k.,_.,d.,v).vars).
3ba00	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 2d 64 65 66 61 75 6c 74	....................(set-default
3ba20	20 6b 20 64 29 20 28 73 65 74 20 6b 20 76 29 29 29 29 29 0a 20 20 20 20 20 20 28 63 6f 6e 64 20	.k.d).(set.k.v))))).......(cond.
3ba40	28 28 69 67 6e 6f 72 65 2d 65 72 72 6f 72 73 20 28 62 75 66 66 65 72 2d 6c 6f 63 61 6c 2d 76 61	((ignore-errors.(buffer-local-va
3ba60	6c 75 65 20 27 73 6f 2d 6c 6f 6e 67 2d 64 65 74 65 63 74 65 64 2d 70 20 62 75 66 29 29 0a 20 20	lue.'so-long-detected-p.buf))...
3ba80	20 20 20 20 20 20 20 20 20 20 20 28 6b 69 6c 6c 2d 62 75 66 66 65 72 20 62 75 66 29 0a 20 20 20	...........(kill-buffer.buf)....
3baa0	20 20 20 20 20 20 20 20 20 20 60 28 69 6e 66 6f 20 2e 20 2c 28 66 6f 72 6d 61 74 20 22 46 69 6c	..........`(info...,(format."Fil
3bac0	65 20 60 25 73 27 20 77 69 74 68 20 6c 6f 6e 67 20 6c 69 6e 65 73 20 6e 6f 74 20 70 72 65 76 69	e.`%s'.with.long.lines.not.previ
3bae0	65 77 65 64 22 20 6e 61 6d 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 74 20 60 28 62	ewed".name))).............(t.`(b
3bb00	75 66 66 65 72 20 2e 20 2c 62 75 66 29 29 29 29 29 29 0a 0a 28 64 69 72 76 69 73 68 2d 64 65 66	uffer...,buf))))))..(dirvish-def
3bb20	69 6e 65 2d 70 72 65 76 69 65 77 20 64 65 66 61 75 6c 74 20 28 66 69 6c 65 20 65 78 74 29 0a 20	ine-preview.default.(file.ext)..
3bb40	20 22 44 65 66 61 75 6c 74 20 70 72 65 76 69 65 77 20 64 69 73 70 61 74 63 68 65 72 20 66 6f 72	."Default.preview.dispatcher.for
3bb60	20 46 49 4c 45 2e 22 0a 20 20 28 77 68 65 6e 2d 6c 65 74 20 28 28 61 74 74 72 73 20 28 69 67 6e	.FILE."...(when-let.((attrs.(ign
3bb80	6f 72 65 2d 65 72 72 6f 72 73 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 73 20 66 69 6c 65	ore-errors.(file-attributes.file
3bba0	29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 69 7a 65 20 28 66 69 6c 65 2d 61 74 74	)))..............(size.(file-att
3bbc0	72 69 62 75 74 65 2d 73 69 7a 65 20 61 74 74 72 73 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 20 28	ribute-size.attrs))).....(cond.(
3bbe0	28 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 66 69 6c 65 29 20 3b 20 64 65 66 61 75 6c	(file-directory-p.file).;.defaul
3bc00	74 20 64 69 72 65 63 74 6f 72 79 20 70 72 65 76 69 65 77 65 72 0a 20 20 20 20 20 20 20 20 20 20	t.directory.previewer...........
3bc20	20 28 6c 65 74 2a 20 28 28 73 63 72 69 70 74 20 60 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62	.(let*.((script.`(with-current-b
3bc40	75 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	uffer...........................
3bc60	20 20 20 20 20 28 70 72 6f 67 6e 20 28 73 65 74 71 20 69 6e 73 65 72 74 2d 64 69 72 65 63 74 6f	.....(progn.(setq.insert-directo
3bc80	72 79 2d 70 72 6f 67 72 61 6d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ry-program......................
3bca0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 69 6e 73 65 72 74 2d 64	.......................,insert-d
3bcc0	69 72 65 63 74 6f 72 79 2d 70 72 6f 67 72 61 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	irectory-program)...............
3bce0	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 64 69 72 65 64 2d 6e	........................(dired-n
3bd00	6f 73 65 6c 65 63 74 20 2c 66 69 6c 65 20 22 2d 41 6c 47 68 22 29 29 0a 20 20 20 20 20 20 20 20	oselect.,file."-AlGh")).........
3bd20	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 2d 73 74 72	.....................(buffer-str
3bd40	69 6e 67 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6d 64 20 28 66	ing)))...................(cmd.(f
3bd60	6f 72 6d 61 74 20 22 25 53 22 20 60 28 6d 65 73 73 61 67 65 20 22 5c 6e 25 73 22 20 2c 73 63 72	ormat."%S".`(message."\n%s".,scr
3bd80	69 70 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 64 69 72 65 64 20 2e 20 28	ipt))))..............`(dired...(
3bda0	2c 64 69 72 76 69 73 68 2d 65 6d 61 63 73 2d 62 69 6e 20 22 2d 51 22 20 22 2d 62 61 74 63 68 22	,dirvish-emacs-bin."-Q"."-batch"
3bdc0	20 22 2d 2d 65 76 61 6c 22 20 2c 63 6d 64 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 28 3e	."--eval".,cmd))))...........((>
3bde0	20 73 69 7a 65 20 28 6f 72 20 6c 61 72 67 65 2d 66 69 6c 65 2d 77 61 72 6e 69 6e 67 2d 74 68 72	.size.(or.large-file-warning-thr
3be00	65 73 68 6f 6c 64 20 31 30 30 30 30 30 30 30 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 60 28 69	eshold.10000000))............`(i
3be20	6e 66 6f 20 2e 20 2c 28 66 6f 72 6d 61 74 20 22 46 69 6c 65 20 25 73 20 69 73 20 74 6f 6f 20 62	nfo...,(format."File.%s.is.too.b
3be40	69 67 20 66 6f 72 20 6c 69 74 65 72 61 6c 20 70 72 65 76 69 65 77 2e 22 20 66 69 6c 65 29 29 29	ig.for.literal.preview.".file)))
3be60	0a 20 20 20 20 20 20 20 20 20 20 28 28 6d 65 6d 62 65 72 20 65 78 74 20 64 69 72 76 69 73 68 2d	...........((member.ext.dirvish-
3be80	6d 65 64 69 61 2d 65 78 74 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 60 28 69 6e 66 6f 20 2e 20	media-exts)............`(info...
3bea0	22 50 72 65 76 69 65 77 20 64 69 73 61 62 6c 65 64 20 66 6f 72 20 6d 65 64 69 61 20 66 69 6c 65	"Preview.disabled.for.media.file
3bec0	73 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 74 20 28 64 69 72 76 69 73 68 2d 2d 66 69 6e 64	s"))...........(t.(dirvish--find
3bee0	2d 66 69 6c 65 2d 74 65 6d 70 6f 72 61 72 69 6c 79 20 66 69 6c 65 29 29 29 29 29 0a 0a 28 63 6c	-file-temporarily.file)))))..(cl
3bf00	2d 64 65 66 67 65 6e 65 72 69 63 20 64 69 72 76 69 73 68 2d 70 72 65 76 69 65 77 2d 64 69 73 70	-defgeneric.dirvish-preview-disp
3bf20	61 74 63 68 20 28 72 65 63 69 70 65 20 64 76 29 0a 20 20 22 52 65 74 75 72 6e 20 70 72 65 76 69	atch.(recipe.dv)..."Return.previ
3bf40	65 77 20 62 75 66 66 65 72 20 67 65 6e 65 72 61 74 65 64 20 61 63 63 6f 72 64 69 6e 67 20 74 6f	ew.buffer.generated.according.to
3bf60	20 52 45 43 49 50 45 20 69 6e 20 73 65 73 73 69 6f 6e 20 44 56 2e 22 29 0a 0a 28 63 6c 2d 64 65	.RECIPE.in.session.DV.")..(cl-de
3bf80	66 6d 65 74 68 6f 64 20 64 69 72 76 69 73 68 2d 70 72 65 76 69 65 77 2d 64 69 73 70 61 74 63 68	fmethod.dirvish-preview-dispatch
3bfa0	20 28 28 72 65 63 69 70 65 20 28 68 65 61 64 20 69 6e 66 6f 29 29 20 64 76 29 0a 20 20 22 49 6e	.((recipe.(head.info)).dv)..."In
3bfc0	73 65 72 74 20 69 6e 66 6f 20 73 74 72 69 6e 67 20 66 72 6f 6d 20 52 45 43 49 50 45 20 69 6e 74	sert.info.string.from.RECIPE.int
3bfe0	6f 20 44 56 27 73 20 70 72 65 76 69 65 77 20 62 75 66 66 65 72 2e 22 0a 20 20 28 6c 65 74 20 28	o.DV's.preview.buffer."...(let.(
3c000	28 62 75 66 20 28 64 69 72 76 69 73 68 2d 2d 75 74 69 6c 2d 62 75 66 66 65 72 20 27 70 72 65 76	(buf.(dirvish--util-buffer.'prev
3c020	69 65 77 20 64 76 20 6e 69 6c 20 74 29 29 29 0a 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e	iew.dv.nil.t))).....(with-curren
3c040	74 2d 62 75 66 66 65 72 20 62 75 66 0a 20 20 20 20 20 20 28 65 72 61 73 65 2d 62 75 66 66 65 72	t-buffer.buf.......(erase-buffer
3c060	29 20 28 72 65 6d 6f 76 65 2d 6f 76 65 72 6c 61 79 73 29 20 28 66 6f 6e 74 2d 6c 6f 63 6b 2d 6d	).(remove-overlays).(font-lock-m
3c080	6f 64 65 20 2d 31 29 0a 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 63 64 72 20 72 65 63 69 70	ode.-1).......(insert.(cdr.recip
3c0a0	65 29 29 20 62 75 66 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 64 69 72 76 69 73	e)).buf)))..(cl-defmethod.dirvis
3c0c0	68 2d 70 72 65 76 69 65 77 2d 64 69 73 70 61 74 63 68 20 28 28 72 65 63 69 70 65 20 28 68 65 61	h-preview-dispatch.((recipe.(hea
3c0e0	64 20 62 75 66 66 65 72 29 29 20 64 76 29 0a 20 20 22 55 73 65 20 70 61 79 6c 6f 61 64 20 6f 66	d.buffer)).dv)..."Use.payload.of
3c100	20 52 45 43 49 50 45 20 61 73 20 70 72 65 76 69 65 77 20 62 75 66 66 65 72 20 6f 66 20 44 56 20	.RECIPE.as.preview.buffer.of.DV.
3c120	64 69 72 65 63 74 6c 79 2e 22 0a 20 20 28 6c 65 74 20 28 28 70 2d 62 75 66 20 28 64 69 72 76 69	directly."...(let.((p-buf.(dirvi
3c140	73 68 2d 2d 75 74 69 6c 2d 62 75 66 66 65 72 20 27 70 72 65 76 69 65 77 20 64 76 20 6e 69 6c 20	sh--util-buffer.'preview.dv.nil.
3c160	74 29 29 29 0a 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 70 2d	t))).....(with-current-buffer.p-
3c180	62 75 66 20 28 65 72 61 73 65 2d 62 75 66 66 65 72 29 20 28 72 65 6d 6f 76 65 2d 6f 76 65 72 6c	buf.(erase-buffer).(remove-overl
3c1a0	61 79 73 29 20 28 63 64 72 20 72 65 63 69 70 65 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72	ays).(cdr.recipe))))..(defun.dir
3c1c0	76 69 73 68 2d 73 68 65 6c 6c 2d 70 72 65 76 69 65 77 2d 70 72 6f 63 2d 73 20 28 70 72 6f 63 20	vish-shell-preview-proc-s.(proc.
3c1e0	5f 65 78 69 74 63 6f 64 65 29 0a 20 20 22 41 20 73 65 6e 74 69 6e 65 6c 20 66 6f 72 20 64 69 72	_exitcode)..."A.sentinel.for.dir
3c200	76 69 73 68 20 70 72 65 76 69 65 77 20 70 72 6f 63 65 73 73 2e 0a 57 68 65 6e 20 50 52 4f 43 20	vish.preview.process..When.PROC.
3c220	66 69 6e 69 73 68 65 73 2c 20 66 69 6c 6c 20 70 72 65 76 69 65 77 20 62 75 66 66 65 72 20 77 69	finishes,.fill.preview.buffer.wi
3c240	74 68 20 70 72 6f 63 65 73 73 20 72 65 73 75 6c 74 2e 22 0a 20 20 28 77 68 65 6e 2d 6c 65 74 20	th.process.result."...(when-let.
3c260	28 28 64 76 20 28 6f 72 20 28 64 69 72 76 69 73 68 2d 63 75 72 72 29 20 64 69 72 76 69 73 68 2d	((dv.(or.(dirvish-curr).dirvish-
3c280	2d 74 68 69 73 29 29 29 0a 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65	-this))).....(with-current-buffe
3c2a0	72 20 28 64 69 72 76 69 73 68 2d 2d 75 74 69 6c 2d 62 75 66 66 65 72 20 27 70 72 65 76 69 65 77	r.(dirvish--util-buffer.'preview
3c2c0	20 64 76 20 6e 69 6c 20 74 29 0a 20 20 20 20 20 20 28 65 72 61 73 65 2d 62 75 66 66 65 72 29 20	.dv.nil.t).......(erase-buffer).
3c2e0	28 72 65 6d 6f 76 65 2d 6f 76 65 72 6c 61 79 73 29 0a 20 20 20 20 20 20 28 69 6e 73 65 72 74 20	(remove-overlays).......(insert.
3c300	28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 28 70 72 6f 63 65 73 73 2d 62 75	(with-current-buffer.(process-bu
3c320	66 66 65 72 20 70 72 6f 63 29 20 28 62 75 66 66 65 72 2d 73 74 72 69 6e 67 29 29 29 0a 20 20 20	ffer.proc).(buffer-string)))....
3c340	20 20 20 28 70 63 61 73 65 20 28 70 72 6f 63 65 73 73 2d 67 65 74 20 70 72 6f 63 20 27 63 6d 64	...(pcase.(process-get.proc.'cmd
3c360	2d 69 6e 66 6f 29 0a 20 20 20 20 20 20 20 20 28 27 73 68 65 6c 6c 20 28 66 6f 6e 74 2d 6c 6f 63	-info).........('shell.(font-loc
3c380	6b 2d 6d 6f 64 65 20 2d 31 29 20 28 64 69 72 76 69 73 68 2d 61 70 70 6c 79 2d 61 6e 73 69 63 6f	k-mode.-1).(dirvish-apply-ansico
3c3a0	6c 6f 72 2d 68 20 6e 69 6c 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 29 0a 20 20 20 20 20 20 20 20	lor-h.nil.(point-min))).........
3c3c0	28 27 64 69 72 65 64 0a 20 20 20 20 20 20 20 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 64 69 72	('dired..........(setq-local.dir
3c3e0	65 64 2d 73 75 62 64 69 72 2d 61 6c 69 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ed-subdir-alist.................
3c400	20 20 20 20 20 28 6c 69 73 74 20 28 63 6f 6e 73 20 28 63 61 72 20 28 64 76 2d 69 6e 64 65 78 20	.....(list.(cons.(car.(dv-index.
3c420	64 76 29 29 20 28 70 6f 69 6e 74 2d 6d 69 6e 2d 6d 61 72 6b 65 72 29 29 29 0a 20 20 20 20 20 20	dv)).(point-min-marker))).......
3c440	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 64 65 66 61 75 6c 74	...............font-lock-default
3c460	73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 28 64 69 72 65 64 2d 66	s......................'(dired-f
3c480	6f 6e 74 2d 6c 6f 63 6b 2d 6b 65 79 77 6f 72 64 73 20 74 20 6e 69 6c 20 6e 69 6c 20 62 65 67 69	ont-lock-keywords.t.nil.nil.begi
3c4a0	6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 6f 6e 74 2d 6c	nning-of-line))..........(font-l
3c4c0	6f 63 6b 2d 6d 6f 64 65 20 31 29 0a 20 20 20 20 20 20 20 20 20 28 72 75 6e 2d 68 6f 6f 6b 73 20	ock-mode.1)..........(run-hooks.
3c4e0	27 64 69 72 76 69 73 68 2d 64 69 72 65 63 74 6f 72 79 2d 76 69 65 77 2d 6d 6f 64 65 2d 68 6f 6f	'dirvish-directory-view-mode-hoo
3c500	6b 29 29 29 29 29 0a 20 20 28 6b 69 6c 6c 2d 62 75 66 66 65 72 20 28 70 72 6f 63 65 73 73 2d 62	k)))))...(kill-buffer.(process-b
3c520	75 66 66 65 72 20 70 72 6f 63 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 2d 72	uffer.proc)))..(defun.dirvish--r
3c540	75 6e 2d 73 68 65 6c 6c 2d 66 6f 72 2d 70 72 65 76 69 65 77 20 28 64 76 20 72 65 63 69 70 65 29	un-shell-for-preview.(dv.recipe)
3c560	0a 20 20 22 44 69 73 70 61 74 63 68 20 73 68 65 6c 6c 20 63 6d 64 20 77 69 74 68 20 52 45 43 49	..."Dispatch.shell.cmd.with.RECI
3c580	50 45 20 66 6f 72 20 73 65 73 73 69 6f 6e 20 44 56 2e 22 0a 20 20 28 77 68 65 6e 2d 6c 65 74 20	PE.for.session.DV."...(when-let.
3c5a0	28 28 70 72 6f 63 20 28 67 65 74 2d 62 75 66 66 65 72 2d 70 72 6f 63 65 73 73 20 28 67 65 74 2d	((proc.(get-buffer-process.(get-
3c5c0	62 75 66 66 65 72 20 22 20 2a 44 69 72 76 69 73 68 2d 74 65 6d 70 2a 22 29 29 29 29 0a 20 20 20	buffer.".Dirvish-temp"))))....
3c5e0	20 28 64 65 6c 65 74 65 2d 70 72 6f 63 65 73 73 20 70 72 6f 63 29 29 0a 20 20 28 6c 65 74 20 28	.(delete-process.proc))...(let.(
3c600	28 62 75 66 20 28 64 69 72 76 69 73 68 2d 2d 75 74 69 6c 2d 62 75 66 66 65 72 20 27 70 72 65 76	(buf.(dirvish--util-buffer.'prev
3c620	69 65 77 20 64 76 20 6e 69 6c 20 74 29 29 0a 20 20 20 20 20 20 20 20 28 70 72 6f 63 20 28 6d 61	iew.dv.nil.t)).........(proc.(ma
3c640	6b 65 2d 70 72 6f 63 65 73 73 20 3a 6e 61 6d 65 20 22 73 68 2d 6f 75 74 22 20 3a 63 6f 6e 6e 65	ke-process.:name."sh-out".:conne
3c660	63 74 69 6f 6e 2d 74 79 70 65 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ction-type.nil..................
3c680	20 20 20 20 20 20 20 20 20 20 20 3a 62 75 66 66 65 72 20 22 20 2a 44 69 72 76 69 73 68 2d 74 65	...........:buffer.".*Dirvish-te
3c6a0	6d 70 2a 22 20 3a 63 6f 6d 6d 61 6e 64 20 28 63 64 72 20 72 65 63 69 70 65 29 0a 20 20 20 20 20	mp*".:command.(cdr.recipe)......
3c6c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 65 6e 74 69 6e 65 6c	.......................:sentinel
3c6e0	20 27 64 69 72 76 69 73 68 2d 73 68 65 6c 6c 2d 70 72 65 76 69 65 77 2d 70 72 6f 63 2d 73 29 29	.'dirvish-shell-preview-proc-s))
3c700	29 0a 20 20 20 20 28 70 72 6f 63 65 73 73 2d 70 75 74 20 70 72 6f 63 20 27 63 6d 64 2d 69 6e 66	).....(process-put.proc.'cmd-inf
3c720	6f 20 28 63 61 72 20 72 65 63 69 70 65 29 29 0a 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e	o.(car.recipe)).....(with-curren
3c740	74 2d 62 75 66 66 65 72 20 62 75 66 20 28 65 72 61 73 65 2d 62 75 66 66 65 72 29 20 28 72 65 6d	t-buffer.buf.(erase-buffer).(rem
3c760	6f 76 65 2d 6f 76 65 72 6c 61 79 73 29 20 62 75 66 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74	ove-overlays).buf)))..(cl-defmet
3c780	68 6f 64 20 64 69 72 76 69 73 68 2d 70 72 65 76 69 65 77 2d 64 69 73 70 61 74 63 68 20 28 28 72	hod.dirvish-preview-dispatch.((r
3c7a0	65 63 69 70 65 20 28 68 65 61 64 20 73 68 65 6c 6c 29 29 20 64 76 29 0a 20 20 22 46 69 6c 6c 20	ecipe.(head.shell)).dv)..."Fill.
3c7c0	44 56 27 73 20 70 72 65 76 69 65 77 20 62 75 66 66 65 72 20 77 69 74 68 20 6f 75 74 70 75 74 20	DV's.preview.buffer.with.output.
3c7e0	6f 66 20 73 68 20 63 6f 6d 6d 61 6e 64 20 66 72 6f 6d 20 52 45 43 49 50 45 2e 22 0a 20 20 28 64	of.sh.command.from.RECIPE."...(d
3c800	69 72 76 69 73 68 2d 2d 72 75 6e 2d 73 68 65 6c 6c 2d 66 6f 72 2d 70 72 65 76 69 65 77 20 64 76	irvish--run-shell-for-preview.dv
3c820	20 72 65 63 69 70 65 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 64 69 72 76 69 73 68	.recipe))..(cl-defmethod.dirvish
3c840	2d 70 72 65 76 69 65 77 2d 64 69 73 70 61 74 63 68 20 28 28 72 65 63 69 70 65 20 28 68 65 61 64	-preview-dispatch.((recipe.(head
3c860	20 64 69 72 65 64 29 29 20 64 76 29 0a 20 20 22 46 69 6c 6c 20 44 56 27 73 20 70 72 65 76 69 65	.dired)).dv)..."Fill.DV's.previe
3c880	77 20 62 75 66 66 65 72 20 77 69 74 68 20 6f 75 74 70 75 74 20 6f 66 20 73 68 20 63 6f 6d 6d 61	w.buffer.with.output.of.sh.comma
3c8a0	6e 64 20 66 72 6f 6d 20 52 45 43 49 50 45 2e 22 0a 20 20 28 64 69 72 76 69 73 68 2d 2d 72 75 6e	nd.from.RECIPE."...(dirvish--run
3c8c0	2d 73 68 65 6c 6c 2d 66 6f 72 2d 70 72 65 76 69 65 77 20 64 76 20 72 65 63 69 70 65 29 29 0a 0a	-shell-for-preview.dv.recipe))..
3c8e0	28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 2d 70 72 65 76 69 65 77 2d 75 70 64 61 74 65 20 28	(defun.dirvish--preview-update.(
3c900	64 76 20 69 6e 64 65 78 29 0a 20 20 22 55 70 64 61 74 65 20 70 72 65 76 69 65 77 20 63 6f 6e 74	dv.index)..."Update.preview.cont
3c920	65 6e 74 20 6f 66 20 49 4e 44 45 58 20 66 6f 72 20 44 56 2e 22 0a 20 20 28 77 68 65 6e 2d 6c 65	ent.of.INDEX.for.DV."...(when-le
3c940	74 2a 20 28 28 77 69 6e 64 6f 77 20 28 64 76 2d 70 72 65 76 69 65 77 2d 77 69 6e 64 6f 77 20 64	t*.((window.(dv-preview-window.d
3c960	76 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 77 69 6e 64 6f 77 2d 6c 69 76 65 2d	v))...............((window-live-
3c980	70 20 77 69 6e 64 6f 77 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 69 67 2d 62	p.window))...............(orig-b
3c9a0	75 66 73 20 28 62 75 66 66 65 72 2d 6c 69 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	ufs.(buffer-list))..............
3c9c0	20 28 65 78 74 20 28 64 6f 77 6e 63 61 73 65 20 28 6f 72 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 65	.(ext.(downcase.(or.(file-name-e
3c9e0	78 74 65 6e 73 69 6f 6e 20 69 6e 64 65 78 29 20 22 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20	xtension.index)."")))...........
3ca00	20 20 20 20 28 62 75 66 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 66 6e 20 69 6e 20 64 69 72 76	....(buf.(cl-loop.for.fn.in.dirv
3ca20	69 73 68 2d 2d 77 6f 72 6b 69 6e 67 2d 70 72 65 76 69 65 77 2d 64 69 73 70 61 74 68 63 68 65 72	ish--working-preview-dispathcher
3ca40	73 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 66 6f	s.............................fo
3ca60	72 20 72 63 70 20 3d 20 28 66 75 6e 63 61 6c 6c 20 66 6e 20 69 6e 64 65 78 20 65 78 74 20 77 69	r.rcp.=.(funcall.fn.index.ext.wi
3ca80	6e 64 6f 77 20 64 76 29 20 74 68 65 72 65 69 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ndow.dv).thereis................
3caa0	20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 72 63 70 20 28 64 69 72 76 69 73 68 2d 70	.............(and.rcp.(dirvish-p
3cac0	72 65 76 69 65 77 2d 64 69 73 70 61 74 63 68 20 72 63 70 20 64 76 29 29 29 29 29 0a 20 20 20 20	review-dispatch.rcp.dv))))).....
3cae0	28 73 65 74 71 2d 6c 6f 63 61 6c 20 6f 74 68 65 72 2d 77 69 6e 64 6f 77 2d 73 63 72 6f 6c 6c 2d	(setq-local.other-window-scroll-
3cb00	62 75 66 66 65 72 20 62 75 66 29 0a 20 20 20 20 28 73 65 74 2d 77 69 6e 64 6f 77 2d 62 75 66 66	buffer.buf).....(set-window-buff
3cb20	65 72 20 77 69 6e 64 6f 77 20 62 75 66 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 28 6d 65 6d 71	er.window.buf).....(unless.(memq
3cb40	20 62 75 66 20 6f 72 69 67 2d 62 75 66 73 29 20 28 70 75 73 68 20 62 75 66 20 28 64 76 2d 70 72	.buf.orig-bufs).(push.buf.(dv-pr
3cb60	65 76 69 65 77 2d 62 75 66 66 65 72 73 20 64 76 29 29 29 29 29 0a 0a 3b 3b 3b 3b 20 42 75 69 6c	eview-buffers.dv)))))..;;;;.Buil
3cb80	64 65 72 0a 0a 28 64 69 72 76 69 73 68 2d 64 65 66 69 6e 65 2d 61 74 74 72 69 62 75 74 65 20 68	der..(dirvish-define-attribute.h
3cba0	6c 2d 6c 69 6e 65 0a 20 20 22 48 69 67 68 6c 69 67 68 74 20 63 75 72 72 65 6e 74 20 6c 69 6e 65	l-line..."Highlight.current.line
3cbc0	2e 0a 54 68 69 73 20 61 74 74 72 69 62 75 74 65 20 69 73 20 65 6e 61 62 6c 65 64 20 77 68 65 6e	..This.attribute.is.enabled.when
3cbe0	20 60 64 69 72 76 69 73 68 2d 68 69 64 65 2d 63 75 72 73 6f 72 27 20 69 73 20 6e 6f 6e 2d 6e 69	.`dirvish-hide-cursor'.is.non-ni
3cc00	6c 2e 22 0a 20 20 28 77 68 65 6e 20 68 6c 2d 66 61 63 65 0a 20 20 20 20 28 6c 65 74 20 28 28 6f	l."...(when.hl-face.....(let.((o
3cc20	76 20 28 6d 61 6b 65 2d 6f 76 65 72 6c 61 79 20 6c 2d 62 65 67 20 28 31 2b 20 6c 2d 65 6e 64 29	v.(make-overlay.l-beg.(1+.l-end)
3cc40	29 29 29 0a 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 76 20 27 66 61 63 65 20	))).......(overlay-put.ov.'face.
3cc60	68 6c 2d 66 61 63 65 29 20 60 28 6f 76 20 2e 20 2c 6f 76 29 29 29 29 0a 0a 28 64 69 72 76 69 73	hl-face).`(ov...,ov))))..(dirvis
3cc80	68 2d 64 65 66 69 6e 65 2d 61 74 74 72 69 62 75 74 65 20 73 79 6d 6c 69 6e 6b 2d 74 61 72 67 65	h-define-attribute.symlink-targe
3cca0	74 0a 20 20 22 48 69 64 65 20 73 79 6d 6c 69 6e 6b 20 74 61 72 67 65 74 2e 22 0a 20 20 3a 77 68	t..."Hide.symlink.target."...:wh
3ccc0	65 6e 20 28 6f 72 20 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 64 69 72 76 69 73 68 2d 64	en.(or.(eq.major-mode.'dirvish-d
3cce0	69 72 65 63 74 6f 72 79 2d 76 69 65 77 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	irectory-view-mode).............
3cd00	28 61 6e 64 20 64 69 72 65 64 2d 68 69 64 65 2d 64 65 74 61 69 6c 73 2d 6d 6f 64 65 0a 20 20 20	(and.dired-hide-details-mode....
3cd20	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 66 61 75 6c 74 2d 76 61 6c 75 65 20 27 64 69	..............(default-value.'di
3cd40	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 6e 6b 2d 74 61	red-hide-details-hide-symlink-ta
3cd60	72 67 65 74 73 29 29 29 0a 20 20 28 77 68 65 6e 20 28 3c 20 28 2b 20 66 2d 65 6e 64 20 34 29 20	rgets)))...(when.(<.(+.f-end.4).
3cd80	6c 2d 65 6e 64 29 0a 20 20 20 20 28 6c 65 74 20 28 28 6f 76 20 28 6d 61 6b 65 2d 6f 76 65 72 6c	l-end).....(let.((ov.(make-overl
3cda0	61 79 20 66 2d 65 6e 64 20 6c 2d 65 6e 64 29 29 29 0a 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79	ay.f-end.l-end))).......(overlay
3cdc0	2d 70 75 74 20 6f 76 20 27 69 6e 76 69 73 69 62 6c 65 20 74 29 20 60 28 6f 76 20 2e 20 2c 6f 76	-put.ov.'invisible.t).`(ov...,ov
3cde0	29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 2d 6d 6f 64 65 2d 6c 69 6e 65 2d	))))..(defun.dirvish--mode-line-
3ce00	66 6d 74 2d 73 65 74 74 65 72 20 28 6c 65 66 74 20 72 69 67 68 74 20 26 6f 70 74 69 6f 6e 61 6c	fmt-setter.(left.right.&optional
3ce20	20 68 65 61 64 65 72 29 0a 20 20 22 53 65 74 20 74 68 65 20 60 64 69 72 76 69 73 68 2d 2d 6d 6f	.header)..."Set.the.`dirvish--mo
3ce40	64 65 2d 6c 69 6e 65 2d 66 6d 74 27 2e 0a 4c 45 46 54 20 61 6e 64 20 52 49 47 48 54 20 61 72 65	de-line-fmt'..LEFT.and.RIGHT.are
3ce60	20 73 65 67 6d 65 6e 74 73 20 61 6c 69 67 6e 65 64 20 74 6f 20 6c 65 66 74 2f 72 69 67 68 74 20	.segments.aligned.to.left/right.
3ce80	72 65 73 70 65 63 74 69 76 65 6c 79 2e 0a 49 66 20 48 45 41 44 45 52 2c 20 73 65 74 20 74 68 65	respectively..If.HEADER,.set.the
3cea0	20 60 64 69 72 76 69 73 68 2d 2d 68 65 61 64 65 72 2d 6c 69 6e 65 2d 66 6d 74 27 20 69 6e 73 74	.`dirvish--header-line-fmt'.inst
3cec0	65 61 64 2e 22 0a 20 20 28 63 6c 2d 6c 61 62 65 6c 73 20 28 28 65 78 70 61 6e 64 20 28 73 65 67	ead."...(cl-labels.((expand.(seg
3cee0	6d 65 6e 74 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20	ments).................(cl-loop.
3cf00	66 6f 72 20 73 20 69 6e 20 73 65 67 6d 65 6e 74 73 20 63 6f 6c 6c 65 63 74 0a 20 20 20 20 20 20	for.s.in.segments.collect.......
3cf20	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 73 74 72 69 6e 67 70 20	...................(if.(stringp.
3cf40	73 29 20 73 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	s).s............................
3cf60	60 28 3a 65 76 61 6c 20 28 2c 28 69 6e 74 65 72 6e 20 28 66 6f 72 6d 61 74 20 22 64 69 72 76 69	`(:eval.(,(intern.(format."dirvi
3cf80	73 68 2d 25 73 2d 6d 6c 22 20 73 29 29 20 64 76 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20	sh-%s-ml".s)).dv)))))...........
3cfa0	20 20 20 20 28 67 65 74 2d 66 6f 6e 74 2d 73 63 61 6c 65 20 28 29 0a 20 20 20 20 20 20 20 20 20	....(get-font-scale.()..........
3cfc0	20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 66 61 63 65 20 28 69 66 20 68 65 61 64 65 72 20 27	.......(let*.((face.(if.header.'
3cfe0	68 65 61 64 65 72 2d 6c 69 6e 65 20 27 6d 6f 64 65 2d 6c 69 6e 65 2d 69 6e 61 63 74 69 76 65 29	header-line.'mode-line-inactive)
3d000	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 64 65 66 75 61 6c	)........................(defual
3d020	74 20 28 66 61 63 65 2d 61 74 74 72 69 62 75 74 65 20 27 64 65 66 61 75 6c 74 20 3a 68 65 69 67	t.(face-attribute.'default.:heig
3d040	68 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 6c 2d	ht))........................(ml-
3d060	68 65 69 67 68 74 20 28 66 61 63 65 2d 61 74 74 72 69 62 75 74 65 20 66 61 63 65 20 3a 68 65 69	height.(face-attribute.face.:hei
3d080	67 68 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28	ght)))...................(cond.(
3d0a0	28 66 6c 6f 61 74 70 20 6d 6c 2d 68 65 69 67 68 74 29 20 6d 6c 2d 68 65 69 67 68 74 29 0a 20 20	(floatp.ml-height).ml-height)...
3d0c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 69 6e 74 65 67 65 72 70	......................((integerp
3d0e0	20 6d 6c 2d 68 65 69 67 68 74 29 20 28 2f 20 28 66 6c 6f 61 74 20 6d 6c 2d 68 65 69 67 68 74 29	.ml-height).(/.(float.ml-height)
3d100	20 64 65 66 75 61 6c 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	.defualt))......................
3d120	20 20 20 28 74 20 31 29 29 29 29 29 0a 20 20 20 20 60 28 28 3a 65 76 61 6c 0a 20 20 20 20 20 20	...(t.1))))).....`((:eval.......
3d140	20 28 6c 65 74 2a 20 28 28 64 76 20 28 64 69 72 76 69 73 68 2d 63 75 72 72 29 29 0a 20 20 20 20	.(let*.((dv.(dirvish-curr)).....
3d160	20 20 20 20 20 20 20 20 20 20 28 62 75 66 20 28 61 6e 64 20 28 63 61 72 20 28 64 76 2d 6c 61 79	..........(buf.(and.(car.(dv-lay
3d180	6f 75 74 20 64 76 29 29 20 28 63 64 72 20 28 64 76 2d 69 6e 64 65 78 20 64 76 29 29 29 29 0a 20	out.dv)).(cdr.(dv-index.dv))))..
3d1a0	20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 63 61 6c 65 20 2c 28 67 65 74 2d 66 6f 6e 74 2d 73	.............(scale.,(get-font-s
3d1c0	63 61 6c 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 6e 2d 77 69 64 74 68 20	cale))...............(win-width.
3d1e0	28 66 6c 6f 6f 72 20 28 2f 20 28 77 69 6e 64 6f 77 2d 77 69 64 74 68 29 20 73 63 61 6c 65 29 29	(floor.(/.(window-width).scale))
3d200	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 2d 6c 20 28 66 6f 72 6d 61 74 2d 6d	)...............(str-l.(format-m
3d220	6f 64 65 2d 6c 69 6e 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27	ode-line.......................'
3d240	2c 28 6f 72 20 28 65 78 70 61 6e 64 20 6c 65 66 74 29 20 6d 6f 64 65 2d 6c 69 6e 65 2d 66 6f 72	,(or.(expand.left).mode-line-for
3d260	6d 61 74 29 20 6e 69 6c 20 6e 69 6c 20 62 75 66 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	mat).nil.nil.buf))..............
3d280	20 28 73 74 72 2d 72 20 28 66 6f 72 6d 61 74 2d 6d 6f 64 65 2d 6c 69 6e 65 20 27 2c 28 65 78 70	.(str-r.(format-mode-line.',(exp
3d2a0	61 6e 64 20 72 69 67 68 74 29 20 6e 69 6c 20 6e 69 6c 20 62 75 66 29 29 0a 20 20 20 20 20 20 20	and.right).nil.nil.buf))........
3d2c0	20 20 20 20 20 20 20 28 6c 65 6e 2d 72 20 28 73 74 72 69 6e 67 2d 77 69 64 74 68 20 73 74 72 2d	.......(len-r.(string-width.str-
3d2e0	72 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 0a 20 20 20 20 20 20 20 20 20 20	r)))..........(concat...........
3d300	28 64 69 72 76 69 73 68 2d 2d 62 61 72 2d 69 6d 61 67 65 20 28 63 61 72 20 28 64 76 2d 6c 61 79	(dirvish--bar-image.(car.(dv-lay
3d320	6f 75 74 20 64 76 29 29 20 2c 68 65 61 64 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 28 69 66 20	out.dv)).,header)...........(if.
3d340	28 3c 20 28 2b 20 28 73 74 72 69 6e 67 2d 77 69 64 74 68 20 73 74 72 2d 6c 29 20 6c 65 6e 2d 72	(<.(+.(string-width.str-l).len-r
3d360	29 20 77 69 6e 2d 77 69 64 74 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 74 72 2d 6c	).win-width)...............str-l
3d380	0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 74 72 69 6d 20 28 31 2d 20 28 2d 20	.............(let.((trim.(1-.(-.
3d3a0	77 69 6e 2d 77 69 64 74 68 20 6c 65 6e 2d 72 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	win-width.len-r)))).............
3d3c0	20 20 28 69 66 20 28 3e 3d 20 74 72 69 6d 20 30 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	..(if.(>=.trim.0)...............
3d3e0	20 20 20 20 28 73 75 62 73 74 72 69 6e 67 20 73 74 72 2d 6c 20 30 20 28 6d 69 6e 20 74 72 69 6d	....(substring.str-l.0.(min.trim
3d400	20 28 31 2d 20 28 6c 65 6e 67 74 68 20 73 74 72 2d 6c 29 29 29 29 0a 20 20 20 20 20 20 20 20 20	.(1-.(length.str-l))))..........
3d420	20 20 20 20 20 20 20 22 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69	......."")))...........(properti
3d440	7a 65 0a 20 20 20 20 20 20 20 20 20 20 20 22 20 22 20 27 64 69 73 70 6c 61 79 0a 20 20 20 20 20	ze............".".'display......
3d460	20 20 20 20 20 20 60 28 28 73 70 61 63 65 20 3a 61 6c 69 67 6e 2d 74 6f 20 28 2d 20 28 2b 20 72	......`((space.:align-to.(-.(+.r
3d480	69 67 68 74 20 72 69 67 68 74 2d 66 72 69 6e 67 65 20 72 69 67 68 74 2d 6d 61 72 67 69 6e 29 0a	ight.right-fringe.right-margin).
3d4a0	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	................................
3d4c0	20 2c 28 63 65 69 6c 69 6e 67 20 28 2a 20 73 63 61 6c 65 20 28 73 74 72 69 6e 67 2d 77 69 64 74	.,(ceiling.(*.scale.(string-widt
3d4e0	68 20 73 74 72 2d 72 29 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 73 74 72 2d 72 29 29	h.str-r)))))))...........str-r))
3d500	29 29 29 29 0a 0a 3b 3b 20 54 68 61 6e 6b 73 20 74 6f 20 60 64 6f 6f 6d 2d 6d 6f 64 65 6c 69 6e	))))..;;.Thanks.to.`doom-modelin
3d520	65 27 2e 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 2d 62 61 72 2d 69 6d 61 67 65 20 28 66	e'..(defun.dirvish--bar-image.(f
3d540	75 6c 6c 73 63 72 65 65 6e 70 20 68 65 61 64 65 72 29 0a 20 20 22 43 72 65 61 74 65 20 61 20 62	ullscreenp.header)..."Create.a.b
3d560	61 72 20 69 6d 61 67 65 20 77 69 74 68 20 68 65 69 67 68 74 20 6f 66 20 60 64 69 72 76 69 73 68	ar.image.with.height.of.`dirvish
3d580	2d 6d 6f 64 65 2d 6c 69 6e 65 2d 68 65 69 67 68 74 27 2e 0a 49 66 20 46 55 4c 4c 53 43 52 45 45	-mode-line-height'..If.FULLSCREE
3d5a0	4e 50 2c 20 75 73 65 20 74 68 65 20 60 63 64 72 27 20 6f 66 20 74 68 65 20 76 61 6c 75 65 20 61	NP,.use.the.`cdr'.of.the.value.a
3d5c0	73 20 68 65 69 67 68 74 2c 20 6f 74 68 65 72 77 69 73 65 0a 75 73 65 20 60 63 61 72 27 2e 20 20	s.height,.otherwise.use.`car'...
3d5e0	49 66 20 48 45 41 44 45 52 2c 20 75 73 65 20 60 64 69 72 76 69 73 68 2d 68 65 61 64 65 72 2d 6c	If.HEADER,.use.`dirvish-header-l
3d600	69 6e 65 2d 68 65 69 67 68 74 27 20 69 6e 73 74 65 61 64 2e 22 0a 20 20 28 77 68 65 6e 20 28 61	ine-height'.instead."...(when.(a
3d620	6e 64 20 28 64 69 73 70 6c 61 79 2d 67 72 61 70 68 69 63 2d 70 29 20 28 69 6d 61 67 65 2d 74 79	nd.(display-graphic-p).(image-ty
3d640	70 65 2d 61 76 61 69 6c 61 62 6c 65 2d 70 20 27 70 62 6d 29 29 0a 20 20 20 20 28 6c 65 74 2a 20	pe-available-p.'pbm)).....(let*.
3d660	28 28 68 76 20 28 69 66 20 68 65 61 64 65 72 20 64 69 72 76 69 73 68 2d 68 65 61 64 65 72 2d 6c	((hv.(if.header.dirvish-header-l
3d680	69 6e 65 2d 68 65 69 67 68 74 20 64 69 72 76 69 73 68 2d 6d 6f 64 65 2d 6c 69 6e 65 2d 68 65 69	ine-height.dirvish-mode-line-hei
3d6a0	67 68 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 68 74 20 28 63 6f 6e 64 20 28 28 6e 75 6d	ght))............(ht.(cond.((num
3d6c0	62 65 72 70 20 68 76 29 20 68 76 29 20 28 66 75 6c 6c 73 63 72 65 65 6e 70 20 28 63 64 72 20 68	berp.hv).hv).(fullscreenp.(cdr.h
3d6e0	76 29 29 20 28 74 20 28 63 61 72 20 68 76 29 29 29 29 29 0a 20 20 20 20 20 20 28 70 72 6f 70 65	v)).(t.(car.hv))))).......(prope
3d700	72 74 69 7a 65 0a 20 20 20 20 20 20 20 22 20 22 20 27 64 69 73 70 6c 61 79 0a 20 20 20 20 20 20	rtize........".".'display.......
3d720	20 28 69 67 6e 6f 72 65 2d 65 72 72 6f 72 73 0a 20 20 20 20 20 20 20 20 20 28 63 72 65 61 74 65	.(ignore-errors..........(create
3d740	2d 69 6d 61 67 65 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 28 66 6f 72 6d 61 74	-image...........(concat.(format
3d760	20 22 50 31 5c 6e 25 69 20 25 69 5c 6e 22 20 32 20 68 74 29 20 28 6d 61 6b 65 2d 73 74 72 69 6e	."P1\n%i.%i\n".2.ht).(make-strin
3d780	67 20 28 2a 20 32 20 68 74 29 20 3f 31 29 20 22 5c 6e 22 29 0a 20 20 20 20 20 20 20 20 20 20 27	g.(*.2.ht).?1)."\n")...........'
3d7a0	70 62 6d 20 74 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 4e 6f 6e 65 22 20 3a 61 73 63 65 6e 74	pbm.t.:foreground."None".:ascent
3d7c0	20 27 63 65 6e 74 65 72 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 2d	.'center))))))..(defun.dirvish--
3d7e0	68 69 64 65 2d 63 75 72 73 6f 72 20 28 29 0a 20 20 22 48 69 64 65 20 63 75 72 73 6f 72 20 69 6e	hide-cursor.()..."Hide.cursor.in
3d800	20 64 69 72 76 69 73 68 20 62 75 66 66 65 72 2e 22 0a 20 20 28 77 68 65 6e 20 64 69 72 76 69 73	.dirvish.buffer."...(when.dirvis
3d820	68 2d 68 69 64 65 2d 63 75 72 73 6f 72 0a 20 20 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 63 75	h-hide-cursor.....(setq-local.cu
3d840	72 73 6f 72 2d 74 79 70 65 20 6e 69 6c 29 0a 20 20 20 20 28 63 6f 6e 64 20 28 28 61 6e 64 20 28	rsor-type.nil).....(cond.((and.(
3d860	62 6f 75 6e 64 70 20 27 65 76 69 6c 2d 6e 6f 72 6d 61 6c 2d 73 74 61 74 65 2d 63 75 72 73 6f 72	boundp.'evil-normal-state-cursor
3d880	29 20 28 66 65 61 74 75 72 65 70 20 27 65 76 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28	).(featurep.'evil))............(
3d8a0	73 65 74 71 2d 6c 6f 63 61 6c 20 65 76 69 6c 2d 6e 6f 72 6d 61 6c 2d 73 74 61 74 65 2d 63 75 72	setq-local.evil-normal-state-cur
3d8c0	73 6f 72 20 27 28 62 61 72 20 2e 20 30 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 28 61 6e 64	sor.'(bar...0)))...........((and
3d8e0	20 28 62 6f 75 6e 64 70 20 27 6d 65 6f 77 2d 63 75 72 73 6f 72 2d 74 79 70 65 2d 64 65 66 61 75	.(boundp.'meow-cursor-type-defau
3d900	6c 74 29 20 28 66 65 61 74 75 72 65 70 20 27 6d 65 6f 77 29 29 0a 20 20 20 20 20 20 20 20 20 20	lt).(featurep.'meow))...........
3d920	20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 6d 65 6f 77 2d 63 75 72 73 6f 72 2d 74 79 70 65 2d 6d 6f	.(setq-local.meow-cursor-type-mo
3d940	74 69 6f 6e 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	tion.nil........................
3d960	6d 65 6f 77 2d 63 75 72 73 6f 72 2d 74 79 70 65 2d 64 65 66 61 75 6c 74 20 6e 69 6c 29 29 29 29	meow-cursor-type-default.nil))))
3d980	29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 2d 73 65 74 75 70 2d 6d 6f 64 65 2d 6c 69	)..(defun.dirvish--setup-mode-li
3d9a0	6e 65 20 28 6c 61 79 6f 75 74 29 0a 20 20 22 53 65 74 75 70 20 74 68 65 20 6d 6f 64 65 2f 68 65	ne.(layout)..."Setup.the.mode/he
3d9c0	61 64 65 72 20 6c 69 6e 65 20 61 63 63 6f 72 64 69 6e 67 20 74 6f 20 4c 41 59 4f 55 54 2e 22 0a	ader.line.according.to.LAYOUT.".
3d9e0	20 20 28 73 65 74 71 20 6d 6f 64 65 2d 6c 69 6e 65 2d 66 6f 72 6d 61 74 0a 20 20 20 20 20 20 20	..(setq.mode-line-format........
3da00	20 28 75 6e 6c 65 73 73 20 28 6f 72 20 6c 61 79 6f 75 74 20 28 6e 6f 74 20 64 69 72 76 69 73 68	.(unless.(or.layout.(not.dirvish
3da20	2d 75 73 65 2d 6d 6f 64 65 2d 6c 69 6e 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 64 69 72 76 69	-use-mode-line))...........dirvi
3da40	73 68 2d 2d 6d 6f 64 65 2d 6c 69 6e 65 2d 66 6d 74 29 0a 20 20 20 20 20 20 20 20 68 65 61 64 65	sh--mode-line-fmt).........heade
3da60	72 2d 6c 69 6e 65 2d 66 6f 72 6d 61 74 0a 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 6f 72	r-line-format.........(cond.((or
3da80	20 6c 61 79 6f 75 74 20 28 6e 6f 74 20 64 69 72 76 69 73 68 2d 75 73 65 2d 68 65 61 64 65 72 2d	.layout.(not.dirvish-use-header-
3daa0	6c 69 6e 65 29 29 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 20 28 6f 72	line)).nil)...............(t.(or
3dac0	20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 63 75 73 2d 68 65 61 64 65 72 29 20 64 69 72 76	.(dirvish-prop.:cus-header).dirv
3dae0	69 73 68 2d 2d 68 65 61 64 65 72 2d 6c 69 6e 65 2d 66 6d 74 29 29 29 29 29 0a 0a 28 64 65 66 75	ish--header-line-fmt)))))..(defu
3db00	6e 20 64 69 72 76 69 73 68 2d 72 65 76 65 72 74 20 28 26 6f 70 74 69 6f 6e 61 6c 20 69 67 6e 6f	n.dirvish-revert.(&optional.igno
3db20	72 65 2d 61 75 74 6f 20 5f 6e 6f 63 6f 6e 66 69 72 6d 29 0a 20 20 22 52 65 72 65 61 64 20 74 68	re-auto._noconfirm)..."Reread.th
3db40	65 20 44 69 72 76 69 73 68 20 62 75 66 66 65 72 2e 0a 57 68 65 6e 20 49 47 4e 4f 52 45 2d 41 55	e.Dirvish.buffer..When.IGNORE-AU
3db60	54 4f 2c 20 72 65 66 72 65 73 68 20 66 69 6c 65 20 61 74 74 72 69 62 75 74 65 73 20 61 73 20 77	TO,.refresh.file.attributes.as.w
3db80	65 6c 6c 2e 0a 44 69 72 76 69 73 68 20 73 65 74 73 20 60 72 65 76 65 72 74 2d 62 75 66 66 65 72	ell..Dirvish.sets.`revert-buffer
3dba0	2d 66 75 6e 63 74 69 6f 6e 27 20 74 6f 20 74 68 69 73 20 66 75 6e 63 74 69 6f 6e 2e 22 0a 20 20	-function'.to.this.function."...
3dbc0	28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 6f 6c 64 2d 69 6e 64 65 78 20 28 64 69 72 65 64 2d	(dirvish-prop.:old-index.(dired-
3dbe0	67 65 74 2d 66 69 6c 65 6e 61 6d 65 20 6e 69 6c 20 74 29 29 0a 20 20 28 64 6f 6c 69 73 74 20 28	get-filename.nil.t))...(dolist.(
3dc00	6b 65 79 77 6f 72 64 20 64 69 72 76 69 73 68 2d 2d 72 65 73 65 74 2d 6b 65 79 77 6f 72 64 73 29	keyword.dirvish--reset-keywords)
3dc20	20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 6b 65 79 77 6f 72 64 20 6e 69 6c 29 29 0a 20 20 28	.(dirvish-prop.keyword.nil))...(
3dc40	64 69 72 65 64 2d 72 65 76 65 72 74 29 0a 20 20 28 64 69 72 76 69 73 68 2d 2d 68 69 64 65 2d 64	dired-revert)...(dirvish--hide-d
3dc60	69 72 65 64 2d 68 65 61 64 65 72 29 0a 20 20 28 77 68 65 6e 20 69 67 6e 6f 72 65 2d 61 75 74 6f	ired-header)...(when.ignore-auto
3dc80	20 3b 20 6d 65 61 6e 69 6e 67 20 69 74 20 69 73 20 63 61 6c 6c 65 64 20 69 6e 74 65 72 61 63 74	.;.meaning.it.is.called.interact
3dca0	69 76 65 6c 79 20 66 72 6f 6d 20 75 73 65 72 0a 20 20 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20	ively.from.user.....(setq-local.
3dcc0	64 69 72 76 69 73 68 2d 2d 61 74 74 72 73 2d 68 61 73 68 20 28 6d 61 6b 65 2d 68 61 73 68 2d 74	dirvish--attrs-hash.(make-hash-t
3dce0	61 62 6c 65 29 29 0a 20 20 20 20 28 64 69 72 76 69 73 68 2d 64 61 74 61 2d 66 6f 72 2d 64 69 72	able)).....(dirvish-data-for-dir
3dd00	20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66	.default-directory.(current-buff
3dd20	65 72 29 20 74 29 29 0a 20 20 28 72 75 6e 2d 68 6f 6f 6b 73 20 27 64 69 72 76 69 73 68 2d 61 66	er).t))...(run-hooks.'dirvish-af
3dd40	74 65 72 2d 72 65 76 65 72 74 2d 68 6f 6f 6b 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73	ter-revert-hook))..(defun.dirvis
3dd60	68 2d 69 6e 69 74 2d 64 69 72 65 64 2d 62 75 66 66 65 72 20 28 29 0a 20 20 22 49 6e 69 74 69 61	h-init-dired-buffer.()..."Initia
3dd80	6c 69 7a 65 20 61 20 44 69 72 65 64 20 62 75 66 66 65 72 20 66 6f 72 20 64 69 72 76 69 73 68 2e	lize.a.Dired.buffer.for.dirvish.
3dda0	22 0a 20 20 28 77 68 65 6e 20 28 66 69 6c 65 2d 72 65 6d 6f 74 65 2d 70 20 64 65 66 61 75 6c 74	"...(when.(file-remote-p.default
3ddc0	2d 64 69 72 65 63 74 6f 72 79 29 0a 20 20 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 64 69 72 76	-directory).....(setq-local.dirv
3dde0	69 73 68 2d 2d 77 6f 72 6b 69 6e 67 2d 70 72 65 76 69 65 77 2d 64 69 73 70 61 74 68 63 68 65 72	ish--working-preview-dispathcher
3de00	73 20 27 28 64 69 72 76 69 73 68 2d 74 72 61 6d 70 2d 64 70 29 29 29 0a 20 20 28 75 73 65 2d 6c	s.'(dirvish-tramp-dp)))...(use-l
3de20	6f 63 61 6c 2d 6d 61 70 20 64 69 72 76 69 73 68 2d 6d 6f 64 65 2d 6d 61 70 29 0a 20 20 28 64 69	ocal-map.dirvish-mode-map)...(di
3de40	72 76 69 73 68 2d 2d 68 69 64 65 2d 63 75 72 73 6f 72 29 0a 20 20 28 64 69 72 76 69 73 68 2d 2d	rvish--hide-cursor)...(dirvish--
3de60	68 69 64 65 2d 64 69 72 65 64 2d 68 65 61 64 65 72 29 0a 20 20 28 61 6e 64 20 64 69 72 76 69 73	hide-dired-header)...(and.dirvis
3de80	68 2d 68 69 64 65 2d 64 65 74 61 69 6c 73 20 28 64 69 72 65 64 2d 68 69 64 65 2d 64 65 74 61 69	h-hide-details.(dired-hide-detai
3dea0	6c 73 2d 6d 6f 64 65 20 74 29 29 0a 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 64 69 72 76 69 73	ls-mode.t))...(setq-local.dirvis
3dec0	68 2d 2d 61 74 74 72 73 2d 68 61 73 68 20 28 6f 72 20 64 69 72 76 69 73 68 2d 2d 61 74 74 72 73	h--attrs-hash.(or.dirvish--attrs
3dee0	2d 68 61 73 68 20 28 6d 61 6b 65 2d 68 61 73 68 2d 74 61 62 6c 65 29 29 0a 20 20 20 20 20 20 20	-hash.(make-hash-table))........
3df00	20 20 20 20 20 20 20 72 65 76 65 72 74 2d 62 75 66 66 65 72 2d 66 75 6e 63 74 69 6f 6e 20 23 27	.......revert-buffer-function.#'
3df20	64 69 72 76 69 73 68 2d 72 65 76 65 72 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 61 62	dirvish-revert...............tab
3df40	2d 62 61 72 2d 6e 65 77 2d 74 61 62 2d 63 68 6f 69 63 65 20 22 2a 73 63 72 61 74 63 68 2a 22 0a	-bar-new-tab-choice."scratch".
3df60	20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 65 64 2d 68 69 64 65 2d 64 65 74 61 69 6c 73	..............dired-hide-details
3df80	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 0a 20 20 20 20 20 20	-hide-symlink-targets.nil.......
3dfa0	20 20 20 20 20 20 20 20 64 69 72 65 64 2d 6b 69 6c 6c 2d 77 68 65 6e 2d 6f 70 65 6e 69 6e 67 2d	........dired-kill-when-opening-
3dfc0	6e 65 77 2d 64 69 72 65 64 2d 62 75 66 66 65 72 20 6e 69 6c 29 0a 20 20 28 61 64 64 2d 68 6f 6f	new-dired-buffer.nil)...(add-hoo
3dfe0	6b 20 27 77 69 6e 64 6f 77 2d 62 75 66 66 65 72 2d 63 68 61 6e 67 65 2d 66 75 6e 63 74 69 6f 6e	k.'window-buffer-change-function
3e000	73 20 23 27 64 69 72 76 69 73 68 2d 77 69 6e 62 75 66 2d 63 68 61 6e 67 65 2d 68 20 6e 69 6c 20	s.#'dirvish-winbuf-change-h.nil.
3e020	74 29 0a 20 20 28 61 64 64 2d 68 6f 6f 6b 20 27 77 69 6e 64 6f 77 2d 63 6f 6e 66 69 67 75 72 61	t)...(add-hook.'window-configura
3e040	74 69 6f 6e 2d 63 68 61 6e 67 65 2d 68 6f 6f 6b 20 23 27 64 69 72 76 69 73 68 2d 77 69 6e 63 6f	tion-change-hook.#'dirvish-winco
3e060	6e 66 2d 63 68 61 6e 67 65 2d 68 20 6e 69 6c 20 74 29 0a 20 20 28 61 64 64 2d 68 6f 6f 6b 20 27	nf-change-h.nil.t)...(add-hook.'
3e080	70 6f 73 74 2d 63 6f 6d 6d 61 6e 64 2d 68 6f 6f 6b 20 23 27 64 69 72 76 69 73 68 2d 75 70 64 61	post-command-hook.#'dirvish-upda
3e0a0	74 65 2d 62 6f 64 79 2d 68 20 6e 69 6c 20 74 29 0a 20 20 28 61 64 64 2d 68 6f 6f 6b 20 27 6b 69	te-body-h.nil.t)...(add-hook.'ki
3e0c0	6c 6c 2d 62 75 66 66 65 72 2d 68 6f 6f 6b 20 23 27 64 69 72 76 69 73 68 2d 6b 69 6c 6c 2d 62 75	ll-buffer-hook.#'dirvish-kill-bu
3e0e0	66 66 65 72 2d 68 20 6e 69 6c 20 74 29 0a 20 20 28 73 65 74 2d 62 75 66 66 65 72 2d 6d 6f 64 69	ffer-h.nil.t)...(set-buffer-modi
3e100	66 69 65 64 2d 70 20 6e 69 6c 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 2d 63 72	fied-p.nil))..(defun.dirvish--cr
3e120	65 61 74 65 2d 70 61 72 65 6e 74 2d 62 75 66 66 65 72 20 28 64 76 20 64 69 72 20 69 6e 64 65 78	eate-parent-buffer.(dv.dir.index
3e140	20 6c 65 76 65 6c 29 0a 20 20 22 43 72 65 61 74 65 20 70 61 72 65 6e 74 20 62 75 66 66 65 72 20	.level)..."Create.parent.buffer.
3e160	61 74 20 44 49 52 20 69 6e 20 44 56 20 73 65 6c 65 63 74 69 6e 67 20 66 69 6c 65 20 49 4e 44 45	at.DIR.in.DV.selecting.file.INDE
3e180	58 2e 0a 4c 45 56 45 4c 20 69 73 20 74 68 65 20 64 65 70 74 68 20 6f 66 20 63 75 72 72 65 6e 74	X..LEVEL.is.the.depth.of.current
3e1a0	20 77 69 6e 64 6f 77 2e 22 0a 20 20 28 6c 65 74 20 28 28 69 6e 64 65 78 20 28 64 69 72 65 63 74	.window."...(let.((index.(direct
3e1c0	6f 72 79 2d 66 69 6c 65 2d 6e 61 6d 65 20 69 6e 64 65 78 29 29 0a 20 20 20 20 20 20 20 20 28 62	ory-file-name.index)).........(b
3e1e0	75 66 20 28 64 69 72 76 69 73 68 2d 2d 75 74 69 6c 2d 62 75 66 66 65 72 20 28 66 6f 72 6d 61 74	uf.(dirvish--util-buffer.(format
3e200	20 22 70 61 72 65 6e 74 2d 25 73 22 20 6c 65 76 65 6c 29 20 64 76 20 6e 69 6c 20 74 29 29 0a 20	."parent-%s".level).dv.nil.t))..
3e220	20 20 20 20 20 20 20 28 73 74 72 20 28 6f 72 20 28 67 65 74 68 61 73 68 20 64 69 72 20 64 69 72	.......(str.(or.(gethash.dir.dir
3e240	76 69 73 68 2d 2d 70 61 72 65 6e 74 2d 68 61 73 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	vish--parent-hash)..............
3e260	20 20 20 20 28 6c 65 74 20 28 28 66 6c 61 67 73 20 64 69 72 65 64 2d 61 63 74 75 61 6c 2d 73 77	....(let.((flags.dired-actual-sw
3e280	69 74 63 68 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74	itches))....................(wit
3e2a0	68 2d 74 65 6d 70 2d 62 75 66 66 65 72 20 28 64 69 72 65 64 2d 69 6e 73 65 72 74 2d 64 69 72 65	h-temp-buffer.(dired-insert-dire
3e2c0	63 74 6f 72 79 20 64 69 72 20 66 6c 61 67 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ctory.dir.flags)................
3e2e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 2d 73 74	......................(buffer-st
3e300	72 69 6e 67 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 61 74 74 72 73 20 28 61 70 70 65 6e 64	ring))))).........(attrs.(append
3e320	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 28 68 6c 2d 6c 69 6e 65 20 73 79 6d 6c 69	.................'(hl-line.symli
3e340	6e 6b 2d 74 61 72 67 65 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64	nk-target).................(cond
3e360	20 28 28 6d 65 6d 71 20 27 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 20 64 69 72 76 69 73 68 2d 61	.((memq.'all-the-icons.dirvish-a
3e380	74 74 72 69 62 75 74 65 73 29 20 27 28 61 6c 6c 2d 74 68 65 2d 69 63 6f 6e 73 29 29 0a 20 20 20	ttributes).'(all-the-icons))....
3e3a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 6d 65 6d 71 20 27 6e 65 72 64 2d	...................((memq.'nerd-
3e3c0	69 63 6f 6e 73 20 64 69 72 76 69 73 68 2d 61 74 74 72 69 62 75 74 65 73 29 20 27 28 6e 65 72 64	icons.dirvish-attributes).'(nerd
3e3e0	2d 69 63 6f 6e 73 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 28	-icons)).......................(
3e400	28 6d 65 6d 71 20 27 76 73 63 6f 64 65 2d 69 63 6f 6e 20 64 69 72 76 69 73 68 2d 61 74 74 72 69	(memq.'vscode-icon.dirvish-attri
3e420	62 75 74 65 73 29 20 27 28 76 73 63 6f 64 65 2d 69 63 6f 6e 29 29 29 29 29 29 0a 20 20 20 20 28	butes).'(vscode-icon)))))).....(
3e440	77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 62 75 66 0a 20 20 20 20 20 20 28 64	with-current-buffer.buf.......(d
3e460	69 72 76 69 73 68 2d 64 69 72 65 63 74 6f 72 79 2d 76 69 65 77 2d 6d 6f 64 65 29 0a 20 20 20 20	irvish-directory-view-mode).....
3e480	20 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 64 76 20 28 64 76 2d 6e 61 6d 65 20 64 76 29	..(dirvish-prop.:dv.(dv-name.dv)
3e4a0	29 0a 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 72 65 6d 6f 74 65 20 28 66	).......(dirvish-prop.:remote.(f
3e4c0	69 6c 65 2d 72 65 6d 6f 74 65 2d 70 20 64 69 72 29 29 0a 20 20 20 20 20 20 28 70 75 74 68 61 73	ile-remote-p.dir)).......(puthas
3e4e0	68 20 64 69 72 20 73 74 72 20 64 69 72 76 69 73 68 2d 2d 70 61 72 65 6e 74 2d 68 61 73 68 29 0a	h.dir.str.dirvish--parent-hash).
3e500	20 20 20 20 20 20 28 65 72 61 73 65 2d 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 28 73 65 74 71	......(erase-buffer).......(setq
3e520	20 6d 6f 64 65 2d 6c 69 6e 65 2d 66 6f 72 6d 61 74 20 6e 69 6c 20 68 65 61 64 65 72 2d 6c 69 6e	.mode-line-format.nil.header-lin
3e540	65 2d 66 6f 72 6d 61 74 20 6e 69 6c 29 0a 20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73	e-format.nil).......(save-excurs
3e560	69 6f 6e 20 28 69 6e 73 65 72 74 20 73 74 72 29 29 0a 20 20 20 20 20 20 28 73 65 74 71 2d 6c 6f	ion.(insert.str)).......(setq-lo
3e580	63 61 6c 20 64 69 72 65 64 2d 73 75 62 64 69 72 2d 61 6c 69 73 74 20 28 6c 69 73 74 20 28 63 6f	cal.dired-subdir-alist.(list.(co
3e5a0	6e 73 20 64 69 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 2d 6d 61 72 6b 65 72 29 29 29 0a 20 20 20 20	ns.dir.(point-min-marker))).....
3e5c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 64 65 66 61 75 6c 74 73	..............font-lock-defaults
3e5e0	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 28 64 69 72 65 64 2d 66 6f 6e 74 2d	...................'(dired-font-
3e600	6c 6f 63 6b 2d 6b 65 79 77 6f 72 64 73 20 74 20 6e 69 6c 20 6e 69 6c 20 62 65 67 69 6e 6e 69 6e	lock-keywords.t.nil.nil.beginnin
3e620	67 2d 6f 66 2d 6c 69 6e 65 29 29 0a 20 20 20 20 20 20 28 66 6f 6e 74 2d 6c 6f 63 6b 2d 6d 6f 64	g-of-line)).......(font-lock-mod
3e640	65 20 31 29 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 67 6f 74 6f 2d 66 69 6c 65 2d 31 20 28 66	e.1).......(dired-goto-file-1.(f
3e660	69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 72 65 63 74 6f 72 79 20 69 6e 64 65 78 29 20 69 6e 64	ile-name-nondirectory.index).ind
3e680	65 78 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 2d	ex.(point-max)).......(dirvish--
3e6a0	68 69 64 65 2d 63 75 72 73 6f 72 29 0a 20 20 20 20 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 64	hide-cursor).......(setq-local.d
3e6c0	69 72 76 69 73 68 2d 2d 61 74 74 72 73 2d 68 61 73 68 20 28 6d 61 6b 65 2d 68 61 73 68 2d 74 61	irvish--attrs-hash.(make-hash-ta
3e6e0	62 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 76 69 73 68 2d 2d	ble)...................dirvish--
3e700	77 6f 72 6b 69 6e 67 2d 61 74 74 72 73 20 28 64 69 72 76 69 73 68 2d 2d 61 74 74 72 73 2d 65 78	working-attrs.(dirvish--attrs-ex
3e720	70 61 6e 64 20 61 74 74 72 73 29 29 0a 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 2d 72 65 6e	pand.attrs)).......(dirvish--ren
3e740	64 65 72 2d 61 74 74 72 73 29 20 62 75 66 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73	der-attrs).buf)))..(defun.dirvis
3e760	68 2d 2d 63 72 65 61 74 65 2d 70 61 72 65 6e 74 2d 77 69 6e 64 6f 77 73 20 28 64 76 29 0a 20 20	h--create-parent-windows.(dv)...
3e780	22 43 72 65 61 74 65 20 61 6c 6c 20 64 69 72 76 69 73 68 20 70 61 72 65 6e 74 20 77 69 6e 64 6f	"Create.all.dirvish.parent.windo
3e7a0	77 73 20 66 6f 72 20 44 56 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 63 75 72 72 65 6e 74 20 28 65	ws.for.DV."...(let*.((current.(e
3e7c0	78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72	xpand-file-name.default-director
3e7e0	79 29 29 0a 20 20 20 20 20 20 20 20 20 28 70 61 72 65 6e 74 20 28 64 69 72 76 69 73 68 2d 2d 67	y))..........(parent.(dirvish--g
3e800	65 74 2d 70 61 72 65 6e 74 2d 70 61 74 68 20 63 75 72 72 65 6e 74 29 29 0a 20 20 20 20 20 20 20	et-parent-path.current))........
3e820	20 20 28 70 61 72 65 6e 74 2d 64 69 72 73 20 28 29 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 70	..(parent-dirs.())..........(dep
3e840	74 68 20 28 6f 72 20 28 63 61 61 72 20 28 64 76 2d 6c 61 79 6f 75 74 20 64 76 29 29 20 30 29 29	th.(or.(caar.(dv-layout.dv)).0))
3e860	0a 20 20 20 20 20 20 20 20 20 28 69 20 30 29 29 0a 20 20 20 20 28 64 69 72 76 69 73 68 2d 2d 73	..........(i.0)).....(dirvish--s
3e880	65 74 75 70 2d 6d 6f 64 65 2d 6c 69 6e 65 20 28 63 61 72 20 28 64 76 2d 6c 61 79 6f 75 74 20 64	etup-mode-line.(car.(dv-layout.d
3e8a0	76 29 29 29 0a 20 20 20 20 28 77 68 65 6e 2d 6c 65 74 20 28 66 69 78 65 64 20 28 6e 74 68 20 31	v))).....(when-let.(fixed.(nth.1
3e8c0	20 28 64 76 2d 74 79 70 65 20 64 76 29 29 29 20 28 73 65 74 71 20 77 69 6e 64 6f 77 2d 73 69 7a	.(dv-type.dv))).(setq.window-siz
3e8e0	65 2d 66 69 78 65 64 20 66 69 78 65 64 29 29 0a 20 20 20 20 28 73 65 74 2d 77 69 6e 64 6f 77 2d	e-fixed.fixed)).....(set-window-
3e900	64 65 64 69 63 61 74 65 64 2d 70 0a 20 20 20 20 20 6e 69 6c 20 28 61 6e 64 20 28 6f 72 20 28 63	dedicated-p......nil.(and.(or.(c
3e920	61 72 20 28 64 76 2d 6c 61 79 6f 75 74 20 64 76 29 29 20 28 6e 74 68 20 32 20 28 64 76 2d 74 79	ar.(dv-layout.dv)).(nth.2.(dv-ty
3e940	70 65 20 64 76 29 29 29 20 74 29 29 0a 20 20 20 20 28 73 65 74 2d 77 69 6e 64 6f 77 2d 66 72 69	pe.dv))).t)).....(set-window-fri
3e960	6e 67 65 73 20 6e 69 6c 20 31 20 31 29 0a 20 20 20 20 28 77 68 69 6c 65 20 28 61 6e 64 20 28 3c	nges.nil.1.1).....(while.(and.(<
3e980	20 69 20 64 65 70 74 68 29 20 28 6e 6f 74 20 28 73 74 72 69 6e 67 3d 20 63 75 72 72 65 6e 74 20	.i.depth).(not.(string=.current.
3e9a0	70 61 72 65 6e 74 29 29 29 0a 20 20 20 20 20 20 28 63 6c 2d 69 6e 63 66 20 69 29 0a 20 20 20 20	parent))).......(cl-incf.i).....
3e9c0	20 20 28 70 75 73 68 20 28 63 6f 6e 73 20 63 75 72 72 65 6e 74 20 70 61 72 65 6e 74 29 20 70 61	..(push.(cons.current.parent).pa
3e9e0	72 65 6e 74 2d 64 69 72 73 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 75 72 72 65 6e 74 20 28	rent-dirs).......(setq.current.(
3ea00	64 69 72 76 69 73 68 2d 2d 67 65 74 2d 70 61 72 65 6e 74 2d 70 61 74 68 20 63 75 72 72 65 6e 74	dirvish--get-parent-path.current
3ea20	29 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 70 61 72 65 6e 74 20 28 64 69 72 76 69 73 68 2d 2d	)).......(setq.parent.(dirvish--
3ea40	67 65 74 2d 70 61 72 65 6e 74 2d 70 61 74 68 20 70 61 72 65 6e 74 29 29 29 0a 20 20 20 20 28 77	get-parent-path.parent))).....(w
3ea60	68 65 6e 20 28 3e 20 64 65 70 74 68 20 30 29 0a 20 20 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 77	hen.(>.depth.0).......(cl-loop.w
3ea80	69 74 68 20 6c 61 79 6f 75 74 20 3d 20 28 63 61 72 20 28 64 76 2d 6c 61 79 6f 75 74 20 64 76 29	ith.layout.=.(car.(dv-layout.dv)
3eaa0	29 20 77 69 74 68 20 70 61 72 65 6e 74 2d 77 69 64 74 68 20 3d 20 28 6e 74 68 20 31 20 6c 61 79	).with.parent-width.=.(nth.1.lay
3eac0	6f 75 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 69 74 68 20 72 65 6d 61 69 6e 20	out)................with.remain.
3eae0	3d 20 28 2d 20 31 20 28 6e 74 68 20 32 20 6c 61 79 6f 75 74 29 20 70 61 72 65 6e 74 2d 77 69 64	=.(-.1.(nth.2.layout).parent-wid
3eb00	74 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 69 74 68 20 77 69 64 74 68 20 3d 20	th)................with.width.=.
3eb20	28 6d 69 6e 20 28 2f 20 72 65 6d 61 69 6e 20 64 65 70 74 68 29 20 70 61 72 65 6e 74 2d 77 69 64	(min.(/.remain.depth).parent-wid
3eb40	74 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 6c 65 76 65 6c 20 66 72 6f	th)................for.level.fro
3eb60	6d 20 31 20 66 6f 72 20 28 63 75 72 72 65 6e 74 20 2e 20 70 61 72 65 6e 74 29 20 69 6e 20 70 61	m.1.for.(current...parent).in.pa
3eb80	72 65 6e 74 2d 64 69 72 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 61 72 67	rent-dirs................for.arg
3eba0	73 20 3d 20 60 28 28 73 69 64 65 20 2e 20 6c 65 66 74 29 20 28 69 6e 68 69 62 69 74 2d 73 61 6d	s.=.`((side...left).(inhibit-sam
3ebc0	65 2d 77 69 6e 64 6f 77 20 2e 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	e-window...t)...................
3ebe0	20 20 20 20 20 20 20 20 20 20 28 77 69 6e 64 6f 77 2d 77 69 64 74 68 20 2e 20 2c 77 69 64 74 68	..........(window-width...,width
3ec00	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77	).............................(w
3ec20	69 6e 64 6f 77 2d 70 61 72 61 6d 65 74 65 72 73 20 2e 20 28 28 6e 6f 2d 6f 74 68 65 72 2d 77 69	indow-parameters...((no-other-wi
3ec40	6e 64 6f 77 20 2e 20 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20	ndow...t))))................for.
3ec60	62 20 3d 20 28 64 69 72 76 69 73 68 2d 2d 63 72 65 61 74 65 2d 70 61 72 65 6e 74 2d 62 75 66 66	b.=.(dirvish--create-parent-buff
3ec80	65 72 20 64 76 20 70 61 72 65 6e 74 20 63 75 72 72 65 6e 74 20 6c 65 76 65 6c 29 0a 20 20 20 20	er.dv.parent.current.level).....
3eca0	20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 77 20 3d 20 28 64 69 73 70 6c 61 79 2d 62 75 66 66	...........for.w.=.(display-buff
3ecc0	65 72 20 62 20 60 28 64 69 72 76 69 73 68 2d 2d 64 69 73 70 6c 61 79 2d 62 75 66 66 65 72 20 2e	er.b.`(dirvish--display-buffer..
3ece0	20 2c 61 72 67 73 29 29 20 64 6f 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68	.,args)).do................(with
3ed00	2d 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 20 77 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	-selected-window.w..............
3ed20	20 20 20 20 28 73 65 74 2d 77 69 6e 64 6f 77 2d 66 72 69 6e 67 65 73 20 6e 69 6c 20 31 20 31 29	....(set-window-fringes.nil.1.1)
3ed40	20 28 73 65 74 2d 77 69 6e 64 6f 77 2d 64 65 64 69 63 61 74 65 64 2d 70 20 77 20 74 29 29 29 29	.(set-window-dedicated-p.w.t))))
3ed60	29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 2d 69 6e 69 74 2d 75 74 69 6c 2d 62 75	))..(defun.dirvish--init-util-bu
3ed80	66 66 65 72 73 20 28 64 76 29 0a 20 20 22 49 6e 69 74 69 61 6c 69 7a 65 20 75 74 69 6c 20 62 75	ffers.(dv)..."Initialize.util.bu
3eda0	66 66 65 72 73 20 66 6f 72 20 44 56 2e 22 0a 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62	ffers.for.DV."...(with-current-b
3edc0	75 66 66 65 72 20 28 64 69 72 76 69 73 68 2d 2d 75 74 69 6c 2d 62 75 66 66 65 72 20 27 70 72 65	uffer.(dirvish--util-buffer.'pre
3ede0	76 69 65 77 20 64 76 20 6e 69 6c 20 74 29 0a 20 20 20 20 28 66 75 6e 64 61 6d 65 6e 74 61 6c 2d	view.dv.nil.t).....(fundamental-
3ee00	6d 6f 64 65 29 20 28 73 65 74 71 20 6d 6f 64 65 2d 6c 69 6e 65 2d 66 6f 72 6d 61 74 20 6e 69 6c	mode).(setq.mode-line-format.nil
3ee20	20 68 65 61 64 65 72 2d 6c 69 6e 65 2d 66 6f 72 6d 61 74 20 6e 69 6c 29 0a 20 20 20 20 28 61 64	.header-line-format.nil).....(ad
3ee40	64 2d 68 6f 6f 6b 20 27 77 69 6e 64 6f 77 2d 73 63 72 6f 6c 6c 2d 66 75 6e 63 74 69 6f 6e 73 20	d-hook.'window-scroll-functions.
3ee60	23 27 64 69 72 76 69 73 68 2d 61 70 70 6c 79 2d 61 6e 73 69 63 6f 6c 6f 72 2d 68 20 6e 69 6c 20	#'dirvish-apply-ansicolor-h.nil.
3ee80	74 29 29 0a 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 28 64 69 72 76	t))...(with-current-buffer.(dirv
3eea0	69 73 68 2d 2d 75 74 69 6c 2d 62 75 66 66 65 72 20 27 68 65 61 64 65 72 20 64 76 29 0a 20 20 20	ish--util-buffer.'header.dv)....
3eec0	20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 64 76 20 28 64 76 2d 6e 61 6d 65 20 64 76 29 29	.(dirvish-prop.:dv.(dv-name.dv))
3eee0	0a 20 20 20 20 28 73 65 74 71 20 63 75 72 73 6f 72 2d 74 79 70 65 20 6e 69 6c 20 77 69 6e 64 6f	.....(setq.cursor-type.nil.windo
3ef00	77 2d 73 69 7a 65 2d 66 69 78 65 64 20 27 68 65 69 67 68 74 20 6d 6f 64 65 2d 6c 69 6e 65 2d 66	w-size-fixed.'height.mode-line-f
3ef20	6f 72 6d 61 74 20 6e 69 6c 29 29 0a 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66	ormat.nil))...(with-current-buff
3ef40	65 72 20 28 64 69 72 76 69 73 68 2d 2d 75 74 69 6c 2d 62 75 66 66 65 72 20 27 66 6f 6f 74 65 72	er.(dirvish--util-buffer.'footer
3ef60	20 64 76 29 0a 20 20 20 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 64 76 20 28 64 76 2d 6e	.dv).....(dirvish-prop.:dv.(dv-n
3ef80	61 6d 65 20 64 76 29 29 0a 20 20 20 20 28 73 65 74 71 20 63 75 72 73 6f 72 2d 74 79 70 65 20 6e	ame.dv)).....(setq.cursor-type.n
3efa0	69 6c 20 77 69 6e 64 6f 77 2d 73 69 7a 65 2d 66 69 78 65 64 20 27 68 65 69 67 68 74 29 0a 20 20	il.window-size-fixed.'height)...
3efc0	20 20 28 73 65 74 71 20 68 65 61 64 65 72 2d 6c 69 6e 65 2d 66 6f 72 6d 61 74 20 6e 69 6c 20 6d	..(setq.header-line-format.nil.m
3efe0	6f 64 65 2d 6c 69 6e 65 2d 66 6f 72 6d 61 74 20 64 69 72 76 69 73 68 2d 2d 6d 6f 64 65 2d 6c 69	ode-line-format.dirvish--mode-li
3f000	6e 65 2d 66 6d 74 29 29 29 0a 0a 28 64 65 66 73 75 62 73 74 20 64 69 72 76 69 73 68 2d 2d 64 69	ne-fmt)))..(defsubst.dirvish--di
3f020	72 2d 64 61 74 61 2d 67 65 74 74 65 72 20 28 64 69 72 29 0a 20 20 22 53 63 72 69 70 74 20 66 6f	r-data-getter.(dir)..."Script.fo
3f040	72 20 44 49 52 20 64 61 74 61 20 72 65 74 72 69 65 76 69 6e 67 2e 22 0a 20 20 60 28 77 69 74 68	r.DIR.data.retrieving."...`(with
3f060	2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 20 20 28 6c 65 74 20 28 28 68 61 73 68 20 28 6d	-temp-buffer......(let.((hash.(m
3f080	61 6b 65 2d 68 61 73 68 2d 74 61 62 6c 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 62 6b 20	ake-hash-table))............(bk.
3f0a0	2c 28 61 6e 64 20 28 66 65 61 74 75 72 65 70 20 27 64 69 72 76 69 73 68 2d 76 63 29 0a 20 20 20	,(and.(featurep.'dirvish-vc)....
3f0c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 69 67 6e 6f 72 65 2d 65 72 72 6f 72	..................`(ignore-error
3f0e0	73 20 28 76 63 2d 72 65 73 70 6f 6e 73 69 62 6c 65 2d 62 61 63 6b 65 6e 64 20 2c 64 69 72 29 29	s.(vc-responsible-backend.,dir))
3f100	29 29 29 0a 20 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 66 69 6c 65 20 28 64 69 72 65 63 74	)))........(dolist.(file.(direct
3f120	6f 72 79 2d 66 69 6c 65 73 20 2c 64 69 72 20 74 20 6e 69 6c 20 74 29 29 0a 20 20 20 20 20 20 20	ory-files.,dir.t.nil.t))........
3f140	20 20 28 6c 65 74 2a 20 28 28 61 74 74 72 73 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 73	..(let*.((attrs.(file-attributes
3f160	20 66 69 6c 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 61 74 65 20 28	.file)).................(state.(
3f180	61 6e 64 20 62 6b 20 28 76 63 2d 73 74 61 74 65 2d 72 65 66 72 65 73 68 20 66 69 6c 65 20 62 6b	and.bk.(vc-state-refresh.file.bk
3f1a0	29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 69 74 20 28 61 6e 64 20 28 65	))).................(git.(and.(e
3f1c0	71 20 62 6b 20 27 47 69 74 29 20 3b 20 54 4f 44 4f 3a 20 72 65 66 61 63 74 6f 72 20 74 68 69 73	q.bk.'Git).;.TODO:.refactor.this
3f1e0	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 28 73 68 65 6c	...........................(shel
3f200	6c 2d 63 6f 6d 6d 61 6e 64 2d 74 6f 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20	l-command-to-string.............
3f220	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 67 69 74 20 6c 6f 67 20	...............(format."git.log.
3f240	2d 31 20 2d 2d 70 72 65 74 74 79 3d 25 25 73 20 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20	-1.--pretty=%%s.%s".............
3f260	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 68 65 6c 6c 2d 71 75	.......................(shell-qu
3f280	6f 74 65 2d 61 72 67 75 6d 65 6e 74 20 66 69 6c 65 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20	ote-argument.file)))))..........
3f2a0	20 20 20 20 20 20 20 28 74 70 20 28 6e 74 68 20 30 20 61 74 74 72 73 29 29 29 0a 20 20 20 20 20	.......(tp.(nth.0.attrs)))......
3f2c0	20 20 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 28 65 71 20 74 20 74	......(cond.............((eq.t.t
3f2e0	70 29 20 28 73 65 74 71 20 74 70 20 27 28 64 69 72 20 2e 20 6e 69 6c 29 29 29 0a 20 20 20 20 20	p).(setq.tp.'(dir...nil)))......
3f300	20 20 20 20 20 20 20 28 74 70 20 28 73 65 74 71 20 74 70 20 60 28 2c 28 69 66 20 28 66 69 6c 65	.......(tp.(setq.tp.`(,(if.(file
3f320	2d 64 69 72 65 63 74 6f 72 79 2d 70 20 74 70 29 20 27 64 69 72 20 27 66 69 6c 65 29 20 2e 20 2c	-directory-p.tp).'dir.'file)...,
3f340	74 70 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 74 20 28 73 65 74 71 20 74 70 20 27 28	tp))).............(t.(setq.tp.'(
3f360	66 69 6c 65 20 2e 20 6e 69 6c 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 70 75 74 68 61	file...nil))))............(putha
3f380	73 68 20 28 69 6e 74 65 72 6e 20 28 73 65 63 75 72 65 2d 68 61 73 68 20 27 6d 64 35 20 66 69 6c	sh.(intern.(secure-hash.'md5.fil
3f3a0	65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 3a 62 75 69 6c 74	e)).....................`(:built
3f3c0	69 6e 20 2c 61 74 74 72 73 20 3a 74 79 70 65 20 2c 74 70 0a 20 20 20 20 20 20 20 20 20 20 20 20	in.,attrs.:type.,tp.............
3f3e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 40 28 61 6e 64 20 73 74 61 74 65 20	...................,@(and.state.
3f400	28 6c 69 73 74 20 3a 76 63 2d 73 74 61 74 65 20 73 74 61 74 65 29 29 0a 20 20 20 20 20 20 20 20	(list.:vc-state.state)).........
3f420	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 40 28 61 6e 64 20 67 69	.......................,@(and.gi
3f440	74 20 28 6c 69 73 74 20 3a 67 69 74 2d 6d 73 67 20 67 69 74 29 29 29 0a 20 20 20 20 20 20 20 20	t.(list.:git-msg.git))).........
3f460	20 20 20 20 20 20 20 20 20 20 20 20 68 61 73 68 29 29 29 0a 20 20 20 20 20 20 20 28 70 72 69 6e	............hash)))........(prin
3f480	31 20 28 63 6f 6e 73 20 62 6b 20 68 61 73 68 29 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72	1.(cons.bk.hash).(current-buffer
3f4a0	29 29 29 0a 20 20 20 20 20 28 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72	)))......(buffer-substring-no-pr
3f4c0	6f 70 65 72 74 69 65 73 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29	operties.(point-min).(point-max)
3f4e0	29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 64 69 72 2d 64 61 74 61 2d 70 72 6f	)))..(defun.dirvish-dir-data-pro
3f500	63 2d 73 20 28 70 72 6f 63 20 5f 65 78 69 74 29 0a 20 20 22 50 61 72 73 65 20 74 68 65 20 64 69	c-s.(proc._exit)..."Parse.the.di
3f520	72 65 63 74 6f 72 79 20 6d 65 74 61 64 61 74 61 20 66 72 6f 6d 20 50 52 4f 43 27 73 20 6f 75 74	rectory.metadata.from.PROC's.out
3f540	70 75 74 20 53 54 52 2e 22 0a 20 20 28 70 63 61 73 65 2d 6c 65 74 20 28 28 60 28 2c 62 75 66 20	put.STR."...(pcase-let.((`(,buf.
3f560	2e 20 2c 73 65 74 75 70 29 20 28 70 72 6f 63 65 73 73 2d 67 65 74 20 70 72 6f 63 20 27 6d 65 74	..,setup).(process-get.proc.'met
3f580	61 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 60 28 2c 76 63 20 2e 20 2c 64 61 74 61	a))...............(`(,vc...,data
3f5a0	29 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 28 70 72 6f 63 65 73 73 2d	).(with-current-buffer.(process-
3f5c0	62 75 66 66 65 72 20 70 72 6f 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	buffer.proc)....................
3f5e0	20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 61 64 20 28 62 75 66 66 65 72 2d 73 74 72 69 6e	.............(read.(buffer-strin
3f600	67 29 29 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 20	g))))).....(when.(buffer-live-p.
3f620	62 75 66 29 0a 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	buf).......(with-current-buffer.
3f640	62 75 66 0a 20 20 20 20 20 20 20 20 28 6d 61 70 68 61 73 68 20 28 6c 61 6d 62 64 61 20 28 6b 20	buf.........(maphash.(lambda.(k.
3f660	76 29 20 28 70 75 74 68 61 73 68 20 6b 20 76 20 64 69 72 76 69 73 68 2d 2d 61 74 74 72 73 2d 68	v).(puthash.k.v.dirvish--attrs-h
3f680	61 73 68 29 29 20 64 61 74 61 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 73 65 74 75 70 0a	ash)).data).........(when.setup.
3f6a0	20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 76 63 2d 62 61 63 6b	..........(dirvish-prop.:vc-back
3f6c0	65 6e 64 20 76 63 29 0a 20 20 20 20 20 20 20 20 20 20 28 72 75 6e 2d 68 6f 6f 6b 73 20 27 64 69	end.vc)...........(run-hooks.'di
3f6e0	72 76 69 73 68 2d 73 65 74 75 70 2d 68 6f 6f 6b 29 29 0a 20 20 20 20 20 20 20 20 28 75 6e 6c 65	rvish-setup-hook)).........(unle
3f700	73 73 20 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 77 64 69 72 65 64 2d 6d 6f 64 65 29	ss.(derived-mode-p.'wdired-mode)
3f720	20 28 64 69 72 76 69 73 68 2d 75 70 64 61 74 65 2d 62 6f 64 79 2d 68 29 29 29 29 29 0a 20 20 28	.(dirvish-update-body-h)))))...(
3f740	64 65 6c 65 74 65 2d 70 72 6f 63 65 73 73 20 70 72 6f 63 29 0a 20 20 28 64 69 72 76 69 73 68 2d	delete-process.proc)...(dirvish-
3f760	2d 6b 69 6c 6c 2d 62 75 66 66 65 72 20 28 70 72 6f 63 65 73 73 2d 62 75 66 66 65 72 20 70 72 6f	-kill-buffer.(process-buffer.pro
3f780	63 29 29 29 0a 0a 28 63 6c 2d 64 65 66 67 65 6e 65 72 69 63 20 64 69 72 76 69 73 68 2d 64 61 74	c)))..(cl-defgeneric.dirvish-dat
3f7a0	61 2d 66 6f 72 2d 64 69 72 20 28 64 69 72 20 62 75 66 66 65 72 20 73 65 74 75 70 29 0a 20 20 22	a-for-dir.(dir.buffer.setup)..."
3f7c0	46 65 74 63 68 20 64 61 74 61 20 66 6f 72 20 66 69 6c 65 73 20 69 6e 20 44 49 52 2c 20 73 74 6f	Fetch.data.for.files.in.DIR,.sto
3f7e0	72 65 64 20 6c 6f 63 61 6c 6c 79 20 69 6e 20 42 55 46 46 45 52 2e 0a 52 75 6e 20 60 64 69 72 76	red.locally.in.BUFFER..Run.`dirv
3f800	69 73 68 2d 73 65 74 75 70 2d 68 6f 6f 6b 27 20 61 66 74 65 72 77 61 72 64 73 20 77 68 65 6e 20	ish-setup-hook'.afterwards.when.
3f820	53 45 54 55 50 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 62 75 66	SETUP.is.non-nil."...(let*.((buf
3f840	20 28 6d 61 6b 65 2d 74 65 6d 70 2d 6e 61 6d 65 20 22 64 69 72 2d 64 61 74 61 2d 22 29 29 0a 20	.(make-temp-name."dir-data-"))..
3f860	20 20 20 20 20 20 20 20 28 63 20 28 66 6f 72 6d 61 74 20 22 25 53 22 20 60 28 6d 65 73 73 61 67	........(c.(format."%S".`(messag
3f880	65 20 22 25 73 22 20 2c 28 64 69 72 76 69 73 68 2d 2d 64 69 72 2d 64 61 74 61 2d 67 65 74 74 65	e."%s".,(dirvish--dir-data-gette
3f8a0	72 20 64 69 72 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 70 72 6f 63 20 28 6d 61 6b 65 2d 70	r.dir))))..........(proc.(make-p
3f8c0	72 6f 63 65 73 73 20 3a 6e 61 6d 65 20 22 64 69 72 2d 64 61 74 61 22 20 3a 63 6f 6e 6e 65 63 74	rocess.:name."dir-data".:connect
3f8e0	69 6f 6e 2d 74 79 70 65 20 6e 69 6c 20 3a 62 75 66 66 65 72 20 62 75 66 0a 20 20 20 20 20 20 20	ion-type.nil.:buffer.buf........
3f900	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 6f 6d 6d 61 6e 64 20 28	......................:command.(
3f920	6c 69 73 74 20 64 69 72 76 69 73 68 2d 65 6d 61 63 73 2d 62 69 6e 20 22 2d 51 22 20 22 2d 62 61	list.dirvish-emacs-bin."-Q"."-ba
3f940	74 63 68 22 20 22 2d 2d 65 76 61 6c 22 20 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	tch"."--eval".c)................
3f960	20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 65 6e 74 69 6e 65 6c 20 27 64 69 72 76 69 73 68	..............:sentinel.'dirvish
3f980	2d 64 69 72 2d 64 61 74 61 2d 70 72 6f 63 2d 73 29 29 29 0a 20 20 20 20 28 70 72 6f 63 65 73 73	-dir-data-proc-s))).....(process
3f9a0	2d 70 75 74 20 70 72 6f 63 20 27 6d 65 74 61 20 28 63 6f 6e 73 20 62 75 66 66 65 72 20 73 65 74	-put.proc.'meta.(cons.buffer.set
3f9c0	75 70 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 2d 77 69 6e 64 6f 77 2d 73	up))))..(defun.dirvish--window-s
3f9e0	70 6c 69 74 2d 6f 72 64 65 72 20 28 29 0a 20 20 22 43 6f 6d 70 75 74 65 20 74 68 65 20 77 69 6e	plit-order.()..."Compute.the.win
3fa00	64 6f 77 20 73 70 6c 69 74 20 6f 72 64 65 72 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 77 65 69 67	dow.split.order."...(let*.((weig
3fa20	68 74 73 20 27 28 28 6e 69 6c 20 2e 20 30 29 20 28 74 20 2e 20 31 29 20 28 67 6c 6f 62 61 6c 20	hts.'((nil...0).(t...1).(global.
3fa40	2e 20 32 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 6f 72 64 0a 20 20 20 20 20 20 20 20 20 20 27	..2)))..........(ord...........'
3fa60	28 28 30 30 20 70 72 65 76 69 65 77 29 20 28 31 32 20 66 6f 6f 74 65 72 20 70 72 65 76 69 65 77	((00.preview).(12.footer.preview
3fa80	20 68 65 61 64 65 72 29 20 28 32 31 20 68 65 61 64 65 72 20 70 72 65 76 69 65 77 20 66 6f 6f 74	.header).(21.header.preview.foot
3faa0	65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 32 30 20 68 65 61 64 65 72 20 70 72 65 76 69	er).............(20.header.previ
3fac0	65 77 29 20 28 31 31 20 70 72 65 76 69 65 77 20 68 65 61 64 65 72 20 66 6f 6f 74 65 72 29 20 28	ew).(11.preview.header.footer).(
3fae0	31 30 20 70 72 65 76 69 65 77 20 68 65 61 64 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28	10.preview.header).............(
3fb00	30 31 20 70 72 65 76 69 65 77 20 66 6f 6f 74 65 72 29 20 28 30 32 20 66 6f 6f 74 65 72 20 70 72	01.preview.footer).(02.footer.pr
3fb20	65 76 69 65 77 29 20 28 32 32 20 66 6f 6f 74 65 72 20 68 65 61 64 65 72 20 70 72 65 76 69 65 77	eview).(22.footer.header.preview
3fb40	29 29 29 0a 20 20 20 20 20 20 20 20 20 28 68 2d 70 6f 73 20 28 69 66 20 28 64 69 72 76 69 73 68	)))..........(h-pos.(if.(dirvish
3fb60	2d 70 72 6f 70 20 3a 67 6c 6f 62 61 6c 2d 68 65 61 64 65 72 29 20 32 0a 20 20 20 20 20 20 20 20	-prop.:global-header).2.........
3fb80	20 20 20 20 20 20 20 20 20 20 28 61 6c 69 73 74 2d 67 65 74 20 64 69 72 76 69 73 68 2d 75 73 65	..........(alist-get.dirvish-use
3fba0	2d 68 65 61 64 65 72 2d 6c 69 6e 65 20 77 65 69 67 68 74 73 29 29 29 0a 20 20 20 20 20 20 20 20	-header-line.weights))).........
3fbc0	20 28 6d 2d 70 6f 73 20 28 61 6c 69 73 74 2d 67 65 74 20 64 69 72 76 69 73 68 2d 75 73 65 2d 6d	.(m-pos.(alist-get.dirvish-use-m
3fbe0	6f 64 65 2d 6c 69 6e 65 20 77 65 69 67 68 74 73 29 29 0a 20 20 20 20 20 20 20 20 20 28 6b 65 79	ode-line.weights))..........(key
3fc00	20 28 73 74 72 69 6e 67 2d 74 6f 2d 6e 75 6d 62 65 72 20 28 66 6f 72 6d 61 74 20 22 25 73 25 73	.(string-to-number.(format."%s%s
3fc20	22 20 28 6f 72 20 68 2d 70 6f 73 20 31 29 20 28 6f 72 20 6d 2d 70 6f 73 20 31 29 29 29 29 29 0a	".(or.h-pos.1).(or.m-pos.1))))).
3fc40	20 20 20 20 28 63 64 72 20 28 61 73 73 71 20 6b 65 79 20 6f 72 64 29 29 29 29 0a 0a 28 64 65 66	....(cdr.(assq.key.ord))))..(def
3fc60	75 6e 20 64 69 72 76 69 73 68 2d 2d 69 6e 69 74 2d 73 65 73 73 69 6f 6e 20 28 64 76 29 0a 20 20	un.dirvish--init-session.(dv)...
3fc80	22 42 75 69 6c 64 20 6c 61 79 6f 75 74 20 66 6f 72 20 44 69 72 76 69 73 68 20 73 65 73 73 69 6f	"Build.layout.for.Dirvish.sessio
3fca0	6e 20 44 56 2e 22 0a 20 20 28 73 65 74 66 20 28 64 76 2d 73 63 6f 70 65 73 20 64 76 29 20 28 64	n.DV."...(setf.(dv-scopes.dv).(d
3fcc0	69 72 76 69 73 68 2d 2d 73 63 6f 70 65 73 29 29 0a 20 20 28 73 65 74 66 20 28 64 76 2d 69 6e 64	irvish--scopes))...(setf.(dv-ind
3fce0	65 78 20 64 76 29 20 28 63 6f 6e 73 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 72 6f 6f 74	ex.dv).(cons.(dirvish-prop.:root
3fd00	29 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 0a 20 20 28 73 65 74 66 20 28 64 76	).(current-buffer)))...(setf.(dv
3fd20	2d 77 69 6e 63 6f 6e 66 20 64 76 29 20 28 6f 72 20 28 64 76 2d 77 69 6e 63 6f 6e 66 20 64 76 29	-winconf.dv).(or.(dv-winconf.dv)
3fd40	20 28 63 75 72 72 65 6e 74 2d 77 69 6e 64 6f 77 2d 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e 29 29	.(current-window-configuration))
3fd60	29 0a 20 20 28 6c 65 74 2a 20 28 28 6c 61 79 6f 75 74 20 28 63 61 72 20 28 64 76 2d 6c 61 79 6f	)...(let*.((layout.(car.(dv-layo
3fd80	75 74 20 64 76 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 77 2d 61 72 67 73 20 60 28 28 70 72 65	ut.dv)))..........(w-args.`((pre
3fda0	76 69 65 77 20 28 73 69 64 65 20 2e 20 72 69 67 68 74 29 20 28 77 69 6e 64 6f 77 2d 77 69 64 74	view.(side...right).(window-widt
3fdc0	68 20 2e 20 2c 28 6e 74 68 20 32 20 6c 61 79 6f 75 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20	h...,(nth.2.layout)))...........
3fde0	20 20 20 20 20 20 20 20 20 28 68 65 61 64 65 72 20 28 73 69 64 65 20 2e 20 61 62 6f 76 65 29 20	.........(header.(side...above).
3fe00	28 77 69 6e 64 6f 77 2d 68 65 69 67 68 74 20 2e 20 2d 32 29 0a 20 20 20 20 20 20 20 20 20 20 20	(window-height...-2)............
3fe20	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 6e 64 6f 77 2d 70 61 72 61 6d 65 74 65	................(window-paramete
3fe40	72 73 20 2e 20 28 28 6e 6f 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 20 2e 20 74 29 29 29 29 0a 20	rs...((no-other-window...t))))..
3fe60	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 6f 74 65 72 20 28 73 69 64 65 20	..................(footer.(side.
3fe80	2e 20 62 65 6c 6f 77 29 20 28 77 69 6e 64 6f 77 2d 68 65 69 67 68 74 20 2e 20 2d 32 29 0a 20 20	..below).(window-height...-2)...
3fea0	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 69 6e 64 6f 77	.........................(window
3fec0	2d 70 61 72 61 6d 65 74 65 72 73 20 2e 20 28 28 6e 6f 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 20	-parameters...((no-other-window.
3fee0	2e 20 74 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 77 2d 6f 72 64 65 72 20 28 61 6e 64	..t))))))..........(w-order.(and
3ff00	20 6c 61 79 6f 75 74 20 28 64 69 72 76 69 73 68 2d 2d 77 69 6e 64 6f 77 2d 73 70 6c 69 74 2d 6f	.layout.(dirvish--window-split-o
3ff20	72 64 65 72 29 29 29 20 75 74 69 6c 2d 77 69 6e 64 6f 77 73 29 0a 20 20 20 20 28 73 65 74 71 20	rder))).util-windows).....(setq.
3ff40	64 69 72 76 69 73 68 2d 2d 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 20 28 73 65 6c 65 63 74	dirvish--selected-window.(select
3ff60	65 64 2d 77 69 6e 64 6f 77 29 29 0a 20 20 20 20 28 64 69 72 76 69 73 68 2d 2d 69 6e 69 74 2d 75	ed-window)).....(dirvish--init-u
3ff80	74 69 6c 2d 62 75 66 66 65 72 73 20 64 76 29 0a 20 20 20 20 28 77 68 65 6e 20 77 2d 6f 72 64 65	til-buffers.dv).....(when.w-orde
3ffa0	72 20 28 6c 65 74 20 28 28 69 67 6e 6f 72 65 2d 77 69 6e 64 6f 77 2d 70 61 72 61 6d 65 74 65 72	r.(let.((ignore-window-parameter
3ffc0	73 20 74 29 29 20 28 64 65 6c 65 74 65 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 73 29 29 29 0a 20	s.t)).(delete-other-windows)))..
3ffe0	20 20 20 28 64 6f 6c 69 73 74 20 28 70 61 6e 65 20 77 2d 6f 72 64 65 72 29 0a 20 20 20 20 20 20	...(dolist.(pane.w-order).......
40000	28 6c 65 74 2a 20 28 28 62 75 66 20 28 64 69 72 76 69 73 68 2d 2d 75 74 69 6c 2d 62 75 66 66 65	(let*.((buf.(dirvish--util-buffe
40020	72 20 70 61 6e 65 20 64 76 20 6e 69 6c 20 28 65 71 20 70 61 6e 65 20 27 70 72 65 76 69 65 77 29	r.pane.dv.nil.(eq.pane.'preview)
40040	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 72 67 73 20 28 61 6c 69 73 74 2d 67 65 74	))..............(args.(alist-get
40060	20 70 61 6e 65 20 77 2d 61 72 67 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 6e	.pane.w-args))..............(win
40080	20 28 64 69 73 70 6c 61 79 2d 62 75 66 66 65 72 20 62 75 66 20 60 28 64 69 72 76 69 73 68 2d 2d	.(display-buffer.buf.`(dirvish--
400a0	64 69 73 70 6c 61 79 2d 62 75 66 66 65 72 20 2e 20 2c 61 72 67 73 29 29 29 29 0a 20 20 20 20 20	display-buffer...,args))))......
400c0	20 20 20 28 63 6f 6e 64 20 28 28 65 71 20 70 61 6e 65 20 27 70 72 65 76 69 65 77 29 20 28 73 65	...(cond.((eq.pane.'preview).(se
400e0	74 66 20 28 64 76 2d 70 72 65 76 69 65 77 2d 77 69 6e 64 6f 77 20 64 76 29 20 77 69 6e 29 29 0a	tf.(dv-preview-window.dv).win)).
40100	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 20 28 73 65 74 2d 77 69 6e 64 6f 77 2d 64 65 64	..............(t.(set-window-ded
40120	69 63 61 74 65 64 2d 70 20 77 69 6e 20 74 29 20 28 70 75 73 68 20 77 69 6e 20 75 74 69 6c 2d 77	icated-p.win.t).(push.win.util-w
40140	69 6e 64 6f 77 73 29 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 2d 77 69 6e 64 6f 77 2d 62 75	indows))).........(set-window-bu
40160	66 66 65 72 20 77 69 6e 20 62 75 66 29 29 29 0a 20 20 20 20 28 64 69 72 76 69 73 68 2d 2d 63 72	ffer.win.buf))).....(dirvish--cr
40180	65 61 74 65 2d 70 61 72 65 6e 74 2d 77 69 6e 64 6f 77 73 20 64 76 29 0a 20 20 20 20 28 6c 65 74	eate-parent-windows.dv).....(let
401a0	20 28 28 68 2d 66 6d 74 20 28 6f 72 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 63 75 73 2d	.((h-fmt.(or.(dirvish-prop.:cus-
401c0	68 65 61 64 65 72 29 20 64 69 72 76 69 73 68 2d 2d 68 65 61 64 65 72 2d 6c 69 6e 65 2d 66 6d 74	header).dirvish--header-line-fmt
401e0	29 29 29 0a 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 28	))).......(with-current-buffer.(
40200	64 69 72 76 69 73 68 2d 2d 75 74 69 6c 2d 62 75 66 66 65 72 20 27 68 65 61 64 65 72 20 64 76 29	dirvish--util-buffer.'header.dv)
40220	0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 68 65 61 64 65 72 2d 6c 69 6e 65 2d 66 6f 72 6d 61	.........(setq.header-line-forma
40240	74 20 68 2d 66 6d 74 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 64 69 73 70	t.h-fmt)).......(when.(and.(disp
40260	6c 61 79 2d 67 72 61 70 68 69 63 2d 70 29 20 28 3e 20 65 6d 61 63 73 2d 6d 61 6a 6f 72 2d 76 65	lay-graphic-p).(>.emacs-major-ve
40280	72 73 69 6f 6e 20 32 38 29 29 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 77 69 6e 64 6f 77	rsion.28)).........(let.((window
402a0	2d 73 61 66 65 2d 6d 69 6e 2d 68 65 69 67 68 74 20 30 29 20 28 77 69 6e 64 6f 77 2d 72 65 73 69	-safe-min-height.0).(window-resi
402c0	7a 65 2d 70 69 78 65 6c 77 69 73 65 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 64 6f 6c 69	ze-pixelwise.t))...........(doli
402e0	73 74 20 28 77 69 6e 20 75 74 69 6c 2d 77 69 6e 64 6f 77 73 29 20 28 66 69 74 2d 77 69 6e 64 6f	st.(win.util-windows).(fit-windo
40300	77 2d 74 6f 2d 62 75 66 66 65 72 20 77 69 6e 20 32 20 31 29 29 29 29 0a 20 20 20 20 20 20 28 75	w-to-buffer.win.2.1)))).......(u
40320	6e 6c 65 73 73 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 63 61 63 68 65 64 29 0a 20 20 20	nless.(dirvish-prop.:cached)....
40340	20 20 20 20 20 28 64 69 72 76 69 73 68 2d 64 61 74 61 2d 66 6f 72 2d 64 69 72 20 64 65 66 61 75	.....(dirvish-data-for-dir.defau
40360	6c 74 2d 64 69 72 65 63 74 6f 72 79 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 20 74 29	lt-directory.(current-buffer).t)
40380	0a 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 70 72 6f 70 20 3a 63 61 63 68 65 64 20 74	.........(dirvish-prop.:cached.t
403a0	29 29 29 0a 20 20 20 20 28 73 65 74 71 20 64 69 72 76 69 73 68 2d 2d 74 68 69 73 20 64 76 29 29	))).....(setq.dirvish--this.dv))
403c0	29 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68 2d 2d 72 65 75 73 65 2d 6f 72 2d 63 72 65 61	)..(defun.dirvish--reuse-or-crea
403e0	74 65 20 28 70 61 74 68 20 6c 61 79 6f 75 74 29 0a 20 20 22 46 69 6e 64 20 50 41 54 48 20 69 6e	te.(path.layout)..."Find.PATH.in
40400	20 61 20 64 69 72 76 69 73 68 20 73 65 73 73 69 6f 6e 20 61 6e 64 20 73 65 74 20 69 74 73 20 6c	.a.dirvish.session.and.set.its.l
40420	61 79 6f 75 74 20 77 69 74 68 20 4c 41 59 4f 55 54 2e 22 0a 20 20 28 6c 65 74 20 28 28 64 69 72	ayout.with.LAYOUT."...(let.((dir
40440	20 28 6f 72 20 70 61 74 68 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 29 0a 20 20	.(or.path.default-directory))...
40460	20 20 20 20 20 20 28 64 76 20 28 6f 72 20 64 69 72 76 69 73 68 2d 2d 74 68 69 73 20 28 63 61 72	......(dv.(or.dirvish--this.(car
40480	20 28 64 69 72 76 69 73 68 2d 2d 66 69 6e 64 2d 72 65 75 73 61 62 6c 65 29 29 29 29 29 0a 20 20	.(dirvish--find-reusable)))))...
404a0	20 20 28 63 6f 6e 64 20 28 64 76 20 28 77 69 74 68 2d 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f	..(cond.(dv.(with-selected-windo
404c0	77 20 28 64 69 72 76 69 73 68 2d 2d 63 72 65 61 74 65 2d 72 6f 6f 74 2d 77 69 6e 64 6f 77 20 64	w.(dirvish--create-root-window.d
404e0	76 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 63 61 72 20 28 64 76 2d 6c	v).................(setcar.(dv-l
40500	61 79 6f 75 74 20 64 76 29 20 6c 61 79 6f 75 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ayout.dv).layout)...............
40520	20 20 28 73 65 74 71 20 64 69 72 76 69 73 68 2d 2d 74 68 69 73 20 64 76 29 0a 20 20 20 20 20 20	..(setq.dirvish--this.dv).......
40540	20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d 66 69 6e 64 2d 65 6e 74 72 79 2d 61 0a	..........(dirvish-find-entry-a.
40560	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 6f 72 20 70 61 74 68 20 28 6e	.................(if.(or.path.(n
40580	6f 74 20 28 65 71 20 64 69 72 76 69 73 68 2d 72 65 75 73 65 2d 73 65 73 73 69 6f 6e 20 27 72 65	ot.(eq.dirvish-reuse-session.'re
405a0	73 75 6d 65 29 29 29 20 64 69 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	sume))).dir....................(
405c0	63 61 72 20 28 64 76 2d 69 6e 64 65 78 20 64 76 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20	car.(dv-index.dv))))............
405e0	20 20 20 20 20 28 64 69 72 76 69 73 68 2d 2d 69 6e 69 74 2d 73 65 73 73 69 6f 6e 20 64 76 29 29	.....(dirvish--init-session.dv))
40600	29 0a 20 20 20 20 20 20 20 20 20 20 28 74 20 28 64 69 72 76 69 73 68 2d 6e 65 77 20 3a 6c 61 79	)...........(t.(dirvish-new.:lay
40620	6f 75 74 20 28 63 6f 6e 73 20 6c 61 79 6f 75 74 20 64 69 72 76 69 73 68 2d 64 65 66 61 75 6c 74	out.(cons.layout.dirvish-default
40640	2d 6c 61 79 6f 75 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 76 69 73 68 2d	-layout))..............(dirvish-
40660	66 69 6e 64 2d 65 6e 74 72 79 2d 61 20 64 69 72 29 29 29 29 29 0a 0a 28 64 65 66 69 6e 65 2d 64	find-entry-a.dir)))))..(define-d
40680	65 72 69 76 65 64 2d 6d 6f 64 65 20 64 69 72 76 69 73 68 2d 64 69 72 65 63 74 6f 72 79 2d 76 69	erived-mode.dirvish-directory-vi
406a0	65 77 2d 6d 6f 64 65 0a 20 20 66 75 6e 64 61 6d 65 6e 74 61 6c 2d 6d 6f 64 65 20 22 44 69 72 76	ew-mode...fundamental-mode."Dirv
406c0	69 73 68 2d 64 69 72 65 63 74 6f 72 79 2d 76 69 65 77 22 0a 20 20 22 4d 61 6a 6f 72 20 6d 6f 64	ish-directory-view"..."Major.mod
406e0	65 20 66 6f 72 20 64 69 72 76 69 73 68 20 70 61 72 65 6e 74 20 62 75 66 66 65 72 73 2e 22 0a 20	e.for.dirvish.parent.buffers."..
40700	20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 20 3a 69 6e 74 65 72 61 63 74 69 76 65 20 6e 69	.:group.'dirvish.:interactive.ni
40720	6c 29 0a 0a 3b 3b 3b 3b 20 43 6f 6d 6d 61 6e 64 73 0a 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73	l)..;;;;.Commands..(defun.dirvis
40740	68 2d 71 75 69 74 20 28 29 0a 20 20 22 51 75 69 74 20 63 75 72 72 65 6e 74 20 44 69 72 76 69 73	h-quit.()..."Quit.current.Dirvis
40760	68 20 73 65 73 73 69 6f 6e 2e 0a 49 66 20 74 68 65 20 73 65 73 73 69 6f 6e 20 69 73 20 61 20 66	h.session..If.the.session.is.a.f
40780	75 6c 6c 2d 66 72 61 6d 65 64 20 6f 6e 65 2c 20 74 68 65 20 77 69 6e 64 6f 77 20 6c 61 79 6f 75	ull-framed.one,.the.window.layou
407a0	74 20 69 73 0a 72 65 73 74 6f 72 65 64 2e 20 20 49 66 20 60 64 69 72 76 69 73 68 2d 72 65 75 73	t.is.restored...If.`dirvish-reus
407c0	65 2d 73 65 73 73 69 6f 6e 27 20 69 73 20 6e 69 6c 2c 20 61 6c 6c 20 44 69 72 65 64 20 62 75 66	e-session'.is.nil,.all.Dired.buf
407e0	66 65 72 73 0a 69 6e 20 74 68 65 20 73 65 73 73 69 6f 6e 20 61 72 65 20 6b 69 6c 6c 65 64 2c 20	fers.in.the.session.are.killed,.
40800	6f 74 68 65 72 77 69 73 65 20 6f 6e 6c 79 20 74 68 65 20 69 6e 76 69 73 69 62 6c 65 20 44 69 72	otherwise.only.the.invisible.Dir
40820	65 64 0a 62 75 66 66 65 72 73 20 77 69 74 68 69 6e 20 74 68 65 20 73 65 73 73 69 6f 6e 20 61 72	ed.buffers.within.the.session.ar
40840	65 20 6b 69 6c 6c 65 64 20 61 6e 64 20 74 68 65 20 44 69 72 65 64 20 62 75 66 66 65 72 28 73 29	e.killed.and.the.Dired.buffer(s)
40860	20 69 6e 0a 74 68 65 20 73 65 6c 65 63 74 65 64 20 77 69 6e 64 6f 77 20 61 72 65 20 62 75 72 69	.in.the.selected.window.are.buri
40880	65 64 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 20 28 28 64 76	ed."...(interactive)...(let.((dv
408a0	20 28 64 69 72 76 69 73 68 2d 63 75 72 72 29 29 20 28 63 74 20 30 29 20 28 6c 73 74 20 28 77 69	.(dirvish-curr)).(ct.0).(lst.(wi
408c0	6e 64 6f 77 2d 6c 69 73 74 29 29 0a 20 20 20 20 20 20 20 20 28 77 69 6e 20 28 73 65 6c 65 63 74	ndow-list)).........(win.(select
408e0	65 64 2d 77 69 6e 64 6f 77 29 29 20 28 66 72 61 6d 65 20 28 73 65 6c 65 63 74 65 64 2d 66 72 61	ed-window)).(frame.(selected-fra
40900	6d 65 29 29 29 0a 20 20 20 20 28 64 69 72 76 69 73 68 2d 6b 69 6c 6c 20 64 76 29 0a 20 20 20 20	me))).....(dirvish-kill.dv).....
40920	28 77 68 69 6c 65 20 28 61 6e 64 20 28 64 69 72 76 69 73 68 2d 63 75 72 72 29 20 28 65 71 20 28	(while.(and.(dirvish-curr).(eq.(
40940	73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 29 20 77 69 6e 29 0a 20 20 20 20 20 20 20 20 20 20	selected-window).win)...........
40960	20 20 20 20 20 20 28 3c 3d 20 28 63 6c 2d 69 6e 63 66 20 63 74 29 20 28 6c 65 6e 67 74 68 20 6c	......(<=.(cl-incf.ct).(length.l
40980	73 74 29 29 29 0a 20 20 20 20 20 20 28 71 75 69 74 2d 77 69 6e 64 6f 77 29 29 0a 20 20 20 20 28	st))).......(quit-window)).....(
409a0	75 6e 6c 65 73 73 20 28 65 71 20 28 73 65 6c 65 63 74 65 64 2d 66 72 61 6d 65 29 20 66 72 61 6d	unless.(eq.(selected-frame).fram
409c0	65 29 20 28 64 65 6c 65 74 65 2d 66 72 61 6d 65 20 66 72 61 6d 65 29 29 29 29 0a 0a 3b 3b 3b 23	e).(delete-frame.frame))))..;;;#
409e0	23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 69 6e 65 2d 6d 69 6e 6f 72 2d 6d 6f 64 65 20 64 69	##autoload.(define-minor-mode.di
40a00	72 76 69 73 68 2d 6f 76 65 72 72 69 64 65 2d 64 69 72 65 64 2d 6d 6f 64 65 0a 20 20 22 4c 65 74	rvish-override-dired-mode..."Let
40a20	20 44 69 72 76 69 73 68 20 74 61 6b 65 20 6f 76 65 72 20 44 69 72 65 64 20 67 6c 6f 62 61 6c 6c	.Dirvish.take.over.Dired.globall
40a40	79 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 69 72 76 69 73 68 20 3a 67 6c 6f 62 61 6c 20 74 0a	y."...:group.'dirvish.:global.t.
40a60	20 20 28 6c 65 74 20 28 28 61 64 73 20 27 28 28 64 69 72 65 64 2d 66 69 6e 64 2d 66 69 6c 65 20	..(let.((ads.'((dired-find-file.
40a80	64 69 72 76 69 73 68 2d 66 69 6e 64 2d 65 6e 74 72 79 2d 61 20 3a 6f 76 65 72 72 69 64 65 29 0a	dirvish-find-entry-a.:override).
40aa0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 6e 6f 73 65 6c 65 63 74 20 64	...............(dired-noselect.d
40ac0	69 72 76 69 73 68 2d 64 69 72 65 64 2d 6e 6f 73 65 6c 65 63 74 2d 61 20 3a 61 72 6f 75 6e 64 29	irvish-dired-noselect-a.:around)
40ae0	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 69 6e 73 65 72 74 2d 73 75	................(dired-insert-su
40b00	62 64 69 72 20 64 69 72 76 69 73 68 2d 69 6e 73 65 72 74 2d 73 75 62 64 69 72 2d 61 20 3a 61 66	bdir.dirvish-insert-subdir-a.:af
40b20	74 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6d 61 67 65 2d 64 69 72 65 64	ter)................(image-dired
40b40	2d 63 72 65 61 74 65 2d 74 68 75 6d 62 6e 61 69 6c 2d 62 75 66 66 65 72 20 64 69 72 76 69 73 68	-create-thumbnail-buffer.dirvish
40b60	2d 74 68 75 6d 62 2d 62 75 66 2d 61 20 3a 61 72 6f 75 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20	-thumb-buf-a.:around)...........
40b80	20 20 20 20 20 28 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	.....(wdired-change-to-wdired-mo
40ba0	64 65 20 64 69 72 76 69 73 68 2d 77 64 69 72 65 64 2d 65 6e 74 65 72 2d 61 20 3a 61 66 74 65 72	de.dirvish-wdired-enter-a.:after
40bc0	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 64 69 72 65 64 2d 63 68 61 6e 67 65 2d	)................(wdired-change-
40be0	74 6f 2d 64 69 72 65 64 2d 6d 6f 64 65 20 64 69 72 76 69 73 68 2d 69 6e 69 74 2d 64 69 72 65 64	to-dired-mode.dirvish-init-dired
40c00	2d 62 75 66 66 65 72 20 3a 61 66 74 65 72 29 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 6c 2d 63	-buffer.:after))).........(sel-c
40c20	68 20 23 27 64 69 72 76 69 73 68 2d 73 65 6c 65 63 74 69 6f 6e 2d 63 68 61 6e 67 65 2d 68 29 0a	h.#'dirvish-selection-change-h).
40c40	20 20 20 20 20 20 20 20 28 74 61 62 2d 70 6f 73 74 20 23 27 64 69 72 76 69 73 68 2d 74 61 62 2d	........(tab-post.#'dirvish-tab-
40c60	6e 65 77 2d 70 6f 73 74 2d 68 29 29 0a 20 20 20 20 28 69 66 20 64 69 72 76 69 73 68 2d 6f 76 65	new-post-h)).....(if.dirvish-ove
40c80	72 72 69 64 65 2d 64 69 72 65 64 2d 6d 6f 64 65 0a 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 20	rride-dired-mode.........(progn.
40ca0	28 70 63 61 73 65 2d 64 6f 6c 69 73 74 20 28 60 28 2c 73 79 6d 20 2c 66 6e 20 2c 68 6f 77 29 20	(pcase-dolist.(`(,sym.,fn.,how).
40cc0	61 64 73 29 20 28 61 64 76 69 63 65 2d 61 64 64 20 73 79 6d 20 68 6f 77 20 66 6e 29 29 0a 20 20	ads).(advice-add.sym.how.fn))...
40ce0	20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 64 64 2d 68 6f 6f 6b 20 27 77 69 6e 64 6f 77 2d 73	.............(add-hook.'window-s
40d00	65 6c 65 63 74 69 6f 6e 2d 63 68 61 6e 67 65 2d 66 75 6e 63 74 69 6f 6e 73 20 73 65 6c 2d 63 68	election-change-functions.sel-ch
40d20	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 64 64 2d 68 6f 6f 6b 20 27 74 61 62 2d	)................(add-hook.'tab-
40d40	62 61 72 2d 74 61 62 2d 70 6f 73 74 2d 6f 70 65 6e 2d 66 75 6e 63 74 69 6f 6e 73 20 74 61 62 2d	bar-tab-post-open-functions.tab-
40d60	70 6f 73 74 29 29 0a 20 20 20 20 20 20 28 70 63 61 73 65 2d 64 6f 6c 69 73 74 20 28 60 28 2c 73	post)).......(pcase-dolist.(`(,s
40d80	79 6d 20 2c 66 6e 29 20 61 64 73 29 20 28 61 64 76 69 63 65 2d 72 65 6d 6f 76 65 20 73 79 6d 20	ym.,fn).ads).(advice-remove.sym.
40da0	66 6e 29 29 0a 20 20 20 20 20 20 28 72 65 6d 6f 76 65 2d 68 6f 6f 6b 20 27 77 69 6e 64 6f 77 2d	fn)).......(remove-hook.'window-
40dc0	73 65 6c 65 63 74 69 6f 6e 2d 63 68 61 6e 67 65 2d 66 75 6e 63 74 69 6f 6e 73 20 73 65 6c 2d 63	selection-change-functions.sel-c
40de0	68 29 0a 20 20 20 20 20 20 28 72 65 6d 6f 76 65 2d 68 6f 6f 6b 20 27 74 61 62 2d 62 61 72 2d 74	h).......(remove-hook.'tab-bar-t
40e00	61 62 2d 70 6f 73 74 2d 6f 70 65 6e 2d 66 75 6e 63 74 69 6f 6e 73 20 74 61 62 2d 70 6f 73 74 29	ab-post-open-functions.tab-post)
40e20	29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 76 69	)))..;;;###autoload.(defun.dirvi
40e40	73 68 20 28 26 6f 70 74 69 6f 6e 61 6c 20 70 61 74 68 29 0a 20 20 22 53 74 61 72 74 20 61 20 66	sh.(&optional.path)..."Start.a.f
40e60	75 6c 6c 20 66 72 61 6d 65 20 44 69 72 76 69 73 68 20 73 65 73 73 69 6f 6e 20 77 69 74 68 20 6f	ull.frame.Dirvish.session.with.o
40e80	70 74 69 6f 6e 61 6c 20 50 41 54 48 2e 0a 49 66 20 63 61 6c 6c 65 64 20 77 69 74 68 20 5c 5c 5b	ptional.PATH..If.called.with.\\[
40ea0	75 6e 69 76 65 72 73 61 6c 2d 61 72 67 75 6d 65 6e 74 73 5d 2c 20 70 72 6f 6d 70 74 20 66 6f 72	universal-arguments],.prompt.for
40ec0	20 50 41 54 48 2c 0a 6f 74 68 65 72 77 69 73 65 20 69 74 20 64 65 66 61 75 6c 74 73 20 74 6f 20	.PATH,.otherwise.it.defaults.to.
40ee0	60 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 27 2e 22 0a 20 20 28 69 6e 74 65 72 61 63	`default-directory'."...(interac
40f00	74 69 76 65 20 28 6c 69 73 74 20 28 61 6e 64 20 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61	tive.(list.(and.current-prefix-a
40f20	72 67 20 28 72 65 61 64 2d 64 69 72 65 63 74 6f 72 79 2d 6e 61 6d 65 20 22 44 69 72 76 69 73 68	rg.(read-directory-name."Dirvish
40f40	3a 20 22 29 29 29 29 0a 20 20 28 64 69 72 76 69 73 68 2d 2d 72 65 75 73 65 2d 6f 72 2d 63 72 65	:."))))...(dirvish--reuse-or-cre
40f60	61 74 65 20 70 61 74 68 20 64 69 72 76 69 73 68 2d 64 65 66 61 75 6c 74 2d 6c 61 79 6f 75 74 29	ate.path.dirvish-default-layout)
40f80	29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 64 69 72 76 69 73 68	)..;;;###autoload.(defun.dirvish
40fa0	2d 64 77 69 6d 20 28 26 6f 70 74 69 6f 6e 61 6c 20 70 61 74 68 29 0a 20 20 22 53 74 61 72 74 20	-dwim.(&optional.path)..."Start.
40fc0	61 20 66 75 6c 6c 66 72 61 6d 65 20 73 65 73 73 69 6f 6e 20 6f 6e 6c 79 20 77 68 65 6e 20 60 6f	a.fullframe.session.only.when.`o
40fe0	6e 65 2d 77 69 6e 64 6f 77 2d 70 27 2e 0a 49 66 20 63 61 6c 6c 65 64 20 77 69 74 68 20 5c 5c 5b	ne-window-p'..If.called.with.\\[
41000	75 6e 69 76 65 72 73 61 6c 2d 61 72 67 75 6d 65 6e 74 73 5d 2c 20 70 72 6f 6d 70 74 20 66 6f 72	universal-arguments],.prompt.for
41020	20 50 41 54 48 2c 0a 6f 74 68 65 72 77 69 73 65 20 69 74 20 64 65 66 61 75 6c 74 73 20 74 6f 20	.PATH,.otherwise.it.defaults.to.
41040	60 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 27 2e 0a 49 66 20 60 6f 6e 65 2d 77 69 6e	`default-directory'..If.`one-win
41060	64 6f 77 2d 70 27 20 72 65 74 75 72 6e 73 20 6e 69 6c 2c 20 6f 70 65 6e 20 50 41 54 48 20 75 73	dow-p'.returns.nil,.open.PATH.us
41080	69 6e 67 20 72 65 67 75 6c 61 72 20 44 69 72 65 64 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69	ing.regular.Dired."...(interacti
410a0	76 65 20 28 6c 69 73 74 20 28 61 6e 64 20 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67	ve.(list.(and.current-prefix-arg
410c0	20 28 72 65 61 64 2d 64 69 72 65 63 74 6f 72 79 2d 6e 61 6d 65 20 22 44 69 72 76 69 73 68 3a 20	.(read-directory-name."Dirvish:.
410e0	22 29 29 29 29 0a 20 20 28 64 69 72 76 69 73 68 2d 2d 72 65 75 73 65 2d 6f 72 2d 63 72 65 61 74	"))))...(dirvish--reuse-or-creat
41100	65 0a 20 20 20 70 61 74 68 20 28 69 66 20 64 69 72 76 69 73 68 2d 2d 74 68 69 73 20 28 63 61 72	e....path.(if.dirvish--this.(car
41120	20 28 64 76 2d 6c 61 79 6f 75 74 20 64 69 72 76 69 73 68 2d 2d 74 68 69 73 29 29 0a 20 20 20 20	.(dv-layout.dirvish--this)).....
41140	20 20 20 20 20 20 28 61 6e 64 20 28 6f 6e 65 2d 77 69 6e 64 6f 77 2d 70 29 20 64 69 72 76 69 73	......(and.(one-window-p).dirvis
41160	68 2d 64 65 66 61 75 6c 74 2d 6c 61 79 6f 75 74 29 29 29 29 0a 0a 28 74 72 61 6e 73 69 65 6e 74	h-default-layout))))..(transient
41180	2d 64 65 66 69 6e 65 2d 70 72 65 66 69 78 20 64 69 72 76 69 73 68 2d 64 69 73 70 61 74 63 68 20	-define-prefix.dirvish-dispatch.
411a0	28 29 0a 20 20 22 4d 61 69 6e 20 6d 65 6e 75 20 66 6f 72 20 44 69 72 65 64 2f 44 69 72 76 69 73	()..."Main.menu.for.Dired/Dirvis
411c0	68 2e 22 0a 20 20 5b 3a 64 65 73 63 72 69 70 74 69 6f 6e 0a 20 20 20 28 6c 61 6d 62 64 61 20 28	h."...[:description....(lambda.(
411e0	29 20 28 64 69 72 76 69 73 68 2d 2d 66 6f 72 6d 61 74 2d 6d 65 6e 75 2d 68 65 61 64 69 6e 67 0a	).(dirvish--format-menu-heading.
41200	20 20 20 20 20 20 20 20 20 20 22 44 69 72 76 69 73 68 20 6d 61 69 6e 20 6d 65 6e 75 22 0a 20 20	.........."Dirvish.main.menu"...
41220	20 20 20 20 20 20 20 20 22 50 72 65 73 73 20 3f 20 74 6f 20 73 65 65 20 6d 6f 72 65 20 69 6e 66	........"Press.?.to.see.more.inf
41240	6f 20 66 6f 72 20 74 68 65 20 63 75 72 72 65 6e 74 20 6d 65 6e 75 22 29 29 0a 20 20 20 22 54 72	o.for.the.current.menu"))...."Tr
41260	61 6e 73 69 65 6e 74 20 63 6f 6d 6d 61 6e 64 73 22 0a 20 20 20 28 22 61 22 20 22 51 75 69 63 6b	ansient.commands"....("a"."Quick
41280	20 61 63 63 65 73 73 22 20 20 20 20 20 20 20 20 20 20 20 64 69 72 76 69 73 68 2d 71 75 69 63 6b	.access"...........dirvish-quick
412a0	2d 61 63 63 65 73 73 29 0a 20 20 20 28 22 68 22 20 22 47 6f 20 74 6f 20 68 69 73 74 6f 72 79 20	-access)....("h"."Go.to.history.
412c0	65 6e 74 72 69 65 73 22 20 20 64 69 72 76 69 73 68 2d 68 69 73 74 6f 72 79 2d 6d 65 6e 75 29 0a	entries"..dirvish-history-menu).
412e0	20 20 20 28 22 73 22 20 22 53 6f 72 74 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 22 20 20 20	...("s"."Sort.current.buffer"...
41300	20 64 69 72 76 69 73 68 2d 71 75 69 63 6b 73 6f 72 74 29 0a 20 20 20 28 22 6c 22 20 22 53 65 74	.dirvish-quicksort)....("l"."Set
41320	75 70 20 6c 69 73 74 69 6e 67 20 73 77 69 74 63 68 65 73 22 20 64 69 72 76 69 73 68 2d 6c 73 2d	up.listing.switches".dirvish-ls-
41340	73 77 69 74 63 68 65 73 2d 6d 65 6e 75 29 0a 20 20 20 28 22 66 22 20 22 53 65 74 75 70 20 66 64	switches-menu)....("f"."Setup.fd
41360	2d 66 69 6e 64 20 73 77 69 74 63 68 65 73 22 20 64 69 72 76 69 73 68 2d 66 64 2d 73 77 69 74 63	-find.switches".dirvish-fd-switc
41380	68 65 73 2d 6d 65 6e 75 0a 20 20 20 20 3a 69 66 20 28 6c 61 6d 62 64 61 20 28 29 20 28 64 69 72	hes-menu.....:if.(lambda.().(dir
413a0	76 69 73 68 2d 70 72 6f 70 20 3a 66 64 2d 61 72 67 6c 69 73 74 29 29 29 0a 20 20 20 28 22 6d 22	vish-prop.:fd-arglist)))....("m"
413c0	20 22 4d 61 6e 61 67 65 20 6d 61 72 6b 73 22 20 20 20 20 20 20 20 20 20 20 20 64 69 72 76 69 73	."Manage.marks"...........dirvis
413e0	68 2d 6d 61 72 6b 2d 6d 65 6e 75 29 0a 20 20 20 28 22 65 22 20 22 4d 61 6e 61 67 65 20 65 6d 65	h-mark-menu)....("e"."Manage.eme
41400	72 67 65 64 20 67 72 6f 75 70 73 22 20 20 64 69 72 76 69 73 68 2d 65 6d 65 72 67 65 2d 6d 65 6e	rged.groups"..dirvish-emerge-men
41420	75 29 0a 20 20 20 28 22 74 22 20 22 4d 61 6e 61 67 65 20 73 75 62 74 72 65 65 73 22 20 20 20 20	u)....("t"."Manage.subtrees"....
41440	20 20 20 20 64 69 72 76 69 73 68 2d 73 75 62 74 72 65 65 2d 6d 65 6e 75 29 0a 20 20 20 28 22 72	....dirvish-subtree-menu)....("r
41460	22 20 22 52 65 6e 61 6d 65 20 66 69 6c 65 73 22 20 20 20 20 20 20 20 20 20 20 20 64 69 72 76 69	"."Rename.files"...........dirvi
41480	73 68 2d 72 65 6e 61 6d 69 6e 67 2d 6d 65 6e 75 29 0a 20 20 20 28 22 76 22 20 22 56 65 72 73 69	sh-renaming-menu)....("v"."Versi
414a0	6f 6e 20 63 6f 6e 74 72 6f 6c 20 73 79 73 74 65 6d 22 20 64 69 72 76 69 73 68 2d 76 63 2d 6d 65	on.control.system".dirvish-vc-me
414c0	6e 75 29 0a 20 20 20 28 22 79 22 20 22 59 61 6e 6b 20 6d 61 72 6b 65 64 20 66 69 6c 65 73 22 20	nu)....("y"."Yank.marked.files".
414e0	20 20 20 20 20 64 69 72 76 69 73 68 2d 79 61 6e 6b 2d 6d 65 6e 75 29 0a 20 20 20 28 22 69 22 20	.....dirvish-yank-menu)....("i".
41500	22 47 65 74 20 66 69 6c 65 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 22 20 20 20 64 69 72 76 69 73 68	"Get.file.information"...dirvish
41520	2d 66 69 6c 65 2d 69 6e 66 6f 2d 6d 65 6e 75 29 0a 20 20 20 22 22 20 22 41 63 74 69 6f 6e 73 20	-file-info-menu)....""."Actions.
41540	7c 20 45 73 73 65 6e 74 69 61 6c 20 63 6f 6d 6d 61 6e 64 73 22 0a 20 20 20 28 22 2f 22 20 22 50	\|.Essential.commands"....("/"."P
41560	65 72 66 6f 72 6d 20 66 64 20 73 65 61 72 63 68 22 20 20 20 20 20 20 64 69 72 76 69 73 68 2d 66	erform.fd.search"......dirvish-f
41580	64 29 0a 20 20 20 28 22 40 22 20 22 46 69 6e 64 20 61 6c 6c 20 64 69 72 73 20 62 79 20 66 64 22	d)....("@"."Find.all.dirs.by.fd"
415a0	20 20 20 20 64 69 72 76 69 73 68 2d 66 64 2d 6a 75 6d 70 29 0a 20 20 20 28 22 6e 22 20 22 4c 69	....dirvish-fd-jump)....("n"."Li
415c0	76 65 20 6e 61 72 72 6f 77 69 6e 67 22 20 20 20 20 20 20 20 20 20 64 69 72 76 69 73 68 2d 6e 61	ve.narrowing".........dirvish-na
415e0	72 72 6f 77 29 0a 20 20 20 28 22 75 22 20 22 55 73 65 72 20 69 6e 74 65 72 66 61 63 65 20 73 65	rrow)....("u"."User.interface.se
41600	74 75 70 22 20 20 20 64 69 72 76 69 73 68 2d 73 65 74 75 70 2d 6d 65 6e 75 29 0a 20 20 20 28 22	tup"...dirvish-setup-menu)....("
41620	63 22 20 22 44 69 72 65 64 20 63 68 65 61 74 73 68 65 65 74 22 20 20 20 20 20 20 20 64 69 72 76	c"."Dired.cheatsheet".......dirv
41640	69 73 68 2d 64 69 72 65 64 2d 63 68 65 61 74 73 68 65 65 74 29 5d 29 0a 0a 28 70 72 6f 76 69 64	ish-dired-cheatsheet)])..(provid
41660	65 20 27 64 69 72 76 69 73 68 29 0a 3b 3b 3b 20 64 69 72 76 69 73 68 2e 65 6c 20 65 6e 64 73 20	e.'dirvish).;;;.dirvish.el.ends.
41680	68 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	here............................
416a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
416c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
416e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41700	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41720	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41740	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41760	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41780	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
417a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
417c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
417e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41800	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41820	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41840	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41860	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41880	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
418a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
418c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
418e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41900	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41920	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41940	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41960	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41980	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
419a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
419c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
419e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41a00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41a20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41a40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41a60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41a80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41aa0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41ac0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41ae0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41b00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41b20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41b40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41b60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41b80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41ba0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41bc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41be0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41c00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41c20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41c40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41c60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41c80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41ca0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41cc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41ce0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41d00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41d20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41d40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41d60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41d80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41da0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41dc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41de0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41e00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41e20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41e40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41e60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41e80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41ea0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41ec0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41ee0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41f00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41f20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41f40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41f60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41f80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41fa0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41fc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
41fe0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42000	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42020	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42040	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42060	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42080	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
420a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
420c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
420e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42100	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42120	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42140	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42160	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42180	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
421a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
421c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
421e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42200	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42220	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42240	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42260	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42280	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
422a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
422c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
422e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42300	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42320	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42340	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42360	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42380	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
423a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
423c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
423e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42400	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42420	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42440	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42460	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42480	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
424a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
424c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
424e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42500	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42520	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42540	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42560	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42580	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
425a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
425c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
425e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42600	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42620	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42640	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42660	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42680	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
426a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
426c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
426e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42700	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42720	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42740	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42760	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42780	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
427a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
427c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
427e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42800	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42820	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42840	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42860	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42880	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
428a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
428c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
428e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42900	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42920	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42940	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42960	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42980	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
429a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
429c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
429e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42a00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42a20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42a40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42a60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42a80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42aa0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42ac0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42ae0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42b00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42b20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42b40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42b60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42b80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42ba0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42bc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42be0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42c00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42c20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42c40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42c60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42c80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42ca0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42cc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42ce0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42d00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42d20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42d40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42d60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42d80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42da0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42dc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42de0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42e00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42e20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42e40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42e60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42e80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42ea0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42ec0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42ee0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42f00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42f20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42f40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42f60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42f80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42fa0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42fc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
42fe0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43000	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43020	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43040	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43060	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43080	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
430a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
430c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
430e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43100	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43120	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43140	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43160	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43180	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
431a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
431c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
431e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43200	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43220	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43240	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43260	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43280	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
432a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
432c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
432e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43300	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43320	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43340	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43360	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43380	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
433a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
433c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
433e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43400	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43420	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43440	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43460	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43480	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
434a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
434c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
434e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43500	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43520	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43540	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43560	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43580	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
435a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
435c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
435e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43600	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43620	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43640	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43660	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43680	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
436a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
436c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
436e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43700	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43720	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43740	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43760	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
43780	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
437a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
437c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
437e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................