blob: 856fe3a0ed153e855ea7dbe0120886c0345cd58e (plain)

ofs	hex dump	ascii
0000	63 6f 75 6e 73 65 6c 2d 30 2e 31 35 2e 31 2f 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	counsel-0.15.1/.................
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 31 37 30 35 00 20 35 00 00 00	0000000.00000000000.011705..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	63 6f 75 6e 73 65 6c 2d 30 2e 31 35 2e 31 2f 63 6f 75 6e 73 65 6c 2e 65 6c 00 00 00 00 00 00 00	counsel-0.15.1/counsel.el.......
0220	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
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	31 30 35 35 37 31 33 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 33 37 31 33 00 20 30 00 00 00	1055713.00000000000.013713..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 63 6f 75 6e 73 65 6c 2e 65 6c 20 2d 2d 2d 20 56 61 72 69 6f 75 73 20 63 6f 6d 70 6c	;;;.counsel.el.---.Various.compl
0420	65 74 69 6f 6e 20 66 75 6e 63 74 69 6f 6e 73 20 75 73 69 6e 67 20 49 76 79 20 2d 2a 2d 20 6c 65	etion.functions.using.Ivy.-*-.le
0440	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 67	xical-binding:.t.-*-..;;.Copyrig
0460	68 74 20 28 43 29 20 32 30 31 35 2d 32 30 32 35 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46	ht.(C).2015-2025.Free.Software.F
0480	6f 75 6e 64 61 74 69 6f 6e 2c 20 49 6e 63 2e 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 4f 6c 65 68	oundation,.Inc...;;.Author:.Oleh
04a0	20 4b 72 65 68 65 6c 20 3c 6f 68 77 6f 65 6f 77 68 6f 40 67 6d 61 69 6c 2e 63 6f 6d 3e 0a 3b 3b	.Krehel.<ohwoeowho@gmail.com>.;;
04c0	20 4d 61 69 6e 74 61 69 6e 65 72 3a 20 42 61 73 69 6c 20 4c 2e 20 43 6f 6e 74 6f 76 6f 75 6e 65	.Maintainer:.Basil.L..Contovoune
04e0	73 69 6f 73 20 3c 62 61 73 69 6c 40 63 6f 6e 74 6f 76 6f 75 2e 6e 65 74 3e 0a 3b 3b 20 55 52 4c	sios.<basil@contovou.net>.;;.URL
0500	3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 61 62 6f 2d 61 62 6f 2f 73 77 69	:.https://github.com/abo-abo/swi
0520	70 65 72 0a 3b 3b 20 56 65 72 73 69 6f 6e 3a 20 30 2e 31 35 2e 31 0a 3b 3b 20 50 61 63 6b 61 67	per.;;.Version:.0.15.1.;;.Packag
0540	65 2d 52 65 71 75 69 72 65 73 3a 20 28 28 65 6d 61 63 73 20 22 32 34 2e 35 22 29 20 28 69 76 79	e-Requires:.((emacs."24.5").(ivy
0560	20 22 30 2e 31 35 2e 31 22 29 20 28 73 77 69 70 65 72 20 22 30 2e 31 35 2e 31 22 29 29 0a 3b 3b	."0.15.1").(swiper."0.15.1")).;;
0580	20 4b 65 79 77 6f 72 64 73 3a 20 63 6f 6e 76 65 6e 69 65 6e 63 65 2c 20 6d 61 74 63 68 69 6e 67	.Keywords:.convenience,.matching
05a0	2c 20 74 6f 6f 6c 73 0a 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 70 61 72 74 20 6f 66	,.tools..;;.This.file.is.part.of
05c0	20 47 4e 55 20 45 6d 61 63 73 2e 0a 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 66 72 65	.GNU.Emacs...;;.This.file.is.fre
05e0	65 20 73 6f 66 74 77 61 72 65 3b 20 79 6f 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65	e.software;.you.can.redistribute
0600	20 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 66 79 0a 3b 3b 20 69 74 20 75 6e 64 65 72 20 74 68	.it.and/or.modify.;;.it.under.th
0620	65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69	e.terms.of.the.GNU.General.Publi
0640	63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 62 6c 69 73 68 65 64 20 62 79 0a 3b 3b 20 74 68 65	c.License.as.published.by.;;.the
0660	20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 3b 20 65 69 74 68 65	.Free.Software.Foundation;.eithe
0680	72 20 76 65 72 73 69 6f 6e 20 33 2c 20 6f 72 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f 6e 29	r.version.3,.or.(at.your.option)
06a0	0a 3b 3b 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 0a 3b 3b 20 54 68 69 73 20	.;;.any.later.version...;;.This.
06c0	70 72 6f 67 72 61 6d 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 6f	program.is.distributed.in.the.ho
06e0	70 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b 3b 20 62 75	pe.that.it.will.be.useful,.;;.bu
0700	74 20 57 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20	t.WITHOUT.ANY.WARRANTY;.without.
0720	65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20	even.the.implied.warranty.of.;;.
0740	4d 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41	MERCHANTABILITY.or.FITNESS.FOR.A
0760	20 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 0a 3b 3b	.PARTICULAR.PURPOSE...See.the.;;
0780	20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20	.GNU.General.Public.License.for.
07a0	6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 0a 3b 3b 20 46 6f 72 20 61 20 66 75 6c 6c 20 63 6f 70	more.details...;;.For.a.full.cop
07c0	79 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65	y.of.the.GNU.General.Public.Lice
07e0	6e 73 65 0a 3b 3b 20 73 65 65 20 3c 68 74 74 70 73 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f	nse.;;.see.<https://www.gnu.org/
0800	6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b	licenses/>...;;;.Commentary:..;;
0820	20 4a 75 73 74 20 63 61 6c 6c 20 6f 6e 65 20 6f 66 20 74 68 65 20 69 6e 74 65 72 61 63 74 69 76	.Just.call.one.of.the.interactiv
0840	65 20 66 75 6e 63 74 69 6f 6e 73 20 69 6e 20 74 68 69 73 20 66 69 6c 65 20 74 6f 20 63 6f 6d 70	e.functions.in.this.file.to.comp
0860	6c 65 74 65 0a 3b 3b 20 74 68 65 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 74 68 69 6e 67 20	lete.;;.the.corresponding.thing.
0880	75 73 69 6e 67 20 60 69 76 79 27 2e 0a 3b 3b 0a 3b 3b 20 43 75 72 72 65 6e 74 6c 79 20 61 76 61	using.`ivy'..;;.;;.Currently.ava
08a0	69 6c 61 62 6c 65 3a 0a 3b 3b 20 2d 20 53 79 6d 62 6f 6c 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 66	ilable:.;;.-.Symbol.completion.f
08c0	6f 72 20 45 6c 69 73 70 2c 20 43 6f 6d 6d 6f 6e 20 4c 69 73 70 2c 20 50 79 74 68 6f 6e 2c 20 43	or.Elisp,.Common.Lisp,.Python,.C
08e0	6c 6f 6a 75 72 65 2c 20 43 2c 20 43 2b 2b 2e 0a 3b 3b 20 2d 20 44 65 73 63 72 69 62 65 20 66 75	lojure,.C,.C++..;;.-.Describe.fu
0900	6e 63 74 69 6f 6e 73 20 66 6f 72 20 45 6c 69 73 70 3a 20 66 75 6e 63 74 69 6f 6e 2c 20 76 61 72	nctions.for.Elisp:.function,.var
0920	69 61 62 6c 65 2c 20 6c 69 62 72 61 72 79 2c 20 63 6f 6d 6d 61 6e 64 2c 0a 3b 3b 20 20 20 62 69	iable,.library,.command,.;;...bi
0940	6e 64 69 6e 67 73 2c 20 74 68 65 6d 65 2e 0a 3b 3b 20 2d 20 4e 61 76 69 67 61 74 69 6f 6e 20 66	ndings,.theme..;;.-.Navigation.f
0960	75 6e 63 74 69 6f 6e 73 3a 20 69 6d 65 6e 75 2c 20 61 63 65 2d 6c 69 6e 65 2c 20 73 65 6d 61 6e	unctions:.imenu,.ace-line,.seman
0980	74 69 63 2c 20 6f 75 74 6c 69 6e 65 2e 0a 3b 3b 20 2d 20 47 69 74 20 75 74 69 6c 69 74 69 65 73	tic,.outline..;;.-.Git.utilities
09a0	3a 20 67 69 74 2d 66 69 6c 65 73 2c 20 67 69 74 2d 67 72 65 70 2c 20 67 69 74 2d 6c 6f 67 2c 20	:.git-files,.git-grep,.git-log,.
09c0	67 69 74 2d 73 74 61 73 68 2c 20 67 69 74 2d 63 68 65 63 6b 6f 75 74 2e 0a 3b 3b 20 2d 20 47 72	git-stash,.git-checkout..;;.-.Gr
09e0	65 70 20 75 74 69 6c 69 74 69 65 73 3a 20 67 72 65 70 2c 20 61 67 2c 20 70 74 2c 20 72 65 63 6f	ep.utilities:.grep,.ag,.pt,.reco
0a00	6c 6c 2c 20 61 63 6b 2c 20 72 67 2e 0a 3b 3b 20 2d 20 53 79 73 74 65 6d 20 75 74 69 6c 69 74 69	ll,.ack,.rg..;;.-.System.utiliti
0a20	65 73 3a 20 70 72 6f 63 65 73 73 20 6c 69 73 74 2c 20 72 68 79 74 68 6d 62 6f 78 2c 20 6c 69 6e	es:.process.list,.rhythmbox,.lin
0a40	75 78 2d 61 70 70 2e 0a 3b 3b 20 2d 20 4d 61 6e 79 20 6d 6f 72 65 2e 0a 0a 3b 3b 3b 20 43 6f 64	ux-app..;;.-.Many.more...;;;.Cod
0a60	65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 69 76 79 29 0a 28 72 65 71 75 69 72 65 20 27 73 77 69	e:..(require.'ivy).(require.'swi
0a80	70 65 72 29 0a 0a 28 65 76 61 6c 2d 77 68 65 6e 2d 63 6f 6d 70 69 6c 65 0a 20 20 28 72 65 71 75	per)..(eval-when-compile...(requ
0aa0	69 72 65 20 27 73 75 62 72 2d 78 29 29 0a 0a 28 65 76 61 6c 2d 77 68 65 6e 2d 63 6f 6d 70 69 6c	ire.'subr-x))..(eval-when-compil
0ac0	65 0a 20 20 28 75 6e 6c 65 73 73 20 28 66 62 6f 75 6e 64 70 20 27 73 74 61 74 69 63 2d 69 66 29	e...(unless.(fboundp.'static-if)
0ae0	0a 20 20 20 20 28 64 65 66 6d 61 63 72 6f 20 73 74 61 74 69 63 2d 69 66 20 28 63 6f 6e 64 69 74	.....(defmacro.static-if.(condit
0b00	69 6f 6e 20 74 68 65 6e 2d 66 6f 72 6d 20 26 72 65 73 74 20 65 6c 73 65 2d 66 6f 72 6d 73 29 0a	ion.then-form.&rest.else-forms).
0b20	20 20 20 20 20 20 22 45 78 70 61 6e 64 20 74 6f 20 54 48 45 4e 2d 46 4f 52 4d 20 6f 72 20 45 4c	......"Expand.to.THEN-FORM.or.EL
0b40	53 45 2d 46 4f 52 4d 53 20 62 61 73 65 64 20 6f 6e 20 63 6f 6d 70 69 6c 65 2d 74 69 6d 65 20 43	SE-FORMS.based.on.compile-time.C
0b60	4f 4e 44 49 54 49 4f 4e 2e 0a 50 6f 6c 79 66 69 6c 6c 20 66 6f 72 20 45 6d 61 63 73 20 33 30 20	ONDITION..Polyfill.for.Emacs.30.
0b80	60 73 74 61 74 69 63 2d 69 66 27 2e 22 0a 20 20 20 20 20 20 28 64 65 63 6c 61 72 65 20 28 64 65	`static-if'.".......(declare.(de
0ba0	62 75 67 20 28 73 65 78 70 20 73 65 78 70 20 26 72 65 73 74 20 73 65 78 70 29 29 20 28 69 6e 64	bug.(sexp.sexp.&rest.sexp)).(ind
0bc0	65 6e 74 20 32 29 29 0a 20 20 20 20 20 20 28 69 66 20 28 65 76 61 6c 20 63 6f 6e 64 69 74 69 6f	ent.2)).......(if.(eval.conditio
0be0	6e 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 29 0a 20 20 20 20 20 20 20 20 20 20 74 68 65	n.lexical-binding)...........the
0c00	6e 2d 66 6f 72 6d 0a 20 20 20 20 20 20 20 20 28 6d 61 63 72 6f 65 78 70 2d 70 72 6f 67 6e 20 65	n-form.........(macroexp-progn.e
0c20	6c 73 65 2d 66 6f 72 6d 73 29 29 29 29 29 0a 0a 28 64 65 66 67 72 6f 75 70 20 63 6f 75 6e 73 65	lse-forms)))))..(defgroup.counse
0c40	6c 20 6e 69 6c 0a 20 20 22 43 6f 6d 70 6c 65 74 69 6f 6e 20 66 75 6e 63 74 69 6f 6e 73 20 75 73	l.nil..."Completion.functions.us
0c60	69 6e 67 20 49 76 79 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 6d 61 74 63 68 69 6e 67 0a 20 20 3a	ing.Ivy."...:group.'matching...:
0c80	70 72 65 66 69 78 20 22 63 6f 75 6e 73 65 6c 2d 22 29 0a 0c 0a 3b 3b 3b 20 55 74 69 6c 69 74 79	prefix."counsel-")...;;;.Utility
0ca0	0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 65 6c 69 73 70 2d 74 6f 2d 70 63 72 65 20	..(defun.counsel--elisp-to-pcre.
0cc0	28 72 65 67 65 78 20 26 6f 70 74 69 6f 6e 61 6c 20 6c 6f 6f 6b 2d 61 72 6f 75 6e 64 29 0a 20 20	(regex.&optional.look-around)...
0ce0	22 43 6f 6e 76 65 72 74 20 52 45 47 45 58 20 66 72 6f 6d 20 45 6c 69 73 70 20 66 6f 72 6d 61 74	"Convert.REGEX.from.Elisp.format
0d00	20 74 6f 20 50 43 52 45 20 66 6f 72 6d 61 74 2c 20 6f 6e 20 62 65 73 74 2d 65 66 66 6f 72 74 20	.to.PCRE.format,.on.best-effort.
0d20	62 61 73 69 73 2e 0a 52 45 47 45 58 20 6d 61 79 20 62 65 20 6f 66 20 61 6e 79 20 66 6f 72 6d 61	basis..REGEX.may.be.of.any.forma
0d40	74 20 72 65 74 75 72 6e 65 64 20 62 79 20 61 6e 20 49 76 79 20 72 65 67 65 78 20 66 75 6e 63 74	t.returned.by.an.Ivy.regex.funct
0d60	69 6f 6e 2c 0a 6e 61 6d 65 6c 79 20 61 20 73 74 72 69 6e 67 20 6f 72 20 61 20 6c 69 73 74 2e 20	ion,.namely.a.string.or.a.list..
0d80	20 54 68 65 20 72 65 74 75 72 6e 20 76 61 6c 75 65 20 69 73 20 61 6c 77 61 79 73 20 61 20 73 74	.The.return.value.is.always.a.st
0da0	72 69 6e 67 2e 0a 0a 4e 6f 74 65 20 74 68 61 74 20 69 6e 63 6f 72 72 65 63 74 20 72 65 73 75 6c	ring...Note.that.incorrect.resul
0dc0	74 73 20 6d 61 79 20 62 65 20 72 65 74 75 72 6e 65 64 20 66 6f 72 20 73 75 66 66 69 63 69 65 6e	ts.may.be.returned.for.sufficien
0de0	74 6c 79 0a 63 6f 6d 70 6c 65 78 20 72 65 67 65 78 65 73 2e 22 0a 20 20 28 69 66 20 28 63 6f 6e	tly.complex.regexes."...(if.(con
0e00	73 70 20 72 65 67 65 78 29 0a 20 20 20 20 20 20 28 69 66 20 28 61 6e 64 20 6c 6f 6f 6b 2d 61 72	sp.regex).......(if.(and.look-ar
0e20	6f 75 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 63 64 72 20 72 65 67	ound................(or.(cdr.reg
0e40	65 78 29 0a 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 63 64 61	ex)....................(not.(cda
0e60	72 20 72 65 67 65 78 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 0a 20 20	r.regex))))...........(concat...
0e80	20 20 20 20 20 20 20 20 20 22 5e 22 0a 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 6f 6e 63	........."^"............(mapconc
0ea0	61 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 70 61 69 72 29 0a 20 20	at.............(lambda.(pair)...
0ec0	20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 73 75 62 65 78 70 20 28 63 6f 75 6e 73	............(let.((subexp.(couns
0ee0	65 6c 2d 2d 65 6c 69 73 70 2d 74 6f 2d 70 63 72 65 20 28 63 61 72 20 70 61 69 72 29 29 29 29 0a	el--elisp-to-pcre.(car.pair)))).
0f00	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 28 3f 25 63 2e 2a 25	................(format."(?%c.*%
0f20	73 29 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 28 69 66 20	s)".........................(if.
0f40	28 63 64 72 20 70 61 69 72 29 20 3f 3d 20 3f 21 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	(cdr.pair).?=.?!)...............
0f60	20 20 20 20 20 20 20 20 20 20 73 75 62 65 78 70 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	..........subexp))).............
0f80	72 65 67 65 78 0a 20 20 20 20 20 20 20 20 20 20 20 20 22 22 29 29 0a 20 20 20 20 20 20 20 20 28	regex............."")).........(
0fa0	6d 61 70 63 6f 6e 63 61 74 0a 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 70 61 69 72	mapconcat..........(lambda.(pair
0fc0	29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 73 75 62 65 78 70 20 28 63 6f 75 6e	)............(let.((subexp.(coun
0fe0	73 65 6c 2d 2d 65 6c 69 73 70 2d 74 6f 2d 70 63 72 65 20 28 63 61 72 20 70 61 69 72 29 29 29 29	sel--elisp-to-pcre.(car.pair))))
1000	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 69 76 79 2d 2d 73 74 72 69 6e 67 2d 73	..............(if.(ivy--string-s
1020	65 61 72 63 68 20 22 7c 22 20 73 75 62 65 78 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	earch."|".subexp)...............
1040	20 20 20 28 66 6f 72 6d 61 74 20 22 28 3f 3a 25 73 29 22 20 73 75 62 65 78 70 29 0a 20 20 20 20	...(format."(?:%s)".subexp).....
1060	20 20 20 20 20 20 20 20 20 20 20 73 75 62 65 78 70 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 63	...........subexp)))..........(c
1080	6c 2d 72 65 6d 6f 76 65 2d 69 66 2d 6e 6f 74 20 23 27 63 64 72 20 72 65 67 65 78 29 0a 20 20 20	l-remove-if-not.#'cdr.regex)....
10a0	20 20 20 20 20 20 22 2e 2a 22 29 29 0a 20 20 20 20 28 72 65 70 6c 61 63 65 2d 72 65 67 65 78 70	......".*")).....(replace-regexp
10c0	2d 69 6e 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 22 5c 5c 5c 5c 5b 28 29 7b 7d 7c 60 27 5d 5c 5c	-in-string......"\\\\[(){}|`']\\
10e0	7c 5b 28 29 5d 22 0a 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 73 29 0a 20 20 20 20 20 20 20 28	|[()]"......(lambda.(s)........(
1100	6f 72 20 28 63 64 72 20 28 61 73 73 6f 63 20 73 20 27 28 28 22 5c 5c 28 22 20 2e 20 22 28 22 29	or.(cdr.(assoc.s.'(("\\("..."(")
1120	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 22 5c 5c	............................("\\
1140	29 22 20 2e 20 22 29 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	)"...")").......................
1160	20 20 20 20 20 28 22 28 22 20 2e 20 22 5c 5c 28 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	.....("("..."\\(")..............
1180	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 22 29 22 20 2e 20 22 5c 5c 29 22 29 0a 20 20 20 20	..............(")"..."\\)").....
11a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 22 5c 5c 7b 22 20 2e 20	.......................("\\{"...
11c0	22 7b 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 20 20 20	"{")............................
11e0	28 22 5c 5c 7d 22 20 2e 20 22 7d 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	("\\}"..."}")...................
1200	20 20 20 20 20 20 20 20 20 28 22 5c 5c 7c 22 20 2e 20 22 7c 22 29 0a 20 20 20 20 20 20 20 20 20	.........("\\|"..."|")..........
1220	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 22 5c 5c 60 22 20 2e 20 22 5e 22 29 0a	..................("\\`"..."^").
1240	20 20 20 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 22 5c 5c 27	...........................("\\'
1260	22 20 2e 20 22 24 22 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 0a 20 20	"..."$"))))............(error...
1280	20 20 20 20 20 20 20 20 20 20 22 55 6e 65 78 70 65 63 74 65 64 20 65 72 72 6f 72 20 69 6e 20 60	.........."Unexpected.error.in.`
12a0	63 6f 75 6e 73 65 6c 2d 2d 65 6c 69 73 70 2d 74 6f 2d 70 63 72 65 27 20 28 67 6f 74 20 6d 61 74	counsel--elisp-to-pcre'.(got.mat
12c0	63 68 20 25 53 29 22 20 73 29 29 29 0a 20 20 20 20 20 72 65 67 65 78 20 74 20 74 29 29 29 0a 0a	ch.%S)".s)))......regex.t.t)))..
12e0	28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 64 69 72 65 63 74 6f 72 79 2d 6e 61 6d 65 20 28 64	(defun.counsel-directory-name.(d
1300	69 72 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 6e 61 6d 65 20 6f 66 20 64 69 72 65 63 74	ir)..."Return.the.name.of.direct
1320	6f 72 79 20 44 49 52 20 77 69 74 68 20 61 20 73 6c 61 73 68 2e 22 0a 20 20 28 66 69 6c 65 2d 6e	ory.DIR.with.a.slash."...(file-n
1340	61 6d 65 2d 61 73 2d 64 69 72 65 63 74 6f 72 79 0a 20 20 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 6e	ame-as-directory....(file-name-n
1360	6f 6e 64 69 72 65 63 74 6f 72 79 0a 20 20 20 20 28 64 69 72 65 63 74 6f 72 79 2d 66 69 6c 65 2d	ondirectory.....(directory-file-
1380	6e 61 6d 65 20 64 69 72 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 73 74 72	name.dir))))..(defun.counsel-str
13a0	69 6e 67 2d 63 6f 6d 70 6f 73 65 20 28 70 72 65 66 69 78 20 73 74 72 29 0a 20 20 22 4d 61 6b 65	ing-compose.(prefix.str)..."Make
13c0	20 50 52 45 46 49 58 20 74 68 65 20 64 69 73 70 6c 61 79 20 70 72 65 66 69 78 20 6f 66 20 53 54	.PREFIX.the.display.prefix.of.ST
13e0	52 20 74 68 72 6f 75 67 68 20 74 65 78 74 20 70 72 6f 70 65 72 74 69 65 73 2e 22 0a 20 20 28 6c	R.through.text.properties."...(l
1400	65 74 20 28 28 73 74 72 20 28 63 6f 70 79 2d 73 65 71 75 65 6e 63 65 20 73 74 72 29 29 29 0a 20	et.((str.(copy-sequence.str)))..
1420	20 20 20 28 70 75 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 0a 20 20 20 20 20 30 20 31 20 27	...(put-text-property......0.1.'
1440	64 69 73 70 6c 61 79 0a 20 20 20 20 20 28 63 6f 6e 63 61 74 20 70 72 65 66 69 78 20 28 73 75 62	display......(concat.prefix.(sub
1460	73 74 72 69 6e 67 20 73 74 72 20 30 20 31 29 29 0a 20 20 20 20 20 73 74 72 29 0a 20 20 20 20 73	string.str.0.1))......str).....s
1480	74 72 29 29 0a 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6f 75 6e 73 65 6c 2d 2d 65 78 65 63 75 74	tr))..(defalias.'counsel--execut
14a0	61 62 6c 65 2d 66 69 6e 64 0a 20 20 3b 3b 20 47 61 69 6e 65 64 20 6f 70 74 69 6f 6e 61 6c 20 61	able-find...;;.Gained.optional.a
14c0	72 67 75 6d 65 6e 74 20 69 6e 20 32 37 2e 31 2e 0a 20 20 28 69 66 20 28 3e 3d 20 65 6d 61 63 73	rgument.in.27.1....(if.(>=.emacs
14e0	2d 6d 61 6a 6f 72 2d 76 65 72 73 69 6f 6e 20 32 37 29 0a 20 20 20 20 20 20 23 27 65 78 65 63 75	-major-version.27).......#'execu
1500	74 61 62 6c 65 2d 66 69 6e 64 0a 20 20 20 20 28 6c 61 6d 62 64 61 20 28 63 6f 6d 6d 61 6e 64 20	table-find.....(lambda.(command.
1520	26 6f 70 74 69 6f 6e 61 6c 20 5f 72 65 6d 6f 74 65 29 0a 20 20 20 20 20 20 28 65 78 65 63 75 74	&optional._remote).......(execut
1540	61 62 6c 65 2d 66 69 6e 64 20 63 6f 6d 6d 61 6e 64 29 29 29 0a 20 20 22 43 6f 6d 70 61 74 69 62	able-find.command)))..."Compatib
1560	69 6c 69 74 79 20 73 68 69 6d 20 66 6f 72 20 60 65 78 65 63 75 74 61 62 6c 65 2d 66 69 6e 64 27	ility.shim.for.`executable-find'
1580	2e 22 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 72 65 71 75 69 72 65 2d 70 72 6f 67	.")..(defun.counsel-require-prog
15a0	72 61 6d 20 28 63 6d 64 20 26 6f 70 74 69 6f 6e 61 6c 20 6e 6f 65 72 72 6f 72 29 0a 20 20 22 43	ram.(cmd.&optional.noerror)..."C
15c0	68 65 63 6b 20 73 79 73 74 65 6d 20 66 6f 72 20 70 72 6f 67 72 61 6d 20 75 73 65 64 20 69 6e 20	heck.system.for.program.used.in.
15e0	43 4d 44 2c 20 70 72 69 6e 74 69 6e 67 20 65 72 72 6f 72 20 69 66 20 6e 6f 74 20 66 6f 75 6e 64	CMD,.printing.error.if.not.found
1600	2e 0a 43 4d 44 20 69 73 20 65 69 74 68 65 72 20 61 20 73 74 72 69 6e 67 20 6f 72 20 61 20 6c 69	..CMD.is.either.a.string.or.a.li
1620	73 74 20 6f 66 20 73 74 72 69 6e 67 73 2e 0a 54 6f 20 73 6b 69 70 20 74 68 65 20 60 65 78 65 63	st.of.strings..To.skip.the.`exec
1640	75 74 61 62 6c 65 2d 66 69 6e 64 27 20 63 68 65 63 6b 2c 20 73 74 61 72 74 20 74 68 65 20 73 74	utable-find'.check,.start.the.st
1660	72 69 6e 67 20 77 69 74 68 20 61 20 73 70 61 63 65 2e 0a 57 68 65 6e 20 4e 4f 45 52 52 4f 52 20	ring.with.a.space..When.NOERROR.
1680	69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 72 65 74 75 72 6e 20 6e 69 6c 20 69 6e 73 74 65 61 64 20 6f	is.non-nil,.return.nil.instead.o
16a0	66 20 72 61 69 73 69 6e 67 20 61 6e 20 65 72 72 6f 72 2e 22 0a 20 20 28 75 6e 6c 65 73 73 20 28	f.raising.an.error."...(unless.(
16c0	61 6e 64 20 28 73 74 72 69 6e 67 70 20 63 6d 64 29 20 28 73 74 72 69 6e 67 2d 70 72 65 66 69 78	and.(stringp.cmd).(string-prefix
16e0	2d 70 20 22 20 22 20 63 6d 64 29 29 0a 20 20 20 20 28 6c 65 74 20 28 28 70 72 6f 67 72 61 6d 20	-p.".".cmd)).....(let.((program.
1700	28 69 66 20 28 6c 69 73 74 70 20 63 6d 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	(if.(listp.cmd).................
1720	20 20 20 20 20 20 20 28 63 61 72 20 63 6d 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.......(car.cmd)................
1740	20 20 20 20 20 20 28 63 61 72 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 63 6d 64 29 29 29 29	......(car.(split-string.cmd))))
1760	29 0a 20 20 20 20 20 20 28 6f 72 20 28 61 6e 64 20 28 73 74 72 69 6e 67 70 20 70 72 6f 67 72 61	).......(or.(and.(stringp.progra
1780	6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 73 74 72 69 6e 67 3d 20	m)................(not.(string=.
17a0	70 72 6f 67 72 61 6d 20 22 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 75	program.""))................(cou
17c0	6e 73 65 6c 2d 2d 65 78 65 63 75 74 61 62 6c 65 2d 66 69 6e 64 20 70 72 6f 67 72 61 6d 20 74 29	nsel--executable-find.program.t)
17e0	29 0a 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 6e 6f 65 72 72 6f 72 0a 20 20 20 20	)...........(unless.noerror.....
1800	20 20 20 20 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 52 65 71 75 69 72 65 64 20 70 72	........(user-error."Required.pr
1820	6f 67 72 61 6d 20 5c 22 25 73 5c 22 20 6e 6f 74 20 66 6f 75 6e 64 20 69 6e 20 79 6f 75 72 20 70	ogram.\"%s\".not.found.in.your.p
1840	61 74 68 22 20 70 72 6f 67 72 61 6d 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73	ath".program))))))..(defun.couns
1860	65 6c 2d 70 72 6f 6d 70 74 2d 66 75 6e 63 74 69 6f 6e 2d 64 69 72 20 28 29 0a 20 20 22 52 65 74	el-prompt-function-dir.()..."Ret
1880	75 72 6e 20 70 72 6f 6d 70 74 20 61 70 70 65 6e 64 65 64 20 77 69 74 68 20 74 68 65 20 70 61 72	urn.prompt.appended.with.the.par
18a0	65 6e 74 20 64 69 72 65 63 74 6f 72 79 2e 22 0a 20 20 28 64 65 63 6c 61 72 65 20 28 6f 62 73 6f	ent.directory."...(declare.(obso
18c0	6c 65 74 65 20 22 69 74 20 69 73 20 6e 6f 20 6c 6f 6e 67 65 72 20 75 73 65 64 2e 22 20 22 30 2e	lete."it.is.no.longer.used."."0.
18e0	31 35 2e 31 22 29 29 0a 20 20 28 72 65 71 75 69 72 65 20 27 65 73 68 2d 75 74 69 6c 29 0a 20 20	15.1"))...(require.'esh-util)...
1900	28 6c 65 74 2a 20 28 28 64 69 72 20 28 69 76 79 2d 73 74 61 74 65 2d 64 69 72 65 63 74 6f 72 79	(let*.((dir.(ivy-state-directory
1920	20 69 76 79 2d 6c 61 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 70 61 72 74 73 20 28 6e 74 68	.ivy-last))..........(parts.(nth
1940	63 64 72 20 33 20 28 66 75 6e 63 61 6c 6c 20 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 65 73 68	cdr.3.(funcall.(if.(fboundp.'esh
1960	65 6c 6c 2d 73 70 6c 69 74 2d 66 69 6c 65 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	ell-split-filename).............
1980	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 4e 65	...........................;;.Ne
19a0	77 20 6e 61 6d 65 20 73 69 6e 63 65 20 45 6d 61 63 73 20 33 30 2e 0a 20 20 20 20 20 20 20 20 20	w.name.since.Emacs.30...........
19c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27	..............................#'
19e0	65 73 68 65 6c 6c 2d 73 70 6c 69 74 2d 66 69 6c 65 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20	eshell-split-filename...........
1a00	20 20 20 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 65 73 68 65	...........................'eshe
1a20	6c 6c 2d 73 70 6c 69 74 2d 70 61 74 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ll-split-path)..................
1a40	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 29 29 29 0a 20 20 20 20 20 20 20	..................dir)))........
1a60	20 20 28 64 69 72 20 28 66 6f 72 6d 61 74 20 22 20 5b 25 73 5d 3a 20 22 20 28 69 66 20 70 61 72	..(dir.(format.".[%s]:.".(if.par
1a80	74 73 20 28 61 70 70 6c 79 20 23 27 63 6f 6e 63 61 74 20 22 2e 2e 2e 22 20 70 61 72 74 73 29 20	ts.(apply.#'concat."...".parts).
1aa0	64 69 72 29 29 29 29 0a 20 20 20 20 28 69 76 79 2d 61 64 64 2d 70 72 6f 6d 70 74 2d 63 6f 75 6e	dir)))).....(ivy-add-prompt-coun
1ac0	74 0a 20 20 20 20 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	t......(replace-regexp-in-string
1ae0	20 20 20 20 20 20 20 20 20 20 3b 20 49 6e 73 65 72 74 20 64 69 72 20 62 65 66 6f 72 65 20 61 6e	..........;.Insert.dir.before.an
1b00	79 20 74 72 61 69 6c 69 6e 67 20 63 6f 6c 6f 6e 2e 0a 20 20 20 20 20 20 22 5c 5c 28 3f 3a 3a 20	y.trailing.colon........"\\(?::.
1b20	3f 5c 5c 29 3f 5c 5c 27 22 20 64 69 72 20 28 69 76 79 2d 73 74 61 74 65 2d 70 72 6f 6d 70 74 20	?\\)?\\'".dir.(ivy-state-prompt.
1b40	69 76 79 2d 6c 61 73 74 29 20 74 20 74 29 29 29 29 0a 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6f	ivy-last).t.t))))..(defalias.'co
1b60	75 6e 73 65 6c 2d 2d 66 6c 61 74 74 65 6e 0a 20 20 3b 3b 20 41 64 64 65 64 20 69 6e 20 45 6d 61	unsel--flatten...;;.Added.in.Ema
1b80	63 73 20 32 37 2e 31 0a 20 20 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 66 6c 61 74 74 65 6e 2d	cs.27.1...(if.(fboundp.'flatten-
1ba0	74 72 65 65 29 0a 20 20 20 20 20 20 23 27 66 6c 61 74 74 65 6e 2d 74 72 65 65 0a 20 20 20 20 28	tree).......#'flatten-tree.....(
1bc0	6c 61 6d 62 64 61 20 28 74 72 65 65 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 65 6c 65 6d 73 29	lambda.(tree).......(let.(elems)
1be0	0a 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 63 6f 6e 73 70 20 74 72 65 65 29 0a 20 20 20	.........(while.(consp.tree)....
1c00	20 20 20 20 20 20 20 28 6c 65 74 20 28 28 65 6c 65 6d 20 28 70 6f 70 20 74 72 65 65 29 29 29 0a	.......(let.((elem.(pop.tree))).
1c20	20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 63 6f 6e 73 70 20 65 6c 65 6d 29 0a	............(while.(consp.elem).
1c40	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 28 63 64 72 20 65 6c 65 6d 29 20 74	..............(push.(cdr.elem).t
1c60	72 65 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 65 6c 65 6d 20 28 63	ree)...............(setq.elem.(c
1c80	61 72 20 65 6c 65 6d 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 65 6c 65 6d 20	ar.elem))).............(if.elem.
1ca0	28 70 75 73 68 20 65 6c 65 6d 20 65 6c 65 6d 73 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 69 66	(push.elem.elems)))).........(if
1cc0	20 74 72 65 65 20 28 70 75 73 68 20 74 72 65 65 20 65 6c 65 6d 73 29 29 0a 20 20 20 20 20 20 20	.tree.(push.tree.elems))........
1ce0	20 28 6e 72 65 76 65 72 73 65 20 65 6c 65 6d 73 29 29 29 29 0a 20 20 22 43 6f 6d 70 61 74 69 62	.(nreverse.elems))))..."Compatib
1d00	69 6c 69 74 79 20 73 68 69 6d 20 66 6f 72 20 60 66 6c 61 74 74 65 6e 2d 74 72 65 65 27 2e 22 29	ility.shim.for.`flatten-tree'.")
1d20	0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 66 6f 72 6d 61 74 20 28 66 6f 72 6d 61 74	..(defun.counsel--format.(format
1d40	74 65 72 20 26 72 65 73 74 20 61 72 67 73 29 0a 20 20 22 4c 69 6b 65 20 60 66 6f 72 6d 61 74 27	ter.&rest.args)..."Like.`format'
1d60	20 62 75 74 20 46 4f 52 4d 41 54 54 45 52 20 63 61 6e 20 62 65 20 61 20 6c 69 73 74 2e 0a 57 68	.but.FORMATTER.can.be.a.list..Wh
1d80	65 6e 20 46 4f 52 4d 41 54 54 45 52 20 69 73 20 61 20 6c 69 73 74 2c 20 6f 6e 6c 79 20 60 25 73	en.FORMATTER.is.a.list,.only.`%s
1da0	27 20 69 73 20 72 65 70 6c 61 63 65 64 20 77 69 74 68 20 41 52 47 53 2e 0a 0a 52 65 74 75 72 6e	'.is.replaced.with.ARGS...Return
1dc0	20 61 20 6c 69 73 74 20 6f 72 20 73 74 72 69 6e 67 20 64 65 70 65 6e 64 69 6e 67 20 6f 6e 20 69	.a.list.or.string.depending.on.i
1de0	6e 70 75 74 2e 22 0a 20 20 28 63 6f 6e 64 0a 20 20 20 28 28 6c 69 73 74 70 20 66 6f 72 6d 61 74	nput."...(cond....((listp.format
1e00	74 65 72 29 0a 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 66 6c 61 74 74 65 6e 20 28 6d 61 70 63	ter).....(counsel--flatten.(mapc
1e20	61 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 28 6c 61 6d 62 64	ar........................(lambd
1e40	61 20 28 69 74 29 20 28 69 66 20 28 65 71 75 61 6c 20 69 74 20 22 25 73 22 29 20 28 70 6f 70 20	a.(it).(if.(equal.it."%s").(pop.
1e60	61 72 67 73 29 20 69 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	args).it))......................
1e80	20 20 66 6f 72 6d 61 74 74 65 72 29 29 29 0a 20 20 20 28 74 20 28 61 70 70 6c 79 20 23 27 66 6f	..formatter)))....(t.(apply.#'fo
1ea0	72 6d 61 74 20 66 6f 72 6d 61 74 74 65 72 20 61 72 67 73 29 29 29 29 0a 0a 28 64 65 66 61 6c 69	rmat.formatter.args))))..(defali
1ec0	61 73 20 27 63 6f 75 6e 73 65 6c 2d 2d 6e 75 6c 6c 2d 64 65 76 69 63 65 0a 20 20 28 69 66 20 28	as.'counsel--null-device...(if.(
1ee0	66 62 6f 75 6e 64 70 20 27 6e 75 6c 6c 2d 64 65 76 69 63 65 29 20 23 27 6e 75 6c 6c 2d 64 65 76	fboundp.'null-device).#'null-dev
1f00	69 63 65 20 28 6c 61 6d 62 64 61 20 28 29 20 6e 75 6c 6c 2d 64 65 76 69 63 65 29 29 0a 20 20 22	ice.(lambda.().null-device))..."
1f20	43 6f 6d 70 61 74 69 62 69 6c 69 74 79 20 73 68 69 6d 20 66 6f 72 20 45 6d 61 63 73 20 32 38 20	Compatibility.shim.for.Emacs.28.
1f40	66 75 6e 63 74 69 6f 6e 20 60 6e 75 6c 6c 2d 64 65 76 69 63 65 27 2e 22 29 0a 0c 0a 3b 3b 3b 3b	function.`null-device'.")...;;;;
1f60	20 41 73 79 6e 63 20 75 74 69 6c 69 74 79 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d	.Async.utility..(defvar.counsel-
1f80	2d 61 73 79 6e 63 2d 74 69 6d 65 20 6e 69 6c 0a 20 20 22 53 74 6f 72 65 20 74 68 65 20 74 69 6d	-async-time.nil..."Store.the.tim
1fa0	65 20 77 68 65 6e 20 61 20 6e 65 77 20 70 72 6f 63 65 73 73 20 77 61 73 20 73 74 61 72 74 65 64	e.when.a.new.process.was.started
1fc0	2e 0a 4f 72 20 74 68 65 20 74 69 6d 65 20 6f 66 20 74 68 65 20 6c 61 73 74 20 6d 69 6e 69 62 75	..Or.the.time.of.the.last.minibu
1fe0	66 66 65 72 20 75 70 64 61 74 65 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d	ffer.update.")..(defvar.counsel-
2000	2d 61 73 79 6e 63 2d 73 74 61 72 74 20 6e 69 6c 0a 20 20 22 53 74 6f 72 65 20 74 68 65 20 74 69	-async-start.nil..."Store.the.ti
2020	6d 65 20 77 68 65 6e 20 61 20 6e 65 77 20 70 72 6f 63 65 73 73 20 77 61 73 20 73 74 61 72 74 65	me.when.a.new.process.was.starte
2040	64 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 2d 61 73 79 6e 63 2d 74 69 6d	d.")..(defvar.counsel--async-tim
2060	65 72 20 6e 69 6c 0a 20 20 22 54 69 6d 65 72 20 75 73 65 64 20 74 6f 20 64 69 73 70 6f 73 65 20	er.nil..."Timer.used.to.dispose.
2080	60 63 6f 75 6e 73 65 6c 2d 2d 61 73 79 6e 63 2d 63 6f 6d 6d 61 6e 64 2e 22 29 0a 0a 28 64 65 66	`counsel--async-command.")..(def
20a0	76 61 72 20 63 6f 75 6e 73 65 6c 2d 2d 61 73 79 6e 63 2d 64 75 72 61 74 69 6f 6e 20 6e 69 6c 0a	var.counsel--async-duration.nil.
20c0	20 20 22 53 74 6f 72 65 20 74 68 65 20 74 69 6d 65 20 61 20 70 72 6f 63 65 73 73 20 74 61 6b 65	.."Store.the.time.a.process.take
20e0	73 20 74 6f 20 67 61 74 68 65 72 20 61 6c 6c 20 69 74 73 20 63 61 6e 64 69 64 61 74 65 73 2e 0a	s.to.gather.all.its.candidates..
2100	54 68 65 20 74 69 6d 65 20 69 73 20 6d 65 61 73 75 72 65 64 20 69 6e 20 73 65 63 6f 6e 64 73 2e	The.time.is.measured.in.seconds.
2120	22 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 2d 61 73 79 6e 63 2d 65 78 69 74 2d	")..(defvar.counsel--async-exit-
2140	63 6f 64 65 2d 70 6c 69 73 74 20 28 29 0a 20 20 22 41 73 73 6f 63 69 61 74 65 20 63 6f 6d 6d 61	code-plist.()..."Associate.comma
2160	6e 64 73 20 77 69 74 68 20 74 68 65 69 72 20 65 78 69 74 20 63 6f 64 65 20 64 65 73 63 72 69 70	nds.with.their.exit.code.descrip
2180	74 69 6f 6e 73 2e 0a 54 68 69 73 20 70 6c 69 73 74 20 6d 61 70 73 20 63 6f 6d 6d 61 6e 64 73 20	tions..This.plist.maps.commands.
21a0	74 6f 20 61 20 70 6c 69 73 74 20 6d 61 70 70 69 6e 67 20 74 68 65 69 72 20 65 78 69 74 20 63 6f	to.a.plist.mapping.their.exit.co
21c0	64 65 73 20 74 6f 0a 64 65 73 63 72 69 70 74 69 6f 6e 73 2e 22 29 0a 0a 28 64 65 66 76 61 72 20	des.to.descriptions.")..(defvar.
21e0	63 6f 75 6e 73 65 6c 2d 2d 61 73 79 6e 63 2d 6c 61 73 74 2d 65 72 72 6f 72 2d 73 74 72 69 6e 67	counsel--async-last-error-string
2200	20 6e 69 6c 0a 20 20 22 57 68 65 6e 20 74 68 65 20 70 72 6f 63 65 73 73 20 72 65 74 75 72 6e 65	.nil..."When.the.process.returne
2220	64 20 6e 6f 6e 2d 30 2c 20 73 74 6f 72 65 20 74 68 65 20 6f 75 74 70 75 74 20 68 65 72 65 2e 22	d.non-0,.store.the.output.here."
2240	29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 73 65 74 2d 61 73 79 6e 63 2d 65 78 69 74	)..(defun.counsel-set-async-exit
2260	2d 63 6f 64 65 20 28 63 6d 64 20 6e 75 6d 62 65 72 20 73 74 72 29 0a 20 20 22 46 6f 72 20 43 4d	-code.(cmd.number.str)..."For.CM
2280	44 2c 20 61 73 73 6f 63 69 61 74 65 20 4e 55 4d 42 45 52 20 65 78 69 74 20 63 6f 64 65 20 77 69	D,.associate.NUMBER.exit.code.wi
22a0	74 68 20 53 54 52 2e 22 0a 20 20 28 6c 65 74 20 28 28 70 6c 69 73 74 20 28 70 6c 69 73 74 2d 67	th.STR."...(let.((plist.(plist-g
22c0	65 74 20 63 6f 75 6e 73 65 6c 2d 2d 61 73 79 6e 63 2d 65 78 69 74 2d 63 6f 64 65 2d 70 6c 69 73	et.counsel--async-exit-code-plis
22e0	74 20 63 6d 64 29 29 29 0a 20 20 20 20 28 73 65 74 71 20 63 6f 75 6e 73 65 6c 2d 2d 61 73 79 6e	t.cmd))).....(setq.counsel--asyn
2300	63 2d 65 78 69 74 2d 63 6f 64 65 2d 70 6c 69 73 74 0a 20 20 20 20 20 20 20 20 20 20 28 70 6c 69	c-exit-code-plist...........(pli
2320	73 74 2d 70 75 74 20 63 6f 75 6e 73 65 6c 2d 2d 61 73 79 6e 63 2d 65 78 69 74 2d 63 6f 64 65 2d	st-put.counsel--async-exit-code-
2340	70 6c 69 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6d 64 0a 20	plist......................cmd..
2360	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6c 69 73 74 2d 70 75 74 20 70	....................(plist-put.p
2380	6c 69 73 74 20 6e 75 6d 62 65 72 20 73 74 72 29 29 29 29 29 0a 0a 28 64 65 66 76 61 72 20 63 6f	list.number.str)))))..(defvar.co
23a0	75 6e 73 65 6c 2d 61 73 79 6e 63 2d 73 70 6c 69 74 2d 73 74 72 69 6e 67 2d 72 65 2d 61 6c 69 73	unsel-async-split-string-re-alis
23c0	74 20 27 28 28 74 20 2e 20 22 5b 5c 72 5c 6e 5d 22 29 29 0a 20 20 22 53 74 6f 72 65 20 74 68 65	t.'((t..."[\r\n]"))..."Store.the
23e0	20 72 65 67 65 78 70 20 66 6f 72 20 73 70 6c 69 74 74 69 6e 67 20 73 68 65 6c 6c 20 63 6f 6d 6d	.regexp.for.splitting.shell.comm
2400	61 6e 64 20 6f 75 74 70 75 74 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 61	and.output.")..(defvar.counsel-a
2420	73 79 6e 63 2d 69 67 6e 6f 72 65 2d 72 65 2d 61 6c 69 73 74 20 6e 69 6c 0a 20 20 22 41 6e 20 61	sync-ignore-re-alist.nil..."An.a
2440	6c 69 73 74 20 6f 66 20 72 65 67 65 78 70 20 6d 61 74 63 68 69 6e 67 20 63 61 6e 64 69 64 61 74	list.of.regexp.matching.candidat
2460	65 73 20 74 6f 20 69 67 6e 6f 72 65 20 69 6e 20 60 63 6f 75 6e 73 65 6c 2d 2d 61 73 79 6e 63 2d	es.to.ignore.in.`counsel--async-
2480	66 69 6c 74 65 72 27 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 2d 61 73 79	filter'.")..(defvar.counsel--asy
24a0	6e 63 2d 6c 61 73 74 2d 63 6f 6d 6d 61 6e 64 20 6e 69 6c 0a 20 20 22 53 74 6f 72 65 20 74 68 65	nc-last-command.nil..."Store.the
24c0	20 6c 61 73 74 20 63 6f 6d 6d 61 6e 64 20 72 61 6e 20 62 79 20 60 63 6f 75 6e 73 65 6c 2d 2d 61	.last.command.ran.by.`counsel--a
24e0	73 79 6e 63 2d 63 6f 6d 6d 61 6e 64 2d 31 27 2e 22 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73	sync-command-1'.")..(defun.couns
2500	65 6c 2d 2d 61 73 79 6e 63 2d 63 6f 6d 6d 61 6e 64 2d 31 20 28 63 6d 64 20 26 6f 70 74 69 6f 6e	el--async-command-1.(cmd.&option
2520	61 6c 20 73 65 6e 74 69 6e 65 6c 20 66 69 6c 74 65 72 20 6e 61 6d 65 29 0a 20 20 22 53 74 61 72	al.sentinel.filter.name)..."Star
2540	74 20 61 6e 64 20 72 65 74 75 72 6e 20 6e 65 77 20 63 6f 75 6e 73 65 6c 20 70 72 6f 63 65 73 73	t.and.return.new.counsel.process
2560	20 62 79 20 63 61 6c 6c 69 6e 67 20 43 4d 44 2e 0a 43 4d 44 20 63 61 6e 20 62 65 20 65 69 74 68	.by.calling.CMD..CMD.can.be.eith
2580	65 72 20 61 20 73 68 65 6c 6c 20 63 6f 6d 6d 61 6e 64 20 61 73 20 61 20 73 74 72 69 6e 67 2c 20	er.a.shell.command.as.a.string,.
25a0	6f 72 20 61 20 6c 69 73 74 20 6f 66 20 74 68 65 0a 70 72 6f 67 72 61 6d 20 6e 61 6d 65 20 74 6f	or.a.list.of.the.program.name.to
25c0	20 62 65 20 63 61 6c 6c 65 64 20 64 69 72 65 63 74 6c 79 2c 20 66 6f 6c 6c 6f 77 65 64 20 62 79	.be.called.directly,.followed.by
25e0	20 69 74 73 20 61 72 67 75 6d 65 6e 74 73 2e 0a 49 66 20 74 68 65 20 64 65 66 61 75 6c 74 20 63	.its.arguments..If.the.default.c
2600	6f 75 6e 73 65 6c 20 70 72 6f 63 65 73 73 20 6f 72 20 6f 6e 65 20 77 69 74 68 20 4e 41 4d 45 20	ounsel.process.or.one.with.NAME.
2620	61 6c 72 65 61 64 79 20 65 78 69 73 74 73 2c 0a 6b 69 6c 6c 20 69 74 20 61 6e 64 20 69 74 73 20	already.exists,.kill.it.and.its.
2640	61 73 73 6f 63 69 61 74 65 64 20 62 75 66 66 65 72 20 62 65 66 6f 72 65 20 73 74 61 72 74 69 6e	associated.buffer.before.startin
2660	67 20 61 20 6e 65 77 20 6f 6e 65 2e 0a 47 69 76 65 20 74 68 65 20 70 72 6f 63 65 73 73 20 74 68	g.a.new.one..Give.the.process.th
2680	65 20 66 75 6e 63 74 69 6f 6e 73 20 53 45 4e 54 49 4e 45 4c 20 61 6e 64 20 46 49 4c 54 45 52 2c	e.functions.SENTINEL.and.FILTER,
26a0	20 77 68 69 63 68 20 64 65 66 61 75 6c 74 0a 74 6f 20 60 63 6f 75 6e 73 65 6c 2d 2d 61 73 79 6e	.which.default.to.`counsel--asyn
26c0	63 2d 73 65 6e 74 69 6e 65 6c 27 20 61 6e 64 20 60 63 6f 75 6e 73 65 6c 2d 2d 61 73 79 6e 63 2d	c-sentinel'.and.`counsel--async-
26e0	66 69 6c 74 65 72 27 2c 0a 72 65 73 70 65 63 74 69 76 65 6c 79 2e 22 0a 20 20 28 63 6f 75 6e 73	filter',.respectively."...(couns
2700	65 6c 2d 64 65 6c 65 74 65 2d 70 72 6f 63 65 73 73 20 6e 61 6d 65 29 0a 20 20 28 73 65 74 71 20	el-delete-process.name)...(setq.
2720	6e 61 6d 65 20 28 6f 72 20 6e 61 6d 65 20 22 20 2a 63 6f 75 6e 73 65 6c 2a 22 29 29 0a 20 20 28	name.(or.name.".*counsel*"))...(
2740	77 68 65 6e 20 28 67 65 74 2d 62 75 66 66 65 72 20 6e 61 6d 65 29 0a 20 20 20 20 28 6b 69 6c 6c	when.(get-buffer.name).....(kill
2760	2d 62 75 66 66 65 72 20 6e 61 6d 65 29 29 0a 20 20 28 73 65 74 71 20 63 6f 75 6e 73 65 6c 2d 2d	-buffer.name))...(setq.counsel--
2780	61 73 79 6e 63 2d 6c 61 73 74 2d 63 6f 6d 6d 61 6e 64 20 63 6d 64 29 0a 20 20 28 6c 65 74 2a 20	async-last-command.cmd)...(let*.
27a0	28 28 62 75 66 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 0a	((buf.(get-buffer-create.name)).
27c0	20 20 20 20 20 20 20 20 20 28 70 72 6f 63 20 28 69 66 20 28 6c 69 73 74 70 20 63 6d 64 29 0a 20	.........(proc.(if.(listp.cmd)..
27e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 70 70 6c 79 20 23 27 73 74 61 72 74	..................(apply.#'start
2800	2d 66 69 6c 65 2d 70 72 6f 63 65 73 73 20 6e 61 6d 65 20 62 75 66 20 63 6d 64 29 0a 20 20 20 20	-file-process.name.buf.cmd).....
2820	20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 61 72 74 2d 66 69 6c 65 2d 70 72 6f 63 65 73 73	.............(start-file-process
2840	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 29 29 0a	-shell-command.name.buf.cmd)))).
2860	20 20 20 20 28 73 65 74 71 20 63 6f 75 6e 73 65 6c 2d 2d 61 73 79 6e 63 2d 74 69 6d 65 20 28 63	....(setq.counsel--async-time.(c
2880	75 72 72 65 6e 74 2d 74 69 6d 65 29 29 0a 20 20 20 20 28 73 65 74 71 20 63 6f 75 6e 73 65 6c 2d	urrent-time)).....(setq.counsel-
28a0	2d 61 73 79 6e 63 2d 73 74 61 72 74 20 63 6f 75 6e 73 65 6c 2d 2d 61 73 79 6e 63 2d 74 69 6d 65	-async-start.counsel--async-time
28c0	29 0a 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 72 6f 63	).....(set-process-sentinel.proc
28e0	20 28 6f 72 20 73 65 6e 74 69 6e 65 6c 20 23 27 63 6f 75 6e 73 65 6c 2d 2d 61 73 79 6e 63 2d 73	.(or.sentinel.#'counsel--async-s
2900	65 6e 74 69 6e 65 6c 29 29 0a 20 20 20 20 28 73 65 74 2d 70 72 6f 63 65 73 73 2d 66 69 6c 74 65	entinel)).....(set-process-filte
2920	72 20 70 72 6f 63 20 28 6f 72 20 66 69 6c 74 65 72 20 23 27 63 6f 75 6e 73 65 6c 2d 2d 61 73 79	r.proc.(or.filter.#'counsel--asy
2940	6e 63 2d 66 69 6c 74 65 72 29 29 0a 20 20 20 20 70 72 6f 63 29 29 0a 0a 28 64 65 66 63 75 73 74	nc-filter)).....proc))..(defcust
2960	6f 6d 20 63 6f 75 6e 73 65 6c 2d 61 73 79 6e 63 2d 63 6f 6d 6d 61 6e 64 2d 64 65 6c 61 79 20 30	om.counsel-async-command-delay.0
2980	0a 20 20 22 4e 75 6d 62 65 72 20 6f 66 20 73 65 63 6f 6e 64 73 20 74 6f 20 77 61 69 74 20 62 65	..."Number.of.seconds.to.wait.be
29a0	66 6f 72 65 20 73 70 61 77 6e 69 6e 67 20 61 6e 6f 74 68 65 72 20 61 73 79 6e 63 20 63 6f 6d 6d	fore.spawning.another.async.comm
29c0	61 6e 64 2e 22 0a 20 20 3a 74 79 70 65 20 27 6e 75 6d 62 65 72 29 0a 0a 28 64 65 66 75 6e 20 63	and."...:type.'number)..(defun.c
29e0	6f 75 6e 73 65 6c 2d 2d 61 73 79 6e 63 2d 63 6f 6d 6d 61 6e 64 20 28 26 72 65 73 74 20 61 72 67	ounsel--async-command.(&rest.arg
2a00	73 29 0a 20 20 22 4c 69 6b 65 20 60 63 6f 75 6e 73 65 6c 2d 2d 61 73 79 6e 63 2d 63 6f 6d 6d 61	s)..."Like.`counsel--async-comma
2a20	6e 64 2d 31 27 2c 20 77 69 74 68 20 73 61 6d 65 20 41 52 47 53 2c 20 62 75 74 20 64 65 62 6f 75	nd-1',.with.same.ARGS,.but.debou
2a40	6e 63 65 64 2e 0a 43 61 6c 6c 73 20 74 6f 20 60 63 6f 75 6e 73 65 6c 2d 2d 61 73 79 6e 63 2d 63	nced..Calls.to.`counsel--async-c
2a60	6f 6d 6d 61 6e 64 2d 31 27 20 61 72 65 20 73 65 70 61 72 61 74 65 64 20 62 79 20 61 74 20 6c 65	ommand-1'.are.separated.by.at.le
2a80	61 73 74 0a 60 63 6f 75 6e 73 65 6c 2d 61 73 79 6e 63 2d 63 6f 6d 6d 61 6e 64 2d 64 65 6c 61 79	ast.`counsel-async-command-delay
2aa0	27 20 73 65 63 6f 6e 64 73 2c 20 73 6f 20 61 73 20 74 6f 20 61 76 6f 69 64 20 69 73 73 75 65 73	'.seconds,.so.as.to.avoid.issues
2ac0	0a 63 61 75 73 65 64 20 62 79 20 73 70 61 77 6e 69 6e 67 20 74 6f 6f 20 6d 61 6e 79 20 73 75 62	.caused.by.spawning.too.many.sub
2ae0	70 72 6f 63 65 73 73 65 73 20 74 6f 6f 20 71 75 69 63 6b 6c 79 2e 22 0a 20 20 28 69 66 20 28 7a	processes.too.quickly."...(if.(z
2b00	65 72 6f 70 20 63 6f 75 6e 73 65 6c 2d 61 73 79 6e 63 2d 63 6f 6d 6d 61 6e 64 2d 64 65 6c 61 79	erop.counsel-async-command-delay
2b20	29 0a 20 20 20 20 20 20 28 61 70 70 6c 79 20 23 27 63 6f 75 6e 73 65 6c 2d 2d 61 73 79 6e 63 2d	).......(apply.#'counsel--async-
2b40	63 6f 6d 6d 61 6e 64 2d 31 20 61 72 67 73 29 0a 20 20 20 20 28 77 68 65 6e 20 63 6f 75 6e 73 65	command-1.args).....(when.counse
2b60	6c 2d 2d 61 73 79 6e 63 2d 74 69 6d 65 72 0a 20 20 20 20 20 20 28 63 61 6e 63 65 6c 2d 74 69 6d	l--async-timer.......(cancel-tim
2b80	65 72 20 63 6f 75 6e 73 65 6c 2d 2d 61 73 79 6e 63 2d 74 69 6d 65 72 29 29 0a 20 20 20 20 28 73	er.counsel--async-timer)).....(s
2ba0	65 74 71 20 63 6f 75 6e 73 65 6c 2d 2d 61 73 79 6e 63 2d 74 69 6d 65 72 0a 20 20 20 20 20 20 20	etq.counsel--async-timer........
2bc0	20 20 20 28 61 70 70 6c 79 20 23 27 72 75 6e 2d 77 69 74 68 2d 74 69 6d 65 72 0a 20 20 20 20 20	...(apply.#'run-with-timer......
2be0	20 20 20 20 20 20 20 20 20 20 20 20 63 6f 75 6e 73 65 6c 2d 61 73 79 6e 63 2d 63 6f 6d 6d 61 6e	............counsel-async-comman
2c00	64 2d 64 65 6c 61 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 0a 20 20 20	d-delay..................nil....
2c20	20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 63 6f 75 6e 73 65 6c 2d 2d 61 73 79 6e 63 2d 63	..............#'counsel--async-c
2c40	6f 6d 6d 61 6e 64 2d 31 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 72 67 73 29 29	ommand-1..................args))
2c60	29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 73 70 6c 69 74 2d 73 74 72 69 6e 67	))..(defun.counsel--split-string
2c80	20 28 26 6f 70 74 69 6f 6e 61 6c 20 73 74 72 29 0a 20 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67	.(&optional.str)...(split-string
2ca0	0a 20 20 20 28 6f 72 20 73 74 72 20 28 62 75 66 66 65 72 2d 73 74 72 69 6e 67 29 29 0a 20 20 20	....(or.str.(buffer-string))....
2cc0	28 69 76 79 2d 61 6c 69 73 74 2d 73 65 74 74 69 6e 67 20 63 6f 75 6e 73 65 6c 2d 61 73 79 6e 63	(ivy-alist-setting.counsel-async
2ce0	2d 73 70 6c 69 74 2d 73 74 72 69 6e 67 2d 72 65 2d 61 6c 69 73 74 29 0a 20 20 20 74 29 29 0a 0a	-split-string-re-alist)....t))..
2d00	28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 73 79 6e 63 2d 73 65 6e 74 69 6e 65 6c 2d 6f 6e	(defun.counsel--sync-sentinel-on
2d20	2d 65 78 69 74 20 28 70 72 6f 63 65 73 73 29 0a 20 20 28 69 66 20 28 7a 65 72 6f 70 20 28 70 72	-exit.(process)...(if.(zerop.(pr
2d40	6f 63 65 73 73 2d 65 78 69 74 2d 73 74 61 74 75 73 20 70 72 6f 63 65 73 73 29 29 0a 20 20 20 20	ocess-exit-status.process)).....
2d60	20 20 28 6c 65 74 20 28 28 63 75 72 20 28 69 76 79 2d 73 74 61 74 65 2d 63 75 72 72 65 6e 74 20	..(let.((cur.(ivy-state-current.
2d80	69 76 79 2d 6c 61 73 74 29 29 29 0a 20 20 20 20 20 20 20 20 28 69 76 79 2d 2d 73 65 74 2d 63 61	ivy-last))).........(ivy--set-ca
2da0	6e 64 69 64 61 74 65 73 0a 20 20 20 20 20 20 20 20 20 28 69 76 79 2d 2d 73 6f 72 74 2d 6d 61 79	ndidates..........(ivy--sort-may
2dc0	62 65 0a 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	be...........(with-current-buffe
2de0	72 20 28 70 72 6f 63 65 73 73 2d 62 75 66 66 65 72 20 70 72 6f 63 65 73 73 29 0a 20 20 20 20 20	r.(process-buffer.process)......
2e00	20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 73 70 6c 69 74 2d 73 74 72 69 6e 67 29 29 29	.......(counsel--split-string)))
2e20	29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 63 6f 75 6e 73 65 6c 2d 2d 61 73 79 6e 63 2d 73	).........(when.counsel--async-s
2e40	74 61 72 74 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 6f 75 6e 73 65 6c 2d 2d 61 73	tart...........(setq.counsel--as
2e60	79 6e 63 2d 64 75 72 61 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 69	ync-duration.................(ti
2e80	6d 65 2d 74 6f 2d 73 65 63 6f 6e 64 73 20 28 74 69 6d 65 2d 73 69 6e 63 65 20 63 6f 75 6e 73 65	me-to-seconds.(time-since.counse
2ea0	6c 2d 2d 61 73 79 6e 63 2d 73 74 61 72 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20	l--async-start)))).........(let.
2ec0	28 28 72 65 20 28 69 76 79 2d 72 65 2d 74 6f 2d 73 74 72 20 69 76 79 2d 72 65 67 65 78 29 29 29	((re.(ivy-re-to-str.ivy-regex)))
2ee0	0a 20 20 20 20 20 20 20 20 20 20 28 69 66 20 69 76 79 2d 2d 6f 6c 64 2d 63 61 6e 64 73 0a 20 20	...........(if.ivy--old-cands...
2f00	20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 65 71 20 28 69 76 79 2d 61 6c 69 73 74 2d 73	............(if.(eq.(ivy-alist-s
2f20	65 74 74 69 6e 67 20 69 76 79 2d 69 6e 64 65 78 2d 66 75 6e 63 74 69 6f 6e 73 2d 61 6c 69 73 74	etting.ivy-index-functions-alist
2f40	29 20 27 69 76 79 2d 72 65 63 6f 6d 70 75 74 65 2d 69 6e 64 65 78 2d 7a 65 72 6f 29 0a 20 20 20	).'ivy-recompute-index-zero)....
2f60	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 76 79 2d 73 65 74 2d 69 6e 64 65 78 20 30 29	...............(ivy-set-index.0)
2f80	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 76 79 2d 2d 72 65 63 6f 6d 70 75 74 65	.................(ivy--recompute
2fa0	2d 69 6e 64 65 78 20 72 65 20 69 76 79 2d 2d 61 6c 6c 2d 63 61 6e 64 69 64 61 74 65 73 29 29 0a	-index.re.ivy--all-candidates)).
2fc0	20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 69 6e 64 65 78 20 77 61 73 20 63 68 61 6e 67 65 64	............;;.index.was.changed
2fe0	20 62 65 66 6f 72 65 20 61 20 6c 6f 6e 67 2d 72 75 6e 6e 69 6e 67 20 71 75 65 72 79 20 65 78 69	.before.a.long-running.query.exi
3000	74 65 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 73 74 72 69 6e 67 3d	ted.............(unless.(string=
3020	20 63 75 72 20 28 6e 74 68 20 69 76 79 2d 2d 69 6e 64 65 78 20 69 76 79 2d 2d 61 6c 6c 2d 63 61	.cur.(nth.ivy--index.ivy--all-ca
3040	6e 64 69 64 61 74 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28	ndidates))...............(let.((
3060	66 75 6e 63 20 28 69 76 79 2d 61 6c 69 73 74 2d 73 65 74 74 69 6e 67 20 69 76 79 2d 69 6e 64 65	func.(ivy-alist-setting.ivy-inde
3080	78 2d 66 75 6e 63 74 69 6f 6e 73 2d 61 6c 69 73 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20	x-functions-alist)))............
30a0	20 20 20 20 20 28 69 66 20 66 75 6e 63 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.....(if.func...................
30c0	20 20 28 66 75 6e 63 61 6c 6c 20 66 75 6e 63 20 72 65 20 69 76 79 2d 2d 61 6c 6c 2d 63 61 6e 64	..(funcall.func.re.ivy--all-cand
30e0	69 64 61 74 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 76 79 2d 2d	idates)...................(ivy--
3100	70 72 65 73 65 6c 65 63 74 2d 69 6e 64 65 78 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	preselect-index.................
3120	20 20 20 28 69 66 20 28 3e 20 28 6c 65 6e 67 74 68 20 72 65 29 20 30 29 0a 20 20 20 20 20 20 20	...(if.(>.(length.re).0)........
3140	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 75 72 0a 20 20 20 20 20 20 20 20 20 20 20 20	................cur.............
3160	20 20 20 20 20 20 20 20 20 28 69 76 79 2d 73 74 61 74 65 2d 70 72 65 73 65 6c 65 63 74 20 69 76	.........(ivy-state-preselect.iv
3180	79 2d 6c 61 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 76 79 2d	y-last))....................ivy-
31a0	2d 61 6c 6c 2d 63 61 6e 64 69 64 61 74 65 73 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 73	-all-candidates)))))).........(s
31c0	65 74 71 20 69 76 79 2d 2d 6f 6c 64 2d 63 61 6e 64 73 20 69 76 79 2d 2d 61 6c 6c 2d 63 61 6e 64	etq.ivy--old-cands.ivy--all-cand
31e0	69 64 61 74 65 73 29 0a 20 20 20 20 20 20 20 20 28 69 66 20 69 76 79 2d 2d 61 6c 6c 2d 63 61 6e	idates).........(if.ivy--all-can
3200	64 69 64 61 74 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 69 76 79 2d 2d 65 78 68 69 62 69	didates.............(ivy--exhibi
3220	74 29 0a 20 20 20 20 20 20 20 20 20 20 28 69 76 79 2d 2d 69 6e 73 65 72 74 2d 6d 69 6e 69 62 75	t)...........(ivy--insert-minibu
3240	66 66 65 72 20 22 22 29 29 29 0a 20 20 20 20 28 73 65 74 71 20 63 6f 75 6e 73 65 6c 2d 2d 61 73	ffer.""))).....(setq.counsel--as
3260	79 6e 63 2d 6c 61 73 74 2d 65 72 72 6f 72 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20	ync-last-error-string...........
3280	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
32a0	66 66 65 72 20 70 72 6f 63 65 73 73 29 20 28 62 75 66 66 65 72 2d 73 74 72 69 6e 67 29 29 29 0a	ffer.process).(buffer-string))).
32c0	20 20 20 20 28 73 65 74 71 20 69 76 79 2d 2d 61 6c 6c 2d 63 61 6e 64 69 64 61 74 65 73 0a 20 20	....(setq.ivy--all-candidates...
32e0	20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 73 74 61 74 75 73 20 28 70 72 6f 63 65 73 73 2d 65	........(let.((status.(process-e
3300	78 69 74 2d 73 74 61 74 75 73 20 70 72 6f 63 65 73 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20	xit-status.process))............
3320	20 20 20 20 20 28 70 6c 69 73 74 20 28 70 6c 69 73 74 2d 67 65 74 20 63 6f 75 6e 73 65 6c 2d 2d	.....(plist.(plist-get.counsel--
3340	61 73 79 6e 63 2d 65 78 69 74 2d 63 6f 64 65 2d 70 6c 69 73 74 0a 20 20 20 20 20 20 20 20 20 20	async-exit-code-plist...........
3360	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 76 79 2d 73 74 61	........................(ivy-sta
3380	74 65 2d 63 61 6c 6c 65 72 20 69 76 79 2d 6c 61 73 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20	te-caller.ivy-last))))..........
33a0	20 20 20 28 6c 69 73 74 20 28 6f 72 20 28 70 6c 69 73 74 2d 67 65 74 20 70 6c 69 73 74 20 73 74	...(list.(or.(plist-get.plist.st
33c0	61 74 75 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 28 66 6f 72	atus).......................(for
33e0	6d 61 74 20 22 65 72 72 6f 72 20 63 6f 64 65 20 25 64 22 20 73 74 61 74 75 73 29 29 29 29 29 0a	mat."error.code.%d".status))))).
3400	20 20 20 20 28 73 65 74 71 20 69 76 79 2d 2d 6f 6c 64 2d 63 61 6e 64 73 20 69 76 79 2d 2d 61 6c	....(setq.ivy--old-cands.ivy--al
3420	6c 2d 63 61 6e 64 69 64 61 74 65 73 29 0a 20 20 20 20 28 69 76 79 2d 2d 65 78 68 69 62 69 74 29	l-candidates).....(ivy--exhibit)
3440	29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 61 73 79 6e 63 2d 73 65 6e 74 69 6e	))..(defun.counsel--async-sentin
3460	65 6c 20 28 70 72 6f 63 65 73 73 20 5f 6d 73 67 29 0a 20 20 22 53 65 6e 74 69 6e 65 6c 20 66 75	el.(process._msg)..."Sentinel.fu
3480	6e 63 74 69 6f 6e 20 66 6f 72 20 61 6e 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 20 63 6f 75 6e 73	nction.for.an.asynchronous.couns
34a0	65 6c 20 50 52 4f 43 45 53 53 2e 22 0a 20 20 28 77 68 65 6e 20 28 65 71 20 28 70 72 6f 63 65 73	el.PROCESS."...(when.(eq.(proces
34c0	73 2d 73 74 61 74 75 73 20 70 72 6f 63 65 73 73 29 20 27 65 78 69 74 29 0a 20 20 20 20 28 63 6f	s-status.process).'exit).....(co
34e0	75 6e 73 65 6c 2d 2d 73 79 6e 63 2d 73 65 6e 74 69 6e 65 6c 2d 6f 6e 2d 65 78 69 74 20 70 72 6f	unsel--sync-sentinel-on-exit.pro
3500	63 65 73 73 29 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 61 73 79 6e	cess)))..(defcustom.counsel-asyn
3520	63 2d 66 69 6c 74 65 72 2d 75 70 64 61 74 65 2d 74 69 6d 65 20 35 30 30 30 30 30 0a 20 20 22 54	c-filter-update-time.500000..."T
3540	68 65 20 61 6d 6f 75 6e 74 20 6f 66 20 6d 69 63 72 6f 73 65 63 6f 6e 64 73 20 74 6f 20 77 61 69	he.amount.of.microseconds.to.wai
3560	74 20 75 6e 74 69 6c 20 75 70 64 61 74 69 6e 67 20 60 63 6f 75 6e 73 65 6c 2d 2d 61 73 79 6e 63	t.until.updating.`counsel--async
3580	2d 66 69 6c 74 65 72 27 2e 22 0a 20 20 3a 74 79 70 65 20 27 69 6e 74 65 67 65 72 29 0a 0a 28 64	-filter'."...:type.'integer)..(d
35a0	65 66 61 6c 69 61 73 20 27 63 6f 75 6e 73 65 6c 2d 2d 61 73 79 6e 63 2d 66 69 6c 74 65 72 2d 75	efalias.'counsel--async-filter-u
35c0	70 64 61 74 65 2d 74 69 6d 65 0a 20 20 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 74 69 6d 65 2d	pdate-time...(if.(fboundp.'time-
35e0	63 6f 6e 76 65 72 74 29 0a 20 20 20 20 20 20 3b 3b 20 50 72 65 66 65 72 72 65 64 20 28 54 49 43	convert).......;;.Preferred.(TIC
3600	4b 53 20 2e 20 48 5a 29 20 66 6f 72 6d 61 74 20 73 69 6e 63 65 20 45 6d 61 63 73 20 32 37 2e 31	KS...HZ).format.since.Emacs.27.1
3620	2e 0a 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 29 20 28 63 6f 6e 73 20 63 6f 75 6e 73 65 6c	........(lambda.().(cons.counsel
3640	2d 61 73 79 6e 63 2d 66 69 6c 74 65 72 2d 75 70 64 61 74 65 2d 74 69 6d 65 20 31 30 30 30 30 30	-async-filter-update-time.100000
3660	30 29 29 0a 20 20 20 20 28 6c 61 6d 62 64 61 20 28 29 20 28 6c 69 73 74 20 30 20 30 20 63 6f 75	0)).....(lambda.().(list.0.0.cou
3680	6e 73 65 6c 2d 61 73 79 6e 63 2d 66 69 6c 74 65 72 2d 75 70 64 61 74 65 2d 74 69 6d 65 29 29 29	nsel-async-filter-update-time)))
36a0	0a 20 20 22 52 65 74 75 72 6e 20 60 63 6f 75 6e 73 65 6c 2d 61 73 79 6e 63 2d 66 69 6c 74 65 72	..."Return.`counsel-async-filter
36c0	2d 75 70 64 61 74 65 2d 74 69 6d 65 27 20 61 73 20 61 20 74 69 6d 65 20 76 61 6c 75 65 2e 22 29	-update-time'.as.a.time.value.")
36e0	0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 61 73 79 6e 63 2d 66 69 6c 74 65 72 20 28	..(defun.counsel--async-filter.(
3700	70 72 6f 63 65 73 73 20 73 74 72 29 0a 20 20 22 52 65 63 65 69 76 65 20 66 72 6f 6d 20 50 52 4f	process.str)..."Receive.from.PRO
3720	43 45 53 53 20 74 68 65 20 6f 75 74 70 75 74 20 53 54 52 2e 0a 55 70 64 61 74 65 20 74 68 65 20	CESS.the.output.STR..Update.the.
3740	6d 69 6e 69 62 75 66 66 65 72 20 77 69 74 68 20 74 68 65 20 61 6d 6f 75 6e 74 20 6f 66 20 6c 69	minibuffer.with.the.amount.of.li
3760	6e 65 73 20 63 6f 6c 6c 65 63 74 65 64 20 65 76 65 72 79 0a 60 63 6f 75 6e 73 65 6c 2d 61 73 79	nes.collected.every.`counsel-asy
3780	6e 63 2d 66 69 6c 74 65 72 2d 75 70 64 61 74 65 2d 74 69 6d 65 27 20 6d 69 63 72 6f 73 65 63 6f	nc-filter-update-time'.microseco
37a0	6e 64 73 20 73 69 6e 63 65 20 74 68 65 20 6c 61 73 74 20 75 70 64 61 74 65 2e 22 0a 20 20 28 77	nds.since.the.last.update."...(w
37c0	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 66 66	ith-current-buffer.(process-buff
37e0	65 72 20 70 72 6f 63 65 73 73 29 0a 20 20 20 20 28 69 6e 73 65 72 74 20 73 74 72 29 29 0a 20 20	er.process).....(insert.str))...
3800	28 77 68 65 6e 20 28 74 69 6d 65 2d 6c 65 73 73 2d 70 20 28 63 6f 75 6e 73 65 6c 2d 2d 61 73 79	(when.(time-less-p.(counsel--asy
3820	6e 63 2d 66 69 6c 74 65 72 2d 75 70 64 61 74 65 2d 74 69 6d 65 29 0a 20 20 20 20 20 20 20 20 20	nc-filter-update-time)..........
3840	20 20 20 20 20 20 20 20 20 20 20 20 28 74 69 6d 65 2d 73 69 6e 63 65 20 63 6f 75 6e 73 65 6c 2d	............(time-since.counsel-
3860	2d 61 73 79 6e 63 2d 74 69 6d 65 29 29 0a 20 20 20 20 28 6c 65 74 20 28 6e 75 6d 6c 69 6e 65 73	-async-time)).....(let.(numlines
3880	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 70 72	).......(with-current-buffer.(pr
38a0	6f 63 65 73 73 2d 62 75 66 66 65 72 20 70 72 6f 63 65 73 73 29 0a 20 20 20 20 20 20 20 20 28 73	ocess-buffer.process).........(s
38c0	65 74 71 20 6e 75 6d 6c 69 6e 65 73 20 28 63 6f 75 6e 74 2d 6c 69 6e 65 73 20 28 70 6f 69 6e 74	etq.numlines.(count-lines.(point
38e0	2d 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 0a 20 20 20 20 20 20 20 20 28 69 76 79	-min).(point-max))).........(ivy
3900	2d 2d 73 65 74 2d 63 61 6e 64 69 64 61 74 65 73 0a 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28	--set-candidates..........(let.(
3920	28 6c 69 6e 65 73 20 28 63 6f 75 6e 73 65 6c 2d 2d 73 70 6c 69 74 2d 73 74 72 69 6e 67 29 29 0a	(lines.(counsel--split-string)).
3940	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 67 6e 6f 72 65 2d 72 65 20 28 69 76 79 2d 61	...............(ignore-re.(ivy-a
3960	6c 69 73 74 2d 73 65 74 74 69 6e 67 20 63 6f 75 6e 73 65 6c 2d 61 73 79 6e 63 2d 69 67 6e 6f 72	list-setting.counsel-async-ignor
3980	65 2d 72 65 2d 61 6c 69 73 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 73 74	e-re-alist)))............(if.(st
39a0	72 69 6e 67 70 20 69 67 6e 6f 72 65 2d 72 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ringp.ignore-re)................
39c0	28 63 6c 2d 64 65 6c 65 74 65 2d 69 66 20 28 6c 61 6d 62 64 61 20 28 6c 69 6e 65 29 0a 20 20 20	(cl-delete-if.(lambda.(line)....
39e0	20 20 20 20 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 74 72	............................(str
3a00	69 6e 67 2d 6d 61 74 63 68 2d 70 20 69 67 6e 6f 72 65 2d 72 65 20 6c 69 6e 65 29 29 0a 20 20 20	ing-match-p.ignore-re.line))....
3a20	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6c 69 6e 65 73 29	..........................lines)
3a40	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 6c 69 6e 65 73 29 29 29 29 0a 20 20 20 20 20 20 28 6c	..............lines)))).......(l
3a60	65 74 20 28 28 69 76 79 2d 2d 70 72 6f 6d 70 74 20 28 66 6f 72 6d 61 74 20 22 25 64 2b 2b 20 25	et.((ivy--prompt.(format."%d++.%
3a80	73 22 20 6e 75 6d 6c 69 6e 65 73 20 28 69 76 79 2d 73 74 61 74 65 2d 70 72 6f 6d 70 74 20 69 76	s".numlines.(ivy-state-prompt.iv
3aa0	79 2d 6c 61 73 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 69 76 79 2d 2d 69 6e 73 65 72 74 2d	y-last)))).........(ivy--insert-
3ac0	6d 69 6e 69 62 75 66 66 65 72 20 28 69 76 79 2d 2d 66 6f 72 6d 61 74 20 69 76 79 2d 2d 61 6c 6c	minibuffer.(ivy--format.ivy--all
3ae0	2d 63 61 6e 64 69 64 61 74 65 73 29 29 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 6f 75 6e 73	-candidates))).......(setq.couns
3b00	65 6c 2d 2d 61 73 79 6e 63 2d 74 69 6d 65 20 28 63 75 72 72 65 6e 74 2d 74 69 6d 65 29 29 29 29	el--async-time.(current-time))))
3b20	29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 64 65 6c 65 74 65 2d 70 72 6f 63 65 73 73	)..(defun.counsel-delete-process
3b40	20 28 26 6f 70 74 69 6f 6e 61 6c 20 6e 61 6d 65 29 0a 20 20 22 44 65 6c 65 74 65 20 63 75 72 72	.(&optional.name)..."Delete.curr
3b60	65 6e 74 20 63 6f 75 6e 73 65 6c 20 70 72 6f 63 65 73 73 20 6f 72 20 74 68 61 74 20 77 69 74 68	ent.counsel.process.or.that.with
3b80	20 4e 41 4d 45 2e 22 0a 20 20 28 6c 65 74 20 28 28 70 72 6f 63 65 73 73 20 28 67 65 74 2d 70 72	.NAME."...(let.((process.(get-pr
3ba0	6f 63 65 73 73 20 28 6f 72 20 6e 61 6d 65 20 22 20 2a 63 6f 75 6e 73 65 6c 2a 22 29 29 29 29 0a	ocess.(or.name.".*counsel*")))).
3bc0	20 20 20 20 28 77 68 65 6e 20 70 72 6f 63 65 73 73 0a 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d	....(when.process.......(delete-
3be0	70 72 6f 63 65 73 73 20 70 72 6f 63 65 73 73 29 29 29 29 0a 0c 0a 3b 3b 3b 20 43 6f 6d 70 6c 65	process.process))))...;;;.Comple
3c00	74 69 6f 6e 20 61 74 20 70 6f 69 6e 74 0a 0a 28 64 65 66 69 6e 65 2d 6f 62 73 6f 6c 65 74 65 2d	tion.at.point..(define-obsolete-
3c20	66 75 6e 63 74 69 6f 6e 2d 61 6c 69 61 73 20 27 63 6f 75 6e 73 65 6c 2d 65 6c 0a 20 20 23 27 63	function-alias.'counsel-el...#'c
3c40	6f 6d 70 6c 65 74 65 2d 73 79 6d 62 6f 6c 20 22 30 2e 31 33 2e 32 20 28 32 30 32 30 2d 30 35 2d	omplete-symbol."0.13.2.(2020-05-
3c60	32 30 29 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 6e 2d	20)").(define-obsolete-function-
3c80	61 6c 69 61 73 20 27 63 6f 75 6e 73 65 6c 2d 63 6c 0a 20 20 23 27 63 6f 6d 70 6c 65 74 65 2d 73	alias.'counsel-cl...#'complete-s
3ca0	79 6d 62 6f 6c 20 22 30 2e 31 33 2e 32 20 28 32 30 32 30 2d 30 35 2d 32 30 29 22 29 0a 28 64 65	ymbol."0.13.2.(2020-05-20)").(de
3cc0	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 63 6f	fine-obsolete-function-alias.'co
3ce0	75 6e 73 65 6c 2d 6a 65 64 69 0a 20 20 23 27 63 6f 6d 70 6c 65 74 65 2d 73 79 6d 62 6f 6c 20 22	unsel-jedi...#'complete-symbol."
3d00	30 2e 31 33 2e 32 20 28 32 30 32 30 2d 30 35 2d 32 30 29 22 29 0a 28 64 65 66 69 6e 65 2d 6f 62	0.13.2.(2020-05-20)").(define-ob
3d20	73 6f 6c 65 74 65 2d 66 75 6e 63 74 69 6f 6e 2d 61 6c 69 61 73 20 27 63 6f 75 6e 73 65 6c 2d 63	solete-function-alias.'counsel-c
3d40	6c 6a 0a 20 20 23 27 63 6f 6d 70 6c 65 74 65 2d 73 79 6d 62 6f 6c 20 22 30 2e 31 33 2e 32 20 28	lj...#'complete-symbol."0.13.2.(
3d60	32 30 32 30 2d 30 35 2d 32 30 29 22 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 63 6f 6d	2020-05-20)")..;;;;.`counsel-com
3d80	70 61 6e 79 27 0a 0a 28 64 65 66 76 61 72 20 63 6f 6d 70 61 6e 79 2d 63 61 6e 64 69 64 61 74 65	pany'..(defvar.company-candidate
3da0	73 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 6f 6d 70 61 6e 79 2d 61 62 6f	s).(declare-function.company-abo
3dc0	72 74 20 22 65 78 74 3a 63 6f 6d 70 61 6e 79 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74	rt."ext:company").(declare-funct
3de0	69 6f 6e 20 63 6f 6d 70 61 6e 79 2d 63 6f 6d 70 6c 65 74 65 20 22 65 78 74 3a 63 6f 6d 70 61 6e	ion.company-complete."ext:compan
3e00	79 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 6f 6d 70 61 6e 79 2d 6d 6f	y").(declare-function.company-mo
3e20	64 65 20 22 65 78 74 3a 63 6f 6d 70 61 6e 79 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74	de."ext:company").(declare-funct
3e40	69 6f 6e 20 63 6f 6d 70 61 6e 79 2d 63 61 6c 6c 2d 62 61 63 6b 65 6e 64 20 22 65 78 74 3a 63 6f	ion.company-call-backend."ext:co
3e60	6d 70 61 6e 79 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 6f 6d 70 61 6e	mpany").(declare-function.compan
3e80	79 2d 2d 63 6c 65 61 6e 2d 73 74 72 69 6e 67 20 22 65 78 74 3a 63 6f 6d 70 61 6e 79 22 29 0a 28	y--clean-string."ext:company").(
3ea0	64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 6f 6d 70 61 6e 79 2d 2d 63 6f 6e 74 69 6e	declare-function.company--contin
3ec0	75 65 20 22 65 78 74 3a 63 6f 6d 70 61 6e 79 22 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61	ue."ext:company")..;;;###autoloa
3ee0	64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 61 6e 79 20 28 29 0a 20 20 22 43	d.(defun.counsel-company.()..."C
3f00	6f 6d 70 6c 65 74 65 20 75 73 69 6e 67 20 60 63 6f 6d 70 61 6e 79 2d 63 61 6e 64 69 64 61 74 65	omplete.using.`company-candidate
3f20	73 27 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 63 6f 6d 70 61 6e 79 2d	s'."...(interactive)...(company-
3f40	6d 6f 64 65 20 31 29 0a 20 20 28 75 6e 6c 65 73 73 20 63 6f 6d 70 61 6e 79 2d 63 61 6e 64 69 64	mode.1)...(unless.company-candid
3f60	61 74 65 73 0a 20 20 20 20 28 63 6f 6d 70 61 6e 79 2d 63 6f 6d 70 6c 65 74 65 29 29 0a 20 20 28	ates.....(company-complete))...(
3f80	77 68 65 6e 20 63 6f 6d 70 61 6e 79 2d 63 61 6e 64 69 64 61 74 65 73 0a 20 20 20 20 28 63 6f 6d	when.company-candidates.....(com
3fa0	70 61 6e 79 2d 2d 63 6f 6e 74 69 6e 75 65 29 0a 20 20 20 20 28 69 76 79 2d 72 65 61 64 20 22 43	pany--continue).....(ivy-read."C
3fc0	61 6e 64 69 64 61 74 65 3a 20 22 20 63 6f 6d 70 61 6e 79 2d 63 61 6e 64 69 64 61 74 65 73 0a 20	andidate:.".company-candidates..
3fe0	20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 27 63 6f 6d 70 61 6e 79 2d 66 69	.............:action.'company-fi
4000	6e 69 73 68 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e	nish...............:caller.'coun
4020	73 65 6c 2d 63 6f 6d 70 61 6e 79 29 29 29 0a 0a 28 69 76 79 2d 63 6f 6e 66 69 67 75 72 65 20 27	sel-company)))..(ivy-configure.'
4040	63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 61 6e 79 0a 20 20 3a 64 69 73 70 6c 61 79 2d 74 72 61 6e 73	counsel-company...:display-trans
4060	66 6f 72 6d 65 72 2d 66 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 2d 63 6f 6d 70 61 6e 79 2d 64 69 73	former-fn.#'counsel--company-dis
4080	70 6c 61 79 2d 74 72 61 6e 73 66 6f 72 6d 65 72 0a 20 20 3a 75 6e 77 69 6e 64 2d 66 6e 20 28 6c	play-transformer...:unwind-fn.(l
40a0	61 6d 62 64 61 28 29 20 28 75 6e 6c 65 73 73 20 69 76 79 2d 65 78 69 74 20 28 63 6f 6d 70 61 6e	ambda().(unless.ivy-exit.(compan
40c0	79 2d 61 62 6f 72 74 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 63 6f 6d	y-abort))))..(defun.counsel--com
40e0	70 61 6e 79 2d 64 69 73 70 6c 61 79 2d 74 72 61 6e 73 66 6f 72 6d 65 72 20 28 73 29 0a 20 20 28	pany-display-transformer.(s)...(
4100	63 6f 6e 63 61 74 20 73 20 28 6c 65 74 20 28 28 61 6e 6e 6f 74 20 28 63 6f 6d 70 61 6e 79 2d 63	concat.s.(let.((annot.(company-c
4120	61 6c 6c 2d 62 61 63 6b 65 6e 64 20 27 61 6e 6e 6f 74 61 74 69 6f 6e 20 73 29 29 29 0a 20 20 20	all-backend.'annotation.s)))....
4140	20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 61 6e 6e 6f 74 0a 20 20 20 20 20 20 20 20 20	...........(when.annot..........
4160	20 20 20 20 20 20 20 28 63 6f 6d 70 61 6e 79 2d 2d 63 6c 65 61 6e 2d 73 74 72 69 6e 67 20 61 6e	.......(company--clean-string.an
4180	6e 6f 74 29 29 29 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 69 72 6f 6e 79 27 0a 0a	not)))))..;;;;.`counsel-irony'..
41a0	28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 69 72 6f 6e 79 2d 63 6f 6d 70 6c 65 74 69	(declare-function.irony-completi
41c0	6f 6e 2d 63 61 6e 64 69 64 61 74 65 73 2d 61 73 79 6e 63 20 22 65 78 74 3a 69 72 6f 6e 79 2d 63	on-candidates-async."ext:irony-c
41e0	6f 6d 70 6c 65 74 69 6f 6e 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 69 72	ompletion").(declare-function.ir
4200	6f 6e 79 2d 63 6f 6d 70 6c 65 74 69 6f 6e 2d 73 79 6d 62 6f 6c 2d 62 6f 75 6e 64 73 20 22 65 78	ony-completion-symbol-bounds."ex
4220	74 3a 69 72 6f 6e 79 2d 63 6f 6d 70 6c 65 74 69 6f 6e 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75	t:irony-completion").(declare-fu
4240	6e 63 74 69 6f 6e 20 69 72 6f 6e 79 2d 63 6f 6d 70 6c 65 74 69 6f 6e 2d 61 6e 6e 6f 74 61 74 69	nction.irony-completion-annotati
4260	6f 6e 20 22 65 78 74 3a 69 72 6f 6e 79 2d 63 6f 6d 70 6c 65 74 69 6f 6e 22 29 0a 0a 3b 3b 3b 23	on."ext:irony-completion")..;;;#
4280	23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 69 72 6f 6e 79 20	##autoload.(defun.counsel-irony.
42a0	28 29 0a 20 20 22 49 6e 6c 69 6e 65 20 43 2f 43 2b 2b 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 75 73	()..."Inline.C/C++.completion.us
42c0	69 6e 67 20 49 72 6f 6e 79 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 69	ing.Irony."...(interactive)...(i
42e0	72 6f 6e 79 2d 63 6f 6d 70 6c 65 74 69 6f 6e 2d 63 61 6e 64 69 64 61 74 65 73 2d 61 73 79 6e 63	rony-completion-candidates-async
4300	20 27 63 6f 75 6e 73 65 6c 2d 69 72 6f 6e 79 2d 63 61 6c 6c 62 61 63 6b 29 29 0a 0a 28 64 65 66	.'counsel-irony-callback))..(def
4320	75 6e 20 63 6f 75 6e 73 65 6c 2d 69 72 6f 6e 79 2d 63 61 6c 6c 62 61 63 6b 20 28 63 61 6e 64 69	un.counsel-irony-callback.(candi
4340	64 61 74 65 73 29 0a 20 20 22 43 61 6c 6c 62 61 63 6b 20 66 75 6e 63 74 69 6f 6e 20 66 6f 72 20	dates)..."Callback.function.for.
4360	49 72 6f 6e 79 20 74 6f 20 73 65 61 72 63 68 20 61 6d 6f 6e 67 20 43 41 4e 44 49 44 41 54 45 53	Irony.to.search.among.CANDIDATES
4380	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 2a 20 28 28 73 79 6d	."...(interactive)...(let*.((sym
43a0	62 6f 6c 2d 62 6f 75 6e 64 73 20 28 69 72 6f 6e 79 2d 63 6f 6d 70 6c 65 74 69 6f 6e 2d 73 79 6d	bol-bounds.(irony-completion-sym
43c0	62 6f 6c 2d 62 6f 75 6e 64 73 29 29 0a 20 20 20 20 20 20 20 20 20 28 62 65 67 20 28 63 61 72 20	bol-bounds))..........(beg.(car.
43e0	73 79 6d 62 6f 6c 2d 62 6f 75 6e 64 73 29 29 0a 20 20 20 20 20 20 20 20 20 28 65 6e 64 20 28 63	symbol-bounds))..........(end.(c
4400	64 72 20 73 79 6d 62 6f 6c 2d 62 6f 75 6e 64 73 29 29 0a 20 20 20 20 20 20 20 20 20 28 70 72 65	dr.symbol-bounds))..........(pre
4420	66 69 78 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 65 72 74	fix.(buffer-substring-no-propert
4440	69 65 73 20 62 65 67 20 65 6e 64 29 29 29 0a 20 20 20 20 28 73 65 74 71 20 69 76 79 2d 63 6f 6d	ies.beg.end))).....(setq.ivy-com
4460	70 6c 65 74 69 6f 6e 2d 62 65 67 20 62 65 67 0a 20 20 20 20 20 20 20 20 20 20 69 76 79 2d 63 6f	pletion-beg.beg...........ivy-co
4480	6d 70 6c 65 74 69 6f 6e 2d 65 6e 64 20 65 6e 64 29 0a 20 20 20 20 28 69 76 79 2d 72 65 61 64 20	mpletion-end.end).....(ivy-read.
44a0	22 63 6f 64 65 3a 20 22 20 28 6d 61 70 63 61 72 20 23 27 63 6f 75 6e 73 65 6c 2d 69 72 6f 6e 79	"code:.".(mapcar.#'counsel-irony
44c0	2d 61 6e 6e 6f 74 61 74 65 20 63 61 6e 64 69 64 61 74 65 73 29 0a 20 20 20 20 20 20 20 20 20 20	-annotate.candidates)...........
44e0	20 20 20 20 3a 70 72 65 64 69 63 61 74 65 20 28 6c 61 6d 62 64 61 20 28 63 61 6e 64 69 64 61 74	....:predicate.(lambda.(candidat
4500	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 28 73	e)............................(s
4520	74 72 69 6e 67 2d 70 72 65 66 69 78 2d 70 20 70 72 65 66 69 78 20 28 63 61 72 20 63 61 6e 64 69	tring-prefix-p.prefix.(car.candi
4540	64 61 74 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63	date)))...............:caller.'c
4560	6f 75 6e 73 65 6c 2d 69 72 6f 6e 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69	ounsel-irony...............:acti
4580	6f 6e 20 23 27 69 76 79 2d 63 6f 6d 70 6c 65 74 69 6f 6e 2d 69 6e 2d 72 65 67 69 6f 6e 2d 61 63	on.#'ivy-completion-in-region-ac
45a0	74 69 6f 6e 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 69 72 6f 6e 79 2d 61 6e	tion)))..(defun.counsel-irony-an
45c0	6e 6f 74 61 74 65 20 28 78 29 0a 20 20 22 4d 61 6b 65 20 49 76 79 20 63 61 6e 64 69 64 61 74 65	notate.(x)..."Make.Ivy.candidate
45e0	20 66 72 6f 6d 20 49 72 6f 6e 79 20 63 61 6e 64 69 64 61 74 65 20 58 2e 22 0a 20 20 28 63 6f 6e	.from.Irony.candidate.X."...(con
4600	73 20 28 63 6f 6e 63 61 74 20 28 63 61 72 20 78 29 20 28 69 72 6f 6e 79 2d 63 6f 6d 70 6c 65 74	s.(concat.(car.x).(irony-complet
4620	69 6f 6e 2d 61 6e 6e 6f 74 61 74 69 6f 6e 20 78 29 29 0a 20 20 20 20 20 20 20 20 28 63 61 72 20	ion-annotation.x)).........(car.
4640	78 29 29 29 0a 0a 28 69 76 79 2d 63 6f 6e 66 69 67 75 72 65 20 23 27 63 6f 75 6e 73 65 6c 2d 69	x)))..(ivy-configure.#'counsel-i
4660	72 6f 6e 79 0a 20 20 3a 64 69 73 70 6c 61 79 2d 66 6e 20 23 27 69 76 79 2d 64 69 73 70 6c 61 79	rony...:display-fn.#'ivy-display
4680	2d 66 75 6e 63 74 69 6f 6e 2d 6f 76 65 72 6c 61 79 29 0a 0c 0a 3b 3b 3b 20 45 6c 69 73 70 20 73	-function-overlay)...;;;.Elisp.s
46a0	79 6d 62 6f 6c 73 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 76 61	ymbols.;;;;.`counsel-describe-va
46c0	72 69 61 62 6c 65 27 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62	riable'..(defvar.counsel-describ
46e0	65 2d 6d 61 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	e-map...(let.((map.(make-sparse-
4700	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 20 6d 61 70 20 28 6b	keymap))).....(define-key.map.(k
4720	62 64 20 22 43 2d 2e 22 29 20 23 27 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 73 79 6d 62 6f 6c 29	bd."C-.").#'counsel-find-symbol)
4740	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 43 2d 2c 22 29	.....(define-key.map.(kbd."C-,")
4760	20 23 27 63 6f 75 6e 73 65 6c 2d 2d 69 6e 66 6f 2d 6c 6f 6f 6b 75 70 2d 73 79 6d 62 6f 6c 29 0a	.#'counsel--info-lookup-symbol).
4780	20 20 20 20 6d 61 70 29 29 0a 0a 28 69 76 79 2d 73 65 74 2d 61 63 74 69 6f 6e 73 0a 20 27 63 6f	....map))..(ivy-set-actions..'co
47a0	75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 76 61 72 69 61 62 6c 65 0a 20 60 28 28 22 49 22 20	unsel-describe-variable..`(("I".
47c0	2c 23 27 63 6f 75 6e 73 65 6c 2d 69 6e 66 6f 2d 6c 6f 6f 6b 75 70 2d 73 79 6d 62 6f 6c 20 22 69	,#'counsel-info-lookup-symbol."i
47e0	6e 66 6f 22 29 0a 20 20 20 28 22 64 22 20 2c 23 27 63 6f 75 6e 73 65 6c 2d 2d 66 69 6e 64 2d 73	nfo")....("d".,#'counsel--find-s
4800	79 6d 62 6f 6c 20 22 64 65 66 69 6e 69 74 69 6f 6e 22 29 29 29 0a 0a 28 64 65 66 76 61 72 20 63	ymbol."definition")))..(defvar.c
4820	6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 73 79 6d 62 6f 6c 2d 68 69 73 74 6f 72 79 20 28	ounsel-describe-symbol-history.(
4840	29 0a 20 20 22 48 69 73 74 6f 72 79 20 6c 69 73 74 20 66 6f 72 20 76 61 72 69 61 62 6c 65 20 61	)..."History.list.for.variable.a
4860	6e 64 20 66 75 6e 63 74 69 6f 6e 20 6e 61 6d 65 73 2e 0a 55 73 65 64 20 62 79 20 63 6f 6d 6d 61	nd.function.names..Used.by.comma
4880	6e 64 73 20 60 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 73 79 6d 62 6f 6c 27 2c 0a 60	nds.`counsel-describe-symbol',.`
48a0	63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 76 61 72 69 61 62 6c 65 27 2c 20 61 6e 64 20	counsel-describe-variable',.and.
48c0	60 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 66 75 6e 63 74 69 6f 6e 27 2e 22 29 0a 0a	`counsel-describe-function'.")..
48e0	28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 73 79 6d 62 6f 6c 20 28 29 0a 20 20	(defun.counsel-find-symbol.()...
4900	22 4a 75 6d 70 20 74 6f 20 74 68 65 20 64 65 66 69 6e 69 74 69 6f 6e 20 6f 66 20 74 68 65 20 63	"Jump.to.the.definition.of.the.c
4920	75 72 72 65 6e 74 20 73 79 6d 62 6f 6c 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a	urrent.symbol."...(interactive).
4940	20 20 28 69 76 79 2d 65 78 69 74 2d 77 69 74 68 2d 61 63 74 69 6f 6e 20 23 27 63 6f 75 6e 73 65	..(ivy-exit-with-action.#'counse
4960	6c 2d 2d 66 69 6e 64 2d 73 79 6d 62 6f 6c 29 29 0a 28 66 75 6e 63 74 69 6f 6e 2d 70 75 74 20 23	l--find-symbol)).(function-put.#
4980	27 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 73 79 6d 62 6f 6c 20 27 6e 6f 2d 63 6f 75 6e 73 65 6c	'counsel-find-symbol.'no-counsel
49a0	2d 4d 2d 78 20 74 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 69 6e 66 6f 2d 6c 6f	-M-x.t)..(defun.counsel--info-lo
49c0	6f 6b 75 70 2d 73 79 6d 62 6f 6c 20 28 29 0a 20 20 22 4c 6f 6f 6b 75 70 20 74 68 65 20 63 75 72	okup-symbol.()..."Lookup.the.cur
49e0	72 65 6e 74 20 73 79 6d 62 6f 6c 20 69 6e 20 74 68 65 20 69 6e 66 6f 20 64 6f 63 73 2e 22 0a 20	rent.symbol.in.the.info.docs."..
4a00	20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 69 76 79 2d 65 78 69 74 2d 77 69 74 68 2d	.(interactive)...(ivy-exit-with-
4a20	61 63 74 69 6f 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 69 6e 66 6f 2d 6c 6f 6f 6b 75 70 2d 73 79 6d	action.#'counsel-info-lookup-sym
4a40	62 6f 6c 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 70 75 73 68 2d 78 72 65 66	bol))..(defun.counsel--push-xref
4a60	2d 6d 61 72 6b 65 72 20 28 26 6f 70 74 69 6f 6e 61 6c 20 6d 29 0a 20 20 22 43 6f 6d 70 61 74 69	-marker.(&optional.m)..."Compati
4a80	62 69 6c 69 74 79 20 73 68 69 6d 20 66 6f 72 20 60 78 72 65 66 2d 70 75 73 68 2d 6d 61 72 6b 65	bility.shim.for.`xref-push-marke
4aa0	72 2d 73 74 61 63 6b 27 2e 22 0a 20 20 28 73 74 61 74 69 63 2d 69 66 20 28 72 65 71 75 69 72 65	r-stack'."...(static-if.(require
4ac0	20 27 78 72 65 66 20 6e 69 6c 20 74 29 0a 20 20 20 20 20 20 3b 3b 20 41 64 64 65 64 20 69 6e 20	.'xref.nil.t).......;;.Added.in.
4ae0	45 6d 61 63 73 20 32 35 2e 31 2e 0a 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20	Emacs.25.1........(progn........
4b00	20 28 75 6e 6c 65 73 73 20 28 66 62 6f 75 6e 64 70 20 27 78 72 65 66 2d 70 75 73 68 2d 6d 61 72	.(unless.(fboundp.'xref-push-mar
4b20	6b 65 72 2d 73 74 61 63 6b 29 0a 20 20 20 20 20 20 20 20 20 20 28 72 65 71 75 69 72 65 20 27 78	ker-stack)...........(require.'x
4b40	72 65 66 29 29 0a 20 20 20 20 20 20 20 20 28 78 72 65 66 2d 70 75 73 68 2d 6d 61 72 6b 65 72 2d	ref)).........(xref-push-marker-
4b60	73 74 61 63 6b 20 6d 29 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 28 62 6f 75 6e 64 70 20 27 66	stack.m)).....(unless.(boundp.'f
4b80	69 6e 64 2d 74 61 67 2d 6d 61 72 6b 65 72 2d 72 69 6e 67 29 0a 20 20 20 20 20 20 28 72 65 71 75	ind-tag-marker-ring).......(requ
4ba0	69 72 65 20 27 65 74 61 67 73 29 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 28 66 62 6f 75 6e 64	ire.'etags)).....(unless.(fbound
4bc0	70 20 27 72 69 6e 67 2d 69 6e 73 65 72 74 29 0a 20 20 20 20 20 20 28 72 65 71 75 69 72 65 20 27	p.'ring-insert).......(require.'
4be0	72 69 6e 67 29 29 0a 20 20 20 20 28 64 65 66 76 61 72 20 66 69 6e 64 2d 74 61 67 2d 6d 61 72 6b	ring)).....(defvar.find-tag-mark
4c00	65 72 2d 72 69 6e 67 29 0a 20 20 20 20 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 72	er-ring).....(declare-function.r
4c20	69 6e 67 2d 69 6e 73 65 72 74 20 22 72 69 6e 67 22 20 28 72 69 6e 67 20 69 74 65 6d 29 29 0a 20	ing-insert."ring".(ring.item))..
4c40	20 20 20 28 72 69 6e 67 2d 69 6e 73 65 72 74 20 66 69 6e 64 2d 74 61 67 2d 6d 61 72 6b 65 72 2d	...(ring-insert.find-tag-marker-
4c60	72 69 6e 67 20 28 6f 72 20 6d 20 28 70 6f 69 6e 74 2d 6d 61 72 6b 65 72 29 29 29 29 29 0a 0a 28	ring.(or.m.(point-marker)))))..(
4c80	64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 66 69 6e 64 2d 73 79 6d 62 6f 6c 20 28 78 29 0a 20	defun.counsel--find-symbol.(x)..
4ca0	20 22 46 69 6e 64 20 73 79 6d 62 6f 6c 20 64 65 66 69 6e 69 74 69 6f 6e 20 74 68 61 74 20 63 6f	."Find.symbol.definition.that.co
4cc0	72 72 65 73 70 6f 6e 64 73 20 74 6f 20 73 74 72 69 6e 67 20 58 2e 22 0a 20 20 28 77 69 74 68 2d	rresponds.to.string.X."...(with-
4ce0	69 76 79 2d 77 69 6e 64 6f 77 0a 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 70 75 73 68 2d 78 72	ivy-window.....(counsel--push-xr
4d00	65 66 2d 6d 61 72 6b 65 72 29 0a 20 20 20 20 28 6c 65 74 20 28 28 66 75 6c 6c 2d 6e 61 6d 65 20	ef-marker).....(let.((full-name.
4d20	28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 27 66 75 6c 6c 2d 6e 61 6d 65 20	(get-text-property.0.'full-name.
4d40	78 29 29 29 0a 20 20 20 20 20 20 28 69 66 20 66 75 6c 6c 2d 6e 61 6d 65 0a 20 20 20 20 20 20 20	x))).......(if.full-name........
4d60	20 20 20 28 66 69 6e 64 2d 6c 69 62 72 61 72 79 20 66 75 6c 6c 2d 6e 61 6d 65 29 0a 20 20 20 20	...(find-library.full-name).....
4d80	20 20 20 20 28 6c 65 74 20 28 28 73 79 6d 20 28 72 65 61 64 20 78 29 29 29 0a 20 20 20 20 20 20	....(let.((sym.(read.x))).......
4da0	20 20 20 20 28 63 6f 6e 64 20 28 28 61 6e 64 20 28 65 71 20 28 69 76 79 2d 73 74 61 74 65 2d 63	....(cond.((and.(eq.(ivy-state-c
4dc0	61 6c 6c 65 72 20 69 76 79 2d 6c 61 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	aller.ivy-last).................
4de0	20 20 20 20 20 20 20 20 20 20 27 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 76 61 72 69	..........'counsel-describe-vari
4e00	61 62 6c 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 62 6f 75	able).......................(bou
4e20	6e 64 70 20 73 79 6d 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6e 64	ndp.sym))..................(find
4e40	2d 76 61 72 69 61 62 6c 65 20 73 79 6d 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	-variable.sym)).................
4e60	28 28 66 62 6f 75 6e 64 70 20 73 79 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	((fboundp.sym)..................
4e80	28 66 69 6e 64 2d 66 75 6e 63 74 69 6f 6e 20 73 79 6d 29 29 0a 20 20 20 20 20 20 20 20 20 20 20	(find-function.sym))............
4ea0	20 20 20 20 20 28 28 62 6f 75 6e 64 70 20 73 79 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	.....((boundp.sym)..............
4ec0	20 20 20 20 28 66 69 6e 64 2d 76 61 72 69 61 62 6c 65 20 73 79 6d 29 29 0a 20 20 20 20 20 20 20	....(find-variable.sym))........
4ee0	20 20 20 20 20 20 20 20 20 28 28 6f 72 20 28 66 65 61 74 75 72 65 70 20 73 79 6d 29 0a 20 20 20	.........((or.(featurep.sym)....
4f00	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 63 61 74 65 2d 6c 69 62 72 61 72	..................(locate-librar
4f20	79 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 69 6e 31 2d 74	y.......................(prin1-t
4f40	6f 2d 73 74 72 69 6e 67 20 73 79 6d 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	o-string.sym))).................
4f60	20 28 66 69 6e 64 2d 6c 69 62 72 61 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.(find-library..................
4f80	20 28 70 72 69 6e 31 2d 74 6f 2d 73 74 72 69 6e 67 20 73 79 6d 29 29 29 0a 20 20 20 20 20 20 20	.(prin1-to-string.sym)))........
4fa0	20 20 20 20 20 20 20 20 20 28 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 72	.........(t..................(er
4fc0	72 6f 72 20 22 43 6f 75 6c 64 6e 27 74 20 66 69 6e 64 20 64 65 66 69 6e 69 74 69 6f 6e 20 6f 66	ror."Couldn't.find.definition.of
4fe0	20 25 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 73 79 6d	.%s".........................sym
5000	29 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 76 61 72 69 61 62	))))))))..(defun.counsel--variab
5020	6c 65 2d 70 20 28 73 79 6d 62 6f 6c 29 0a 20 20 22 52 65 74 75 72 6e 20 6e 6f 6e 2d 6e 69 6c 20	le-p.(symbol)..."Return.non-nil.
5040	69 66 20 53 59 4d 42 4f 4c 20 69 73 20 61 20 62 6f 75 6e 64 20 6f 72 20 64 6f 63 75 6d 65 6e 74	if.SYMBOL.is.a.bound.or.document
5060	65 64 20 76 61 72 69 61 62 6c 65 2e 22 0a 20 20 28 6f 72 20 28 61 6e 64 20 28 62 6f 75 6e 64 70	ed.variable."...(or.(and.(boundp
5080	20 73 79 6d 62 6f 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 6b 65 79 77 6f 72	.symbol)............(not.(keywor
50a0	64 70 20 73 79 6d 62 6f 6c 29 29 29 0a 20 20 20 20 20 20 28 67 65 74 20 73 79 6d 62 6f 6c 20 27	dp.symbol))).......(get.symbol.'
50c0	76 61 72 69 61 62 6c 65 2d 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 29 29 29 0a 0a 28 64 65 66 63	variable-documentation)))..(defc
50e0	75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 76 61 72 69 61 62 6c 65 2d	ustom.counsel-describe-variable-
5100	66 75 6e 63 74 69 6f 6e 20 23 27 64 65 73 63 72 69 62 65 2d 76 61 72 69 61 62 6c 65 0a 20 20 22	function.#'describe-variable..."
5120	46 75 6e 63 74 69 6f 6e 20 74 6f 20 63 61 6c 6c 20 74 6f 20 64 65 73 63 72 69 62 65 20 61 20 76	Function.to.call.to.describe.a.v
5140	61 72 69 61 62 6c 65 20 70 61 73 73 65 64 20 61 73 20 70 61 72 61 6d 65 74 65 72 2e 22 0a 20 20	ariable.passed.as.parameter."...
5160	3a 74 79 70 65 20 27 66 75 6e 63 74 69 6f 6e 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c	:type.'function)..(defun.counsel
5180	2d 64 65 73 63 72 69 62 65 2d 76 61 72 69 61 62 6c 65 2d 74 72 61 6e 73 66 6f 72 6d 65 72 20 28	-describe-variable-transformer.(
51a0	76 61 72 29 0a 20 20 22 50 72 6f 70 65 72 74 69 7a 65 20 56 41 52 20 69 66 20 69 74 27 73 20 61	var)..."Propertize.VAR.if.it's.a
51c0	20 63 75 73 74 6f 6d 20 76 61 72 69 61 62 6c 65 2e 22 0a 20 20 28 69 66 20 28 63 75 73 74 6f 6d	.custom.variable."...(if.(custom
51e0	2d 76 61 72 69 61 62 6c 65 2d 70 20 28 69 6e 74 65 72 6e 20 76 61 72 29 29 0a 20 20 20 20 20 20	-variable-p.(intern.var)).......
5200	28 69 76 79 2d 61 70 70 65 6e 64 2d 66 61 63 65 20 76 61 72 20 27 69 76 79 2d 68 69 67 68 6c 69	(ivy-append-face.var.'ivy-highli
5220	67 68 74 2d 66 61 63 65 29 0a 20 20 20 20 76 61 72 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c	ght-face).....var))..;;;###autol
5240	6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 76 61 72 69	oad.(defun.counsel-describe-vari
5260	61 62 6c 65 20 28 29 0a 20 20 22 46 6f 72 77 61 72 64 20 74 6f 20 60 64 65 73 63 72 69 62 65 2d	able.()..."Forward.to.`describe-
5280	76 61 72 69 61 62 6c 65 27 2e 0a 0a 56 61 72 69 61 62 6c 65 73 20 64 65 63 6c 61 72 65 64 20 75	variable'...Variables.declared.u
52a0	73 69 6e 67 20 60 64 65 66 63 75 73 74 6f 6d 27 20 61 72 65 20 68 69 67 68 6c 69 67 68 74 65 64	sing.`defcustom'.are.highlighted
52c0	20 61 63 63 6f 72 64 69 6e 67 20 74 6f 0a 60 69 76 79 2d 68 69 67 68 6c 69 67 68 74 2d 66 61 63	.according.to.`ivy-highlight-fac
52e0	65 27 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 65 6e	e'."...(interactive)...(let.((en
5300	61 62 6c 65 2d 72 65 63 75 72 73 69 76 65 2d 6d 69 6e 69 62 75 66 66 65 72 73 20 74 29 29 0a 20	able-recursive-minibuffers.t))..
5320	20 20 20 28 69 76 79 2d 72 65 61 64 20 22 44 65 73 63 72 69 62 65 20 76 61 72 69 61 62 6c 65 3a	...(ivy-read."Describe.variable:
5340	20 22 20 6f 62 61 72 72 61 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 70 72 65 64 69 63	.".obarray...............:predic
5360	61 74 65 20 23 27 63 6f 75 6e 73 65 6c 2d 2d 76 61 72 69 61 62 6c 65 2d 70 0a 20 20 20 20 20 20	ate.#'counsel--variable-p.......
5380	20 20 20 20 20 20 20 20 3a 72 65 71 75 69 72 65 2d 6d 61 74 63 68 20 74 0a 20 20 20 20 20 20 20	........:require-match.t........
53a0	20 20 20 20 20 20 20 3a 68 69 73 74 6f 72 79 20 27 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62	.......:history.'counsel-describ
53c0	65 2d 73 79 6d 62 6f 6c 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a	e-symbol-history...............:
53e0	6b 65 79 6d 61 70 20 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 6d 61 70 0a 20 20 20 20	keymap.counsel-describe-map.....
5400	20 20 20 20 20 20 20 20 20 20 3a 70 72 65 73 65 6c 65 63 74 20 28 69 76 79 2d 74 68 69 6e 67 2d	..........:preselect.(ivy-thing-
5420	61 74 2d 70 6f 69 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20	at-point)...............:action.
5440	28 6c 61 6d 62 64 61 20 28 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	(lambda.(x).....................
5460	20 20 20 20 28 66 75 6e 63 61 6c 6c 20 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 76 61	....(funcall.counsel-describe-va
5480	72 69 61 62 6c 65 2d 66 75 6e 63 74 69 6f 6e 20 28 69 6e 74 65 72 6e 20 78 29 29 29 0a 20 20 20	riable-function.(intern.x)))....
54a0	20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 64 65 73 63	...........:caller.'counsel-desc
54c0	72 69 62 65 2d 76 61 72 69 61 62 6c 65 29 29 29 0a 0a 28 69 76 79 2d 63 6f 6e 66 69 67 75 72 65	ribe-variable)))..(ivy-configure
54e0	20 27 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 76 61 72 69 61 62 6c 65 0a 20 20 3a 70	.'counsel-describe-variable...:p
5500	61 72 65 6e 74 20 27 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 73 79 6d 62 6f 6c 0a 20	arent.'counsel-describe-symbol..
5520	20 3a 64 69 73 70 6c 61 79 2d 74 72 61 6e 73 66 6f 72 6d 65 72 2d 66 6e 20 23 27 63 6f 75 6e 73	.:display-transformer-fn.#'couns
5540	65 6c 2d 64 65 73 63 72 69 62 65 2d 76 61 72 69 61 62 6c 65 2d 74 72 61 6e 73 66 6f 72 6d 65 72	el-describe-variable-transformer
5560	29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 66 75 6e 63 74 69	)..;;;;.`counsel-describe-functi
5580	6f 6e 27 0a 0a 28 69 76 79 2d 73 65 74 2d 61 63 74 69 6f 6e 73 0a 20 27 63 6f 75 6e 73 65 6c 2d	on'..(ivy-set-actions..'counsel-
55a0	64 65 73 63 72 69 62 65 2d 66 75 6e 63 74 69 6f 6e 0a 20 60 28 28 22 49 22 20 2c 23 27 63 6f 75	describe-function..`(("I".,#'cou
55c0	6e 73 65 6c 2d 69 6e 66 6f 2d 6c 6f 6f 6b 75 70 2d 73 79 6d 62 6f 6c 20 22 69 6e 66 6f 22 29 0a	nsel-info-lookup-symbol."info").
55e0	20 20 20 28 22 64 22 20 2c 23 27 63 6f 75 6e 73 65 6c 2d 2d 66 69 6e 64 2d 73 79 6d 62 6f 6c 20	...("d".,#'counsel--find-symbol.
5600	22 64 65 66 69 6e 69 74 69 6f 6e 22 29 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 6f 75 6e	"definition")))..(defcustom.coun
5620	73 65 6c 2d 64 65 73 63 72 69 62 65 2d 66 75 6e 63 74 69 6f 6e 2d 66 75 6e 63 74 69 6f 6e 20 23	sel-describe-function-function.#
5640	27 64 65 73 63 72 69 62 65 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 22 46 75 6e 63 74 69 6f 6e 20 74	'describe-function..."Function.t
5660	6f 20 63 61 6c 6c 20 74 6f 20 64 65 73 63 72 69 62 65 20 61 20 66 75 6e 63 74 69 6f 6e 20 70 61	o.call.to.describe.a.function.pa
5680	73 73 65 64 20 61 73 20 70 61 72 61 6d 65 74 65 72 2e 22 0a 20 20 3a 74 79 70 65 20 27 66 75 6e	ssed.as.parameter."...:type.'fun
56a0	63 74 69 6f 6e 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d	ction)..(defun.counsel-describe-
56c0	66 75 6e 63 74 69 6f 6e 2d 74 72 61 6e 73 66 6f 72 6d 65 72 20 28 66 75 6e 63 74 69 6f 6e 2d 6e	function-transformer.(function-n
56e0	61 6d 65 29 0a 20 20 22 50 72 6f 70 65 72 74 69 7a 65 20 46 55 4e 43 54 49 4f 4e 2d 4e 41 4d 45	ame)..."Propertize.FUNCTION-NAME
5700	20 69 66 20 69 74 27 73 20 61 6e 20 69 6e 74 65 72 61 63 74 69 76 65 20 66 75 6e 63 74 69 6f 6e	.if.it's.an.interactive.function
5720	2e 22 0a 20 20 28 69 66 20 28 63 6f 6d 6d 61 6e 64 70 20 28 69 6e 74 65 72 6e 20 66 75 6e 63 74	."...(if.(commandp.(intern.funct
5740	69 6f 6e 2d 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 28 69 76 79 2d 61 70 70 65 6e 64 2d 66 61 63	ion-name)).......(ivy-append-fac
5760	65 20 66 75 6e 63 74 69 6f 6e 2d 6e 61 6d 65 20 27 69 76 79 2d 68 69 67 68 6c 69 67 68 74 2d 66	e.function-name.'ivy-highlight-f
5780	61 63 65 29 0a 20 20 20 20 66 75 6e 63 74 69 6f 6e 2d 6e 61 6d 65 29 29 0a 0a 28 64 65 66 75 6e	ace).....function-name))..(defun
57a0	20 69 76 79 2d 66 75 6e 63 74 69 6f 6e 2d 63 61 6c 6c 65 64 2d 61 74 2d 70 6f 69 6e 74 20 28 29	.ivy-function-called-at-point.()
57c0	0a 20 20 28 6c 65 74 20 28 28 66 20 28 66 75 6e 63 74 69 6f 6e 2d 63 61 6c 6c 65 64 2d 61 74 2d	...(let.((f.(function-called-at-
57e0	70 6f 69 6e 74 29 29 29 0a 20 20 20 20 28 61 6e 64 20 66 20 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65	point))).....(and.f.(symbol-name
5800	20 66 29 29 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72	.f))))..(defcustom.counsel-descr
5820	69 62 65 2d 66 75 6e 63 74 69 6f 6e 2d 70 72 65 73 65 6c 65 63 74 20 23 27 69 76 79 2d 74 68 69	ibe-function-preselect.#'ivy-thi
5840	6e 67 2d 61 74 2d 70 6f 69 6e 74 0a 20 20 22 44 65 74 65 72 6d 69 6e 65 20 77 68 61 74 20 60 63	ng-at-point..."Determine.what.`c
5860	6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 66 75 6e 63 74 69 6f 6e 27 20 73 68 6f 75 6c 64	ounsel-describe-function'.should
5880	20 70 72 65 73 65 6c 65 63 74 2e 22 0a 20 20 3a 74 79 70 65 20 27 28 72 61 64 69 6f 0a 20 20 20	.preselect."...:type.'(radio....
58a0	20 20 20 20 20 20 20 28 66 75 6e 63 74 69 6f 6e 2d 69 74 65 6d 20 69 76 79 2d 74 68 69 6e 67 2d	.......(function-item.ivy-thing-
58c0	61 74 2d 70 6f 69 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 74 69 6f 6e 2d 69 74	at-point)...........(function-it
58e0	65 6d 20 69 76 79 2d 66 75 6e 63 74 69 6f 6e 2d 63 61 6c 6c 65 64 2d 61 74 2d 70 6f 69 6e 74 29	em.ivy-function-called-at-point)
5900	29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 64 65 73 63 72 69 62 65 2d 66 75 6e	))..(defun.counsel--describe-fun
5920	63 74 69 6f 6e 20 28 63 61 6e 64 69 64 61 74 65 29 0a 20 20 22 50 61 73 73 20 73 74 72 69 6e 67	ction.(candidate)..."Pass.string
5940	20 43 41 4e 44 49 44 41 54 45 20 74 6f 20 60 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d	.CANDIDATE.to.`counsel-describe-
5960	66 75 6e 63 74 69 6f 6e 2d 66 75 6e 63 74 69 6f 6e 27 2e 22 0a 20 20 28 66 75 6e 63 61 6c 6c 20	function-function'."...(funcall.
5980	63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 66 75 6e 63 74 69 6f 6e 2d 66 75 6e 63 74 69	counsel-describe-function-functi
59a0	6f 6e 20 28 69 6e 74 65 72 6e 20 63 61 6e 64 69 64 61 74 65 29 29 29 0a 0a 3b 3b 3b 23 23 23 61	on.(intern.candidate)))..;;;###a
59c0	75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d	utoload.(defun.counsel-describe-
59e0	66 75 6e 63 74 69 6f 6e 20 28 29 0a 20 20 22 46 6f 72 77 61 72 64 20 74 6f 20 60 64 65 73 63 72	function.()..."Forward.to.`descr
5a00	69 62 65 2d 66 75 6e 63 74 69 6f 6e 27 2e 0a 0a 49 6e 74 65 72 61 63 74 69 76 65 20 66 75 6e 63	ibe-function'...Interactive.func
5a20	74 69 6f 6e 73 20 28 69 2e 65 2e 2c 20 63 6f 6d 6d 61 6e 64 73 29 20 61 72 65 20 68 69 67 68 6c	tions.(i.e.,.commands).are.highl
5a40	69 67 68 74 65 64 20 61 63 63 6f 72 64 69 6e 67 0a 74 6f 20 60 69 76 79 2d 68 69 67 68 6c 69 67	ighted.according.to.`ivy-highlig
5a60	68 74 2d 66 61 63 65 27 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65	ht-face'."...(interactive)...(le
5a80	74 20 28 28 65 6e 61 62 6c 65 2d 72 65 63 75 72 73 69 76 65 2d 6d 69 6e 69 62 75 66 66 65 72 73	t.((enable-recursive-minibuffers
5aa0	20 74 29 29 0a 20 20 20 20 28 69 76 79 2d 72 65 61 64 20 22 44 65 73 63 72 69 62 65 20 66 75 6e	.t)).....(ivy-read."Describe.fun
5ac0	63 74 69 6f 6e 3a 20 22 20 6f 62 61 72 72 61 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a	ction:.".obarray...............:
5ae0	70 72 65 64 69 63 61 74 65 20 28 6c 61 6d 62 64 61 20 28 73 79 6d 29 0a 20 20 20 20 20 20 20 20	predicate.(lambda.(sym).........
5b00	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 66 62 6f 75 6e 64 70 20	...................(or.(fboundp.
5b20	73 79 6d 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	sym)............................
5b40	20 20 20 20 28 67 65 74 20 73 79 6d 20 27 66 75 6e 63 74 69 6f 6e 2d 64 6f 63 75 6d 65 6e 74 61	....(get.sym.'function-documenta
5b60	74 69 6f 6e 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 71 75 69 72 65 2d 6d	tion)))...............:require-m
5b80	61 74 63 68 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 69 73 74 6f 72 79 20 27 63	atch.t...............:history.'c
5ba0	6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 73 79 6d 62 6f 6c 2d 68 69 73 74 6f 72 79 0a 20	ounsel-describe-symbol-history..
5bc0	20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6b 65 79 6d 61 70 20 63 6f 75 6e 73 65 6c 2d 64 65 73	.............:keymap.counsel-des
5be0	63 72 69 62 65 2d 6d 61 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 70 72 65 73 65 6c 65	cribe-map...............:presele
5c00	63 74 20 28 66 75 6e 63 61 6c 6c 20 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 66 75 6e	ct.(funcall.counsel-describe-fun
5c20	63 74 69 6f 6e 2d 70 72 65 73 65 6c 65 63 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a	ction-preselect)...............:
5c40	61 63 74 69 6f 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 2d 64 65 73 63 72 69 62 65 2d 66 75 6e 63 74	action.#'counsel--describe-funct
5c60	69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73	ion...............:caller.'couns
5c80	65 6c 2d 64 65 73 63 72 69 62 65 2d 66 75 6e 63 74 69 6f 6e 29 29 29 0a 0a 28 69 76 79 2d 63 6f	el-describe-function)))..(ivy-co
5ca0	6e 66 69 67 75 72 65 20 27 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 66 75 6e 63 74 69	nfigure.'counsel-describe-functi
5cc0	6f 6e 0a 20 20 3a 70 61 72 65 6e 74 20 27 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 73	on...:parent.'counsel-describe-s
5ce0	79 6d 62 6f 6c 0a 20 20 3a 64 69 73 70 6c 61 79 2d 74 72 61 6e 73 66 6f 72 6d 65 72 2d 66 6e 20	ymbol...:display-transformer-fn.
5d00	23 27 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 66 75 6e 63 74 69 6f 6e 2d 74 72 61 6e	#'counsel-describe-function-tran
5d20	73 66 6f 72 6d 65 72 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65	sformer)..;;;;.`counsel-describe
5d40	2d 73 79 6d 62 6f 6c 27 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 64 65 73	-symbol'..(defcustom.counsel-des
5d60	63 72 69 62 65 2d 73 79 6d 62 6f 6c 2d 66 75 6e 63 74 69 6f 6e 20 27 64 65 73 63 72 69 62 65 2d	cribe-symbol-function.'describe-
5d80	73 79 6d 62 6f 6c 0a 20 20 22 46 75 6e 63 74 69 6f 6e 20 74 6f 20 63 61 6c 6c 20 74 6f 20 64 65	symbol..."Function.to.call.to.de
5da0	73 63 72 69 62 65 20 61 20 73 79 6d 62 6f 6c 20 70 61 73 73 65 64 20 61 73 20 70 61 72 61 6d 65	scribe.a.symbol.passed.as.parame
5dc0	74 65 72 2e 22 0a 20 20 3a 74 79 70 65 20 27 66 75 6e 63 74 69 6f 6e 29 0a 0a 3b 3b 3b 23 23 23	ter."...:type.'function)..;;;###
5de0	61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65	autoload.(defun.counsel-describe
5e00	2d 73 79 6d 62 6f 6c 20 28 29 0a 20 20 22 46 6f 72 77 61 72 64 20 74 6f 20 60 64 65 73 63 72 69	-symbol.()..."Forward.to.`descri
5e20	62 65 2d 73 79 6d 62 6f 6c 27 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28	be-symbol'."...(interactive)...(
5e40	75 6e 6c 65 73 73 20 28 66 75 6e 63 74 69 6f 6e 70 20 27 64 65 73 63 72 69 62 65 2d 73 79 6d 62	unless.(functionp.'describe-symb
5e60	6f 6c 29 0a 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 54 68 69 73 20 63 6f 6d 6d 61 6e	ol).....(user-error."This.comman
5e80	64 20 72 65 71 75 69 72 65 73 20 45 6d 61 63 73 20 32 35 2e 31 20 6f 72 20 6c 61 74 65 72 22 29	d.requires.Emacs.25.1.or.later")
5ea0	29 0a 20 20 28 72 65 71 75 69 72 65 20 27 68 65 6c 70 2d 6d 6f 64 65 29 0a 20 20 28 64 65 66 76	)...(require.'help-mode)...(defv
5ec0	61 72 20 64 65 73 63 72 69 62 65 2d 73 79 6d 62 6f 6c 2d 62 61 63 6b 65 6e 64 73 29 0a 20 20 28	ar.describe-symbol-backends)...(
5ee0	6c 65 74 20 28 28 65 6e 61 62 6c 65 2d 72 65 63 75 72 73 69 76 65 2d 6d 69 6e 69 62 75 66 66 65	let.((enable-recursive-minibuffe
5f00	72 73 20 74 29 29 0a 20 20 20 20 28 69 76 79 2d 72 65 61 64 20 22 44 65 73 63 72 69 62 65 20 73	rs.t)).....(ivy-read."Describe.s
5f20	79 6d 62 6f 6c 3a 20 22 20 6f 62 61 72 72 61 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a	ymbol:.".obarray...............:
5f40	70 72 65 64 69 63 61 74 65 20 28 6c 61 6d 62 64 61 20 28 73 79 6d 29 0a 20 20 20 20 20 20 20 20	predicate.(lambda.(sym).........
5f60	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 73 6f 6d 65 20 28 6c 61 6d	...................(cl-some.(lam
5f80	62 64 61 20 28 62 61 63 6b 65 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	bda.(backend)...................
5fa0	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 28 63 61	....................(funcall.(ca
5fc0	64 72 20 62 61 63 6b 65 6e 64 29 20 73 79 6d 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	dr.backend).sym))...............
5fe0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 65 73 63 72 69 62 65 2d 73	......................describe-s
6000	79 6d 62 6f 6c 2d 62 61 63 6b 65 6e 64 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a	ymbol-backends))...............:
6020	72 65 71 75 69 72 65 2d 6d 61 74 63 68 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 68	require-match.t...............:h
6040	69 73 74 6f 72 79 20 27 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 73 79 6d 62 6f 6c 2d	istory.'counsel-describe-symbol-
6060	68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6b 65 79 6d 61 70 20 63 6f	history...............:keymap.co
6080	75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 6d 61 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	unsel-describe-map..............
60a0	20 3a 70 72 65 73 65 6c 65 63 74 20 28 69 76 79 2d 74 68 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 29	.:preselect.(ivy-thing-at-point)
60c0	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 28 6c 61 6d 62 64 61 20 28	...............:action.(lambda.(
60e0	78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63	x).........................(func
6100	61 6c 6c 20 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 73 79 6d 62 6f 6c 2d 66 75 6e 63	all.counsel-describe-symbol-func
6120	74 69 6f 6e 20 28 69 6e 74 65 72 6e 20 78 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	tion.(intern.x)))...............
6140	3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 73 79 6d 62 6f 6c	:caller.'counsel-describe-symbol
6160	29 29 29 0a 0a 28 69 76 79 2d 63 6f 6e 66 69 67 75 72 65 20 27 63 6f 75 6e 73 65 6c 2d 64 65 73	)))..(ivy-configure.'counsel-des
6180	63 72 69 62 65 2d 73 79 6d 62 6f 6c 0a 20 20 3a 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20 22 5e	cribe-symbol...:initial-input."^
61a0	22 0a 20 20 3a 73 6f 72 74 2d 66 6e 20 23 27 69 76 79 2d 73 74 72 69 6e 67 3c 29 0a 0a 28 69 76	"...:sort-fn.#'ivy-string<)..(iv
61c0	79 2d 73 65 74 2d 61 63 74 69 6f 6e 73 0a 20 27 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65	y-set-actions..'counsel-describe
61e0	2d 73 79 6d 62 6f 6c 0a 20 60 28 28 22 49 22 20 2c 23 27 63 6f 75 6e 73 65 6c 2d 69 6e 66 6f 2d	-symbol..`(("I".,#'counsel-info-
6200	6c 6f 6f 6b 75 70 2d 73 79 6d 62 6f 6c 20 22 69 6e 66 6f 22 29 0a 20 20 20 28 22 64 22 20 2c 23	lookup-symbol."info")....("d".,#
6220	27 63 6f 75 6e 73 65 6c 2d 2d 66 69 6e 64 2d 73 79 6d 62 6f 6c 20 22 64 65 66 69 6e 69 74 69 6f	'counsel--find-symbol."definitio
6240	6e 22 29 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 73 65 74 2d 76 61 72 69 61 62 6c	n")))..;;;;.`counsel-set-variabl
6260	65 27 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 73 65 74 2d 76 61 72 69 61 62 6c 65	e'..(defvar.counsel-set-variable
6280	2d 68 69 73 74 6f 72 79 20 6e 69 6c 0a 20 20 22 53 74 6f 72 65 20 68 69 73 74 6f 72 79 20 66 6f	-history.nil..."Store.history.fo
62a0	72 20 60 63 6f 75 6e 73 65 6c 2d 73 65 74 2d 76 61 72 69 61 62 6c 65 27 2e 22 29 0a 0a 28 64 65	r.`counsel-set-variable'.")..(de
62c0	66 75 6e 20 63 6f 75 6e 73 65 6c 2d 72 65 61 64 2d 73 65 74 71 2d 65 78 70 72 65 73 73 69 6f 6e	fun.counsel-read-setq-expression
62e0	20 28 73 79 6d 29 0a 20 20 22 52 65 61 64 20 61 6e 64 20 65 76 61 6c 20 61 20 73 65 74 71 20 65	.(sym)..."Read.and.eval.a.setq.e
6300	78 70 72 65 73 73 69 6f 6e 20 66 6f 72 20 53 59 4d 2e 22 0a 20 20 28 73 65 74 71 20 74 68 69 73	xpression.for.SYM."...(setq.this
6320	2d 63 6f 6d 6d 61 6e 64 20 27 65 76 61 6c 2d 65 78 70 72 65 73 73 69 6f 6e 29 0a 20 20 28 6c 65	-command.'eval-expression)...(le
6340	74 2a 20 28 28 73 79 6d 2d 76 61 6c 75 65 20 28 73 79 6d 62 6f 6c 2d 76 61 6c 75 65 20 73 79 6d	t*.((sym-value.(symbol-value.sym
6360	29 29 0a 20 20 20 20 20 20 20 20 20 28 69 6e 69 74 20 28 66 6f 72 6d 61 74 20 22 28 73 65 74 71	))..........(init.(format."(setq
6380	20 25 73 25 53 29 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 28	.%s%S)"........................(
63a0	69 66 20 28 6f 72 20 28 63 6f 6e 73 70 20 73 79 6d 2d 76 61 6c 75 65 29 0a 20 20 20 20 20 20 20	if.(or.(consp.sym-value)........
63c0	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 6e 64 20 73 79 6d	........................(and.sym
63e0	2d 76 61 6c 75 65 20 28 73 79 6d 62 6f 6c 70 20 73 79 6d 2d 76 61 6c 75 65 29 29 29 0a 20 20 20	-value.(symbolp.sym-value)))....
6400	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 27 22 0a 20 20 20 20	........................"'".....
6420	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 22 29 0a 20 20 20 20 20 20 20	....................."")........
6440	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 79 6d 2d 76 61 6c 75 65 29 29 29 0a 20 20 20	................sym-value)))....
6460	20 3b 3b 20 4d 6f 73 74 20 6f 66 20 74 68 69 73 20 64 75 70 6c 69 63 61 74 65 73 20 60 72 65 61	.;;.Most.of.this.duplicates.`rea
6480	64 2d 2d 65 78 70 72 65 73 73 69 6f 6e 27 2e 0a 20 20 20 20 28 6d 69 6e 69 62 75 66 66 65 72 2d	d--expression'......(minibuffer-
64a0	77 69 74 68 2d 73 65 74 75 70 2d 68 6f 6f 6b 0a 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20	with-setup-hook.........(lambda.
64c0	28 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 2d 73 79 6e 74 61 78 2d 74 61 62 6c 65 20 65	()...........(set-syntax-table.e
64e0	6d 61 63 73 2d 6c 69 73 70 2d 6d 6f 64 65 2d 73 79 6e 74 61 78 2d 74 61 62 6c 65 29 0a 20 20 20	macs-lisp-mode-syntax-table)....
6500	20 20 20 20 20 20 20 3b 3b 20 41 64 64 65 64 20 69 6e 20 45 6d 61 63 73 20 32 35 2e 31 2e 0a 20	.......;;.Added.in.Emacs.25.1...
6520	20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 66 62 6f 75 6e 64 70 20 27 65 6c 69 73 70 2d 63	.........(when.(fboundp.'elisp-c
6540	6f 6d 70 6c 65 74 69 6f 6e 2d 61 74 2d 70 6f 69 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	ompletion-at-point).............
6560	28 61 64 64 2d 68 6f 6f 6b 20 27 63 6f 6d 70 6c 65 74 69 6f 6e 2d 61 74 2d 70 6f 69 6e 74 2d 66	(add-hook.'completion-at-point-f
6580	75 6e 63 74 69 6f 6e 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23	unctions.......................#
65a0	27 65 6c 69 73 70 2d 63 6f 6d 70 6c 65 74 69 6f 6e 2d 61 74 2d 70 6f 69 6e 74 20 6e 69 6c 20 74	'elisp-completion-at-point.nil.t
65c0	29 29 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 45 6d 61 63 73 20 32 37 2b 20 61 6c 72 65 61 64	))...........;;.Emacs.27+.alread
65e0	79 20 73 65 74 73 20 75 70 20 45 6c 44 6f 63 20 69 6e 20 74 68 69 73 20 68 6f 6f 6b 2e 20 20 45	y.sets.up.ElDoc.in.this.hook...E
6600	6d 61 63 73 20 32 35 20 61 64 64 65 64 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 60 65 6c 69 73	macs.25.added...........;;.`elis
6620	70 2d 65 6c 64 6f 63 2d 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 2d 66 75 6e 63 74 69 6f 6e 27 20	p-eldoc-documentation-function'.
6640	61 6e 64 20 45 6d 61 63 73 20 32 38 20 6f 62 73 6f 6c 65 74 65 73 20 69 74 2e 0a 20 20 20 20 20	and.Emacs.28.obsoletes.it.......
6660	20 20 20 20 20 28 77 68 65 6e 20 28 3c 20 65 6d 61 63 73 2d 6d 61 6a 6f 72 2d 76 65 72 73 69 6f	.....(when.(<.emacs-major-versio
6680	6e 20 32 37 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 66 62 6f 75 6e 64 70	n.27).............(when.(fboundp
66a0	20 27 65 6c 69 73 70 2d 65 6c 64 6f 63 2d 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 2d 66 75 6e 63	.'elisp-eldoc-documentation-func
66c0	74 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 64 64 2d 66 75 6e 63 74 69 6f	tion)...............(add-functio
66e0	6e 20 3a 62 65 66 6f 72 65 2d 75 6e 74 69 6c 20 28 6c 6f 63 61 6c 20 27 65 6c 64 6f 63 2d 64 6f	n.:before-until.(local.'eldoc-do
6700	63 75 6d 65 6e 74 61 74 69 6f 6e 2d 66 75 6e 63 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20	cumentation-function)...........
6720	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 65 6c 69 73 70 2d 65 6c 64 6f 63 2d	..................#'elisp-eldoc-
6740	64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 2d 66 75 6e 63 74 69 6f 6e 29 29 0a 20 20 20 20 20 20 20	documentation-function))........
6760	20 20 20 20 20 28 65 6c 64 6f 63 2d 6d 6f 64 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 72 75	.....(eldoc-mode))...........(ru
6780	6e 2d 68 6f 6f 6b 73 20 27 65 76 61 6c 2d 65 78 70 72 65 73 73 69 6f 6e 2d 6d 69 6e 69 62 75 66	n-hooks.'eval-expression-minibuf
67a0	66 65 72 2d 73 65 74 75 70 2d 68 6f 6f 6b 29 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 54 68 65	fer-setup-hook)...........;;.The
67c0	20 66 6f 6c 6c 6f 77 69 6e 67 20 64 69 76 65 72 67 65 73 20 66 72 6f 6d 20 60 72 65 61 64 2d 2d	.following.diverges.from.`read--
67e0	65 78 70 72 65 73 73 69 6f 6e 27 2e 0a 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61	expression'............(goto-cha
6800	72 20 28 6d 69 6e 69 62 75 66 66 65 72 2d 70 72 6f 6d 70 74 2d 65 6e 64 29 29 0a 20 20 20 20 20	r.(minibuffer-prompt-end))......
6820	20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 63 68 61 72 20 36 29 0a 20 20 20 20 20 20 20 20 20 20	.....(forward-char.6)...........
6840	28 69 6e 73 65 72 74 20 28 66 6f 72 6d 61 74 20 22 25 53 20 22 20 73 79 6d 29 29 29 0a 20 20 20	(insert.(format."%S.".sym)))....
6860	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 45 76 61 6c 3a 20	...(read-from-minibuffer."Eval:.
6880	22 20 69 6e 69 74 20 72 65 61 64 2d 65 78 70 72 65 73 73 69 6f 6e 2d 6d 61 70 20 74 0a 20 20 20	".init.read-expression-map.t....
68a0	20 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 72 65 61 64 2d 65	.........................'read-e
68c0	78 70 72 65 73 73 69 6f 6e 2d 68 69 73 74 6f 72 79 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f	xpression-history))))..(defun.co
68e0	75 6e 73 65 6c 2d 2d 73 65 74 71 2d 64 6f 63 6f 6e 73 74 20 28 78 29 0a 20 20 22 52 65 74 75 72	unsel--setq-doconst.(x)..."Retur
6900	6e 20 61 20 63 6f 6e 73 20 6f 66 20 64 65 73 63 72 69 70 74 69 6f 6e 20 61 6e 64 20 76 61 6c 75	n.a.cons.of.description.and.valu
6920	65 20 66 6f 72 20 58 2e 0a 58 20 69 73 20 61 6e 20 69 74 65 6d 20 6f 66 20 61 20 72 61 64 69 6f	e.for.X..X.is.an.item.of.a.radio
6940	2d 20 6f 72 20 63 68 6f 69 63 65 2d 74 79 70 65 20 64 65 66 63 75 73 74 6f 6d 2e 22 0a 20 20 28	-.or.choice-type.defcustom."...(
6960	77 68 65 6e 20 28 6c 69 73 74 70 20 78 29 0a 20 20 20 20 28 6c 65 74 20 28 28 76 20 28 63 61 72	when.(listp.x).....(let.((v.(car
6980	2d 73 61 66 65 20 28 6c 61 73 74 20 78 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 74 61 67 20	-safe.(last.x)))...........(tag.
69a0	28 61 6e 64 20 28 65 71 20 28 63 61 72 20 78 29 20 27 63 6f 6e 73 74 29 0a 20 20 20 20 20 20 20	(and.(eq.(car.x).'const)........
69c0	20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6c 69 73 74 2d 67 65 74 20 28 63 64 72 20 78 29 20	.............(plist-get.(cdr.x).
69e0	3a 74 61 67 29 29 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 6f 72 20 76 20	:tag)))).......(when.(and.(or.v.
6a00	74 61 67 29 20 28 6e 6f 74 20 28 65 71 20 76 20 27 66 75 6e 63 74 69 6f 6e 29 29 29 0a 20 20 20	tag).(not.(eq.v.'function)))....
6a20	20 20 20 20 20 28 63 6f 6e 73 0a 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 0a 20 20 20 20	.....(cons..........(concat.....
6a40	20 20 20 20 20 20 28 77 68 65 6e 20 74 61 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e	......(when.tag.............(con
6a60	63 61 74 20 74 61 67 20 22 3a 20 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 73 74	cat.tag.":."))...........(if.(st
6a80	72 69 6e 67 70 20 76 29 20 76 20 28 70 72 69 6e 31 2d 74 6f 2d 73 74 72 69 6e 67 20 76 29 29 29	ringp.v).v.(prin1-to-string.v)))
6aa0	0a 20 20 20 20 20 20 20 20 20 28 69 66 20 28 73 79 6d 62 6f 6c 70 20 76 29 0a 20 20 20 20 20 20	..........(if.(symbolp.v).......
6ac0	20 20 20 20 20 20 20 28 6c 69 73 74 20 27 71 75 6f 74 65 20 76 29 0a 20 20 20 20 20 20 20 20 20	.......(list.'quote.v)..........
6ae0	20 20 76 29 29 29 29 29 29 0a 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 6c 76 2d	..v))))))..(declare-function.lv-
6b00	6d 65 73 73 61 67 65 20 22 65 78 74 3a 6c 76 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74	message."ext:lv").(declare-funct
6b20	69 6f 6e 20 6c 76 2d 64 65 6c 65 74 65 2d 77 69 6e 64 6f 77 20 22 65 78 74 3a 6c 76 22 29 0a 28	ion.lv-delete-window."ext:lv").(
6b40	64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 75 73 74 6f 6d 2d 76 61 72 69 61 62 6c 65	declare-function.custom-variable
6b60	2d 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 22 63 75 73 2d 65 64 69 74 22 29 0a 0a 28 64 65 66	-documentation."cus-edit")..(def
6b80	66 61 63 65 20 63 6f 75 6e 73 65 6c 2d 76 61 72 69 61 62 6c 65 2d 64 6f 63 75 6d 65 6e 74 61 74	face.counsel-variable-documentat
6ba0	69 6f 6e 0a 20 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 63 6f	ion...'((t.:inherit.font-lock-co
6bc0	6d 6d 65 6e 74 2d 66 61 63 65 29 29 0a 20 20 22 46 61 63 65 20 66 6f 72 20 64 69 73 70 6c 61 79	mment-face))..."Face.for.display
6be0	69 6e 67 20 4c 69 73 70 20 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 2e 22 0a 20 20 3a 67 72 6f 75	ing.Lisp.documentation."...:grou
6c00	70 20 27 69 76 79 2d 66 61 63 65 73 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64	p.'ivy-faces)..;;;###autoload.(d
6c20	65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 73 65 74 2d 76 61 72 69 61 62 6c 65 20 28 73 79 6d 29 0a	efun.counsel-set-variable.(sym).
6c40	20 20 22 53 65 74 20 61 20 76 61 72 69 61 62 6c 65 20 53 59 4d 2c 20 77 69 74 68 20 63 6f 6d 70	.."Set.a.variable.SYM,.with.comp
6c60	6c 65 74 69 6f 6e 2e 0a 0a 57 68 65 6e 20 74 68 65 20 73 65 6c 65 63 74 65 64 20 76 61 72 69 61	letion...When.the.selected.varia
6c80	62 6c 65 20 69 73 20 61 20 60 64 65 66 63 75 73 74 6f 6d 27 20 77 69 74 68 20 74 68 65 20 74 79	ble.is.a.`defcustom'.with.the.ty
6ca0	70 65 20 62 6f 6f 6c 65 61 6e 0a 6f 72 20 72 61 64 69 6f 2c 20 6f 66 66 65 72 20 63 6f 6d 70 6c	pe.boolean.or.radio,.offer.compl
6cc0	65 74 69 6f 6e 20 6f 66 20 61 6c 6c 20 70 6f 73 73 69 62 6c 65 20 76 61 6c 75 65 73 2e 0a 0a 4f	etion.of.all.possible.values...O
6ce0	74 68 65 72 77 69 73 65 2c 20 6f 66 66 65 72 20 61 20 76 61 72 69 61 6e 74 20 6f 66 20 60 65 76	therwise,.offer.a.variant.of.`ev
6d00	61 6c 2d 65 78 70 72 65 73 73 69 6f 6e 27 2c 20 77 69 74 68 20 74 68 65 20 69 6e 69 74 69 61 6c	al-expression',.with.the.initial
6d20	0a 69 6e 70 75 74 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 74 6f 20 74 68 65 20 63 68 6f 73	.input.corresponding.to.the.chos
6d40	65 6e 20 76 61 72 69 61 62 6c 65 2e 0a 0a 57 69 74 68 20 61 20 70 72 65 66 69 78 20 61 72 67 2c	en.variable...With.a.prefix.arg,
6d60	20 72 65 73 74 72 69 63 74 20 6c 69 73 74 20 74 6f 20 76 61 72 69 61 62 6c 65 73 20 64 65 66 69	.restrict.list.to.variables.defi
6d80	6e 65 64 20 75 73 69 6e 67 0a 60 64 65 66 63 75 73 74 6f 6d 27 2e 22 0a 20 20 28 69 6e 74 65 72	ned.using.`defcustom'."...(inter
6da0	61 63 74 69 76 65 20 28 6c 69 73 74 20 28 69 6e 74 65 72 6e 0a 20 20 20 20 20 20 20 20 20 20 20	active.(list.(intern............
6dc0	20 20 20 20 20 20 20 20 20 20 20 28 69 76 79 2d 72 65 61 64 20 22 53 65 74 20 76 61 72 69 61 62	...........(ivy-read."Set.variab
6de0	6c 65 3a 20 22 20 6f 62 61 72 72 61 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	le:.".obarray...................
6e00	20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 70 72 65 64 69 63 61 74 65 20 28 69 66 20 63 75 72	..............:predicate.(if.cur
6e20	72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	rent-prefix-arg.................
6e40	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23	...............................#
6e60	27 63 75 73 74 6f 6d 2d 76 61 72 69 61 62 6c 65 2d 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	'custom-variable-p..............
6e80	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
6ea0	23 27 63 6f 75 6e 73 65 6c 2d 2d 76 61 72 69 61 62 6c 65 2d 70 29 0a 20 20 20 20 20 20 20 20 20	#'counsel--variable-p)..........
6ec0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 69 73 74 6f 72 79 20	.......................:history.
6ee0	27 63 6f 75 6e 73 65 6c 2d 73 65 74 2d 76 61 72 69 61 62 6c 65 2d 68 69 73 74 6f 72 79 0a 20 20	'counsel-set-variable-history...
6f00	20 20 20 20 20 20 20 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	..............................:p
6f20	72 65 73 65 6c 65 63 74 20 28 69 76 79 2d 74 68 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 29 29 29 29	reselect.(ivy-thing-at-point))))
6f40	29 0a 20 20 28 6c 65 74 20 28 28 64 6f 63 20 28 61 6e 64 20 28 72 65 71 75 69 72 65 20 27 63 75	)...(let.((doc.(and.(require.'cu
6f60	73 2d 65 64 69 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 71 75 69	s-edit)...................(requi
6f80	72 65 20 27 6c 76 20 6e 69 6c 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	re.'lv.nil.t)...................
6fa0	28 6e 6f 74 20 28 73 74 72 69 6e 67 3d 20 22 6e 69 6c 22 20 28 63 75 73 74 6f 6d 2d 76 61 72 69	(not.(string=."nil".(custom-vari
6fc0	61 62 6c 65 2d 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 73 79 6d 29 29 29 0a 20 20 20 20 20 20	able-documentation.sym))).......
6fe0	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 73 74 6f 6d 2d	............(propertize.(custom-
7000	76 61 72 69 61 62 6c 65 2d 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 73 79 6d 29 0a 20 20 20 20	variable-documentation.sym).....
7020	20 20 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	..........................'face.
7040	27 63 6f 75 6e 73 65 6c 2d 76 61 72 69 61 62 6c 65 2d 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 29	'counsel-variable-documentation)
7060	29 29 0a 20 20 20 20 20 20 20 20 73 79 6d 2d 74 79 70 65 0a 20 20 20 20 20 20 20 20 63 61 6e 64	)).........sym-type.........cand
7080	73 29 0a 20 20 20 20 28 75 6e 77 69 6e 64 2d 70 72 6f 74 65 63 74 0a 20 20 20 20 20 20 20 20 20	s).....(unwind-protect..........
70a0	28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 64 6f 63 0a 20 20 20 20	(progn............(when.doc.....
70c0	20 20 20 20 20 20 20 20 20 28 6c 76 2d 6d 65 73 73 61 67 65 20 28 69 76 79 2d 2d 71 75 6f 74 65	.........(lv-message.(ivy--quote
70e0	2d 66 6f 72 6d 61 74 2d 73 74 72 69 6e 67 20 64 6f 63 29 29 29 0a 20 20 20 20 20 20 20 20 20 20	-format-string.doc)))...........
7100	20 28 69 66 20 28 61 6e 64 20 28 62 6f 75 6e 64 70 20 73 79 6d 29 0a 20 20 20 20 20 20 20 20 20	.(if.(and.(boundp.sym)..........
7120	20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 73 79 6d 2d 74 79 70 65 20 28 67 65 74 20 73	...........(setq.sym-type.(get.s
7140	79 6d 20 27 63 75 73 74 6f 6d 2d 74 79 70 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ym.'custom-type))...............
7160	20 20 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	......(cond.....................
7180	20 20 28 28 61 6e 64 20 28 63 6f 6e 73 70 20 73 79 6d 2d 74 79 70 65 29 0a 20 20 20 20 20 20 20	..((and.(consp.sym-type)........
71a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 6d 71 20 28 63 61 72 20	.....................(memq.(car.
71c0	73 79 6d 2d 74 79 70 65 29 20 27 28 63 68 6f 69 63 65 20 72 61 64 69 6f 29 29 29 0a 20 20 20 20	sym-type).'(choice.radio))).....
71e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6e 64 73 20 28	...................(setq.cands.(
7200	64 65 6c 71 20 6e 69 6c 20 28 6d 61 70 63 61 72 20 23 27 63 6f 75 6e 73 65 6c 2d 2d 73 65 74 71	delq.nil.(mapcar.#'counsel--setq
7220	2d 64 6f 63 6f 6e 73 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	-doconst........................
7240	20 20 20 20 20 20 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	..............................(c
7260	64 72 20 73 79 6d 2d 74 79 70 65 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	dr.sym-type)))))................
7280	20 20 20 20 20 20 20 28 28 65 71 20 73 79 6d 2d 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 29 0a 20	.......((eq.sym-type.'boolean)..
72a0	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 20 63 61 6e 64	......................(setq.cand
72c0	73 20 27 28 28 22 6e 69 6c 22 20 2e 20 6e 69 6c 29 20 28 22 74 22 20 2e 20 74 29 29 29 29 0a 20	s.'(("nil"...nil).("t"...t))))..
72e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 20 6e 69 6c 29 29 29 0a 20	.....................(t.nil)))..
7300	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 73 79 6d 2d 76 61 6c 20 28 73	..............(let*.((sym-val.(s
7320	79 6d 62 6f 6c 2d 76 61 6c 75 65 20 73 79 6d 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ymbol-value.sym))...............
7340	20 20 20 20 20 20 20 20 28 72 65 73 20 28 69 76 79 2d 72 65 61 64 20 28 66 6f 72 6d 61 74 20 22	........(res.(ivy-read.(format."
7360	53 65 74 20 28 25 53 20 3c 25 73 3e 29 3a 20 22 20 73 79 6d 20 73 79 6d 2d 76 61 6c 29 0a 20 20	Set.(%S.<%s>):.".sym.sym-val)...
7380	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
73a0	20 20 20 63 61 6e 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	...cands........................
73c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 70 72 65 73 65 6c 65 63 74 20 28 70 72 69 6e 31 2d	..............:preselect.(prin1-
73e0	74 6f 2d 73 74 72 69 6e 67 20 73 79 6d 2d 76 61 6c 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20	to-string.sym-val))))...........
7400	20 20 20 20 20 20 20 28 77 68 65 6e 20 72 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.......(when.res................
7420	20 20 20 20 28 73 65 74 71 20 72 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	....(setq.res...................
7440	20 20 20 20 20 20 20 28 69 66 20 28 61 73 73 6f 63 20 72 65 73 20 63 61 6e 64 73 29 0a 20 20 20	.......(if.(assoc.res.cands)....
7460	20 20 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 64 72 20 28	..........................(cdr.(
7480	61 73 73 6f 63 20 72 65 73 20 63 61 6e 64 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	assoc.res.cands))...............
74a0	20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 61 64 20 72 65 73 29 29 29 0a 20 20 20 20 20 20	.............(read.res))).......
74c0	20 20 20 20 20 20 20 20 20 20 20 20 20 28 6b 69 6c 6c 2d 6e 65 77 20 28 66 6f 72 6d 61 74 20 22	.............(kill-new.(format."
74e0	28 73 65 74 71 20 25 53 20 25 53 29 22 20 73 79 6d 20 72 65 73 29 29 0a 20 20 20 20 20 20 20 20	(setq.%S.%S)".sym.res)).........
7500	20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 20 73 79 6d 20 28 69 66 20 28 61 6e 64 20 28 6c 69	...........(set.sym.(if.(and.(li
7520	73 74 70 20 72 65 73 29 20 28 65 71 20 28 63 61 72 20 72 65 73 29 20 27 71 75 6f 74 65 29 29 0a	stp.res).(eq.(car.res).'quote)).
7540	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
7560	28 63 61 64 72 20 72 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	(cadr.res)......................
7580	20 20 20 20 20 20 20 20 20 72 65 73 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75	.........res))))..............(u
75a0	6e 6c 65 73 73 20 28 62 6f 75 6e 64 70 20 73 79 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	nless.(boundp.sym)..............
75c0	20 20 28 73 65 74 20 73 79 6d 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c	..(set.sym.nil))..............(l
75e0	65 74 20 28 28 65 78 70 72 20 28 63 6f 75 6e 73 65 6c 2d 72 65 61 64 2d 73 65 74 71 2d 65 78 70	et.((expr.(counsel-read-setq-exp
7600	72 65 73 73 69 6f 6e 20 73 79 6d 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6b	ression.sym)))................(k
7620	69 6c 6c 2d 6e 65 77 20 28 66 6f 72 6d 61 74 20 22 25 53 22 20 65 78 70 72 29 29 0a 20 20 20 20	ill-new.(format."%S".expr)).....
7640	20 20 20 20 20 20 20 20 20 20 20 28 65 76 61 6c 2d 65 78 70 72 65 73 73 69 6f 6e 20 65 78 70 72	...........(eval-expression.expr
7660	29 29 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 64 6f 63 0a 20 20 20 20 20 20 20 20 28 6c 76	)))).......(when.doc.........(lv
7680	2d 64 65 6c 65 74 65 2d 77 69 6e 64 6f 77 29 29 29 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73	-delete-window)))))..;;;;.`couns
76a0	65 6c 2d 61 70 72 6f 70 6f 73 27 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66	el-apropos'..;;;###autoload.(def
76c0	75 6e 20 63 6f 75 6e 73 65 6c 2d 61 70 72 6f 70 6f 73 20 28 29 0a 20 20 22 53 68 6f 77 20 61 6c	un.counsel-apropos.()..."Show.al
76e0	6c 20 6d 61 74 63 68 69 6e 67 20 73 79 6d 62 6f 6c 73 2e 0a 53 65 65 20 60 61 70 72 6f 70 6f 73	l.matching.symbols..See.`apropos
7700	27 20 66 6f 72 20 66 75 72 74 68 65 72 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 6f 6e 20 77 68 61	'.for.further.information.on.wha
7720	74 20 69 73 20 63 6f 6e 73 69 64 65 72 65 64 0a 61 20 73 79 6d 62 6f 6c 20 61 6e 64 20 68 6f 77	t.is.considered.a.symbol.and.how
7740	20 74 6f 20 73 65 61 72 63 68 20 66 6f 72 20 74 68 65 6d 2e 22 0a 20 20 28 69 6e 74 65 72 61 63	.to.search.for.them."...(interac
7760	74 69 76 65 29 0a 20 20 28 69 76 79 2d 72 65 61 64 20 22 53 65 61 72 63 68 20 66 6f 72 20 73 79	tive)...(ivy-read."Search.for.sy
7780	6d 62 6f 6c 20 28 77 6f 72 64 20 6c 69 73 74 20 6f 72 20 72 65 67 65 78 70 29 3a 20 22 20 6f 62	mbol.(word.list.or.regexp):.".ob
77a0	61 72 72 61 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 70 72 65 64 69 63 61 74 65 20 28 6c 61	array.............:predicate.(la
77c0	6d 62 64 61 20 28 73 79 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	mbda.(sym)......................
77e0	20 20 20 20 28 6f 72 20 28 66 62 6f 75 6e 64 70 20 73 79 6d 29 0a 20 20 20 20 20 20 20 20 20 20	....(or.(fboundp.sym)...........
7800	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 6f 75 6e 64 70 20 73 79 6d 29 0a	...................(boundp.sym).
7820	20 20 20 20 20 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 61	.............................(fa
7840	63 65 70 20 73 79 6d 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	cep.sym)........................
7860	20 20 20 20 20 20 28 73 79 6d 62 6f 6c 2d 70 6c 69 73 74 20 73 79 6d 29 29 29 0a 20 20 20 20 20	......(symbol-plist.sym)))......
7880	20 20 20 20 20 20 20 3a 68 69 73 74 6f 72 79 20 27 63 6f 75 6e 73 65 6c 2d 61 70 72 6f 70 6f 73	.......:history.'counsel-apropos
78a0	2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 70 72 65 73 65 6c 65 63 74 20	-history.............:preselect.
78c0	28 69 76 79 2d 74 68 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20	(ivy-thing-at-point)............
78e0	20 3a 61 63 74 69 6f 6e 20 28 6c 61 6d 62 64 61 20 28 70 61 74 74 65 72 6e 29 0a 20 20 20 20 20	.:action.(lambda.(pattern)......
7900	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 73 74 72 69 6e 67 3d 20	.................(when.(string=.
7920	70 61 74 74 65 72 6e 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	pattern."").....................
7940	20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 50 6c 65 61 73 65 20 73 70 65 63 69 66 79 20	....(user-error."Please.specify.
7960	61 20 70 61 74 74 65 72 6e 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	a.pattern"))....................
7980	20 20 20 3b 3b 20 49 66 20 74 68 65 20 75 73 65 72 20 73 65 6c 65 63 74 65 64 20 61 20 63 61 6e	...;;.If.the.user.selected.a.can
79a0	64 69 64 61 74 65 20 66 6f 72 6d 20 74 68 65 20 6c 69 73 74 2c 20 77 65 20 75 73 65 0a 20 20 20	didate.form.the.list,.we.use....
79c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 61 20 70 61 74 74 65 72 6e 20	...................;;.a.pattern.
79e0	77 68 69 63 68 20 6d 61 74 63 68 65 73 20 6f 6e 6c 79 20 74 68 65 20 73 65 6c 65 63 74 65 64 20	which.matches.only.the.selected.
7a00	73 79 6d 62 6f 6c 2e 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	symbol........................(i
7a20	66 20 28 6d 65 6d 71 20 74 68 69 73 2d 63 6f 6d 6d 61 6e 64 20 27 28 69 76 79 2d 69 6d 6d 65 64	f.(memq.this-command.'(ivy-immed
7a40	69 61 74 65 2d 64 6f 6e 65 20 69 76 79 2d 61 6c 74 2d 64 6f 6e 65 29 29 0a 20 20 20 20 20 20 20	iate-done.ivy-alt-done))........
7a60	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 52 65 67 65 78 70 20 70 61 74	...................;;.Regexp.pat
7a80	74 65 72 6e 20 61 72 65 20 70 61 73 73 65 64 20 76 65 72 62 61 74 69 6d 2c 20 6f 74 68 65 72 20	tern.are.passed.verbatim,.other.
7aa0	69 6e 70 75 74 20 69 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	input.is........................
7ac0	20 20 20 3b 3b 20 73 70 6c 69 74 20 69 6e 74 6f 20 77 6f 72 64 73 2e 0a 20 20 20 20 20 20 20 20	...;;.split.into.words..........
7ae0	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 3d 20 28	..................(if.(string=.(
7b00	72 65 67 65 78 70 2d 71 75 6f 74 65 20 70 61 74 74 65 72 6e 29 20 70 61 74 74 65 72 6e 29 0a 20	regexp-quote.pattern).pattern)..
7b20	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 70	.............................(ap
7b40	72 6f 70 6f 73 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 70 61 74 74 65 72 6e 20 22 5b 20 5c	ropos.(split-string.pattern."[.\
7b60	74 5d 2b 22 20 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	t]+".t))........................
7b80	20 20 20 20 20 28 61 70 72 6f 70 6f 73 20 70 61 74 74 65 72 6e 29 29 0a 20 20 20 20 20 20 20 20	.....(apropos.pattern)).........
7ba0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 70 72 6f 70 6f 73 20 28 63 6f 6e 63 61 74	................(apropos.(concat
7bc0	20 22 5c 5c 60 22 20 70 61 74 74 65 72 6e 20 22 5c 5c 27 22 29 29 29 29 0a 20 20 20 20 20 20 20	."\\`".pattern."\\'"))))........
7be0	20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 61 70 72 6f 70 6f 73 29 29 0a	.....:caller.'counsel-apropos)).
7c00	0a 28 69 76 79 2d 63 6f 6e 66 69 67 75 72 65 20 27 63 6f 75 6e 73 65 6c 2d 61 70 72 6f 70 6f 73	.(ivy-configure.'counsel-apropos
7c20	0a 20 20 3a 73 6f 72 74 2d 66 6e 20 23 27 69 76 79 2d 73 74 72 69 6e 67 3c 29 0a 0a 3b 3b 3b 3b	...:sort-fn.#'ivy-string<)..;;;;
7c40	20 60 63 6f 75 6e 73 65 6c 2d 69 6e 66 6f 2d 6c 6f 6f 6b 75 70 2d 73 79 6d 62 6f 6c 27 0a 0a 28	.`counsel-info-lookup-symbol'..(
7c60	64 65 66 76 61 72 20 69 6e 66 6f 2d 6c 6f 6f 6b 75 70 2d 6d 6f 64 65 29 0a 28 64 65 63 6c 61 72	defvar.info-lookup-mode).(declar
7c80	65 2d 66 75 6e 63 74 69 6f 6e 20 69 6e 66 6f 2d 6c 6f 6f 6b 75 70 2d 67 75 65 73 73 2d 64 65 66	e-function.info-lookup-guess-def
7ca0	61 75 6c 74 20 22 69 6e 66 6f 2d 6c 6f 6f 6b 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74	ault."info-look").(declare-funct
7cc0	69 6f 6e 20 69 6e 66 6f 2d 6c 6f 6f 6b 75 70 2d 3e 63 6f 6d 70 6c 65 74 69 6f 6e 73 20 22 69 6e	ion.info-lookup->completions."in
7ce0	66 6f 2d 6c 6f 6f 6b 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 69 6e 66 6f	fo-look").(declare-function.info
7d00	2d 6c 6f 6f 6b 75 70 2d 3e 6d 6f 64 65 2d 76 61 6c 75 65 20 22 69 6e 66 6f 2d 6c 6f 6f 6b 22 29	-lookup->mode-value."info-look")
7d20	0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 69 6e 66 6f 2d 6c 6f 6f 6b 75 70 2d 73	.(declare-function.info-lookup-s
7d40	65 6c 65 63 74 2d 6d 6f 64 65 20 22 69 6e 66 6f 2d 6c 6f 6f 6b 22 29 0a 28 64 65 63 6c 61 72 65	elect-mode."info-look").(declare
7d60	2d 66 75 6e 63 74 69 6f 6e 20 69 6e 66 6f 2d 6c 6f 6f 6b 75 70 2d 63 68 61 6e 67 65 2d 6d 6f 64	-function.info-lookup-change-mod
7d80	65 20 22 69 6e 66 6f 2d 6c 6f 6f 6b 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e	e."info-look").(declare-function
7da0	20 69 6e 66 6f 2d 6c 6f 6f 6b 75 70 20 22 69 6e 66 6f 2d 6c 6f 6f 6b 22 29 0a 0a 3b 3b 3b 23 23	.info-lookup."info-look")..;;;##
7dc0	23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 69 6e 66 6f 2d 6c 6f	#autoload.(defun.counsel-info-lo
7de0	6f 6b 75 70 2d 73 79 6d 62 6f 6c 20 28 73 79 6d 62 6f 6c 20 26 6f 70 74 69 6f 6e 61 6c 20 6d 6f	okup-symbol.(symbol.&optional.mo
7e00	64 65 29 0a 20 20 22 46 6f 72 77 61 72 64 20 53 59 4d 42 4f 4c 20 74 6f 20 60 69 6e 66 6f 2d 6c	de)..."Forward.SYMBOL.to.`info-l
7e20	6f 6f 6b 75 70 2d 73 79 6d 62 6f 6c 27 20 77 69 74 68 20 69 76 79 20 63 6f 6d 70 6c 65 74 69 6f	ookup-symbol'.with.ivy.completio
7e40	6e 2e 0a 57 69 74 68 20 70 72 65 66 69 78 20 61 72 67 20 4d 4f 44 45 20 61 20 71 75 65 72 79 20	n..With.prefix.arg.MODE.a.query.
7e60	66 6f 72 20 74 68 65 20 73 79 6d 62 6f 6c 20 68 65 6c 70 20 6d 6f 64 65 20 69 73 20 6f 66 66 65	for.the.symbol.help.mode.is.offe
7e80	72 65 64 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 0a 20 20 20 28 70 72 6f 67 6e 0a 20	red."...(interactive....(progn..
7ea0	20 20 20 20 28 72 65 71 75 69 72 65 20 27 69 6e 66 6f 2d 6c 6f 6f 6b 29 0a 20 20 20 20 20 3b 3b	....(require.'info-look)......;;
7ec0	20 43 6f 75 72 74 65 73 79 20 6f 66 20 60 69 6e 66 6f 2d 6c 6f 6f 6b 75 70 2d 69 6e 74 65 72 61	.Courtesy.of.`info-lookup-intera
7ee0	63 74 69 76 65 2d 61 72 67 75 6d 65 6e 74 73 27 0a 20 20 20 20 20 28 6c 65 74 2a 20 28 28 74 6f	ctive-arguments'......(let*.((to
7f00	70 69 63 20 27 73 79 6d 62 6f 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 6f 64 65 20 28	pic.'symbol).............(mode.(
7f20	63 6f 6e 64 20 28 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 0a 20 20 20 20 20 20 20	cond.(current-prefix-arg........
7f40	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 66 6f 2d 6c 6f 6f 6b 75 70 2d 63	..................(info-lookup-c
7f60	68 61 6e 67 65 2d 6d 6f 64 65 20 74 6f 70 69 63 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	hange-mode.topic))..............
7f80	20 20 20 20 20 20 20 20 20 20 20 28 28 69 6e 66 6f 2d 6c 6f 6f 6b 75 70 2d 3e 6d 6f 64 65 2d 76	...........((info-lookup->mode-v
7fa0	61 6c 75 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 74	alue...........................t
7fc0	6f 70 69 63 20 28 69 6e 66 6f 2d 6c 6f 6f 6b 75 70 2d 73 65 6c 65 63 74 2d 6d 6f 64 65 29 29 0a	opic.(info-lookup-select-mode)).
7fe0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 6e 66 6f 2d 6c 6f	.........................info-lo
8000	6f 6b 75 70 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 20 20 20	okup-mode)......................
8020	20 20 20 28 28 69 6e 66 6f 2d 6c 6f 6f 6b 75 70 2d 63 68 61 6e 67 65 2d 6d 6f 64 65 20 74 6f 70	...((info-lookup-change-mode.top
8040	69 63 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 65 6e 61 62 6c 65 2d 72 65 63 75 72	ic)))).............(enable-recur
8060	73 69 76 65 2d 6d 69 6e 69 62 75 66 66 65 72 73 20 74 29 29 0a 20 20 20 20 20 20 20 28 6c 69 73	sive-minibuffers.t))........(lis
8080	74 20 28 69 76 79 2d 72 65 61 64 20 22 44 65 73 63 72 69 62 65 20 73 79 6d 62 6f 6c 3a 20 22 20	t.(ivy-read."Describe.symbol:.".
80a0	28 69 6e 66 6f 2d 6c 6f 6f 6b 75 70 2d 3e 63 6f 6d 70 6c 65 74 69 6f 6e 73 20 74 6f 70 69 63 20	(info-lookup->completions.topic.
80c0	6d 6f 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 20 20 3a 68 69	mode)........................:hi
80e0	73 74 6f 72 79 20 27 69 6e 66 6f 2d 6c 6f 6f 6b 75 70 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20	story.'info-lookup-history......
8100	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 70 72 65 73 65 6c 65 63 74 20 28 69 6e	..................:preselect.(in
8120	66 6f 2d 6c 6f 6f 6b 75 70 2d 67 75 65 73 73 2d 64 65 66 61 75 6c 74 20 74 6f 70 69 63 20 6d 6f	fo-lookup-guess-default.topic.mo
8140	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 20 20 3a 63 61 6c 6c	de)........................:call
8160	65 72 20 27 63 6f 75 6e 73 65 6c 2d 69 6e 66 6f 2d 6c 6f 6f 6b 75 70 2d 73 79 6d 62 6f 6c 29 0a	er.'counsel-info-lookup-symbol).
8180	20 20 20 20 20 20 20 20 20 20 20 20 20 6d 6f 64 65 29 29 29 29 0a 20 20 28 69 6e 66 6f 2d 6c 6f	.............mode))))...(info-lo
81a0	6f 6b 75 70 2d 73 79 6d 62 6f 6c 20 73 79 6d 62 6f 6c 20 6d 6f 64 65 29 29 0a 0a 28 69 76 79 2d	okup-symbol.symbol.mode))..(ivy-
81c0	63 6f 6e 66 69 67 75 72 65 20 27 63 6f 75 6e 73 65 6c 2d 69 6e 66 6f 2d 6c 6f 6f 6b 75 70 2d 73	configure.'counsel-info-lookup-s
81e0	79 6d 62 6f 6c 0a 20 20 3a 73 6f 72 74 2d 66 6e 20 23 27 69 76 79 2d 73 74 72 69 6e 67 3c 29 0a	ymbol...:sort-fn.#'ivy-string<).
8200	0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 4d 2d 78 27 0a 0a 28 64 65 66 66 61 63 65 20 63 6f	.;;;;.`counsel-M-x'..(defface.co
8220	75 6e 73 65 6c 2d 6b 65 79 2d 62 69 6e 64 69 6e 67 0a 20 20 27 28 28 74 20 3a 69 6e 68 65 72 69	unsel-key-binding...'((t.:inheri
8240	74 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 6b 65 79 77 6f 72 64 2d 66 61 63 65 29 29 0a 20 20 22 46 61	t.font-lock-keyword-face))..."Fa
8260	63 65 20 75 73 65 64 20 62 79 20 60 63 6f 75 6e 73 65 6c 2d 4d 2d 78 27 20 66 6f 72 20 6b 65 79	ce.used.by.`counsel-M-x'.for.key
8280	20 62 69 6e 64 69 6e 67 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 69 76 79 2d 66 61 63 65 73 29	.bindings."...:group.'ivy-faces)
82a0	0a 0a 28 64 65 66 66 61 63 65 20 63 6f 75 6e 73 65 6c 2d 61 63 74 69 76 65 2d 6d 6f 64 65 0a 20	..(defface.counsel-active-mode..
82c0	20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 62 75 69 6c 74 69 6e	.'((t.:inherit.font-lock-builtin
82e0	2d 66 61 63 65 29 29 0a 20 20 22 46 61 63 65 20 75 73 65 64 20 62 79 20 60 63 6f 75 6e 73 65 6c	-face))..."Face.used.by.`counsel
8300	2d 4d 2d 78 27 20 66 6f 72 20 61 63 74 69 76 61 74 65 64 20 6d 6f 64 65 73 2e 22 0a 20 20 3a 67	-M-x'.for.activated.modes."...:g
8320	72 6f 75 70 20 27 69 76 79 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 6f 75	roup.'ivy-faces)..(defcustom.cou
8340	6e 73 65 6c 2d 61 6c 69 61 73 2d 65 78 70 61 6e 64 20 74 0a 20 20 22 57 68 65 6e 20 6e 6f 6e 2d	nsel-alias-expand.t..."When.non-
8360	6e 69 6c 2c 20 73 68 6f 77 20 74 68 65 20 65 78 70 61 6e 73 69 6f 6e 20 6f 66 20 61 6c 69 61 73	nil,.show.the.expansion.of.alias
8380	65 73 20 69 6e 20 60 63 6f 75 6e 73 65 6c 2d 4d 2d 78 27 2e 22 0a 20 20 3a 74 79 70 65 20 27 62	es.in.`counsel-M-x'."...:type.'b
83a0	6f 6f 6c 65 61 6e 0a 20 20 3a 67 72 6f 75 70 20 27 69 76 79 29 0a 0a 28 64 65 66 75 6e 20 63 6f	oolean...:group.'ivy)..(defun.co
83c0	75 6e 73 65 6c 2d 4d 2d 78 2d 74 72 61 6e 73 66 6f 72 6d 65 72 20 28 63 6d 64 29 0a 20 20 22 52	unsel-M-x-transformer.(cmd)..."R
83e0	65 74 75 72 6e 20 43 4d 44 20 61 6e 6e 6f 74 61 74 65 64 20 77 69 74 68 20 69 74 73 20 61 63 74	eturn.CMD.annotated.with.its.act
8400	69 76 65 20 6b 65 79 20 62 69 6e 64 69 6e 67 2c 20 69 66 20 61 6e 79 2e 22 0a 20 20 28 6c 65 74	ive.key.binding,.if.any."...(let
8420	2a 20 28 28 73 79 6d 20 28 69 6e 74 65 72 6e 20 63 6d 64 29 29 0a 20 20 20 20 20 20 20 20 20 28	*.((sym.(intern.cmd))..........(
8440	61 6c 69 61 73 20 28 73 79 6d 62 6f 6c 2d 66 75 6e 63 74 69 6f 6e 20 73 79 6d 29 29 0a 20 20 20	alias.(symbol-function.sym))....
8460	20 20 20 20 20 20 28 6b 65 79 20 28 77 68 65 72 65 2d 69 73 2d 69 6e 74 65 72 6e 61 6c 20 73 79	......(key.(where-is-internal.sy
8480	6d 20 6e 69 6c 20 74 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 6f 72 20 28 65 71 20 73 79 6d	m.nil.t))).....(when.(or.(eq.sym
84a0	20 6d 61 6a 6f 72 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 0a	.major-mode)...............(and.
84c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 6d 71 20 73 79 6d 20 6d 69 6e 6f 72 2d 6d	...............(memq.sym.minor-m
84e0	6f 64 65 2d 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 6f 75 6e 64 70	ode-list)................(boundp
8500	20 73 79 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 2d 6c 6f 63	.sym)................(buffer-loc
8520	61 6c 2d 76 61 6c 75 65 20 73 79 6d 20 28 69 76 79 2d 73 74 61 74 65 2d 62 75 66 66 65 72 20 69	al-value.sym.(ivy-state-buffer.i
8540	76 79 2d 6c 61 73 74 29 29 29 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 6d 64 20 28 70 72 6f	vy-last)))).......(setq.cmd.(pro
8560	70 65 72 74 69 7a 65 20 63 6d 64 20 27 66 61 63 65 20 27 63 6f 75 6e 73 65 6c 2d 61 63 74 69 76	pertize.cmd.'face.'counsel-activ
8580	65 2d 6d 6f 64 65 29 29 29 0a 20 20 20 20 28 63 6f 6e 63 61 74 20 63 6d 64 0a 20 20 20 20 20 20	e-mode))).....(concat.cmd.......
85a0	20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 73 79 6d 62 6f 6c 70 20 61 6c 69 61 73 29	......(when.(and.(symbolp.alias)
85c0	20 63 6f 75 6e 73 65 6c 2d 61 6c 69 61 73 2d 65 78 70 61 6e 64 29 0a 20 20 20 20 20 20 20 20 20	.counsel-alias-expand)..........
85e0	20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 20 28 25 73 29 22 20 61 6c 69 61 73 29 29 0a 20 20 20	.....(format.".(%s)".alias))....
8600	20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 6b 65 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	.........(when.key..............
8620	20 3b 3b 20 50 72 65 66 65 72 20 60 3c 66 32 3e 27 20 6f 76 65 72 20 60 43 2d 78 20 36 27 20 77	.;;.Prefer.`<f2>'.over.`C-x.6'.w
8640	68 65 72 65 20 61 70 70 6c 69 63 61 62 6c 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c	here.applicable...............(l
8660	65 74 20 28 28 69 20 28 63 6c 2d 73 65 61 72 63 68 20 5b 3f 5c 43 2d 78 20 3f 36 5d 20 6b 65 79	et.((i.(cl-search.[?\C-x.?6].key
8680	29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 69 0a 20 20 20 20	))).................(when.i.....
86a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 64 75 70 20 28 76 63 6f 6e 63 61	..............(let.((dup.(vconca
86c0	74 20 28 73 75 62 73 74 72 69 6e 67 20 6b 65 79 20 30 20 69 29 20 5b 66 32 5d 20 28 73 75 62 73	t.(substring.key.0.i).[f2].(subs
86e0	74 72 69 6e 67 20 6b 65 79 20 28 2b 20 69 20 32 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20	tring.key.(+.i.2))))............
8700	20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 20 28 63 75 72 72 65 6e 74 2d 67 6c 6f 62 61	.............(map.(current-globa
8720	6c 2d 6d 61 70 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 77 68	l-map))).....................(wh
8740	65 6e 20 28 65 71 75 61 6c 20 28 6c 6f 6f 6b 75 70 2d 6b 65 79 20 6d 61 70 20 6b 65 79 29 0a 20	en.(equal.(lookup-key.map.key)..
8760	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
8780	28 6c 6f 6f 6b 75 70 2d 6b 65 79 20 6d 61 70 20 64 75 70 29 29 0a 20 20 20 20 20 20 20 20 20 20	(lookup-key.map.dup))...........
87a0	20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 6b 65 79 20 64 75 70 29 29 29 29 29 0a 20	............(setq.key.dup)))))..
87c0	20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 6b 65 79 20 28 6b 65 79 2d 64 65 73 63	.............(setq.key.(key-desc
87e0	72 69 70 74 69 6f 6e 20 6b 65 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 74	ription.key))...............(put
8800	2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 28 6c 65 6e 67 74 68 20 6b 65 79 29 20 27 66	-text-property.0.(length.key).'f
8820	61 63 65 20 27 63 6f 75 6e 73 65 6c 2d 6b 65 79 2d 62 69 6e 64 69 6e 67 20 6b 65 79 29 0a 20 20	ace.'counsel-key-binding.key)...
8840	20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 20 28 25 73 29 22 20 6b 65 79 29	............(format.".(%s)".key)
8860	29 29 29 29 0a 0a 28 64 65 66 76 61 72 20 61 6d 78 2d 69 6e 69 74 69 61 6c 69 7a 65 64 29 0a 28	))))..(defvar.amx-initialized).(
8880	64 65 66 76 61 72 20 61 6d 78 2d 63 61 63 68 65 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74	defvar.amx-cache).(declare-funct
88a0	69 6f 6e 20 61 6d 78 2d 69 6e 69 74 69 61 6c 69 7a 65 20 22 65 78 74 3a 61 6d 78 22 29 0a 28 64	ion.amx-initialize."ext:amx").(d
88c0	65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 61 6d 78 2d 64 65 74 65 63 74 2d 6e 65 77 2d 63	eclare-function.amx-detect-new-c
88e0	6f 6d 6d 61 6e 64 73 20 22 65 78 74 3a 61 6d 78 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63	ommands."ext:amx").(declare-func
8900	74 69 6f 6e 20 61 6d 78 2d 75 70 64 61 74 65 20 22 65 78 74 3a 61 6d 78 22 29 0a 28 64 65 63 6c	tion.amx-update."ext:amx").(decl
8920	61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 61 6d 78 2d 72 61 6e 6b 20 22 65 78 74 3a 61 6d 78 22 29	are-function.amx-rank."ext:amx")
8940	0a 28 64 65 66 76 61 72 20 73 6d 65 78 2d 69 6e 69 74 69 61 6c 69 7a 65 64 2d 70 29 0a 28 64 65	.(defvar.smex-initialized-p).(de
8960	66 76 61 72 20 73 6d 65 78 2d 69 64 6f 2d 63 61 63 68 65 29 0a 28 64 65 63 6c 61 72 65 2d 66 75	fvar.smex-ido-cache).(declare-fu
8980	6e 63 74 69 6f 6e 20 73 6d 65 78 2d 69 6e 69 74 69 61 6c 69 7a 65 20 22 65 78 74 3a 73 6d 65 78	nction.smex-initialize."ext:smex
89a0	22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 73 6d 65 78 2d 64 65 74 65 63 74	").(declare-function.smex-detect
89c0	2d 6e 65 77 2d 63 6f 6d 6d 61 6e 64 73 20 22 65 78 74 3a 73 6d 65 78 22 29 0a 28 64 65 63 6c 61	-new-commands."ext:smex").(decla
89e0	72 65 2d 66 75 6e 63 74 69 6f 6e 20 73 6d 65 78 2d 75 70 64 61 74 65 20 22 65 78 74 3a 73 6d 65	re-function.smex-update."ext:sme
8a00	78 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 73 6d 65 78 2d 72 61 6e 6b 20	x").(declare-function.smex-rank.
8a20	22 65 78 74 3a 73 6d 65 78 22 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 4d 2d 78	"ext:smex")..(defun.counsel--M-x
8a40	2d 65 78 74 65 72 6e 73 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 60 63 6f 75 6e 73 65 6c 2d 4d	-externs.()..."Return.`counsel-M
8a60	2d 78 27 20 63 61 6e 64 69 64 61 74 65 73 20 66 72 6f 6d 20 65 78 74 65 72 6e 61 6c 20 70 61 63	-x'.candidates.from.external.pac
8a80	6b 61 67 65 73 2e 0a 54 68 65 20 72 65 74 75 72 6e 20 76 61 6c 75 65 20 69 73 20 61 20 6c 69 73	kages..The.return.value.is.a.lis
8aa0	74 20 6f 66 20 73 74 72 69 6e 67 73 2e 20 20 54 68 65 20 63 75 72 72 65 6e 74 6c 79 20 73 75 70	t.of.strings...The.currently.sup
8ac0	70 6f 72 74 65 64 0a 70 61 63 6b 61 67 65 73 20 61 72 65 2c 20 69 6e 20 6f 72 64 65 72 20 6f 66	ported.packages.are,.in.order.of
8ae0	20 70 72 65 63 65 64 65 6e 63 65 2c 20 60 61 6d 78 27 20 61 6e 64 20 60 73 6d 65 78 27 2e 22 0a	.precedence,.`amx'.and.`smex'.".
8b00	20 20 28 63 6f 6e 64 20 28 28 72 65 71 75 69 72 65 20 27 61 6d 78 20 6e 69 6c 20 74 29 0a 20 20	..(cond.((require.'amx.nil.t)...
8b20	20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 61 6d 78 2d 69 6e 69 74 69 61 6c 69 7a 65 64 0a 20	.......(unless.amx-initialized..
8b40	20 20 20 20 20 20 20 20 20 20 28 61 6d 78 2d 69 6e 69 74 69 61 6c 69 7a 65 29 29 0a 20 20 20 20	..........(amx-initialize)).....
8b60	20 20 20 20 20 28 77 68 65 6e 20 28 61 6d 78 2d 64 65 74 65 63 74 2d 6e 65 77 2d 63 6f 6d 6d 61	.....(when.(amx-detect-new-comma
8b80	6e 64 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 61 6d 78 2d 75 70 64 61 74 65 29 29 0a 20 20	nds)............(amx-update))...
8ba0	20 20 20 20 20 20 20 28 6d 61 70 63 61 72 20 28 6c 61 6d 62 64 61 20 28 65 6e 74 72 79 29 0a 20	.......(mapcar.(lambda.(entry)..
8bc0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 28	..................(symbol-name.(
8be0	63 61 72 20 65 6e 74 72 79 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 6d	car.entry)))..................am
8c00	78 2d 63 61 63 68 65 29 29 0a 20 20 20 20 20 20 20 20 28 28 72 65 71 75 69 72 65 20 27 73 6d 65	x-cache)).........((require.'sme
8c20	78 20 6e 69 6c 20 74 29 0a 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 73 6d 65 78 2d 69	x.nil.t)..........(unless.smex-i
8c40	6e 69 74 69 61 6c 69 7a 65 64 2d 70 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 6d 65 78 2d 69 6e	nitialized-p............(smex-in
8c60	69 74 69 61 6c 69 7a 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 73 6d 65 78 2d	itialize))..........(when.(smex-
8c80	64 65 74 65 63 74 2d 6e 65 77 2d 63 6f 6d 6d 61 6e 64 73 29 0a 20 20 20 20 20 20 20 20 20 20 20	detect-new-commands)............
8ca0	28 73 6d 65 78 2d 75 70 64 61 74 65 29 29 0a 20 20 20 20 20 20 20 20 20 73 6d 65 78 2d 69 64 6f	(smex-update))..........smex-ido
8cc0	2d 63 61 63 68 65 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 4d 2d 78 2d 65	-cache)))..(defun.counsel--M-x-e
8ce0	78 74 65 72 6e 73 2d 70 72 65 64 69 63 61 74 65 20 28 63 61 6e 64 29 0a 20 20 22 52 65 74 75 72	xterns-predicate.(cand)..."Retur
8d00	6e 20 6e 6f 6e 2d 6e 69 6c 20 69 66 20 60 63 6f 75 6e 73 65 6c 2d 4d 2d 78 27 20 73 68 6f 75 6c	n.non-nil.if.`counsel-M-x'.shoul
8d20	64 20 63 6f 6d 70 6c 65 74 65 20 43 41 4e 44 2e 0a 43 41 4e 44 20 69 73 20 61 20 73 74 72 69 6e	d.complete.CAND..CAND.is.a.strin
8d40	67 20 72 65 74 75 72 6e 65 64 20 62 79 20 60 63 6f 75 6e 73 65 6c 2d 2d 4d 2d 78 2d 65 78 74 65	g.returned.by.`counsel--M-x-exte
8d60	72 6e 73 27 2e 22 0a 20 20 28 6e 6f 74 20 28 67 65 74 20 28 69 6e 74 65 72 6e 20 63 61 6e 64 29	rns'."...(not.(get.(intern.cand)
8d80	20 27 6e 6f 2d 63 6f 75 6e 73 65 6c 2d 4d 2d 78 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e	.'no-counsel-M-x)))..(defun.coun
8da0	73 65 6c 2d 2d 4d 2d 78 2d 6d 61 6b 65 2d 70 72 65 64 69 63 61 74 65 20 28 29 0a 20 20 22 52 65	sel--M-x-make-predicate.()..."Re
8dc0	74 75 72 6e 20 61 20 70 72 65 64 69 63 61 74 65 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 4d 2d	turn.a.predicate.for.`counsel-M-
8de0	78 27 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 20 28 64 65	x'.in.the.current.buffer."...(de
8e00	66 76 61 72 20 72 65 61 64 2d 65 78 74 65 6e 64 65 64 2d 63 6f 6d 6d 61 6e 64 2d 70 72 65 64 69	fvar.read-extended-command-predi
8e20	63 61 74 65 29 0a 20 20 28 6c 65 74 20 28 28 62 75 66 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66	cate)...(let.((buf.(current-buff
8e40	65 72 29 29 29 0a 20 20 20 20 28 6c 61 6d 62 64 61 20 28 73 79 6d 29 0a 20 20 20 20 20 20 28 61	er))).....(lambda.(sym).......(a
8e60	6e 64 20 28 63 6f 6d 6d 61 6e 64 70 20 73 79 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f	nd.(commandp.sym)............(no
8e80	74 20 28 67 65 74 20 73 79 6d 20 27 62 79 74 65 2d 6f 62 73 6f 6c 65 74 65 2d 69 6e 66 6f 29 29	t.(get.sym.'byte-obsolete-info))
8ea0	0a 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 67 65 74 20 73 79 6d 20 27 6e 6f 2d 63 6f	............(not.(get.sym.'no-co
8ec0	75 6e 73 65 6c 2d 4d 2d 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 6e	unsel-M-x))............(cond.((n
8ee0	6f 74 20 28 62 6f 75 6e 64 2d 61 6e 64 2d 74 72 75 65 2d 70 20 72 65 61 64 2d 65 78 74 65 6e 64	ot.(bound-and-true-p.read-extend
8f00	65 64 2d 63 6f 6d 6d 61 6e 64 2d 70 72 65 64 69 63 61 74 65 29 29 29 0a 20 20 20 20 20 20 20 20	ed-command-predicate))).........
8f20	20 20 20 20 20 20 20 20 20 28 28 66 75 6e 63 74 69 6f 6e 70 20 72 65 61 64 2d 65 78 74 65 6e 64	.........((functionp.read-extend
8f40	65 64 2d 63 6f 6d 6d 61 6e 64 2d 70 72 65 64 69 63 61 74 65 29 0a 20 20 20 20 20 20 20 20 20 20	ed-command-predicate)...........
8f60	20 20 20 20 20 20 20 20 28 63 6f 6e 64 69 74 69 6f 6e 2d 63 61 73 65 2d 75 6e 6c 65 73 73 2d 64	........(condition-case-unless-d
8f80	65 62 75 67 20 65 72 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	ebug.err.......................(
8fa0	66 75 6e 63 61 6c 6c 20 72 65 61 64 2d 65 78 74 65 6e 64 65 64 2d 63 6f 6d 6d 61 6e 64 2d 70 72	funcall.read-extended-command-pr
8fc0	65 64 69 63 61 74 65 20 73 79 6d 20 62 75 66 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	edicate.sym.buf)................
8fe0	20 20 20 20 20 28 65 72 72 6f 72 20 28 6d 65 73 73 61 67 65 20 22 72 65 61 64 2d 65 78 74 65 6e	.....(error.(message."read-exten
9000	64 65 64 2d 63 6f 6d 6d 61 6e 64 2d 70 72 65 64 69 63 61 74 65 3a 20 25 73 3a 20 25 73 22 0a 20	ded-command-predicate:.%s:.%s"..
9020	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
9040	20 20 20 73 79 6d 20 28 65 72 72 6f 72 2d 6d 65 73 73 61 67 65 2d 73 74 72 69 6e 67 20 65 72 72	...sym.(error-message-string.err
9060	29 29 29 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 4d 2d 78 2d	))))))))))..(defun.counsel--M-x-
9080	70 72 6f 6d 70 74 20 28 29 0a 20 20 22 53 74 72 69 6e 67 20 66 6f 72 20 60 4d 2d 78 27 20 70 6c	prompt.()..."String.for.`M-x'.pl
90a0	75 73 20 74 68 65 20 73 74 72 69 6e 67 20 72 65 70 72 65 73 65 6e 74 61 74 69 6f 6e 20 6f 66 20	us.the.string.representation.of.
90c0	60 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 27 2e 22 0a 20 20 28 63 6f 6e 63 61 74	`current-prefix-arg'."...(concat
90e0	20 28 63 6f 6e 64 20 28 28 6e 75 6c 6c 20 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67	.(cond.((null.current-prefix-arg
9100	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20	)..................nil).........
9120	20 20 20 20 20 20 20 20 28 28 65 71 20 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 20	........((eq.current-prefix-arg.
9140	27 2d 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2d 20 22 29 0a 20 20 20 20 20	'-).................."-.")......
9160	20 20 20 20 20 20 20 20 20 20 20 28 28 69 6e 74 65 67 65 72 70 20 63 75 72 72 65 6e 74 2d 70 72	...........((integerp.current-pr
9180	65 66 69 78 2d 61 72 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d	efix-arg)..................(form
91a0	61 74 20 22 25 64 20 22 20 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 29 29 0a 20 20	at."%d.".current-prefix-arg))...
91c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 3d 20 28 63 61 72 20 63 75 72 72 65 6e 74 2d 70	..............((=.(car.current-p
91e0	72 65 66 69 78 2d 61 72 67 29 20 34 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22	refix-arg).4).................."
9200	43 2d 75 20 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 0a 20 20 20 20 20 20	C-u.").................(t.......
9220	20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 64 20 22 20 28 63 61 72 20 63 75	...........(format."%d.".(car.cu
9240	72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 22	rrent-prefix-arg))))..........."
9260	4d 2d 78 20 22 29 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 4d 2d 78 2d 68 69 73	M-x."))..(defvar.counsel-M-x-his
9280	74 6f 72 79 20 6e 69 6c 0a 20 20 22 48 69 73 74 6f 72 79 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c	tory.nil..."History.for.`counsel
92a0	2d 4d 2d 78 27 2e 22 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 4d 2d 78 2d 61 63 74	-M-x'.")..(defun.counsel-M-x-act
92c0	69 6f 6e 20 28 63 6d 64 29 0a 20 20 22 45 78 65 63 75 74 65 20 43 4d 44 2e 22 0a 20 20 28 73 65	ion.(cmd)..."Execute.CMD."...(se
92e0	74 71 20 63 6d 64 20 28 69 6e 74 65 72 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 75 62	tq.cmd.(intern..............(sub
9300	73 74 2d 63 68 61 72 2d 69 6e 2d 73 74 72 69 6e 67 20 3f 5c 73 20 3f 2d 20 28 73 74 72 69 6e 67	st-char-in-string.?\s.?-.(string
9320	2d 72 65 6d 6f 76 65 2d 70 72 65 66 69 78 20 22 5e 22 20 63 6d 64 29 29 29 29 0a 20 20 28 63 6f	-remove-prefix."^".cmd))))...(co
9340	6e 64 20 28 28 62 6f 75 6e 64 2d 61 6e 64 2d 74 72 75 65 2d 70 20 61 6d 78 2d 69 6e 69 74 69 61	nd.((bound-and-true-p.amx-initia
9360	6c 69 7a 65 64 29 0a 20 20 20 20 20 20 20 20 20 28 61 6d 78 2d 72 61 6e 6b 20 63 6d 64 29 29 0a	lized)..........(amx-rank.cmd)).
9380	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 73 6d 65 78 2d	........((bound-and-true-p.smex-
93a0	69 6e 69 74 69 61 6c 69 7a 65 64 2d 70 29 0a 20 20 20 20 20 20 20 20 20 28 73 6d 65 78 2d 72 61	initialized-p)..........(smex-ra
93c0	6e 6b 20 63 6d 64 29 29 29 0a 20 20 28 73 65 74 71 20 70 72 65 66 69 78 2d 61 72 67 20 63 75 72	nk.cmd)))...(setq.prefix-arg.cur
93e0	72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 29 0a 20 20 28 73 65 74 71 20 74 68 69 73 2d 63 6f	rent-prefix-arg)...(setq.this-co
9400	6d 6d 61 6e 64 20 63 6d 64 29 0a 20 20 28 73 65 74 71 20 72 65 61 6c 2d 74 68 69 73 2d 63 6f 6d	mmand.cmd)...(setq.real-this-com
9420	6d 61 6e 64 20 63 6d 64 29 0a 20 20 28 63 6f 6d 6d 61 6e 64 2d 65 78 65 63 75 74 65 20 63 6d 64	mand.cmd)...(command-execute.cmd
9440	20 27 72 65 63 6f 72 64 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75	.'record))..;;;###autoload.(defu
9460	6e 20 63 6f 75 6e 73 65 6c 2d 4d 2d 78 20 28 26 6f 70 74 69 6f 6e 61 6c 20 69 6e 69 74 69 61 6c	n.counsel-M-x.(&optional.initial
9480	2d 69 6e 70 75 74 29 0a 20 20 22 49 76 79 20 76 65 72 73 69 6f 6e 20 6f 66 20 60 65 78 65 63 75	-input)..."Ivy.version.of.`execu
94a0	74 65 2d 65 78 74 65 6e 64 65 64 2d 63 6f 6d 6d 61 6e 64 27 2e 0a 4f 70 74 69 6f 6e 61 6c 20 49	te-extended-command'..Optional.I
94c0	4e 49 54 49 41 4c 2d 49 4e 50 55 54 20 69 73 20 74 68 65 20 69 6e 69 74 69 61 6c 20 69 6e 70 75	NITIAL-INPUT.is.the.initial.inpu
94e0	74 20 69 6e 20 74 68 65 20 6d 69 6e 69 62 75 66 66 65 72 2e 0a 54 68 69 73 20 66 75 6e 63 74 69	t.in.the.minibuffer..This.functi
9500	6f 6e 20 69 6e 74 65 67 72 61 74 65 73 20 77 69 74 68 20 65 69 74 68 65 72 20 74 68 65 20 60 61	on.integrates.with.either.the.`a
9520	6d 78 27 20 6f 72 20 60 73 6d 65 78 27 20 70 61 63 6b 61 67 65 0a 77 68 65 6e 20 61 76 61 69 6c	mx'.or.`smex'.package.when.avail
9540	61 62 6c 65 2c 20 69 6e 20 74 68 61 74 20 6f 72 64 65 72 20 6f 66 20 70 72 65 63 65 64 65 6e 63	able,.in.that.order.of.precedenc
9560	65 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 3b 3b 20 57 68 65 6e 20 60 63	e."...(interactive)...;;.When.`c
9580	6f 75 6e 73 65 6c 2d 4d 2d 78 27 20 72 65 74 75 72 6e 73 2c 20 60 6c 61 73 74 2d 63 6f 6d 6d 61	ounsel-M-x'.returns,.`last-comma
95a0	6e 64 27 20 77 6f 75 6c 64 20 62 65 20 73 65 74 20 74 6f 0a 20 20 3b 3b 20 60 63 6f 75 6e 73 65	nd'.would.be.set.to...;;.`counse
95c0	6c 2d 4d 2d 78 27 20 62 65 63 61 75 73 65 20 3a 61 63 74 69 6f 6e 20 68 61 73 6e 27 74 20 62 65	l-M-x'.because.:action.hasn't.be
95e0	65 6e 20 69 6e 76 6f 6b 65 64 20 79 65 74 2e 0a 20 20 3b 3b 20 49 6e 73 74 65 61 64 2c 20 70 72	en.invoked.yet....;;.Instead,.pr
9600	65 73 65 72 76 65 20 74 68 65 20 6f 6c 64 20 76 61 6c 75 65 20 6f 66 20 60 74 68 69 73 2d 63 6f	eserve.the.old.value.of.`this-co
9620	6d 6d 61 6e 64 27 2e 0a 20 20 28 73 65 74 71 20 74 68 69 73 2d 63 6f 6d 6d 61 6e 64 20 6c 61 73	mmand'....(setq.this-command.las
9640	74 2d 63 6f 6d 6d 61 6e 64 29 0a 20 20 28 73 65 74 71 20 72 65 61 6c 2d 74 68 69 73 2d 63 6f 6d	t-command)...(setq.real-this-com
9660	6d 61 6e 64 20 72 65 61 6c 2d 6c 61 73 74 2d 63 6f 6d 6d 61 6e 64 29 0a 20 20 28 6c 65 74 20 28	mand.real-last-command)...(let.(
9680	28 65 78 74 65 72 6e 73 20 28 63 6f 75 6e 73 65 6c 2d 2d 4d 2d 78 2d 65 78 74 65 72 6e 73 29 29	(externs.(counsel--M-x-externs))
96a0	29 0a 20 20 20 20 28 69 76 79 2d 72 65 61 64 20 28 63 6f 75 6e 73 65 6c 2d 2d 4d 2d 78 2d 70 72	).....(ivy-read.(counsel--M-x-pr
96c0	6f 6d 70 74 29 20 28 6f 72 20 65 78 74 65 72 6e 73 20 6f 62 61 72 72 61 79 29 0a 20 20 20 20 20	ompt).(or.externs.obarray)......
96e0	20 20 20 20 20 20 20 20 20 3a 70 72 65 64 69 63 61 74 65 20 28 69 66 20 65 78 74 65 72 6e 73 0a	.........:predicate.(if.externs.
9700	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 63	.............................#'c
9720	6f 75 6e 73 65 6c 2d 2d 4d 2d 78 2d 65 78 74 65 72 6e 73 2d 70 72 65 64 69 63 61 74 65 0a 20 20	ounsel--M-x-externs-predicate...
9740	20 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 73 65	.........................(counse
9760	6c 2d 2d 4d 2d 78 2d 6d 61 6b 65 2d 70 72 65 64 69 63 61 74 65 29 29 0a 20 20 20 20 20 20 20 20	l--M-x-make-predicate)).........
9780	20 20 20 20 20 20 3a 72 65 71 75 69 72 65 2d 6d 61 74 63 68 20 74 0a 20 20 20 20 20 20 20 20 20	......:require-match.t..........
97a0	20 20 20 20 20 3a 68 69 73 74 6f 72 79 20 27 63 6f 75 6e 73 65 6c 2d 4d 2d 78 2d 68 69 73 74 6f	.....:history.'counsel-M-x-histo
97c0	72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 23 27 63 6f 75 6e 73	ry...............:action.#'couns
97e0	65 6c 2d 4d 2d 78 2d 61 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6b 65 79	el-M-x-action...............:key
9800	6d 61 70 20 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 6d 61 70 0a 20 20 20 20 20 20 20	map.counsel-describe-map........
9820	20 20 20 20 20 20 20 3a 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20 69 6e 69 74 69 61 6c 2d 69 6e	.......:initial-input.initial-in
9840	70 75 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73	put...............:caller.'couns
9860	65 6c 2d 4d 2d 78 29 29 29 0a 0a 28 69 76 79 2d 63 6f 6e 66 69 67 75 72 65 20 27 63 6f 75 6e 73	el-M-x)))..(ivy-configure.'couns
9880	65 6c 2d 4d 2d 78 0a 20 20 3a 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20 22 5e 22 0a 20 20 3a 64	el-M-x...:initial-input."^"...:d
98a0	69 73 70 6c 61 79 2d 74 72 61 6e 73 66 6f 72 6d 65 72 2d 66 6e 20 23 27 63 6f 75 6e 73 65 6c 2d	isplay-transformer-fn.#'counsel-
98c0	4d 2d 78 2d 74 72 61 6e 73 66 6f 72 6d 65 72 29 0a 0a 28 69 76 79 2d 73 65 74 2d 61 63 74 69 6f	M-x-transformer)..(ivy-set-actio
98e0	6e 73 0a 20 27 63 6f 75 6e 73 65 6c 2d 4d 2d 78 0a 20 60 28 28 22 64 22 20 2c 23 27 63 6f 75 6e	ns..'counsel-M-x..`(("d".,#'coun
9900	73 65 6c 2d 2d 66 69 6e 64 2d 73 79 6d 62 6f 6c 20 22 64 65 66 69 6e 69 74 69 6f 6e 22 29 0a 20	sel--find-symbol."definition")..
9920	20 20 28 22 68 22 20 2c 23 27 63 6f 75 6e 73 65 6c 2d 2d 64 65 73 63 72 69 62 65 2d 66 75 6e 63	..("h".,#'counsel--describe-func
9940	74 69 6f 6e 20 22 68 65 6c 70 22 29 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 63 6f	tion."help")))..;;;;.`counsel-co
9960	6d 6d 61 6e 64 2d 68 69 73 74 6f 72 79 27 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 63	mmand-history'..(defun.counsel-c
9980	6f 6d 6d 61 6e 64 2d 68 69 73 74 6f 72 79 2d 61 63 74 69 6f 6e 2d 65 76 61 6c 20 28 63 6d 64 29	ommand-history-action-eval.(cmd)
99a0	0a 20 20 22 45 76 61 6c 20 74 68 65 20 63 6f 6d 6d 61 6e 64 20 43 4d 44 2e 22 0a 20 20 28 65 76	..."Eval.the.command.CMD."...(ev
99c0	61 6c 20 28 72 65 61 64 20 63 6d 64 29 20 74 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65	al.(read.cmd).t))..(defun.counse
99e0	6c 2d 63 6f 6d 6d 61 6e 64 2d 68 69 73 74 6f 72 79 2d 61 63 74 69 6f 6e 2d 65 64 69 74 2d 61 6e	l-command-history-action-edit-an
9a00	64 2d 65 76 61 6c 20 28 63 6d 64 29 0a 20 20 22 45 64 69 74 20 61 6e 64 20 65 76 61 6c 20 74 68	d-eval.(cmd)..."Edit.and.eval.th
9a20	65 20 63 6f 6d 6d 61 6e 64 20 43 4d 44 2e 22 0a 20 20 28 65 64 69 74 2d 61 6e 64 2d 65 76 61 6c	e.command.CMD."...(edit-and-eval
9a40	2d 63 6f 6d 6d 61 6e 64 20 22 45 76 61 6c 3a 20 22 20 28 72 65 61 64 20 63 6d 64 29 29 29 0a 0a	-command."Eval:.".(read.cmd)))..
9a60	28 69 76 79 2d 73 65 74 2d 61 63 74 69 6f 6e 73 0a 20 27 63 6f 75 6e 73 65 6c 2d 63 6f 6d 6d 61	(ivy-set-actions..'counsel-comma
9a80	6e 64 2d 68 69 73 74 6f 72 79 0a 20 27 28 28 22 72 22 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 6d 61	nd-history..'(("r".counsel-comma
9aa0	6e 64 2d 68 69 73 74 6f 72 79 2d 61 63 74 69 6f 6e 2d 65 76 61 6c 20 20 20 20 20 20 20 20 20 20	nd-history-action-eval..........
9ac0	20 22 65 76 61 6c 20 63 6f 6d 6d 61 6e 64 22 29 0a 20 20 20 28 22 65 22 20 63 6f 75 6e 73 65 6c	."eval.command")....("e".counsel
9ae0	2d 63 6f 6d 6d 61 6e 64 2d 68 69 73 74 6f 72 79 2d 61 63 74 69 6f 6e 2d 65 64 69 74 2d 61 6e 64	-command-history-action-edit-and
9b00	2d 65 76 61 6c 20 20 22 65 64 69 74 20 61 6e 64 20 65 76 61 6c 20 63 6f 6d 6d 61 6e 64 22 29 29	-eval.."edit.and.eval.command"))
9b20	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 63 6f 75 6e 73 65 6c	)..;;;###autoload.(defun.counsel
9b40	2d 63 6f 6d 6d 61 6e 64 2d 68 69 73 74 6f 72 79 20 28 29 0a 20 20 22 53 68 6f 77 20 74 68 65 20	-command-history.()..."Show.the.
9b60	68 69 73 74 6f 72 79 20 6f 66 20 63 6f 6d 6d 61 6e 64 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 63	history.of.commands."...(interac
9b80	74 69 76 65 29 0a 20 20 28 69 76 79 2d 72 65 61 64 20 22 43 6f 6d 6d 61 6e 64 3a 20 22 20 28 6d	tive)...(ivy-read."Command:.".(m
9ba0	61 70 63 61 72 20 23 27 70 72 69 6e 31 2d 74 6f 2d 73 74 72 69 6e 67 20 63 6f 6d 6d 61 6e 64 2d	apcar.#'prin1-to-string.command-
9bc0	68 69 73 74 6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 71 75 69 72 65 2d 6d 61	history).............:require-ma
9be0	74 63 68 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 23 27 63 6f 75 6e	tch.t.............:action.#'coun
9c00	73 65 6c 2d 63 6f 6d 6d 61 6e 64 2d 68 69 73 74 6f 72 79 2d 61 63 74 69 6f 6e 2d 65 76 61 6c 0a	sel-command-history-action-eval.
9c20	20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 63 6f 6d	............:caller.'counsel-com
9c40	6d 61 6e 64 2d 68 69 73 74 6f 72 79 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 6c 6f	mand-history))..;;;;.`counsel-lo
9c60	61 64 2d 6c 69 62 72 61 72 79 27 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6c 69 62 72	ad-library'..(defun.counsel-libr
9c80	61 72 79 2d 63 61 6e 64 69 64 61 74 65 73 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 6c 69	ary-candidates.()..."Return.a.li
9ca0	73 74 20 6f 66 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 63 61 6e 64 69 64 61 74 65 73 20 66 6f 72 20	st.of.completion.candidates.for.
9cc0	60 63 6f 75 6e 73 65 6c 2d 6c 6f 61 64 2d 6c 69 62 72 61 72 79 27 2e 22 0a 20 20 28 6c 65 74 20	`counsel-load-library'."...(let.
9ce0	28 28 73 75 66 66 69 78 20 28 63 6f 6e 63 61 74 20 28 72 65 67 65 78 70 2d 6f 70 74 20 27 28 22	((suffix.(concat.(regexp-opt.'("
9d00	2e 65 6c 22 20 22 2e 65 6c 2e 67 7a 22 29 20 74 29 20 22 5c 5c 27 22 29 29 0a 20 20 20 20 20 20	.el".".el.gz").t)."\\'")).......
9d20	20 20 28 63 61 6e 64 73 20 28 6d 61 6b 65 2d 68 61 73 68 2d 74 61 62 6c 65 20 3a 74 65 73 74 20	..(cands.(make-hash-table.:test.
9d40	23 27 65 71 75 61 6c 29 29 0a 20 20 20 20 20 20 20 20 73 68 6f 72 74 2d 6e 61 6d 65 0a 20 20 20	#'equal)).........short-name....
9d60	20 20 20 20 20 6f 6c 64 2d 76 61 6c 0a 20 20 20 20 20 20 20 20 64 69 72 2d 70 61 72 65 6e 74 0a	.....old-val.........dir-parent.
9d80	20 20 20 20 20 20 20 20 72 65 73 29 0a 20 20 20 20 28 64 6f 6c 69 73 74 20 28 64 69 72 20 6c 6f	........res).....(dolist.(dir.lo
9da0	61 64 2d 70 61 74 68 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 64 69 72 20 28 6f 72 20 64 69 72	ad-path).......(setq.dir.(or.dir
9dc0	20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 29 20 3b 3b 20 69 6e 74 65 72 70 72 65	.default-directory)).;;.interpre
9de0	74 20 6e 69 6c 20 69 6e 20 6c 6f 61 64 2d 70 61 74 68 20 61 73 20 64 65 66 61 75 6c 74 2d 64 69	t.nil.in.load-path.as.default-di
9e00	72 65 63 74 6f 72 79 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 66 69 6c 65 2d 64 69 72 65 63 74	rectory.......(when.(file-direct
9e20	6f 72 79 2d 70 20 64 69 72 29 0a 20 20 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 66 69 6c 65	ory-p.dir).........(dolist.(file
9e40	20 28 66 69 6c 65 2d 6e 61 6d 65 2d 61 6c 6c 2d 63 6f 6d 70 6c 65 74 69 6f 6e 73 20 22 22 20 64	.(file-name-all-completions."".d
9e60	69 72 29 29 0a 20 20 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	ir))...........(when.(string-mat
9e80	63 68 20 73 75 66 66 69 78 20 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c	ch.suffix.file).............(unl
9ea0	65 73 73 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 70 6b 67 2e 65 6c 63 3f 24 22 20 66 69	ess.(string-match."pkg.elc?$".fi
9ec0	6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 73 68 6f 72 74 2d 6e 61	le)...............(setq.short-na
9ee0	6d 65 20 28 73 75 62 73 74 72 69 6e 67 20 66 69 6c 65 20 30 20 28 6d 61 74 63 68 2d 62 65 67 69	me.(substring.file.0.(match-begi
9f00	6e 6e 69 6e 67 20 30 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 73 65	nning.0)))...............(if.(se
9f20	74 71 20 6f 6c 64 2d 76 61 6c 20 28 67 65 74 68 61 73 68 20 73 68 6f 72 74 2d 6e 61 6d 65 20 63	tq.old-val.(gethash.short-name.c
9f40	61 6e 64 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a	ands))...................(progn.
9f60	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 61 73 73 75 6d 65 20 67 6f	....................;;.assume.go
9f80	69 6e 67 20 75 70 20 64 69 72 65 63 74 6f 72 79 20 6f 6e 63 65 20 77 69 6c 6c 20 72 65 73 6f 6c	ing.up.directory.once.will.resol
9fa0	76 65 20 6e 61 6d 65 20 63 6c 61 73 68 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ve.name.clash...................
9fc0	20 20 28 73 65 74 71 20 64 69 72 2d 70 61 72 65 6e 74 20 28 63 6f 75 6e 73 65 6c 2d 64 69 72 65	..(setq.dir-parent.(counsel-dire
9fe0	63 74 6f 72 79 2d 6e 61 6d 65 20 28 63 64 72 20 6f 6c 64 2d 76 61 6c 29 29 29 0a 20 20 20 20 20	ctory-name.(cdr.old-val)))......
a000	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 74 68 61 73 68 20 73 68 6f 72 74 2d 6e 61	...............(puthash.short-na
a020	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 20	me..............................
a040	28 63 6f 6e 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	(cons...........................
a060	20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 73 74 72 69 6e 67 2d 63 6f 6d 70 6f 73 65 20 64 69 72 2d	....(counsel-string-compose.dir-
a080	70 61 72 65 6e 74 20 28 63 61 72 20 6f 6c 64 2d 76 61 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20	parent.(car.old-val))...........
a0a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 64 72 20 6f 6c 64 2d 76 61 6c	....................(cdr.old-val
a0c0	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 20	))..............................
a0e0	63 61 6e 64 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71	cands).....................(setq
a100	20 64 69 72 2d 70 61 72 65 6e 74 20 28 63 6f 75 6e 73 65 6c 2d 64 69 72 65 63 74 6f 72 79 2d 6e	.dir-parent.(counsel-directory-n
a120	61 6d 65 20 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70	ame.dir)).....................(p
a140	75 74 68 61 73 68 20 28 63 6f 6e 63 61 74 20 64 69 72 2d 70 61 72 65 6e 74 20 73 68 6f 72 74 2d	uthash.(concat.dir-parent.short-
a160	6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	name)...........................
a180	20 20 20 28 63 6f 6e 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	...(cons........................
a1a0	20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	.......(propertize..............
a1c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 73 74 72 69 6e	..................(counsel-strin
a1e0	67 2d 63 6f 6d 70 6f 73 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	g-compose.......................
a200	20 20 20 20 20 20 20 20 20 20 64 69 72 2d 70 61 72 65 6e 74 20 73 68 6f 72 74 2d 6e 61 6d 65 29	..........dir-parent.short-name)
a220	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	................................
a240	27 66 75 6c 6c 2d 6e 61 6d 65 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 66 69 6c	'full-name.(expand-file-name.fil
a260	65 20 64 69 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	e.dir)).........................
a280	20 20 20 20 20 20 64 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	......dir)......................
a2a0	20 20 20 20 20 20 20 20 63 61 6e 64 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	........cands)).................
a2c0	28 70 75 74 68 61 73 68 20 73 68 6f 72 74 2d 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20	(puthash.short-name.............
a2e0	20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 28 70 72 6f 70 65 72 74 69 7a 65 0a 20	.............(cons.(propertize..
a300	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73	...............................s
a320	68 6f 72 74 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 20	hort-name.......................
a340	20 20 20 20 20 20 20 20 20 20 27 66 75 6c 6c 2d 6e 61 6d 65 20 28 65 78 70 61 6e 64 2d 66 69 6c	..........'full-name.(expand-fil
a360	65 2d 6e 61 6d 65 20 66 69 6c 65 20 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	e-name.file.dir))...............
a380	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 29 0a 20 20 20 20 20 20 20 20 20 20	.................dir)...........
a3a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 61 6e 64 73 29 29 29 29 29 29 29 0a 20 20 20 20	...............cands))))))).....
a3c0	28 6d 61 70 68 61 73 68 20 28 6c 61 6d 62 64 61 20 28 5f 6b 20 76 29 20 28 70 75 73 68 20 28 63	(maphash.(lambda.(_k.v).(push.(c
a3e0	61 72 20 76 29 20 72 65 73 29 29 20 63 61 6e 64 73 29 0a 20 20 20 20 28 6e 72 65 76 65 72 73 65	ar.v).res)).cands).....(nreverse
a400	20 72 65 73 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 63	.res)))..;;;###autoload.(defun.c
a420	6f 75 6e 73 65 6c 2d 6c 6f 61 64 2d 6c 69 62 72 61 72 79 20 28 29 0a 20 20 22 4c 6f 61 64 20 61	ounsel-load-library.()..."Load.a
a440	20 73 65 6c 65 63 74 65 64 20 74 68 65 20 45 6d 61 63 73 20 4c 69 73 70 20 6c 69 62 72 61 72 79	.selected.the.Emacs.Lisp.library
a460	2e 0a 54 68 65 20 6c 69 62 72 61 72 69 65 73 20 61 72 65 20 6f 66 66 65 72 65 64 20 66 72 6f 6d	..The.libraries.are.offered.from
a480	20 60 6c 6f 61 64 2d 70 61 74 68 27 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20	.`load-path'."...(interactive)..
a4a0	20 28 6c 65 74 20 28 28 63 61 6e 64 73 20 28 63 6f 75 6e 73 65 6c 2d 6c 69 62 72 61 72 79 2d 63	.(let.((cands.(counsel-library-c
a4c0	61 6e 64 69 64 61 74 65 73 29 29 29 0a 20 20 20 20 28 69 76 79 2d 72 65 61 64 20 22 4c 6f 61 64	andidates))).....(ivy-read."Load
a4e0	20 6c 69 62 72 61 72 79 3a 20 22 20 63 61 6e 64 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.library:.".cands...............
a500	3a 61 63 74 69 6f 6e 20 28 6c 61 6d 62 64 61 20 28 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	:action.(lambda.(x).............
a520	20 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 61 64 2d 6c 69 62 72 61 72 79 0a 20 20 20 20 20 20	............(load-library.......
a540	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f	...................(get-text-pro
a560	70 65 72 74 79 20 30 20 27 66 75 6c 6c 2d 6e 61 6d 65 20 78 29 29 29 0a 20 20 20 20 20 20 20 20	perty.0.'full-name.x))).........
a580	20 20 20 20 20 20 3a 6b 65 79 6d 61 70 20 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 6d	......:keymap.counsel-describe-m
a5a0	61 70 29 29 29 0a 0a 28 69 76 79 2d 73 65 74 2d 61 63 74 69 6f 6e 73 0a 20 27 63 6f 75 6e 73 65	ap)))..(ivy-set-actions..'counse
a5c0	6c 2d 6c 6f 61 64 2d 6c 69 62 72 61 72 79 0a 20 60 28 28 22 64 22 20 2c 23 27 63 6f 75 6e 73 65	l-load-library..`(("d".,#'counse
a5e0	6c 2d 2d 66 69 6e 64 2d 73 79 6d 62 6f 6c 20 22 64 65 66 69 6e 69 74 69 6f 6e 22 29 29 29 0a 0a	l--find-symbol."definition")))..
a600	3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 6c 69 62 72 61 72 79 27 0a 0a 28 64 65	;;;;.`counsel-find-library'..(de
a620	63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 66 69 6e 64 2d 6c 69 62 72 61 72 79 2d 6e 61 6d 65	clare-function.find-library-name
a640	20 22 66 69 6e 64 2d 66 75 6e 63 22 29 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 66 69 6e	."find-func").(defun.counsel-fin
a660	64 2d 6c 69 62 72 61 72 79 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 20 28 6c 69 62 72 61 72 79 29	d-library-other-window.(library)
a680	0a 20 20 28 6c 65 74 20 28 28 62 75 66 20 28 66 69 6e 64 2d 66 69 6c 65 2d 6e 6f 73 65 6c 65 63	...(let.((buf.(find-file-noselec
a6a0	74 20 28 66 69 6e 64 2d 6c 69 62 72 61 72 79 2d 6e 61 6d 65 20 6c 69 62 72 61 72 79 29 29 29 29	t.(find-library-name.library))))
a6c0	0a 20 20 20 20 28 70 6f 70 2d 74 6f 2d 62 75 66 66 65 72 20 62 75 66 20 27 6f 74 68 65 72 2d 77	.....(pop-to-buffer.buf.'other-w
a6e0	69 6e 64 6f 77 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 6c 69	indow)))..(defun.counsel-find-li
a700	62 72 61 72 79 2d 6f 74 68 65 72 2d 66 72 61 6d 65 20 28 6c 69 62 72 61 72 79 29 0a 20 20 28 6c	brary-other-frame.(library)...(l
a720	65 74 20 28 28 62 75 66 20 28 66 69 6e 64 2d 66 69 6c 65 2d 6e 6f 73 65 6c 65 63 74 20 28 66 69	et.((buf.(find-file-noselect.(fi
a740	6e 64 2d 6c 69 62 72 61 72 79 2d 6e 61 6d 65 20 6c 69 62 72 61 72 79 29 29 29 29 0a 20 20 20 20	nd-library-name.library)))).....
a760	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 28 73 77 69	(condition-case.nil.........(swi
a780	74 63 68 2d 74 6f 2d 62 75 66 66 65 72 2d 6f 74 68 65 72 2d 66 72 61 6d 65 20 62 75 66 29 0a 20	tch-to-buffer-other-frame.buf)..
a7a0	20 20 20 20 20 28 65 72 72 6f 72 20 28 70 6f 70 2d 74 6f 2d 62 75 66 66 65 72 20 62 75 66 29 29	.....(error.(pop-to-buffer.buf))
a7c0	29 29 29 0a 0a 28 69 76 79 2d 73 65 74 2d 61 63 74 69 6f 6e 73 0a 20 27 63 6f 75 6e 73 65 6c 2d	)))..(ivy-set-actions..'counsel-
a7e0	66 69 6e 64 2d 6c 69 62 72 61 72 79 0a 20 27 28 28 22 6a 22 20 63 6f 75 6e 73 65 6c 2d 66 69 6e	find-library..'(("j".counsel-fin
a800	64 2d 6c 69 62 72 61 72 79 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 20 22 6f 74 68 65 72 20 77 69	d-library-other-window."other.wi
a820	6e 64 6f 77 22 29 0a 20 20 20 28 22 66 22 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 6c 69 62 72	ndow")....("f".counsel-find-libr
a840	61 72 79 2d 6f 74 68 65 72 2d 66 72 61 6d 65 20 22 6f 74 68 65 72 20 66 72 61 6d 65 22 29 29 29	ary-other-frame."other.frame")))
a860	0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d	..;;;###autoload.(defun.counsel-
a880	66 69 6e 64 2d 6c 69 62 72 61 72 79 20 28 29 0a 20 20 22 56 69 73 69 74 20 61 20 73 65 6c 65 63	find-library.()..."Visit.a.selec
a8a0	74 65 64 20 74 68 65 20 45 6d 61 63 73 20 4c 69 73 70 20 6c 69 62 72 61 72 79 2e 0a 54 68 65 20	ted.the.Emacs.Lisp.library..The.
a8c0	6c 69 62 72 61 72 69 65 73 20 61 72 65 20 6f 66 66 65 72 65 64 20 66 72 6f 6d 20 60 6c 6f 61 64	libraries.are.offered.from.`load
a8e0	2d 70 61 74 68 27 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	-path'."...(interactive)...(let.
a900	28 28 63 61 6e 64 73 20 28 63 6f 75 6e 73 65 6c 2d 6c 69 62 72 61 72 79 2d 63 61 6e 64 69 64 61	((cands.(counsel-library-candida
a920	74 65 73 29 29 29 0a 20 20 20 20 28 69 76 79 2d 72 65 61 64 20 22 46 69 6e 64 20 6c 69 62 72 61	tes))).....(ivy-read."Find.libra
a940	72 79 3a 20 22 20 63 61 6e 64 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f	ry:.".cands...............:actio
a960	6e 20 23 27 63 6f 75 6e 73 65 6c 2d 2d 66 69 6e 64 2d 73 79 6d 62 6f 6c 0a 20 20 20 20 20 20 20	n.#'counsel--find-symbol........
a980	20 20 20 20 20 20 20 3a 6b 65 79 6d 61 70 20 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d	.......:keymap.counsel-describe-
a9a0	6d 61 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73	map...............:caller.'couns
a9c0	65 6c 2d 66 69 6e 64 2d 6c 69 62 72 61 72 79 29 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65	el-find-library)))..;;;;.`counse
a9e0	6c 2d 6c 6f 61 64 2d 74 68 65 6d 65 27 0a 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e	l-load-theme'..(declare-function
aa00	20 70 6f 77 65 72 6c 69 6e 65 2d 72 65 73 65 74 20 22 65 78 74 3a 70 6f 77 65 72 6c 69 6e 65 22	.powerline-reset."ext:powerline"
aa20	29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6c 6f 61 64 2d 74 68 65 6d 65 2d 61 63 74	)..(defun.counsel-load-theme-act
aa40	69 6f 6e 20 28 78 29 0a 20 20 22 44 69 73 61 62 6c 65 20 63 75 72 72 65 6e 74 20 74 68 65 6d 65	ion.(x)..."Disable.current.theme
aa60	73 20 61 6e 64 20 6c 6f 61 64 20 74 68 65 6d 65 20 58 2e 22 0a 20 20 28 63 6f 6e 64 69 74 69 6f	s.and.load.theme.X."...(conditio
aa80	6e 2d 63 61 73 65 20 6e 69 6c 0a 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20	n-case.nil.......(progn.........
aaa0	28 6d 61 70 63 20 23 27 64 69 73 61 62 6c 65 2d 74 68 65 6d 65 20 63 75 73 74 6f 6d 2d 65 6e 61	(mapc.#'disable-theme.custom-ena
aac0	62 6c 65 64 2d 74 68 65 6d 65 73 29 0a 20 20 20 20 20 20 20 20 28 6c 6f 61 64 2d 74 68 65 6d 65	bled-themes).........(load-theme
aae0	20 28 69 6e 74 65 72 6e 20 78 29 20 74 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 66 62	.(intern.x).t).........(when.(fb
ab00	6f 75 6e 64 70 20 27 70 6f 77 65 72 6c 69 6e 65 2d 72 65 73 65 74 29 0a 20 20 20 20 20 20 20 20	oundp.'powerline-reset).........
ab20	20 20 28 70 6f 77 65 72 6c 69 6e 65 2d 72 65 73 65 74 29 29 29 0a 20 20 20 20 28 65 72 72 6f 72	..(powerline-reset))).....(error
ab40	20 22 50 72 6f 62 6c 65 6d 20 6c 6f 61 64 69 6e 67 20 74 68 65 6d 65 20 25 73 22 20 78 29 29 29	."Problem.loading.theme.%s".x)))
ab60	0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d	..;;;###autoload.(defun.counsel-
ab80	6c 6f 61 64 2d 74 68 65 6d 65 20 28 29 0a 20 20 22 46 6f 72 77 61 72 64 20 74 6f 20 60 6c 6f 61	load-theme.()..."Forward.to.`loa
aba0	64 2d 74 68 65 6d 65 27 2e 0a 55 73 61 62 6c 65 20 77 69 74 68 20 60 69 76 79 2d 72 65 73 75 6d	d-theme'..Usable.with.`ivy-resum
abc0	65 27 2c 20 60 69 76 79 2d 6e 65 78 74 2d 6c 69 6e 65 2d 61 6e 64 2d 63 61 6c 6c 27 20 61 6e 64	e',.`ivy-next-line-and-call'.and
abe0	0a 60 69 76 79 2d 70 72 65 76 69 6f 75 73 2d 6c 69 6e 65 2d 61 6e 64 2d 63 61 6c 6c 27 2e 22 0a	.`ivy-previous-line-and-call'.".
ac00	20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 69 76 79 2d 72 65 61 64 20 22 4c 6f 61	..(interactive)...(ivy-read."Loa
ac20	64 20 63 75 73 74 6f 6d 20 74 68 65 6d 65 3a 20 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6d	d.custom.theme:.".............(m
ac40	61 70 63 61 72 20 23 27 73 79 6d 62 6f 6c 2d 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20	apcar.#'symbol-name.............
ac60	20 20 20 20 20 20 20 20 28 63 75 73 74 6f 6d 2d 61 76 61 69 6c 61 62 6c 65 2d 74 68 65 6d 65 73	........(custom-available-themes
ac80	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 23 27 63 6f 75 6e 73 65 6c	)).............:action.#'counsel
aca0	2d 6c 6f 61 64 2d 74 68 65 6d 65 2d 61 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a	-load-theme-action.............:
acc0	63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 6c 6f 61 64 2d 74 68 65 6d 65 29 29 0a 0a 3b 3b	caller.'counsel-load-theme))..;;
ace0	3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 64 65 73 63 62 69 6e 64 73 27 0a 0a 28 69 76 79 2d 73 65 74	;;.`counsel-descbinds'..(ivy-set
ad00	2d 61 63 74 69 6f 6e 73 0a 20 27 63 6f 75 6e 73 65 6c 2d 64 65 73 63 62 69 6e 64 73 0a 20 27 28	-actions..'counsel-descbinds..'(
ad20	28 22 64 22 20 63 6f 75 6e 73 65 6c 2d 64 65 73 63 62 69 6e 64 73 2d 61 63 74 69 6f 6e 2d 66 69	("d".counsel-descbinds-action-fi
ad40	6e 64 20 22 64 65 66 69 6e 69 74 69 6f 6e 22 29 0a 20 20 20 28 22 49 22 20 63 6f 75 6e 73 65 6c	nd."definition")....("I".counsel
ad60	2d 64 65 73 63 62 69 6e 64 73 2d 61 63 74 69 6f 6e 2d 69 6e 66 6f 20 22 69 6e 66 6f 22 29 0a 20	-descbinds-action-info."info")..
ad80	20 20 28 22 78 22 20 63 6f 75 6e 73 65 6c 2d 64 65 73 63 62 69 6e 64 73 2d 61 63 74 69 6f 6e 2d	..("x".counsel-descbinds-action-
ada0	65 78 65 63 20 22 65 78 65 63 75 74 65 22 29 29 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73	exec."execute")))..(defvar.couns
adc0	65 6c 2d 64 65 73 63 62 69 6e 64 73 2d 68 69 73 74 6f 72 79 20 6e 69 6c 0a 20 20 22 48 69 73 74	el-descbinds-history.nil..."Hist
ade0	6f 72 79 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 64 65 73 63 62 69 6e 64 73 27 2e 22 29 0a 0a	ory.for.`counsel-descbinds'.")..
ae00	28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 64 65 73 63 62 69 6e 64 73 2d 63 61 6e 64 73 20	(defun.counsel--descbinds-cands.
ae20	28 26 6f 70 74 69 6f 6e 61 6c 20 70 72 65 66 69 78 20 62 75 66 66 65 72 29 0a 20 20 22 47 65 74	(&optional.prefix.buffer)..."Get
ae40	20 6b 65 79 20 62 69 6e 64 69 6e 67 73 20 73 74 61 72 74 69 6e 67 20 77 69 74 68 20 50 52 45 46	.key.bindings.starting.with.PREF
ae60	49 58 20 69 6e 20 42 55 46 46 45 52 2e 0a 53 65 65 20 60 64 65 73 63 72 69 62 65 2d 62 75 66 66	IX.in.BUFFER..See.`describe-buff
ae80	65 72 2d 62 69 6e 64 69 6e 67 73 27 20 66 6f 72 20 66 75 72 74 68 65 72 20 69 6e 66 6f 72 6d 61	er-bindings'.for.further.informa
aea0	74 69 6f 6e 2e 22 0a 20 20 28 6c 65 74 20 28 28 62 75 66 66 65 72 20 28 6f 72 20 62 75 66 66 65	tion."...(let.((buffer.(or.buffe
aec0	72 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 28 72 65	r.(current-buffer))).........(re
aee0	2d 65 78 63 6c 75 64 65 20 28 72 65 67 65 78 70 2d 6f 70 74 0a 20 20 20 20 20 20 20 20 20 20 20	-exclude.(regexp-opt............
af00	20 20 20 20 20 20 20 20 20 20 27 28 22 3c 76 65 72 74 69 63 61 6c 2d 6c 69 6e 65 3e 22 20 22 3c	..........'("<vertical-line>"."<
af20	62 6f 74 74 6f 6d 2d 64 69 76 69 64 65 72 3e 22 20 22 3c 72 69 67 68 74 2d 64 69 76 69 64 65 72	bottom-divider>"."<right-divider
af40	3e 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 22 3c 6d 6f 64 65	>"........................"<mode
af60	2d 6c 69 6e 65 3e 22 20 22 3c 43 2d 64 6f 77 6e 2d 6d 6f 75 73 65 2d 32 3e 22 20 22 3c 6c 65 66	-line>"."<C-down-mouse-2>"."<lef
af80	74 2d 66 72 69 6e 67 65 3e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	t-fringe>"......................
afa0	20 20 22 3c 72 69 67 68 74 2d 66 72 69 6e 67 65 3e 22 20 22 3c 68 65 61 64 65 72 2d 6c 69 6e 65	.."<right-fringe>"."<header-line
afc0	3e 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 22 3c 76 65 72 74	>"........................"<vert
afe0	69 63 61 6c 2d 73 63 72 6f 6c 6c 2d 62 61 72 3e 22 20 22 3c 68 6f 72 69 7a 6f 6e 74 61 6c 2d 73	ical-scroll-bar>"."<horizontal-s
b000	63 72 6f 6c 6c 2d 62 61 72 3e 22 29 29 29 0a 20 20 20 20 20 20 20 20 72 65 73 29 0a 20 20 20 20	croll-bar>"))).........res).....
b020	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 6c 65 74 20 28 28 69	(with-temp-buffer.......(let.((i
b040	6e 64 65 6e 74 2d 74 61 62 73 2d 6d 6f 64 65 20 74 29 29 0a 20 20 20 20 20 20 20 20 28 64 65 73	ndent-tabs-mode.t)).........(des
b060	63 72 69 62 65 2d 62 75 66 66 65 72 2d 62 69 6e 64 69 6e 67 73 20 62 75 66 66 65 72 20 70 72 65	cribe-buffer-bindings.buffer.pre
b080	66 69 78 29 29 0a 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69	fix)).......(goto-char.(point-mi
b0a0	6e 29 29 0a 20 20 20 20 20 20 3b 3b 20 53 6b 69 70 20 74 68 65 20 22 4b 65 79 20 74 72 61 6e 73	n)).......;;.Skip.the."Key.trans
b0c0	6c 61 74 69 6f 6e 73 22 20 73 65 63 74 69 6f 6e 0a 20 20 20 20 20 20 28 73 6b 69 70 2d 63 68 61	lations".section.......(skip-cha
b0e0	72 73 2d 66 6f 72 77 61 72 64 20 22 5e 5c 43 2d 6c 22 29 0a 20 20 20 20 20 20 28 66 6f 72 77 61	rs-forward."^\C-l").......(forwa
b100	72 64 2d 63 68 61 72 20 32 29 0a 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 6e 6f 74 20 28 65 6f	rd-char.2).......(while.(not.(eo
b120	62 70 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 20 22	bp)).........(when.(looking-at."
b140	5e 5c 5c 28 5b 5e 5c 74 5c 6e 5d 2b 5c 5c 29 5b 5c 74 20 5d 2a 5c 5c 28 2e 2a 5c 5c 29 24 22 29	^\\([^\t\n]+\\)[\t.]*\\(.*\\)$")
b160	0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 6b 65 79 20 28 6d 61 74 63 68 2d 73 74 72	...........(let.((key.(match-str
b180	69 6e 67 20 31 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 20 28 6d 61	ing.1)).................(fun.(ma
b1a0	74 63 68 2d 73 74 72 69 6e 67 20 32 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63	tch-string.2)).................c
b1c0	6d 64 29 0a 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 6d 65 6d	md).............(unless.(or.(mem
b1e0	62 65 72 20 66 75 6e 20 27 28 22 3f 3f 22 20 22 73 65 6c 66 2d 69 6e 73 65 72 74 2d 63 6f 6d 6d	ber.fun.'("??"."self-insert-comm
b200	61 6e 64 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 20 28	and")).........................(
b220	73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 72 65 2d 65 78 63 6c 75 64 65 20 6b 65 79 29 0a 20	string-match-p.re-exclude.key)..
b240	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 6f 72 20	.......................(not.(or.
b260	28 63 6f 6d 6d 61 6e 64 70 20 28 73 65 74 71 20 63 6d 64 20 28 69 6e 74 65 72 6e 2d 73 6f 66 74	(commandp.(setq.cmd.(intern-soft
b280	20 66 75 6e 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	.fun))).........................
b2a0	20 20 20 20 20 20 20 20 20 28 65 71 75 61 6c 20 66 75 6e 20 22 50 72 65 66 69 78 20 43 6f 6d 6d	.........(equal.fun."Prefix.Comm
b2c0	61 6e 64 22 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 0a 20 20 20	and"))))...............(push....
b2e0	20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 28 66 6f 72 6d 61 74 0a 20 20 20 20 20 20	............(cons.(format.......
b300	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 25 2d 31 35 73 20 25 73 22 0a 20 20 20 20 20	................"%-15s.%s"......
b320	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 6b 65 79	.................(propertize.key
b340	20 27 66 61 63 65 20 27 63 6f 75 6e 73 65 6c 2d 6b 65 79 2d 62 69 6e 64 69 6e 67 29 0a 20 20 20	.'face.'counsel-key-binding)....
b360	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 75 6e 29 0a 20 20 20 20 20 20 20 20	...................fun).........
b380	20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 6b 65 79 20 63 6d 64 29 29 0a 20 20 20	.............(cons.key.cmd))....
b3a0	20 20 20 20 20 20 20 20 20 20 20 20 72 65 73 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 66 6f 72	............res)))).........(for
b3c0	77 61 72 64 2d 6c 69 6e 65 29 29 29 0a 20 20 20 20 28 6e 72 65 76 65 72 73 65 20 72 65 73 29 29	ward-line))).....(nreverse.res))
b3e0	29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 64 65 73 63 62 69 6e 64 73 2d	)..(defcustom.counsel-descbinds-
b400	66 75 6e 63 74 69 6f 6e 20 23 27 64 65 73 63 72 69 62 65 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 22	function.#'describe-function..."
b420	46 75 6e 63 74 69 6f 6e 20 74 6f 20 63 61 6c 6c 20 74 6f 20 64 65 73 63 72 69 62 65 20 61 20 66	Function.to.call.to.describe.a.f
b440	75 6e 63 74 69 6f 6e 20 70 61 73 73 65 64 20 61 73 20 70 61 72 61 6d 65 74 65 72 2e 22 0a 20 20	unction.passed.as.parameter."...
b460	3a 74 79 70 65 20 27 66 75 6e 63 74 69 6f 6e 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c	:type.'function)..(defun.counsel
b480	2d 64 65 73 63 62 69 6e 64 73 2d 61 63 74 69 6f 6e 2d 64 65 73 63 72 69 62 65 20 28 78 29 0a 20	-descbinds-action-describe.(x)..
b4a0	20 22 44 65 73 63 72 69 62 65 20 66 75 6e 63 74 69 6f 6e 20 6f 66 20 63 61 6e 64 69 64 61 74 65	."Describe.function.of.candidate
b4c0	20 58 2e 0a 53 65 65 20 60 64 65 73 63 72 69 62 65 2d 66 75 6e 63 74 69 6f 6e 27 20 66 6f 72 20	.X..See.`describe-function'.for.
b4e0	66 75 72 74 68 65 72 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 2e 22 0a 20 20 28 6c 65 74 20 28 28 63	further.information."...(let.((c
b500	6d 64 20 28 63 64 64 72 20 78 29 29 29 0a 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 63 6f 75 6e 73	md.(cddr.x))).....(funcall.couns
b520	65 6c 2d 64 65 73 63 62 69 6e 64 73 2d 66 75 6e 63 74 69 6f 6e 20 63 6d 64 29 29 29 0a 0a 28 64	el-descbinds-function.cmd)))..(d
b540	65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 64 65 73 63 62 69 6e 64 73 2d 61 63 74 69 6f 6e 2d 65 78	efun.counsel-descbinds-action-ex
b560	65 63 20 28 78 29 0a 20 20 22 52 75 6e 20 63 61 6e 64 69 64 61 74 65 20 58 2e 0a 53 65 65 20 60	ec.(x)..."Run.candidate.X..See.`
b580	65 78 65 63 75 74 65 2d 65 78 74 65 6e 64 65 64 2d 63 6f 6d 6d 61 6e 64 27 20 66 6f 72 20 66 75	execute-extended-command'.for.fu
b5a0	72 74 68 65 72 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 2e 22 0a 20 20 28 6c 65 74 20 28 28 63 6d 64	rther.information."...(let.((cmd
b5c0	20 28 63 64 64 72 20 78 29 29 29 0a 20 20 20 20 28 63 6f 6d 6d 61 6e 64 2d 65 78 65 63 75 74 65	.(cddr.x))).....(command-execute
b5e0	20 63 6d 64 20 27 72 65 63 6f 72 64 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d	.cmd.'record)))..(defun.counsel-
b600	64 65 73 63 62 69 6e 64 73 2d 61 63 74 69 6f 6e 2d 66 69 6e 64 20 28 78 29 0a 20 20 22 46 69 6e	descbinds-action-find.(x)..."Fin
b620	64 20 73 79 6d 62 6f 6c 20 64 65 66 69 6e 69 74 69 6f 6e 20 6f 66 20 63 61 6e 64 69 64 61 74 65	d.symbol.definition.of.candidate
b640	20 58 2e 0a 53 65 65 20 60 63 6f 75 6e 73 65 6c 2d 2d 66 69 6e 64 2d 73 79 6d 62 6f 6c 27 20 66	.X..See.`counsel--find-symbol'.f
b660	6f 72 20 66 75 72 74 68 65 72 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 2e 22 0a 20 20 28 6c 65 74 20	or.further.information."...(let.
b680	28 28 63 6d 64 20 28 63 64 64 72 20 78 29 29 29 0a 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 66	((cmd.(cddr.x))).....(counsel--f
b6a0	69 6e 64 2d 73 79 6d 62 6f 6c 20 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 63 6d 64 29 29 29 29 0a	ind-symbol.(symbol-name.cmd)))).
b6c0	0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 64 65 73 63 62 69 6e 64 73 2d 61 63 74 69 6f 6e	.(defun.counsel-descbinds-action
b6e0	2d 69 6e 66 6f 20 28 78 29 0a 20 20 22 44 69 73 70 6c 61 79 20 73 79 6d 62 6f 6c 20 64 65 66 69	-info.(x)..."Display.symbol.defi
b700	6e 69 74 69 6f 6e 20 6f 66 20 63 61 6e 64 69 64 61 74 65 20 58 2c 20 61 73 20 66 6f 75 6e 64 20	nition.of.candidate.X,.as.found.
b720	69 6e 20 74 68 65 20 72 65 6c 65 76 61 6e 74 20 6d 61 6e 75 61 6c 2e 0a 53 65 65 20 60 69 6e 66	in.the.relevant.manual..See.`inf
b740	6f 2d 6c 6f 6f 6b 75 70 2d 73 79 6d 62 6f 6c 27 20 66 6f 72 20 66 75 72 74 68 65 72 20 69 6e 66	o-lookup-symbol'.for.further.inf
b760	6f 72 6d 61 74 69 6f 6e 2e 22 0a 20 20 28 6c 65 74 20 28 28 63 6d 64 20 28 63 64 64 72 20 78 29	ormation."...(let.((cmd.(cddr.x)
b780	29 29 0a 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 69 6e 66 6f 2d 6c 6f 6f 6b 75 70 2d 73 79 6d 62	)).....(counsel-info-lookup-symb
b7a0	6f 6c 20 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 63 6d 64 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61	ol.(symbol-name.cmd))))..;;;###a
b7c0	75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 64 65 73 63 62 69 6e 64 73	utoload.(defun.counsel-descbinds
b7e0	20 28 26 6f 70 74 69 6f 6e 61 6c 20 70 72 65 66 69 78 20 62 75 66 66 65 72 29 0a 20 20 22 53 68	.(&optional.prefix.buffer)..."Sh
b800	6f 77 20 61 20 6c 69 73 74 20 6f 66 20 61 6c 6c 20 64 65 66 69 6e 65 64 20 6b 65 79 73 20 61 6e	ow.a.list.of.all.defined.keys.an
b820	64 20 74 68 65 69 72 20 64 65 66 69 6e 69 74 69 6f 6e 73 2e 0a 49 66 20 6e 6f 6e 2d 6e 69 6c 2c	d.their.definitions..If.non-nil,
b840	20 73 68 6f 77 20 6f 6e 6c 79 20 62 69 6e 64 69 6e 67 73 20 74 68 61 74 20 73 74 61 72 74 20 77	.show.only.bindings.that.start.w
b860	69 74 68 20 50 52 45 46 49 58 2e 0a 42 55 46 46 45 52 20 64 65 66 61 75 6c 74 73 20 74 6f 20 74	ith.PREFIX..BUFFER.defaults.to.t
b880	68 65 20 63 75 72 72 65 6e 74 20 6f 6e 65 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29	he.current.one."...(interactive)
b8a0	0a 20 20 28 69 76 79 2d 72 65 61 64 20 22 42 69 6e 64 69 6e 67 73 3a 20 22 20 28 63 6f 75 6e 73	...(ivy-read."Bindings:.".(couns
b8c0	65 6c 2d 2d 64 65 73 63 62 69 6e 64 73 2d 63 61 6e 64 73 20 70 72 65 66 69 78 20 62 75 66 66 65	el--descbinds-cands.prefix.buffe
b8e0	72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 23 27 63 6f 75 6e 73 65 6c	r).............:action.#'counsel
b900	2d 64 65 73 63 62 69 6e 64 73 2d 61 63 74 69 6f 6e 2d 64 65 73 63 72 69 62 65 0a 20 20 20 20 20	-descbinds-action-describe......
b920	20 20 20 20 20 20 20 3a 68 69 73 74 6f 72 79 20 27 63 6f 75 6e 73 65 6c 2d 64 65 73 63 62 69 6e	.......:history.'counsel-descbin
b940	64 73 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27	ds-history.............:caller.'
b960	63 6f 75 6e 73 65 6c 2d 64 65 73 63 62 69 6e 64 73 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73	counsel-descbinds))..;;;;.`couns
b980	65 6c 2d 64 65 73 63 72 69 62 65 2d 66 61 63 65 27 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 6f	el-describe-face'..(defcustom.co
b9a0	75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 66 61 63 65 2d 66 75 6e 63 74 69 6f 6e 20 23 27 64	unsel-describe-face-function.#'d
b9c0	65 73 63 72 69 62 65 2d 66 61 63 65 0a 20 20 22 46 75 6e 63 74 69 6f 6e 20 74 6f 20 63 61 6c 6c	escribe-face..."Function.to.call
b9e0	20 74 6f 20 64 65 73 63 72 69 62 65 20 61 20 66 61 63 65 20 6f 72 20 66 61 63 65 20 6e 61 6d 65	.to.describe.a.face.or.face.name
ba00	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 74 69 6f 6e 29 0a 0a	.argument."...:type.'function)..
ba20	28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 66 61 63 65 2d 61 74 2d 70 6f 69 6e 74 20 28 29	(defun.counsel--face-at-point.()
ba40	0a 20 20 22 52 65 74 75 72 6e 20 6e 61 6d 65 20 6f 66 20 66 61 63 65 20 61 72 6f 75 6e 64 20 70	..."Return.name.of.face.around.p
ba60	6f 69 6e 74 2e 0a 54 72 79 20 64 65 74 65 63 74 69 6e 67 20 61 20 66 61 63 65 20 6e 61 6d 65 20	oint..Try.detecting.a.face.name.
ba80	69 6e 20 74 68 65 20 74 65 78 74 20 61 72 6f 75 6e 64 20 70 6f 69 6e 74 20 62 65 66 6f 72 65 20	in.the.text.around.point.before.
baa0	66 61 6c 6c 69 6e 67 0a 62 61 63 6b 20 74 6f 20 74 68 65 20 66 61 63 65 20 6f 66 20 74 68 65 20	falling.back.to.the.face.of.the.
bac0	63 68 61 72 61 63 74 65 72 20 61 66 74 65 72 20 70 6f 69 6e 74 2c 20 61 6e 64 20 66 69 6e 61 6c	character.after.point,.and.final
bae0	6c 79 20 74 68 65 0a 60 64 65 66 61 75 6c 74 27 20 66 61 63 65 2e 22 0a 20 20 28 73 79 6d 62 6f	ly.the.`default'.face."...(symbo
bb00	6c 2d 6e 61 6d 65 20 28 6f 72 20 28 66 61 63 65 2d 61 74 2d 70 6f 69 6e 74 20 74 29 20 27 64 65	l-name.(or.(face-at-point.t).'de
bb20	66 61 75 6c 74 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	fault)))..;;;###autoload.(defun.
bb40	63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 66 61 63 65 20 28 29 0a 20 20 22 43 6f 6d 70	counsel-describe-face.()..."Comp
bb60	6c 65 74 69 6f 6e 20 66 6f 72 20 60 64 65 73 63 72 69 62 65 2d 66 61 63 65 27 2e 22 0a 20 20 28	letion.for.`describe-face'."...(
bb80	69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 69 76 79 2d 72 65 61 64 20 22 46 61 63 65 3a 20	interactive)...(ivy-read."Face:.
bba0	22 20 28 66 61 63 65 2d 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 71 75 69	".(face-list).............:requi
bbc0	72 65 2d 6d 61 74 63 68 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 69 73 74 6f 72 79 20	re-match.t.............:history.
bbe0	27 66 61 63 65 2d 6e 61 6d 65 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a	'face-name-history.............:
bc00	70 72 65 73 65 6c 65 63 74 20 28 63 6f 75 6e 73 65 6c 2d 2d 66 61 63 65 2d 61 74 2d 70 6f 69 6e	preselect.(counsel--face-at-poin
bc20	74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 63 6f 75 6e 73 65 6c 2d 64	t).............:action.counsel-d
bc40	65 73 63 72 69 62 65 2d 66 61 63 65 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20	escribe-face-function...........
bc60	20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 66 61 63 65	..:caller.'counsel-describe-face
bc80	29 29 0a 0a 28 69 76 79 2d 63 6f 6e 66 69 67 75 72 65 20 27 63 6f 75 6e 73 65 6c 2d 64 65 73 63	))..(ivy-configure.'counsel-desc
bca0	72 69 62 65 2d 66 61 63 65 0a 20 20 3a 73 6f 72 74 2d 66 6e 20 23 27 69 76 79 2d 73 74 72 69 6e	ribe-face...:sort-fn.#'ivy-strin
bcc0	67 3c 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 63 75 73 74 6f 6d 69 7a 65 2d 66 61	g<)..(defun.counsel-customize-fa
bce0	63 65 20 28 6e 61 6d 65 29 0a 20 20 22 43 75 73 74 6f 6d 69 7a 65 20 66 61 63 65 20 77 69 74 68	ce.(name)..."Customize.face.with
bd00	20 4e 41 4d 45 2e 22 0a 20 20 28 63 75 73 74 6f 6d 69 7a 65 2d 66 61 63 65 20 28 69 6e 74 65 72	.NAME."...(customize-face.(inter
bd20	6e 20 6e 61 6d 65 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 63 75 73 74 6f 6d	n.name)))..(defun.counsel-custom
bd40	69 7a 65 2d 66 61 63 65 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 20 28 6e 61 6d 65 29 0a 20 20 22	ize-face-other-window.(name)..."
bd60	43 75 73 74 6f 6d 69 7a 65 20 66 61 63 65 20 77 69 74 68 20 4e 41 4d 45 20 69 6e 20 61 6e 6f 74	Customize.face.with.NAME.in.anot
bd80	68 65 72 20 77 69 6e 64 6f 77 2e 22 0a 20 20 28 63 75 73 74 6f 6d 69 7a 65 2d 66 61 63 65 2d 6f	her.window."...(customize-face-o
bda0	74 68 65 72 2d 77 69 6e 64 6f 77 20 28 69 6e 74 65 72 6e 20 6e 61 6d 65 29 29 29 0a 0a 28 64 65	ther-window.(intern.name)))..(de
bdc0	63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 68 69 2d 6c 6f 63 6b 2d 73 65 74 2d 70 61 74 74 65	clare-function.hi-lock-set-patte
bde0	72 6e 20 22 68 69 2d 6c 6f 63 6b 22 29 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 68 69 67	rn."hi-lock").(defun.counsel-hig
be00	68 6c 69 67 68 74 2d 77 69 74 68 2d 66 61 63 65 20 28 66 61 63 65 29 0a 20 20 22 48 69 67 68 6c	hlight-with-face.(face)..."Highl
be20	69 67 68 74 20 74 68 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 20 77 69 74 68 20 46 41 43 45 2e 22 0a	ight.thing-at-point.with.FACE.".
be40	20 20 28 68 69 2d 6c 6f 63 6b 2d 6d 6f 64 65 20 31 29 0a 20 20 28 6c 65 74 20 28 28 74 68 69 6e	..(hi-lock-mode.1)...(let.((thin
be60	67 20 28 69 76 79 2d 74 68 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 28 77 68	g.(ivy-thing-at-point))).....(wh
be80	65 6e 20 28 75 73 65 2d 72 65 67 69 6f 6e 2d 70 29 0a 20 20 20 20 20 20 28 64 65 61 63 74 69 76	en.(use-region-p).......(deactiv
bea0	61 74 65 2d 6d 61 72 6b 29 29 0a 20 20 20 20 28 68 69 2d 6c 6f 63 6b 2d 73 65 74 2d 70 61 74 74	ate-mark)).....(hi-lock-set-patt
bec0	65 72 6e 20 28 72 65 67 65 78 70 2d 71 75 6f 74 65 20 74 68 69 6e 67 29 20 28 69 6e 74 65 72 6e	ern.(regexp-quote.thing).(intern
bee0	20 66 61 63 65 29 29 29 29 0a 0a 28 69 76 79 2d 73 65 74 2d 61 63 74 69 6f 6e 73 0a 20 27 63 6f	.face))))..(ivy-set-actions..'co
bf00	75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 66 61 63 65 0a 20 27 28 28 22 63 22 20 63 6f 75 6e	unsel-describe-face..'(("c".coun
bf20	73 65 6c 2d 63 75 73 74 6f 6d 69 7a 65 2d 66 61 63 65 20 22 63 75 73 74 6f 6d 69 7a 65 22 29 0a	sel-customize-face."customize").
bf40	20 20 20 28 22 43 22 20 63 6f 75 6e 73 65 6c 2d 63 75 73 74 6f 6d 69 7a 65 2d 66 61 63 65 2d 6f	...("C".counsel-customize-face-o
bf60	74 68 65 72 2d 77 69 6e 64 6f 77 20 22 63 75 73 74 6f 6d 69 7a 65 20 6f 74 68 65 72 20 77 69 6e	ther-window."customize.other.win
bf80	64 6f 77 22 29 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 66 61 63 65 73 27 0a 0a 28	dow")))..;;;;.`counsel-faces'..(
bfa0	64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 2d 66 61 63 65 73 2d 66 6f 72 6d 61 74 20 22 25 2d	defvar.counsel--faces-format."%-
bfc0	34 30 73 20 25 73 22 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 66 61 63 65 73 2d	40s.%s")..(defun.counsel--faces-
bfe0	66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 20 28 6e 61 6d 65 73 29 0a 20 20 22 46 6f 72 6d 61	format-function.(names)..."Forma
c000	74 20 4e 41 4d 45 53 20 61 63 63 6f 72 64 69 6e 67 20 74 6f 20 60 63 6f 75 6e 73 65 6c 2d 2d 66	t.NAMES.according.to.`counsel--f
c020	61 63 65 73 2d 66 6f 72 6d 61 74 27 2e 22 0a 20 20 28 6c 65 74 20 28 28 66 6f 72 6d 61 74 74 65	aces-format'."...(let.((formatte
c040	72 0a 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 6e 61 6d 65 29 0a 20 20 20 20 20 20	r..........(lambda.(name).......
c060	20 20 20 20 20 28 66 6f 72 6d 61 74 20 63 6f 75 6e 73 65 6c 2d 2d 66 61 63 65 73 2d 66 6f 72 6d	.....(format.counsel--faces-form
c080	61 74 20 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70	at.name....................(prop
c0a0	65 72 74 69 7a 65 20 6c 69 73 74 2d 66 61 63 65 73 2d 73 61 6d 70 6c 65 2d 74 65 78 74 0a 20 20	ertize.list-faces-sample-text...
c0c0	20 20 20 20 20 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	.............................'fa
c0e0	63 65 20 28 69 6e 74 65 72 6e 20 6e 61 6d 65 29 29 29 29 29 29 0a 20 20 20 20 28 69 76 79 2d 2d	ce.(intern.name)))))).....(ivy--
c100	66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 2d 67 65 6e 65 72 69 63 0a 20 20 20 20 20 28 6c 61	format-function-generic......(la
c120	6d 62 64 61 20 28 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 66 6f 72 6d	mbda.(name)........(funcall.form
c140	61 74 74 65 72 20 28 69 76 79 2d 2d 61 64 64 2d 66 61 63 65 20 6e 61 6d 65 20 27 69 76 79 2d 63	atter.(ivy--add-face.name.'ivy-c
c160	75 72 72 65 6e 74 2d 6d 61 74 63 68 29 29 29 0a 20 20 20 20 20 66 6f 72 6d 61 74 74 65 72 20 6e	urrent-match)))......formatter.n
c180	61 6d 65 73 20 22 5c 6e 22 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65	ames."\n")))..;;;###autoload.(de
c1a0	66 75 6e 20 63 6f 75 6e 73 65 6c 2d 66 61 63 65 73 20 28 29 0a 20 20 22 43 6f 6d 70 6c 65 74 65	fun.counsel-faces.()..."Complete
c1c0	20 66 61 63 65 73 20 77 69 74 68 20 70 72 65 76 69 65 77 2e 0a 41 63 74 69 6f 6e 73 20 61 72 65	.faces.with.preview..Actions.are
c1e0	20 70 72 6f 76 69 64 65 64 20 62 79 20 64 65 66 61 75 6c 74 20 66 6f 72 20 64 65 73 63 72 69 62	.provided.by.default.for.describ
c200	69 6e 67 20 6f 72 20 63 75 73 74 6f 6d 69 7a 69 6e 67 20 74 68 65 0a 73 65 6c 65 63 74 65 64 20	ing.or.customizing.the.selected.
c220	66 61 63 65 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 2a 20 28	face."...(interactive)...(let*.(
c240	28 6e 61 6d 65 73 20 28 6d 61 70 63 61 72 20 23 27 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 28 66 61	(names.(mapcar.#'symbol-name.(fa
c260	63 65 2d 6c 69 73 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 66 61	ce-list)))..........(counsel--fa
c280	63 65 73 2d 66 6f 72 6d 61 74 0a 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 25	ces-format...........(format."%%
c2a0	2d 25 64 73 20 25 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 70 70	-%ds.%%s"...................(app
c2c0	6c 79 20 23 27 6d 61 78 20 30 20 28 6d 61 70 63 61 72 20 23 27 73 74 72 69 6e 67 2d 77 69 64 74	ly.#'max.0.(mapcar.#'string-widt
c2e0	68 20 6e 61 6d 65 73 29 29 29 29 29 0a 20 20 20 20 28 69 76 79 2d 72 65 61 64 20 22 46 61 63 65	h.names))))).....(ivy-read."Face
c300	3a 20 22 20 6e 61 6d 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 71 75 69 72 65	:.".names...............:require
c320	2d 6d 61 74 63 68 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 69 73 74 6f 72 79 20	-match.t...............:history.
c340	27 66 61 63 65 2d 6e 61 6d 65 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	'face-name-history..............
c360	20 3a 70 72 65 73 65 6c 65 63 74 20 28 63 6f 75 6e 73 65 6c 2d 2d 66 61 63 65 2d 61 74 2d 70 6f	.:preselect.(counsel--face-at-po
c380	69 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 63 6f 75 6e 73	int)...............:action.couns
c3a0	65 6c 2d 64 65 73 63 72 69 62 65 2d 66 61 63 65 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20	el-describe-face-function.......
c3c0	20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 66 61 63 65 73 29 29	........:caller.'counsel-faces))
c3e0	29 0a 0a 28 69 76 79 2d 63 6f 6e 66 69 67 75 72 65 20 27 63 6f 75 6e 73 65 6c 2d 66 61 63 65 73	)..(ivy-configure.'counsel-faces
c400	0a 20 20 3a 70 61 72 65 6e 74 20 27 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 66 61 63	...:parent.'counsel-describe-fac
c420	65 0a 20 20 3a 66 6f 72 6d 61 74 2d 66 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 2d 66 61 63 65 73 2d	e...:format-fn.#'counsel--faces-
c440	66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 29 0a 0a 28 69 76 79 2d 73 65 74 2d 61 63 74 69 6f	format-function)..(ivy-set-actio
c460	6e 73 0a 20 27 63 6f 75 6e 73 65 6c 2d 66 61 63 65 73 0a 20 27 28 28 22 63 22 20 63 6f 75 6e 73	ns..'counsel-faces..'(("c".couns
c480	65 6c 2d 63 75 73 74 6f 6d 69 7a 65 2d 66 61 63 65 20 22 63 75 73 74 6f 6d 69 7a 65 22 29 0a 20	el-customize-face."customize")..
c4a0	20 20 28 22 43 22 20 63 6f 75 6e 73 65 6c 2d 63 75 73 74 6f 6d 69 7a 65 2d 66 61 63 65 2d 6f 74	..("C".counsel-customize-face-ot
c4c0	68 65 72 2d 77 69 6e 64 6f 77 20 22 63 75 73 74 6f 6d 69 7a 65 20 6f 74 68 65 72 20 77 69 6e 64	her-window."customize.other.wind
c4e0	6f 77 22 29 0a 20 20 20 28 22 68 22 20 63 6f 75 6e 73 65 6c 2d 68 69 67 68 6c 69 67 68 74 2d 77	ow")....("h".counsel-highlight-w
c500	69 74 68 2d 66 61 63 65 20 22 68 69 67 68 6c 69 67 68 74 22 29 29 29 0a 0a 3b 3b 3b 3b 20 4d 6f	ith-face."highlight")))..;;;;.Mo
c520	64 65 73 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 6d 69 6e 6f 72 2d 68 69 73 74 6f	des..(defvar.counsel-minor-histo
c540	72 79 20 6e 69 6c 0a 20 20 22 48 69 73 74 6f 72 79 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 6d	ry.nil..."History.for.`counsel-m
c560	69 6e 6f 72 27 2e 22 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 6d 69 6e 6f 72 2d	inor'.")..(defun.counsel--minor-
c580	63 61 6e 64 69 64 61 74 65 73 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 63 6f 6d 70 6c 65 74 69	candidates.()..."Return.completi
c5a0	6f 6e 20 61 6c 69 73 74 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 6d 69 6e 6f 72 27 2e 0a 0a 54	on.alist.for.`counsel-minor'...T
c5c0	68 65 20 61 6c 69 73 74 20 65 6c 65 6d 65 6e 74 20 69 73 20 63 6f 6e 73 20 6f 66 20 6d 69 6e 6f	he.alist.element.is.cons.of.mino
c5e0	72 20 6d 6f 64 65 20 73 74 72 69 6e 67 20 77 69 74 68 20 69 74 73 20 6c 69 67 68 74 65 72 0a 61	r.mode.string.with.its.lighter.a
c600	6e 64 20 6d 69 6e 6f 72 20 6d 6f 64 65 20 73 79 6d 62 6f 6c 2e 22 0a 20 20 28 63 6c 2d 6d 61 70	nd.minor.mode.symbol."...(cl-map
c620	63 61 6e 0a 20 20 20 28 6c 65 74 20 28 28 73 75 66 66 69 78 20 28 70 72 6f 70 65 72 74 69 7a 65	can....(let.((suffix.(propertize
c640	20 22 20 5c 22 25 73 5c 22 22 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 73 74 72 69	.".\"%s\"".'face.'font-lock-stri
c660	6e 67 2d 66 61 63 65 29 29 29 0a 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 6d 6f 64 65 29 0a 20	ng-face)))......(lambda.(mode)..
c680	20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 62 6f 75 6e 64 70 20 6d 6f 64 65 29 20 28	......(when.(and.(boundp.mode).(
c6a0	63 6f 6d 6d 61 6e 64 70 20 6d 6f 64 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28	commandp.mode))..........(let.((
c6c0	6c 69 67 68 74 65 72 20 28 63 64 72 20 28 61 73 73 71 20 6d 6f 64 65 20 6d 69 6e 6f 72 2d 6d 6f	lighter.(cdr.(assq.mode.minor-mo
c6e0	64 65 2d 61 6c 69 73 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 28 63	de-alist))))............(list.(c
c700	6f 6e 73 20 28 63 6f 6e 63 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ons.(concat.....................
c720	20 20 20 20 28 69 66 20 28 73 79 6d 62 6f 6c 2d 76 61 6c 75 65 20 6d 6f 64 65 29 20 22 2d 22 20	....(if.(symbol-value.mode)."-".
c740	22 2b 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 28 73 79	"+").........................(sy
c760	6d 62 6f 6c 2d 6e 61 6d 65 20 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	mbol-name.mode).................
c780	20 20 20 20 20 20 20 20 28 61 6e 64 20 6c 69 67 68 74 65 72 0a 20 20 20 20 20 20 20 20 20 20 20	........(and.lighter............
c7a0	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 73 75 66 66 69 78	..................(format.suffix
c7c0	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	................................
c7e0	20 20 20 20 20 20 28 66 6f 72 6d 61 74 2d 6d 6f 64 65 2d 6c 69 6e 65 20 28 63 6f 6e 73 20 74 20	......(format-mode-line.(cons.t.
c800	6c 69 67 68 74 65 72 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	lighter)))))....................
c820	20 20 20 20 6d 6f 64 65 29 29 29 29 29 29 0a 20 20 20 6d 69 6e 6f 72 2d 6d 6f 64 65 2d 6c 69 73	....mode))))))....minor-mode-lis
c840	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 63 6f 75 6e 73	t))..;;;###autoload.(defun.couns
c860	65 6c 2d 6d 69 6e 6f 72 20 28 29 0a 20 20 22 45 6e 61 62 6c 65 20 6f 72 20 64 69 73 61 62 6c 65	el-minor.()..."Enable.or.disable
c880	20 6d 69 6e 6f 72 20 6d 6f 64 65 2e 0a 0a 44 69 73 61 62 6c 65 64 20 6d 69 6e 6f 72 20 6d 6f 64	.minor.mode...Disabled.minor.mod
c8a0	65 73 20 61 72 65 20 70 72 65 66 69 78 65 64 20 77 69 74 68 20 5c 22 2b 5c 22 2c 20 61 6e 64 0a	es.are.prefixed.with.\"+\",.and.
c8c0	73 65 6c 65 63 74 69 6e 67 20 6f 6e 65 20 6f 66 20 74 68 65 73 65 20 77 69 6c 6c 20 65 6e 61 62	selecting.one.of.these.will.enab
c8e0	6c 65 20 69 74 2e 0a 45 6e 61 62 6c 65 64 20 6d 69 6e 6f 72 20 6d 6f 64 65 73 20 61 72 65 20 70	le.it..Enabled.minor.modes.are.p
c900	72 65 66 69 78 65 64 20 77 69 74 68 20 5c 22 2d 5c 22 2c 20 61 6e 64 0a 73 65 6c 65 63 74 69 6e	refixed.with.\"-\",.and.selectin
c920	67 20 6f 6e 65 20 6f 66 20 74 68 65 73 65 20 77 69 6c 6c 20 65 6e 61 62 6c 65 20 69 74 2e 0a 0a	g.one.of.these.will.enable.it...
c940	41 64 64 69 74 69 6f 6e 61 6c 20 61 63 74 69 6f 6e 73 3a 5c 5c 3c 69 76 79 2d 6d 69 6e 69 62 75	Additional.actions:\\<ivy-minibu
c960	66 66 65 72 2d 6d 61 70 3e 0a 0a 20 20 5c 5c 5b 69 76 79 2d 64 69 73 70 61 74 63 68 69 6e 67 2d	ffer-map>....\\[ivy-dispatching-
c980	64 6f 6e 65 5d 20 64 3a 20 47 6f 20 74 6f 20 6d 69 6e 6f 72 20 6d 6f 64 65 20 64 65 66 69 6e 69	done].d:.Go.to.minor.mode.defini
c9a0	74 69 6f 6e 0a 20 20 5c 5c 5b 69 76 79 2d 64 69 73 70 61 74 63 68 69 6e 67 2d 64 6f 6e 65 5d 20	tion...\\[ivy-dispatching-done].
c9c0	68 3a 20 44 65 73 63 72 69 62 65 20 6d 69 6e 6f 72 20 6d 6f 64 65 22 0a 0a 20 20 28 69 6e 74 65	h:.Describe.minor.mode"....(inte
c9e0	72 61 63 74 69 76 65 29 0a 20 20 28 69 76 79 2d 72 65 61 64 20 22 4d 69 6e 6f 72 20 6d 6f 64 65	ractive)...(ivy-read."Minor.mode
ca00	73 20 28 65 6e 61 62 6c 65 20 2b 6d 6f 64 65 20 6f 72 20 64 69 73 61 62 6c 65 20 2d 6d 6f 64 65	s.(enable.+mode.or.disable.-mode
ca20	29 3a 20 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 6d 69 6e 6f 72	):.".............(counsel--minor
ca40	2d 63 61 6e 64 69 64 61 74 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 71 75 69 72	-candidates).............:requir
ca60	65 2d 6d 61 74 63 68 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 69 73 74 6f 72 79 20 27	e-match.t.............:history.'
ca80	63 6f 75 6e 73 65 6c 2d 6d 69 6e 6f 72 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20	counsel-minor-history...........
caa0	20 20 3a 61 63 74 69 6f 6e 20 28 6c 61 6d 62 64 61 20 28 78 29 0a 20 20 20 20 20 20 20 20 20 20	..:action.(lambda.(x)...........
cac0	20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 6c 2d 69 6e 74 65 72 61 63 74 69 76 65 6c 79 20	............(call-interactively.
cae0	28 63 64 72 20 78 29 29 29 29 29 0a 0a 28 69 76 79 2d 63 6f 6e 66 69 67 75 72 65 20 27 63 6f 75	(cdr.x)))))..(ivy-configure.'cou
cb00	6e 73 65 6c 2d 6d 69 6e 6f 72 0a 20 20 3a 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20 22 5e 2b 22	nsel-minor...:initial-input."^+"
cb20	0a 20 20 3a 73 6f 72 74 2d 66 6e 20 23 27 69 76 79 2d 73 74 72 69 6e 67 3c 29 0a 0a 28 69 76 79	...:sort-fn.#'ivy-string<)..(ivy
cb40	2d 73 65 74 2d 61 63 74 69 6f 6e 73 0a 20 27 63 6f 75 6e 73 65 6c 2d 6d 69 6e 6f 72 0a 20 60 28	-set-actions..'counsel-minor..`(
cb60	28 22 64 22 20 2c 28 6c 61 6d 62 64 61 20 28 78 29 20 28 66 69 6e 64 2d 66 75 6e 63 74 69 6f 6e	("d".,(lambda.(x).(find-function
cb80	20 28 63 64 72 20 78 29 29 29 20 22 64 65 66 69 6e 69 74 69 6f 6e 22 29 0a 20 20 20 28 22 68 22	.(cdr.x)))."definition")....("h"
cba0	20 2c 28 6c 61 6d 62 64 61 20 28 78 29 20 28 64 65 73 63 72 69 62 65 2d 66 75 6e 63 74 69 6f 6e	.,(lambda.(x).(describe-function
cbc0	20 28 63 64 72 20 78 29 29 29 20 22 68 65 6c 70 22 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f	.(cdr.x)))."help")))..;;;###auto
cbe0	6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6d 61 6a 6f 72 20 28 29 0a 20 20 28	load.(defun.counsel-major.()...(
cc00	69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 69 76 79 2d 72 65 61 64 20 22 4d 61 6a 6f 72 20	interactive)...(ivy-read."Major.
cc20	6d 6f 64 65 73 3a 20 22 20 6f 62 61 72 72 61 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 70 72	modes:.".obarray.............:pr
cc40	65 64 69 63 61 74 65 20 28 6c 61 6d 62 64 61 20 28 66 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	edicate.(lambda.(f).............
cc60	20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 63 6f 6d 6d 61 6e 64 70 20 66 29 0a 20	.............(and.(commandp.f)..
cc80	20 20 20 20 20 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 74	.............................(st
cca0	72 69 6e 67 2d 73 75 66 66 69 78 2d 70 20 22 2d 6d 6f 64 65 22 20 28 73 79 6d 62 6f 6c 2d 6e 61	ring-suffix-p."-mode".(symbol-na
ccc0	6d 65 20 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	me.f))..........................
cce0	20 20 20 20 20 28 6f 72 20 28 61 6e 64 20 28 61 75 74 6f 6c 6f 61 64 70 20 28 73 79 6d 62 6f 6c	.....(or.(and.(autoloadp.(symbol
cd00	2d 66 75 6e 63 74 69 6f 6e 20 66 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	-function.f))...................
cd20	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 64 6f 63 2d	.....................(let.((doc-
cd40	73 70 6c 69 74 20 28 68 65 6c 70 2d 73 70 6c 69 74 2d 66 75 6e 64 6f 63 20 28 64 6f 63 75 6d 65	split.(help-split-fundoc.(docume
cd60	6e 74 61 74 69 6f 6e 20 66 29 20 66 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ntation.f).f))).................
cd80	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6d 61 6a 6f	.........................;;.majo
cda0	72 20 6d 6f 64 65 20 73 74 61 72 74 65 72 73 20 68 61 76 65 20 6e 6f 20 61 72 67 75 6d 65 6e 74	r.mode.starters.have.no.argument
cdc0	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...............................
cde0	20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 64 6f 63 2d 73 70 6c 69 74 20 28 6e 75 6c 6c 20	...........(and.doc-split.(null.
ce00	28 63 64 72 20 28 72 65 61 64 20 28 63 61 72 20 64 6f 63 2d 73 70 6c 69 74 29 29 29 29 29 29 29	(cdr.(read.(car.doc-split)))))))
ce20	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	................................
ce40	20 20 20 28 6e 75 6c 6c 20 28 68 65 6c 70 2d 66 75 6e 63 74 69 6f 6e 2d 61 72 67 6c 69 73 74 20	...(null.(help-function-arglist.
ce60	66 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 23 27 63 6f 75	f))))).............:action.#'cou
ce80	6e 73 65 6c 2d 4d 2d 78 2d 61 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c	nsel-M-x-action.............:cal
cea0	6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 6d 61 6a 6f 72 29 29 0a 0c 0a 3b 3b 3b 20 47 69 74 0a 3b	ler.'counsel-major))...;;;.Git.;
cec0	3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 67 69 74 27 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73	;;;.`counsel-git'..(defvar.couns
cee0	65 6c 2d 67 69 74 2d 63 6d 64 20 22 67 69 74 20 6c 73 2d 66 69 6c 65 73 20 2d 7a 20 2d 2d 66 75	el-git-cmd."git.ls-files.-z.--fu
cf00	6c 6c 2d 6e 61 6d 65 20 2d 2d 22 0a 20 20 22 43 6f 6d 6d 61 6e 64 20 66 6f 72 20 60 63 6f 75 6e	ll-name.--"..."Command.for.`coun
cf20	73 65 6c 2d 67 69 74 27 2e 22 29 0a 0a 28 69 76 79 2d 73 65 74 2d 61 63 74 69 6f 6e 73 0a 20 27	sel-git'.")..(ivy-set-actions..'
cf40	63 6f 75 6e 73 65 6c 2d 67 69 74 0a 20 27 28 28 22 6a 22 20 66 69 6e 64 2d 66 69 6c 65 2d 6f 74	counsel-git..'(("j".find-file-ot
cf60	68 65 72 2d 77 69 6e 64 6f 77 20 22 6f 74 68 65 72 20 77 69 6e 64 6f 77 22 29 0a 20 20 20 28 22	her-window."other.window")....("
cf80	78 22 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 65 78 74 65 72 6e 20 22 6f 70 65	x".counsel-find-file-extern."ope
cfa0	6e 20 65 78 74 65 72 6e 61 6c 6c 79 22 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c	n.externally")))..(defun.counsel
cfc0	2d 2d 64 6f 6d 69 6e 61 74 69 6e 67 2d 66 69 6c 65 20 28 66 69 6c 65 20 26 6f 70 74 69 6f 6e 61	--dominating-file.(file.&optiona
cfe0	6c 20 64 69 72 29 0a 20 20 22 4c 6f 6f 6b 20 75 70 20 64 69 72 65 63 74 6f 72 79 20 68 69 65 72	l.dir)..."Look.up.directory.hier
d000	61 72 63 68 79 20 66 6f 72 20 46 49 4c 45 2c 20 73 74 61 72 74 69 6e 67 20 69 6e 20 44 49 52 2e	archy.for.FILE,.starting.in.DIR.
d020	0a 4c 69 6b 65 20 60 6c 6f 63 61 74 65 2d 64 6f 6d 69 6e 61 74 69 6e 67 2d 66 69 6c 65 27 2c 20	.Like.`locate-dominating-file',.
d040	62 75 74 20 44 49 52 20 64 65 66 61 75 6c 74 73 20 74 6f 0a 60 64 65 66 61 75 6c 74 2d 64 69 72	but.DIR.defaults.to.`default-dir
d060	65 63 74 6f 72 79 27 20 61 6e 64 20 74 68 65 20 72 65 74 75 72 6e 20 76 61 6c 75 65 20 69 73 20	ectory'.and.the.return.value.is.
d080	65 78 70 61 6e 64 65 64 2e 22 0a 20 20 28 61 6e 64 20 28 73 65 74 71 20 64 69 72 20 28 6c 6f 63	expanded."...(and.(setq.dir.(loc
d0a0	61 74 65 2d 64 6f 6d 69 6e 61 74 69 6e 67 2d 66 69 6c 65 20 28 6f 72 20 64 69 72 20 64 65 66 61	ate-dominating-file.(or.dir.defa
d0c0	75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 20 66 69 6c 65 29 29 0a 20 20 20 20 20 20 20 28 65 78	ult-directory).file))........(ex
d0e0	70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 64 69 72 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f	pand-file-name.dir)))..(defun.co
d100	75 6e 73 65 6c 2d 6c 6f 63 61 74 65 2d 67 69 74 2d 72 6f 6f 74 20 28 29 0a 20 20 22 52 65 74 75	unsel-locate-git-root.()..."Retu
d120	72 6e 20 74 68 65 20 72 6f 6f 74 20 6f 66 20 74 68 65 20 47 69 74 20 72 65 70 6f 73 69 74 6f 72	rn.the.root.of.the.Git.repositor
d140	79 20 63 6f 6e 74 61 69 6e 69 6e 67 20 74 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2e	y.containing.the.current.buffer.
d160	22 0a 20 20 28 6f 72 20 28 63 6f 75 6e 73 65 6c 2d 2d 67 69 74 2d 72 6f 6f 74 29 0a 20 20 20 20	"...(or.(counsel--git-root).....
d180	20 20 28 65 72 72 6f 72 20 22 4e 6f 74 20 69 6e 20 61 20 47 69 74 20 72 65 70 6f 73 69 74 6f 72	..(error."Not.in.a.Git.repositor
d1a0	79 22 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 63 61 6e 64 73 20	y")))..(defun.counsel-git-cands.
d1c0	28 64 69 72 29 0a 20 20 28 6c 65 74 20 28 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79	(dir)...(let.((default-directory
d1e0	20 64 69 72 29 29 0a 20 20 20 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 28 73	.dir)).....(split-string......(s
d200	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 75 6e 73 65 6c 2d 67	hell-command-to-string.counsel-g
d220	69 74 2d 63 6d 64 29 0a 20 20 20 20 20 22 5c 30 22 0a 20 20 20 20 20 74 29 29 29 0a 0a 28 64 65	it-cmd)......"\0"......t)))..(de
d240	66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 68 69 73 74 6f 72 79 20 6e 69 6c 0a 20 20 22	fvar.counsel-git-history.nil..."
d260	48 69 73 74 6f 72 79 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 67 69 74 27 2e 22 29 0a 0a 3b 3b	History.for.`counsel-git'.")..;;
d280	3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 67 69 74 20	;###autoload.(defun.counsel-git.
d2a0	28 26 6f 70 74 69 6f 6e 61 6c 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 29 0a 20 20 22 46 69 6e	(&optional.initial-input)..."Fin
d2c0	64 20 66 69 6c 65 20 69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 47 69 74 20 72 65 70 6f 73 69	d.file.in.the.current.Git.reposi
d2e0	74 6f 72 79 2e 0a 49 4e 49 54 49 41 4c 2d 49 4e 50 55 54 20 63 61 6e 20 62 65 20 67 69 76 65 6e	tory..INITIAL-INPUT.can.be.given
d300	20 61 73 20 74 68 65 20 69 6e 69 74 69 61 6c 20 6d 69 6e 69 62 75 66 66 65 72 20 69 6e 70 75 74	.as.the.initial.minibuffer.input
d320	2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 63 6f 75 6e 73 65 6c 2d 72 65	."...(interactive)...(counsel-re
d340	71 75 69 72 65 2d 70 72 6f 67 72 61 6d 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 63 6d 64 29 0a 20	quire-program.counsel-git-cmd)..
d360	20 28 6c 65 74 20 28 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 28 63 6f 75 6e 73	.(let.((default-directory.(couns
d380	65 6c 2d 6c 6f 63 61 74 65 2d 67 69 74 2d 72 6f 6f 74 29 29 29 0a 20 20 20 20 28 69 76 79 2d 72	el-locate-git-root))).....(ivy-r
d3a0	65 61 64 20 22 46 69 6e 64 20 66 69 6c 65 3a 20 22 20 28 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 63	ead."Find.file:.".(counsel-git-c
d3c0	61 6e 64 73 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 0a 20 20 20 20 20 20 20 20	ands.default-directory).........
d3e0	20 20 20 20 20 20 3a 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20 69 6e 69 74 69 61 6c 2d 69 6e 70	......:initial-input.initial-inp
d400	75 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 23 27 63 6f 75 6e 73	ut...............:action.#'couns
d420	65 6c 2d 67 69 74 2d 61 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 69 73	el-git-action...............:his
d440	74 6f 72 79 20 27 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20	tory.'counsel-git-history.......
d460	20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 67 69 74 29 29 29 0a	........:caller.'counsel-git))).
d480	0a 28 69 76 79 2d 63 6f 6e 66 69 67 75 72 65 20 27 63 6f 75 6e 73 65 6c 2d 67 69 74 0a 20 20 3a	.(ivy-configure.'counsel-git...:
d4a0	6f 63 63 75 72 20 23 27 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 6f 63 63 75 72 29 0a 0a 28 64 65 66	occur.#'counsel-git-occur)..(def
d4c0	75 6e 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 61 63 74 69 6f 6e 20 28 78 29 0a 20 20 22 46 69 6e	un.counsel-git-action.(x)..."Fin
d4e0	64 20 66 69 6c 65 20 58 20 69 6e 20 63 75 72 72 65 6e 74 20 47 69 74 20 72 65 70 6f 73 69 74 6f	d.file.X.in.current.Git.reposito
d500	72 79 2e 22 0a 20 20 28 77 69 74 68 2d 69 76 79 2d 77 69 6e 64 6f 77 0a 20 20 20 20 28 6c 65 74	ry."...(with-ivy-window.....(let
d520	20 28 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 28 69 76 79 2d 73 74 61 74 65 2d	.((default-directory.(ivy-state-
d540	64 69 72 65 63 74 6f 72 79 20 69 76 79 2d 6c 61 73 74 29 29 29 0a 20 20 20 20 20 20 28 66 69 6e	directory.ivy-last))).......(fin
d560	64 2d 66 69 6c 65 20 78 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 67 69 74	d-file.x))))..(defun.counsel-git
d580	2d 6f 63 63 75 72 20 28 26 6f 70 74 69 6f 6e 61 6c 20 5f 63 61 6e 64 73 29 0a 20 20 22 4f 63 63	-occur.(&optional._cands)..."Occ
d5a0	75 72 20 66 75 6e 63 74 69 6f 6e 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 67 69 74 27 20 75 73	ur.function.for.`counsel-git'.us
d5c0	69 6e 67 20 60 63 6f 75 6e 73 65 6c 2d 63 6d 64 2d 74 6f 2d 64 69 72 65 64 27 2e 22 0a 20 20 28	ing.`counsel-cmd-to-dired'."...(
d5e0	63 64 20 28 69 76 79 2d 73 74 61 74 65 2d 64 69 72 65 63 74 6f 72 79 20 69 76 79 2d 6c 61 73 74	cd.(ivy-state-directory.ivy-last
d600	29 29 0a 20 20 28 63 6f 75 6e 73 65 6c 2d 63 6d 64 2d 74 6f 2d 64 69 72 65 64 0a 20 20 20 28 63	))...(counsel-cmd-to-dired....(c
d620	6f 75 6e 73 65 6c 2d 2d 65 78 70 61 6e 64 2d 6c 73 0a 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25	ounsel--expand-ls.....(format."%
d640	73 20 7c 20 25 73 20 7c 20 78 61 72 67 73 20 6c 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 28	s.|.%s.|.xargs.ls".............(
d660	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 20 20 20 20 20 20	replace-regexp-in-string........
d680	20 20 20 20 20 20 22 5c 5c 28 2d 30 5c 5c 29 5c 5c 7c 5c 5c 28 2d 7a 5c 5c 29 22 20 22 22 20 63	......"\\(-0\\)\\|\\(-z\\)"."".c
d6a0	6f 75 6e 73 65 6c 2d 67 69 74 2d 63 6d 64 20 74 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	ounsel-git-cmd.t.t).............
d6c0	28 63 6f 75 6e 73 65 6c 2d 2d 66 69 6c 65 2d 6e 61 6d 65 2d 66 69 6c 74 65 72 29 29 29 29 29 0a	(counsel--file-name-filter))))).
d6e0	0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 64 69 72 65 64 2d 6c 69 73 74 69 6e 67 2d 73	.(defvar.counsel-dired-listing-s
d700	77 69 74 63 68 65 73 20 22 2d 61 6c 68 22 0a 20 20 22 53 77 69 74 63 68 65 73 20 70 61 73 73 65	witches."-alh"..."Switches.passe
d720	64 20 74 6f 20 60 6c 73 27 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 63 6d 64 2d 74 6f 2d 64 69	d.to.`ls'.for.`counsel-cmd-to-di
d740	72 65 64 27 2e 22 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 63 6d 64 2d 74 6f 2d 64	red'.")..(defun.counsel-cmd-to-d
d760	69 72 65 64 20 28 66 75 6c 6c 2d 63 6d 64 20 26 6f 70 74 69 6f 6e 61 6c 20 66 69 6c 74 65 72 29	ired.(full-cmd.&optional.filter)
d780	0a 20 20 22 41 64 61 70 74 65 64 20 66 72 6f 6d 20 60 66 69 6e 64 2d 64 69 72 65 64 27 2e 22 0a	..."Adapted.from.`find-dired'.".
d7a0	20 20 28 6c 65 74 20 28 28 69 6e 68 69 62 69 74 2d 72 65 61 64 2d 6f 6e 6c 79 20 74 29 29 0a 20	..(let.((inhibit-read-only.t))..
d7c0	20 20 20 28 65 72 61 73 65 2d 62 75 66 66 65 72 29 0a 20 20 20 20 28 64 69 72 65 64 2d 6d 6f 64	...(erase-buffer).....(dired-mod
d7e0	65 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 63 6f 75 6e 73 65 6c 2d 64 69 72 65	e.default-directory.counsel-dire
d800	64 2d 6c 69 73 74 69 6e 67 2d 73 77 69 74 63 68 65 73 29 0a 20 20 20 20 28 64 65 66 76 61 72 20	d-listing-switches).....(defvar.
d820	64 69 72 65 64 2d 73 6f 72 74 2d 69 6e 68 69 62 69 74 29 0a 20 20 20 20 28 64 65 66 76 61 72 20	dired-sort-inhibit).....(defvar.
d840	64 69 72 65 64 2d 73 75 62 64 69 72 2d 61 6c 69 73 74 29 0a 20 20 20 20 28 64 65 63 6c 61 72 65	dired-subdir-alist).....(declare
d860	2d 66 75 6e 63 74 69 6f 6e 20 64 69 72 65 64 2d 69 6e 73 65 72 74 2d 73 65 74 2d 70 72 6f 70 65	-function.dired-insert-set-prope
d880	72 74 69 65 73 20 22 64 69 72 65 64 22 29 0a 20 20 20 20 28 64 65 63 6c 61 72 65 2d 66 75 6e 63	rties."dired").....(declare-func
d8a0	74 69 6f 6e 20 64 69 72 65 64 2d 6d 6f 76 65 2d 74 6f 2d 66 69 6c 65 6e 61 6d 65 20 22 64 69 72	tion.dired-move-to-filename."dir
d8c0	65 64 22 29 0a 20 20 20 20 28 69 6e 73 65 72 74 20 22 20 20 22 20 64 65 66 61 75 6c 74 2d 64 69	ed").....(insert."..".default-di
d8e0	72 65 63 74 6f 72 79 20 22 3a 5c 6e 22 29 0a 20 20 20 20 28 6c 65 74 20 28 28 70 6f 69 6e 74 20	rectory.":\n").....(let.((point.
d900	28 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 20 20 22 20 66 75 6c	(point))).......(insert."..".ful
d920	6c 2d 63 6d 64 20 22 5c 6e 22 29 0a 20 20 20 20 20 20 28 64 69 72 65 64 2d 69 6e 73 65 72 74 2d	l-cmd."\n").......(dired-insert-
d940	73 65 74 2d 70 72 6f 70 65 72 74 69 65 73 20 70 6f 69 6e 74 20 28 70 6f 69 6e 74 29 29 29 0a 20	set-properties.point.(point)))..
d960	20 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 64 69 72 65 64 2d 73 6f 72 74 2d 69 6e 68 69 62 69	...(setq-local.dired-sort-inhibi
d980	74 20 74 29 0a 20 20 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 72 65 76 65 72 74 2d 62 75 66 66	t.t).....(setq-local.revert-buff
d9a0	65 72 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d	er-function.................(lam
d9c0	62 64 61 20 28 5f 31 20 5f 32 29 20 28 63 6f 75 6e 73 65 6c 2d 63 6d 64 2d 74 6f 2d 64 69 72 65	bda.(_1._2).(counsel-cmd-to-dire
d9e0	64 20 66 75 6c 6c 2d 63 6d 64 29 29 29 0a 20 20 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 64 69	d.full-cmd))).....(setq-local.di
da00	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 20 20 20 20 20	red-subdir-alist................
da20	20 28 6c 69 73 74 20 28 63 6f 6e 73 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 28	.(list.(cons.default-directory.(
da40	70 6f 69 6e 74 2d 6d 69 6e 2d 6d 61 72 6b 65 72 29 29 29 29 0a 20 20 20 20 28 6c 65 74 20 28 28	point-min-marker)))).....(let.((
da60	70 72 6f 63 20 28 73 74 61 72 74 2d 70 72 6f 63 65 73 73 2d 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e	proc.(start-process-shell-comman
da80	64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 63 6f 75 6e 73 65 6c 2d 63 6d 64 22	d.................."counsel-cmd"
daa0	20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 20 66 75 6c 6c 2d 63 6d 64 29 29 29 0a 20 20	.(current-buffer).full-cmd)))...
dac0	20 20 20 20 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 66 69 6c	....(set-process-filter.proc.fil
dae0	74 65 72 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 6c	ter).......(set-process-sentinel
db00	0a 20 20 20 20 20 20 20 70 72 6f 63 0a 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 70 72 6f	........proc........(lambda.(pro
db20	63 65 73 73 20 5f 6d 73 67 29 0a 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28	cess._msg)..........(when.(and.(
db40	65 71 20 28 70 72 6f 63 65 73 73 2d 73 74 61 74 75 73 20 70 72 6f 63 65 73 73 29 20 27 65 78 69	eq.(process-status.process).'exi
db60	74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 7a 65 72 6f 70 20 28 70	t).....................(zerop.(p
db80	72 6f 63 65 73 73 2d 65 78 69 74 2d 73 74 61 74 75 73 20 70 72 6f 63 65 73 73 29 29 29 0a 20 20	rocess-exit-status.process)))...
dba0	20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29	.........(goto-char.(point-min))
dbc0	0a 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 32 29 0a 20 20 20	............(forward-line.2)....
dbe0	20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 6d 6f 76 65 2d 74 6f 2d 66 69 6c 65 6e 61 6d 65 29	........(dired-move-to-filename)
dc00	29 29 29 29 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 27 0a	))))))..;;;;.`counsel-git-grep'.
dc20	0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 6d 61 70 0a 20 20	.(defvar.counsel-git-grep-map...
dc40	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 61 70 29 29	(let.((map.(make-sparse-keymap))
dc60	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 43 2d 6c 22	).....(define-key.map.(kbd."C-l"
dc80	29 20 23 27 69 76 79 2d 63 61 6c 6c 2d 61 6e 64 2d 72 65 63 65 6e 74 65 72 29 0a 20 20 20 20 28	).#'ivy-call-and-recenter).....(
dca0	64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 28 6b 62 64 20 22 4d 2d 71 22 29 20 23 27 63 6f 75	define-key.map.(kbd."M-q").#'cou
dcc0	6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 71 75 65 72 79 2d 72 65 70 6c 61 63 65 29 0a 20 20 20	nsel-git-grep-query-replace)....
dce0	20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 28 6b 62 64 20 22 43 2d 63 20 43 2d 6d 22 29	.(define-key.map.(kbd."C-c.C-m")
dd00	20 23 27 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 73 77 69 74 63 68 2d 63 6d 64 29 0a	.#'counsel-git-grep-switch-cmd).
dd20	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 43 2d 78 20 43 2d	....(define-key.map.(kbd."C-x.C-
dd40	64 22 29 20 23 27 63 6f 75 6e 73 65 6c 2d 63 64 29 0a 20 20 20 20 6d 61 70 29 29 0a 0a 28 64 65	d").#'counsel-cd).....map))..(de
dd60	66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 63 6d 64 2d 64 65 66 61 75 6c	fvar.counsel-git-grep-cmd-defaul
dd80	74 20 22 67 69 74 20 2d 2d 6e 6f 2d 70 61 67 65 72 20 67 72 65 70 20 2d 6e 20 2d 2d 6e 6f 2d 63	t."git.--no-pager.grep.-n.--no-c
dda0	6f 6c 6f 72 20 2d 49 20 2d 65 20 5c 22 25 73 5c 22 22 0a 20 20 22 49 6e 69 74 69 61 6c 20 63 6f	olor.-I.-e.\"%s\""..."Initial.co
ddc0	6d 6d 61 6e 64 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 27 2e 22 29 0a	mmand.for.`counsel-git-grep'.").
dde0	0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 63 6d 64 20 6e 69	.(defvar.counsel-git-grep-cmd.ni
de00	6c 0a 20 20 22 53 74 6f 72 65 20 74 68 65 20 63 6f 6d 6d 61 6e 64 20 66 6f 72 20 60 63 6f 75 6e	l..."Store.the.command.for.`coun
de20	73 65 6c 2d 67 69 74 2d 67 72 65 70 27 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65	sel-git-grep'.")..(defvar.counse
de40	6c 2d 67 69 74 2d 67 72 65 70 2d 68 69 73 74 6f 72 79 20 6e 69 6c 0a 20 20 22 48 69 73 74 6f 72	l-git-grep-history.nil..."Histor
de60	79 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 27 2e 22 29 0a 0a 28 64 65	y.for.`counsel-git-grep'.")..(de
de80	66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 63 6d 64 2d 68 69 73 74 6f 72	fvar.counsel-git-grep-cmd-histor
dea0	79 0a 20 20 28 6c 69 73 74 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 63 6d 64 2d 64	y...(list.counsel-git-grep-cmd-d
dec0	65 66 61 75 6c 74 29 0a 20 20 22 48 69 73 74 6f 72 79 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d	efault)..."History.for.`counsel-
dee0	67 69 74 2d 67 72 65 70 27 20 73 68 65 6c 6c 20 63 6f 6d 6d 61 6e 64 73 2e 22 29 0a 0a 28 64 65	git-grep'.shell.commands.")..(de
df00	66 63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 67 72 65 70 2d 70 6f 73 74 2d 61 63 74 69 6f 6e	fcustom.counsel-grep-post-action
df20	2d 68 6f 6f 6b 20 6e 69 6c 0a 20 20 22 48 6f 6f 6b 20 74 68 61 74 20 72 75 6e 73 20 61 66 74 65	-hook.nil..."Hook.that.runs.afte
df40	72 20 74 68 65 20 70 6f 69 6e 74 20 6d 6f 76 65 73 20 74 6f 20 74 68 65 20 6e 65 78 74 20 63 61	r.the.point.moves.to.the.next.ca
df60	6e 64 69 64 61 74 65 2e 0a 41 20 74 79 70 69 63 61 6c 20 65 78 61 6d 70 6c 65 20 6f 66 20 77 68	ndidate..A.typical.example.of.wh
df80	61 74 20 74 6f 20 61 64 64 20 74 6f 20 74 68 69 73 20 68 6f 6f 6b 20 69 73 20 74 68 65 20 66 75	at.to.add.to.this.hook.is.the.fu
dfa0	6e 63 74 69 6f 6e 0a 60 72 65 63 65 6e 74 65 72 27 2e 22 0a 20 20 3a 74 79 70 65 20 27 68 6f 6f	nction.`recenter'."...:type.'hoo
dfc0	6b 0a 20 20 3a 6f 70 74 69 6f 6e 73 20 27 28 72 65 63 65 6e 74 65 72 29 29 0a 0a 28 64 65 66 63	k...:options.'(recenter))..(defc
dfe0	75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 63 6d 64 2d 66 75 6e 63 74	ustom.counsel-git-grep-cmd-funct
e000	69 6f 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 63 6d 64 2d 66 75 6e 63 74	ion.#'counsel-git-grep-cmd-funct
e020	69 6f 6e 2d 64 65 66 61 75 6c 74 0a 20 20 22 48 6f 77 20 61 20 67 69 74 2d 67 72 65 70 20 73 68	ion-default..."How.a.git-grep.sh
e040	65 6c 6c 20 63 61 6c 6c 20 69 73 20 62 75 69 6c 74 20 66 72 6f 6d 20 74 68 65 20 69 6e 70 75 74	ell.call.is.built.from.the.input
e060	2e 0a 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 73 68 6f 75 6c 64 20 73 65 74 20 60 69 76 79 2d	..This.function.should.set.`ivy-
e080	2d 6f 6c 64 2d 72 65 27 2e 22 0a 20 20 3a 74 79 70 65 20 27 28 72 61 64 69 6f 0a 20 20 20 20 20	-old-re'."...:type.'(radio......
e0a0	20 20 20 20 20 28 66 75 6e 63 74 69 6f 6e 2d 69 74 65 6d 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d	.....(function-item.counsel-git-
e0c0	67 72 65 70 2d 63 6d 64 2d 66 75 6e 63 74 69 6f 6e 2d 64 65 66 61 75 6c 74 29 0a 20 20 20 20 20	grep-cmd-function-default)......
e0e0	20 20 20 20 20 28 66 75 6e 63 74 69 6f 6e 2d 69 74 65 6d 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d	.....(function-item.counsel-git-
e100	67 72 65 70 2d 63 6d 64 2d 66 75 6e 63 74 69 6f 6e 2d 69 67 6e 6f 72 65 2d 6f 72 64 65 72 29 0a	grep-cmd-function-ignore-order).
e120	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 4f 74 68 65 72 22	..........(function.:tag."Other"
e140	29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 63 6d 64	)))..(defun.counsel-git-grep-cmd
e160	2d 66 75 6e 63 74 69 6f 6e 2d 64 65 66 61 75 6c 74 20 28 73 74 72 29 0a 20 20 28 66 6f 72 6d 61	-function-default.(str)...(forma
e180	74 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 63 6d 64 0a 20 20 20 20 20 20 20 20 20	t.counsel-git-grep-cmd..........
e1a0	20 28 73 65 74 71 20 69 76 79 2d 2d 6f 6c 64 2d 72 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	.(setq.ivy--old-re..............
e1c0	20 20 20 28 69 66 20 28 65 71 20 69 76 79 2d 2d 72 65 67 65 78 2d 66 75 6e 63 74 69 6f 6e 20 23	...(if.(eq.ivy--regex-function.#
e1e0	27 69 76 79 2d 2d 72 65 67 65 78 2d 66 75 7a 7a 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	'ivy--regex-fuzzy)..............
e200	20 20 20 20 20 20 20 28 69 76 79 2d 2d 73 74 72 69 6e 67 2d 72 65 70 6c 61 63 65 20 22 5c 6e 22	.......(ivy--string-replace."\n"
e220	20 22 22 20 28 69 76 79 2d 2d 72 65 67 65 78 2d 66 75 7a 7a 79 20 73 74 72 29 29 0a 20 20 20 20	."".(ivy--regex-fuzzy.str)).....
e240	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 76 79 2d 2d 72 65 67 65 78 20 73 74 72 20 74 29	..............(ivy--regex.str.t)
e260	29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 63 6d	))))..(defun.counsel-git-grep-cm
e280	64 2d 66 75 6e 63 74 69 6f 6e 2d 69 67 6e 6f 72 65 2d 6f 72 64 65 72 20 28 73 74 72 29 0a 20 20	d-function-ignore-order.(str)...
e2a0	28 73 65 74 71 20 69 76 79 2d 2d 6f 6c 64 2d 72 65 20 28 69 76 79 2d 2d 72 65 67 65 78 20 73 74	(setq.ivy--old-re.(ivy--regex.st
e2c0	72 20 74 29 29 0a 20 20 28 6c 65 74 20 28 28 70 61 72 74 73 20 28 73 70 6c 69 74 2d 73 74 72 69	r.t))...(let.((parts.(split-stri
e2e0	6e 67 20 73 74 72 20 22 20 22 20 74 29 29 29 0a 20 20 20 20 28 63 6f 6e 63 61 74 0a 20 20 20 20	ng.str.".".t))).....(concat.....
e300	20 22 67 69 74 20 2d 2d 6e 6f 2d 70 61 67 65 72 20 67 72 65 70 20 2d 2d 66 75 6c 6c 2d 6e 61 6d	."git.--no-pager.grep.--full-nam
e320	65 20 2d 6e 20 2d 2d 6e 6f 2d 63 6f 6c 6f 72 20 2d 69 20 2d 65 20 22 0a 20 20 20 20 20 28 6d 61	e.-n.--no-color.-i.-e."......(ma
e340	70 63 6f 6e 63 61 74 20 23 27 73 68 65 6c 6c 2d 71 75 6f 74 65 2d 61 72 67 75 6d 65 6e 74 20 70	pconcat.#'shell-quote-argument.p
e360	61 72 74 73 20 22 20 2d 2d 61 6e 64 20 2d 65 20 22 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f	arts.".--and.-e."))))..(defun.co
e380	75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 66 75 6e 63 74 69 6f 6e 20 28 73 74 72 69 6e 67 29	unsel-git-grep-function.(string)
e3a0	0a 20 20 22 47 72 65 70 20 69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 47 69 74 20 72 65 70 6f	..."Grep.in.the.current.Git.repo
e3c0	73 69 74 6f 72 79 20 66 6f 72 20 53 54 52 49 4e 47 2e 22 0a 20 20 28 6f 72 0a 20 20 20 28 69 76	sitory.for.STRING."...(or....(iv
e3e0	79 2d 6d 6f 72 65 2d 63 68 61 72 73 29 0a 20 20 20 28 69 67 6e 6f 72 65 0a 20 20 20 20 28 63 6f	y-more-chars)....(ignore.....(co
e400	75 6e 73 65 6c 2d 2d 61 73 79 6e 63 2d 63 6f 6d 6d 61 6e 64 0a 20 20 20 20 20 28 63 6f 6e 63 61	unsel--async-command......(conca
e420	74 0a 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65	t.......(funcall.counsel-git-gre
e440	70 2d 63 6d 64 2d 66 75 6e 63 74 69 6f 6e 20 73 74 72 69 6e 67 29 0a 20 20 20 20 20 20 28 61 6e	p-cmd-function.string).......(an
e460	64 20 28 69 76 79 2d 2d 63 61 73 65 2d 66 6f 6c 64 2d 70 20 73 74 72 69 6e 67 29 20 22 20 2d 69	d.(ivy--case-fold-p.string).".-i
e480	22 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70	"))))))..(defun.counsel-git-grep
e4a0	2d 61 63 74 69 6f 6e 20 28 78 29 0a 20 20 22 47 6f 20 74 6f 20 6f 63 63 75 72 72 65 6e 63 65 20	-action.(x)..."Go.to.occurrence.
e4c0	58 20 69 6e 20 63 75 72 72 65 6e 74 20 47 69 74 20 72 65 70 6f 73 69 74 6f 72 79 2e 22 0a 20 20	X.in.current.Git.repository."...
e4e0	28 63 6f 75 6e 73 65 6c 2d 2d 67 69 74 2d 67 72 65 70 2d 76 69 73 69 74 20 78 29 29 0a 0a 28 64	(counsel--git-grep-visit.x))..(d
e500	65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 61 63 74 69 6f 6e 2d 6f 74 68	efun.counsel-git-grep-action-oth
e520	65 72 2d 77 69 6e 64 6f 77 20 28 78 29 0a 20 20 22 47 6f 20 74 6f 20 6f 63 63 75 72 72 65 6e 63	er-window.(x)..."Go.to.occurrenc
e540	65 20 58 20 69 6e 20 63 75 72 72 65 6e 74 20 47 69 74 20 72 65 70 6f 73 69 74 6f 72 79 20 69 6e	e.X.in.current.Git.repository.in
e560	20 61 6e 6f 74 68 65 72 20 77 69 6e 64 6f 77 2e 22 0a 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 67 69	.another.window."...(counsel--gi
e580	74 2d 67 72 65 70 2d 76 69 73 69 74 20 78 20 74 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73	t-grep-visit.x.t))..(defun.couns
e5a0	65 6c 2d 2d 67 69 74 2d 67 72 65 70 2d 66 69 6c 65 2d 61 6e 64 2d 6c 69 6e 65 20 28 78 29 0a 20	el--git-grep-file-and-line.(x)..
e5c0	20 22 45 78 74 72 61 63 74 20 66 69 6c 65 20 6e 61 6d 65 20 61 6e 64 20 6c 69 6e 65 20 6e 75 6d	."Extract.file.name.and.line.num
e5e0	62 65 72 20 66 72 6f 6d 20 60 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 27 20 6c 69 6e 65	ber.from.`counsel-git-grep'.line
e600	20 58 2e 0a 52 65 74 75 72 6e 20 61 20 70 61 69 72 20 28 46 49 4c 45 20 2e 20 4c 49 4e 45 29 20	.X..Return.a.pair.(FILE...LINE).
e620	6f 6e 20 73 75 63 63 65 73 73 3b 20 6e 69 6c 20 6f 74 68 65 72 77 69 73 65 2e 22 0a 20 20 28 61	on.success;.nil.otherwise."...(a
e640	6e 64 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 5c 5c 60 5c 5c 28 2e 2a 3f 5c 5c 29 3a 5c	nd.(string-match."\\`\\(.*?\\):\
e660	5c 28 5b 30 2d 39 5d 2b 5c 5c 29 3a 5c 5c 28 2e 2a 5c 5c 29 5c 5c 27 22 20 78 29 0a 20 20 20 20	\([0-9]+\\):\\(.*\\)\\'".x).....
e680	20 20 20 28 63 6f 6e 73 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72	...(cons.(match-string-no-proper
e6a0	74 69 65 73 20 31 20 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 2d 74	ties.1.x)..............(string-t
e6c0	6f 2d 6e 75 6d 62 65 72 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72	o-number.(match-string-no-proper
e6e0	74 69 65 73 20 32 20 78 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 67	ties.2.x)))))..(defun.counsel--g
e700	69 74 2d 67 72 65 70 2d 76 69 73 69 74 20 28 63 61 6e 64 20 26 6f 70 74 69 6f 6e 61 6c 20 6f 74	it-grep-visit.(cand.&optional.ot
e720	68 65 72 2d 77 69 6e 64 6f 77 29 0a 20 20 22 56 69 73 69 74 20 60 63 6f 75 6e 73 65 6c 2d 67 69	her-window)..."Visit.`counsel-gi
e740	74 2d 67 72 65 70 27 20 43 41 4e 44 2c 20 6f 70 74 69 6f 6e 61 6c 6c 79 20 69 6e 20 4f 54 48 45	t-grep'.CAND,.optionally.in.OTHE
e760	52 2d 57 49 4e 44 4f 57 2e 22 0a 20 20 28 6c 65 74 20 28 28 66 69 6c 65 2d 61 6e 64 2d 6c 69 6e	R-WINDOW."...(let.((file-and-lin
e780	65 20 28 63 6f 75 6e 73 65 6c 2d 2d 67 69 74 2d 67 72 65 70 2d 66 69 6c 65 2d 61 6e 64 2d 6c 69	e.(counsel--git-grep-file-and-li
e7a0	6e 65 20 63 61 6e 64 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 66 69 6c 65 2d 61 6e 64 2d 6c 69	ne.cand))).....(when.file-and-li
e7c0	6e 65 0a 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 28 69 66 20 6f 74 68 65 72 2d 77 69 6e 64	ne.......(funcall.(if.other-wind
e7e0	6f 77 20 23 27 66 69 6e 64 2d 66 69 6c 65 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 20 23 27 66 69	ow.#'find-file-other-window.#'fi
e800	6e 64 2d 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 78 70 61 6e 64 2d	nd-file)................(expand-
e820	66 69 6c 65 2d 6e 61 6d 65 20 28 63 61 72 20 66 69 6c 65 2d 61 6e 64 2d 6c 69 6e 65 29 0a 20 20	file-name.(car.file-and-line)...
e840	20 20 20 20 20 20 20 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	...............................(
e860	69 76 79 2d 73 74 61 74 65 2d 64 69 72 65 63 74 6f 72 79 20 69 76 79 2d 6c 61 73 74 29 29 29 0a	ivy-state-directory.ivy-last))).
e880	20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20	......(goto-char.(point-min))...
e8a0	20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 28 31 2d 20 28 63 64 72 20 66 69 6c 65 2d	....(forward-line.(1-.(cdr.file-
e8c0	61 6e 64 2d 6c 69 6e 65 29 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 72 65 2d 73 65 61 72	and-line))).......(when.(re-sear
e8e0	63 68 2d 66 6f 72 77 61 72 64 20 28 69 76 79 2d 2d 72 65 67 65 78 20 69 76 79 2d 74 65 78 74 20	ch-forward.(ivy--regex.ivy-text.
e900	74 29 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 29 20 74 29 0a 20 20 20 20 20 20	t).(line-end-position).t).......
e920	20 20 28 77 68 65 6e 20 73 77 69 70 65 72 2d 67 6f 74 6f 2d 73 74 61 72 74 2d 6f 66 2d 6d 61 74	..(when.swiper-goto-start-of-mat
e940	63 68 0a 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 6d 61 74 63 68 2d 62	ch...........(goto-char.(match-b
e960	65 67 69 6e 6e 69 6e 67 20 30 29 29 29 29 0a 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 2d 65 6e	eginning.0)))).......(swiper--en
e980	73 75 72 65 2d 76 69 73 69 62 6c 65 29 0a 20 20 20 20 20 20 28 72 75 6e 2d 68 6f 6f 6b 73 20 27	sure-visible).......(run-hooks.'
e9a0	63 6f 75 6e 73 65 6c 2d 67 72 65 70 2d 70 6f 73 74 2d 61 63 74 69 6f 6e 2d 68 6f 6f 6b 29 0a 20	counsel-grep-post-action-hook)..
e9c0	20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 65 71 20 69 76 79 2d 65 78 69 74 20 27 64 6f 6e 65 29	.....(unless.(eq.ivy-exit.'done)
e9e0	0a 20 20 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 2d 63 6c 65 61 6e 75 70 29 0a 20 20 20 20 20	.........(swiper--cleanup)......
ea00	20 20 20 28 73 77 69 70 65 72 2d 2d 61 64 64 2d 6f 76 65 72 6c 61 79 73 20 28 69 76 79 2d 2d 72	...(swiper--add-overlays.(ivy--r
ea20	65 67 65 78 20 69 76 79 2d 74 65 78 74 29 29 29 29 29 29 0a 0a 28 69 76 79 2d 73 65 74 2d 61 63	egex.ivy-text))))))..(ivy-set-ac
ea40	74 69 6f 6e 73 0a 20 27 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 0a 20 27 28 28 22 6a 22	tions..'counsel-git-grep..'(("j"
ea60	20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 61 63 74 69 6f 6e 2d 6f 74 68 65 72 2d 77	.counsel-git-grep-action-other-w
ea80	69 6e 64 6f 77 20 22 6f 74 68 65 72 20 77 69 6e 64 6f 77 22 29 29 29 0a 0a 28 64 65 66 75 6e 20	indow."other.window")))..(defun.
eaa0	63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 74 72 61 6e 73 66 6f 72 6d 65 72 20 28 73 74	counsel-git-grep-transformer.(st
eac0	72 29 0a 20 20 22 48 69 67 68 6c 69 67 68 74 20 66 69 6c 65 20 61 6e 64 20 6c 69 6e 65 20 6e 75	r)..."Highlight.file.and.line.nu
eae0	6d 62 65 72 20 69 6e 20 53 54 52 2e 22 0a 20 20 28 77 68 65 6e 20 28 73 74 72 69 6e 67 2d 6d 61	mber.in.STR."...(when.(string-ma
eb00	74 63 68 20 22 5c 5c 60 5c 5c 28 5b 5e 3a 5d 2b 5c 5c 29 3a 5c 5c 28 5b 5e 3a 5d 2b 5c 5c 29 3a	tch."\\`\\([^:]+\\):\\([^:]+\\):
eb20	22 20 73 74 72 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 65 72	".str).....(add-face-text-proper
eb40	74 79 20 28 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 31 29 20 28 6d 61 74 63 68 2d 65 6e	ty.(match-beginning.1).(match-en
eb60	64 20 31 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.1)............................
eb80	20 27 69 76 79 2d 67 72 65 70 2d 69 6e 66 6f 20 6e 69 6c 20 73 74 72 29 0a 20 20 20 20 28 61 64	.'ivy-grep-info.nil.str).....(ad
eba0	64 2d 66 61 63 65 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 28 6d 61 74 63 68 2d 62 65 67 69	d-face-text-property.(match-begi
ebc0	6e 6e 69 6e 67 20 32 29 20 28 6d 61 74 63 68 2d 65 6e 64 20 32 29 0a 20 20 20 20 20 20 20 20 20	nning.2).(match-end.2)..........
ebe0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 69 76 79 2d 67 72 65 70 2d 6c 69 6e	...................'ivy-grep-lin
ec00	65 2d 6e 75 6d 62 65 72 20 6e 69 6c 20 73 74 72 29 29 0a 20 20 73 74 72 29 0a 0a 28 64 65 66 76	e-number.nil.str))...str)..(defv
ec20	61 72 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 70 72 6f 6a 65 63 74 73 2d 61 6c 69	ar.counsel-git-grep-projects-ali
ec40	73 74 20 6e 69 6c 0a 20 20 22 41 6e 20 61 6c 69 73 74 20 6f 66 20 70 72 6f 6a 65 63 74 20 64 69	st.nil..."An.alist.of.project.di
ec60	72 65 63 74 6f 72 79 20 74 6f 20 5c 22 67 69 74 2d 67 72 65 70 5c 22 20 63 6f 6d 6d 61 6e 64 2e	rectory.to.\"git-grep\".command.
ec80	0a 41 6c 6c 6f 77 73 20 74 6f 20 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 75 73 65 20 61 20 63	.Allows.to.automatically.use.a.c
eca0	75 73 74 6f 6d 20 5c 22 67 69 74 2d 67 72 65 70 5c 22 20 63 6f 6d 6d 61 6e 64 20 66 6f 72 20 61	ustom.\"git-grep\".command.for.a
ecc0	6c 6c 0a 66 69 6c 65 73 20 69 6e 20 61 20 70 72 6f 6a 65 63 74 2e 22 29 0a 0a 28 64 65 66 75 6e	ll.files.in.a.project.")..(defun
ece0	20 63 6f 75 6e 73 65 6c 2d 2d 67 69 74 2d 67 72 65 70 2d 63 6d 64 2d 61 6e 64 2d 70 72 6f 6a 20	.counsel--git-grep-cmd-and-proj.
ed00	28 63 6d 64 29 0a 20 20 28 6c 65 74 20 28 28 64 64 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e	(cmd)...(let.((dd.(expand-file-n
ed20	61 6d 65 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 29 0a 20 20 20 20 20 20 20 20	ame.default-directory)).........
ed40	70 72 6f 6a 29 0a 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 20 28 28 73 74 72 69 6e 67 70 20	proj).....(cond.......((stringp.
ed60	63 6d 64 29 29 0a 20 20 20 20 20 20 28 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 0a	cmd)).......(current-prefix-arg.
ed80	20 20 20 20 20 20 20 28 69 66 20 28 73 65 74 71 20 70 72 6f 6a 0a 20 20 20 20 20 20 20 20 20 20	.......(if.(setq.proj...........
eda0	20 20 20 20 20 20 20 28 63 6c 2d 66 69 6e 64 2d 69 66 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	.......(cl-find-if..............
edc0	20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.....(lambda.(x)................
ede0	20 20 20 20 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 28 63 61 72 20 78 29 20 64 64 29	.....(string-match-p.(car.x).dd)
ee00	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d	)...................counsel-git-
ee20	67 72 65 70 2d 70 72 6f 6a 65 63 74 73 2d 61 6c 69 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20	grep-projects-alist))...........
ee40	20 28 73 65 74 71 20 63 6d 64 20 28 63 64 72 20 70 72 6f 6a 29 29 0a 20 20 20 20 20 20 20 20 20	.(setq.cmd.(cdr.proj))..........
ee60	28 73 65 74 71 20 63 6d 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 76 79 2d 72 65	(setq.cmd................(ivy-re
ee80	61 64 20 22 63 6d 64 3a 20 22 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 63 6d 64 2d	ad."cmd:.".counsel-git-grep-cmd-
eea0	68 69 73 74 6f 72 79 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	history.........................
eec0	20 3a 68 69 73 74 6f 72 79 20 27 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 63 6d 64 2d	.:history.'counsel-git-grep-cmd-
eee0	68 69 73 74 6f 72 79 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	history.........................
ef00	20 3a 72 65 2d 62 75 69 6c 64 65 72 20 23 27 69 76 79 2d 2d 72 65 67 65 78 29 29 0a 20 20 20 20	.:re-builder.#'ivy--regex)).....
ef20	20 20 20 20 20 28 73 65 74 71 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 63 6d 64 2d	.....(setq.counsel-git-grep-cmd-
ef40	68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 64	history................(delete-d
ef60	75 70 73 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 63 6d 64 2d 68 69 73 74 6f 72 79	ups.counsel-git-grep-cmd-history
ef80	29 29 29 29 0a 20 20 20 20 20 20 28 74 0a 20 20 20 20 20 20 20 28 73 65 74 71 20 63 6d 64 20 63	)))).......(t........(setq.cmd.c
efa0	6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 63 6d 64 2d 64 65 66 61 75 6c 74 29 29 29 0a 20	ounsel-git-grep-cmd-default)))..
efc0	20 20 20 28 63 6f 6e 73 20 70 72 6f 6a 20 63 6d 64 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75	...(cons.proj.cmd)))..(defun.cou
efe0	6e 73 65 6c 2d 2d 63 61 6c 6c 20 28 63 6f 6d 6d 61 6e 64 20 26 6f 70 74 69 6f 6e 61 6c 20 72 65	nsel--call.(command.&optional.re
f000	73 75 6c 74 2d 66 6e 29 0a 20 20 22 53 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 20 63 61 6c 6c 20 43	sult-fn)..."Synchronously.call.C
f020	4f 4d 4d 41 4e 44 20 61 6e 64 20 72 65 74 75 72 6e 20 69 74 73 20 6f 75 74 70 75 74 20 61 73 20	OMMAND.and.return.its.output.as.
f040	61 20 73 74 72 69 6e 67 2e 0a 43 4f 4d 4d 41 4e 44 20 63 6f 6d 70 72 69 73 65 73 20 74 68 65 20	a.string..COMMAND.comprises.the.
f060	70 72 6f 67 72 61 6d 20 6e 61 6d 65 20 66 6f 6c 6c 6f 77 65 64 20 62 79 20 69 74 73 20 61 72 67	program.name.followed.by.its.arg
f080	75 6d 65 6e 74 73 2c 20 61 73 0a 69 6e 20 60 6d 61 6b 65 2d 70 72 6f 63 65 73 73 27 2e 20 20 53	uments,.as.in.`make-process'...S
f0a0	69 67 6e 61 6c 20 60 66 69 6c 65 2d 65 72 72 6f 72 27 20 61 6e 64 20 65 6d 69 74 20 61 20 77 61	ignal.`file-error'.and.emit.a.wa
f0c0	72 6e 69 6e 67 20 69 66 0a 43 4f 4d 4d 41 4e 44 20 66 61 69 6c 73 2e 20 20 4f 62 65 79 20 66 69	rning.if.COMMAND.fails...Obey.fi
f0e0	6c 65 20 68 61 6e 64 6c 65 72 73 20 62 61 73 65 64 20 6f 6e 20 60 64 65 66 61 75 6c 74 2d 64 69	le.handlers.based.on.`default-di
f100	72 65 63 74 6f 72 79 27 2e 0a 4f 6e 20 73 75 63 63 65 73 73 2c 20 52 45 53 55 4c 54 2d 46 4e 20	rectory'..On.success,.RESULT-FN.
f120	69 73 20 63 61 6c 6c 65 64 20 69 6e 20 6f 75 74 70 75 74 20 62 75 66 66 65 72 20 77 69 74 68 20	is.called.in.output.buffer.with.
f140	6e 6f 20 61 72 67 75 6d 65 6e 74 73 2e 22 0a 20 20 28 6c 65 74 20 28 28 73 74 64 65 72 72 20 28	no.arguments."...(let.((stderr.(
f160	6d 61 6b 65 2d 74 65 6d 70 2d 66 69 6c 65 20 22 63 6f 75 6e 73 65 6c 2d 63 61 6c 6c 2d 73 74 64	make-temp-file."counsel-call-std
f180	65 72 72 2d 22 29 29 0a 20 20 20 20 20 20 20 20 73 74 61 74 75 73 29 0a 20 20 20 20 28 75 6e 77	err-")).........status).....(unw
f1a0	69 6e 64 2d 70 72 6f 74 65 63 74 0a 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 74 65 6d 70 2d	ind-protect..........(with-temp-
f1c0	62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 73 74 61 74 75 73 20 28	buffer............(setq.status.(
f1e0	61 70 70 6c 79 20 23 27 70 72 6f 63 65 73 73 2d 66 69 6c 65 20 28 63 61 72 20 63 6f 6d 6d 61 6e	apply.#'process-file.(car.comman
f200	64 29 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 20 20	d).nil..........................
f220	20 20 20 20 20 20 28 6c 69 73 74 20 74 20 73 74 64 65 72 72 29 20 6e 69 6c 20 28 63 64 72 20 63	......(list.t.stderr).nil.(cdr.c
f240	6f 6d 6d 61 6e 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 65 71 20 73 74 61	ommand)))............(if.(eq.sta
f260	74 75 73 20 30 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 72 65 73 75 6c 74	tus.0)................(if.result
f280	2d 66 6e 0a 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	-fn....................(funcall.
f2a0	72 65 73 75 6c 74 2d 66 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 52	result-fn)..................;;.R
f2c0	65 74 75 72 6e 20 61 6c 6c 20 6f 75 74 70 75 74 20 65 78 63 65 70 74 20 74 72 61 69 6c 69 6e 67	eturn.all.output.except.trailing
f2e0	20 6e 65 77 6c 69 6e 65 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 75 66 66	.newline...................(buff
f300	65 72 2d 73 75 62 73 74 72 69 6e 67 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 0a 20 20 20 20 20 20 20	er-substring.(point-min)........
f320	20 20 20 20 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	............................(-.(
f340	70 6f 69 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	point)..........................
f360	20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 65 71 20 28 62 6f 62 70 29 20 28 62 6f 6c	.............(if.(eq.(bobp).(bol
f380	70 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	p)).............................
f3a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	..............0.................
f3c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 29 29 29 29 0a 20 20	........................1))))...
f3e0	20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 43 6f 6e 76 65 72 74 20 70 72 6f 63 65 73 73 20 73 74	...........;;.Convert.process.st
f400	61 74 75 73 20 69 6e 74 6f 20 65 72 72 6f 72 20 6c 69 73 74 2e 0a 20 20 20 20 20 20 20 20 20 20	atus.into.error.list............
f420	20 20 20 28 73 65 74 71 20 73 74 61 74 75 73 20 28 6c 69 73 74 20 27 66 69 6c 65 2d 65 72 72 6f	...(setq.status.(list.'file-erro
f440	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...............................
f460	20 20 28 6d 61 70 63 6f 6e 63 61 74 20 23 27 69 64 65 6e 74 69 74 79 20 60 28 2c 40 63 6f 6d 6d	..(mapconcat.#'identity.`(,@comm
f480	61 6e 64 20 22 66 61 69 6c 65 64 22 29 20 22 20 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	and."failed").".")..............
f4a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 74 61 74 75 73 29 29 0a 20 20 20 20	...................status)).....
f4c0	20 20 20 20 20 20 20 20 20 3b 3b 20 50 72 69 6e 74 20 73 74 64 65 72 72 20 63 6f 6e 74 65 6e 74	.........;;.Print.stderr.content
f4e0	73 2c 20 69 66 20 61 6e 79 2c 20 74 6f 20 2a 57 61 72 6e 69 6e 67 73 2a 20 62 75 66 66 65 72 2e	s,.if.any,.to.*Warnings*.buffer.
f500	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 6d 73 67 20 28 63 6f 6e 64 69 74	..............(let.((msg.(condit
f520	69 6f 6e 2d 63 61 73 65 20 65 72 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ion-case.err....................
f540	20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 7a 65 72 6f 70 20 28 63 61 64 72 20 28 69	.........(unless.(zerop.(cadr.(i
f560	6e 73 65 72 74 2d 66 69 6c 65 2d 63 6f 6e 74 65 6e 74 73 0a 20 20 20 20 20 20 20 20 20 20 20 20	nsert-file-contents.............
f580	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
f5a0	20 20 20 20 20 20 73 74 64 65 72 72 20 6e 69 6c 20 6e 69 6c 20 6e 69 6c 20 74 29 29 29 0a 20 20	......stderr.nil.nil.nil.t)))...
f5c0	20 20 20 20 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 62 75 66	............................(buf
f5e0	66 65 72 2d 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	fer-string))....................
f600	20 20 20 20 20 20 20 28 65 72 72 6f 72 20 28 65 72 72 6f 72 2d 6d 65 73 73 61 67 65 2d 73 74 72	.......(error.(error-message-str
f620	69 6e 67 20 65 72 72 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 77 61	ing.err)))))................(lwa
f640	72 6e 20 27 69 76 79 20 3a 77 61 72 6e 69 6e 67 20 22 25 73 22 20 28 61 70 70 6c 79 20 23 27 63	rn.'ivy.:warning."%s".(apply.#'c
f660	6f 6e 63 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	oncat...........................
f680	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 6f 72 2d 6d 65 73	......................(error-mes
f6a0	73 61 67 65 2d 73 74 72 69 6e 67 20 73 74 61 74 75 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	sage-string.status).............
f6c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
f6e0	20 20 20 20 28 61 6e 64 20 6d 73 67 20 28 6c 69 73 74 20 22 5c 6e 22 20 6d 73 67 29 29 29 29 29	....(and.msg.(list."\n".msg)))))
f700	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 53 69 67 6e 61 6c 20 60 66 69 6c 65 2d 65 72	..............;;.Signal.`file-er
f720	72 6f 72 27 20 77 69 74 68 20 70 72 6f 63 65 73 73 20 73 74 61 74 75 73 2e 0a 20 20 20 20 20 20	ror'.with.process.status........
f740	20 20 20 20 20 20 20 28 73 69 67 6e 61 6c 20 28 63 61 72 20 73 74 61 74 75 73 29 20 28 63 64 72	.......(signal.(car.status).(cdr
f760	20 73 74 61 74 75 73 29 29 29 29 0a 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 66 69 6c 65 20 73	.status)))).......(delete-file.s
f780	74 64 65 72 72 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 63 6f 6d 6d 61	tderr))))..(defun.counsel--comma
f7a0	6e 64 20 28 26 72 65 73 74 20 63 6f 6d 6d 61 6e 64 29 0a 20 20 22 46 6f 72 77 61 72 64 20 43 4f	nd.(&rest.command)..."Forward.CO
f7c0	4d 4d 41 4e 44 20 74 6f 20 60 63 6f 75 6e 73 65 6c 2d 2d 63 61 6c 6c 27 2e 22 0a 20 20 28 63 6f	MMAND.to.`counsel--call'."...(co
f7e0	75 6e 73 65 6c 2d 2d 63 61 6c 6c 20 63 6f 6d 6d 61 6e 64 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f	unsel--call.command))..(defun.co
f800	75 6e 73 65 6c 2d 2d 67 72 65 70 2d 75 6e 77 69 6e 64 20 28 29 0a 20 20 28 63 6f 75 6e 73 65 6c	unsel--grep-unwind.()...(counsel
f820	2d 64 65 6c 65 74 65 2d 70 72 6f 63 65 73 73 29 0a 20 20 28 73 77 69 70 65 72 2d 2d 63 6c 65 61	-delete-process)...(swiper--clea
f840	6e 75 70 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 63 6f 75	nup))..;;;###autoload.(defun.cou
f860	6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 20 28 26 6f 70 74 69 6f 6e 61 6c 20 69 6e 69 74 69 61 6c	nsel-git-grep.(&optional.initial
f880	2d 69 6e 70 75 74 20 69 6e 69 74 69 61 6c 2d 64 69 72 65 63 74 6f 72 79 20 63 6d 64 29 0a 20 20	-input.initial-directory.cmd)...
f8a0	22 47 72 65 70 20 66 6f 72 20 61 20 73 74 72 69 6e 67 20 69 6e 20 74 68 65 20 63 75 72 72 65 6e	"Grep.for.a.string.in.the.curren
f8c0	74 20 47 69 74 20 72 65 70 6f 73 69 74 6f 72 79 2e 0a 49 4e 49 54 49 41 4c 2d 49 4e 50 55 54 20	t.Git.repository..INITIAL-INPUT.
f8e0	63 61 6e 20 62 65 20 67 69 76 65 6e 20 61 73 20 74 68 65 20 69 6e 69 74 69 61 6c 20 6d 69 6e 69	can.be.given.as.the.initial.mini
f900	62 75 66 66 65 72 20 69 6e 70 75 74 2e 0a 49 4e 49 54 49 41 4c 2d 44 49 52 45 43 54 4f 52 59 2c	buffer.input..INITIAL-DIRECTORY,
f920	20 69 66 20 6e 6f 6e 2d 6e 69 6c 2c 20 69 73 20 75 73 65 64 20 61 73 20 74 68 65 20 72 6f 6f 74	.if.non-nil,.is.used.as.the.root
f940	20 64 69 72 65 63 74 6f 72 79 20 66 6f 72 20 73 65 61 72 63 68 2e 0a 57 68 65 6e 20 43 4d 44 20	.directory.for.search..When.CMD.
f960	69 73 20 61 20 73 74 72 69 6e 67 2c 20 75 73 65 20 69 74 20 61 73 20 61 20 5c 22 67 69 74 20 67	is.a.string,.use.it.as.a.\"git.g
f980	72 65 70 5c 22 20 63 6f 6d 6d 61 6e 64 2e 0a 57 68 65 6e 20 43 4d 44 20 69 73 20 6e 6f 6e 2d 6e	rep\".command..When.CMD.is.non-n
f9a0	69 6c 2c 20 70 72 6f 6d 70 74 20 66 6f 72 20 61 20 73 70 65 63 69 66 69 63 20 5c 22 67 69 74 20	il,.prompt.for.a.specific.\"git.
f9c0	67 72 65 70 5c 22 20 63 6f 6d 6d 61 6e 64 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29	grep\".command."...(interactive)
f9e0	0a 20 20 28 6c 65 74 20 28 28 70 72 6f 6a 2d 61 6e 64 2d 63 6d 64 20 28 63 6f 75 6e 73 65 6c 2d	...(let.((proj-and-cmd.(counsel-
fa00	2d 67 69 74 2d 67 72 65 70 2d 63 6d 64 2d 61 6e 64 2d 70 72 6f 6a 20 63 6d 64 29 29 0a 20 20 20	-git-grep-cmd-and-proj.cmd))....
fa20	20 20 20 20 20 70 72 6f 6a 29 0a 20 20 20 20 28 73 65 74 71 20 70 72 6f 6a 20 28 63 61 72 20 70	.....proj).....(setq.proj.(car.p
fa40	72 6f 6a 2d 61 6e 64 2d 63 6d 64 29 29 0a 20 20 20 20 28 73 65 74 71 20 63 6f 75 6e 73 65 6c 2d	roj-and-cmd)).....(setq.counsel-
fa60	67 69 74 2d 67 72 65 70 2d 63 6d 64 20 28 63 64 72 20 70 72 6f 6a 2d 61 6e 64 2d 63 6d 64 29 29	git-grep-cmd.(cdr.proj-and-cmd))
fa80	0a 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 72 65 71 75 69 72 65 2d 70 72 6f 67 72 61 6d 20 63 6f	.....(counsel-require-program.co
faa0	75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 63 6d 64 29 0a 20 20 20 20 28 6c 65 74 20 28 28 63	unsel-git-grep-cmd).....(let.((c
fac0	6f 6c 6c 65 63 74 69 6f 6e 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 28 69	ollection-function............(i
fae0	66 20 70 72 6f 6a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 63 6f 75 6e 73 65 6c 2d	f.proj................#'counsel-
fb00	67 69 74 2d 67 72 65 70 2d 70 72 6f 6a 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20	git-grep-proj-function..........
fb20	20 20 20 20 23 27 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 66 75 6e 63 74 69 6f 6e 29	....#'counsel-git-grep-function)
fb40	29 0a 20 20 20 20 20 20 20 20 20 20 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 28	)...........(default-directory.(
fb60	6f 72 20 69 6e 69 74 69 61 6c 2d 64 69 72 65 63 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20	or.initial-directory............
fb80	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 70 72 6f 6a 0a 20	......................(if.proj..
fba0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
fbc0	20 20 20 20 28 63 61 72 20 70 72 6f 6a 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	....(car.proj)..................
fbe0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 6c 6f 63 61 74	..................(counsel-locat
fc00	65 2d 67 69 74 2d 72 6f 6f 74 29 29 29 29 29 0a 20 20 20 20 20 20 28 69 76 79 2d 72 65 61 64 20	e-git-root))))).......(ivy-read.
fc20	22 67 69 74 20 67 72 65 70 3a 20 22 20 63 6f 6c 6c 65 63 74 69 6f 6e 2d 66 75 6e 63 74 69 6f 6e	"git.grep:.".collection-function
fc40	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20	.................:initial-input.
fc60	69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 64	initial-input.................:d
fc80	79 6e 61 6d 69 63 2d 63 6f 6c 6c 65 63 74 69 6f 6e 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20	ynamic-collection.t.............
fca0	20 20 20 20 3a 6b 65 79 6d 61 70 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 6d 61 70	....:keymap.counsel-git-grep-map
fcc0	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 23 27 63 6f 75 6e 73	.................:action.#'couns
fce0	65 6c 2d 67 69 74 2d 67 72 65 70 2d 61 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	el-git-grep-action..............
fd00	20 20 20 3a 68 69 73 74 6f 72 79 20 27 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 68 69	...:history.'counsel-git-grep-hi
fd20	73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 71 75 69 72 65 2d 6d	story.................:require-m
fd40	61 74 63 68 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27	atch.t.................:caller.'
fd60	63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75	counsel-git-grep))))..(defun.cou
fd80	6e 73 65 6c 2d 2d 67 69 74 2d 67 72 65 70 2d 69 6e 64 65 78 20 28 5f 72 65 2d 73 74 72 20 63 61	nsel--git-grep-index.(_re-str.ca
fda0	6e 64 73 29 0a 20 20 28 6c 65 74 20 28 6e 61 6d 65 20 6c 6e 29 0a 20 20 20 20 28 63 6f 6e 64 0a	nds)...(let.(name.ln).....(cond.
fdc0	20 20 20 20 20 20 28 69 76 79 2d 2d 6f 6c 64 2d 63 61 6e 64 73 0a 20 20 20 20 20 20 20 28 69 76	......(ivy--old-cands........(iv
fde0	79 2d 72 65 63 6f 6d 70 75 74 65 2d 69 6e 64 65 78 2d 73 77 69 70 65 72 2d 61 73 79 6e 63 20 6e	y-recompute-index-swiper-async.n
fe00	69 6c 20 63 61 6e 64 73 29 29 0a 20 20 20 20 20 20 28 28 75 6e 6c 65 73 73 20 28 77 69 74 68 2d	il.cands)).......((unless.(with-
fe20	69 76 79 2d 77 69 6e 64 6f 77 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65	ivy-window..................(whe
fe40	6e 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	n.buffer-file-name..............
fe60	20 20 20 20 20 20 28 73 65 74 71 20 6c 6e 20 28 6c 69 6e 65 2d 6e 75 6d 62 65 72 2d 61 74 2d 70	......(setq.ln.(line-number-at-p
fe80	6f 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 6e 61	os))....................(setq.na
fea0	6d 65 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 62 75 66 66 65	me.(file-name-nondirectory.buffe
fec0	72 2d 66 69 6c 65 2d 6e 61 6d 65 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 30 29 29 0a 20 20 20	r-file-name))))..........0))....
fee0	20 20 20 3b 3b 20 43 6c 6f 73 65 73 74 20 74 6f 20 63 75 72 72 65 6e 74 20 6c 69 6e 65 20 67 6f	...;;.Closest.to.current.line.go
ff00	69 6e 67 20 66 6f 72 77 61 72 64 73 2e 0a 20 20 20 20 20 20 28 28 6c 65 74 20 28 28 62 65 67 20	ing.forwards........((let.((beg.
ff20	28 31 2b 20 28 6c 65 6e 67 74 68 20 6e 61 6d 65 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 63	(1+.(length.name))))..........(c
ff40	6c 2d 70 6f 73 69 74 69 6f 6e 2d 69 66 20 28 6c 61 6d 62 64 61 20 28 78 29 0a 20 20 20 20 20 20	l-position-if.(lambda.(x).......
ff60	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 6e	.....................(and.(strin
ff80	67 2d 70 72 65 66 69 78 2d 70 20 6e 61 6d 65 20 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	g-prefix-p.name.x)..............
ffa0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3e 3d 20 28 73 74 72 69 6e 67 2d 74	...................(>=.(string-t
ffc0	6f 2d 6e 75 6d 62 65 72 20 28 73 75 62 73 74 72 69 6e 67 20 78 20 62 65 67 29 29 20 6c 6e 29 29	o-number.(substring.x.beg)).ln))
ffe0	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 63 61 6e 64 73	)..........................cands
10000	29 29 29 0a 20 20 20 20 20 20 3b 3b 20 43 6c 6f 73 65 73 74 20 74 6f 20 63 75 72 72 65 6e 74 20	))).......;;.Closest.to.current.
10020	6c 69 6e 65 20 67 6f 69 6e 67 20 62 61 63 6b 77 61 72 64 73 2e 0a 20 20 20 20 20 20 28 28 63 6c	line.going.backwards........((cl
10040	2d 70 6f 73 69 74 69 6f 6e 2d 69 66 20 28 6c 61 6d 62 64 61 20 28 78 29 0a 20 20 20 20 20 20 20	-position-if.(lambda.(x)........
10060	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 70 72 65 66 69 78	..................(string-prefix
10080	2d 70 20 6e 61 6d 65 20 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	-p.name.x)).....................
100a0	20 20 20 63 61 6e 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	...cands........................
100c0	3a 66 72 6f 6d 2d 65 6e 64 20 74 29 29 0a 20 20 20 20 20 20 28 74 20 30 29 29 29 29 0a 0a 28 69	:from-end.t)).......(t.0))))..(i
100e0	76 79 2d 63 6f 6e 66 69 67 75 72 65 20 27 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 0a 20	vy-configure.'counsel-git-grep..
10100	20 3a 6f 63 63 75 72 20 23 27 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 6f 63 63 75 72	.:occur.#'counsel-git-grep-occur
10120	0a 20 20 3a 75 6e 77 69 6e 64 2d 66 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 2d 67 72 65 70 2d 75 6e	...:unwind-fn.#'counsel--grep-un
10140	77 69 6e 64 0a 20 20 3a 69 6e 64 65 78 2d 66 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 2d 67 69 74 2d	wind...:index-fn.#'counsel--git-
10160	67 72 65 70 2d 69 6e 64 65 78 0a 20 20 3a 64 69 73 70 6c 61 79 2d 74 72 61 6e 73 66 6f 72 6d 65	grep-index...:display-transforme
10180	72 2d 66 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 74 72 61 6e 73 66 6f 72	r-fn.#'counsel-git-grep-transfor
101a0	6d 65 72 0a 20 20 3a 67 72 65 70 2d 70 20 74 0a 20 20 3a 65 78 69 74 2d 63 6f 64 65 73 20 27 28	mer...:grep-p.t...:exit-codes.'(
101c0	31 20 22 4e 6f 20 6d 61 74 63 68 65 73 20 66 6f 75 6e 64 22 29 29 0a 0a 28 64 65 66 75 6e 20 63	1."No.matches.found"))..(defun.c
101e0	6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 70 72 6f 6a 2d 66 75 6e 63 74 69 6f 6e 20 28 73	ounsel-git-grep-proj-function.(s
10200	74 72 29 0a 20 20 22 47 72 65 70 20 66 6f 72 20 53 54 52 20 69 6e 20 74 68 65 20 63 75 72 72 65	tr)..."Grep.for.STR.in.the.curre
10220	6e 74 20 47 69 74 20 72 65 70 6f 73 69 74 6f 72 79 2e 22 0a 20 20 28 6f 72 0a 20 20 20 28 69 76	nt.Git.repository."...(or....(iv
10240	79 2d 6d 6f 72 65 2d 63 68 61 72 73 29 0a 20 20 20 28 6c 65 74 20 28 28 72 65 67 65 78 20 28 73	y-more-chars)....(let.((regex.(s
10260	65 74 71 20 69 76 79 2d 2d 6f 6c 64 2d 72 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	etq.ivy--old-re.................
10280	20 20 20 20 20 20 28 69 76 79 2d 2d 72 65 67 65 78 20 73 74 72 20 74 29 29 29 29 0a 20 20 20 20	......(ivy--regex.str.t)))).....
102a0	20 28 63 6f 75 6e 73 65 6c 2d 2d 61 73 79 6e 63 2d 63 6f 6d 6d 61 6e 64 0a 20 20 20 20 20 20 28	.(counsel--async-command.......(
102c0	63 6f 6e 63 61 74 0a 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 63 6f 75 6e 73 65 6c 2d 67 69	concat........(format.counsel-gi
102e0	74 2d 67 72 65 70 2d 63 6d 64 20 72 65 67 65 78 29 0a 20 20 20 20 20 20 20 28 69 66 20 28 69 76	t-grep-cmd.regex)........(if.(iv
10300	79 2d 2d 63 61 73 65 2d 66 6f 6c 64 2d 70 20 73 74 72 29 20 22 20 2d 69 22 20 22 22 29 29 29 0a	y--case-fold-p.str).".-i".""))).
10320	20 20 20 20 20 6e 69 6c 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d	.....nil)))..(defun.counsel-git-
10340	67 72 65 70 2d 73 77 69 74 63 68 2d 63 6d 64 20 28 29 0a 20 20 22 53 65 74 20 60 63 6f 75 6e 73	grep-switch-cmd.()..."Set.`couns
10360	65 6c 2d 67 69 74 2d 67 72 65 70 2d 63 6d 64 27 20 74 6f 20 61 20 64 69 66 66 65 72 65 6e 74 20	el-git-grep-cmd'.to.a.different.
10380	76 61 6c 75 65 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 73 65 74 71 20	value."...(interactive)...(setq.
103a0	63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 63 6d 64 0a 20 20 20 20 20 20 20 20 28 69 76	counsel-git-grep-cmd.........(iv
103c0	79 2d 72 65 61 64 20 22 63 6d 64 3a 20 22 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d	y-read."cmd:.".counsel-git-grep-
103e0	63 6d 64 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 68	cmd-history...................:h
10400	69 73 74 6f 72 79 20 27 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 63 6d 64 2d 68 69 73	istory.'counsel-git-grep-cmd-his
10420	74 6f 72 79 29 29 0a 20 20 28 73 65 74 71 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d	tory))...(setq.counsel-git-grep-
10440	63 6d 64 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 64 75 70 73	cmd-history.........(delete-dups
10460	20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 63 6d 64 2d 68 69 73 74 6f 72 79 29 29 0a	.counsel-git-grep-cmd-history)).
10480	20 20 28 75 6e 6c 65 73 73 20 28 69 76 79 2d 73 74 61 74 65 2d 64 79 6e 61 6d 69 63 2d 63 6f 6c	..(unless.(ivy-state-dynamic-col
104a0	6c 65 63 74 69 6f 6e 20 69 76 79 2d 6c 61 73 74 29 0a 20 20 20 20 28 73 65 74 71 20 69 76 79 2d	lection.ivy-last).....(setq.ivy-
104c0	2d 61 6c 6c 2d 63 61 6e 64 69 64 61 74 65 73 0a 20 20 20 20 20 20 20 20 20 20 28 61 6c 6c 2d 63	-all-candidates...........(all-c
104e0	6f 6d 70 6c 65 74 69 6f 6e 73 20 22 22 20 23 27 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70	ompletions."".#'counsel-git-grep
10500	2d 66 75 6e 63 74 69 6f 6e 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 6e	-function))))..(defun.counsel--n
10520	6f 72 6d 61 6c 69 7a 65 2d 67 72 65 70 2d 6d 61 74 63 68 20 28 73 74 72 29 0a 20 20 3b 3b 20 50	ormalize-grep-match.(str)...;;.P
10540	72 65 70 65 6e 64 20 2e 2f 20 69 66 20 6e 65 63 65 73 73 61 72 79 3a 0a 20 20 28 75 6e 6c 65 73	repend../.if.necessary:...(unles
10560	73 20 28 69 76 79 2d 2d 73 74 61 72 74 73 2d 77 69 74 68 2d 64 6f 74 73 6c 61 73 68 20 73 74 72	s.(ivy--starts-with-dotslash.str
10580	29 0a 20 20 20 20 28 73 65 74 71 20 73 74 72 20 28 63 6f 6e 63 61 74 20 22 2e 2f 22 20 73 74 72	).....(setq.str.(concat."./".str
105a0	29 29 29 0a 20 20 3b 3b 20 52 65 6d 6f 76 65 20 63 6f 6c 75 6d 6e 20 69 6e 66 6f 20 69 66 20 61	)))...;;.Remove.column.info.if.a
105c0	6e 79 3a 0a 20 20 28 73 61 76 65 2d 6d 61 74 63 68 2d 64 61 74 61 0a 20 20 20 20 28 77 68 65 6e	ny:...(save-match-data.....(when
105e0	20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 0a 20 20 20 20 20 20 20 20 20 20 20 22 5b 5e 5c 6e 3a	.(string-match............"[^\n:
10600	5d 2b 3f 5b 5e 5c 6e 2f 3a 5d 3a 5b 5c 74 20 5d 2a 5b 31 2d 39 5d 5b 30 2d 39 5d 2a 5b 5c 74 20	]+?[^\n/:]:[\t.]*[1-9][0-9]*[\t.
10620	5d 2a 3a 5c 5c 28 5b 31 2d 39 5d 5b 30 2d 39 5d 2a 3a 5c 5c 29 22 0a 20 20 20 20 20 20 20 20 20	]*:\\([1-9][0-9]*:\\)"..........
10640	20 20 73 74 72 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 73 74 72 20 28 72 65 70 6c 61 63 65 2d	..str).......(setq.str.(replace-
10660	6d 61 74 63 68 20 22 22 20 74 20 74 20 73 74 72 20 31 29 29 29 29 0a 20 20 73 74 72 29 0a 0a 28	match."".t.t.str.1))))...str)..(
10680	64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 67 69 74 2d 67 72 65 70 2d 6f 63 63 75 72 2d 63 6d	defun.counsel--git-grep-occur-cm
106a0	64 20 28 69 6e 70 75 74 29 0a 20 20 28 6c 65 74 2a 20 28 28 72 65 67 65 78 20 69 76 79 2d 2d 6f	d.(input)...(let*.((regex.ivy--o
106c0	6c 64 2d 72 65 29 0a 20 20 20 20 20 20 20 20 20 28 70 6f 73 69 74 69 76 65 2d 70 61 74 74 65 72	ld-re)..........(positive-patter
106e0	6e 20 3b 3b 20 67 69 74 2d 67 72 65 70 20 63 61 6e 27 74 20 68 61 6e 64 6c 65 20 2e 2a 3f 0a 20	n.;;.git-grep.can't.handle..*?..
10700	20 20 20 20 20 20 20 20 20 28 69 76 79 2d 2d 73 74 72 69 6e 67 2d 72 65 70 6c 61 63 65 20 22 2e	.........(ivy--string-replace.".
10720	2a 3f 22 20 22 2e 2a 22 20 28 69 76 79 2d 72 65 2d 74 6f 2d 73 74 72 20 72 65 67 65 78 29 29 29	*?".".*".(ivy-re-to-str.regex)))
10740	0a 20 20 20 20 20 20 20 20 20 28 6e 65 67 61 74 69 76 65 2d 70 61 74 74 65 72 6e 73 0a 20 20 20	..........(negative-patterns....
10760	20 20 20 20 20 20 20 28 69 66 20 28 73 74 72 69 6e 67 70 20 72 65 67 65 78 29 20 22 22 0a 20 20	.......(if.(stringp.regex).""...
10780	20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 6f 6e 63 61 74 20 28 6c 61 6d 62 64 61 20 28 78 29	..........(mapconcat.(lambda.(x)
107a0	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 61 6e 64 20 28	..........................(and.(
107c0	6e 75 6c 6c 20 28 63 64 72 20 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	null.(cdr.x))...................
107e0	20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 7c 20 67 72 65 70 20 2d 76 20 25	............(format."|.grep.-v.%
10800	73 22 20 28 63 61 72 20 78 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	s".(car.x))))...................
10820	20 20 20 20 20 72 65 67 65 78 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.....regex......................
10840	20 20 22 20 22 29 29 29 29 0a 20 20 20 20 28 63 6f 6e 63 61 74 0a 20 20 20 20 20 28 66 6f 72 6d	..".")))).....(concat......(form
10860	61 74 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 63 6d 64 20 70 6f 73 69 74 69 76 65	at.counsel-git-grep-cmd.positive
10880	2d 70 61 74 74 65 72 6e 29 0a 20 20 20 20 20 6e 65 67 61 74 69 76 65 2d 70 61 74 74 65 72 6e 73	-pattern)......negative-patterns
108a0	0a 20 20 20 20 20 28 69 66 20 28 69 76 79 2d 2d 63 61 73 65 2d 66 6f 6c 64 2d 70 20 69 6e 70 75	......(if.(ivy--case-fold-p.inpu
108c0	74 29 20 22 20 2d 69 22 20 22 22 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d	t).".-i".""))))..(defun.counsel-
108e0	67 69 74 2d 67 72 65 70 2d 6f 63 63 75 72 20 28 26 6f 70 74 69 6f 6e 61 6c 20 5f 63 61 6e 64 73	git-grep-occur.(&optional._cands
10900	29 0a 20 20 22 47 65 6e 65 72 61 74 65 20 61 20 63 75 73 74 6f 6d 20 6f 63 63 75 72 20 62 75 66	)..."Generate.a.custom.occur.buf
10920	66 65 72 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 27 2e 22 0a 20 20 28	fer.for.`counsel-git-grep'."...(
10940	63 6f 75 6e 73 65 6c 2d 67 72 65 70 2d 6c 69 6b 65 2d 6f 63 63 75 72 20 23 27 63 6f 75 6e 73 65	counsel-grep-like-occur.#'counse
10960	6c 2d 2d 67 69 74 2d 67 72 65 70 2d 6f 63 63 75 72 2d 63 6d 64 29 29 0a 0a 28 64 65 66 75 6e 20	l--git-grep-occur-cmd))..(defun.
10980	63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 71 75 65 72 79 2d 72 65 70 6c 61 63 65 20 28	counsel-git-grep-query-replace.(
109a0	29 0a 20 20 22 53 74 61 72 74 20 60 71 75 65 72 79 2d 72 65 70 6c 61 63 65 27 20 77 69 74 68 20	)..."Start.`query-replace'.with.
109c0	73 74 72 69 6e 67 20 74 6f 20 72 65 70 6c 61 63 65 20 66 72 6f 6d 20 6c 61 73 74 20 73 65 61 72	string.to.replace.from.last.sear
109e0	63 68 20 73 74 72 69 6e 67 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 75	ch.string."...(interactive)...(u
10a00	6e 6c 65 73 73 20 28 77 69 6e 64 6f 77 2d 6d 69 6e 69 62 75 66 66 65 72 2d 70 29 0a 20 20 20 20	nless.(window-minibuffer-p).....
10a20	28 75 73 65 72 2d 65 72 72 6f 72 0a 20 20 20 20 20 22 53 68 6f 75 6c 64 20 6f 6e 6c 79 20 62 65	(user-error......"Should.only.be
10a40	20 63 61 6c 6c 65 64 20 69 6e 20 74 68 65 20 6d 69 6e 69 62 75 66 66 65 72 20 74 68 72 6f 75 67	.called.in.the.minibuffer.throug
10a60	68 20 60 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 6d 61 70 27 22 29 29 0a 20 20 28 6c	h.`counsel-git-grep-map'"))...(l
10a80	65 74 2a 20 28 28 65 6e 61 62 6c 65 2d 72 65 63 75 72 73 69 76 65 2d 6d 69 6e 69 62 75 66 66 65	et*.((enable-recursive-minibuffe
10aa0	72 73 20 74 29 0a 20 20 20 20 20 20 20 20 20 28 66 72 6f 6d 20 28 69 76 79 2d 2d 72 65 67 65 78	rs.t)..........(from.(ivy--regex
10ac0	20 69 76 79 2d 74 65 78 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 74 6f 20 28 71 75 65 72 79 2d	.ivy-text))..........(to.(query-
10ae0	72 65 70 6c 61 63 65 2d 72 65 61 64 2d 74 6f 20 66 72 6f 6d 20 22 51 75 65 72 79 20 72 65 70 6c	replace-read-to.from."Query.repl
10b00	61 63 65 22 20 74 29 29 29 0a 20 20 20 20 28 69 76 79 2d 65 78 69 74 2d 77 69 74 68 2d 61 63 74	ace".t))).....(ivy-exit-with-act
10b20	69 6f 6e 0a 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 5f 29 0a 20 20 20 20 20 20 20 28 6c 65 74	ion......(lambda.(_)........(let
10b40	20 28 64 6f 6e 65 2d 62 75 66 66 65 72 73 29 0a 20 20 20 20 20 20 20 20 20 28 64 6f 6c 69 73 74	.(done-buffers)..........(dolist
10b60	20 28 63 61 6e 64 20 69 76 79 2d 2d 6f 6c 64 2d 63 61 6e 64 73 29 0a 20 20 20 20 20 20 20 20 20	.(cand.ivy--old-cands)..........
10b80	20 20 28 77 68 65 6e 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 5c 5c 60 5c 5c 28 2e 2a 3f	..(when.(string-match."\\`\\(.*?
10ba0	5c 5c 29 3a 5c 5c 28 5b 30 2d 39 5d 2b 5c 5c 29 3a 5c 5c 28 2e 2a 5c 5c 29 5c 5c 27 22 20 63 61	\\):\\([0-9]+\\):\\(.*\\)\\'".ca
10bc0	6e 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 69 76 79 2d 77 69 6e 64 6f	nd)..............(with-ivy-windo
10be0	77 0a 20 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 2d 6e 61 6d	w................(let.((file-nam
10c00	65 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 31 20	e.(match-string-no-properties.1.
10c20	63 61 6e 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 66	cand)))..................(setq.f
10c40	69 6c 65 2d 6e 61 6d 65 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 0a 20 20 20 20 20	ile-name.(expand-file-name......
10c60	20 20 20 20 20 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	.............................fil
10c80	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 20 20 20 20	e-name..........................
10ca0	20 20 20 20 20 20 20 20 20 28 69 76 79 2d 73 74 61 74 65 2d 64 69 72 65 63 74 6f 72 79 20 69 76	.........(ivy-state-directory.iv
10cc0	79 2d 6c 61 73 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65	y-last)))..................(unle
10ce0	73 73 20 28 6d 65 6d 62 65 72 20 66 69 6c 65 2d 6e 61 6d 65 20 64 6f 6e 65 2d 62 75 66 66 65 72	ss.(member.file-name.done-buffer
10d00	73 29 0a 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 66 69 6c 65	s)....................(push.file
10d20	2d 6e 61 6d 65 20 64 6f 6e 65 2d 62 75 66 66 65 72 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	-name.done-buffers).............
10d40	20 20 20 20 20 20 20 28 66 69 6e 64 2d 66 69 6c 65 20 66 69 6c 65 2d 6e 61 6d 65 29 0a 20 20 20	.......(find-file.file-name)....
10d60	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e	................(goto-char.(poin
10d80	74 2d 6d 69 6e 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 65 72 66 6f	t-min)))..................(perfo
10da0	72 6d 2d 72 65 70 6c 61 63 65 20 66 72 6f 6d 20 74 6f 20 74 20 74 20 6e 69 6c 29 29 29 29 29 29	rm-replace.from.to.t.t.nil))))))
10dc0	29 29 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 73 74 61 73 68 27 0a 0a	))))..;;;;.`counsel-git-stash'..
10de0	28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 73 74 61 73 68 2d 6b 69 6c 6c 2d 61 63	(defun.counsel-git-stash-kill-ac
10e00	74 69 6f 6e 20 28 78 29 0a 20 20 22 41 64 64 20 67 69 74 20 73 74 61 73 68 20 63 6f 6d 6d 61 6e	tion.(x)..."Add.git.stash.comman
10e20	64 20 74 6f 20 6b 69 6c 6c 20 72 69 6e 67 2e 0a 54 68 65 20 67 69 74 20 63 6f 6d 6d 61 6e 64 20	d.to.kill.ring..The.git.command.
10e40	61 70 70 6c 69 65 73 20 74 68 65 20 73 74 61 73 68 20 65 6e 74 72 79 20 77 68 65 72 65 20 63 61	applies.the.stash.entry.where.ca
10e60	6e 64 69 64 61 74 65 20 58 20 77 61 73 20 66 6f 75 6e 64 20 69 6e 2e 22 0a 20 20 28 77 68 65 6e	ndidate.X.was.found.in."...(when
10e80	20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 5c 5c 28 5b 5e 3a 5d 2b 5c 5c 29 3a 22 20 78 29	.(string-match."\\([^:]+\\):".x)
10ea0	0a 20 20 20 20 28 6b 69 6c 6c 2d 6e 65 77 20 28 6d 65 73 73 61 67 65 20 28 66 6f 72 6d 61 74 20	.....(kill-new.(message.(format.
10ec0	22 67 69 74 20 73 74 61 73 68 20 61 70 70 6c 79 20 25 73 22 20 28 6d 61 74 63 68 2d 73 74 72 69	"git.stash.apply.%s".(match-stri
10ee0	6e 67 20 31 20 78 29 29 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65	ng.1.x))))))..;;;###autoload.(de
10f00	66 75 6e 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 73 74 61 73 68 20 28 29 0a 20 20 22 53 65 61 72	fun.counsel-git-stash.()..."Sear
10f20	63 68 20 74 68 72 6f 75 67 68 20 61 6c 6c 20 61 76 61 69 6c 61 62 6c 65 20 67 69 74 20 73 74 61	ch.through.all.available.git.sta
10f40	73 68 65 73 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 2a 20 28	shes."...(interactive)...(let*.(
10f60	28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 28 63 6f 75 6e 73 65 6c 2d 6c 6f 63 61	(default-directory.(counsel-loca
10f80	74 65 2d 67 69 74 2d 72 6f 6f 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 63 61 6e 64 73 20 28 73	te-git-root))..........(cands.(s
10fa0	70 6c 69 74 2d 73 74 72 69 6e 67 20 28 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e 64 2d 74 6f 2d 73 74	plit-string.(shell-command-to-st
10fc0	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 20 20 20 20 20 20 20	ring............................
10fe0	20 20 20 20 22 49 46 53 3d 24 27 5c 6e 27 0a 66 6f 72 20 69 20 69 6e 20 60 67 69 74 20 73 74 61	...."IFS=$'\n'.for.i.in.`git.sta
11000	73 68 20 6c 69 73 74 20 2d 2d 66 6f 72 6d 61 74 3d 5c 22 25 67 64 5c 22 60 3b 20 64 6f 0a 20 20	sh.list.--format=\"%gd\"`;.do...
11020	20 20 67 69 74 20 73 74 61 73 68 20 73 68 6f 77 20 2d 70 20 24 69 20 7c 20 67 72 65 70 20 2d 48	..git.stash.show.-p.$i.|.grep.-H
11040	20 2d 2d 6c 61 62 65 6c 3d 5c 22 24 69 5c 22 20 5c 22 24 31 5c 22 0a 64 6f 6e 65 22 29 20 22 5c	.--label=\"$i\".\"$1\".done")."\
11060	6e 22 20 74 29 29 29 0a 20 20 20 20 28 69 76 79 2d 72 65 61 64 20 22 67 69 74 20 73 74 61 73 68	n".t))).....(ivy-read."git.stash
11080	3a 20 22 20 63 61 6e 64 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20	:.".cands...............:action.
110a0	23 27 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 73 74 61 73 68 2d 6b 69 6c 6c 2d 61 63 74 69 6f 6e 0a	#'counsel-git-stash-kill-action.
110c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 67	..............:caller.'counsel-g
110e0	69 74 2d 73 74 61 73 68 29 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 6c	it-stash)))..;;;;.`counsel-git-l
11100	6f 67 27 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 6c 6f 67 2d 63 6d 64	og'..(defvar.counsel-git-log-cmd
11120	20 22 47 49 54 5f 50 41 47 45 52 3d 63 61 74 20 67 69 74 20 6c 6f 67 20 2d 2d 6e 6f 2d 63 6f 6c	."GIT_PAGER=cat.git.log.--no-col
11140	6f 72 20 2d 2d 67 72 65 70 20 27 25 73 27 22 0a 20 20 22 43 6f 6d 6d 61 6e 64 20 75 73 65 64 20	or.--grep.'%s'"..."Command.used.
11160	66 6f 72 20 5c 22 67 69 74 20 6c 6f 67 5c 22 2e 22 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73	for.\"git.log\".")..(defun.couns
11180	65 6c 2d 67 69 74 2d 6c 6f 67 2d 66 75 6e 63 74 69 6f 6e 20 28 5f 29 0a 20 20 22 53 65 61 72 63	el-git-log-function.(_)..."Searc
111a0	68 20 66 6f 72 20 60 69 76 79 2d 72 65 67 65 78 27 20 69 6e 20 67 69 74 20 6c 6f 67 2e 22 0a 20	h.for.`ivy-regex'.in.git.log."..
111c0	20 28 6f 72 0a 20 20 20 28 69 76 79 2d 6d 6f 72 65 2d 63 68 61 72 73 29 0a 20 20 20 28 70 72 6f	.(or....(ivy-more-chars)....(pro
111e0	67 6e 0a 20 20 20 20 20 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 2d 79 61 6e 6b 2d 70 6f 70 2d 66 6f	gn......;;.`counsel--yank-pop-fo
11200	72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 27 20 75 73 65 73 20 74 68 69 73 0a 20 20 20 20 20 28 73	rmat-function'.uses.this......(s
11220	65 74 71 20 69 76 79 2d 2d 6f 6c 64 2d 72 65 20 69 76 79 2d 72 65 67 65 78 29 0a 20 20 20 20 20	etq.ivy--old-re.ivy-regex)......
11240	28 63 6f 75 6e 73 65 6c 2d 2d 61 73 79 6e 63 2d 63 6f 6d 6d 61 6e 64 0a 20 20 20 20 20 20 3b 3b	(counsel--async-command.......;;
11260	20 22 67 69 74 20 6c 6f 67 20 2d 2d 67 72 65 70 22 20 6c 69 6b 65 73 20 74 6f 20 68 61 76 65 20	."git.log.--grep".likes.to.have.
11280	67 72 6f 75 70 73 20 71 75 6f 74 65 64 20 65 2e 67 2e 20 5c 28 66 6f 6f 5c 29 2e 0a 20 20 20 20	groups.quoted.e.g..\(foo\)......
112a0	20 20 3b 3b 20 42 75 74 20 69 74 20 64 6f 65 73 6e 27 74 20 6c 69 6b 65 20 74 68 65 20 6e 6f 6e	..;;.But.it.doesn't.like.the.non
112c0	2d 67 72 65 65 64 79 20 22 2e 2a 3f 22 2e 0a 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 63 6f 75	-greedy.".*?"........(format.cou
112e0	6e 73 65 6c 2d 67 69 74 2d 6c 6f 67 2d 63 6d 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	nsel-git-log-cmd...............(
11300	69 76 79 2d 2d 73 74 72 69 6e 67 2d 72 65 70 6c 61 63 65 20 22 2e 2a 3f 22 20 22 2e 2a 22 20 28	ivy--string-replace.".*?".".*".(
11320	69 76 79 2d 72 65 2d 74 6f 2d 73 74 72 20 69 76 79 2d 2d 6f 6c 64 2d 72 65 29 29 29 29 0a 20 20	ivy-re-to-str.ivy--old-re))))...
11340	20 20 20 6e 69 6c 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 6c 6f	...nil)))..(defun.counsel-git-lo
11360	67 2d 61 63 74 69 6f 6e 20 28 78 29 0a 20 20 22 41 64 64 20 63 61 6e 64 69 64 61 74 65 20 58 20	g-action.(x)..."Add.candidate.X.
11380	74 6f 20 6b 69 6c 6c 20 72 69 6e 67 2e 22 0a 20 20 28 6d 65 73 73 61 67 65 20 22 25 53 22 20 28	to.kill.ring."...(message."%S".(
113a0	6b 69 6c 6c 2d 6e 65 77 20 78 29 29 29 0a 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e	kill-new.x)))..(declare-function
113c0	20 6d 61 67 69 74 2d 73 68 6f 77 2d 63 6f 6d 6d 69 74 20 22 65 78 74 3a 6d 61 67 69 74 2d 64 69	.magit-show-commit."ext:magit-di
113e0	66 66 22 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 6c 6f 67 2d 73 68 6f	ff")..(defun.counsel-git-log-sho
11400	77 2d 63 6f 6d 6d 69 74 2d 61 63 74 69 6f 6e 20 28 6c 6f 67 2d 65 6e 74 72 79 29 0a 20 20 22 56	w-commit-action.(log-entry)..."V
11420	69 73 69 74 20 74 68 65 20 63 6f 6d 6d 69 74 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 74 6f	isit.the.commit.corresponding.to
11440	20 4c 4f 47 2d 45 4e 54 52 59 2e 22 0a 20 20 28 72 65 71 75 69 72 65 20 27 6d 61 67 69 74 2d 64	.LOG-ENTRY."...(require.'magit-d
11460	69 66 66 29 0a 20 20 28 6c 65 74 20 28 28 63 6f 6d 6d 69 74 20 28 73 75 62 73 74 72 69 6e 67 2d	iff)...(let.((commit.(substring-
11480	6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 6c 6f 67 2d 65 6e 74 72 79 20 30 20 28 73 74 72 69 6e	no-properties.log-entry.0.(strin
114a0	67 2d 6d 61 74 63 68 2d 70 20 22 5c 5c 57 22 20 6c 6f 67 2d 65 6e 74 72 79 29 29 29 29 0a 20 20	g-match-p."\\W".log-entry))))...
114c0	20 20 28 6d 61 67 69 74 2d 73 68 6f 77 2d 63 6f 6d 6d 69 74 20 63 6f 6d 6d 69 74 29 29 29 0a 0a	..(magit-show-commit.commit)))..
114e0	28 69 76 79 2d 73 65 74 2d 61 63 74 69 6f 6e 73 0a 20 27 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 6c	(ivy-set-actions..'counsel-git-l
11500	6f 67 0a 20 27 28 28 22 76 22 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 6c 6f 67 2d 73 68 6f 77 2d	og..'(("v".counsel-git-log-show-
11520	63 6f 6d 6d 69 74 2d 61 63 74 69 6f 6e 20 22 76 69 73 69 74 20 63 6f 6d 6d 69 74 22 29 29 29 0a	commit-action."visit.commit"))).
11540	0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 63 68 61 6e 67 65 2d 77 6f 72 6b 74 72	.;;;;.`counsel-git-change-worktr
11560	65 65 27 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 63 68 61 6e 67 65 2d 77	ee'..(defun.counsel-git-change-w
11580	6f 72 6b 74 72 65 65 2d 61 63 74 69 6f 6e 20 28 67 69 74 2d 72 6f 6f 74 2d 64 69 72 20 74 72 65	orktree-action.(git-root-dir.tre
115a0	65 29 0a 20 20 22 46 69 6e 64 20 74 68 65 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 66 69 6c	e)..."Find.the.corresponding.fil
115c0	65 20 69 6e 20 74 68 65 20 77 6f 72 6b 74 72 65 65 20 6c 6f 63 61 74 65 64 20 61 74 20 74 72 65	e.in.the.worktree.located.at.tre
115e0	65 2e 0a 54 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 20 69 73 20 61 73 73 75 6d 65 64	e..The.current.buffer.is.assumed
11600	20 74 6f 20 62 65 20 69 6e 20 61 20 73 75 62 64 69 72 65 63 74 6f 72 79 20 6f 66 20 47 49 54 2d	.to.be.in.a.subdirectory.of.GIT-
11620	52 4f 4f 54 2d 44 49 52 2e 0a 54 52 45 45 20 69 73 20 74 68 65 20 73 65 6c 65 63 74 65 64 20 63	ROOT-DIR..TREE.is.the.selected.c
11640	61 6e 64 69 64 61 74 65 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 6e 65 77 2d 72 6f 6f 74 2d 64 69	andidate."...(let*.((new-root-di
11660	72 20 28 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 77 6f 72 6b 74 72 65 65 2d 70 61 72 73 65 2d 72 6f	r.(counsel-git-worktree-parse-ro
11680	6f 74 20 74 72 65 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 74 72 65 65 2d 66 69 6c 65 6e 61 6d	ot.tree))..........(tree-filenam
116a0	65 20 28 66 69 6c 65 2d 72 65 6c 61 74 69 76 65 2d 6e 61 6d 65 20 62 75 66 66 65 72 2d 66 69 6c	e.(file-relative-name.buffer-fil
116c0	65 2d 6e 61 6d 65 20 67 69 74 2d 72 6f 6f 74 2d 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 20 28	e-name.git-root-dir))..........(
116e0	66 69 6c 65 2d 6e 61 6d 65 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 74 72 65 65	file-name.(expand-file-name.tree
11700	2d 66 69 6c 65 6e 61 6d 65 20 6e 65 77 2d 72 6f 6f 74 2d 64 69 72 29 29 29 0a 20 20 20 20 28 66	-filename.new-root-dir))).....(f
11720	69 6e 64 2d 66 69 6c 65 20 66 69 6c 65 2d 6e 61 6d 65 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f	ind-file.file-name)))..(defun.co
11740	75 6e 73 65 6c 2d 67 69 74 2d 77 6f 72 6b 74 72 65 65 2d 6c 69 73 74 20 28 29 0a 20 20 22 4c 69	unsel-git-worktree-list.()..."Li
11760	73 74 20 77 6f 72 6b 74 72 65 65 73 20 69 6e 20 74 68 65 20 47 69 74 20 72 65 70 6f 73 69 74 6f	st.worktrees.in.the.Git.reposito
11780	72 79 20 63 6f 6e 74 61 69 6e 69 6e 67 20 74 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72	ry.containing.the.current.buffer
117a0	2e 22 0a 20 20 28 6c 65 74 20 28 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 28 63	."...(let.((default-directory.(c
117c0	6f 75 6e 73 65 6c 2d 6c 6f 63 61 74 65 2d 67 69 74 2d 72 6f 6f 74 29 29 29 0a 20 20 20 20 28 73	ounsel-locate-git-root))).....(s
117e0	70 6c 69 74 2d 73 74 72 69 6e 67 20 28 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e 64 2d 74 6f 2d 73 74	plit-string.(shell-command-to-st
11800	72 69 6e 67 20 22 67 69 74 20 77 6f 72 6b 74 72 65 65 20 6c 69 73 74 22 29 20 22 5c 6e 22 20 74	ring."git.worktree.list")."\n".t
11820	29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 77 6f 72 6b 74 72 65 65	)))..(defun.counsel-git-worktree
11840	2d 70 61 72 73 65 2d 72 6f 6f 74 20 28 74 72 65 65 29 0a 20 20 22 52 65 74 75 72 6e 20 77 6f 72	-parse-root.(tree)..."Return.wor
11860	6b 74 72 65 65 20 66 72 6f 6d 20 63 61 6e 64 69 64 61 74 65 20 54 52 45 45 2e 22 0a 20 20 28 73	ktree.from.candidate.TREE."...(s
11880	75 62 73 74 72 69 6e 67 20 74 72 65 65 20 30 20 28 69 76 79 2d 2d 73 74 72 69 6e 67 2d 73 65 61	ubstring.tree.0.(ivy--string-sea
118a0	72 63 68 20 22 20 22 20 74 72 65 65 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d	rch.".".tree)))..(defun.counsel-
118c0	67 69 74 2d 63 6c 6f 73 65 2d 77 6f 72 6b 74 72 65 65 2d 66 69 6c 65 73 2d 61 63 74 69 6f 6e 20	git-close-worktree-files-action.
118e0	28 72 6f 6f 74 2d 64 69 72 29 0a 20 20 22 43 6c 6f 73 65 20 61 6c 6c 20 62 75 66 66 65 72 73 20	(root-dir)..."Close.all.buffers.
11900	66 72 6f 6d 20 74 68 65 20 77 6f 72 6b 74 72 65 65 20 6c 6f 63 61 74 65 64 20 61 74 20 52 4f 4f	from.the.worktree.located.at.ROO
11920	54 2d 44 49 52 2e 22 0a 20 20 28 73 65 74 71 20 72 6f 6f 74 2d 64 69 72 20 28 63 6f 75 6e 73 65	T-DIR."...(setq.root-dir.(counse
11940	6c 2d 67 69 74 2d 77 6f 72 6b 74 72 65 65 2d 70 61 72 73 65 2d 72 6f 6f 74 20 72 6f 6f 74 2d 64	l-git-worktree-parse-root.root-d
11960	69 72 29 29 0a 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 28 64 6f 6c 69	ir))...(save-excursion.....(doli
11980	73 74 20 28 62 75 66 20 28 62 75 66 66 65 72 2d 6c 69 73 74 29 29 0a 20 20 20 20 20 20 28 73 65	st.(buf.(buffer-list)).......(se
119a0	74 2d 62 75 66 66 65 72 20 62 75 66 29 0a 20 20 20 20 20 20 28 61 6e 64 20 62 75 66 66 65 72 2d	t-buffer.buf).......(and.buffer-
119c0	66 69 6c 65 2d 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 3d 20 22 2e	file-name............(string=.".
119e0	22 20 28 66 69 6c 65 2d 72 65 6c 61 74 69 76 65 2d 6e 61 6d 65 20 72 6f 6f 74 2d 64 69 72 20 28	".(file-relative-name.root-dir.(
11a00	63 6f 75 6e 73 65 6c 2d 6c 6f 63 61 74 65 2d 67 69 74 2d 72 6f 6f 74 29 29 29 0a 20 20 20 20 20	counsel-locate-git-root)))......
11a20	20 20 20 20 20 20 28 6b 69 6c 6c 2d 62 75 66 66 65 72 20 62 75 66 29 29 29 29 29 0a 0a 28 69 76	......(kill-buffer.buf)))))..(iv
11a40	79 2d 73 65 74 2d 61 63 74 69 6f 6e 73 0a 20 27 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 63 68 61 6e	y-set-actions..'counsel-git-chan
11a60	67 65 2d 77 6f 72 6b 74 72 65 65 0a 20 27 28 28 22 6b 22 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d	ge-worktree..'(("k".counsel-git-
11a80	63 6c 6f 73 65 2d 77 6f 72 6b 74 72 65 65 2d 66 69 6c 65 73 2d 61 63 74 69 6f 6e 20 22 6b 69 6c	close-worktree-files-action."kil
11aa0	6c 20 61 6c 6c 22 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	l.all")))..;;;###autoload.(defun
11ac0	20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 63 68 61 6e 67 65 2d 77 6f 72 6b 74 72 65 65 20 28 29 0a	.counsel-git-change-worktree.().
11ae0	20 20 22 46 69 6e 64 20 74 68 65 20 66 69 6c 65 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 74	.."Find.the.file.corresponding.t
11b00	6f 20 74 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 20 6f 6e 20 61 20 64 69 66 66 65 72	o.the.current.buffer.on.a.differ
11b20	65 6e 74 20 77 6f 72 6b 74 72 65 65 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20	ent.worktree."...(interactive)..
11b40	20 28 6c 65 74 20 28 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 28 63 6f 75 6e 73	.(let.((default-directory.(couns
11b60	65 6c 2d 6c 6f 63 61 74 65 2d 67 69 74 2d 72 6f 6f 74 29 29 29 0a 20 20 20 20 28 69 76 79 2d 72	el-locate-git-root))).....(ivy-r
11b80	65 61 64 20 22 53 65 6c 65 63 74 20 77 6f 72 6b 74 72 65 65 3a 20 22 0a 20 20 20 20 20 20 20 20	ead."Select.worktree:.".........
11ba0	20 20 20 20 20 20 28 6f 72 20 28 63 6c 2d 64 65 6c 65 74 65 20 64 65 66 61 75 6c 74 2d 64 69 72	......(or.(cl-delete.default-dir
11bc0	65 63 74 6f 72 79 20 28 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 77 6f 72 6b 74 72 65 65 2d 6c 69 73	ectory.(counsel-git-worktree-lis
11be0	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 20 20 20 20 20 20	t)..............................
11c00	3a 6b 65 79 20 23 27 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 77 6f 72 6b 74 72 65 65 2d 70 61 72 73	:key.#'counsel-git-worktree-pars
11c20	65 2d 72 6f 6f 74 20 3a 74 65 73 74 20 23 27 73 74 72 69 6e 67 3d 29 0a 20 20 20 20 20 20 20 20	e-root.:test.#'string=).........
11c40	20 20 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 4e 6f 20 6f 74 68 65 72 20 77 6f 72 6b 74	..........(error."No.other.workt
11c60	72 65 65 73 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 28 6c	rees"))...............:action.(l
11c80	61 6d 62 64 61 20 28 74 72 65 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ambda.(tree)....................
11ca0	20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 63 68 61 6e 67 65 2d 77 6f 72 6b 74 72 65	.....(counsel-git-change-worktre
11cc0	65 2d 61 63 74 69 6f 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	e-action........................
11ce0	20 20 28 69 76 79 2d 73 74 61 74 65 2d 64 69 72 65 63 74 6f 72 79 20 69 76 79 2d 6c 61 73 74 29	..(ivy-state-directory.ivy-last)
11d00	20 74 72 65 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 71 75 69 72 65 2d 6d	.tree))...............:require-m
11d20	61 74 63 68 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f	atch.t...............:caller.'co
11d40	75 6e 73 65 6c 2d 67 69 74 2d 63 68 61 6e 67 65 2d 77 6f 72 6b 74 72 65 65 29 29 29 0a 0a 3b 3b	unsel-git-change-worktree)))..;;
11d60	3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 63 68 65 63 6b 6f 75 74 27 0a 0a 28 64 65 66 75	;;.`counsel-git-checkout'..(defu
11d80	6e 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 63 68 65 63 6b 6f 75 74 2d 61 63 74 69 6f 6e 20 28 62	n.counsel-git-checkout-action.(b
11da0	72 61 6e 63 68 29 0a 20 20 22 53 77 69 74 63 68 20 62 72 61 6e 63 68 20 62 79 20 69 6e 76 6f 6b	ranch)..."Switch.branch.by.invok
11dc0	69 6e 67 20 67 69 74 2d 63 68 65 63 6b 6f 75 74 28 31 29 2e 0a 54 68 65 20 63 6f 6d 6d 61 6e 64	ing.git-checkout(1)..The.command
11de0	20 69 73 20 70 61 73 73 65 64 20 61 20 73 69 6e 67 6c 65 20 61 72 67 75 6d 65 6e 74 20 63 6f 6d	.is.passed.a.single.argument.com
11e00	70 72 69 73 69 6e 67 20 61 6c 6c 20 63 68 61 72 61 63 74 65 72 73 0a 69 6e 20 42 52 41 4e 43 48	prising.all.characters.in.BRANCH
11e20	20 75 70 20 74 6f 2c 20 62 75 74 20 6e 6f 74 20 69 6e 63 6c 75 64 69 6e 67 2c 20 74 68 65 20 66	.up.to,.but.not.including,.the.f
11e40	69 72 73 74 20 73 70 61 63 65 0a 63 68 61 72 61 63 74 65 72 20 28 23 78 32 30 29 2c 20 6f 72 20	irst.space.character.(#x20),.or.
11e60	74 68 65 20 73 74 72 69 6e 67 27 73 20 65 6e 64 20 69 66 20 69 74 20 6c 61 63 6b 73 20 61 20 73	the.string's.end.if.it.lacks.a.s
11e80	70 61 63 65 2e 22 0a 20 20 28 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e 64 0a 20 20 20 28 66 6f 72 6d	pace."...(shell-command....(form
11ea0	61 74 20 22 67 69 74 20 63 68 65 63 6b 6f 75 74 20 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20	at."git.checkout.%s"............
11ec0	28 73 68 65 6c 6c 2d 71 75 6f 74 65 2d 61 72 67 75 6d 65 6e 74 0a 20 20 20 20 20 20 20 20 20 20	(shell-quote-argument...........
11ee0	20 20 28 73 75 62 73 74 72 69 6e 67 20 62 72 61 6e 63 68 20 30 20 28 69 76 79 2d 2d 73 74 72 69	..(substring.branch.0.(ivy--stri
11f00	6e 67 2d 73 65 61 72 63 68 20 22 20 22 20 62 72 61 6e 63 68 29 29 29 29 29 29 0a 0a 28 64 65 66	ng-search.".".branch))))))..(def
11f20	75 6e 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 62 72 61 6e 63 68 2d 6c 69 73 74 20 28 29 0a 20 20	un.counsel-git-branch-list.()...
11f40	22 52 65 74 75 72 6e 20 6c 69 73 74 20 6f 66 20 62 72 61 6e 63 68 65 73 20 69 6e 20 74 68 65 20	"Return.list.of.branches.in.the.
11f60	63 75 72 72 65 6e 74 20 47 69 74 20 72 65 70 6f 73 69 74 6f 72 79 2e 0a 56 61 6c 75 65 20 63 6f	current.Git.repository..Value.co
11f80	6d 70 72 69 73 65 73 20 61 6c 6c 20 6c 6f 63 61 6c 20 61 6e 64 20 72 65 6d 6f 74 65 20 62 72 61	mprises.all.local.and.remote.bra
11fa0	6e 63 68 65 73 20 62 61 72 20 74 68 65 20 6f 6e 65 0a 63 75 72 72 65 6e 74 6c 79 20 63 68 65 63	nches.bar.the.one.currently.chec
11fc0	6b 65 64 20 6f 75 74 2e 22 0a 20 20 28 63 6c 2d 6d 61 70 63 61 6e 20 28 6c 61 6d 62 64 61 20 28	ked.out."...(cl-mapcan.(lambda.(
11fe0	6c 69 6e 65 29 0a 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 6e	line)................(and.(strin
12000	67 2d 6d 61 74 63 68 20 22 5c 5c 60 5b 5b 3a 62 6c 61 6e 6b 3a 5d 5d 2b 22 20 6c 69 6e 65 29 0a	g-match."\\`[[:blank:]]+".line).
12020	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 20 28 73 75 62 73 74	....................(list.(subst
12040	72 69 6e 67 20 6c 69 6e 65 20 28 6d 61 74 63 68 2d 65 6e 64 20 30 29 29 29 29 29 0a 20 20 20 20	ring.line.(match-end.0))))).....
12060	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 65 63 74 6f 72	.........(let.((default-director
12080	79 20 28 63 6f 75 6e 73 65 6c 2d 6c 6f 63 61 74 65 2d 67 69 74 2d 72 6f 6f 74 29 29 29 0a 20 20	y.(counsel-locate-git-root)))...
120a0	20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 28 73 68 65 6c	.............(split-string.(shel
120c0	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.............
120e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 67 69 74 20 62 72 61 6e 63 68 20 2d 76	.................."git.branch.-v
12100	76 20 2d 2d 61 6c 6c 20 2d 2d 6e 6f 2d 63 6f 6c 6f 72 22 29 0a 20 20 20 20 20 20 20 20 20 20 20	v.--all.--no-color")............
12120	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 5c 6e 22 20 74 29 29 29 29 0a 0a 3b 3b	.................."\n".t))))..;;
12140	3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d	;###autoload.(defun.counsel-git-
12160	63 68 65 63 6b 6f 75 74 20 28 29 0a 20 20 22 43 61 6c 6c 20 74 68 65 20 5c 22 67 69 74 20 63 68	checkout.()..."Call.the.\"git.ch
12180	65 63 6b 6f 75 74 5c 22 20 63 6f 6d 6d 61 6e 64 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76	eckout\".command."...(interactiv
121a0	65 29 0a 20 20 28 69 76 79 2d 72 65 61 64 20 22 43 68 65 63 6b 6f 75 74 20 62 72 61 6e 63 68 3a	e)...(ivy-read."Checkout.branch:
121c0	20 22 20 28 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 62 72 61 6e 63 68 2d 6c 69 73 74 29 0a 20 20 20	.".(counsel-git-branch-list)....
121e0	20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 63	.........:action.#'counsel-git-c
12200	68 65 63 6b 6f 75 74 2d 61 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c	heckout-action.............:call
12220	65 72 20 27 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 63 68 65 63 6b 6f 75 74 29 29 0a 0a 28 64 65 66	er.'counsel-git-checkout))..(def
12240	76 61 72 20 63 6f 75 6e 73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 2d 74 72 75 6e 63 61 74 65 2d 72 61	var.counsel-yank-pop-truncate-ra
12260	64 69 75 73 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 67 69 74 2d 6c 6f 67 2d 66	dius)..(defun.counsel--git-log-f
12280	6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 20 28 73 74 72 29 0a 20 20 28 6c 65 74 20 28 28 63 6f	ormat-function.(str)...(let.((co
122a0	75 6e 73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 2d 74 72 75 6e 63 61 74 65 2d 72 61 64 69 75 73 20 35	unsel-yank-pop-truncate-radius.5
122c0	29 29 0a 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 79 61 6e 6b 2d 70 6f 70 2d 66 6f 72 6d 61 74	)).....(counsel--yank-pop-format
122e0	2d 66 75 6e 63 74 69 6f 6e 20 73 74 72 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64	-function.str)))..;;;###autoload
12300	0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 6c 6f 67 20 28 29 0a 20 20 22 43 61	.(defun.counsel-git-log.()..."Ca
12320	6c 6c 20 74 68 65 20 5c 22 67 69 74 20 6c 6f 67 20 2d 2d 67 72 65 70 5c 22 20 73 68 65 6c 6c 20	ll.the.\"git.log.--grep\".shell.
12340	63 6f 6d 6d 61 6e 64 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 69 76 79	command."...(interactive)...(ivy
12360	2d 72 65 61 64 20 22 47 72 65 70 20 6c 6f 67 3a 20 22 20 23 27 63 6f 75 6e 73 65 6c 2d 67 69 74	-read."Grep.log:.".#'counsel-git
12380	2d 6c 6f 67 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 64 79 6e 61 6d	-log-function.............:dynam
123a0	69 63 2d 63 6f 6c 6c 65 63 74 69 6f 6e 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74	ic-collection.t.............:act
123c0	69 6f 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 6c 6f 67 2d 61 63 74 69 6f 6e 0a 20 20 20	ion.#'counsel-git-log-action....
123e0	20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 6c 6f	.........:caller.'counsel-git-lo
12400	67 29 29 0a 0a 28 69 76 79 2d 63 6f 6e 66 69 67 75 72 65 20 27 63 6f 75 6e 73 65 6c 2d 67 69 74	g))..(ivy-configure.'counsel-git
12420	2d 6c 6f 67 0a 20 20 3a 68 65 69 67 68 74 20 34 0a 20 20 3a 75 6e 77 69 6e 64 2d 66 6e 20 23 27	-log...:height.4...:unwind-fn.#'
12440	63 6f 75 6e 73 65 6c 2d 64 65 6c 65 74 65 2d 70 72 6f 63 65 73 73 0a 20 20 3a 66 6f 72 6d 61 74	counsel-delete-process...:format
12460	2d 66 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 2d 67 69 74 2d 6c 6f 67 2d 66 6f 72 6d 61 74 2d 66 75	-fn.#'counsel--git-log-format-fu
12480	6e 63 74 69 6f 6e 29 0a 0a 28 61 64 64 2d 74 6f 2d 6c 69 73 74 20 27 63 6f 75 6e 73 65 6c 2d 61	nction)..(add-to-list.'counsel-a
124a0	73 79 6e 63 2d 73 70 6c 69 74 2d 73 74 72 69 6e 67 2d 72 65 2d 61 6c 69 73 74 20 27 28 63 6f 75	sync-split-string-re-alist.'(cou
124c0	6e 73 65 6c 2d 67 69 74 2d 6c 6f 67 20 2e 20 22 5e 63 6f 6d 6d 69 74 20 22 29 29 0a 28 61 64 64	nsel-git-log..."^commit.")).(add
124e0	2d 74 6f 2d 6c 69 73 74 20 27 63 6f 75 6e 73 65 6c 2d 61 73 79 6e 63 2d 69 67 6e 6f 72 65 2d 72	-to-list.'counsel-async-ignore-r
12500	65 2d 61 6c 69 73 74 20 27 28 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 6c 6f 67 20 2e 20 22 5e 5b 20	e-alist.'(counsel-git-log..."^[.
12520	5c 6e 5d 2a 24 22 29 29 0a 0c 0a 3b 3b 3b 20 46 69 6c 65 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65	\n]*$"))...;;;.File.;;;;.`counse
12540	6c 2d 66 69 6e 64 2d 66 69 6c 65 27 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 66 69	l-find-file'..(defvar.counsel-fi
12560	6e 64 2d 66 69 6c 65 2d 6d 61 70 0a 20 20 28 6c 65 74 20 28 28 6d 61 70 20 28 6d 61 6b 65 2d 73	nd-file-map...(let.((map.(make-s
12580	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 20	parse-keymap))).....(define-key.
125a0	6d 61 70 20 28 6b 62 64 20 22 43 2d 44 45 4c 22 29 20 23 27 63 6f 75 6e 73 65 6c 2d 75 70 2d 64	map.(kbd."C-DEL").#'counsel-up-d
125c0	69 72 65 63 74 6f 72 79 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 28 6b	irectory).....(define-key.map.(k
125e0	62 64 20 22 43 2d 3c 62 61 63 6b 73 70 61 63 65 3e 22 29 20 23 27 63 6f 75 6e 73 65 6c 2d 75 70	bd."C-<backspace>").#'counsel-up
12600	2d 64 69 72 65 63 74 6f 72 79 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20	-directory).....(define-key.map.
12620	28 6b 62 64 20 22 60 22 29 20 23 27 63 6f 75 6e 73 65 6c 2d 66 69 6c 65 2d 6a 75 6d 70 2d 66 72	(kbd."`").#'counsel-file-jump-fr
12640	6f 6d 2d 66 69 6e 64 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	om-find).....(define-key.map.(kb
12660	64 20 22 43 2d 60 22 29 20 28 69 76 79 2d 6d 61 6b 65 2d 6d 61 67 69 63 2d 61 63 74 69 6f 6e 20	d."C-`").(ivy-make-magic-action.
12680	23 27 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 20 22 62 22 29 29 0a 20 20 20 20 28 64	#'counsel-find-file."b")).....(d
126a0	65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 60 5b 72 65 6d 61 70 20 2c 23 27 75 6e 64 6f 5d 20 23	efine-key.map.`[remap.,#'undo].#
126c0	27 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 75 6e 64 6f 29 0a 20 20 20 20 6d 61 70	'counsel-find-file-undo).....map
126e0	29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 66 69 6c 65 2d 6a 75 6d 70 2d 66 72 6f	))..(defun.counsel-file-jump-fro
12700	6d 2d 66 69 6e 64 20 28 29 0a 20 20 22 53 77 69 74 63 68 20 74 6f 20 60 63 6f 75 6e 73 65 6c 2d	m-find.()..."Switch.to.`counsel-
12720	66 69 6c 65 2d 6a 75 6d 70 27 20 66 72 6f 6d 20 60 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69	file-jump'.from.`counsel-find-fi
12740	6c 65 27 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 69 76 79 2d 71 75 69	le'."...(interactive)...(ivy-qui
12760	74 2d 61 6e 64 2d 72 75 6e 0a 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 66 69 6c 65 2d 6a 75 6d 70	t-and-run.....(counsel-file-jump
12780	20 69 76 79 2d 74 65 78 74 20 28 69 76 79 2d 73 74 61 74 65 2d 64 69 72 65 63 74 6f 72 79 20 69	.ivy-text.(ivy-state-directory.i
127a0	76 79 2d 6c 61 73 74 29 29 29 29 0a 0a 28 77 68 65 6e 20 28 65 78 65 63 75 74 61 62 6c 65 2d 66	vy-last))))..(when.(executable-f
127c0	69 6e 64 20 22 67 69 74 22 29 0a 20 20 28 61 64 64 2d 74 6f 2d 6c 69 73 74 20 27 69 76 79 2d 66	ind."git")...(add-to-list.'ivy-f
127e0	66 61 70 2d 75 72 6c 2d 66 75 6e 63 74 69 6f 6e 73 20 27 63 6f 75 6e 73 65 6c 2d 67 69 74 68 75	fap-url-functions.'counsel-githu
12800	62 2d 75 72 6c 2d 70 29 0a 20 20 28 61 64 64 2d 74 6f 2d 6c 69 73 74 20 27 69 76 79 2d 66 66 61	b-url-p)...(add-to-list.'ivy-ffa
12820	70 2d 75 72 6c 2d 66 75 6e 63 74 69 6f 6e 73 20 27 63 6f 75 6e 73 65 6c 2d 65 6d 61 63 73 2d 75	p-url-functions.'counsel-emacs-u
12840	72 6c 2d 70 29 29 0a 28 61 64 64 2d 74 6f 2d 6c 69 73 74 20 27 69 76 79 2d 66 66 61 70 2d 75 72	rl-p)).(add-to-list.'ivy-ffap-ur
12860	6c 2d 66 75 6e 63 74 69 6f 6e 73 20 27 63 6f 75 6e 73 65 6c 2d 75 72 6c 2d 65 78 70 61 6e 64 29	l-functions.'counsel-url-expand)
12880	0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 63 64 2d 62 6f 6f	.(defun.counsel-find-file-cd-boo
128a0	6b 6d 61 72 6b 2d 61 63 74 69 6f 6e 20 28 5f 29 0a 20 20 22 52 65 73 65 74 20 60 63 6f 75 6e 73	kmark-action.(_)..."Reset.`couns
128c0	65 6c 2d 66 69 6e 64 2d 66 69 6c 65 27 20 66 72 6f 6d 20 73 65 6c 65 63 74 65 64 20 64 69 72 65	el-find-file'.from.selected.dire
128e0	63 74 6f 72 79 2e 22 0a 20 20 28 69 76 79 2d 72 65 61 64 20 22 63 64 3a 20 22 0a 20 20 20 20 20	ctory."...(ivy-read."cd:."......
12900	20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 76 79	.......(progn...............(ivy
12920	2d 2d 76 69 72 74 75 61 6c 2d 62 75 66 66 65 72 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	--virtual-buffers)..............
12940	20 28 64 65 6c 65 74 65 2d 64 75 70 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61	.(delete-dups................(ma
12960	70 63 61 72 20 28 6c 61 6d 62 64 61 20 28 78 29 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65	pcar.(lambda.(x).(file-name-dire
12980	63 74 6f 72 79 20 28 63 64 72 20 78 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ctory.(cdr.x))).................
129a0	20 20 20 20 20 20 20 69 76 79 2d 2d 76 69 72 74 75 61 6c 2d 62 75 66 66 65 72 73 29 29 29 0a 20	.......ivy--virtual-buffers)))..
129c0	20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 28 6c 61 6d 62 64 61 20 28 78 29 0a 20	...........:action.(lambda.(x)..
129e0	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 64 65 66 61	.....................(let.((defa
12a00	75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f	ult-directory.(file-name-directo
12a20	72 79 20 78 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ry.x))).........................
12a40	28 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 29 29 29 29 29 0a 0a 28 64 65 66 63 75 73	(counsel-find-file)))))..(defcus
12a60	74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 72 6f 6f 74 2d 63 6f 6d 6d 61 6e 64 20 22 73 75 64 6f 22 0a	tom.counsel-root-command."sudo".
12a80	20 20 22 43 6f 6d 6d 61 6e 64 20 74 6f 20 67 61 69 6e 20 72 6f 6f 74 20 70 72 69 76 69 6c 65 67	.."Command.to.gain.root.privileg
12aa0	65 73 2e 22 0a 20 20 3a 74 79 70 65 20 27 73 74 72 69 6e 67 29 0a 0a 28 64 65 66 75 6e 20 63 6f	es."...:type.'string)..(defun.co
12ac0	75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 61 73 2d 72 6f 6f 74 20 28 78 29 0a 20 20 22 46	unsel-find-file-as-root.(x)..."F
12ae0	69 6e 64 20 66 69 6c 65 20 58 20 77 69 74 68 20 72 6f 6f 74 20 70 72 69 76 69 6c 65 67 65 73 2e	ind.file.X.with.root.privileges.
12b00	22 0a 20 20 28 63 6f 75 6e 73 65 6c 2d 72 65 71 75 69 72 65 2d 70 72 6f 67 72 61 6d 20 63 6f 75	"...(counsel-require-program.cou
12b20	6e 73 65 6c 2d 72 6f 6f 74 2d 63 6f 6d 6d 61 6e 64 29 0a 20 20 28 6c 65 74 2a 20 28 28 68 6f 73	nsel-root-command)...(let*.((hos
12b40	74 20 28 66 69 6c 65 2d 72 65 6d 6f 74 65 2d 70 20 78 20 27 68 6f 73 74 29 29 0a 20 20 20 20 20	t.(file-remote-p.x.'host))......
12b60	20 20 20 20 28 66 69 6c 65 2d 6e 61 6d 65 20 28 66 6f 72 6d 61 74 20 22 2f 25 73 3a 25 73 3a 25	....(file-name.(format."/%s:%s:%
12b80	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 20 20 20 63	s".............................c
12ba0	6f 75 6e 73 65 6c 2d 72 6f 6f 74 2d 63 6f 6d 6d 61 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20	ounsel-root-command.............
12bc0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 68 6f 73 74 20 22 22 29 0a 20 20 20	................(or.host."")....
12be0	20 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 78 70 61 6e 64	.........................(expand
12c00	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......................
12c20	20 20 20 20 20 20 20 20 28 69 66 20 68 6f 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	........(if.host................
12c40	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 72 65 6d 6f 74 65 2d 70	..................(file-remote-p
12c60	20 78 20 27 6c 6f 63 61 6c 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.x.'localname)..................
12c80	20 20 20 20 20 20 20 20 20 20 20 20 20 20 78 29 29 29 29 29 0a 20 20 20 20 3b 3b 20 49 66 20 74	..............x))))).....;;.If.t
12ca0	68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 20 76 69 73 69 74 73 20 74 68 65 20 73 61 6d	he.current.buffer.visits.the.sam
12cc0	65 20 66 69 6c 65 20 77 65 20 61 72 65 20 61 62 6f 75 74 20 74 6f 20 6f 70 65 6e 2c 0a 20 20 20	e.file.we.are.about.to.open,....
12ce0	20 3b 3b 20 72 65 70 6c 61 63 65 20 74 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 20 77	.;;.replace.the.current.buffer.w
12d00	69 74 68 20 74 68 65 20 6e 65 77 20 6f 6e 65 2e 0a 20 20 20 20 28 69 66 20 28 65 71 20 28 63 75	ith.the.new.one......(if.(eq.(cu
12d20	72 72 65 6e 74 2d 62 75 66 66 65 72 29 20 28 67 65 74 2d 66 69 6c 65 2d 62 75 66 66 65 72 20 78	rrent-buffer).(get-file-buffer.x
12d40	29 29 0a 20 20 20 20 20 20 20 20 28 66 69 6e 64 2d 61 6c 74 65 72 6e 61 74 65 2d 66 69 6c 65 20	)).........(find-alternate-file.
12d60	66 69 6c 65 2d 6e 61 6d 65 29 0a 20 20 20 20 20 20 28 66 69 6e 64 2d 66 69 6c 65 20 66 69 6c 65	file-name).......(find-file.file
12d80	2d 6e 61 6d 65 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 79 65 73 2d 6f	-name))))..(defun.counsel--yes-o
12da0	72 2d 6e 6f 2d 70 20 28 66 6d 74 20 26 72 65 73 74 20 61 72 67 73 29 0a 20 20 22 41 73 6b 20 75	r-no-p.(fmt.&rest.args)..."Ask.u
12dc0	73 65 72 20 61 20 79 65 73 20 6f 72 20 6e 6f 20 71 75 65 73 74 69 6f 6e 20 63 72 65 61 74 65 64	ser.a.yes.or.no.question.created
12de0	20 75 73 69 6e 67 20 46 4d 54 20 61 6e 64 20 41 52 47 53 2e 0a 49 66 20 45 6d 61 63 73 20 32 36	.using.FMT.and.ARGS..If.Emacs.26
12e00	20 75 73 65 72 20 6f 70 74 69 6f 6e 20 60 72 65 61 64 2d 61 6e 73 77 65 72 2d 73 68 6f 72 74 27	.user.option.`read-answer-short'
12e20	20 69 73 20 62 6f 75 6e 64 2c 20 75 73 65 20 69 74 20 74 6f 0a 63 68 6f 6f 73 65 20 62 65 74 77	.is.bound,.use.it.to.choose.betw
12e40	65 65 6e 20 60 79 65 73 2d 6f 72 2d 6e 6f 2d 70 27 20 61 6e 64 20 60 79 2d 6f 72 2d 6e 2d 70 27	een.`yes-or-no-p'.and.`y-or-n-p'
12e60	3b 20 6f 74 68 65 72 77 69 73 65 20 64 65 66 61 75 6c 74 20 74 6f 0a 60 79 65 73 2d 6f 72 2d 6e	;.otherwise.default.to.`yes-or-n
12e80	6f 2d 70 27 2e 22 0a 20 20 28 66 75 6e 63 61 6c 6c 20 28 69 66 20 28 61 6e 64 20 28 62 6f 75 6e	o-p'."...(funcall.(if.(and.(boun
12ea0	64 70 20 27 72 65 61 64 2d 61 6e 73 77 65 72 2d 73 68 6f 72 74 29 0a 20 20 20 20 20 20 20 20 20	dp.'read-answer-short)..........
12ec0	20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 65 71 20 72 65 61 64 2d 61 6e 73 77 65	...........(cond.((eq.read-answe
12ee0	72 2d 73 68 6f 72 74 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	r-short.t)).....................
12f00	20 20 20 20 20 20 28 28 65 71 20 72 65 61 64 2d 61 6e 73 77 65 72 2d 73 68 6f 72 74 20 27 61 75	......((eq.read-answer-short.'au
12f20	74 6f 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	to)............................(
12f40	65 71 20 28 73 79 6d 62 6f 6c 2d 66 75 6e 63 74 69 6f 6e 20 27 79 65 73 2d 6f 72 2d 6e 6f 2d 70	eq.(symbol-function.'yes-or-no-p
12f60	29 20 27 79 2d 6f 72 2d 6e 2d 70 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23	).'y-or-n-p))))................#
12f80	27 79 2d 6f 72 2d 6e 2d 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 79 65 73 2d 6f 72 2d	'y-or-n-p..............#'yes-or-
12fa0	6e 6f 2d 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 61 70 70 6c 79 20 23 27 66 6f 72 6d 61 74	no-p)............(apply.#'format
12fc0	20 66 6d 74 20 61 72 67 73 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 66 69 6e	.fmt.args)))..(defun.counsel-fin
12fe0	64 2d 66 69 6c 65 2d 63 6f 70 79 20 28 78 29 0a 20 20 22 43 6f 70 79 20 66 69 6c 65 20 58 2e 22	d-file-copy.(x)..."Copy.file.X."
13000	0a 20 20 3b 3b 20 41 75 74 6f 6c 6f 61 64 65 64 20 62 79 20 60 64 69 72 65 64 27 2e 0a 20 20 28	...;;.Autoloaded.by.`dired'....(
13020	64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 64 69 72 65 64 2d 63 6f 70 79 2d 66 69 6c 65	declare-function.dired-copy-file
13040	20 22 64 69 72 65 64 2d 61 75 78 22 29 0a 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 66 69 6e 64 2d 66	."dired-aux")...(counsel--find-f
13060	69 6c 65 2d 31 20 22 43 6f 70 79 20 66 69 6c 65 20 74 6f 3a 20 22 0a 20 20 20 20 20 20 20 20 20	ile-1."Copy.file.to:."..........
13080	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 76 79 2d 2d 64 69 72 65 63 74 6f 72 79 0a 20 20	...............ivy--directory...
130a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 6e	......................(lambda.(n
130c0	65 77 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 20 20 20 20 20	ew-name)........................
130e0	20 20 20 28 64 69 72 65 64 2d 63 6f 70 79 2d 66 69 6c 65 20 78 20 6e 65 77 2d 6e 61 6d 65 20 31	...(dired-copy-file.x.new-name.1
13100	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 63 6f 75 6e	)).........................'coun
13120	73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 63 6f 70 79 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75	sel-find-file-copy))..(defun.cou
13140	6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 64 65 6c 65 74 65 20 28 78 29 0a 20 20 22 44 65 6c	nsel-find-file-delete.(x)..."Del
13160	65 74 65 20 66 69 6c 65 20 58 2e 22 0a 20 20 28 64 65 66 76 61 72 20 64 69 72 65 64 2d 72 65 63	ete.file.X."...(defvar.dired-rec
13180	75 72 73 69 76 65 2d 64 65 6c 65 74 65 73 29 0a 20 20 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74	ursive-deletes)...(declare-funct
131a0	69 6f 6e 20 64 69 72 65 64 2d 63 6c 65 61 6e 2d 75 70 2d 61 66 74 65 72 2d 64 65 6c 65 74 69 6f	ion.dired-clean-up-after-deletio
131c0	6e 20 22 64 69 72 65 64 22 29 0a 20 20 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 64	n."dired")...(declare-function.d
131e0	69 72 65 64 2d 64 65 6c 65 74 65 2d 66 69 6c 65 20 22 64 69 72 65 64 22 29 0a 20 20 28 77 68 65	ired-delete-file."dired")...(whe
13200	6e 20 28 6f 72 20 64 65 6c 65 74 65 2d 62 79 2d 6d 6f 76 69 6e 67 2d 74 6f 2d 74 72 61 73 68 0a	n.(or.delete-by-moving-to-trash.
13220	20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 60 64 69 72 65 64 2d 64 65 6c 65 74 65 2d 66 69 6c	............;;.`dired-delete-fil
13240	65 27 2c 20 77 68 69 63 68 20 73 65 65 2c 20 61 6c 72 65 61 64 79 20 70 72 6f 6d 70 74 73 20 66	e',.which.see,.already.prompts.f
13260	6f 72 20 64 69 72 65 63 74 6f 72 69 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 20 74	or.directories.............(eq.t
13280	20 28 63 61 72 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 73 20 78 29 29 29 0a 20 20 20 20	.(car.(file-attributes.x))).....
132a0	20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 79 65 73 2d 6f 72 2d 6e 6f 2d 70 20 22 44	........(counsel--yes-or-no-p."D
132c0	65 6c 65 74 65 20 25 73 3f 20 22 20 78 29 29 0a 20 20 20 20 28 64 69 72 65 64 2d 64 65 6c 65 74	elete.%s?.".x)).....(dired-delet
132e0	65 2d 66 69 6c 65 20 78 20 64 69 72 65 64 2d 72 65 63 75 72 73 69 76 65 2d 64 65 6c 65 74 65 73	e-file.x.dired-recursive-deletes
13300	20 64 65 6c 65 74 65 2d 62 79 2d 6d 6f 76 69 6e 67 2d 74 6f 2d 74 72 61 73 68 29 0a 20 20 20 20	.delete-by-moving-to-trash).....
13320	28 64 69 72 65 64 2d 63 6c 65 61 6e 2d 75 70 2d 61 66 74 65 72 2d 64 65 6c 65 74 69 6f 6e 20 78	(dired-clean-up-after-deletion.x
13340	29 0a 20 20 20 20 28 6c 65 74 20 28 28 77 69 6e 20 28 61 6e 64 20 28 6e 6f 74 20 28 65 71 20 69	).....(let.((win.(and.(not.(eq.i
13360	76 79 2d 65 78 69 74 20 27 64 6f 6e 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	vy-exit.'done)).................
13380	20 20 20 20 28 61 63 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	....(active-minibuffer-window)))
133a0	29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 77 69 6e 20 28 77 69 74 68 2d 73 65 6c 65 63 74 65 64	).......(when.win.(with-selected
133c0	2d 77 69 6e 64 6f 77 20 77 69 6e 20 28 69 76 79 2d 2d 63 64 20 69 76 79 2d 2d 64 69 72 65 63 74	-window.win.(ivy--cd.ivy--direct
133e0	6f 72 79 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66	ory))))))..(defun.counsel-find-f
13400	69 6c 65 2d 6d 6f 76 65 20 28 78 29 0a 20 20 22 4d 6f 76 65 20 6f 72 20 72 65 6e 61 6d 65 20 66	ile-move.(x)..."Move.or.rename.f
13420	69 6c 65 20 58 2e 22 0a 20 20 3b 3b 20 41 75 74 6f 6c 6f 61 64 65 64 20 62 79 20 60 64 69 72 65	ile.X."...;;.Autoloaded.by.`dire
13440	64 27 2e 0a 20 20 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 64 69 72 65 64 2d 72 65	d'....(declare-function.dired-re
13460	6e 61 6d 65 2d 66 69 6c 65 20 22 64 69 72 65 64 2d 61 75 78 22 29 0a 20 20 28 63 6f 75 6e 73 65	name-file."dired-aux")...(counse
13480	6c 2d 2d 66 69 6e 64 2d 66 69 6c 65 2d 31 20 22 52 65 6e 61 6d 65 20 66 69 6c 65 20 74 6f 3a 20	l--find-file-1."Rename.file.to:.
134a0	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 69 76 79 2d 2d 64	".........................ivy--d
134c0	69 72 65 63 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	irectory........................
134e0	20 28 6c 61 6d 62 64 61 20 28 6e 65 77 2d 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	.(lambda.(new-name).............
13500	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 72 65 6e 61 6d 65 2d 66 69 6c 65	..............(dired-rename-file
13520	20 78 20 6e 65 77 2d 6e 61 6d 65 20 31 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.x.new-name.1)).................
13540	20 20 20 20 20 20 20 20 27 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 6d 6f 76 65 29	........'counsel-find-file-move)
13560	29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 6d 6b 64 69	)..(defun.counsel-find-file-mkdi
13580	72 2d 61 63 74 69 6f 6e 20 28 5f 78 29 0a 20 20 22 43 72 65 61 74 65 20 61 20 64 69 72 65 63 74	r-action.(_x)..."Create.a.direct
135a0	6f 72 79 20 61 6e 64 20 61 6e 79 20 6e 6f 6e 65 78 69 73 74 65 6e 74 20 70 61 72 65 6e 74 20 64	ory.and.any.nonexistent.parent.d
135c0	69 72 73 20 66 72 6f 6d 20 60 69 76 79 2d 74 65 78 74 27 2e 22 0a 20 20 28 6c 65 74 20 28 28 64	irs.from.`ivy-text'."...(let.((d
135e0	69 72 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 61 73 2d 64 69 72 65 63 74 6f 72 79 0a 20 20 20 20 20	ir.(file-name-as-directory......
13600	20 20 20 20 20 20 20 20 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 69 76 79 2d 74	.........(expand-file-name.ivy-t
13620	65 78 74 20 69 76 79 2d 2d 64 69 72 65 63 74 6f 72 79 29 29 29 0a 20 20 20 20 20 20 20 20 28 77	ext.ivy--directory))).........(w
13640	69 6e 20 28 61 6e 64 20 28 6e 6f 74 20 28 65 71 20 69 76 79 2d 65 78 69 74 20 27 64 6f 6e 65 29	in.(and.(not.(eq.ivy-exit.'done)
13660	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 63 74 69 76 65 2d 6d 69 6e 69	)...................(active-mini
13680	62 75 66 66 65 72 2d 77 69 6e 64 6f 77 29 29 29 29 0a 20 20 20 20 28 6d 61 6b 65 2d 64 69 72 65	buffer-window)))).....(make-dire
136a0	63 74 6f 72 79 20 64 69 72 20 74 29 0a 20 20 20 20 28 77 68 65 6e 20 77 69 6e 20 28 77 69 74 68	ctory.dir.t).....(when.win.(with
136c0	2d 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 20 77 69 6e 20 28 69 76 79 2d 2d 63 64 20 64 69	-selected-window.win.(ivy--cd.di
136e0	72 29 29 29 29 29 0a 0a 28 69 76 79 2d 73 65 74 2d 61 63 74 69 6f 6e 73 0a 20 27 63 6f 75 6e 73	r)))))..(ivy-set-actions..'couns
13700	65 6c 2d 66 69 6e 64 2d 66 69 6c 65 0a 20 27 28 28 22 6a 22 20 66 69 6e 64 2d 66 69 6c 65 2d 6f	el-find-file..'(("j".find-file-o
13720	74 68 65 72 2d 77 69 6e 64 6f 77 20 22 6f 74 68 65 72 20 77 69 6e 64 6f 77 22 29 0a 20 20 20 28	ther-window."other.window")....(
13740	22 66 22 20 66 69 6e 64 2d 66 69 6c 65 2d 6f 74 68 65 72 2d 66 72 61 6d 65 20 22 6f 74 68 65 72	"f".find-file-other-frame."other
13760	20 66 72 61 6d 65 22 29 0a 20 20 20 28 22 62 22 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69	.frame")....("b".counsel-find-fi
13780	6c 65 2d 63 64 2d 62 6f 6f 6b 6d 61 72 6b 2d 61 63 74 69 6f 6e 20 22 63 64 20 62 6f 6f 6b 6d 61	le-cd-bookmark-action."cd.bookma
137a0	72 6b 22 29 0a 20 20 20 28 22 78 22 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 65	rk")....("x".counsel-find-file-e
137c0	78 74 65 72 6e 20 22 6f 70 65 6e 20 65 78 74 65 72 6e 61 6c 6c 79 22 29 0a 20 20 20 28 22 72 22	xtern."open.externally")....("r"
137e0	20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 61 73 2d 72 6f 6f 74 20 22 6f 70 65 6e	.counsel-find-file-as-root."open
13800	20 61 73 20 72 6f 6f 74 22 29 0a 20 20 20 28 22 52 22 20 66 69 6e 64 2d 66 69 6c 65 2d 72 65 61	.as.root")....("R".find-file-rea
13820	64 2d 6f 6e 6c 79 20 22 72 65 61 64 20 6f 6e 6c 79 22 29 0a 20 20 20 28 22 6c 22 20 66 69 6e 64	d-only."read.only")....("l".find
13840	2d 66 69 6c 65 2d 6c 69 74 65 72 61 6c 6c 79 20 22 6f 70 65 6e 20 6c 69 74 65 72 61 6c 6c 79 22	-file-literally."open.literally"
13860	29 0a 20 20 20 28 22 6b 22 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 64 65 6c 65	)....("k".counsel-find-file-dele
13880	74 65 20 22 64 65 6c 65 74 65 22 29 0a 20 20 20 28 22 63 22 20 63 6f 75 6e 73 65 6c 2d 66 69 6e	te."delete")....("c".counsel-fin
138a0	64 2d 66 69 6c 65 2d 63 6f 70 79 20 22 63 6f 70 79 20 66 69 6c 65 22 29 0a 20 20 20 28 22 6d 22	d-file-copy."copy.file")....("m"
138c0	20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 6d 6f 76 65 20 22 6d 6f 76 65 20 6f 72	.counsel-find-file-move."move.or
138e0	20 72 65 6e 61 6d 65 22 29 0a 20 20 20 28 22 64 22 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66	.rename")....("d".counsel-find-f
13900	69 6c 65 2d 6d 6b 64 69 72 2d 61 63 74 69 6f 6e 20 22 6d 6b 64 69 72 22 29 29 29 0a 0a 28 64 65	ile-mkdir-action."mkdir")))..(de
13920	66 63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 61 74 2d 70 6f 69	fcustom.counsel-find-file-at-poi
13940	6e 74 20 6e 69 6c 0a 20 20 22 57 68 65 6e 20 6e 6f 6e 2d 6e 69 6c 2c 20 61 64 64 20 66 69 6c 65	nt.nil..."When.non-nil,.add.file
13960	2d 61 74 2d 70 6f 69 6e 74 20 74 6f 20 74 68 65 20 6c 69 73 74 20 6f 66 20 63 61 6e 64 69 64 61	-at-point.to.the.list.of.candida
13980	74 65 73 2e 22 0a 20 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	tes."...:type.'boolean)..(defcus
139a0	74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 70 72 65 73 65 6c 65 63 74 2d 63 75 72 72 65 6e 74 2d 66 69	tom.counsel-preselect-current-fi
139c0	6c 65 20 6e 69 6c 0a 20 20 22 57 68 65 6e 20 6e 6f 6e 2d 6e 69 6c 2c 20 70 72 65 73 65 6c 65 63	le.nil..."When.non-nil,.preselec
139e0	74 20 63 75 72 72 65 6e 74 20 66 69 6c 65 20 69 6e 20 6c 69 73 74 20 6f 66 20 63 61 6e 64 69 64	t.current.file.in.list.of.candid
13a00	61 74 65 73 2e 22 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 29 0a 0a 28 64 65 66 63 75	ates."...:type.'boolean)..(defcu
13a20	73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 69 67 6e 6f 72 65 2d 72 65	stom.counsel-find-file-ignore-re
13a40	67 65 78 70 20 6e 69 6c 0a 20 20 22 41 20 72 65 67 65 78 70 20 6f 66 20 66 69 6c 65 73 20 74 6f	gexp.nil..."A.regexp.of.files.to
13a60	20 69 67 6e 6f 72 65 20 77 68 69 6c 65 20 69 6e 20 60 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66	.ignore.while.in.`counsel-find-f
13a80	69 6c 65 27 2e 0a 54 68 65 73 65 20 66 69 6c 65 73 20 61 72 65 20 75 6e 2d 69 67 6e 6f 72 65 64	ile'..These.files.are.un-ignored
13aa0	20 69 66 20 60 69 76 79 2d 74 65 78 74 27 20 6d 61 74 63 68 65 73 20 74 68 65 6d 2e 20 20 54 68	.if.`ivy-text'.matches.them...Th
13ac0	65 0a 63 6f 6d 6d 6f 6e 20 77 61 79 20 74 6f 20 73 68 6f 77 20 61 6c 6c 20 66 69 6c 65 73 20 69	e.common.way.to.show.all.files.i
13ae0	73 20 74 6f 20 73 74 61 72 74 20 60 69 76 79 2d 74 65 78 74 27 20 77 69 74 68 20 61 20 64 6f 74	s.to.start.`ivy-text'.with.a.dot
13b00	2e 0a 0a 45 78 61 6d 70 6c 65 20 76 61 6c 75 65 3a 20 5c 22 5c 5c 5c 5c 3d 60 5b 23 2e 5d 5c 5c	...Example.value:.\"\\\\=`[#.]\\
13b20	7c 5b 23 7e 5d 5c 5c 5c 5c 3d 27 5c 22 2e 0a 54 68 69 73 20 77 69 6c 6c 20 68 69 64 65 20 74 65	|[#~]\\\\='\"..This.will.hide.te
13b40	6d 70 6f 72 61 72 79 20 61 6e 64 20 6c 6f 63 6b 20 66 69 6c 65 73 2e 0a 5c 5c 3c 69 76 79 2d 6d	mporary.and.lock.files..\\<ivy-m
13b60	69 6e 69 62 75 66 66 65 72 2d 6d 61 70 3e 0a 43 68 6f 6f 73 69 6e 67 20 74 68 65 20 64 6f 74 66	inibuffer-map>.Choosing.the.dotf
13b80	69 6c 65 73 20 6f 70 74 69 6f 6e 2c 20 5c 22 5c 5c 5c 5c 3d 60 5c 5c 2e 5c 22 2c 20 6d 69 67 68	iles.option,.\"\\\\=`\\.\",.migh
13ba0	74 20 62 65 20 63 6f 6e 76 65 6e 69 65 6e 74 2c 0a 73 69 6e 63 65 20 79 6f 75 20 63 61 6e 20 73	t.be.convenient,.since.you.can.s
13bc0	74 69 6c 6c 20 61 63 63 65 73 73 20 74 68 65 20 64 6f 74 66 69 6c 65 73 20 69 66 20 79 6f 75 72	till.access.the.dotfiles.if.your
13be0	20 69 6e 70 75 74 20 73 74 61 72 74 73 20 77 69 74 68 0a 61 20 64 6f 74 2e 20 20 54 68 65 20 67	.input.starts.with.a.dot...The.g
13c00	65 6e 65 72 69 63 20 77 61 79 20 74 6f 20 74 6f 67 67 6c 65 20 69 67 6e 6f 72 65 64 20 66 69 6c	eneric.way.to.toggle.ignored.fil
13c20	65 73 20 69 73 20 5c 5c 5b 69 76 79 2d 74 6f 67 67 6c 65 2d 69 67 6e 6f 72 65 5d 2c 0a 62 75 74	es.is.\\[ivy-toggle-ignore],.but
13c40	20 74 68 65 20 6c 65 61 64 69 6e 67 20 64 6f 74 20 69 73 20 61 20 6c 6f 74 20 66 61 73 74 65 72	.the.leading.dot.is.a.lot.faster
13c60	2e 22 0a 20 20 3a 74 79 70 65 20 60 28 63 68 6f 69 63 65 0a 20 20 20 20 20 20 20 20 20 20 28 63	."...:type.`(choice...........(c
13c80	6f 6e 73 74 20 3a 74 61 67 20 22 4e 6f 6e 65 22 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20	onst.:tag."None".nil)...........
13ca0	28 63 6f 6e 73 74 20 3a 74 61 67 20 22 44 6f 74 66 69 6c 65 73 20 61 6e 64 20 4c 6f 63 6b 66 69	(const.:tag."Dotfiles.and.Lockfi
13cc0	6c 65 73 22 20 22 5c 5c 28 3f 3a 5c 5c 60 5c 5c 7c 5b 2f 5c 5c 5d 5c 5c 29 5c 5c 28 3f 3a 5b 23	les"."\\(?:\\`\\|[/\\]\\)\\(?:[#
13ce0	2e 5d 5c 5c 29 22 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 49	.]\\)")...........(const.:tag."I
13d00	67 6e 6f 72 65 64 20 45 78 74 65 6e 73 69 6f 6e 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	gnored.Extensions"..............
13d20	20 20 20 20 2c 28 63 6f 6e 63 61 74 20 28 72 65 67 65 78 70 2d 6f 70 74 20 63 6f 6d 70 6c 65 74	....,(concat.(regexp-opt.complet
13d40	69 6f 6e 2d 69 67 6e 6f 72 65 64 2d 65 78 74 65 6e 73 69 6f 6e 73 29 20 22 5c 5c 27 22 29 29 0a	ion-ignored-extensions)."\\'")).
13d60	20 20 20 20 20 20 20 20 20 20 28 72 65 67 65 78 70 20 3a 74 61 67 20 22 52 65 67 65 78 22 29 29	..........(regexp.:tag."Regex"))
13d80	29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 2d 66 69 6e 64 2d 66 69 6c 65 2d 70 72	)..(defvar.counsel--find-file-pr
13da0	65 64 69 63 61 74 65 20 6e 69 6c 0a 20 20 22 57 68 65 6e 20 6e 6f 6e 2d 6e 69 6c 2c 20 60 63 6f	edicate.nil..."When.non-nil,.`co
13dc0	75 6e 73 65 6c 2d 2d 66 69 6e 64 2d 66 69 6c 65 2d 6d 61 74 63 68 65 72 27 20 77 69 6c 6c 20 75	unsel--find-file-matcher'.will.u
13de0	73 65 20 74 68 69 73 20 70 72 65 64 69 63 61 74 65 2e 22 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75	se.this.predicate.")..(defun.cou
13e00	6e 73 65 6c 2d 2d 66 69 6e 64 2d 66 69 6c 65 2d 6d 61 74 63 68 65 72 20 28 72 65 67 65 78 70 20	nsel--find-file-matcher.(regexp.
13e20	63 61 6e 64 69 64 61 74 65 73 29 0a 20 20 22 52 65 74 75 72 6e 20 52 45 47 45 58 50 20 6d 61 74	candidates)..."Return.REGEXP.mat
13e40	63 68 69 6e 67 20 43 41 4e 44 49 44 41 54 45 53 2e 0a 53 6b 69 70 20 73 6f 6d 65 20 64 6f 74 66	ching.CANDIDATES..Skip.some.dotf
13e60	69 6c 65 73 20 75 6e 6c 65 73 73 20 60 69 76 79 2d 74 65 78 74 27 20 72 65 71 75 69 72 65 73 20	iles.unless.`ivy-text'.requires.
13e80	74 68 65 6d 2e 22 0a 20 20 28 6c 65 74 20 28 28 72 65 73 0a 20 20 20 20 20 20 20 20 20 28 69 76	them."...(let.((res..........(iv
13ea0	79 2d 2d 72 65 2d 66 69 6c 74 65 72 0a 20 20 20 20 20 20 20 20 20 20 72 65 67 65 78 70 20 63 61	y--re-filter...........regexp.ca
13ec0	6e 64 69 64 61 74 65 73 0a 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 72 65 2d 73	ndidates...........(lambda.(re-s
13ee0	74 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 78 29 0a 20 20 20 20	tr).............(lambda.(x).....
13f00	20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 72 65 2d 73 74 72 20 28	..........(string-match.re-str.(
13f20	64 69 72 65 63 74 6f 72 79 2d 66 69 6c 65 2d 6e 61 6d 65 20 78 29 29 29 29 29 29 29 0a 20 20 20	directory-file-name.x)))))))....
13f40	20 28 77 68 65 6e 20 63 6f 75 6e 73 65 6c 2d 2d 66 69 6e 64 2d 66 69 6c 65 2d 70 72 65 64 69 63	.(when.counsel--find-file-predic
13f60	61 74 65 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f	ate.......(let.((default-directo
13f80	72 79 20 69 76 79 2d 2d 64 69 72 65 63 74 6f 72 79 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 74	ry.ivy--directory)).........(set
13fa0	71 20 72 65 73 20 28 63 6c 2d 72 65 6d 6f 76 65 2d 69 66 2d 6e 6f 74 20 63 6f 75 6e 73 65 6c 2d	q.res.(cl-remove-if-not.counsel-
13fc0	2d 66 69 6e 64 2d 66 69 6c 65 2d 70 72 65 64 69 63 61 74 65 20 72 65 73 29 29 29 29 0a 20 20 20	-find-file-predicate.res))))....
13fe0	20 28 69 66 20 28 6f 72 20 28 6e 75 6c 6c 20 69 76 79 2d 75 73 65 2d 69 67 6e 6f 72 65 29 0a 20	.(if.(or.(null.ivy-use-ignore)..
14000	20 20 20 20 20 20 20 20 20 20 20 28 6e 75 6c 6c 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69	...........(null.counsel-find-fi
14020	6c 65 2d 69 67 6e 6f 72 65 2d 72 65 67 65 78 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73	le-ignore-regexp).............(s
14040	74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d	tring-match-p.counsel-find-file-
14060	69 67 6e 6f 72 65 2d 72 65 67 65 78 70 20 69 76 79 2d 74 65 78 74 29 29 0a 20 20 20 20 20 20 20	ignore-regexp.ivy-text))........
14080	20 72 65 73 0a 20 20 20 20 20 20 28 6f 72 20 28 63 6c 2d 72 65 6d 6f 76 65 2d 69 66 0a 20 20 20	.res.......(or.(cl-remove-if....
140a0	20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	........(lambda.(x).............
140c0	20 28 61 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 2d 6d 61 74 63	.(and...............(string-matc
140e0	68 2d 70 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 69 67 6e 6f 72 65 2d 72 65 67	h-p.counsel-find-file-ignore-reg
14100	65 78 70 20 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 6d 65 6d 62 65	exp.x)...............(not.(membe
14120	72 20 78 20 69 76 79 2d 65 78 74 72 61 2d 64 69 72 65 63 74 6f 72 69 65 73 29 29 29 29 0a 20 20	r.x.ivy-extra-directories))))...
14140	20 20 20 20 20 20 20 20 20 72 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 72 65 73 29 29 29 29 0a	.........res)...........res)))).
14160	0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 66 66 61 70 2d 67 75 65 73 73 65 72 20	.(declare-function.ffap-guesser.
14180	22 66 66 61 70 22 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69	"ffap")..(defvar.counsel-find-fi
141a0	6c 65 2d 73 70 65 65 64 75 70 2d 72 65 6d 6f 74 65 20 74 0a 20 20 22 53 70 65 65 64 20 75 70 20	le-speedup-remote.t..."Speed.up.
141c0	6f 70 65 6e 69 6e 67 20 72 65 6d 6f 74 65 20 66 69 6c 65 73 20 62 79 20 64 69 73 61 62 6c 69 6e	opening.remote.files.by.disablin
141e0	67 20 60 66 69 6e 64 2d 66 69 6c 65 2d 68 6f 6f 6b 27 20 66 6f 72 20 74 68 65 6d 2e 22 29 0a 0a	g.`find-file-hook'.for.them.")..
14200	28 64 65 66 63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 65 78 74	(defcustom.counsel-find-file-ext
14220	65 72 6e 2d 65 78 74 65 6e 73 69 6f 6e 73 20 27 28 22 6d 70 34 22 20 22 6d 6b 76 22 20 22 78 6c	ern-extensions.'("mp4"."mkv"."xl
14240	73 78 22 29 0a 20 20 22 4c 69 73 74 20 6f 66 20 65 78 74 65 6e 73 69 6f 6e 73 20 74 68 61 74 20	sx")..."List.of.extensions.that.
14260	6d 61 6b 65 20 60 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 27 20 75 73 65 20 60 63 6f	make.`counsel-find-file'.use.`co
14280	75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 65 78 74 65 72 6e 27 2e 22 0a 20 20 3a 74 79 70	unsel-find-file-extern'."...:typ
142a0	65 20 27 28 72 65 70 65 61 74 20 73 74 72 69 6e 67 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e	e.'(repeat.string))..(defun.coun
142c0	73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 61 63 74 69 6f 6e 20 28 78 29 0a 20 20 22 46 69 6e 64	sel-find-file-action.(x)..."Find
142e0	20 66 69 6c 65 20 58 2e 22 0a 20 20 28 63 6f 6e 64 20 28 28 61 6e 64 20 63 6f 75 6e 73 65 6c 2d	.file.X."...(cond.((and.counsel-
14300	66 69 6e 64 2d 66 69 6c 65 2d 73 70 65 65 64 75 70 2d 72 65 6d 6f 74 65 0a 20 20 20 20 20 20 20	find-file-speedup-remote........
14320	20 20 20 20 20 20 20 28 66 69 6c 65 2d 72 65 6d 6f 74 65 2d 70 20 69 76 79 2d 2d 64 69 72 65 63	.......(file-remote-p.ivy--direc
14340	74 6f 72 79 29 29 0a 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 66 69 6e 64 2d 66 69 6c 65	tory))..........(let.((find-file
14360	2d 68 6f 6f 6b 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6e 64 2d 66 69 6c	-hook.nil))............(find-fil
14380	65 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 78 20 69 76 79 2d 2d 64 69 72 65 63	e.(expand-file-name.x.ivy--direc
143a0	74 6f 72 79 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 28 6d 65 6d 62 65 72 20 28 66 69 6c 65 2d	tory)))).........((member.(file-
143c0	6e 61 6d 65 2d 65 78 74 65 6e 73 69 6f 6e 20 78 29 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66	name-extension.x).counsel-find-f
143e0	69 6c 65 2d 65 78 74 65 72 6e 2d 65 78 74 65 6e 73 69 6f 6e 73 29 0a 20 20 20 20 20 20 20 20 20	ile-extern-extensions)..........
14400	28 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 65 78 74 65 72 6e 20 78 29 29 0a 20 20	(counsel-find-file-extern.x))...
14420	20 20 20 20 20 20 28 74 0a 20 20 20 20 20 20 20 20 20 28 66 69 6e 64 2d 66 69 6c 65 20 28 65 78	......(t..........(find-file.(ex
14440	70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 78 20 69 76 79 2d 2d 64 69 72 65 63 74 6f 72 79 29	pand-file-name.x.ivy--directory)
14460	29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 70 72 65 73 65 6c 65 63 74 2d	))))..(defun.counsel--preselect-
14480	66 69 6c 65 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 63 61 6e 64 69 64 61 74 65 20 74 6f 20 70	file.()..."Return.candidate.to.p
144a0	72 65 73 65 6c 65 63 74 20 64 75 72 69 6e 67 20 66 69 6c 65 6e 61 6d 65 20 63 6f 6d 70 6c 65 74	reselect.during.filename.complet
144c0	69 6f 6e 2e 0a 54 68 65 20 70 72 65 73 65 6c 65 63 74 20 62 65 68 61 76 69 6f 72 20 63 61 6e 20	ion..The.preselect.behavior.can.
144e0	62 65 20 63 75 73 74 6f 6d 69 7a 65 64 20 76 69 61 20 75 73 65 72 20 6f 70 74 69 6f 6e 73 0a 60	be.customized.via.user.options.`
14500	63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 61 74 2d 70 6f 69 6e 74 27 20 61 6e 64 0a	counsel-find-file-at-point'.and.
14520	60 63 6f 75 6e 73 65 6c 2d 70 72 65 73 65 6c 65 63 74 2d 63 75 72 72 65 6e 74 2d 66 69 6c 65 27	`counsel-preselect-current-file'
14540	2c 20 77 68 69 63 68 20 73 65 65 2e 22 0a 20 20 28 6f 72 0a 20 20 20 28 77 68 65 6e 20 63 6f 75	,.which.see."...(or....(when.cou
14560	6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 61 74 2d 70 6f 69 6e 74 0a 20 20 20 20 20 28 72 65	nsel-find-file-at-point......(re
14580	71 75 69 72 65 20 27 66 66 61 70 29 0a 20 20 20 20 20 28 6c 65 74 20 28 28 66 20 28 66 66 61 70	quire.'ffap)......(let.((f.(ffap
145a0	2d 67 75 65 73 73 65 72 29 29 29 0a 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 66 20	-guesser)))........(when.(and.f.
145c0	28 6e 6f 74 20 28 69 76 79 2d 66 66 61 70 2d 75 72 6c 2d 70 20 66 29 29 29 0a 20 20 20 20 20 20	(not.(ivy-ffap-url-p.f))).......
145e0	20 20 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 66 29 29 29 29 0a 20 20 20 28 61	...(expand-file-name.f))))....(a
14600	6e 64 20 63 6f 75 6e 73 65 6c 2d 70 72 65 73 65 6c 65 63 74 2d 63 75 72 72 65 6e 74 2d 66 69 6c	nd.counsel-preselect-current-fil
14620	65 0a 20 20 20 20 20 20 20 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 0a 20 20 20 20 20	e.........buffer-file-name......
14640	20 20 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 72 65 63 74 6f 72 79 20 62 75 66 66 65	...(file-name-nondirectory.buffe
14660	72 2d 66 69 6c 65 2d 6e 61 6d 65 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d	r-file-name))))..(defun.counsel-
14680	2d 66 69 6e 64 2d 66 69 6c 65 2d 31 20 28 70 72 6f 6d 70 74 20 69 6e 69 74 69 61 6c 2d 69 6e 70	-find-file-1.(prompt.initial-inp
146a0	75 74 20 61 63 74 69 6f 6e 20 63 61 6c 6c 65 72 29 0a 20 20 28 64 65 63 6c 61 72 65 2d 66 75 6e	ut.action.caller)...(declare-fun
146c0	63 74 69 6f 6e 20 64 69 72 65 64 2d 63 75 72 72 65 6e 74 2d 64 69 72 65 63 74 6f 72 79 20 22 64	ction.dired-current-directory."d
146e0	69 72 65 64 22 29 0a 20 20 28 6c 65 74 20 28 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72	ired")...(let.((default-director
14700	79 0a 20 20 20 20 20 20 20 20 20 28 69 66 20 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27	y..........(if.(derived-mode-p.'
14720	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 28 64 69 72 65 64 2d	dired-mode)..............(dired-
14740	63 75 72 72 65 6e 74 2d 64 69 72 65 63 74 6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 64 65	current-directory)............de
14760	66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 29 29 0a 20 20 20 20 28 69 76 79 2d 72 65 61 64	fault-directory))).....(ivy-read
14780	20 70 72 6f 6d 70 74 20 23 27 72 65 61 64 2d 66 69 6c 65 2d 6e 61 6d 65 2d 69 6e 74 65 72 6e 61	.prompt.#'read-file-name-interna
147a0	6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6d 61 74 63 68 65 72 20 23 27 63 6f 75 6e 73	l...............:matcher.#'couns
147c0	65 6c 2d 2d 66 69 6e 64 2d 66 69 6c 65 2d 6d 61 74 63 68 65 72 0a 20 20 20 20 20 20 20 20 20 20	el--find-file-matcher...........
147e0	20 20 20 20 3a 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74	....:initial-input.initial-input
14800	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 61 63 74 69 6f 6e 0a 20 20	...............:action.action...
14820	20 20 20 20 20 20 20 20 20 20 20 20 3a 70 72 65 73 65 6c 65 63 74 20 28 63 6f 75 6e 73 65 6c 2d	............:preselect.(counsel-
14840	2d 70 72 65 73 65 6c 65 63 74 2d 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a	-preselect-file)...............:
14860	72 65 71 75 69 72 65 2d 6d 61 74 63 68 20 27 63 6f 6e 66 69 72 6d 2d 61 66 74 65 72 2d 63 6f 6d	require-match.'confirm-after-com
14880	70 6c 65 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 69 73 74 6f 72 79 20 27	pletion...............:history.'
148a0	66 69 6c 65 2d 6e 61 6d 65 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	file-name-history...............
148c0	3a 6b 65 79 6d 61 70 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 6d 61 70 0a 20 20	:keymap.counsel-find-file-map...
148e0	20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 63 61 6c 6c 65 72 29 29 29 0a 0a 3b	............:caller.caller)))..;
14900	3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 66 69 6e	;;###autoload.(defun.counsel-fin
14920	64 2d 66 69 6c 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20	d-file.(&optional.initial-input.
14940	69 6e 69 74 69 61 6c 2d 64 69 72 65 63 74 6f 72 79 29 0a 20 20 22 46 6f 72 77 61 72 64 20 74 6f	initial-directory)..."Forward.to
14960	20 60 66 69 6e 64 2d 66 69 6c 65 27 2e 0a 57 68 65 6e 20 49 4e 49 54 49 41 4c 2d 49 4e 50 55 54	.`find-file'..When.INITIAL-INPUT
14980	20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 75 73 65 20 69 74 20 69 6e 20 74 68 65 20 6d 69 6e 69 62	.is.non-nil,.use.it.in.the.minib
149a0	75 66 66 65 72 20 64 75 72 69 6e 67 20 63 6f 6d 70 6c 65 74 69 6f 6e 2e 22 0a 20 20 28 69 6e 74	uffer.during.completion."...(int
149c0	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 29 0a 20 20 28	eractive)...(require.'dired)...(
149e0	64 65 66 76 61 72 20 74 72 61 6d 70 2d 61 72 63 68 69 76 65 2d 65 6e 61 62 6c 65 64 29 0a 20 20	defvar.tramp-archive-enabled)...
14a00	28 6c 65 74 20 28 28 74 72 61 6d 70 2d 61 72 63 68 69 76 65 2d 65 6e 61 62 6c 65 64 20 6e 69 6c	(let.((tramp-archive-enabled.nil
14a20	29 0a 20 20 20 20 20 20 20 20 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 28 6f 72	).........(default-directory.(or
14a40	20 69 6e 69 74 69 61 6c 2d 64 69 72 65 63 74 6f 72 79 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63	.initial-directory.default-direc
14a60	74 6f 72 79 29 29 29 0a 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 66 69 6e 64 2d 66 69 6c 65 2d	tory))).....(counsel--find-file-
14a80	31 20 22 46 69 6e 64 20 66 69 6c 65 3a 20 22 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 0a 20 20	1."Find.file:.".initial-input...
14aa0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 63 6f 75 6e 73 65	........................#'counse
14ac0	6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 61 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	l-find-file-action..............
14ae0	20 20 20 20 20 20 20 20 20 20 20 20 20 27 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 29	.............'counsel-find-file)
14b00	29 29 0a 0a 28 69 76 79 2d 63 6f 6e 66 69 67 75 72 65 20 27 63 6f 75 6e 73 65 6c 2d 66 69 6e 64	))..(ivy-configure.'counsel-find
14b20	2d 66 69 6c 65 0a 20 20 3a 70 61 72 65 6e 74 20 27 72 65 61 64 2d 66 69 6c 65 2d 6e 61 6d 65 2d	-file...:parent.'read-file-name-
14b40	69 6e 74 65 72 6e 61 6c 0a 20 20 3a 6f 63 63 75 72 20 23 27 63 6f 75 6e 73 65 6c 2d 66 69 6e 64	internal...:occur.#'counsel-find
14b60	2d 66 69 6c 65 2d 6f 63 63 75 72 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 66 69	-file-occur)..(defvar.counsel-fi
14b80	6e 64 2d 66 69 6c 65 2d 6f 63 63 75 72 2d 63 6d 64 20 22 6c 73 20 2d 61 20 7c 20 25 73 20 7c 20	nd-file-occur-cmd."ls.-a.|.%s.|.
14ba0	78 61 72 67 73 20 2d 64 20 27 5c 5c 6e 27 20 6c 73 20 2d 64 20 2d 2d 67 72 6f 75 70 2d 64 69 72	xargs.-d.'\\n'.ls.-d.--group-dir
14bc0	65 63 74 6f 72 69 65 73 2d 66 69 72 73 74 22 0a 20 20 22 46 6f 72 6d 61 74 20 73 74 72 69 6e 67	ectories-first"..."Format.string
14be0	20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 6f 63 63 75 72 27 2e 22	.for.`counsel-find-file-occur'."
14c00	29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 6f 63 63	)..(defvar.counsel-find-file-occ
14c20	75 72 2d 75 73 65 2d 66 69 6e 64 20 28 6e 6f 74 20 28 65 71 20 73 79 73 74 65 6d 2d 74 79 70 65	ur-use-find.(not.(eq.system-type
14c40	20 27 67 6e 75 2f 6c 69 6e 75 78 29 29 0a 20 20 22 57 68 65 6e 20 6e 6f 6e 2d 6e 69 6c 2c 20 60	.'gnu/linux))..."When.non-nil,.`
14c60	63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 6f 63 63 75 72 27 20 77 69 6c 6c 20 75 73	counsel-find-file-occur'.will.us
14c80	65 20 5c 22 66 69 6e 64 5c 22 20 61 73 20 74 68 65 20 62 61 73 65 20 63 6d 64 2e 22 29 0a 0a 28	e.\"find\".as.the.base.cmd.")..(
14ca0	64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 65 78 70 61 6e 64 2d 6c 73 20 28 63 6d 64 29 0a 20	defun.counsel--expand-ls.(cmd)..
14cc0	20 22 45 78 70 61 6e 64 20 43 4d 44 20 74 68 61 74 20 65 6e 64 73 20 69 6e 20 5c 22 6c 73 5c 22	."Expand.CMD.that.ends.in.\"ls\"
14ce0	20 77 69 74 68 20 73 77 69 74 63 68 65 73 2e 22 0a 20 20 28 63 6f 6e 63 61 74 20 63 6d 64 20 22	.with.switches."...(concat.cmd."
14d00	20 22 20 63 6f 75 6e 73 65 6c 2d 64 69 72 65 64 2d 6c 69 73 74 69 6e 67 2d 73 77 69 74 63 68 65	.".counsel-dired-listing-switche
14d20	73 20 22 20 7c 20 73 65 64 20 2d 65 20 5c 22 73 2f 5e 2f 20 20 2f 5c 22 22 29 29 0a 0a 28 64 65	s.".|.sed.-e.\"s/^/../\""))..(de
14d40	66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 66 69 6c 65 2d 6e 61 6d 65 2d 66 69 6c 74 65 72 2d 61 6c	fvar.counsel-file-name-filter-al
14d60	69 73 74 0a 20 20 27 28 28 22 61 67 20 2d 69 20 27 25 73 27 22 20 2e 20 74 29 0a 20 20 20 20 28	ist...'(("ag.-i.'%s'"...t).....(
14d80	22 61 63 6b 20 2d 69 20 27 25 73 27 22 20 2e 20 74 29 0a 20 20 20 20 28 22 70 65 72 6c 20 2d 6e	"ack.-i.'%s'"...t).....("perl.-n
14da0	65 20 27 2f 28 2e 2a 25 73 2e 2a 29 2f 69 20 26 26 20 70 72 69 6e 74 20 5c 22 24 31 5c 5c 6e 5c	e.'/(.*%s.*)/i.&&.print.\"$1\\n\
14dc0	22 3b 27 22 20 2e 20 74 29 0a 20 20 20 20 28 22 67 72 65 70 20 2d 69 20 2d 45 20 27 25 73 27 22	";'"...t).....("grep.-i.-E.'%s'"
14de0	29 29 0a 20 20 22 41 6c 69 73 74 20 6f 66 20 66 69 6c 65 20 6e 61 6d 65 20 66 69 6c 74 65 72 69	))..."Alist.of.file.name.filteri
14e00	6e 67 20 63 6f 6d 6d 61 6e 64 73 2e 0a 54 68 65 20 63 61 72 20 69 73 20 61 20 73 68 65 6c 6c 20	ng.commands..The.car.is.a.shell.
14e20	63 6f 6d 6d 61 6e 64 20 61 6e 64 20 74 68 65 20 63 64 72 20 69 73 20 74 20 77 68 65 6e 20 74 68	command.and.the.cdr.is.t.when.th
14e40	65 20 73 68 65 6c 6c 0a 63 6f 6d 6d 61 6e 64 20 73 75 70 70 6f 72 74 73 20 6c 6f 6f 6b 2d 61 72	e.shell.command.supports.look-ar
14e60	6f 75 6e 64 73 2e 20 20 54 68 65 20 65 78 65 63 75 74 61 62 6c 65 20 66 6f 72 20 74 68 65 20 63	ounds...The.executable.for.the.c
14e80	6f 6d 6d 61 6e 64 73 0a 77 69 6c 6c 20 62 65 20 63 68 65 63 6b 65 64 20 66 6f 72 20 65 78 69 73	ommands.will.be.checked.for.exis
14ea0	74 65 6e 63 65 20 76 69 61 20 60 65 78 65 63 75 74 61 62 6c 65 2d 66 69 6e 64 27 2e 20 20 54 68	tence.via.`executable-find'...Th
14ec0	65 20 66 69 72 73 74 0a 6f 6e 65 20 74 68 61 74 20 65 78 69 73 74 73 20 77 69 6c 6c 20 62 65 20	e.first.one.that.exists.will.be.
14ee0	75 73 65 64 2e 22 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 66 69 6c 65 2d 6e 61	used.")..(defun.counsel--file-na
14f00	6d 65 2d 66 69 6c 74 65 72 20 28 26 6f 70 74 69 6f 6e 61 6c 20 75 73 65 2d 69 67 6e 6f 72 65 29	me-filter.(&optional.use-ignore)
14f20	0a 20 20 22 52 65 74 75 72 6e 20 61 20 63 6f 6d 6d 61 6e 64 20 74 68 61 74 20 66 69 6c 74 65 72	..."Return.a.command.that.filter
14f40	73 20 61 20 66 69 6c 65 20 6c 69 73 74 20 74 6f 20 6d 61 74 63 68 20 69 76 79 20 63 61 6e 64 69	s.a.file.list.to.match.ivy.candi
14f60	64 61 74 65 73 2e 0a 49 66 20 55 53 45 2d 49 47 4e 4f 52 45 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c	dates..If.USE-IGNORE.is.non-nil,
14f80	20 74 72 79 20 74 6f 20 67 65 6e 65 72 61 74 65 20 61 20 63 6f 6d 6d 61 6e 64 20 74 68 61 74 20	.try.to.generate.a.command.that.
14fa0	72 65 73 70 65 63 74 73 0a 60 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 69 67 6e 6f	respects.`counsel-find-file-igno
14fc0	72 65 2d 72 65 67 65 78 70 27 2e 22 0a 20 20 28 6c 65 74 20 28 28 72 65 67 65 78 20 69 76 79 2d	re-regexp'."...(let.((regex.ivy-
14fe0	2d 6f 6c 64 2d 72 65 29 29 0a 20 20 20 20 28 69 66 20 28 3d 20 30 20 28 6c 65 6e 67 74 68 20 72	-old-re)).....(if.(=.0.(length.r
15000	65 67 65 78 29 29 0a 20 20 20 20 20 20 20 20 22 63 61 74 22 0a 20 20 20 20 20 20 28 6c 65 74 20	egex))........."cat".......(let.
15020	28 28 66 69 6c 74 65 72 2d 63 6d 64 20 28 63 6c 2d 66 69 6e 64 2d 69 66 0a 20 20 20 20 20 20 20	((filter-cmd.(cl-find-if........
15040	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 78 29 0a 20 20	..................(lambda.(x)...
15060	20 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 78 65 63 75 74	.........................(execut
15080	61 62 6c 65 2d 66 69 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	able-find.......................
150a0	20 20 20 20 20 20 28 63 61 72 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 28 63 61 72 20 78 29	......(car.(split-string.(car.x)
150c0	29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f	))))..........................co
150e0	75 6e 73 65 6c 2d 66 69 6c 65 2d 6e 61 6d 65 2d 66 69 6c 74 65 72 2d 61 6c 69 73 74 29 29 0a 20	unsel-file-name-filter-alist))..
15100	20 20 20 20 20 20 20 20 20 20 20 63 6d 64 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 61	...........cmd).........(when.(a
15120	6e 64 20 75 73 65 2d 69 67 6e 6f 72 65 20 69 76 79 2d 75 73 65 2d 69 67 6e 6f 72 65 0a 20 20 20	nd.use-ignore.ivy-use-ignore....
15140	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c	................counsel-find-fil
15160	65 2d 69 67 6e 6f 72 65 2d 72 65 67 65 78 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	e-ignore-regexp.................
15180	20 20 20 28 63 64 72 20 66 69 6c 74 65 72 2d 63 6d 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	...(cdr.filter-cmd).............
151a0	20 20 20 20 20 20 20 28 6e 6f 74 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 63 6f 75 6e	.......(not.(string-match-p.coun
151c0	73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 69 67 6e 6f 72 65 2d 72 65 67 65 78 70 20 69 76 79 2d	sel-find-file-ignore-regexp.ivy-
151e0	74 65 78 74 29 29 0a 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	text))....................(not.(
15200	73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65	string-match-p.counsel-find-file
15220	2d 69 67 6e 6f 72 65 2d 72 65 67 65 78 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	-ignore-regexp..................
15240	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 20 28 63 61 72 20	.......................(or.(car.
15260	69 76 79 2d 2d 6f 6c 64 2d 63 61 6e 64 73 29 20 22 22 29 29 29 29 0a 20 20 20 20 20 20 20 20 20	ivy--old-cands).""))))..........
15280	20 28 6c 65 74 20 28 28 69 67 6e 6f 72 65 2d 72 65 20 28 6c 69 73 74 20 28 63 6f 75 6e 73 65 6c	.(let.((ignore-re.(list.(counsel
152a0	2d 2d 65 6c 69 73 70 2d 74 6f 2d 70 63 72 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	--elisp-to-pcre.................
152c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66	..................counsel-find-f
152e0	69 6c 65 2d 69 67 6e 6f 72 65 2d 72 65 67 65 78 70 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20	ile-ignore-regexp))))...........
15300	20 20 28 73 65 74 71 20 72 65 67 65 78 20 28 69 66 20 28 73 74 72 69 6e 67 70 20 72 65 67 65 78	..(setq.regex.(if.(stringp.regex
15320	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 6c	).............................(l
15340	69 73 74 20 69 67 6e 6f 72 65 2d 72 65 20 28 63 6f 6e 73 20 72 65 67 65 78 20 74 29 29 0a 20 20	ist.ignore-re.(cons.regex.t))...
15360	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 6e 73 20 69 67	........................(cons.ig
15380	6e 6f 72 65 2d 72 65 20 72 65 67 65 78 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71	nore-re.regex))))).........(setq
153a0	20 63 6d 64 20 28 66 6f 72 6d 61 74 20 28 63 61 72 20 66 69 6c 74 65 72 2d 63 6d 64 29 0a 20 20	.cmd.(format.(car.filter-cmd)...
153c0	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 73 65 6c	........................(counsel
153e0	2d 2d 65 6c 69 73 70 2d 74 6f 2d 70 63 72 65 20 72 65 67 65 78 20 28 63 64 72 20 66 69 6c 74 65	--elisp-to-pcre.regex.(cdr.filte
15400	72 2d 63 6d 64 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 73 74 72 69 6e 67 2d 73 75	r-cmd)))).........(if.(string-su
15420	66 66 69 78 2d 70 20 22 63 73 68 22 20 73 68 65 6c 6c 2d 66 69 6c 65 2d 6e 61 6d 65 29 0a 20 20	ffix-p."csh".shell-file-name)...
15440	20 20 20 20 20 20 20 20 20 20 28 69 76 79 2d 2d 73 74 72 69 6e 67 2d 72 65 70 6c 61 63 65 20 22	..........(ivy--string-replace."
15460	3f 21 22 20 22 3f 5c 5c 21 22 20 63 6d 64 29 0a 20 20 20 20 20 20 20 20 20 20 63 6d 64 29 29 29	?!"."?\\!".cmd)...........cmd)))
15480	29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 6f 63 63 75 72 2d 63 6d 64 2d 66 69	))..(defun.counsel--occur-cmd-fi
154a0	6e 64 20 28 29 0a 20 20 28 6c 65 74 20 28 28 63 6d 64 20 28 66 6f 72 6d 61 74 0a 20 20 20 20 20	nd.()...(let.((cmd.(format......
154c0	20 20 20 20 20 20 20 20 20 22 66 69 6e 64 20 2e 20 2d 6d 61 78 64 65 70 74 68 20 31 20 7c 20 25	........."find...-maxdepth.1.|.%
154e0	73 20 7c 20 78 61 72 67 73 20 2d 49 20 7b 7d 20 66 69 6e 64 20 7b 7d 20 2d 6d 61 78 64 65 70 74	s.|.xargs.-I.{}.find.{}.-maxdept
15500	68 20 30 20 2d 6c 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d	h.0.-ls"...............(counsel-
15520	2d 66 69 6c 65 2d 6e 61 6d 65 2d 66 69 6c 74 65 72 20 74 29 29 29 29 0a 20 20 20 20 28 63 6f 6e	-file-name-filter.t)))).....(con
15540	63 61 74 0a 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 63 6d 64 2d 74 6f 2d 64 69 72 65 64 2d	cat......(counsel--cmd-to-dired-
15560	62 79 2d 74 79 70 65 20 22 64 22 20 63 6d 64 29 0a 20 20 20 20 20 22 20 26 26 20 22 0a 20 20 20	by-type."d".cmd)......".&&."....
15580	20 20 28 63 6f 75 6e 73 65 6c 2d 2d 63 6d 64 2d 74 6f 2d 64 69 72 65 64 2d 62 79 2d 74 79 70 65	..(counsel--cmd-to-dired-by-type
155a0	20 22 66 22 20 63 6d 64 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 63 6d	."f".cmd))))..(defun.counsel--cm
155c0	64 2d 74 6f 2d 64 69 72 65 64 2d 62 79 2d 74 79 70 65 20 28 74 79 70 65 20 63 6d 64 29 0a 20 20	d-to-dired-by-type.(type.cmd)...
155e0	28 6c 65 74 20 28 28 65 78 63 6c 75 64 65 2d 64 6f 74 73 0a 20 20 20 20 20 20 20 20 20 28 75 6e	(let.((exclude-dots..........(un
15600	6c 65 73 73 20 28 73 74 72 69 6e 67 2d 70 72 65 66 69 78 2d 70 20 22 2e 22 20 69 76 79 2d 74 65	less.(string-prefix-p.".".ivy-te
15620	78 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 22 20 7c 20 67 72 65 70 20 2d 76 20 27 2f 5c 5c 2e	xt)............".|.grep.-v.'/\\.
15640	27 22 29 29 29 0a 20 20 20 20 28 69 76 79 2d 2d 73 74 72 69 6e 67 2d 72 65 70 6c 61 63 65 0a 20	'"))).....(ivy--string-replace..
15660	20 20 20 20 22 20 7c 20 67 72 65 70 22 0a 20 20 20 20 20 28 63 6f 6e 63 61 74 20 22 20 2d 74 79	....".|.grep"......(concat.".-ty
15680	70 65 20 22 20 74 79 70 65 20 65 78 63 6c 75 64 65 2d 64 6f 74 73 20 22 20 7c 20 67 72 65 70 22	pe.".type.exclude-dots.".|.grep"
156a0	29 20 63 6d 64 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69	).cmd)))..(defun.counsel-find-fi
156c0	6c 65 2d 6f 63 63 75 72 20 28 26 6f 70 74 69 6f 6e 61 6c 20 5f 63 61 6e 64 73 29 0a 20 20 28 72	le-occur.(&optional._cands)...(r
156e0	65 71 75 69 72 65 20 27 66 69 6e 64 2d 64 69 72 65 64 29 0a 20 20 28 63 64 20 69 76 79 2d 2d 64	equire.'find-dired)...(cd.ivy--d
15700	69 72 65 63 74 6f 72 79 29 0a 20 20 28 69 66 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c	irectory)...(if.counsel-find-fil
15720	65 2d 6f 63 63 75 72 2d 75 73 65 2d 66 69 6e 64 0a 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d	e-occur-use-find.......(counsel-
15740	63 6d 64 2d 74 6f 2d 64 69 72 65 64 0a 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 6f 63	cmd-to-dired........(counsel--oc
15760	63 75 72 2d 63 6d 64 2d 66 69 6e 64 29 0a 20 20 20 20 20 20 20 27 66 69 6e 64 2d 64 69 72 65 64	cur-cmd-find)........'find-dired
15780	2d 66 69 6c 74 65 72 29 0a 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 63 6d 64 2d 74 6f 2d 64 69 72	-filter).....(counsel-cmd-to-dir
157a0	65 64 0a 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 65 78 70 61 6e 64 2d 6c 73 0a 20 20 20 20	ed......(counsel--expand-ls.....
157c0	20 20 28 66 6f 72 6d 61 74 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 6f 63 63 75	..(format.counsel-find-file-occu
157e0	72 2d 63 6d 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 69 76 79 2d 2d 73 74	r-cmd...............(if.(ivy--st
15800	72 69 6e 67 2d 73 65 61 72 63 68 20 22 67 72 65 70 22 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d	ring-search."grep".counsel-find-
15820	66 69 6c 65 2d 6f 63 63 75 72 2d 63 6d 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	file-occur-cmd).................
15840	20 20 3b 3b 20 66 6f 72 20 62 61 63 6b 77 61 72 64 73 20 63 6f 6d 70 61 74 69 62 69 6c 69 74 79	..;;.for.backwards.compatibility
15860	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 65 6c 69	...................(counsel--eli
15880	73 70 2d 74 6f 2d 70 63 72 65 20 69 76 79 2d 2d 6f 6c 64 2d 72 65 29 0a 20 20 20 20 20 20 20 20	sp-to-pcre.ivy--old-re).........
158a0	20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 66 69 6c 65 2d 6e 61 6d 65 2d 66 69 6c 74	........(counsel--file-name-filt
158c0	65 72 20 74 29 29 29 29 29 29 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 75 70 2d	er.t)))))))..(defvar.counsel-up-
158e0	64 69 72 65 63 74 6f 72 79 2d 6c 65 76 65 6c 20 74 0a 20 20 22 43 6f 6e 74 72 6f 6c 20 77 68 65	directory-level.t..."Control.whe
15900	74 68 65 72 20 60 63 6f 75 6e 73 65 6c 2d 75 70 2d 64 69 72 65 63 74 6f 72 79 27 20 67 6f 65 73	ther.`counsel-up-directory'.goes
15920	20 75 70 20 61 20 6c 65 76 65 6c 20 6f 72 20 61 6c 77 61 79 73 20 61 20 64 69 72 65 63 74 6f 72	.up.a.level.or.always.a.director
15940	79 2e 0a 0a 49 66 20 6e 6f 6e 2d 6e 69 6c 2c 20 74 68 65 6e 20 60 63 6f 75 6e 73 65 6c 2d 75 70	y...If.non-nil,.then.`counsel-up
15960	2d 64 69 72 65 63 74 6f 72 79 27 20 77 69 6c 6c 20 72 65 6d 6f 76 65 20 74 68 65 20 66 69 6e 61	-directory'.will.remove.the.fina
15980	6c 20 6c 65 76 65 6c 20 6f 66 20 74 68 65 20 70 61 74 68 2e 0a 46 6f 72 20 65 78 61 6d 70 6c 65	l.level.of.the.path..For.example
159a0	3a 20 2f 61 2f 6c 6f 6e 67 2f 70 61 74 68 2f 66 69 6c 65 2e 6a 70 67 20 3d 3e 20 2f 61 2f 6c 6f	:./a/long/path/file.jpg.=>./a/lo
159c0	6e 67 2f 70 61 74 68 2f 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 61 2f 6c 6f 6e 67 2f 70 61	ng/path/............../a/long/pa
159e0	74 68 2f 20 20 20 20 20 3d 3e 20 20 20 20 20 2f 61 2f 6c 6f 6e 67 2f 0a 0a 49 66 20 6e 69 6c 2c	th/.....=>...../a/long/..If.nil,
15a00	20 74 68 65 6e 20 60 63 6f 75 6e 73 65 6c 2d 75 70 2d 64 69 72 65 63 74 6f 72 79 27 20 77 69 6c	.then.`counsel-up-directory'.wil
15a20	6c 20 67 6f 20 75 70 20 61 20 64 69 72 65 63 74 6f 72 79 2e 0a 46 6f 72 20 65 78 61 6d 70 6c 65	l.go.up.a.directory..For.example
15a40	3a 20 2f 61 2f 6c 6f 6e 67 2f 70 61 74 68 2f 66 69 6c 65 2e 6a 70 67 20 3d 3e 20 2f 61 2f 6c 6f	:./a/long/path/file.jpg.=>./a/lo
15a60	6e 67 2f 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 61 2f 6c 6f 6e 67 2f 70 61 74 68 2f 20 20	ng/............../a/long/path/..
15a80	20 20 20 3d 3e 20 20 20 20 20 2f 61 2f 6c 6f 6e 67 2f 22 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75	...=>...../a/long/")..(defun.cou
15aa0	6e 73 65 6c 2d 75 70 2d 64 69 72 65 63 74 6f 72 79 20 28 29 0a 20 20 22 47 6f 20 74 6f 20 74 68	nsel-up-directory.()..."Go.to.th
15ac0	65 20 70 61 72 65 6e 74 20 64 69 72 65 63 74 6f 72 79 20 70 72 65 73 65 6c 65 63 74 69 6e 67 20	e.parent.directory.preselecting.
15ae0	74 68 65 20 63 75 72 72 65 6e 74 20 6f 6e 65 2e 0a 0a 49 66 20 74 68 65 20 63 75 72 72 65 6e 74	the.current.one...If.the.current
15b00	20 64 69 72 65 63 74 6f 72 79 20 69 73 20 72 65 6d 6f 74 65 20 61 6e 64 20 69 74 27 73 20 6e 6f	.directory.is.remote.and.it's.no
15b20	74 20 70 6f 73 73 69 62 6c 65 20 74 6f 20 67 6f 20 75 70 20 61 6e 79 0a 66 75 72 74 68 65 72 2c	t.possible.to.go.up.any.further,
15b40	20 6d 61 6b 65 20 74 68 65 20 72 65 6d 6f 74 65 20 70 72 65 66 69 78 20 65 64 69 74 61 62 6c 65	.make.the.remote.prefix.editable
15b60	2e 0a 0a 53 65 65 20 76 61 72 69 61 62 6c 65 20 60 63 6f 75 6e 73 65 6c 2d 75 70 2d 64 69 72 65	...See.variable.`counsel-up-dire
15b80	63 74 6f 72 79 2d 6c 65 76 65 6c 27 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20	ctory-level'."...(interactive)..
15ba0	20 28 6c 65 74 2a 20 28 28 63 75 72 2d 64 69 72 20 28 64 69 72 65 63 74 6f 72 79 2d 66 69 6c 65	.(let*.((cur-dir.(directory-file
15bc0	2d 6e 61 6d 65 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 69 76 79 2d 2d 64 69 72	-name.(expand-file-name.ivy--dir
15be0	65 63 74 6f 72 79 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 75 70 2d 64 69 72 20 28 66 69 6c 65	ectory)))..........(up-dir.(file
15c00	2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 63 75 72 2d 64 69 72 29 29 29 0a 20 20 20 20 28	-name-directory.cur-dir))).....(
15c20	69 66 20 28 61 6e 64 20 28 66 69 6c 65 2d 72 65 6d 6f 74 65 2d 70 20 63 75 72 2d 64 69 72 29 20	if.(and.(file-remote-p.cur-dir).
15c40	28 73 74 72 69 6e 67 2d 65 71 75 61 6c 20 63 75 72 2d 64 69 72 20 75 70 2d 64 69 72 29 29 0a 20	(string-equal.cur-dir.up-dir))..
15c60	20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6d 61 6b 65 20	.......(progn...........;;.make.
15c80	74 68 65 20 72 65 6d 6f 74 65 20 70 72 65 66 69 78 20 65 64 69 74 61 62 6c 65 0a 20 20 20 20 20	the.remote.prefix.editable......
15ca0	20 20 20 20 20 28 73 65 74 71 20 69 76 79 2d 2d 6f 6c 64 2d 63 61 6e 64 73 20 6e 69 6c 29 0a 20	.....(setq.ivy--old-cands.nil)..
15cc0	20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 69 76 79 2d 2d 6f 6c 64 2d 72 65 20 6e 69 6c 29 0a	.........(setq.ivy--old-re.nil).
15ce0	20 20 20 20 20 20 20 20 20 20 28 69 76 79 2d 73 65 74 2d 69 6e 64 65 78 20 30 29 0a 20 20 20 20	..........(ivy-set-index.0).....
15d00	20 20 20 20 20 20 28 73 65 74 71 20 69 76 79 2d 2d 64 69 72 65 63 74 6f 72 79 20 22 22 29 0a 20	......(setq.ivy--directory."")..
15d20	20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 69 76 79 2d 2d 61 6c 6c 2d 63 61 6e 64 69 64 61 74	.........(setq.ivy--all-candidat
15d40	65 73 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 28 69 76 79 2d 73 65 74 2d 74 65 78 74 20	es.nil)...........(ivy-set-text.
15d60	22 22 29 0a 20 20 20 20 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 6d 69 6e 69 62 75 66 66 65 72	"")...........(delete-minibuffer
15d80	2d 63 6f 6e 74 65 6e 74 73 29 0a 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 75 70 2d	-contents)...........(insert.up-
15da0	64 69 72 29 29 0a 20 20 20 20 20 20 28 69 66 20 28 61 6e 64 20 63 6f 75 6e 73 65 6c 2d 75 70 2d	dir)).......(if.(and.counsel-up-
15dc0	64 69 72 65 63 74 6f 72 79 2d 6c 65 76 65 6c 20 28 6e 6f 74 20 28 73 74 72 69 6e 67 3d 20 69 76	directory-level.(not.(string=.iv
15de0	79 2d 74 65 78 74 20 22 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 72	y-text."")))...........(delete-r
15e00	65 67 69 6f 6e 20 28 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 29 20	egion.(line-beginning-position).
15e20	28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 29 29 0a 20 20 20 20 20 20 20 20 28 69 76	(line-end-position)).........(iv
15e40	79 2d 2d 63 64 20 75 70 2d 64 69 72 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 66 20 28 69 76 79	y--cd.up-dir).........(setf.(ivy
15e60	2d 73 74 61 74 65 2d 70 72 65 73 65 6c 65 63 74 20 69 76 79 2d 6c 61 73 74 29 0a 20 20 20 20 20	-state-preselect.ivy-last)......
15e80	20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 61 73 2d 64 69 72 65 63 74 6f 72 79	.........(file-name-as-directory
15ea0	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 63 75 72 2d 64 69 72	.(file-name-nondirectory.cur-dir
15ec0	29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 64 6f 77 6e 2d 64 69 72	)))))))..(defun.counsel-down-dir
15ee0	65 63 74 6f 72 79 20 28 29 0a 20 20 22 44 65 73 63 65 6e 64 20 69 6e 74 6f 20 74 68 65 20 63 75	ectory.()..."Descend.into.the.cu
15f00	72 72 65 6e 74 20 64 69 72 65 63 74 6f 72 79 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65	rrent.directory."...(interactive
15f20	29 0a 20 20 28 69 76 79 2d 2d 64 69 72 65 63 74 6f 72 79 2d 65 6e 74 65 72 29 29 0a 0a 28 64 65	)...(ivy--directory-enter))..(de
15f40	66 75 6e 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 75 6e 64 6f 20 28 29 0a 20 20	fun.counsel-find-file-undo.()...
15f60	28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 69 66 20 28 73 74 72 69 6e 67 3d 20 69 76 79	(interactive)...(if.(string=.ivy
15f80	2d 74 65 78 74 20 22 22 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 64 69 72 20 28 70 72 6f 67	-text."").......(let.((dir.(prog
15fa0	6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6f 70 20 69 76 79 2d 2d 64	n....................(pop.ivy--d
15fc0	69 72 65 63 74 6f 72 79 2d 68 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	irectory-hist)..................
15fe0	20 20 28 70 6f 70 20 69 76 79 2d 2d 64 69 72 65 63 74 6f 72 79 2d 68 69 73 74 29 29 29 29 0a 20	..(pop.ivy--directory-hist))))..
16000	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 20 20 28 69 76 79 2d	.......(when.dir...........(ivy-
16020	2d 63 64 20 64 69 72 29 29 29 0a 20 20 20 20 28 75 6e 64 6f 29 29 29 0a 0a 28 64 65 66 75 6e 20	-cd.dir))).....(undo)))..(defun.
16040	63 6f 75 6e 73 65 6c 2d 61 74 2d 67 69 74 2d 69 73 73 75 65 2d 70 20 28 29 0a 20 20 22 57 68 65	counsel-at-git-issue-p.()..."Whe
16060	6e 20 70 6f 69 6e 74 20 69 73 20 61 74 20 61 6e 20 69 73 73 75 65 20 69 6e 20 61 20 47 69 74 2d	n.point.is.at.an.issue.in.a.Git-
16080	76 65 72 73 69 6f 6e 65 64 20 66 69 6c 65 2c 20 72 65 74 75 72 6e 20 74 68 65 20 69 73 73 75 65	versioned.file,.return.the.issue
160a0	20 73 74 72 69 6e 67 2e 22 0a 20 20 28 61 6e 64 20 28 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 23 5b	.string."...(and.(looking-at."#[
160c0	30 2d 39 5d 2b 22 29 0a 20 20 20 20 20 20 20 28 73 61 76 65 2d 6d 61 74 63 68 2d 64 61 74 61 0a	0-9]+")........(save-match-data.
160e0	20 20 20 20 20 20 20 20 20 28 6f 72 20 28 65 71 20 28 76 63 2d 62 61 63 6b 65 6e 64 20 62 75 66	.........(or.(eq.(vc-backend.buf
16100	66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 29 20 27 47 69 74 29 0a 20 20 20 20 20 20 20 20 20 20 20	fer-file-name).'Git)............
16120	20 20 28 6d 65 6d 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 28 6d 61 67 69 74 2d 63 6f 6d 6d 69	..(memq.major-mode.'(magit-commi
16140	74 2d 6d 6f 64 65 20 76 63 2d 67 69 74 2d 6c 6f 67 2d 76 69 65 77 2d 6d 6f 64 65 29 29 0a 20 20	t-mode.vc-git-log-view-mode))...
16160	20 20 20 20 20 20 20 20 20 20 20 28 62 6f 75 6e 64 2d 61 6e 64 2d 74 72 75 65 2d 70 20 6d 61 67	...........(bound-and-true-p.mag
16180	69 74 2d 63 6f 6d 6d 69 74 2d 6d 6f 64 65 29 29 29 0a 20 20 20 20 20 20 20 28 6d 61 74 63 68 2d	it-commit-mode)))........(match-
161a0	73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 30 29 29 29 0a 0a 28 64 65 66 75	string-no-properties.0)))..(defu
161c0	6e 20 63 6f 75 6e 73 65 6c 2d 67 69 74 68 75 62 2d 75 72 6c 2d 70 20 28 29 0a 20 20 22 52 65 74	n.counsel-github-url-p.()..."Ret
161e0	75 72 6e 20 61 20 47 69 74 68 75 62 20 69 73 73 75 65 20 55 52 4c 20 61 74 20 70 6f 69 6e 74 2e	urn.a.Github.issue.URL.at.point.
16200	22 0a 20 20 28 77 68 65 6e 20 28 63 6f 75 6e 73 65 6c 2d 72 65 71 75 69 72 65 2d 70 72 6f 67 72	"...(when.(counsel-require-progr
16220	61 6d 20 22 67 69 74 22 20 74 29 0a 20 20 20 20 28 6c 65 74 20 28 28 75 72 6c 20 28 63 6f 75 6e	am."git".t).....(let.((url.(coun
16240	73 65 6c 2d 61 74 2d 67 69 74 2d 69 73 73 75 65 2d 70 29 29 29 0a 20 20 20 20 20 20 28 77 68 65	sel-at-git-issue-p))).......(whe
16260	6e 20 75 72 6c 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 6f 72 69 67 69 6e 20 28 73 68 65	n.url.........(let.((origin.(she
16280	6c 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	ll-command-to-string............
162a0	20 20 20 20 20 20 20 20 20 20 20 20 22 67 69 74 20 72 65 6d 6f 74 65 20 67 65 74 2d 75 72 6c 20	............"git.remote.get-url.
162c0	6f 72 69 67 69 6e 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 75 73 65 72 20 72 65 70	origin"))...............user.rep
162e0	6f 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 73 74 72 69 6e 67 2d 6d 61 74 63	o)...........(cond.((string-matc
16300	68 20 22 5c 5c 60 67 69 74 40 67 69 74 68 75 62 2e 63 6f 6d 3a 5c 5c 28 5b 5e 2f 5d 2b 5c 5c 29	h."\\`git@github.com:\\([^/]+\\)
16320	2f 5c 5c 28 2e 2a 5c 5c 29 5c 5c 2e 67 69 74 24 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	/\\(.*\\)\\.git$"...............
16340	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6f 72 69 67 69 6e 29 0a 20 20 20 20 20 20 20	.................origin)........
16360	20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 75 73 65 72 20 28 6d 61 74 63 68 2d 73 74 72 69	..........(setq.user.(match-stri
16380	6e 67 20 31 20 6f 72 69 67 69 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	ng.1.origin))..................(
163a0	73 65 74 71 20 72 65 70 6f 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 32 20 6f 72 69 67 69 6e	setq.repo.(match-string.2.origin
163c0	29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 73 74 72 69 6e 67 2d 6d 61 74	))).................((string-mat
163e0	63 68 20 22 5c 5c 60 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 5c 5c 28 5b 5e 2f	ch."\\`https://github.com/\\([^/
16400	5d 2b 5c 5c 29 2f 5c 5c 28 2e 2a 5c 5c 29 24 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	]+\\)/\\(.*\\)$"................
16420	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6f 72 69 67 69 6e 29 0a 20 20 20 20 20 20 20 20	................origin).........
16440	20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 75 73 65 72 20 28 6d 61 74 63 68 2d 73 74 72 69 6e	.........(setq.user.(match-strin
16460	67 20 31 20 6f 72 69 67 69 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73	g.1.origin))..................(s
16480	65 74 71 20 72 65 70 6f 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 32 20 6f 72 69 67 69 6e 29	etq.repo.(match-string.2.origin)
164a0	29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 75 73 65 72 0a 20 20 20 20 20 20 20	)))...........(when.user........
164c0	20 20 20 20 20 28 73 65 74 71 20 75 72 6c 20 28 66 6f 72 6d 61 74 20 22 68 74 74 70 73 3a 2f 2f	.....(setq.url.(format."https://
164e0	67 69 74 68 75 62 2e 63 6f 6d 2f 25 73 2f 25 73 2f 69 73 73 75 65 73 2f 25 73 22 0a 20 20 20 20	github.com/%s/%s/issues/%s".....
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 20 20 75 73 65 72 20 72	..........................user.r
16520	65 70 6f 20 28 73 75 62 73 74 72 69 6e 67 20 75 72 6c 20 31 29 29 29 29 29 29 29 29 29 0a 0a 28	epo.(substring.url.1)))))))))..(
16540	64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 65 6d 61 63 73 2d 75 72 6c 2d 70 20 28 29 0a 20 20 22	defun.counsel-emacs-url-p.()..."
16560	52 65 74 75 72 6e 20 61 20 44 65 62 62 75 67 73 20 69 73 73 75 65 20 55 52 4c 20 61 74 20 70 6f	Return.a.Debbugs.issue.URL.at.po
16580	69 6e 74 2e 22 0a 20 20 28 6c 65 74 20 28 28 75 72 6c 20 28 61 6e 64 20 28 63 6f 75 6e 73 65 6c	int."...(let.((url.(and.(counsel
165a0	2d 72 65 71 75 69 72 65 2d 70 72 6f 67 72 61 6d 20 22 67 69 74 22 20 74 29 0a 20 20 20 20 20 20	-require-program."git".t).......
165c0	20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 61 74 2d 67 69 74 2d 69 73 73 75	............(counsel-at-git-issu
165e0	65 2d 70 29 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 75 72 6c 0a 20 20 20 20 20 20 28 6c 65 74	e-p)))).....(when.url.......(let
16600	20 28 28 6f 72 69 67 69 6e 20 28 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e 64 2d 74 6f 2d 73 74 72 69	.((origin.(shell-command-to-stri
16620	6e 67 20 22 67 69 74 20 72 65 6d 6f 74 65 20 67 65 74 2d 75 72 6c 20 6f 72 69 67 69 6e 22 29 29	ng."git.remote.get-url.origin"))
16640	29 0a 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 2d 70 20	).........(when.(string-match-p.
16660	22 67 69 74 2e 73 76 2e 67 6e 75 2e 6f 72 67 3a 2f 73 72 76 2f 67 69 74 2f 65 6d 61 63 73 2e 67	"git.sv.gnu.org:/srv/git/emacs.g
16680	69 74 22 20 6f 72 69 67 69 6e 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 68	it".origin)...........(format."h
166a0	74 74 70 73 3a 2f 2f 62 75 67 73 2e 67 6e 75 2e 6f 72 67 2f 25 73 22 20 28 73 75 62 73 74 72 69	ttps://bugs.gnu.org/%s".(substri
166c0	6e 67 20 75 72 6c 20 31 29 29 29 29 29 29 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c	ng.url.1)))))))..(defvar.counsel
166e0	2d 75 72 6c 2d 65 78 70 61 6e 73 69 6f 6e 73 2d 61 6c 69 73 74 20 6e 69 6c 0a 20 20 22 4d 61 70	-url-expansions-alist.nil..."Map
16700	20 6f 66 20 72 65 67 75 6c 61 72 20 65 78 70 72 65 73 73 69 6f 6e 73 20 74 6f 20 65 78 70 61 6e	.of.regular.expressions.to.expan
16720	73 69 6f 6e 73 2e 0a 0a 54 68 65 20 76 61 6c 75 65 20 6f 66 20 74 68 69 73 20 76 61 72 69 61 62	sions...The.value.of.this.variab
16740	6c 65 20 69 73 20 61 20 6c 69 73 74 20 6f 66 20 70 61 69 72 73 20 28 52 45 47 45 58 50 20 2e 20	le.is.a.list.of.pairs.(REGEXP...
16760	46 4f 52 4d 41 54 29 2e 0a 0a 60 63 6f 75 6e 73 65 6c 2d 75 72 6c 2d 65 78 70 61 6e 64 27 20 65	FORMAT)...`counsel-url-expand'.e
16780	78 70 61 6e 64 73 20 74 68 65 20 77 6f 72 64 20 61 74 20 70 6f 69 6e 74 20 61 63 63 6f 72 64 69	xpands.the.word.at.point.accordi
167a0	6e 67 20 74 6f 0a 46 4f 52 4d 41 54 20 66 6f 72 20 74 68 65 20 66 69 72 73 74 20 6d 61 74 63 68	ng.to.FORMAT.for.the.first.match
167c0	69 6e 67 20 52 45 47 45 58 50 2e 20 20 46 4f 52 4d 41 54 20 63 61 6e 20 62 65 20 65 69 74 68 65	ing.REGEXP...FORMAT.can.be.eithe
167e0	72 20 61 0a 73 74 72 69 6e 67 20 6f 72 20 61 20 66 75 6e 63 74 69 6f 6e 2e 20 20 49 66 20 69 74	r.a.string.or.a.function...If.it
16800	20 69 73 20 61 20 73 74 72 69 6e 67 2c 20 69 74 20 69 73 20 75 73 65 64 20 61 73 20 74 68 65 0a	.is.a.string,.it.is.used.as.the.
16820	66 6f 72 6d 61 74 20 73 74 72 69 6e 67 20 66 6f 72 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 20 60	format.string.for.the.function.`
16840	66 6f 72 6d 61 74 27 2c 20 77 69 74 68 20 74 68 65 20 77 6f 72 64 20 61 74 20 70 6f 69 6e 74 0a	format',.with.the.word.at.point.
16860	61 73 20 74 68 65 20 6e 65 78 74 20 61 72 67 75 6d 65 6e 74 2e 20 20 49 66 20 69 74 20 69 73 20	as.the.next.argument...If.it.is.
16880	61 20 66 75 6e 63 74 69 6f 6e 2c 20 69 74 20 69 73 20 63 61 6c 6c 65 64 20 77 69 74 68 20 74 68	a.function,.it.is.called.with.th
168a0	65 0a 77 6f 72 64 20 61 74 20 70 6f 69 6e 74 20 61 73 20 74 68 65 20 73 6f 6c 65 20 61 72 67 75	e.word.at.point.as.the.sole.argu
168c0	6d 65 6e 74 2e 0a 0a 46 6f 72 20 65 78 61 6d 70 6c 65 2c 20 61 20 70 61 69 72 20 6f 66 20 74 68	ment...For.example,.a.pair.of.th
168e0	65 20 66 6f 72 6d 3a 0a 20 20 5c 5c 3d 27 28 5c 22 5c 5c 5c 5c 5c 5c 3d 60 42 53 45 52 56 2d 5b	e.form:...\\='(\"\\\\\\=`BSERV-[
16900	5b 3a 64 69 67 69 74 3a 5d 5d 2b 5c 5c 5c 5c 5c 5c 3d 27 5c 22 20 2e 0a 20 20 20 20 5c 22 68 74	[:digit:]]+\\\\\\='\".......\"ht
16920	74 70 73 3a 2f 2f 6a 69 72 61 2e 61 74 6c 61 73 73 69 61 6e 2e 63 6f 6d 2f 62 72 6f 77 73 65 2f	tps://jira.atlassian.com/browse/
16940	25 73 5c 22 29 0a 65 78 70 61 6e 64 73 20 74 6f 20 74 68 65 20 55 52 4c 20 60 68 74 74 70 73 3a	%s\").expands.to.the.URL.`https:
16960	2f 2f 6a 69 72 61 2e 61 74 6c 61 73 73 69 61 6e 2e 63 6f 6d 2f 62 72 6f 77 73 65 2f 42 53 45 52	//jira.atlassian.com/browse/BSER
16980	56 2d 31 30 30 27 0a 77 68 65 6e 20 74 68 65 20 77 6f 72 64 20 61 74 20 70 6f 69 6e 74 20 69 73	V-100'.when.the.word.at.point.is
169a0	20 5c 22 42 53 45 52 56 2d 31 30 30 5c 22 2e 0a 0a 49 66 20 46 4f 52 4d 41 54 20 69 73 20 61 20	.\"BSERV-100\"...If.FORMAT.is.a.
169c0	66 75 6e 63 74 69 6f 6e 2c 20 6d 6f 72 65 20 70 6f 77 65 72 66 75 6c 20 74 72 61 6e 73 66 6f 72	function,.more.powerful.transfor
169e0	6d 61 74 69 6f 6e 73 20 61 72 65 0a 70 6f 73 73 69 62 6c 65 2e 20 20 41 73 20 61 6e 20 65 78 61	mations.are.possible...As.an.exa
16a00	6d 70 6c 65 2c 0a 20 20 5c 5c 3d 27 28 5c 22 5c 5c 5c 5c 5c 5c 3d 60 69 73 73 75 65 5c 5c 5c 5c	mple,...\\='(\"\\\\\\=`issue\\\\
16a20	28 5b 5b 3a 64 69 67 69 74 3a 5d 5d 2b 5c 5c 5c 5c 29 5c 5c 5c 5c 5c 5c 3d 27 5c 22 20 2e 0a 20	([[:digit:]]+\\\\)\\\\\\='\"....
16a40	20 20 20 28 6c 61 6d 62 64 61 20 28 77 6f 72 64 29 0a 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20	...(lambda.(word).......(concat.
16a60	5c 22 68 74 74 70 73 3a 2f 2f 62 75 67 73 2e 67 6e 75 2e 6f 72 67 2f 5c 22 20 28 6d 61 74 63 68	\"https://bugs.gnu.org/\".(match
16a80	2d 73 74 72 69 6e 67 20 31 20 77 6f 72 64 29 29 29 29 0a 74 72 69 6d 73 20 74 68 65 20 5c 22 69	-string.1.word)))).trims.the.\"i
16aa0	73 73 75 65 5c 22 20 70 72 65 66 69 78 20 66 72 6f 6d 20 74 68 65 20 77 6f 72 64 20 61 74 20 70	ssue\".prefix.from.the.word.at.p
16ac0	6f 69 6e 74 20 62 65 66 6f 72 65 20 63 72 65 61 74 69 6e 67 0a 74 68 65 20 55 52 4c 2e 22 29 0a	oint.before.creating.the.URL.").
16ae0	0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 75 72 6c 2d 65 78 70 61 6e 64 20 28 29 0a 20 20	.(defun.counsel-url-expand.()...
16b00	22 45 78 70 61 6e 64 20 77 6f 72 64 20 61 74 20 70 6f 69 6e 74 20 75 73 69 6e 67 20 60 63 6f 75	"Expand.word.at.point.using.`cou
16b20	6e 73 65 6c 2d 75 72 6c 2d 65 78 70 61 6e 73 69 6f 6e 73 2d 61 6c 69 73 74 27 2e 0a 54 68 65 20	nsel-url-expansions-alist'..The.
16b40	66 69 72 73 74 20 70 61 69 72 20 69 6e 20 74 68 65 20 6c 69 73 74 20 77 68 6f 73 65 20 72 65 67	first.pair.in.the.list.whose.reg
16b60	65 78 70 20 6d 61 74 63 68 65 73 20 74 68 65 20 77 6f 72 64 20 61 74 20 70 6f 69 6e 74 0a 77 69	exp.matches.the.word.at.point.wi
16b80	6c 6c 20 62 65 20 65 78 70 61 6e 64 65 64 20 61 63 63 6f 72 64 69 6e 67 20 74 6f 20 69 74 73 20	ll.be.expanded.according.to.its.
16ba0	66 6f 72 6d 61 74 2e 20 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 73 0a 69 6e 74 65 6e 64	format...This.function.is.intend
16bc0	65 64 20 74 6f 20 62 65 20 75 73 65 64 20 69 6e 20 60 69 76 79 2d 66 66 61 70 2d 75 72 6c 2d 66	ed.to.be.used.in.`ivy-ffap-url-f
16be0	75 6e 63 74 69 6f 6e 73 27 20 74 6f 20 62 72 6f 77 73 65 20 74 68 65 0a 72 65 73 75 6c 74 20 61	unctions'.to.browse.the.result.a
16c00	73 20 61 20 55 52 4c 2e 22 0a 20 20 28 6c 65 74 20 28 28 77 6f 72 64 2d 61 74 2d 70 6f 69 6e 74	s.a.URL."...(let.((word-at-point
16c20	20 28 63 75 72 72 65 6e 74 2d 77 6f 72 64 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 77 6f 72 64	.(current-word))).....(when.word
16c40	2d 61 74 2d 70 6f 69 6e 74 0a 20 20 20 20 20 20 28 63 6c 2d 73 6f 6d 65 0a 20 20 20 20 20 20 20	-at-point.......(cl-some........
16c60	28 6c 61 6d 62 64 61 20 28 70 61 69 72 29 0a 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 72	(lambda.(pair)..........(let.((r
16c80	65 67 65 78 70 20 28 63 61 72 20 70 61 69 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	egexp.(car.pair))...............
16ca0	20 28 66 6f 72 6d 61 74 74 65 72 20 28 63 64 72 20 70 61 69 72 29 29 29 0a 20 20 20 20 20 20 20	.(formatter.(cdr.pair)))........
16cc0	20 20 20 20 28 77 68 65 6e 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 72 65 67 65 78 70 20 77	....(when.(string-match.regexp.w
16ce0	6f 72 64 2d 61 74 2d 70 6f 69 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28	ord-at-point)..............(if.(
16d00	66 75 6e 63 74 69 6f 6e 70 20 66 6f 72 6d 61 74 74 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20	functionp.formatter)............
16d20	20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 66 6f 72 6d 61 74 74 65 72 20 77 6f 72 64 2d 61 74	......(funcall.formatter.word-at
16d40	2d 70 6f 69 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 66	-point)................(format.f
16d60	6f 72 6d 61 74 74 65 72 20 77 6f 72 64 2d 61 74 2d 70 6f 69 6e 74 29 29 29 29 29 0a 20 20 20 20	ormatter.word-at-point))))).....
16d80	20 20 20 63 6f 75 6e 73 65 6c 2d 75 72 6c 2d 65 78 70 61 6e 73 69 6f 6e 73 2d 61 6c 69 73 74 29	...counsel-url-expansions-alist)
16da0	29 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 64 69 72 65 64 27 0a 0a 3b 3b 3b 23 23	)))..;;;;.`counsel-dired'..;;;##
16dc0	23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 64 69 72 65 64 20 28	#autoload.(defun.counsel-dired.(
16de0	26 6f 70 74 69 6f 6e 61 6c 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 29 0a 20 20 22 46 6f 72 77	&optional.initial-input)..."Forw
16e00	61 72 64 20 74 6f 20 60 64 69 72 65 64 27 2e 0a 57 68 65 6e 20 49 4e 49 54 49 41 4c 2d 49 4e 50	ard.to.`dired'..When.INITIAL-INP
16e20	55 54 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 75 73 65 20 69 74 20 69 6e 20 74 68 65 20 6d 69 6e	UT.is.non-nil,.use.it.in.the.min
16e40	69 62 75 66 66 65 72 20 64 75 72 69 6e 67 20 63 6f 6d 70 6c 65 74 69 6f 6e 2e 22 0a 20 20 28 69	ibuffer.during.completion."...(i
16e60	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 29 0a 20	nteractive)...(require.'dired)..
16e80	20 28 6c 65 74 20 28 28 63 6f 75 6e 73 65 6c 2d 2d 66 69 6e 64 2d 66 69 6c 65 2d 70 72 65 64 69	.(let.((counsel--find-file-predi
16ea0	63 61 74 65 20 23 27 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 2d 70 29 29 0a 20 20 20 20 28 63	cate.#'file-directory-p)).....(c
16ec0	6f 75 6e 73 65 6c 2d 2d 66 69 6e 64 2d 66 69 6c 65 2d 31 0a 20 20 20 20 20 22 44 69 72 65 64 20	ounsel--find-file-1......"Dired.
16ee0	28 64 69 72 65 63 74 6f 72 79 29 3a 20 22 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 0a 20 20 20	(directory):.".initial-input....
16f00	20 20 28 6c 61 6d 62 64 61 20 28 64 29 20 28 64 69 72 65 64 20 28 65 78 70 61 6e 64 2d 66 69 6c	..(lambda.(d).(dired.(expand-fil
16f20	65 2d 6e 61 6d 65 20 64 29 29 29 0a 20 20 20 20 20 27 63 6f 75 6e 73 65 6c 2d 64 69 72 65 64 29	e-name.d)))......'counsel-dired)
16f40	29 29 0a 0a 28 69 76 79 2d 63 6f 6e 66 69 67 75 72 65 20 27 63 6f 75 6e 73 65 6c 2d 64 69 72 65	))..(ivy-configure.'counsel-dire
16f60	64 0a 20 20 3a 70 61 72 65 6e 74 20 27 72 65 61 64 2d 66 69 6c 65 2d 6e 61 6d 65 2d 69 6e 74 65	d...:parent.'read-file-name-inte
16f80	72 6e 61 6c 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 72 65 63 65 6e 74 66 27 0a 0a 28	rnal)..;;;;.`counsel-recentf'..(
16fa0	64 65 66 76 61 72 20 72 65 63 65 6e 74 66 2d 6c 69 73 74 29 0a 28 64 65 63 6c 61 72 65 2d 66 75	defvar.recentf-list).(declare-fu
16fc0	6e 63 74 69 6f 6e 20 72 65 63 65 6e 74 66 2d 6d 6f 64 65 20 22 72 65 63 65 6e 74 66 22 29 0a 0a	nction.recentf-mode."recentf")..
16fe0	28 64 65 66 63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 72 65 63 65 6e 74 66 2d 69 6e 63 6c 75	(defcustom.counsel-recentf-inclu
17000	64 65 2d 78 64 67 2d 6c 69 73 74 20 6e 69 6c 0a 20 20 22 49 6e 63 6c 75 64 65 20 72 65 63 65 6e	de-xdg-list.nil..."Include.recen
17020	74 6c 79 20 75 73 65 64 20 66 69 6c 65 73 20 6c 69 73 74 65 64 20 62 79 20 58 44 47 2d 63 6f 6d	tly.used.files.listed.by.XDG-com
17040	70 6c 69 61 6e 74 20 65 6e 76 69 72 6f 6e 6d 65 6e 74 73 2e 0a 45 78 61 6d 70 6c 65 73 20 6f 66	pliant.environments..Examples.of
17060	20 73 75 63 68 20 65 6e 76 69 72 6f 6e 6d 65 6e 74 73 20 61 72 65 20 47 4e 4f 4d 45 20 61 6e 64	.such.environments.are.GNOME.and
17080	20 4b 44 45 2e 20 20 53 65 65 20 74 68 65 20 55 52 4c 0a 60 68 74 74 70 73 3a 2f 2f 77 77 77 2e	.KDE...See.the.URL.`https://www.
170a0	66 72 65 65 64 65 73 6b 74 6f 70 2e 6f 72 67 2f 77 69 6b 69 2f 53 70 65 63 69 66 69 63 61 74 69	freedesktop.org/wiki/Specificati
170c0	6f 6e 73 2f 64 65 73 6b 74 6f 70 2d 62 6f 6f 6b 6d 61 72 6b 2d 73 70 65 63 27 2e 22 0a 20 20 3a	ons/desktop-bookmark-spec'."...:
170e0	74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 0a 20 20 3a 6c 69 6e 6b 20 27 28 75 72 6c 2d 6c 69 6e 6b	type.'boolean...:link.'(url-link
17100	20 22 5c 0a 68 74 74 70 73 3a 2f 2f 77 77 77 2e 66 72 65 65 64 65 73 6b 74 6f 70 2e 6f 72 67 2f	."\.https://www.freedesktop.org/
17120	77 69 6b 69 2f 53 70 65 63 69 66 69 63 61 74 69 6f 6e 73 2f 64 65 73 6b 74 6f 70 2d 62 6f 6f 6b	wiki/Specifications/desktop-book
17140	6d 61 72 6b 2d 73 70 65 63 22 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65	mark-spec"))..;;;###autoload.(de
17160	66 75 6e 20 63 6f 75 6e 73 65 6c 2d 72 65 63 65 6e 74 66 20 28 29 0a 20 20 22 46 69 6e 64 20 61	fun.counsel-recentf.()..."Find.a
17180	20 66 69 6c 65 20 6f 6e 20 60 72 65 63 65 6e 74 66 2d 6c 69 73 74 27 2e 22 0a 20 20 28 69 6e 74	.file.on.`recentf-list'."...(int
171a0	65 72 61 63 74 69 76 65 29 0a 20 20 28 72 65 63 65 6e 74 66 2d 6d 6f 64 65 29 0a 20 20 28 69 76	eractive)...(recentf-mode)...(iv
171c0	79 2d 72 65 61 64 20 22 52 65 63 65 6e 74 66 3a 20 22 20 28 63 6f 75 6e 73 65 6c 2d 72 65 63 65	y-read."Recentf:.".(counsel-rece
171e0	6e 74 66 2d 63 61 6e 64 69 64 61 74 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74	ntf-candidates).............:act
17200	69 6f 6e 20 28 6c 61 6d 62 64 61 20 28 66 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ion.(lambda.(f).................
17220	20 20 20 20 20 20 28 77 69 74 68 2d 69 76 79 2d 77 69 6e 64 6f 77 0a 20 20 20 20 20 20 20 20 20	......(with-ivy-window..........
17240	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6e 64 2d 66 69 6c 65 20 66 29 29 29 0a 20	...............(find-file.f)))..
17260	20 20 20 20 20 20 20 20 20 20 20 3a 72 65 71 75 69 72 65 2d 6d 61 74 63 68 20 74 0a 20 20 20 20	...........:require-match.t.....
17280	20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 72 65 63 65 6e 74 66	........:caller.'counsel-recentf
172a0	29 29 0a 0a 28 69 76 79 2d 73 65 74 2d 61 63 74 69 6f 6e 73 0a 20 27 63 6f 75 6e 73 65 6c 2d 72	))..(ivy-set-actions..'counsel-r
172c0	65 63 65 6e 74 66 0a 20 60 28 28 22 6a 22 20 66 69 6e 64 2d 66 69 6c 65 2d 6f 74 68 65 72 2d 77	ecentf..`(("j".find-file-other-w
172e0	69 6e 64 6f 77 20 22 6f 74 68 65 72 20 77 69 6e 64 6f 77 22 29 0a 20 20 20 28 22 66 22 20 66 69	indow."other.window")....("f".fi
17300	6e 64 2d 66 69 6c 65 2d 6f 74 68 65 72 2d 66 72 61 6d 65 20 22 6f 74 68 65 72 20 66 72 61 6d 65	nd-file-other-frame."other.frame
17320	22 29 0a 20 20 20 28 22 78 22 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 65 78 74	")....("x".counsel-find-file-ext
17340	65 72 6e 20 22 6f 70 65 6e 20 65 78 74 65 72 6e 61 6c 6c 79 22 29 0a 20 20 20 28 22 64 22 20 2c	ern."open.externally")....("d".,
17360	28 6c 61 6d 62 64 61 20 28 66 69 6c 65 29 20 28 73 65 74 71 20 72 65 63 65 6e 74 66 2d 6c 69 73	(lambda.(file).(setq.recentf-lis
17380	74 20 28 64 65 6c 65 74 65 20 66 69 6c 65 20 72 65 63 65 6e 74 66 2d 6c 69 73 74 29 29 29 0a 20	t.(delete.file.recentf-list)))..
173a0	20 20 20 22 64 65 6c 65 74 65 20 66 72 6f 6d 20 72 65 63 65 6e 74 66 22 29 29 29 0a 0a 28 64 65	..."delete.from.recentf")))..(de
173c0	66 75 6e 20 63 6f 75 6e 73 65 6c 2d 72 65 63 65 6e 74 66 2d 63 61 6e 64 69 64 61 74 65 73 20 28	fun.counsel-recentf-candidates.(
173e0	29 0a 20 20 22 52 65 74 75 72 6e 20 63 61 6e 64 69 64 61 74 65 73 20 66 6f 72 20 60 63 6f 75 6e	)..."Return.candidates.for.`coun
17400	73 65 6c 2d 72 65 63 65 6e 74 66 27 2e 0a 0a 57 68 65 6e 20 60 63 6f 75 6e 73 65 6c 2d 72 65 63	sel-recentf'...When.`counsel-rec
17420	65 6e 74 66 2d 69 6e 63 6c 75 64 65 2d 78 64 67 2d 6c 69 73 74 27 20 69 73 20 6e 6f 6e 2d 6e 69	entf-include-xdg-list'.is.non-ni
17440	6c 2c 20 61 6c 73 6f 20 69 6e 63 6c 75 64 65 0a 74 68 65 20 66 69 6c 65 73 20 69 6e 20 73 61 69	l,.also.include.the.files.in.sai
17460	64 20 6c 69 73 74 2c 20 73 6f 72 74 69 6e 67 20 74 68 65 20 63 6f 6d 62 69 6e 65 64 20 6c 69 73	d.list,.sorting.the.combined.lis
17480	74 20 62 79 20 66 69 6c 65 20 61 63 63 65 73 73 0a 74 69 6d 65 2e 22 0a 20 20 28 69 66 20 28 61	t.by.file.access.time."...(if.(a
174a0	6e 64 20 63 6f 75 6e 73 65 6c 2d 72 65 63 65 6e 74 66 2d 69 6e 63 6c 75 64 65 2d 78 64 67 2d 6c	nd.counsel-recentf-include-xdg-l
174c0	69 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 28 3e 3d 20 65 6d 61 63 73 2d 6d 61 6a 6f 72 2d 76	ist............(>=.emacs-major-v
174e0	65 72 73 69 6f 6e 20 32 36 29 29 0a 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 64 75 70 73 0a 20	ersion.26)).......(delete-dups..
17500	20 20 20 20 20 20 28 73 6f 72 74 20 28 6e 63 6f 6e 63 20 28 6d 61 70 63 61 72 20 23 27 73 75 62	......(sort.(nconc.(mapcar.#'sub
17520	73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 72 65 63 65 6e 74 66 2d 6c 69 73	string-no-properties.recentf-lis
17540	74 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 75 6e 73 65 6c 2d	t).....................(counsel-
17560	2d 72 65 63 65 6e 74 66 2d 67 65 74 2d 78 64 67 2d 72 65 63 65 6e 74 2d 66 69 6c 65 73 29 29 0a	-recentf-get-xdg-recent-files)).
17580	20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 66 69 6c 65 31 20 66 69 6c 65	.............(lambda.(file1.file
175a0	32 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 66 69 6c 65 2d 72	2)................(cond.((file-r
175c0	65 6d 6f 74 65 2d 70 20 66 69 6c 65 31 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	emote-p.file1)..................
175e0	20 20 20 20 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 28	.....nil)......................(
17600	28 66 69 6c 65 2d 72 65 6d 6f 74 65 2d 70 20 66 69 6c 65 32 29 29 0a 20 20 20 20 20 20 20 20 20	(file-remote-p.file2))..........
17620	20 20 20 20 20 20 20 20 20 20 20 20 28 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	............(t..................
17640	20 20 20 20 20 3b 3b 20 41 64 64 65 64 20 69 6e 20 45 6d 61 63 73 20 32 36 2e 31 2e 0a 20 20 20	.....;;.Added.in.Emacs.26.1.....
17660	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 63 6c 61 72 65 2d 66 75 6e 63	...................(declare-func
17680	74 69 6f 6e 20 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 2d 61 63 63 65 73 73 2d 74 69 6d 65 20	tion.file-attribute-access-time.
176a0	22 66 69 6c 65 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	"files".........................
176c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 74 74 72 69 62 75 74 65 73 29 29 0a 20 20	................(attributes))...
176e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 69 6d 65 2d 6c 65 73 73 2d 70	....................(time-less-p
17700	20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 2d 61 63 63 65 73 73 2d 74 69 6d 65 0a 20 20 20	.(file-attribute-access-time....
17720	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
17740	20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 73 20 66 69 6c 65 32 29 29 0a 20 20 20 20 20 20	.(file-attributes.file2)).......
17760	20 20 20 20 20 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	.............................(fi
17780	6c 65 2d 61 74 74 72 69 62 75 74 65 2d 61 63 63 65 73 73 2d 74 69 6d 65 0a 20 20 20 20 20 20 20	le-attribute-access-time........
177a0	20 20 20 20 20 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	.............................(fi
177c0	6c 65 2d 61 74 74 72 69 62 75 74 65 73 20 66 69 6c 65 31 29 29 29 29 29 29 29 29 0a 20 20 20 20	le-attributes.file1)))))))).....
177e0	28 6d 61 70 63 61 72 20 23 27 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65	(mapcar.#'substring-no-propertie
17800	73 20 72 65 63 65 6e 74 66 2d 6c 69 73 74 29 29 29 0a 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6f	s.recentf-list)))..(defalias.'co
17820	75 6e 73 65 6c 2d 2d 78 6d 6c 2d 70 61 72 73 65 2d 72 65 67 69 6f 6e 0a 20 20 28 69 66 20 28 63	unsel--xml-parse-region...(if.(c
17840	6f 6e 64 20 28 28 66 62 6f 75 6e 64 70 20 27 6c 69 62 78 6d 6c 2d 61 76 61 69 6c 61 62 6c 65 2d	ond.((fboundp.'libxml-available-
17860	70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 41 64 64 65 64 20 69 6e 20 45 6d 61 63	p)..............;;.Added.in.Emac
17880	73 20 32 37 2e 31 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 62 78 6d 6c 2d 61 76 61	s.27.1...............(libxml-ava
178a0	69 6c 61 62 6c 65 2d 70 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 28 66 62 6f 75 6e 64 70	ilable-p)).............((fboundp
178c0	20 27 6c 69 62 78 6d 6c 2d 70 61 72 73 65 2d 78 6d 6c 2d 72 65 67 69 6f 6e 29 0a 20 20 20 20 20	.'libxml-parse-xml-region)......
178e0	20 20 20 20 20 20 20 20 3b 3b 20 43 68 65 63 6b 69 6e 67 20 66 6f 72 20 60 66 62 6f 75 6e 64 70	........;;.Checking.for.`fboundp
17900	27 20 69 73 20 6e 6f 74 20 65 6e 6f 75 67 68 20 6f 6e 20 57 69 6e 64 6f 77 73 2c 20 77 68 65 72	'.is.not.enough.on.Windows,.wher
17920	65 20 69 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 77 69 6c 6c 20 72 65 74 75 72 6e	e.it..............;;.will.return
17940	20 6e 6f 6e 2d 6e 69 6c 20 65 76 65 6e 20 69 66 20 74 68 65 20 6c 69 62 72 61 72 79 20 69 73 20	.non-nil.even.if.the.library.is.
17960	6e 6f 74 20 69 6e 73 74 61 6c 6c 65 64 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74	not.installed...............(wit
17980	68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e	h-temp-buffer................(in
179a0	73 65 72 74 20 22 3c 78 6d 6c 2f 3e 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c	sert."<xml/>")................(l
179c0	69 62 78 6d 6c 2d 70 61 72 73 65 2d 78 6d 6c 2d 72 65 67 69 6f 6e 20 28 70 6f 69 6e 74 2d 6d 69	ibxml-parse-xml-region.(point-mi
179e0	6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 29 29 0a 20 20 20 20 20 20 28 6c 61 6d 62 64 61	n).(point-max))))).......(lambda
17a00	20 28 26 6f 70 74 69 6f 6e 61 6c 20 62 65 67 20 65 6e 64 29 0a 20 20 20 20 20 20 20 20 28 6c 69	.(&optional.beg.end).........(li
17a20	62 78 6d 6c 2d 70 61 72 73 65 2d 78 6d 6c 2d 72 65 67 69 6f 6e 20 28 6f 72 20 62 65 67 20 28 70	bxml-parse-xml-region.(or.beg.(p
17a40	6f 69 6e 74 2d 6d 69 6e 29 29 20 28 6f 72 20 65 6e 64 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29	oint-min)).(or.end.(point-max)))
17a60	29 0a 20 20 20 20 23 27 78 6d 6c 2d 70 61 72 73 65 2d 72 65 67 69 6f 6e 29 0a 20 20 22 43 6f 6d	).....#'xml-parse-region)..."Com
17a80	70 61 74 69 62 69 6c 69 74 79 20 73 68 69 6d 20 66 6f 72 20 60 6c 69 62 78 6d 6c 2d 70 61 72 73	patibility.shim.for.`libxml-pars
17aa0	65 2d 78 6d 6c 2d 72 65 67 69 6f 6e 27 2e 0a 46 6f 72 20 63 6f 6e 76 65 6e 69 65 6e 63 65 2c 20	e-xml-region'..For.convenience,.
17ac0	42 45 47 20 61 6e 64 20 45 4e 44 20 64 65 66 61 75 6c 74 20 74 6f 20 60 70 6f 69 6e 74 2d 6d 69	BEG.and.END.default.to.`point-mi
17ae0	6e 27 20 61 6e 64 0a 60 70 6f 69 6e 74 2d 6d 61 78 27 2c 20 72 65 73 70 65 63 74 69 76 65 6c 79	n'.and.`point-max',.respectively
17b00	2e 0a 0a 5c 28 66 6e 20 26 6f 70 74 69 6f 6e 61 6c 20 42 45 47 20 45 4e 44 29 22 29 0a 0a 28 64	...\(fn.&optional.BEG.END)")..(d
17b20	65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 72 65 63 65 6e 74 66 2d 67 65 74 2d 78 64 67 2d 72 65	efun.counsel--recentf-get-xdg-re
17b40	63 65 6e 74 2d 66 69 6c 65 73 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 6c 69 73 74 20 6f 66 20	cent-files.()..."Return.list.of.
17b60	58 44 47 20 72 65 63 65 6e 74 20 66 69 6c 65 73 2e 0a 0a 54 68 69 73 20 69 6e 66 6f 72 6d 61 74	XDG.recent.files...This.informat
17b80	69 6f 6e 20 69 73 20 70 61 72 73 65 64 20 66 72 6f 6d 20 74 68 65 20 66 69 6c 65 20 5c 22 72 65	ion.is.parsed.from.the.file.\"re
17ba0	63 65 6e 74 6c 79 2d 75 73 65 64 2e 78 62 65 6c 5c 22 2c 0a 77 68 69 63 68 20 6c 69 73 74 73 20	cently-used.xbel\",.which.lists.
17bc0	62 6f 74 68 20 66 69 6c 65 73 20 61 6e 64 20 64 69 72 65 63 74 6f 72 69 65 73 2c 20 75 6e 64 65	both.files.and.directories,.unde
17be0	72 20 60 78 64 67 2d 64 61 74 61 2d 68 6f 6d 65 27 2e 0a 54 68 69 73 20 66 75 6e 63 74 69 6f 6e	r.`xdg-data-home'..This.function
17c00	20 75 73 65 73 20 74 68 65 20 60 64 6f 6d 27 20 6c 69 62 72 61 72 79 20 66 72 6f 6d 20 45 6d 61	.uses.the.`dom'.library.from.Ema
17c20	63 73 20 32 35 2e 31 20 6f 72 20 6c 61 74 65 72 2e 22 0a 20 20 28 75 6e 6c 65 73 73 20 28 65 76	cs.25.1.or.later."...(unless.(ev
17c40	61 6c 2d 61 6e 64 2d 63 6f 6d 70 69 6c 65 20 28 72 65 71 75 69 72 65 20 27 64 6f 6d 20 6e 69 6c	al-and-compile.(require.'dom.nil
17c60	20 74 29 29 0a 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 54 68 69 73 20 66 75 6e 63 74	.t)).....(user-error."This.funct
17c80	69 6f 6e 20 72 65 71 75 69 72 65 73 20 45 6d 61 63 73 20 32 35 2e 31 20 6f 72 20 6c 61 74 65 72	ion.requires.Emacs.25.1.or.later
17ca0	22 29 29 0a 20 20 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 64 6f 6d 2d 62 79 2d 74	"))...(declare-function.dom-by-t
17cc0	61 67 20 22 64 6f 6d 22 20 28 64 6f 6d 20 74 61 67 29 29 0a 20 20 28 6c 65 74 20 28 28 66 69 6c	ag."dom".(dom.tag))...(let.((fil
17ce0	65 2d 6f 66 2d 72 65 63 65 6e 74 2d 66 69 6c 65 73 0a 20 20 20 20 20 20 20 20 20 28 65 78 70 61	e-of-recent-files..........(expa
17d00	6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 72 65 63 65 6e 74 6c 79 2d 75 73 65 64 2e 78 62 65 6c	nd-file-name."recently-used.xbel
17d20	22 20 28 63 6f 75 6e 73 65 6c 2d 2d 78 64 67 2d 64 61 74 61 2d 68 6f 6d 65 29 29 29 29 0a 20 20	".(counsel--xdg-data-home))))...
17d40	20 20 28 75 6e 6c 65 73 73 20 28 66 69 6c 65 2d 72 65 61 64 61 62 6c 65 2d 70 20 66 69 6c 65 2d	..(unless.(file-readable-p.file-
17d60	6f 66 2d 72 65 63 65 6e 74 2d 66 69 6c 65 73 29 0a 20 20 20 20 20 20 28 75 73 65 72 2d 65 72 72	of-recent-files).......(user-err
17d80	6f 72 20 22 4c 69 73 74 20 6f 66 20 58 44 47 20 72 65 63 65 6e 74 20 66 69 6c 65 73 20 6e 6f 74	or."List.of.XDG.recent.files.not
17da0	20 66 6f 75 6e 64 3a 20 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 69	.found:.%s"...................fi
17dc0	6c 65 2d 6f 66 2d 72 65 63 65 6e 74 2d 66 69 6c 65 73 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28	le-of-recent-files)).....(when.(
17de0	66 62 6f 75 6e 64 70 20 27 64 6f 6d 2d 61 74 74 72 29 20 3b 3b 20 50 61 63 69 66 79 20 45 6d 61	fboundp.'dom-attr).;;.Pacify.Ema
17e00	63 73 20 32 34 2e 0a 20 20 20 20 20 20 28 63 6c 2d 6d 61 70 63 61 6e 20 28 6c 61 6d 62 64 61 20	cs.24........(cl-mapcan.(lambda.
17e20	28 62 6f 6f 6b 6d 61 72 6b 2d 6e 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	(bookmark-node).................
17e40	20 20 20 28 6c 65 74 2a 20 28 28 66 69 6c 65 20 28 64 6f 6d 2d 61 74 74 72 20 62 6f 6f 6b 6d 61	...(let*.((file.(dom-attr.bookma
17e60	72 6b 2d 6e 6f 64 65 20 27 68 72 65 66 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	rk-node.'href)).................
17e80	20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 20 28 73 74 72 69 6e 67 2d 72 65 6d 6f 76 65 2d 70	..........(file.(string-remove-p
17ea0	72 65 66 69 78 20 22 66 69 6c 65 3a 2f 2f 22 20 66 69 6c 65 29 29 0a 20 20 20 20 20 20 20 20 20	refix."file://".file))..........
17ec0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 20 28 75 72 6c 2d 75 6e 68 65	.................(file.(url-unhe
17ee0	78 2d 73 74 72 69 6e 67 20 66 69 6c 65 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	x-string.file.t))...............
17f00	20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 20 28 64 65 63 6f 64 65 2d 63 6f 64 69 6e 67	............(file.(decode-coding
17f20	2d 73 74 72 69 6e 67 20 66 69 6c 65 20 27 75 74 66 2d 38 20 74 29 29 29 0a 20 20 20 20 20 20 20	-string.file.'utf-8.t)))........
17f40	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d	..............(and.(file-exists-
17f60	70 20 66 69 6c 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	p.file).........................
17f80	20 20 28 6c 69 73 74 20 66 69 6c 65 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	..(list.file))))................
17fa0	20 20 28 6c 65 74 20 28 28 64 6f 6d 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20	..(let.((dom.(with-temp-buffer..
17fc0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e	.............................(in
17fe0	73 65 72 74 2d 66 69 6c 65 2d 63 6f 6e 74 65 6e 74 73 20 66 69 6c 65 2d 6f 66 2d 72 65 63 65 6e	sert-file-contents.file-of-recen
18000	74 2d 66 69 6c 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	t-files)........................
18020	20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 78 6d 6c 2d 70 61 72 73 65 2d 72 65 67 69 6f	.......(counsel--xml-parse-regio
18040	6e 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 72 65 76 65 72	n))))....................(nrever
18060	73 65 20 28 64 6f 6d 2d 62 79 2d 74 61 67 20 64 6f 6d 20 27 62 6f 6f 6b 6d 61 72 6b 29 29 29 29	se.(dom-by-tag.dom.'bookmark))))
18080	29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 62 75 66 66 65 72 2d 6f 72 2d 72 65	)))..(defun.counsel-buffer-or-re
180a0	63 65 6e 74 66 2d 63 61 6e 64 69 64 61 74 65 73 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 63 61	centf-candidates.()..."Return.ca
180c0	6e 64 69 64 61 74 65 73 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 62 75 66 66 65 72 2d 6f 72 2d	ndidates.for.`counsel-buffer-or-
180e0	72 65 63 65 6e 74 66 27 2e 22 0a 20 20 28 72 65 63 65 6e 74 66 2d 6d 6f 64 65 29 0a 20 20 28 6c	recentf'."...(recentf-mode)...(l
18100	65 74 20 28 28 62 75 66 66 65 72 73 20 28 64 65 6c 71 20 6e 69 6c 20 28 6d 61 70 63 61 72 20 23	et.((buffers.(delq.nil.(mapcar.#
18120	27 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 28 62 75 66 66 65 72 2d 6c 69 73 74 29 29	'buffer-file-name.(buffer-list))
18140	29 29 29 0a 20 20 20 20 28 6e 63 6f 6e 63 0a 20 20 20 20 20 62 75 66 66 65 72 73 0a 20 20 20 20	))).....(nconc......buffers.....
18160	20 28 63 6c 2d 72 65 6d 6f 76 65 2d 69 66 20 28 6c 61 6d 62 64 61 20 28 66 29 20 28 6d 65 6d 62	.(cl-remove-if.(lambda.(f).(memb
18180	65 72 20 66 20 62 75 66 66 65 72 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	er.f.buffers))..................
181a0	20 20 28 63 6f 75 6e 73 65 6c 2d 72 65 63 65 6e 74 66 2d 63 61 6e 64 69 64 61 74 65 73 29 29 29	..(counsel-recentf-candidates)))
181c0	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 63 6f 75 6e 73 65	))..;;;###autoload.(defun.counse
181e0	6c 2d 62 75 66 66 65 72 2d 6f 72 2d 72 65 63 65 6e 74 66 20 28 29 0a 20 20 22 46 69 6e 64 20 61	l-buffer-or-recentf.()..."Find.a
18200	20 62 75 66 66 65 72 20 76 69 73 69 74 69 6e 67 20 61 20 66 69 6c 65 20 6f 72 20 66 69 6c 65 20	.buffer.visiting.a.file.or.file.
18220	6f 6e 20 60 72 65 63 65 6e 74 66 2d 6c 69 73 74 27 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69	on.`recentf-list'."...(interacti
18240	76 65 29 0a 20 20 28 69 76 79 2d 72 65 61 64 20 22 42 75 66 66 65 72 20 46 69 6c 65 20 6f 72 20	ve)...(ivy-read."Buffer.File.or.
18260	52 65 63 65 6e 74 66 3a 20 22 20 28 63 6f 75 6e 73 65 6c 2d 62 75 66 66 65 72 2d 6f 72 2d 72 65	Recentf:.".(counsel-buffer-or-re
18280	63 65 6e 74 66 2d 63 61 6e 64 69 64 61 74 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 61	centf-candidates).............:a
182a0	63 74 69 6f 6e 20 28 6c 61 6d 62 64 61 20 28 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ction.(lambda.(s)...............
182c0	20 20 20 20 20 20 20 20 28 77 69 74 68 2d 69 76 79 2d 77 69 6e 64 6f 77 0a 20 20 20 20 20 20 20	........(with-ivy-window........
182e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 62 75 66 66 65 72 70 20 73 29	.................(if.(bufferp.s)
18300	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 73 77	.............................(sw
18320	69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 20 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	itch-to-buffer.s)...............
18340	20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6e 64 2d 66 69 6c 65 20 73 29 29 29 29 0a 20 20 20	............(find-file.s))))....
18360	20 20 20 20 20 20 20 20 20 3a 72 65 71 75 69 72 65 2d 6d 61 74 63 68 20 74 0a 20 20 20 20 20 20	.........:require-match.t.......
18380	20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 62 75 66 66 65 72 2d 6f 72	......:caller.'counsel-buffer-or
183a0	2d 72 65 63 65 6e 74 66 29 29 0a 0a 28 69 76 79 2d 63 6f 6e 66 69 67 75 72 65 20 27 63 6f 75 6e	-recentf))..(ivy-configure.'coun
183c0	73 65 6c 2d 62 75 66 66 65 72 2d 6f 72 2d 72 65 63 65 6e 74 66 0a 20 20 3a 64 69 73 70 6c 61 79	sel-buffer-or-recentf...:display
183e0	2d 74 72 61 6e 73 66 6f 72 6d 65 72 2d 66 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 62 75 66 66 65 72	-transformer-fn.#'counsel-buffer
18400	2d 6f 72 2d 72 65 63 65 6e 74 66 2d 74 72 61 6e 73 66 6f 72 6d 65 72 29 0a 0a 28 69 76 79 2d 73	-or-recentf-transformer)..(ivy-s
18420	65 74 2d 61 63 74 69 6f 6e 73 0a 20 27 63 6f 75 6e 73 65 6c 2d 62 75 66 66 65 72 2d 6f 72 2d 72	et-actions..'counsel-buffer-or-r
18440	65 63 65 6e 74 66 0a 20 27 28 28 22 6a 22 20 66 69 6e 64 2d 66 69 6c 65 2d 6f 74 68 65 72 2d 77	ecentf..'(("j".find-file-other-w
18460	69 6e 64 6f 77 20 22 6f 74 68 65 72 20 77 69 6e 64 6f 77 22 29 0a 20 20 20 28 22 66 22 20 66 69	indow."other.window")....("f".fi
18480	6e 64 2d 66 69 6c 65 2d 6f 74 68 65 72 2d 66 72 61 6d 65 20 22 6f 74 68 65 72 20 66 72 61 6d 65	nd-file-other-frame."other.frame
184a0	22 29 0a 20 20 20 28 22 78 22 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 65 78 74	")....("x".counsel-find-file-ext
184c0	65 72 6e 20 22 6f 70 65 6e 20 65 78 74 65 72 6e 61 6c 6c 79 22 29 29 29 0a 0a 28 64 65 66 75 6e	ern."open.externally")))..(defun
184e0	20 63 6f 75 6e 73 65 6c 2d 62 75 66 66 65 72 2d 6f 72 2d 72 65 63 65 6e 74 66 2d 74 72 61 6e 73	.counsel-buffer-or-recentf-trans
18500	66 6f 72 6d 65 72 20 28 76 61 72 29 0a 20 20 22 50 72 6f 70 65 72 74 69 7a 65 20 56 41 52 20 69	former.(var)..."Propertize.VAR.i
18520	66 20 69 74 27 73 20 61 20 62 75 66 66 65 72 20 76 69 73 69 74 69 6e 67 20 61 20 66 69 6c 65 2e	f.it's.a.buffer.visiting.a.file.
18540	22 0a 20 20 28 69 66 20 28 6d 65 6d 62 65 72 20 76 61 72 20 28 6d 61 70 63 61 72 20 23 27 62 75	"...(if.(member.var.(mapcar.#'bu
18560	66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 28 62 75 66 66 65 72 2d 6c 69 73 74 29 29 29 0a 20	ffer-file-name.(buffer-list)))..
18580	20 20 20 20 20 28 69 76 79 2d 61 70 70 65 6e 64 2d 66 61 63 65 20 76 61 72 20 27 69 76 79 2d 68	.....(ivy-append-face.var.'ivy-h
185a0	69 67 68 6c 69 67 68 74 2d 66 61 63 65 29 0a 20 20 20 20 76 61 72 29 29 0a 0a 3b 3b 3b 3b 20 60	ighlight-face).....var))..;;;;.`
185c0	63 6f 75 6e 73 65 6c 2d 62 6f 6f 6b 6d 61 72 6b 27 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 6f	counsel-bookmark'..(defcustom.co
185e0	75 6e 73 65 6c 2d 62 6f 6f 6b 6d 61 72 6b 2d 61 76 6f 69 64 2d 64 69 72 65 64 20 6e 69 6c 0a 20	unsel-bookmark-avoid-dired.nil..
18600	20 22 49 66 20 6e 6f 6e 2d 6e 69 6c 2c 20 6f 70 65 6e 20 64 69 72 65 63 74 6f 72 79 20 62 6f 6f	."If.non-nil,.open.directory.boo
18620	6b 6d 61 72 6b 73 20 77 69 74 68 20 60 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 27 2e	kmarks.with.`counsel-find-file'.
18640	0a 42 79 20 64 65 66 61 75 6c 74 20 60 63 6f 75 6e 73 65 6c 2d 62 6f 6f 6b 6d 61 72 6b 27 20 6f	.By.default.`counsel-bookmark'.o
18660	70 65 6e 73 20 61 20 64 69 72 65 64 20 62 75 66 66 65 72 20 66 6f 72 20 64 69 72 65 63 74 6f 72	pens.a.dired.buffer.for.director
18680	69 65 73 2e 22 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 29 0a 0a 28 64 65 66 76 61 72	ies."...:type.'boolean)..(defvar
186a0	20 62 6f 6f 6b 6d 61 72 6b 2d 61 6c 69 73 74 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69	.bookmark-alist).(declare-functi
186c0	6f 6e 20 62 6f 6f 6b 6d 61 72 6b 2d 6c 6f 63 61 74 69 6f 6e 20 22 62 6f 6f 6b 6d 61 72 6b 22 29	on.bookmark-location."bookmark")
186e0	0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 62 6f 6f 6b 6d 61 72 6b 2d 61 6c 6c 2d	.(declare-function.bookmark-all-
18700	6e 61 6d 65 73 20 22 62 6f 6f 6b 6d 61 72 6b 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74	names."bookmark").(declare-funct
18720	69 6f 6e 20 62 6f 6f 6b 6d 61 72 6b 2d 67 65 74 2d 66 69 6c 65 6e 61 6d 65 20 22 62 6f 6f 6b 6d	ion.bookmark-get-filename."bookm
18740	61 72 6b 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 62 6f 6f 6b 6d 61 72 6b	ark").(declare-function.bookmark
18760	2d 6d 61 79 62 65 2d 6c 6f 61 64 2d 64 65 66 61 75 6c 74 2d 66 69 6c 65 20 22 62 6f 6f 6b 6d 61	-maybe-load-default-file."bookma
18780	72 6b 22 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e	rk")..;;;###autoload.(defun.coun
187a0	73 65 6c 2d 62 6f 6f 6b 6d 61 72 6b 20 28 29 0a 20 20 22 46 6f 72 77 61 72 64 20 74 6f 20 60 62	sel-bookmark.()..."Forward.to.`b
187c0	6f 6f 6b 6d 61 72 6b 2d 6a 75 6d 70 27 20 6f 72 20 60 62 6f 6f 6b 6d 61 72 6b 2d 73 65 74 27 20	ookmark-jump'.or.`bookmark-set'.
187e0	69 66 20 62 6f 6f 6b 6d 61 72 6b 20 64 6f 65 73 6e 27 74 20 65 78 69 73 74 2e 22 0a 20 20 28 69	if.bookmark.doesn't.exist."...(i
18800	6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 72 65 71 75 69 72 65 20 27 62 6f 6f 6b 6d 61 72 6b	nteractive)...(require.'bookmark
18820	29 0a 20 20 28 69 76 79 2d 72 65 61 64 20 22 43 72 65 61 74 65 20 6f 72 20 6a 75 6d 70 20 74 6f	)...(ivy-read."Create.or.jump.to
18840	20 62 6f 6f 6b 6d 61 72 6b 3a 20 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 62 6f 6f 6b 6d 61	.bookmark:.".............(bookma
18860	72 6b 2d 61 6c 6c 2d 6e 61 6d 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 69 73 74 6f	rk-all-names).............:histo
18880	72 79 20 27 62 6f 6f 6b 6d 61 72 6b 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20	ry.'bookmark-history............
188a0	20 3a 61 63 74 69 6f 6e 20 28 6c 61 6d 62 64 61 20 28 78 29 0a 20 20 20 20 20 20 20 20 20 20 20	.:action.(lambda.(x)............
188c0	20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 61 6e 64 20 63 6f 75 6e 73 65 6c 2d 62	...........(cond.((and.counsel-b
188e0	6f 6f 6b 6d 61 72 6b 2d 61 76 6f 69 64 2d 64 69 72 65 64 0a 20 20 20 20 20 20 20 20 20 20 20 20	ookmark-avoid-dired.............
18900	20 20 20 20 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 78 20	......................(member.x.
18920	28 62 6f 6f 6b 6d 61 72 6b 2d 61 6c 6c 2d 6e 61 6d 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 20	(bookmark-all-names))...........
18940	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 64 69	........................(file-di
18960	72 65 63 74 6f 72 79 2d 70 20 28 62 6f 6f 6b 6d 61 72 6b 2d 6c 6f 63 61 74 69 6f 6e 20 78 29 29	rectory-p.(bookmark-location.x))
18980	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	)..............................(
189a0	77 69 74 68 2d 69 76 79 2d 77 69 6e 64 6f 77 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	with-ivy-window.................
189c0	20 20 20 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	...............(let.((default-di
189e0	72 65 63 74 6f 72 79 20 28 62 6f 6f 6b 6d 61 72 6b 2d 6c 6f 63 61 74 69 6f 6e 20 78 29 29 29 0a	rectory.(bookmark-location.x))).
18a00	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
18a20	20 28 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 29 29 29 29 0a 20 20 20 20 20 20 20 20	.(counsel-find-file)))).........
18a40	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 72 20 78 20 28	....................((member.x.(
18a60	62 6f 6f 6b 6d 61 72 6b 2d 61 6c 6c 2d 6e 61 6d 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20	bookmark-all-names))............
18a80	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 69 76 79 2d 77 69 6e 64	..................(with-ivy-wind
18aa0	6f 77 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	ow..............................
18ac0	20 20 28 62 6f 6f 6b 6d 61 72 6b 2d 6a 75 6d 70 20 78 29 29 29 0a 20 20 20 20 20 20 20 20 20 20	..(bookmark-jump.x)))...........
18ae0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 0a 20 20 20 20 20 20 20 20 20 20 20	..................(t............
18b00	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 6f 6f 6b 6d 61 72 6b 2d 73 65 74 20	..................(bookmark-set.
18b20	78 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73	x)))).............:caller.'couns
18b40	65 6c 2d 62 6f 6f 6b 6d 61 72 6b 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 61	el-bookmark))..(defun.counsel--a
18b60	70 70 6c 79 2d 62 6f 6f 6b 6d 61 72 6b 2d 66 6e 20 28 66 6e 29 0a 20 20 22 52 65 74 75 72 6e 20	pply-bookmark-fn.(fn)..."Return.
18b80	61 20 66 75 6e 63 74 69 6f 6e 20 61 70 70 6c 79 69 6e 67 20 46 4e 20 74 6f 20 61 20 62 6f 6f 6b	a.function.applying.FN.to.a.book
18ba0	6d 61 72 6b 27 73 20 6c 6f 63 61 74 69 6f 6e 2e 22 0a 20 20 28 6c 61 6d 62 64 61 20 28 62 6f 6f	mark's.location."...(lambda.(boo
18bc0	6b 6d 61 72 6b 29 0a 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 66 6e 20 28 62 6f 6f 6b 6d 61 72 6b	kmark).....(funcall.fn.(bookmark
18be0	2d 6c 6f 63 61 74 69 6f 6e 20 62 6f 6f 6b 6d 61 72 6b 29 29 29 29 0a 0a 28 69 76 79 2d 73 65 74	-location.bookmark))))..(ivy-set
18c00	2d 61 63 74 69 6f 6e 73 0a 20 27 63 6f 75 6e 73 65 6c 2d 62 6f 6f 6b 6d 61 72 6b 0a 20 60 28 28	-actions..'counsel-bookmark..`((
18c20	22 6a 22 20 62 6f 6f 6b 6d 61 72 6b 2d 6a 75 6d 70 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 20 22	"j".bookmark-jump-other-window."
18c40	6f 74 68 65 72 20 77 69 6e 64 6f 77 22 29 0a 20 20 20 28 22 64 22 20 62 6f 6f 6b 6d 61 72 6b 2d	other.window")....("d".bookmark-
18c60	64 65 6c 65 74 65 20 22 64 65 6c 65 74 65 22 29 0a 20 20 20 28 22 65 22 20 62 6f 6f 6b 6d 61 72	delete."delete")....("e".bookmar
18c80	6b 2d 72 65 6e 61 6d 65 20 22 65 64 69 74 22 29 0a 20 20 20 28 22 73 22 20 62 6f 6f 6b 6d 61 72	k-rename."edit")....("s".bookmar
18ca0	6b 2d 73 65 74 20 22 6f 76 65 72 77 72 69 74 65 22 29 0a 20 20 20 28 22 78 22 20 2c 28 63 6f 75	k-set."overwrite")....("x".,(cou
18cc0	6e 73 65 6c 2d 2d 61 70 70 6c 79 2d 62 6f 6f 6b 6d 61 72 6b 2d 66 6e 20 23 27 63 6f 75 6e 73 65	nsel--apply-bookmark-fn.#'counse
18ce0	6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 65 78 74 65 72 6e 29 0a 20 20 20 20 20 20 20 20 22 6f 70 65	l-find-file-extern)........."ope
18d00	6e 20 65 78 74 65 72 6e 61 6c 6c 79 22 29 0a 20 20 20 28 22 72 22 20 2c 28 63 6f 75 6e 73 65 6c	n.externally")....("r".,(counsel
18d20	2d 2d 61 70 70 6c 79 2d 62 6f 6f 6b 6d 61 72 6b 2d 66 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 66 69	--apply-bookmark-fn.#'counsel-fi
18d40	6e 64 2d 66 69 6c 65 2d 61 73 2d 72 6f 6f 74 29 0a 20 20 20 20 20 20 20 20 22 6f 70 65 6e 20 61	nd-file-as-root)........."open.a
18d60	73 20 72 6f 6f 74 22 29 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 62 6f 6f 6b 6d 61	s.root")))..;;;;.`counsel-bookma
18d80	72 6b 65 64 2d 64 69 72 65 63 74 6f 72 79 27 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d	rked-directory'..(defun.counsel-
18da0	62 6f 6f 6b 6d 61 72 6b 65 64 2d 64 69 72 65 63 74 6f 72 79 2d 2d 63 61 6e 64 69 64 61 74 65 73	bookmarked-directory--candidates
18dc0	20 28 29 0a 20 20 22 47 65 74 20 61 20 6c 69 73 74 20 6f 66 20 62 6f 6f 6b 6d 61 72 6b 65 64 20	.()..."Get.a.list.of.bookmarked.
18de0	64 69 72 65 63 74 6f 72 69 65 73 20 73 6f 72 74 65 64 20 62 79 20 66 69 6c 65 20 70 61 74 68 2e	directories.sorted.by.file.path.
18e00	22 0a 20 20 28 62 6f 6f 6b 6d 61 72 6b 2d 6d 61 79 62 65 2d 6c 6f 61 64 2d 64 65 66 61 75 6c 74	"...(bookmark-maybe-load-default
18e20	2d 66 69 6c 65 29 0a 20 20 28 73 6f 72 74 20 28 63 6c 2d 64 65 6c 65 74 65 2d 69 66 2d 6e 6f 74	-file)...(sort.(cl-delete-if-not
18e40	0a 20 20 20 20 20 20 20 20 20 23 27 69 76 79 2d 2d 64 69 72 6e 61 6d 65 2d 70 0a 20 20 20 20 20	..........#'ivy--dirname-p......
18e60	20 20 20 20 28 64 65 6c 71 20 6e 69 6c 20 28 6d 61 70 63 61 72 20 23 27 62 6f 6f 6b 6d 61 72 6b	....(delq.nil.(mapcar.#'bookmark
18e80	2d 67 65 74 2d 66 69 6c 65 6e 61 6d 65 20 62 6f 6f 6b 6d 61 72 6b 2d 61 6c 69 73 74 29 29 29 0a	-get-filename.bookmark-alist))).
18ea0	20 20 20 20 20 20 20 20 23 27 73 74 72 69 6e 67 3c 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c	........#'string<))..;;;###autol
18ec0	6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 62 6f 6f 6b 6d 61 72 6b 65 64 2d 64 69	oad.(defun.counsel-bookmarked-di
18ee0	72 65 63 74 6f 72 79 20 28 29 0a 20 20 22 49 76 79 20 69 6e 74 65 72 66 61 63 65 20 66 6f 72 20	rectory.()..."Ivy.interface.for.
18f00	62 6f 6f 6b 6d 61 72 6b 65 64 20 64 69 72 65 63 74 6f 72 69 65 73 2e 0a 0a 57 69 74 68 20 61 20	bookmarked.directories...With.a.
18f20	70 72 65 66 69 78 20 61 72 67 75 6d 65 6e 74 2c 20 74 68 69 73 20 63 6f 6d 6d 61 6e 64 20 63 72	prefix.argument,.this.command.cr
18f40	65 61 74 65 73 20 61 20 6e 65 77 20 62 6f 6f 6b 6d 61 72 6b 20 77 68 69 63 68 20 70 6f 69 6e 74	eates.a.new.bookmark.which.point
18f60	73 20 74 6f 20 74 68 65 0a 63 75 72 72 65 6e 74 20 76 61 6c 75 65 20 6f 66 20 60 64 65 66 61 75	s.to.the.current.value.of.`defau
18f80	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 74 69 76 65 29 0a	lt-directory'."...(interactive).
18fa0	20 20 28 72 65 71 75 69 72 65 20 27 62 6f 6f 6b 6d 61 72 6b 29 0a 20 20 28 69 76 79 2d 72 65 61	..(require.'bookmark)...(ivy-rea
18fc0	64 20 22 42 6f 6f 6b 6d 61 72 6b 65 64 20 64 69 72 65 63 74 6f 72 79 3a 20 22 0a 20 20 20 20 20	d."Bookmarked.directory:."......
18fe0	20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 62 6f 6f 6b 6d 61 72 6b 65 64 2d 64 69 72 65 63	.......(counsel-bookmarked-direc
19000	74 6f 72 79 2d 2d 63 61 6e 64 69 64 61 74 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 63	tory--candidates).............:c
19020	61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 62 6f 6f 6b 6d 61 72 6b 65 64 2d 64 69 72 65 63 74	aller.'counsel-bookmarked-direct
19040	6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 23 27 64 69 72 65 64 29	ory.............:action.#'dired)
19060	29 0a 0a 28 69 76 79 2d 73 65 74 2d 61 63 74 69 6f 6e 73 20 27 63 6f 75 6e 73 65 6c 2d 62 6f 6f	)..(ivy-set-actions.'counsel-boo
19080	6b 6d 61 72 6b 65 64 2d 64 69 72 65 63 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	kmarked-directory...............
190a0	20 20 20 60 28 28 22 6a 22 20 2c 23 27 64 69 72 65 64 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 20	...`(("j".,#'dired-other-window.
190c0	22 6f 74 68 65 72 20 77 69 6e 64 6f 77 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	"other.window").................
190e0	20 20 20 28 22 78 22 20 2c 23 27 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 65 78 74	...("x".,#'counsel-find-file-ext
19100	65 72 6e 20 22 6f 70 65 6e 20 65 78 74 65 72 6e 61 6c 6c 79 22 29 0a 20 20 20 20 20 20 20 20 20	ern."open.externally")..........
19120	20 20 20 20 20 20 20 20 20 20 28 22 72 22 20 2c 23 27 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66	..........("r".,#'counsel-find-f
19140	69 6c 65 2d 61 73 2d 72 6f 6f 74 20 22 6f 70 65 6e 20 61 73 20 72 6f 6f 74 22 29 0a 20 20 20 20	ile-as-root."open.as.root").....
19160	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 22 66 22 20 2c 28 6c 61 6d 62 64 61 20 28 64 69	...............("f".,(lambda.(di
19180	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 6c	r)............................(l
191a0	65 74 20 28 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 64 69 72 29 29 0a 20 20 20	et.((default-directory.dir))....
191c0	20 20 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 61 6c 6c 2d	..........................(call-
191e0	69 6e 74 65 72 61 63 74 69 76 65 6c 79 20 23 27 66 69 6e 64 2d 66 69 6c 65 29 29 29 0a 20 20 20	interactively.#'find-file)))....
19200	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 66 69 6e 64 2d 66 69 6c 65 22 29 29 29 0a	................."find-file"))).
19220	0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 66 69 6c 65 2d 72 65 67 69 73 74 65 72 27 0a 0a 3b	.;;;;.`counsel-file-register'..;
19240	3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 66 69 6c	;;###autoload.(defun.counsel-fil
19260	65 2d 72 65 67 69 73 74 65 72 20 28 29 0a 20 20 22 53 65 61 72 63 68 20 66 69 6c 65 20 69 6e 20	e-register.()..."Search.file.in.
19280	72 65 67 69 73 74 65 72 2e 0a 0a 59 6f 75 20 63 61 6e 6e 6f 74 20 75 73 65 20 45 6d 61 63 73 27	register...You.cannot.use.Emacs'
192a0	20 6e 6f 72 6d 61 6c 20 72 65 67 69 73 74 65 72 20 63 6f 6d 6d 61 6e 64 73 20 74 6f 20 63 72 65	.normal.register.commands.to.cre
192c0	61 74 65 20 66 69 6c 65 0a 72 65 67 69 73 74 65 72 73 2e 20 20 49 6e 73 74 65 61 64 20 79 6f 75	ate.file.registers...Instead.you
192e0	20 6d 75 73 74 20 75 73 65 20 74 68 65 20 60 73 65 74 2d 72 65 67 69 73 74 65 72 27 20 66 75 6e	.must.use.the.`set-register'.fun
19300	63 74 69 6f 6e 20 6c 69 6b 65 0a 73 6f 3a 20 60 28 73 65 74 2d 72 65 67 69 73 74 65 72 20 3f 69	ction.like.so:.`(set-register.?i
19320	20 5c 22 2f 68 6f 6d 65 2f 65 72 69 63 2f 2e 65 6d 61 63 73 2e 64 2f 69 6e 69 74 2e 65 6c 5c 22	.\"/home/eric/.emacs.d/init.el\"
19340	29 27 2e 20 20 4e 6f 77 20 79 6f 75 0a 63 61 6e 20 75 73 65 20 60 43 2d 78 20 72 20 6a 20 69 27	)'...Now.you.can.use.`C-x.r.j.i'
19360	20 74 6f 20 6f 70 65 6e 20 74 68 61 74 20 66 69 6c 65 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74	.to.open.that.file."...(interact
19380	69 76 65 29 0a 20 20 28 69 76 79 2d 72 65 61 64 20 22 46 69 6c 65 20 52 65 67 69 73 74 65 72 3a	ive)...(ivy-read."File.Register:
193a0	20 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 55 73 65 20 74 68 65 20 60 72 65 67 69 73	.".............;;.Use.the.`regis
193c0	74 65 72 2d 61 6c 69 73 74 27 20 76 61 72 69 61 62 6c 65 20 74 6f 20 66 69 6c 74 65 72 20 6f 75	ter-alist'.variable.to.filter.ou
193e0	74 20 66 69 6c 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 72 65 67 69 73 74 65 72 73 2e	t.file.............;;.registers.
19400	20 20 45 61 63 68 20 65 6e 74 72 79 20 66 6f 72 20 61 20 66 69 6c 65 20 72 65 67 69 73 74 65 72	..Each.entry.for.a.file.register
19420	20 77 69 6c 6c 20 68 61 76 65 20 74 68 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 66 6f	.will.have.the.............;;.fo
19440	6c 6c 6f 77 69 6e 67 20 6c 61 79 6f 75 74 3a 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 0a 20	llowing.layout:.............;;..
19460	20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 20 20 28 4e 55 4d 42 45 52 20 27 66 69 6c 65 20	...........;;.....(NUMBER.'file.
19480	2e 20 22 73 74 72 69 6e 67 2f 70 61 74 68 2f 74 6f 2f 66 69 6c 65 22 29 0a 20 20 20 20 20 20 20	.."string/path/to/file")........
194a0	20 20 20 20 20 3b 3b 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 53 6f 20 77 65 20 67 6f 20	.....;;.............;;.So.we.go.
194c0	74 68 72 6f 75 67 68 20 65 61 63 68 20 65 6e 74 72 79 20 61 6e 64 20 73 65 65 20 69 66 20 74 68	through.each.entry.and.see.if.th
194e0	65 20 60 63 61 64 72 27 20 69 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 60 65 71 27 20	e.`cadr'.is.............;;.`eq'.
19500	74 6f 20 74 68 65 20 73 79 6d 62 6f 6c 20 60 66 69 6c 65 27 2e 20 20 49 66 20 73 6f 20 74 68 65	to.the.symbol.`file'...If.so.the
19520	6e 20 61 64 64 20 74 68 65 20 66 69 6c 65 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b	n.add.the.filename.............;
19540	3b 20 28 60 63 64 64 72 27 29 20 77 68 69 63 68 20 60 69 76 79 2d 72 65 61 64 27 20 77 69 6c 6c	;.(`cddr').which.`ivy-read'.will
19560	20 75 73 65 20 66 6f 72 20 69 74 73 20 63 68 6f 69 63 65 73 2e 0a 20 20 20 20 20 20 20 20 20 20	.use.for.its.choices............
19580	20 20 28 6d 61 70 63 61 72 20 28 6c 61 6d 62 64 61 20 28 72 65 67 69 73 74 65 72 2d 61 6c 69 73	..(mapcar.(lambda.(register-alis
195a0	74 2d 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 28	t-entry).......................(
195c0	69 66 20 28 65 71 20 27 66 69 6c 65 20 28 63 61 64 72 20 72 65 67 69 73 74 65 72 2d 61 6c 69 73	if.(eq.'file.(cadr.register-alis
195e0	74 2d 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	t-entry)).......................
19600	20 20 20 20 28 63 64 64 72 20 72 65 67 69 73 74 65 72 2d 61 6c 69 73 74 2d 65 6e 74 72 79 29 29	....(cddr.register-alist-entry))
19620	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 67 69 73 74 65 72 2d 61	).....................register-a
19640	6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 71 75 69 72 65 2d 6d 61 74 63 68	list).............:require-match
19660	20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 69 73 74 6f 72 79 20 27 63 6f 75 6e 73 65 6c	.t.............:history.'counsel
19680	2d 66 69 6c 65 2d 72 65 67 69 73 74 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c	-file-register.............:call
196a0	65 72 20 27 63 6f 75 6e 73 65 6c 2d 66 69 6c 65 2d 72 65 67 69 73 74 65 72 0a 20 20 20 20 20 20	er.'counsel-file-register.......
196c0	20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 28 6c 61 6d 62 64 61 20 28 72 65 67 69 73 74 65 72 2d	......:action.(lambda.(register-
196e0	66 69 6c 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 77 69 74	file).......................(wit
19700	68 2d 69 76 79 2d 77 69 6e 64 6f 77 20 28 66 69 6e 64 2d 66 69 6c 65 20 72 65 67 69 73 74 65 72	h-ivy-window.(find-file.register
19720	2d 66 69 6c 65 29 29 29 29 29 0a 0a 28 69 76 79 2d 63 6f 6e 66 69 67 75 72 65 20 27 63 6f 75 6e	-file)))))..(ivy-configure.'coun
19740	73 65 6c 2d 66 69 6c 65 2d 72 65 67 69 73 74 65 72 0a 20 20 3a 73 6f 72 74 2d 66 6e 20 23 27 69	sel-file-register...:sort-fn.#'i
19760	76 79 2d 73 74 72 69 6e 67 3c 29 0a 0a 28 69 76 79 2d 73 65 74 2d 61 63 74 69 6f 6e 73 0a 20 27	vy-string<)..(ivy-set-actions..'
19780	63 6f 75 6e 73 65 6c 2d 66 69 6c 65 2d 72 65 67 69 73 74 65 72 0a 20 27 28 28 22 6a 22 20 66 69	counsel-file-register..'(("j".fi
197a0	6e 64 2d 66 69 6c 65 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 20 22 6f 74 68 65 72 20 77 69 6e 64	nd-file-other-window."other.wind
197c0	6f 77 22 29 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 6c 6f 63 61 74 65 27 0a 0a 28	ow")))..;;;;.`counsel-locate'..(
197e0	64 65 66 63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 6c 6f 63 61 74 65 2d 63 6d 64 20 28 63 6f	defcustom.counsel-locate-cmd.(co
19800	6e 64 20 28 28 6d 65 6d 71 20 73 79 73 74 65 6d 2d 74 79 70 65 20 27 28 64 61 72 77 69 6e 20 62	nd.((memq.system-type.'(darwin.b
19820	65 72 6b 65 6c 65 79 2d 75 6e 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	erkeley-unix))..................
19840	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 63 6f 75 6e 73 65 6c 2d 6c 6f	....................#'counsel-lo
19860	63 61 74 65 2d 63 6d 64 2d 6e 6f 72 65 67 65 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	cate-cmd-noregex)...............
19880	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 61 6e 64 20 28 65 71 20	......................((and.(eq.
198a0	73 79 73 74 65 6d 2d 74 79 70 65 20 27 77 69 6e 64 6f 77 73 2d 6e 74 29 0a 20 20 20 20 20 20 20	system-type.'windows-nt)........
198c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
198e0	20 20 20 28 65 78 65 63 75 74 61 62 6c 65 2d 66 69 6e 64 20 22 65 73 2e 65 78 65 22 29 29 0a 20	...(executable-find."es.exe"))..
19900	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
19920	20 20 20 20 23 27 63 6f 75 6e 73 65 6c 2d 6c 6f 63 61 74 65 2d 63 6d 64 2d 65 73 29 0a 20 20 20	....#'counsel-locate-cmd-es)....
19940	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
19960	20 28 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	.(t.............................
19980	20 20 20 20 20 20 20 20 20 23 27 63 6f 75 6e 73 65 6c 2d 6c 6f 63 61 74 65 2d 63 6d 64 2d 64 65	.........#'counsel-locate-cmd-de
199a0	66 61 75 6c 74 29 29 0a 20 20 22 54 68 65 20 66 75 6e 63 74 69 6f 6e 20 66 6f 72 20 70 72 6f 64	fault))..."The.function.for.prod
199c0	75 63 69 6e 67 20 61 20 60 6c 6f 63 61 74 65 27 20 63 6f 6d 6d 61 6e 64 20 73 74 72 69 6e 67 20	ucing.a.`locate'.command.string.
199e0	66 72 6f 6d 20 74 68 65 20 69 6e 70 75 74 2e 0a 0a 54 68 65 20 66 75 6e 63 74 69 6f 6e 20 74 61	from.the.input...The.function.ta
19a00	6b 65 73 20 61 20 73 74 72 69 6e 67 20 2d 20 74 68 65 20 63 75 72 72 65 6e 74 20 69 6e 70 75 74	kes.a.string.-.the.current.input
19a20	2c 20 61 6e 64 20 72 65 74 75 72 6e 73 20 61 0a 73 74 72 69 6e 67 20 2d 20 74 68 65 20 66 75 6c	,.and.returns.a.string.-.the.ful
19a40	6c 20 73 68 65 6c 6c 20 63 6f 6d 6d 61 6e 64 20 74 6f 20 72 75 6e 2e 22 0a 20 20 3a 74 79 70 65	l.shell.command.to.run."...:type
19a60	20 27 28 63 68 6f 69 63 65 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20	.'(choice...........(const.:tag.
19a80	22 44 65 66 61 75 6c 74 22 20 63 6f 75 6e 73 65 6c 2d 6c 6f 63 61 74 65 2d 63 6d 64 2d 64 65 66	"Default".counsel-locate-cmd-def
19aa0	61 75 6c 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 4e 6f 20	ault)...........(const.:tag."No.
19ac0	72 65 67 65 78 22 20 63 6f 75 6e 73 65 6c 2d 6c 6f 63 61 74 65 2d 63 6d 64 2d 6e 6f 72 65 67 65	regex".counsel-locate-cmd-norege
19ae0	78 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 6d 64 66 69 6e 64	x)...........(const.:tag."mdfind
19b00	22 20 63 6f 75 6e 73 65 6c 2d 6c 6f 63 61 74 65 2d 63 6d 64 2d 6d 64 66 69 6e 64 29 0a 20 20 20	".counsel-locate-cmd-mdfind)....
19b20	20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 65 76 65 72 79 74 68 69 6e 67 22 20	.......(const.:tag."everything".
19b40	63 6f 75 6e 73 65 6c 2d 6c 6f 63 61 74 65 2d 63 6d 64 2d 65 73 29 0a 20 20 20 20 20 20 20 20 20	counsel-locate-cmd-es)..........
19b60	20 28 66 75 6e 63 74 69 6f 6e 20 3a 74 61 67 20 22 43 75 73 74 6f 6d 22 29 29 29 0a 0a 28 69 76	.(function.:tag."Custom")))..(iv
19b80	79 2d 73 65 74 2d 61 63 74 69 6f 6e 73 0a 20 27 63 6f 75 6e 73 65 6c 2d 6c 6f 63 61 74 65 0a 20	y-set-actions..'counsel-locate..
19ba0	27 28 28 22 78 22 20 63 6f 75 6e 73 65 6c 2d 6c 6f 63 61 74 65 2d 61 63 74 69 6f 6e 2d 65 78 74	'(("x".counsel-locate-action-ext
19bc0	65 72 6e 20 22 78 64 67 2d 6f 70 65 6e 22 29 0a 20 20 20 28 22 72 22 20 63 6f 75 6e 73 65 6c 2d	ern."xdg-open")....("r".counsel-
19be0	66 69 6e 64 2d 66 69 6c 65 2d 61 73 2d 72 6f 6f 74 20 22 6f 70 65 6e 20 61 73 20 72 6f 6f 74 22	find-file-as-root."open.as.root"
19c00	29 0a 20 20 20 28 22 64 22 20 63 6f 75 6e 73 65 6c 2d 6c 6f 63 61 74 65 2d 61 63 74 69 6f 6e 2d	)....("d".counsel-locate-action-
19c20	64 69 72 65 64 20 22 64 69 72 65 64 22 29 29 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65	dired."dired")))..(defvar.counse
19c40	6c 2d 6c 6f 63 61 74 65 2d 68 69 73 74 6f 72 79 20 6e 69 6c 0a 20 20 22 48 69 73 74 6f 72 79 20	l-locate-history.nil..."History.
19c60	66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 6c 6f 63 61 74 65 27 2e 22 29 0a 0a 3b 3b 3b 23 23 23 61	for.`counsel-locate'.")..;;;###a
19c80	75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6c 6f 63 61 74 65 2d 61 63	utoload.(defun.counsel-locate-ac
19ca0	74 69 6f 6e 2d 65 78 74 65 72 6e 20 28 78 29 0a 20 20 22 50 61 73 73 20 58 20 74 6f 20 60 78 64	tion-extern.(x)..."Pass.X.to.`xd
19cc0	67 2d 6f 70 65 6e 27 20 6f 72 20 65 71 75 69 76 61 6c 65 6e 74 20 63 6f 6d 6d 61 6e 64 20 76 69	g-open'.or.equivalent.command.vi
19ce0	61 20 74 68 65 20 73 68 65 6c 6c 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 46 46	a.the.shell."...(interactive."FF
19d00	69 6c 65 3a 20 22 29 0a 20 20 28 69 66 20 28 61 6e 64 20 28 65 71 20 73 79 73 74 65 6d 2d 74 79	ile:.")...(if.(and.(eq.system-ty
19d20	70 65 20 27 77 69 6e 64 6f 77 73 2d 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 66 62 6f 75	pe.'windows-nt)............(fbou
19d40	6e 64 70 20 27 77 33 32 2d 73 68 65 6c 6c 2d 65 78 65 63 75 74 65 29 29 0a 20 20 20 20 20 20 28	ndp.'w32-shell-execute)).......(
19d60	77 33 32 2d 73 68 65 6c 6c 2d 65 78 65 63 75 74 65 20 22 6f 70 65 6e 22 20 78 29 0a 20 20 20 20	w32-shell-execute."open".x).....
19d80	28 63 61 6c 6c 2d 70 72 6f 63 65 73 73 2d 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e 64 20 28 66 6f 72	(call-process-shell-command.(for
19da0	6d 61 74 20 22 25 73 20 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	mat."%s.%s".....................
19dc0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 63 61 73 65 20 73 79 73	....................(cl-case.sys
19de0	74 65 6d 2d 74 79 70 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	tem-type........................
19e00	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 61 72 77 69 6e 20 22 6f 70 65 6e	...................(darwin."open
19e20	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 20 20 20 20 20	")..............................
19e40	20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 79 67 77 69 6e 20 22 63 79 67 73 74 61 72 74 22 29	.............(cygwin."cygstart")
19e60	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	................................
19e80	20 20 20 20 20 20 20 20 20 20 20 28 74 20 22 78 64 67 2d 6f 70 65 6e 22 29 29 0a 20 20 20 20 20	...........(t."xdg-open"))......
19ea0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
19ec0	20 20 20 28 73 68 65 6c 6c 2d 71 75 6f 74 65 2d 61 72 67 75 6d 65 6e 74 20 78 29 29 0a 20 20 20	...(shell-quote-argument.x))....
19ee0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c	.............................nil
19f00	20 30 29 29 29 0a 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66	.0)))..(defalias.'counsel-find-f
19f20	69 6c 65 2d 65 78 74 65 72 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 6c 6f 63 61 74 65 2d 61 63 74 69	ile-extern.#'counsel-locate-acti
19f40	6f 6e 2d 65 78 74 65 72 6e 29 0a 0a 28 65 76 61 6c 2d 61 6e 64 2d 63 6f 6d 70 69 6c 65 0a 20 20	on-extern)..(eval-and-compile...
19f60	3b 3b 20 41 75 74 6f 6c 6f 61 64 65 64 20 62 79 20 60 64 69 72 65 64 27 20 73 69 6e 63 65 20 45	;;.Autoloaded.by.`dired'.since.E
19f80	6d 61 63 73 20 32 38 2e 0a 20 20 28 75 6e 6c 65 73 73 20 28 66 62 6f 75 6e 64 70 20 27 64 69 72	macs.28....(unless.(fboundp.'dir
19fa0	65 64 2d 6a 75 6d 70 29 0a 20 20 20 20 28 61 75 74 6f 6c 6f 61 64 20 27 64 69 72 65 64 2d 6a 75	ed-jump).....(autoload.'dired-ju
19fc0	6d 70 20 22 64 69 72 65 64 2d 78 22 20 6e 69 6c 20 74 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f	mp."dired-x".nil.t)))..(defun.co
19fe0	75 6e 73 65 6c 2d 6c 6f 63 61 74 65 2d 61 63 74 69 6f 6e 2d 64 69 72 65 64 20 28 78 29 0a 20 20	unsel-locate-action-dired.(x)...
1a000	22 55 73 65 20 60 64 69 72 65 64 2d 6a 75 6d 70 27 20 6f 6e 20 58 2e 22 0a 20 20 28 64 69 72 65	"Use.`dired-jump'.on.X."...(dire
1a020	64 2d 6a 75 6d 70 20 6e 69 6c 20 78 29 29 0a 0a 28 64 65 66 76 61 72 20 6c 6f 63 61 74 65 2d 63	d-jump.nil.x))..(defvar.locate-c
1a040	6f 6d 6d 61 6e 64 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6c 6f 63 61 74 65 2d 63	ommand)..(defun.counsel-locate-c
1a060	6d 64 2d 64 65 66 61 75 6c 74 20 28 69 6e 70 75 74 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 60	md-default.(input)..."Return.a.`
1a080	6c 6f 63 61 74 65 27 20 73 68 65 6c 6c 20 63 6f 6d 6d 61 6e 64 20 62 61 73 65 64 20 6f 6e 20 72	locate'.shell.command.based.on.r
1a0a0	65 67 65 78 70 20 49 4e 50 55 54 2e 0a 54 68 69 73 20 75 73 65 73 20 74 68 65 20 75 73 65 72 20	egexp.INPUT..This.uses.the.user.
1a0c0	6f 70 74 69 6f 6e 20 60 6c 6f 63 61 74 65 2d 63 6f 6d 6d 61 6e 64 27 20 66 72 6f 6d 20 74 68 65	option.`locate-command'.from.the
1a0e0	20 60 6c 6f 63 61 74 65 27 0a 6c 69 62 72 61 72 79 2c 20 77 68 69 63 68 20 73 65 65 2e 22 0a 20	.`locate'.library,.which.see."..
1a100	20 28 63 6f 75 6e 73 65 6c 2d 72 65 71 75 69 72 65 2d 70 72 6f 67 72 61 6d 20 6c 6f 63 61 74 65	.(counsel-require-program.locate
1a120	2d 63 6f 6d 6d 61 6e 64 29 0a 20 20 28 66 6f 72 6d 61 74 20 22 25 73 20 2d 69 20 2d 2d 72 65 67	-command)...(format."%s.-i.--reg
1a140	65 78 20 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 6c 6f 63 61 74 65 2d 63 6f 6d 6d 61 6e 64 0a	ex.%s"...........locate-command.
1a160	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 65 6e 74 0a	..........(shell-quote-argument.
1a180	20 20 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 65 6c 69 73 70 2d 74 6f 2d 70 63	...........(counsel--elisp-to-pc
1a1a0	72 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 69 76 79 2d 2d 72 65 67 65 78 20 69 6e 70 75 74	re.............(ivy--regex.input
1a1c0	29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6c 6f 63 61 74 65 2d 63 6d 64	)))))..(defun.counsel-locate-cmd
1a1e0	2d 6e 6f 72 65 67 65 78 20 28 69 6e 70 75 74 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 60 6c 6f	-noregex.(input)..."Return.a.`lo
1a200	63 61 74 65 27 20 73 68 65 6c 6c 20 63 6f 6d 6d 61 6e 64 20 62 61 73 65 64 20 6f 6e 20 49 4e 50	cate'.shell.command.based.on.INP
1a220	55 54 2e 0a 54 68 69 73 20 75 73 65 73 20 74 68 65 20 75 73 65 72 20 6f 70 74 69 6f 6e 20 60 6c	UT..This.uses.the.user.option.`l
1a240	6f 63 61 74 65 2d 63 6f 6d 6d 61 6e 64 27 20 66 72 6f 6d 20 74 68 65 20 60 6c 6f 63 61 74 65 27	ocate-command'.from.the.`locate'
1a260	0a 6c 69 62 72 61 72 79 2c 20 77 68 69 63 68 20 73 65 65 2e 22 0a 20 20 28 63 6f 75 6e 73 65 6c	.library,.which.see."...(counsel
1a280	2d 72 65 71 75 69 72 65 2d 70 72 6f 67 72 61 6d 20 6c 6f 63 61 74 65 2d 63 6f 6d 6d 61 6e 64 29	-require-program.locate-command)
1a2a0	0a 20 20 28 66 6f 72 6d 61 74 20 22 25 73 20 2d 69 20 25 73 22 0a 20 20 20 20 20 20 20 20 20 20	...(format."%s.-i.%s"...........
1a2c0	6c 6f 63 61 74 65 2d 63 6f 6d 6d 61 6e 64 0a 20 20 20 20 20 20 20 20 20 20 28 73 68 65 6c 6c 2d	locate-command...........(shell-
1a2e0	71 75 6f 74 65 2d 61 72 67 75 6d 65 6e 74 20 69 6e 70 75 74 29 29 29 0a 0a 28 64 65 66 75 6e 20	quote-argument.input)))..(defun.
1a300	63 6f 75 6e 73 65 6c 2d 6c 6f 63 61 74 65 2d 63 6d 64 2d 6d 64 66 69 6e 64 20 28 69 6e 70 75 74	counsel-locate-cmd-mdfind.(input
1a320	29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 60 6d 64 66 69 6e 64 27 20 73 68 65 6c 6c 20 63 6f 6d	)..."Return.a.`mdfind'.shell.com
1a340	6d 61 6e 64 20 62 61 73 65 64 20 6f 6e 20 49 4e 50 55 54 2e 22 0a 20 20 28 63 6f 75 6e 73 65 6c	mand.based.on.INPUT."...(counsel
1a360	2d 72 65 71 75 69 72 65 2d 70 72 6f 67 72 61 6d 20 22 6d 64 66 69 6e 64 22 29 0a 20 20 28 66 6f	-require-program."mdfind")...(fo
1a380	72 6d 61 74 20 22 6d 64 66 69 6e 64 20 2d 6e 61 6d 65 20 25 73 20 32 3e 25 73 22 0a 20 20 20 20	rmat."mdfind.-name.%s.2>%s".....
1a3a0	20 20 20 20 20 20 28 73 68 65 6c 6c 2d 71 75 6f 74 65 2d 61 72 67 75 6d 65 6e 74 20 69 6e 70 75	......(shell-quote-argument.inpu
1a3c0	74 29 0a 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 65	t)...........(shell-quote-argume
1a3e0	6e 74 20 28 63 6f 75 6e 73 65 6c 2d 2d 6e 75 6c 6c 2d 64 65 76 69 63 65 29 29 29 29 0a 0a 28 64	nt.(counsel--null-device))))..(d
1a400	65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6c 6f 63 61 74 65 2d 63 6d 64 2d 65 73 20 28 69 6e 70 75	efun.counsel-locate-cmd-es.(inpu
1a420	74 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 60 65 73 27 20 73 68 65 6c 6c 20 63 6f 6d 6d 61 6e	t)..."Return.a.`es'.shell.comman
1a440	64 20 62 61 73 65 64 20 6f 6e 20 49 4e 50 55 54 2e 22 0a 20 20 28 64 65 66 76 61 72 20 77 33 32	d.based.on.INPUT."...(defvar.w32
1a460	2d 61 6e 73 69 2d 63 6f 64 65 2d 70 61 67 65 29 0a 20 20 28 63 6f 75 6e 73 65 6c 2d 72 65 71 75	-ansi-code-page)...(counsel-requ
1a480	69 72 65 2d 70 72 6f 67 72 61 6d 20 22 65 73 2e 65 78 65 22 29 0a 20 20 28 6c 65 74 20 28 28 72	ire-program."es.exe")...(let.((r
1a4a0	61 77 2d 73 74 72 69 6e 67 20 28 66 6f 72 6d 61 74 20 22 65 73 2e 65 78 65 20 2d 69 20 2d 70 20	aw-string.(format."es.exe.-i.-p.
1a4c0	2d 72 20 25 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	-r.%s"..........................
1a4e0	20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 65 6c 69 73 70 2d 74 6f 2d 70 63 72 65 0a 20 20 20 20 20	...(counsel--elisp-to-pcre......
1a500	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 76 79 2d 2d 72 65	........................(ivy--re
1a520	67 65 78 20 69 6e 70 75 74 20 74 29 29 29 29 29 0a 20 20 20 20 3b 3b 20 57 33 32 20 64 6f 65 73	gex.input.t))))).....;;.W32.does
1a540	6e 27 74 20 75 73 65 20 55 6e 69 63 6f 64 65 20 62 79 20 64 65 66 61 75 6c 74 2c 20 73 6f 20 77	n't.use.Unicode.by.default,.so.w
1a560	65 20 65 6e 63 6f 64 65 20 73 65 61 72 63 68 20 63 6f 6d 6d 61 6e 64 0a 20 20 20 20 3b 3b 20 74	e.encode.search.command.....;;.t
1a580	6f 20 6c 6f 63 61 6c 20 63 6f 64 65 70 61 67 65 20 74 6f 20 73 75 70 70 6f 72 74 20 73 65 61 72	o.local.codepage.to.support.sear
1a5a0	63 68 69 6e 67 20 66 69 6c 65 20 6e 61 6d 65 73 20 63 6f 6e 74 61 69 6e 69 6e 67 0a 20 20 20 20	ching.file.names.containing.....
1a5c0	3b 3b 20 6e 6f 6e 2d 41 53 43 49 49 20 63 68 61 72 61 63 74 65 72 73 2e 0a 20 20 20 20 28 69 66	;;.non-ASCII.characters......(if
1a5e0	20 28 61 6e 64 20 28 65 71 20 73 79 73 74 65 6d 2d 74 79 70 65 20 27 77 69 6e 64 6f 77 73 2d 6e	.(and.(eq.system-type.'windows-n
1a600	74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 6f 75 6e 64 70 20 27 77 33 32 2d 61 6e 73	t)..............(boundp.'w32-ans
1a620	69 2d 63 6f 64 65 2d 70 61 67 65 29 29 0a 20 20 20 20 20 20 20 20 28 65 6e 63 6f 64 65 2d 63 6f	i-code-page)).........(encode-co
1a640	64 69 6e 67 2d 73 74 72 69 6e 67 20 72 61 77 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20	ding-string.raw-string..........
1a660	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 74 65 72 6e 20 28 66 6f	.....................(intern.(fo
1a680	72 6d 61 74 20 22 63 70 25 64 22 20 77 33 32 2d 61 6e 73 69 2d 63 6f 64 65 2d 70 61 67 65 29 29	rmat."cp%d".w32-ansi-code-page))
1a6a0	29 0a 20 20 20 20 20 20 72 61 77 2d 73 74 72 69 6e 67 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f	).......raw-string)))..(defun.co
1a6c0	75 6e 73 65 6c 2d 6c 6f 63 61 74 65 2d 66 75 6e 63 74 69 6f 6e 20 28 69 6e 70 75 74 29 0a 20 20	unsel-locate-function.(input)...
1a6e0	22 43 61 6c 6c 20 61 20 5c 22 6c 6f 63 61 74 65 5c 22 20 73 74 79 6c 65 20 73 68 65 6c 6c 20 63	"Call.a.\"locate\".style.shell.c
1a700	6f 6d 6d 61 6e 64 20 77 69 74 68 20 49 4e 50 55 54 2e 22 0a 20 20 28 6f 72 0a 20 20 20 28 69 76	ommand.with.INPUT."...(or....(iv
1a720	79 2d 6d 6f 72 65 2d 63 68 61 72 73 29 0a 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 28 63 6f	y-more-chars)....(progn......(co
1a740	75 6e 73 65 6c 2d 2d 61 73 79 6e 63 2d 63 6f 6d 6d 61 6e 64 0a 20 20 20 20 20 20 28 66 75 6e 63	unsel--async-command.......(func
1a760	61 6c 6c 20 63 6f 75 6e 73 65 6c 2d 6c 6f 63 61 74 65 2d 63 6d 64 20 69 6e 70 75 74 29 29 0a 20	all.counsel-locate-cmd.input))..
1a780	20 20 20 20 27 28 22 22 20 22 77 6f 72 6b 69 6e 67 2e 2e 2e 22 29 29 29 29 0a 0a 28 64 65 66 63	....'(""."working..."))))..(defc
1a7a0	75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 6c 6f 63 61 74 65 2d 64 62 2d 70 61 74 68 20 22 7e 2f	ustom.counsel-locate-db-path."~/
1a7c0	2e 6c 6f 63 61 6c 2f 6d 6c 6f 63 61 74 65 2e 64 62 22 0a 20 20 22 4c 6f 63 61 74 69 6f 6e 20 77	.local/mlocate.db"..."Location.w
1a7e0	68 65 72 65 20 74 6f 20 70 75 74 20 74 68 65 20 6c 6f 63 61 74 65 64 62 20 69 6e 20 63 61 73 65	here.to.put.the.locatedb.in.case
1a800	20 79 6f 75 72 20 68 6f 6d 65 20 66 6f 6c 64 65 72 20 69 73 20 65 6e 63 72 79 70 74 65 64 2e 22	.your.home.folder.is.encrypted."
1a820	0a 20 20 3a 74 79 70 65 20 27 66 69 6c 65 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d	...:type.'file)..(defun.counsel-
1a840	66 69 6c 65 2d 73 74 61 6c 65 2d 70 20 28 66 6e 61 6d 65 20 73 65 63 6f 6e 64 73 29 0a 20 20 22	file-stale-p.(fname.seconds)..."
1a860	52 65 74 75 72 6e 20 6e 6f 6e 2d 6e 69 6c 20 69 66 20 46 4e 41 4d 45 20 77 61 73 20 6d 6f 64 69	Return.non-nil.if.FNAME.was.modi
1a880	66 69 65 64 20 6d 6f 72 65 20 74 68 61 6e 20 53 45 43 4f 4e 44 53 20 61 67 6f 2e 22 0a 20 20 28	fied.more.than.SECONDS.ago."...(
1a8a0	3e 20 28 66 6c 6f 61 74 2d 74 69 6d 65 20 28 74 69 6d 65 2d 73 69 6e 63 65 20 28 6e 74 68 20 35	>.(float-time.(time-since.(nth.5
1a8c0	20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 73 20 66 6e 61 6d 65 29 29 29 29 0a 20 20 20 20	.(file-attributes.fname)))).....
1a8e0	20 73 65 63 6f 6e 64 73 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 6c 6f 63 61	.seconds))..(defun.counsel--loca
1a900	74 65 2d 75 70 64 61 74 65 64 62 20 28 29 0a 20 20 28 77 68 65 6e 20 28 66 69 6c 65 2d 65 78 69	te-updatedb.()...(when.(file-exi
1a920	73 74 73 2d 70 20 22 7e 2f 2e 50 72 69 76 61 74 65 22 29 0a 20 20 20 20 28 6c 65 74 20 28 28 64	sts-p."~/.Private").....(let.((d
1a940	62 2d 66 6e 61 6d 65 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 63 6f 75 6e 73 65	b-fname.(expand-file-name.counse
1a960	6c 2d 6c 6f 63 61 74 65 2d 64 62 2d 70 61 74 68 29 29 29 0a 20 20 20 20 20 20 28 73 65 74 65 6e	l-locate-db-path))).......(seten
1a980	76 20 22 4c 4f 43 41 54 45 5f 50 41 54 48 22 20 64 62 2d 66 6e 61 6d 65 29 0a 20 20 20 20 20 20	v."LOCATE_PATH".db-fname).......
1a9a0	28 77 68 65 6e 20 28 6f 72 20 28 6e 6f 74 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 64 62	(when.(or.(not.(file-exists-p.db
1a9c0	2d 66 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65	-fname)).................(counse
1a9e0	6c 2d 66 69 6c 65 2d 73 74 61 6c 65 2d 70 20 64 62 2d 66 6e 61 6d 65 20 36 30 29 29 0a 20 20 20	l-file-stale-p.db-fname.60))....
1aa00	20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 55 70 64 61 74 69 6e 67 20 25 73 2e 2e 2e 22 20 64	.....(message."Updating.%s...".d
1aa20	62 2d 66 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 63 6f 6d 6d 61	b-fname).........(counsel--comma
1aa40	6e 64 0a 20 20 20 20 20 20 20 20 20 22 75 70 64 61 74 65 64 62 22 20 22 2d 6c 22 20 22 30 22 20	nd.........."updatedb"."-l"."0".
1aa60	22 2d 6f 22 20 64 62 2d 66 6e 61 6d 65 20 22 2d 55 22 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d	"-o".db-fname."-U".(expand-file-
1aa80	6e 61 6d 65 20 22 7e 22 29 29 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28	name."~"))))))..;;;###autoload.(
1aaa0	64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6c 6f 63 61 74 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20	defun.counsel-locate.(&optional.
1aac0	69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 29 0a 20 20 22 43 61 6c 6c 20 61 20 5c 22 6c 6f 63 61 74	initial-input)..."Call.a.\"locat
1aae0	65 5c 22 20 73 74 79 6c 65 20 73 68 65 6c 6c 20 63 6f 6d 6d 61 6e 64 2e 0a 49 4e 49 54 49 41 4c	e\".style.shell.command..INITIAL
1ab00	2d 49 4e 50 55 54 20 63 61 6e 20 62 65 20 67 69 76 65 6e 20 61 73 20 74 68 65 20 69 6e 69 74 69	-INPUT.can.be.given.as.the.initi
1ab20	61 6c 20 6d 69 6e 69 62 75 66 66 65 72 20 69 6e 70 75 74 2e 22 0a 20 20 28 69 6e 74 65 72 61 63	al.minibuffer.input."...(interac
1ab40	74 69 76 65 29 0a 20 20 3b 3b 20 46 6f 72 20 60 6c 6f 63 61 74 65 2d 63 6f 6d 6d 61 6e 64 27 2c	tive)...;;.For.`locate-command',
1ab60	20 77 68 69 63 68 20 69 73 20 68 6f 6e 6f 72 65 64 20 69 6e 20 73 6f 6d 65 20 6f 70 74 69 6f 6e	.which.is.honored.in.some.option
1ab80	73 20 6f 66 20 60 63 6f 75 6e 73 65 6c 2d 6c 6f 63 61 74 65 2d 63 6d 64 27 2e 0a 20 20 28 72 65	s.of.`counsel-locate-cmd'....(re
1aba0	71 75 69 72 65 20 27 6c 6f 63 61 74 65 29 0a 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 6c 6f 63 61 74	quire.'locate)...(counsel--locat
1abc0	65 2d 75 70 64 61 74 65 64 62 29 0a 20 20 28 69 76 79 2d 72 65 61 64 20 22 4c 6f 63 61 74 65 3a	e-updatedb)...(ivy-read."Locate:
1abe0	20 22 20 23 27 63 6f 75 6e 73 65 6c 2d 6c 6f 63 61 74 65 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 20	.".#'counsel-locate-function....
1ac00	20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20 69 6e 69 74 69 61 6c 2d	.........:initial-input.initial-
1ac20	69 6e 70 75 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 64 79 6e 61 6d 69 63 2d 63 6f 6c 6c 65	input.............:dynamic-colle
1ac40	63 74 69 6f 6e 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 69 73 74 6f 72 79 20 27 63 6f	ction.t.............:history.'co
1ac60	75 6e 73 65 6c 2d 6c 6f 63 61 74 65 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20	unsel-locate-history............
1ac80	20 3a 61 63 74 69 6f 6e 20 28 6c 61 6d 62 64 61 20 28 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20	.:action.(lambda.(file).........
1aca0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 66 69 6c 65 0a 20 20 20 20 20 20 20	..............(when.file........
1acc0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 69 76 79 2d 77 69 6e 64 6f	.................(with-ivy-windo
1ace0	77 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 66 69 6e	w...........................(fin
1ad00	64 2d 66 69 6c 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	d-file..........................
1ad20	20 20 28 63 6f 6e 63 61 74 20 28 66 69 6c 65 2d 72 65 6d 6f 74 65 2d 70 20 64 65 66 61 75 6c 74	..(concat.(file-remote-p.default
1ad40	2d 64 69 72 65 63 74 6f 72 79 29 20 66 69 6c 65 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20	-directory).file)))))...........
1ad60	20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 6c 6f 63 61 74 65 29 29 0a 0a 28 69 76	..:caller.'counsel-locate))..(iv
1ad80	79 2d 63 6f 6e 66 69 67 75 72 65 20 27 63 6f 75 6e 73 65 6c 2d 6c 6f 63 61 74 65 0a 20 20 3a 75	y-configure.'counsel-locate...:u
1ada0	6e 77 69 6e 64 2d 66 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 64 65 6c 65 74 65 2d 70 72 6f 63 65 73	nwind-fn.#'counsel-delete-proces
1adc0	73 0a 20 20 3a 65 78 69 74 2d 63 6f 64 65 73 20 27 28 31 20 22 4e 6f 74 68 69 6e 67 20 66 6f 75	s...:exit-codes.'(1."Nothing.fou
1ade0	6e 64 22 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 74 72 61 63 6b 65 72 27 0a 0a 28	nd"))..;;;;.`counsel-tracker'..(
1ae00	64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 74 72 61 63 6b 65 72 2d 66 75 6e 63 74 69 6f 6e 20 28	defun.counsel-tracker-function.(
1ae20	69 6e 70 75 74 29 0a 20 20 22 43 61 6c 6c 20 74 68 65 20 5c 22 74 72 61 63 6b 65 72 5c 22 20 73	input)..."Call.the.\"tracker\".s
1ae40	68 65 6c 6c 20 63 6f 6d 6d 61 6e 64 20 77 69 74 68 20 49 4e 50 55 54 2e 22 0a 20 20 28 6f 72 0a	hell.command.with.INPUT."...(or.
1ae60	20 20 20 28 69 76 79 2d 6d 6f 72 65 2d 63 68 61 72 73 29 0a 20 20 20 28 70 72 6f 67 6e 0a 20 20	...(ivy-more-chars)....(progn...
1ae80	20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 61 73 79 6e 63 2d 63 6f 6d 6d 61 6e 64 0a 20 20 20 20 20	...(counsel--async-command......
1aea0	20 28 66 6f 72 6d 61 74 0a 20 20 20 20 20 20 20 22 74 72 61 63 6b 65 72 20 73 70 61 72 71 6c 20	.(format........"tracker.sparql.
1aec0	2d 71 20 5c 22 53 45 4c 45 43 54 20 3f 75 72 6c 20 57 48 45 52 45 20 7b 20 3f 73 20 61 20 6e 66	-q.\"SELECT.?url.WHERE.{.?s.a.nf
1aee0	6f 3a 46 69 6c 65 44 61 74 61 4f 62 6a 65 63 74 20 3b 20 6e 69 65 3a 75 72 6c 20 3f 75 72 6c 20	o:FileDataObject.;.nie:url.?url.
1af00	2e 20 46 49 4c 54 45 52 20 28 53 54 52 53 54 41 52 54 53 20 28 3f 75 72 6c 2c 20 27 66 69 6c 65	..FILTER.(STRSTARTS.(?url,.'file
1af20	3a 2f 2f 24 48 4f 4d 45 2f 27 29 29 20 2e 20 46 49 4c 54 45 52 20 72 65 67 65 78 28 3f 75 72 6c	://$HOME/'))...FILTER.regex(?url
1af40	2c 20 27 25 73 27 29 20 7d 5c 22 20 7c 20 74 61 69 6c 20 2d 6e 20 2b 32 20 7c 20 68 65 61 64 20	,.'%s').}\".|.tail.-n.+2.|.head.
1af60	2d 6e 20 2d 31 22 0a 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 65 6c 69 73 70 2d 74 6f	-n.-1"........(counsel--elisp-to
1af80	2d 70 63 72 65 20 28 66 75 6e 63 61 6c 6c 20 69 76 79 2d 2d 72 65 67 65 78 2d 66 75 6e 63 74 69	-pcre.(funcall.ivy--regex-functi
1afa0	6f 6e 20 69 6e 70 75 74 29 29 29 29 0a 20 20 20 20 20 27 28 22 22 20 22 77 6f 72 6b 69 6e 67 2e	on.input))))......'(""."working.
1afc0	2e 2e 22 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 74 72 61 63 6b 65 72 2d	.."))))..(defun.counsel-tracker-
1afe0	74 72 61 6e 73 66 6f 72 6d 65 72 20 28 73 74 72 29 0a 20 20 28 69 66 20 28 73 74 72 69 6e 67 2d	transformer.(str)...(if.(string-
1b000	6d 61 74 63 68 20 22 66 69 6c 65 3a 2f 2f 2f 22 20 73 74 72 29 0a 20 20 20 20 20 20 28 64 65 63	match."file:///".str).......(dec
1b020	6f 64 65 2d 63 6f 64 69 6e 67 2d 73 74 72 69 6e 67 20 28 75 72 6c 2d 75 6e 68 65 78 2d 73 74 72	ode-coding-string.(url-unhex-str
1b040	69 6e 67 20 28 73 75 62 73 74 72 69 6e 67 20 73 74 72 20 39 29 29 20 27 75 74 66 2d 38 29 0a 20	ing.(substring.str.9)).'utf-8)..
1b060	20 20 20 73 74 72 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	...str))..;;;###autoload.(defun.
1b080	63 6f 75 6e 73 65 6c 2d 74 72 61 63 6b 65 72 20 28 29 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76	counsel-tracker.()...(interactiv
1b0a0	65 29 0a 20 20 28 69 76 79 2d 72 65 61 64 20 22 54 72 61 63 6b 65 72 3a 20 22 20 27 63 6f 75 6e	e)...(ivy-read."Tracker:.".'coun
1b0c0	73 65 6c 2d 74 72 61 63 6b 65 72 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20	sel-tracker-function............
1b0e0	20 3a 64 79 6e 61 6d 69 63 2d 63 6f 6c 6c 65 63 74 69 6f 6e 20 74 0a 20 20 20 20 20 20 20 20 20	.:dynamic-collection.t..........
1b100	20 20 20 3a 61 63 74 69 6f 6e 20 28 6c 61 6d 62 64 61 20 28 73 29 20 28 66 69 6e 64 2d 66 69 6c	...:action.(lambda.(s).(find-fil
1b120	65 20 28 63 6f 75 6e 73 65 6c 2d 74 72 61 63 6b 65 72 2d 74 72 61 6e 73 66 6f 72 6d 65 72 20 73	e.(counsel-tracker-transformer.s
1b140	29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c	))).............:caller.'counsel
1b160	2d 74 72 61 63 6b 65 72 29 29 0a 0a 28 69 76 79 2d 63 6f 6e 66 69 67 75 72 65 20 27 63 6f 75 6e	-tracker))..(ivy-configure.'coun
1b180	73 65 6c 2d 74 72 61 63 6b 65 72 0a 20 20 3a 64 69 73 70 6c 61 79 2d 74 72 61 6e 73 66 6f 72 6d	sel-tracker...:display-transform
1b1a0	65 72 2d 66 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 74 72 61 63 6b 65 72 2d 74 72 61 6e 73 66 6f 72	er-fn.#'counsel-tracker-transfor
1b1c0	6d 65 72 0a 20 20 3a 75 6e 77 69 6e 64 2d 66 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 64 65 6c 65 74	mer...:unwind-fn.#'counsel-delet
1b1e0	65 2d 70 72 6f 63 65 73 73 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 66 7a 66 27 0a 0a	e-process)..;;;;.`counsel-fzf'..
1b200	28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 66 7a 66 2d 63 6d 64 20 22 66 7a 66 20 2d 66 20	(defvar.counsel-fzf-cmd."fzf.-f.
1b220	5c 22 25 73 5c 22 22 0a 20 20 22 43 6f 6d 6d 61 6e 64 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d	\"%s\""..."Command.for.`counsel-
1b240	66 7a 66 27 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 2d 66 7a 66 2d 64 69	fzf'.")..(defvar.counsel--fzf-di
1b260	72 20 6e 69 6c 0a 20 20 22 53 74 6f 72 65 20 74 68 65 20 62 61 73 65 20 66 7a 66 20 64 69 72 65	r.nil..."Store.the.base.fzf.dire
1b280	63 74 6f 72 79 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 66 7a 66 2d 64 69	ctory.")..(defvar.counsel-fzf-di
1b2a0	72 2d 66 75 6e 63 74 69 6f 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 66 7a 66 2d 64 69 72 2d 66 75 6e	r-function.#'counsel-fzf-dir-fun
1b2c0	63 74 69 6f 6e 2d 70 72 6f 6a 65 63 74 69 6c 65 0a 20 20 22 46 75 6e 63 74 69 6f 6e 20 74 68 61	ction-projectile..."Function.tha
1b2e0	74 20 72 65 74 75 72 6e 73 20 61 20 64 69 72 65 63 74 6f 72 79 20 66 6f 72 20 66 7a 66 20 74 6f	t.returns.a.directory.for.fzf.to
1b300	20 75 73 65 2e 22 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 66 7a 66 2d 64 69 72 2d	.use.")..(defun.counsel-fzf-dir-
1b320	66 75 6e 63 74 69 6f 6e 2d 70 72 6f 6a 65 63 74 69 6c 65 20 28 29 0a 20 20 28 69 66 20 28 61 6e	function-projectile.()...(if.(an
1b340	64 0a 20 20 20 20 20 20 20 28 66 62 6f 75 6e 64 70 20 27 70 72 6f 6a 65 63 74 69 6c 65 2d 70 72	d........(fboundp.'projectile-pr
1b360	6f 6a 65 63 74 2d 70 29 0a 20 20 20 20 20 20 20 28 66 62 6f 75 6e 64 70 20 27 70 72 6f 6a 65 63	oject-p)........(fboundp.'projec
1b380	74 69 6c 65 2d 70 72 6f 6a 65 63 74 2d 72 6f 6f 74 29 0a 20 20 20 20 20 20 20 28 70 72 6f 6a 65	tile-project-root)........(proje
1b3a0	63 74 69 6c 65 2d 70 72 6f 6a 65 63 74 2d 70 29 29 0a 20 20 20 20 20 20 28 70 72 6f 6a 65 63 74	ctile-project-p)).......(project
1b3c0	69 6c 65 2d 70 72 6f 6a 65 63 74 2d 72 6f 6f 74 29 0a 20 20 20 20 64 65 66 61 75 6c 74 2d 64 69	ile-project-root).....default-di
1b3e0	72 65 63 74 6f 72 79 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 66 7a 66 2d 66 75	rectory))..(defun.counsel-fzf-fu
1b400	6e 63 74 69 6f 6e 20 28 73 74 72 29 0a 20 20 28 6c 65 74 20 28 28 64 65 66 61 75 6c 74 2d 64 69	nction.(str)...(let.((default-di
1b420	72 65 63 74 6f 72 79 20 63 6f 75 6e 73 65 6c 2d 2d 66 7a 66 2d 64 69 72 29 29 0a 20 20 20 20 28	rectory.counsel--fzf-dir)).....(
1b440	73 65 74 71 20 69 76 79 2d 2d 6f 6c 64 2d 72 65 20 28 69 76 79 2d 2d 72 65 67 65 78 2d 66 75 7a	setq.ivy--old-re.(ivy--regex-fuz
1b460	7a 79 20 73 74 72 29 29 0a 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 61 73 79 6e 63 2d 63 6f 6d	zy.str)).....(counsel--async-com
1b480	6d 61 6e 64 0a 20 20 20 20 20 28 66 6f 72 6d 61 74 20 63 6f 75 6e 73 65 6c 2d 66 7a 66 2d 63 6d	mand......(format.counsel-fzf-cm
1b4a0	64 20 73 74 72 29 29 29 0a 20 20 6e 69 6c 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a	d.str)))...nil)..;;;###autoload.
1b4c0	28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 66 7a 66 20 28 26 6f 70 74 69 6f 6e 61 6c 20 69 6e	(defun.counsel-fzf.(&optional.in
1b4e0	69 74 69 61 6c 2d 69 6e 70 75 74 20 69 6e 69 74 69 61 6c 2d 64 69 72 65 63 74 6f 72 79 20 66 7a	itial-input.initial-directory.fz
1b500	66 2d 70 72 6f 6d 70 74 29 0a 20 20 22 4f 70 65 6e 20 61 20 66 69 6c 65 20 75 73 69 6e 67 20 74	f-prompt)..."Open.a.file.using.t
1b520	68 65 20 66 7a 66 20 73 68 65 6c 6c 20 63 6f 6d 6d 61 6e 64 2e 0a 49 4e 49 54 49 41 4c 2d 49 4e	he.fzf.shell.command..INITIAL-IN
1b540	50 55 54 20 63 61 6e 20 62 65 20 67 69 76 65 6e 20 61 73 20 74 68 65 20 69 6e 69 74 69 61 6c 20	PUT.can.be.given.as.the.initial.
1b560	6d 69 6e 69 62 75 66 66 65 72 20 69 6e 70 75 74 2e 0a 49 4e 49 54 49 41 4c 2d 44 49 52 45 43 54	minibuffer.input..INITIAL-DIRECT
1b580	4f 52 59 2c 20 69 66 20 6e 6f 6e 2d 6e 69 6c 2c 20 69 73 20 75 73 65 64 20 61 73 20 74 68 65 20	ORY,.if.non-nil,.is.used.as.the.
1b5a0	72 6f 6f 74 20 64 69 72 65 63 74 6f 72 79 20 66 6f 72 20 73 65 61 72 63 68 2e 0a 46 5a 46 2d 50	root.directory.for.search..FZF-P
1b5c0	52 4f 4d 50 54 2c 20 69 66 20 6e 6f 6e 2d 6e 69 6c 2c 20 69 73 20 70 61 73 73 65 64 20 61 73 20	ROMPT,.if.non-nil,.is.passed.as.
1b5e0	60 69 76 79 2d 72 65 61 64 27 20 70 72 6f 6d 70 74 20 61 72 67 75 6d 65 6e 74 2e 22 0a 20 20 28	`ivy-read'.prompt.argument."...(
1b600	69 6e 74 65 72 61 63 74 69 76 65 0a 20 20 20 28 6c 65 74 20 28 28 66 7a 66 2d 62 61 73 65 6e 61	interactive....(let.((fzf-basena
1b620	6d 65 20 28 63 61 72 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 63 6f 75 6e 73 65 6c 2d 66 7a	me.(car.(split-string.counsel-fz
1b640	66 2d 63 6d 64 29 29 29 29 0a 20 20 20 20 20 28 6c 69 73 74 20 6e 69 6c 0a 20 20 20 20 20 20 20	f-cmd))))......(list.nil........
1b660	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 0a 20 20 20	....(when.current-prefix-arg....
1b680	20 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 72 65 61 64 2d 64 69 72 65 63 74 6f 72	..........(counsel-read-director
1b6a0	79 2d 6e 61 6d 65 20 28 63 6f 6e 63 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	y-name.(concat..................
1b6c0	20 20 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 7a 66 2d 62 61	..........................fzf-ba
1b6e0	73 65 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	sename..........................
1b700	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 20 69 6e 20 64 69 72 65 63 74 6f 72 79	..................".in.directory
1b720	3a 20 22 29 29 29 29 29 29 0a 20 20 28 63 6f 75 6e 73 65 6c 2d 72 65 71 75 69 72 65 2d 70 72 6f	:."))))))...(counsel-require-pro
1b740	67 72 61 6d 20 63 6f 75 6e 73 65 6c 2d 66 7a 66 2d 63 6d 64 29 0a 20 20 28 73 65 74 71 20 63 6f	gram.counsel-fzf-cmd)...(setq.co
1b760	75 6e 73 65 6c 2d 2d 66 7a 66 2d 64 69 72 0a 20 20 20 20 20 20 20 20 28 6f 72 20 69 6e 69 74 69	unsel--fzf-dir.........(or.initi
1b780	61 6c 2d 64 69 72 65 63 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c	al-directory.............(funcal
1b7a0	6c 20 63 6f 75 6e 73 65 6c 2d 66 7a 66 2d 64 69 72 2d 66 75 6e 63 74 69 6f 6e 29 29 29 0a 20 20	l.counsel-fzf-dir-function)))...
1b7c0	28 69 76 79 2d 72 65 61 64 20 28 6f 72 20 66 7a 66 2d 70 72 6f 6d 70 74 20 22 66 7a 66 3a 20 22	(ivy-read.(or.fzf-prompt."fzf:."
1b7e0	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 23 27 63 6f 75 6e 73 65 6c 2d 66 7a 66 2d 66 75 6e 63	).............#'counsel-fzf-func
1b800	74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20	tion.............:initial-input.
1b820	69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 2d 62 75	initial-input.............:re-bu
1b840	69 6c 64 65 72 20 23 27 69 76 79 2d 2d 72 65 67 65 78 2d 66 75 7a 7a 79 0a 20 20 20 20 20 20 20	ilder.#'ivy--regex-fuzzy........
1b860	20 20 20 20 20 3a 64 79 6e 61 6d 69 63 2d 63 6f 6c 6c 65 63 74 69 6f 6e 20 74 0a 20 20 20 20 20	.....:dynamic-collection.t......
1b880	20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 66 7a 66 2d 61 63 74	.......:action.#'counsel-fzf-act
1b8a0	69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c	ion.............:caller.'counsel
1b8c0	2d 66 7a 66 29 29 0a 0a 28 69 76 79 2d 63 6f 6e 66 69 67 75 72 65 20 27 63 6f 75 6e 73 65 6c 2d	-fzf))..(ivy-configure.'counsel-
1b8e0	66 7a 66 0a 20 20 3a 6f 63 63 75 72 20 23 27 63 6f 75 6e 73 65 6c 2d 66 7a 66 2d 6f 63 63 75 72	fzf...:occur.#'counsel-fzf-occur
1b900	0a 20 20 3a 75 6e 77 69 6e 64 2d 66 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 64 65 6c 65 74 65 2d 70	...:unwind-fn.#'counsel-delete-p
1b920	72 6f 63 65 73 73 0a 20 20 3a 65 78 69 74 2d 63 6f 64 65 73 20 27 28 31 20 22 4e 6f 74 68 69 6e	rocess...:exit-codes.'(1."Nothin
1b940	67 20 66 6f 75 6e 64 22 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 66 7a 66 2d 61	g.found"))..(defun.counsel-fzf-a
1b960	63 74 69 6f 6e 20 28 78 29 0a 20 20 22 46 69 6e 64 20 66 69 6c 65 20 58 20 69 6e 20 63 75 72 72	ction.(x)..."Find.file.X.in.curr
1b980	65 6e 74 20 66 7a 66 20 64 69 72 65 63 74 6f 72 79 2e 22 0a 20 20 28 77 69 74 68 2d 69 76 79 2d	ent.fzf.directory."...(with-ivy-
1b9a0	77 69 6e 64 6f 77 0a 20 20 20 20 28 6c 65 74 20 28 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74	window.....(let.((default-direct
1b9c0	6f 72 79 20 63 6f 75 6e 73 65 6c 2d 2d 66 7a 66 2d 64 69 72 29 29 0a 20 20 20 20 20 20 28 66 69	ory.counsel--fzf-dir)).......(fi
1b9e0	6e 64 2d 66 69 6c 65 20 78 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 66 7a	nd-file.x))))..(defun.counsel-fz
1ba00	66 2d 6f 63 63 75 72 20 28 26 6f 70 74 69 6f 6e 61 6c 20 5f 63 61 6e 64 73 29 0a 20 20 22 4f 63	f-occur.(&optional._cands)..."Oc
1ba20	63 75 72 20 66 75 6e 63 74 69 6f 6e 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 66 7a 66 27 20 75	cur.function.for.`counsel-fzf'.u
1ba40	73 69 6e 67 20 60 63 6f 75 6e 73 65 6c 2d 63 6d 64 2d 74 6f 2d 64 69 72 65 64 27 2e 22 0a 20 20	sing.`counsel-cmd-to-dired'."...
1ba60	28 63 64 20 63 6f 75 6e 73 65 6c 2d 2d 66 7a 66 2d 64 69 72 29 0a 20 20 28 63 6f 75 6e 73 65 6c	(cd.counsel--fzf-dir)...(counsel
1ba80	2d 63 6d 64 2d 74 6f 2d 64 69 72 65 64 0a 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 65 78 70 61 6e	-cmd-to-dired....(counsel--expan
1baa0	64 2d 6c 73 0a 20 20 20 20 28 66 6f 72 6d 61 74 0a 20 20 20 20 20 22 25 73 20 2d 2d 70 72 69 6e	d-ls.....(format......"%s.--prin
1bac0	74 30 20 7c 20 78 61 72 67 73 20 2d 30 20 6c 73 22 0a 20 20 20 20 20 28 66 6f 72 6d 61 74 20 63	t0.|.xargs.-0.ls"......(format.c
1bae0	6f 75 6e 73 65 6c 2d 66 7a 66 2d 63 6d 64 20 69 76 79 2d 74 65 78 74 29 29 29 29 29 0a 0a 28 69	ounsel-fzf-cmd.ivy-text)))))..(i
1bb00	76 79 2d 73 65 74 2d 61 63 74 69 6f 6e 73 0a 20 27 63 6f 75 6e 73 65 6c 2d 66 7a 66 0a 20 27 28	vy-set-actions..'counsel-fzf..'(
1bb20	28 22 78 22 20 63 6f 75 6e 73 65 6c 2d 6c 6f 63 61 74 65 2d 61 63 74 69 6f 6e 2d 65 78 74 65 72	("x".counsel-locate-action-exter
1bb40	6e 20 22 78 64 67 2d 6f 70 65 6e 22 29 0a 20 20 20 28 22 64 22 20 63 6f 75 6e 73 65 6c 2d 6c 6f	n."xdg-open")....("d".counsel-lo
1bb60	63 61 74 65 2d 61 63 74 69 6f 6e 2d 64 69 72 65 64 20 22 64 69 72 65 64 22 29 29 29 0a 0a 3b 3b	cate-action-dired."dired")))..;;
1bb80	3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 64 70 6b 67 27 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61	;;.`counsel-dpkg'..;;;###autoloa
1bba0	64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 64 70 6b 67 20 28 29 0a 20 20 22 43 61 6c 6c	d.(defun.counsel-dpkg.()..."Call
1bbc0	20 74 68 65 20 5c 22 64 70 6b 67 5c 22 20 73 68 65 6c 6c 20 63 6f 6d 6d 61 6e 64 2e 22 0a 20 20	.the.\"dpkg\".shell.command."...
1bbe0	28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 63 6f 75 6e 73 65 6c 2d 72 65 71 75 69 72 65	(interactive)...(counsel-require
1bc00	2d 70 72 6f 67 72 61 6d 20 22 64 70 6b 67 22 29 0a 20 20 28 6c 65 74 20 28 28 63 61 6e 64 73 20	-program."dpkg")...(let.((cands.
1bc20	28 6d 61 70 63 61 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20	(mapcar.................(lambda.
1bc40	28 78 29 0a 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 79 20 28	(x)...................(let.((y.(
1bc60	73 70 6c 69 74 2d 73 74 72 69 6e 67 20 78 20 22 20 20 2b 22 29 29 29 0a 20 20 20 20 20 20 20 20	split-string.x."..+"))).........
1bc80	20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 28 66 6f 72 6d 61 74 20 22 25 2d 34 30 73	............(cons.(format."%-40s
1bca0	20 20 20 25 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	...%s"..........................
1bcc0	20 20 20 20 20 20 20 20 20 28 69 76 79 2d 2d 74 72 75 6e 63 61 74 65 2d 73 74 72 69 6e 67 0a 20	.........(ivy--truncate-string..
1bce0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
1bd00	20 20 28 6e 74 68 20 31 20 79 29 20 34 30 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	..(nth.1.y).40).................
1bd20	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 74 68 20 34 20 79 29 29 0a 20 20 20	..................(nth.4.y))....
1bd40	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 70 63 6f 6e 63 61	.......................(mapconca
1bd60	74 20 23 27 69 64 65 6e 74 69 74 79 20 79 20 22 20 22 29 29 29 29 0a 20 20 20 20 20 20 20 20 20	t.#'identity.y."."))))..........
1bd80	20 20 20 20 20 20 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20	.......(split-string............
1bda0	20 20 20 20 20 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	......(shell-command-to-string."
1bdc0	64 70 6b 67 20 2d 6c 20 7c 20 74 61 69 6c 20 2d 6e 2b 36 22 29 20 22 5c 6e 22 20 74 29 29 29 29	dpkg.-l.|.tail.-n+6")."\n".t))))
1bde0	0a 20 20 20 20 28 69 76 79 2d 72 65 61 64 20 22 64 70 6b 67 3a 20 22 20 63 61 6e 64 73 0a 20 20	.....(ivy-read."dpkg:.".cands...
1be00	20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 28 6c 61 6d 62 64 61 20 28 78 29 0a	............:action.(lambda.(x).
1be20	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 65 73 73 61 67 65	........................(message
1be40	20 28 63 64 72 20 78 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72	.(cdr.x)))...............:caller
1be60	20 27 63 6f 75 6e 73 65 6c 2d 64 70 6b 67 29 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c	.'counsel-dpkg)))..;;;;.`counsel
1be80	2d 72 70 6d 27 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75	-rpm'..;;;###autoload.(defun.cou
1bea0	6e 73 65 6c 2d 72 70 6d 20 28 29 0a 20 20 22 43 61 6c 6c 20 74 68 65 20 5c 22 72 70 6d 5c 22 20	nsel-rpm.()..."Call.the.\"rpm\".
1bec0	73 68 65 6c 6c 20 63 6f 6d 6d 61 6e 64 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a	shell.command."...(interactive).
1bee0	20 20 28 63 6f 75 6e 73 65 6c 2d 72 65 71 75 69 72 65 2d 70 72 6f 67 72 61 6d 20 22 72 70 6d 22	..(counsel-require-program."rpm"
1bf00	29 0a 20 20 28 6c 65 74 20 28 28 63 61 6e 64 73 20 28 6d 61 70 63 61 72 0a 20 20 20 20 20 20 20	)...(let.((cands.(mapcar........
1bf20	20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 78 29 0a 20 20 20 20 20 20 20 20 20 20 20	.........(lambda.(x)............
1bf40	20 20 20 20 20 20 20 28 6c 65 74 20 28 28 79 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 78 20	.......(let.((y.(split-string.x.
1bf60	22 7c 22 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 73	"|"))).....................(cons
1bf80	20 28 66 6f 72 6d 61 74 20 22 25 2d 34 30 73 20 20 20 25 73 22 0a 20 20 20 20 20 20 20 20 20 20	.(format."%-40s...%s"...........
1bfa0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 76 79 2d 2d 74 72	........................(ivy--tr
1bfc0	75 6e 63 61 74 65 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	uncate-string...................
1bfe0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 74 68 20 30 20 79 29 20 34 30 29 0a 20	.................(nth.0.y).40)..
1c000	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
1c020	20 28 6e 74 68 20 31 20 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.(nth.1.y)).....................
1c040	20 20 20 20 20 20 28 6d 61 70 63 6f 6e 63 61 74 20 23 27 69 64 65 6e 74 69 74 79 20 79 20 22 20	......(mapconcat.#'identity.y.".
1c060	22 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 70 6c 69 74 2d 73 74 72	")))).................(split-str
1c080	69 6e 67 0a 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	ing..................(shell-comm
1c0a0	61 6e 64 2d 74 6f 2d 73 74 72 69 6e 67 20 22 72 70 6d 20 2d 71 61 20 2d 2d 71 66 20 5c 22 25 7b	and-to-string."rpm.-qa.--qf.\"%{
1c0c0	4e 41 4d 45 7d 7c 25 7b 53 55 4d 4d 41 52 59 7d 5c 5c 6e 5c 22 22 29 20 22 5c 6e 22 20 74 29 29	NAME}|%{SUMMARY}\\n\"")."\n".t))
1c0e0	29 29 0a 20 20 20 20 28 69 76 79 2d 72 65 61 64 20 22 72 70 6d 3a 20 22 20 63 61 6e 64 73 0a 20	)).....(ivy-read."rpm:.".cands..
1c100	20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 28 6c 61 6d 62 64 61 20 28 78 29	.............:action.(lambda.(x)
1c120	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 6d 65 73 73 61 67	.........................(messag
1c140	65 20 28 63 64 72 20 78 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65	e.(cdr.x)))...............:calle
1c160	72 20 27 63 6f 75 6e 73 65 6c 2d 72 70 6d 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65	r.'counsel-rpm)))..(defun.counse
1c180	6c 2d 2d 66 69 6e 64 2d 72 65 74 75 72 6e 2d 6c 69 73 74 20 28 61 72 67 73 29 0a 20 20 28 75 6e	l--find-return-list.(args)...(un
1c1a0	6c 65 73 73 20 28 6c 69 73 74 70 20 61 72 67 73 29 0a 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f	less.(listp.args).....(user-erro
1c1c0	72 0a 20 20 20 20 20 22 60 63 6f 75 6e 73 65 6c 2d 66 69 6c 65 2d 6a 75 6d 70 2d 61 72 67 73 27	r......"`counsel-file-jump-args'
1c1e0	20 69 73 20 61 20 6c 69 73 74 20 6e 6f 77 3b 20 70 6c 65 61 73 65 20 63 75 73 74 6f 6d 69 7a 65	.is.a.list.now;.please.customize
1c200	20 61 63 63 6f 72 64 69 6e 67 6c 79 22 29 29 0a 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 63 61 6c 6c	.accordingly"))...(counsel--call
1c220	0a 20 20 20 28 63 6f 6e 73 20 66 69 6e 64 2d 70 72 6f 67 72 61 6d 20 61 72 67 73 29 0a 20 20 20	....(cons.find-program.args)....
1c240	28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 28 6c 65 74 20 28 66 69 6c 65 73 29 0a 20 20 20	(lambda.()......(let.(files)....
1c260	20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20	....(goto-char.(point-min)).....
1c280	20 20 20 28 77 68 69 6c 65 20 28 3c 20 28 70 6f 69 6e 74 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29	...(while.(<.(point).(point-max)
1c2a0	29 0a 20 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 20 22 5c 5c	)..........(when.(looking-at."\\
1c2c0	2e 2f 22 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 6d 61 74 63	./")............(goto-char.(matc
1c2e0	68 2d 65 6e 64 20 30 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 28 62 75 66 66 65	h-end.0)))..........(push.(buffe
1c300	72 2d 73 75 62 73 74 72 69 6e 67 20 28 70 6f 69 6e 74 29 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f	r-substring.(point).(line-end-po
1c320	73 69 74 69 6f 6e 29 29 20 66 69 6c 65 73 29 0a 20 20 20 20 20 20 20 20 20 28 62 65 67 69 6e 6e	sition)).files)..........(beginn
1c340	69 6e 67 2d 6f 66 2d 6c 69 6e 65 20 32 29 29 0a 20 20 20 20 20 20 20 28 6e 72 65 76 65 72 73 65	ing-of-line.2))........(nreverse
1c360	20 66 69 6c 65 73 29 29 29 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d	.files)))))..(defcustom.counsel-
1c380	66 69 6c 65 2d 6a 75 6d 70 2d 61 72 67 73 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 22 2e 20	file-jump-args.(split-string."..
1c3a0	2d 6e 61 6d 65 20 2e 67 69 74 20 2d 70 72 75 6e 65 20 2d 6f 20 2d 74 79 70 65 20 66 20 2d 70 72	-name..git.-prune.-o.-type.f.-pr
1c3c0	69 6e 74 22 29 0a 20 20 22 41 72 67 75 6d 65 6e 74 73 20 66 6f 72 20 74 68 65 20 60 66 69 6e 64	int")..."Arguments.for.the.`find
1c3e0	2d 63 6f 6d 6d 61 6e 64 27 20 77 68 65 6e 20 75 73 69 6e 67 20 60 63 6f 75 6e 73 65 6c 2d 66 69	-command'.when.using.`counsel-fi
1c400	6c 65 2d 6a 75 6d 70 27 2e 22 0a 20 20 3a 74 79 70 65 20 27 28 72 65 70 65 61 74 20 73 74 72 69	le-jump'."...:type.'(repeat.stri
1c420	6e 67 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 66 69 6c 65 2d 6a 75 6d 70 27 0a 0a	ng))..;;;;.`counsel-file-jump'..
1c440	28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 66 69 6c 65 2d 6a 75 6d 70 2d 6d 61 70 0a 20 20	(defvar.counsel-file-jump-map...
1c460	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 61 70 29 29	(let.((map.(make-sparse-keymap))
1c480	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 60 22 29 20	).....(define-key.map.(kbd."`").
1c4a0	23 27 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 66 72 6f 6d 2d 6a 75 6d 70 29 0a 20	#'counsel-find-file-from-jump)..
1c4c0	20 20 20 6d 61 70 29 0a 20 20 22 4b 65 79 20 62 69 6e 64 69 6e 67 73 20 74 6f 20 62 65 20 75 73	...map)..."Key.bindings.to.be.us
1c4e0	65 64 20 77 68 65 6e 20 69 6e 20 61 20 66 69 6c 65 2d 6a 75 6d 70 20 6d 69 6e 69 62 75 66 66 65	ed.when.in.a.file-jump.minibuffe
1c500	72 2e 22 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 66	r.")..(defun.counsel-find-file-f
1c520	72 6f 6d 2d 6a 75 6d 70 20 28 29 0a 20 20 22 53 77 69 74 63 68 20 74 6f 20 60 63 6f 75 6e 73 65	rom-jump.()..."Switch.to.`counse
1c540	6c 2d 66 69 6e 64 2d 66 69 6c 65 27 20 66 72 6f 6d 20 60 63 6f 75 6e 73 65 6c 2d 66 69 6c 65 2d	l-find-file'.from.`counsel-file-
1c560	6a 75 6d 70 27 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 69 76 79 2d 71	jump'."...(interactive)...(ivy-q
1c580	75 69 74 2d 61 6e 64 2d 72 75 6e 0a 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69	uit-and-run.....(counsel-find-fi
1c5a0	6c 65 20 69 76 79 2d 74 65 78 74 20 28 69 76 79 2d 73 74 61 74 65 2d 64 69 72 65 63 74 6f 72 79	le.ivy-text.(ivy-state-directory
1c5c0	20 69 76 79 2d 6c 61 73 74 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64	.ivy-last))))..;;;###autoload.(d
1c5e0	65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 66 69 6c 65 2d 6a 75 6d 70 20 28 26 6f 70 74 69 6f 6e 61	efun.counsel-file-jump.(&optiona
1c600	6c 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20 69 6e 69 74 69 61 6c 2d 64 69 72 65 63 74 6f 72	l.initial-input.initial-director
1c620	79 29 0a 20 20 22 4a 75 6d 70 20 74 6f 20 61 20 66 69 6c 65 20 62 65 6c 6f 77 20 74 68 65 20 63	y)..."Jump.to.a.file.below.the.c
1c640	75 72 72 65 6e 74 20 64 69 72 65 63 74 6f 72 79 2e 0a 4c 69 73 74 20 61 6c 6c 20 66 69 6c 65 73	urrent.directory..List.all.files
1c660	20 77 69 74 68 69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 64 69 72 65 63 74 6f 72 79 20 6f 72	.within.the.current.directory.or
1c680	20 61 6e 79 20 6f 66 20 69 74 73 20 73 75 62 2d 64 69 72 65 63 74 6f 72 69 65 73 2e 0a 49 4e 49	.any.of.its.sub-directories..INI
1c6a0	54 49 41 4c 2d 49 4e 50 55 54 20 63 61 6e 20 62 65 20 67 69 76 65 6e 20 61 73 20 74 68 65 20 69	TIAL-INPUT.can.be.given.as.the.i
1c6c0	6e 69 74 69 61 6c 20 6d 69 6e 69 62 75 66 66 65 72 20 69 6e 70 75 74 2e 0a 49 4e 49 54 49 41 4c	nitial.minibuffer.input..INITIAL
1c6e0	2d 44 49 52 45 43 54 4f 52 59 2c 20 69 66 20 6e 6f 6e 2d 6e 69 6c 2c 20 69 73 20 75 73 65 64 20	-DIRECTORY,.if.non-nil,.is.used.
1c700	61 73 20 74 68 65 20 72 6f 6f 74 20 64 69 72 65 63 74 6f 72 79 20 66 6f 72 20 73 65 61 72 63 68	as.the.root.directory.for.search
1c720	2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 0a 20 20 20 28 6c 69 73 74 20 6e 69 6c 0a 20	."...(interactive....(list.nil..
1c740	20 20 20 20 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	........(when.current-prefix-arg
1c760	0a 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 72 65 61 64 2d 64 69 72 65 63 74	............(counsel-read-direct
1c780	6f 72 79 2d 6e 61 6d 65 20 22 46 72 6f 6d 20 64 69 72 65 63 74 6f 72 79 3a 20 22 29 29 29 29 0a	ory-name."From.directory:.")))).
1c7a0	20 20 28 63 6f 75 6e 73 65 6c 2d 72 65 71 75 69 72 65 2d 70 72 6f 67 72 61 6d 20 66 69 6e 64 2d	..(counsel-require-program.find-
1c7c0	70 72 6f 67 72 61 6d 29 0a 20 20 28 6c 65 74 20 28 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74	program)...(let.((default-direct
1c7e0	6f 72 79 20 28 6f 72 20 69 6e 69 74 69 61 6c 2d 64 69 72 65 63 74 6f 72 79 20 64 65 66 61 75 6c	ory.(or.initial-directory.defaul
1c800	74 2d 64 69 72 65 63 74 6f 72 79 29 29 29 0a 20 20 20 20 28 69 76 79 2d 72 65 61 64 20 22 46 69	t-directory))).....(ivy-read."Fi
1c820	6e 64 20 66 69 6c 65 3a 20 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65	nd.file:."...............(counse
1c840	6c 2d 2d 66 69 6e 64 2d 72 65 74 75 72 6e 2d 6c 69 73 74 20 63 6f 75 6e 73 65 6c 2d 66 69 6c 65	l--find-return-list.counsel-file
1c860	2d 6a 75 6d 70 2d 61 72 67 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6d 61 74 63 68	-jump-args)...............:match
1c880	65 72 20 23 27 63 6f 75 6e 73 65 6c 2d 2d 66 69 6e 64 2d 66 69 6c 65 2d 6d 61 74 63 68 65 72 0a	er.#'counsel--find-file-matcher.
1c8a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20 69 6e 69	..............:initial-input.ini
1c8c0	74 69 61 6c 2d 69 6e 70 75 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e	tial-input...............:action
1c8e0	20 23 27 66 69 6e 64 2d 66 69 6c 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 70 72 65 73	.#'find-file...............:pres
1c900	65 6c 65 63 74 20 28 63 6f 75 6e 73 65 6c 2d 2d 70 72 65 73 65 6c 65 63 74 2d 66 69 6c 65 29 0a	elect.(counsel--preselect-file).
1c920	20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 71 75 69 72 65 2d 6d 61 74 63 68 20 27 63 6f	..............:require-match.'co
1c940	6e 66 69 72 6d 2d 61 66 74 65 72 2d 63 6f 6d 70 6c 65 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20	nfirm-after-completion..........
1c960	20 20 20 20 20 3a 68 69 73 74 6f 72 79 20 27 66 69 6c 65 2d 6e 61 6d 65 2d 68 69 73 74 6f 72 79	.....:history.'file-name-history
1c980	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6b 65 79 6d 61 70 20 63 6f 75 6e 73 65 6c 2d 66	...............:keymap.counsel-f
1c9a0	69 6c 65 2d 6a 75 6d 70 2d 6d 61 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c	ile-jump-map...............:call
1c9c0	65 72 20 27 63 6f 75 6e 73 65 6c 2d 66 69 6c 65 2d 6a 75 6d 70 29 29 29 0a 0a 28 69 76 79 2d 73	er.'counsel-file-jump)))..(ivy-s
1c9e0	65 74 2d 61 63 74 69 6f 6e 73 0a 20 27 63 6f 75 6e 73 65 6c 2d 66 69 6c 65 2d 6a 75 6d 70 0a 20	et-actions..'counsel-file-jump..
1ca00	60 28 28 22 64 22 20 2c 28 6c 61 6d 62 64 61 20 28 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 28	`(("d".,(lambda.(x)............(
1ca20	64 69 72 65 64 20 28 6f 72 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 78	dired.(or.(file-name-directory.x
1ca40	29 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 29 29 0a 20 20 20 20 22 6f 70 65 6e	).default-directory)))....."open
1ca60	20 69 6e 20 64 69 72 65 64 22 29 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 64 69 72	.in.dired")))..;;;;.`counsel-dir
1ca80	65 64 2d 6a 75 6d 70 27 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 64 69 72	ed-jump'..(defcustom.counsel-dir
1caa0	65 64 2d 6a 75 6d 70 2d 61 72 67 73 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 22 2e 20 2d 6e	ed-jump-args.(split-string."..-n
1cac0	61 6d 65 20 2e 67 69 74 20 2d 70 72 75 6e 65 20 2d 6f 20 2d 74 79 70 65 20 64 20 2d 70 72 69 6e	ame..git.-prune.-o.-type.d.-prin
1cae0	74 22 29 0a 20 20 22 41 72 67 75 6d 65 6e 74 73 20 66 6f 72 20 74 68 65 20 60 66 69 6e 64 2d 63	t")..."Arguments.for.the.`find-c
1cb00	6f 6d 6d 61 6e 64 27 20 77 68 65 6e 20 75 73 69 6e 67 20 60 63 6f 75 6e 73 65 6c 2d 64 69 72 65	ommand'.when.using.`counsel-dire
1cb20	64 2d 6a 75 6d 70 27 2e 22 0a 20 20 3a 74 79 70 65 20 27 28 72 65 70 65 61 74 20 73 74 72 69 6e	d-jump'."...:type.'(repeat.strin
1cb40	67 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 63 6f 75 6e 73	g))..;;;###autoload.(defun.couns
1cb60	65 6c 2d 64 69 72 65 64 2d 6a 75 6d 70 20 28 26 6f 70 74 69 6f 6e 61 6c 20 69 6e 69 74 69 61 6c	el-dired-jump.(&optional.initial
1cb80	2d 69 6e 70 75 74 20 69 6e 69 74 69 61 6c 2d 64 69 72 65 63 74 6f 72 79 29 0a 20 20 22 4a 75 6d	-input.initial-directory)..."Jum
1cba0	70 20 74 6f 20 61 20 64 69 72 65 63 74 6f 72 79 20 28 73 65 65 20 60 64 69 72 65 64 2d 6a 75 6d	p.to.a.directory.(see.`dired-jum
1cbc0	70 27 29 20 62 65 6c 6f 77 20 74 68 65 20 63 75 72 72 65 6e 74 20 64 69 72 65 63 74 6f 72 79 2e	p').below.the.current.directory.
1cbe0	0a 4c 69 73 74 20 61 6c 6c 20 73 75 62 2d 64 69 72 65 63 74 6f 72 69 65 73 20 77 69 74 68 69 6e	.List.all.sub-directories.within
1cc00	20 74 68 65 20 63 75 72 72 65 6e 74 20 64 69 72 65 63 74 6f 72 79 2e 0a 49 4e 49 54 49 41 4c 2d	.the.current.directory..INITIAL-
1cc20	49 4e 50 55 54 20 63 61 6e 20 62 65 20 67 69 76 65 6e 20 61 73 20 74 68 65 20 69 6e 69 74 69 61	INPUT.can.be.given.as.the.initia
1cc40	6c 20 6d 69 6e 69 62 75 66 66 65 72 20 69 6e 70 75 74 2e 0a 49 4e 49 54 49 41 4c 2d 44 49 52 45	l.minibuffer.input..INITIAL-DIRE
1cc60	43 54 4f 52 59 2c 20 69 66 20 6e 6f 6e 2d 6e 69 6c 2c 20 69 73 20 75 73 65 64 20 61 73 20 74 68	CTORY,.if.non-nil,.is.used.as.th
1cc80	65 20 72 6f 6f 74 20 64 69 72 65 63 74 6f 72 79 20 66 6f 72 20 73 65 61 72 63 68 2e 22 0a 20 20	e.root.directory.for.search."...
1cca0	28 69 6e 74 65 72 61 63 74 69 76 65 0a 20 20 20 28 6c 69 73 74 20 6e 69 6c 0a 20 20 20 20 20 20	(interactive....(list.nil.......
1ccc0	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 0a 20 20 20 20	...(when.current-prefix-arg.....
1cce0	20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 72 65 61 64 2d 64 69 72 65 63 74 6f 72 79 2d 6e	.......(counsel-read-directory-n
1cd00	61 6d 65 20 22 46 72 6f 6d 20 64 69 72 65 63 74 6f 72 79 3a 20 22 29 29 29 29 0a 20 20 28 63 6f	ame."From.directory:."))))...(co
1cd20	75 6e 73 65 6c 2d 72 65 71 75 69 72 65 2d 70 72 6f 67 72 61 6d 20 66 69 6e 64 2d 70 72 6f 67 72	unsel-require-program.find-progr
1cd40	61 6d 29 0a 20 20 28 6c 65 74 20 28 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 28	am)...(let.((default-directory.(
1cd60	6f 72 20 69 6e 69 74 69 61 6c 2d 64 69 72 65 63 74 6f 72 79 20 64 65 66 61 75 6c 74 2d 64 69 72	or.initial-directory.default-dir
1cd80	65 63 74 6f 72 79 29 29 29 0a 20 20 20 20 28 69 76 79 2d 72 65 61 64 20 22 46 69 6e 64 20 64 69	ectory))).....(ivy-read."Find.di
1cda0	72 65 63 74 6f 72 79 3a 20 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 64 72 0a 20 20	rectory:."...............(cdr...
1cdc0	20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 66 69 6e 64 2d 72 65 74 75	.............(counsel--find-retu
1cde0	72 6e 2d 6c 69 73 74 20 63 6f 75 6e 73 65 6c 2d 64 69 72 65 64 2d 6a 75 6d 70 2d 61 72 67 73 29	rn-list.counsel-dired-jump-args)
1ce00	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6d 61 74 63 68 65 72 20 23 27 63 6f 75 6e 73	)...............:matcher.#'couns
1ce20	65 6c 2d 2d 66 69 6e 64 2d 66 69 6c 65 2d 6d 61 74 63 68 65 72 0a 20 20 20 20 20 20 20 20 20 20	el--find-file-matcher...........
1ce40	20 20 20 20 3a 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74	....:initial-input.initial-input
1ce60	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 28 6c 61 6d 62 64 61 20 28	...............:action.(lambda.(
1ce80	64 29 20 28 64 69 72 65 64 2d 6a 75 6d 70 20 6e 69 6c 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d	d).(dired-jump.nil.(expand-file-
1cea0	6e 61 6d 65 20 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 69 73 74 6f 72 79	name.d)))...............:history
1cec0	20 27 66 69 6c 65 2d 6e 61 6d 65 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20	.'file-name-history.............
1cee0	20 20 3a 6b 65 79 6d 61 70 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 6d 61 70 0a	..:keymap.counsel-find-file-map.
1cf00	20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 64	..............:caller.'counsel-d
1cf20	69 72 65 64 2d 6a 75 6d 70 29 29 29 0a 0c 0a 3b 3b 3b 20 47 72 65 70 0a 3b 3b 3b 3b 20 60 63 6f	ired-jump)))...;;;.Grep.;;;;.`co
1cf40	75 6e 73 65 6c 2d 61 67 27 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 61 67 2d 6d 61	unsel-ag'..(defvar.counsel-ag-ma
1cf60	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
1cf80	61 70 29 29 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	ap))).....(define-key.map.(kbd."
1cfa0	43 2d 6c 22 29 20 23 27 69 76 79 2d 63 61 6c 6c 2d 61 6e 64 2d 72 65 63 65 6e 74 65 72 29 0a 20	C-l").#'ivy-call-and-recenter)..
1cfc0	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 4d 2d 71 22 29 20 23	...(define-key.map.(kbd."M-q").#
1cfe0	27 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 71 75 65 72 79 2d 72 65 70 6c 61 63 65 29	'counsel-git-grep-query-replace)
1d000	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 43 2d 27 22 29	.....(define-key.map.(kbd."C-'")
1d020	20 23 27 73 77 69 70 65 72 2d 61 76 79 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d	.#'swiper-avy).....(define-key.m
1d040	61 70 20 28 6b 62 64 20 22 43 2d 78 20 43 2d 64 22 29 20 23 27 63 6f 75 6e 73 65 6c 2d 63 64 29	ap.(kbd."C-x.C-d").#'counsel-cd)
1d060	0a 20 20 20 20 6d 61 70 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 61	.....map))..(defcustom.counsel-a
1d080	67 2d 62 61 73 65 2d 63 6f 6d 6d 61 6e 64 20 28 6c 69 73 74 20 22 61 67 22 20 22 2d 2d 76 69 6d	g-base-command.(list."ag"."--vim
1d0a0	67 72 65 70 22 20 22 25 73 22 29 0a 20 20 22 54 65 6d 70 6c 61 74 65 20 66 6f 72 20 64 65 66 61	grep"."%s")..."Template.for.defa
1d0c0	75 6c 74 20 60 63 6f 75 6e 73 65 6c 2d 61 67 27 20 63 6f 6d 6d 61 6e 64 2e 0a 54 68 65 20 76 61	ult.`counsel-ag'.command..The.va
1d0e0	6c 75 65 20 73 68 6f 75 6c 64 20 62 65 20 65 69 74 68 65 72 20 61 20 6c 69 73 74 20 6f 66 20 73	lue.should.be.either.a.list.of.s
1d100	74 72 69 6e 67 73 2c 20 73 74 61 72 74 69 6e 67 20 77 69 74 68 20 74 68 65 0a 60 61 67 27 20 65	trings,.starting.with.the.`ag'.e
1d120	78 65 63 75 74 61 62 6c 65 20 66 69 6c 65 20 6e 61 6d 65 20 61 6e 64 20 66 6f 6c 6c 6f 77 65 64	xecutable.file.name.and.followed
1d140	20 62 79 20 69 74 73 20 61 72 67 75 6d 65 6e 74 73 2c 20 6f 72 20 61 0a 73 69 6e 67 6c 65 20 73	.by.its.arguments,.or.a.single.s
1d160	74 72 69 6e 67 20 64 65 73 63 72 69 62 69 6e 67 20 61 20 66 75 6c 6c 20 60 61 67 27 20 73 68 65	tring.describing.a.full.`ag'.she
1d180	6c 6c 20 63 6f 6d 6d 61 6e 64 2e 0a 0a 49 66 20 74 68 65 20 63 6f 6d 6d 61 6e 64 20 69 73 20 73	ll.command...If.the.command.is.s
1d1a0	70 65 63 69 66 69 65 64 20 61 73 20 61 20 6c 69 73 74 2c 20 60 61 67 27 20 69 73 20 63 61 6c 6c	pecified.as.a.list,.`ag'.is.call
1d1c0	65 64 20 64 69 72 65 63 74 6c 79 0a 75 73 69 6e 67 20 60 70 72 6f 63 65 73 73 2d 66 69 6c 65 27	ed.directly.using.`process-file'
1d1e0	3b 20 6f 74 68 65 72 77 69 73 65 2c 20 69 74 20 69 73 20 63 61 6c 6c 65 64 20 61 73 20 61 20 73	;.otherwise,.it.is.called.as.a.s
1d200	68 65 6c 6c 20 63 6f 6d 6d 61 6e 64 2e 0a 43 61 6c 6c 69 6e 67 20 60 61 67 27 20 64 69 72 65 63	hell.command..Calling.`ag'.direc
1d220	74 6c 79 20 61 76 6f 69 64 73 20 76 61 72 69 6f 75 73 20 73 68 65 6c 6c 20 71 75 6f 74 69 6e 67	tly.avoids.various.shell.quoting
1d240	20 70 69 74 66 61 6c 6c 73 2c 20 73 6f 0a 69 74 20 69 73 20 67 65 6e 65 72 61 6c 6c 79 20 72 65	.pitfalls,.so.it.is.generally.re
1d260	63 6f 6d 6d 65 6e 64 65 64 2e 0a 0a 49 66 20 74 68 65 20 73 74 72 69 6e 67 20 5c 22 25 73 5c 22	commended...If.the.string.\"%s\"
1d280	20 61 70 70 65 61 72 73 20 61 73 20 61 6e 20 65 6c 65 6d 65 6e 74 20 6f 66 20 74 68 65 20 6c 69	.appears.as.an.element.of.the.li
1d2a0	73 74 2c 20 6f 72 20 61 73 20 61 0a 73 75 62 73 74 72 69 6e 67 20 6f 66 20 74 68 65 20 63 6f 6d	st,.or.as.a.substring.of.the.com
1d2c0	6d 61 6e 64 20 73 74 72 69 6e 67 2c 20 69 74 20 69 73 20 72 65 70 6c 61 63 65 64 20 62 79 20 61	mand.string,.it.is.replaced.by.a
1d2e0	6e 79 20 6f 70 74 69 6f 6e 61 6c 0a 60 61 67 27 20 61 72 67 75 6d 65 6e 74 73 20 66 6f 6c 6c 6f	ny.optional.`ag'.arguments.follo
1d300	77 65 64 20 62 79 20 74 68 65 20 73 65 61 72 63 68 20 72 65 67 65 78 70 20 73 70 65 63 69 66 69	wed.by.the.search.regexp.specifi
1d320	65 64 20 64 75 72 69 6e 67 20 74 68 65 0a 60 63 6f 75 6e 73 65 6c 2d 61 67 27 20 73 65 73 73 69	ed.during.the.`counsel-ag'.sessi
1d340	6f 6e 2e 22 0a 20 20 3a 70 61 63 6b 61 67 65 2d 76 65 72 73 69 6f 6e 20 27 28 63 6f 75 6e 73 65	on."...:package-version.'(counse
1d360	6c 20 2e 20 22 30 2e 31 34 2e 30 22 29 0a 20 20 3a 74 79 70 65 20 27 28 63 68 6f 69 63 65 20 28	l..."0.14.0")...:type.'(choice.(
1d380	72 65 70 65 61 74 20 3a 74 61 67 20 22 43 6f 6d 6d 61 6e 64 20 6c 69 73 74 20 74 6f 20 63 61 6c	repeat.:tag."Command.list.to.cal
1d3a0	6c 20 64 69 72 65 63 74 6c 79 22 20 73 74 72 69 6e 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	l.directly".string).............
1d3c0	20 20 20 20 20 28 73 74 72 69 6e 67 20 3a 74 61 67 20 22 53 68 65 6c 6c 20 63 6f 6d 6d 61 6e 64	.....(string.:tag."Shell.command
1d3e0	22 29 29 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 61 67 2d 63 6f 6d 6d 61 6e 64	")))..(defvar.counsel-ag-command
1d400	20 6e 69 6c 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 2d 67 72 65 70 2d 74 6f 6f	.nil)..(defvar.counsel--grep-too
1d420	6c 2d 6c 6f 6f 6b 2d 61 72 6f 75 6e 64 20 74 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65	l-look-around.t)..(defvar.counse
1d440	6c 2d 2d 72 65 67 65 78 2d 6c 6f 6f 6b 2d 61 72 6f 75 6e 64 20 6e 69 6c 29 0a 0a 28 64 65 66 63	l--regex-look-around.nil)..(defc
1d460	6f 6e 73 74 20 63 6f 75 6e 73 65 6c 2d 2d 63 6f 6d 6d 61 6e 64 2d 61 72 67 73 2d 73 65 70 61 72	onst.counsel--command-args-separ
1d480	61 74 6f 72 20 22 20 2d 2d 20 22 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 73 70	ator.".--.")..(defun.counsel--sp
1d4a0	6c 69 74 2d 63 6f 6d 6d 61 6e 64 2d 61 72 67 73 20 28 61 72 67 75 6d 65 6e 74 73 29 0a 20 20 22	lit-command-args.(arguments)..."
1d4c0	53 70 6c 69 74 20 41 52 47 55 4d 45 4e 54 53 20 69 6e 74 6f 20 69 74 73 20 73 77 69 74 63 68 65	Split.ARGUMENTS.into.its.switche
1d4e0	73 20 61 6e 64 20 73 65 61 72 63 68 2d 74 65 72 6d 20 70 61 72 74 73 2e 0a 52 65 74 75 72 6e 20	s.and.search-term.parts..Return.
1d500	70 61 69 72 20 6f 66 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 73 74 72 69 6e 67 73 20 28 53	pair.of.corresponding.strings.(S
1d520	57 49 54 43 48 45 53 20 2e 20 53 45 41 52 43 48 2d 54 45 52 4d 29 2e 22 0a 20 20 28 69 66 20 28	WITCHES...SEARCH-TERM)."...(if.(
1d540	73 74 72 69 6e 67 2d 6d 61 74 63 68 20 63 6f 75 6e 73 65 6c 2d 2d 63 6f 6d 6d 61 6e 64 2d 61 72	string-match.counsel--command-ar
1d560	67 73 2d 73 65 70 61 72 61 74 6f 72 20 61 72 67 75 6d 65 6e 74 73 29 0a 20 20 20 20 20 20 28 6c	gs-separator.arguments).......(l
1d580	65 74 20 28 28 61 72 67 73 20 28 73 75 62 73 74 72 69 6e 67 20 61 72 67 75 6d 65 6e 74 73 20 28	et.((args.(substring.arguments.(
1d5a0	6d 61 74 63 68 2d 65 6e 64 20 30 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 61 72	match-end.0))).............(sear
1d5c0	63 68 2d 74 65 72 6d 20 28 73 75 62 73 74 72 69 6e 67 20 61 72 67 75 6d 65 6e 74 73 20 30 20 28	ch-term.(substring.arguments.0.(
1d5e0	6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 30 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 69	match-beginning.0)))).........(i
1d600	66 20 28 73 74 72 69 6e 67 2d 70 72 65 66 69 78 2d 70 20 22 2d 22 20 61 72 67 75 6d 65 6e 74 73	f.(string-prefix-p."-".arguments
1d620	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 73 65 61 72 63 68 2d 74 65 72 6d 20	).............(cons.search-term.
1d640	61 72 67 73 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 61 72 67 73 20 73 65 61 72 63	args)...........(cons.args.searc
1d660	68 2d 74 65 72 6d 29 29 29 0a 20 20 20 20 28 63 6f 6e 73 20 22 22 20 61 72 67 75 6d 65 6e 74 73	h-term))).....(cons."".arguments
1d680	29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 66 6f 72 6d 61 74 2d 61 67 2d 63	)))..(defun.counsel--format-ag-c
1d6a0	6f 6d 6d 61 6e 64 20 28 65 78 74 72 61 2d 61 72 67 73 20 6e 65 65 64 6c 65 29 0a 20 20 22 43 6f	ommand.(extra-args.needle)..."Co
1d6c0	6e 73 74 72 75 63 74 20 61 20 63 6f 6d 70 6c 65 74 65 20 60 63 6f 75 6e 73 65 6c 2d 61 67 2d 63	nstruct.a.complete.`counsel-ag-c
1d6e0	6f 6d 6d 61 6e 64 27 20 61 73 20 61 20 73 74 72 69 6e 67 2e 0a 45 58 54 52 41 2d 41 52 47 53 20	ommand'.as.a.string..EXTRA-ARGS.
1d700	69 73 20 61 20 73 74 72 69 6e 67 20 6f 66 20 74 68 65 20 61 64 64 69 74 69 6f 6e 61 6c 20 61 72	is.a.string.of.the.additional.ar
1d720	67 75 6d 65 6e 74 73 2e 0a 4e 45 45 44 4c 45 20 69 73 20 74 68 65 20 73 65 61 72 63 68 20 73 74	guments..NEEDLE.is.the.search.st
1d740	72 69 6e 67 2e 22 0a 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 66 6f 72 6d 61 74 20 63 6f 75 6e 73 65	ring."...(counsel--format.counse
1d760	6c 2d 61 67 2d 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	l-ag-command....................
1d780	28 69 66 20 28 6c 69 73 74 70 20 63 6f 75 6e 73 65 6c 2d 61 67 2d 63 6f 6d 6d 61 6e 64 29 0a 20	(if.(listp.counsel-ag-command)..
1d7a0	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 28 73 74 72 69 6e	......................(if.(strin
1d7c0	67 2d 6d 61 74 63 68 20 22 20 5c 5c 28 2d 2d 5c 5c 29 20 22 20 65 78 74 72 61 2d 61 72 67 73 29	g-match.".\\(--\\).".extra-args)
1d7e0	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 63 6f 75	............................(cou
1d800	6e 73 65 6c 2d 2d 66 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	nsel--format....................
1d820	20 20 20 20 20 20 20 20 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 28 72 65 70 6c 61 63 65 2d	.........(split-string.(replace-
1d840	6d 61 74 63 68 20 22 25 73 22 20 74 20 74 20 65 78 74 72 61 2d 61 72 67 73 20 31 29 29 0a 20 20	match."%s".t.t.extra-args.1))...
1d860	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 65 65 64 6c 65	..........................needle
1d880	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 63 6f 6e	)..........................(ncon
1d8a0	63 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 65 78 74 72 61 2d 61 72 67 73 29 20 6e 65 65 64	c.(split-string.extra-args).need
1d8c0	6c 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 28 69 66 20 28 73	le))......................(if.(s
1d8e0	74 72 69 6e 67 2d 6d 61 74 63 68 20 22 20 5c 5c 28 2d 2d 5c 5c 29 20 22 20 65 78 74 72 61 2d 61	tring-match.".\\(--\\).".extra-a
1d900	72 67 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 28 72	rgs)..........................(r
1d920	65 70 6c 61 63 65 2d 6d 61 74 63 68 20 6e 65 65 64 6c 65 20 74 20 74 20 65 78 74 72 61 2d 61 72	eplace-match.needle.t.t.extra-ar
1d940	67 73 20 31 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	gs.1)........................(co
1d960	6e 63 61 74 20 65 78 74 72 61 2d 61 72 67 73 20 22 20 22 20 6e 65 65 64 6c 65 29 29 29 29 29 0a	ncat.extra-args.".".needle))))).
1d980	0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 67 72 65 70 2d 72 65 67 65 78 20 28 73 74 72	.(defun.counsel--grep-regex.(str
1d9a0	29 0a 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 65 6c 69 73 70 2d 74 6f 2d 70 63 72 65 0a 20 20 20 28	)...(counsel--elisp-to-pcre....(
1d9c0	73 65 74 71 20 69 76 79 2d 2d 6f 6c 64 2d 72 65 0a 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61	setq.ivy--old-re..........(funca
1d9e0	6c 6c 20 28 69 76 79 2d 73 74 61 74 65 2d 72 65 2d 62 75 69 6c 64 65 72 20 69 76 79 2d 6c 61 73	ll.(ivy-state-re-builder.ivy-las
1da00	74 29 20 73 74 72 29 29 0a 20 20 20 63 6f 75 6e 73 65 6c 2d 2d 72 65 67 65 78 2d 6c 6f 6f 6b 2d	t).str))....counsel--regex-look-
1da20	61 72 6f 75 6e 64 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 61 67 2d 65 78 74	around))..(defun.counsel--ag-ext
1da40	72 61 2d 73 77 69 74 63 68 65 73 20 28 72 65 67 65 78 29 0a 20 20 22 47 65 74 20 61 64 64 69 74	ra-switches.(regex)..."Get.addit
1da60	69 6f 6e 61 6c 20 73 77 69 74 63 68 65 73 20 6e 65 65 64 65 64 20 66 6f 72 20 6c 6f 6f 6b 2d 61	ional.switches.needed.for.look-a
1da80	72 6f 75 6e 64 73 2e 22 0a 20 20 28 61 6e 64 20 28 73 74 72 69 6e 67 70 20 63 6f 75 6e 73 65 6c	rounds."...(and.(stringp.counsel
1daa0	2d 2d 72 65 67 65 78 2d 6c 6f 6f 6b 2d 61 72 6f 75 6e 64 29 0a 20 20 20 20 20 20 20 3b 3b 20 75	--regex-look-around)........;;.u
1dac0	73 69 6e 67 20 6c 6f 6f 6b 2d 61 72 6f 75 6e 64 73 0a 20 20 20 20 20 20 20 28 73 74 72 69 6e 67	sing.look-arounds........(string
1dae0	2d 6d 61 74 63 68 2d 70 20 22 5c 5c 60 5c 5c 5e 28 5c 5c 3f 5b 3d 21 5d 22 20 72 65 67 65 78 29	-match-p."\\`\\^(\\?[=!]".regex)
1db00	0a 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 22 20 22 20 63 6f 75 6e 73 65 6c 2d 2d 72 65 67	........(concat.".".counsel--reg
1db20	65 78 2d 6c 6f 6f 6b 2d 61 72 6f 75 6e 64 20 22 20 22 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f	ex-look-around.".")))..(defun.co
1db40	75 6e 73 65 6c 2d 61 67 2d 66 75 6e 63 74 69 6f 6e 20 28 73 74 72 69 6e 67 29 0a 20 20 22 47 72	unsel-ag-function.(string)..."Gr
1db60	65 70 20 69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 64 69 72 65 63 74 6f 72 79 20 66 6f 72 20	ep.in.the.current.directory.for.
1db80	53 54 52 49 4e 47 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 63 6f 6d 6d 61 6e 64 2d 61 72 67 73 20	STRING."...(let*.((command-args.
1dba0	28 63 6f 75 6e 73 65 6c 2d 2d 73 70 6c 69 74 2d 63 6f 6d 6d 61 6e 64 2d 61 72 67 73 20 73 74 72	(counsel--split-command-args.str
1dbc0	69 6e 67 29 29 0a 20 20 20 20 20 20 20 20 20 28 73 65 61 72 63 68 2d 74 65 72 6d 20 28 63 64 72	ing))..........(search-term.(cdr
1dbe0	20 63 6f 6d 6d 61 6e 64 2d 61 72 67 73 29 29 29 0a 20 20 20 20 28 6f 72 0a 20 20 20 20 20 28 6c	.command-args))).....(or......(l
1dc00	65 74 20 28 28 69 76 79 2d 74 65 78 74 20 73 65 61 72 63 68 2d 74 65 72 6d 29 29 0a 20 20 20 20	et.((ivy-text.search-term)).....
1dc20	20 20 20 28 69 76 79 2d 6d 6f 72 65 2d 63 68 61 72 73 29 29 0a 20 20 20 20 20 28 6c 65 74 2a 20	...(ivy-more-chars))......(let*.
1dc40	28 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 28 69 76 79 2d 73 74 61 74 65 2d 64	((default-directory.(ivy-state-d
1dc60	69 72 65 63 74 6f 72 79 20 69 76 79 2d 6c 61 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	irectory.ivy-last)).............
1dc80	28 72 65 67 65 78 20 28 63 6f 75 6e 73 65 6c 2d 2d 67 72 65 70 2d 72 65 67 65 78 20 73 65 61 72	(regex.(counsel--grep-regex.sear
1dca0	63 68 2d 74 65 72 6d 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 77 69 74 63 68 65 73 20	ch-term)).............(switches.
1dcc0	28 63 6f 6e 63 61 74 20 28 69 66 20 28 69 76 79 2d 2d 63 61 73 65 2d 66 6f 6c 64 2d 70 20 73 74	(concat.(if.(ivy--case-fold-p.st
1dce0	72 69 6e 67 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	ring)...........................
1dd00	20 20 20 20 20 20 20 20 22 20 2d 69 20 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	........".-i."..................
1dd20	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 20 2d 73 20 22 29 0a 20 20 20 20 20 20 20 20 20	...............".-s.")..........
1dd40	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 73 65 6c 2d 2d 61	.....................(counsel--a
1dd60	67 2d 65 78 74 72 61 2d 73 77 69 74 63 68 65 73 20 72 65 67 65 78 29 0a 20 20 20 20 20 20 20 20	g-extra-switches.regex).........
1dd80	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 72 20 63 6f 6d 6d 61	......................(car.comma
1dda0	6e 64 2d 61 72 67 73 29 29 29 29 0a 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 61 73 79	nd-args))))........(counsel--asy
1ddc0	6e 63 2d 63 6f 6d 6d 61 6e 64 20 28 63 6f 75 6e 73 65 6c 2d 2d 66 6f 72 6d 61 74 2d 61 67 2d 63	nc-command.(counsel--format-ag-c
1dde0	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 20 20 20 20 20	ommand..........................
1de00	20 20 20 20 20 20 20 73 77 69 74 63 68 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.......switches.................
1de20	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 28 69 66 20 28 6c 69	................(funcall.(if.(li
1de40	73 74 70 20 63 6f 75 6e 73 65 6c 2d 61 67 2d 63 6f 6d 6d 61 6e 64 29 20 23 27 69 64 65 6e 74 69	stp.counsel-ag-command).#'identi
1de60	74 79 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	ty..............................
1de80	20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 73 68 65 6c 6c 2d 71 75 6f 74 65 2d 61 72 67 75	..............#'shell-quote-argu
1dea0	6d 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 20 20 20 20	ment)...........................
1dec0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 67 65 78 29 29 29 0a 20 20 20 20 20 20 20 6e	...............regex)))........n
1dee0	69 6c 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 63 6c 2d 64 65 66 75 6e	il))))..;;;###autoload.(cl-defun
1df00	20 63 6f 75 6e 73 65 6c 2d 61 67 20 28 26 6f 70 74 69 6f 6e 61 6c 20 69 6e 69 74 69 61 6c 2d 69	.counsel-ag.(&optional.initial-i
1df20	6e 70 75 74 20 69 6e 69 74 69 61 6c 2d 64 69 72 65 63 74 6f 72 79 20 65 78 74 72 61 2d 61 67 2d	nput.initial-directory.extra-ag-
1df40	61 72 67 73 20 61 67 2d 70 72 6f 6d 70 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	args.ag-prompt..................
1df60	20 20 20 20 20 26 6b 65 79 20 63 61 6c 6c 65 72 29 0a 20 20 22 47 72 65 70 20 66 6f 72 20 61 20	.....&key.caller)..."Grep.for.a.
1df80	73 74 72 69 6e 67 20 69 6e 20 61 20 72 6f 6f 74 20 64 69 72 65 63 74 6f 72 79 20 75 73 69 6e 67	string.in.a.root.directory.using
1dfa0	20 60 61 67 27 2e 0a 0a 42 79 20 64 65 66 61 75 6c 74 2c 20 74 68 65 20 72 6f 6f 74 20 64 69 72	.`ag'...By.default,.the.root.dir
1dfc0	65 63 74 6f 72 79 20 69 73 20 74 68 65 20 66 69 72 73 74 20 64 69 72 65 63 74 6f 72 79 20 63 6f	ectory.is.the.first.directory.co
1dfe0	6e 74 61 69 6e 69 6e 67 0a 61 20 2e 67 69 74 20 73 75 62 64 69 72 65 63 74 6f 72 79 2e 0a 0a 49	ntaining.a..git.subdirectory...I
1e000	4e 49 54 49 41 4c 2d 49 4e 50 55 54 20 63 61 6e 20 62 65 20 67 69 76 65 6e 20 61 73 20 74 68 65	NITIAL-INPUT.can.be.given.as.the
1e020	20 69 6e 69 74 69 61 6c 20 6d 69 6e 69 62 75 66 66 65 72 20 69 6e 70 75 74 2e 0a 49 4e 49 54 49	.initial.minibuffer.input..INITI
1e040	41 4c 2d 44 49 52 45 43 54 4f 52 59 2c 20 69 66 20 6e 6f 6e 2d 6e 69 6c 2c 20 69 73 20 75 73 65	AL-DIRECTORY,.if.non-nil,.is.use
1e060	64 20 61 73 20 74 68 65 20 72 6f 6f 74 20 64 69 72 65 63 74 6f 72 79 20 66 6f 72 20 73 65 61 72	d.as.the.root.directory.for.sear
1e080	63 68 2e 0a 45 58 54 52 41 2d 41 47 2d 41 52 47 53 2c 20 69 66 20 6e 6f 6e 2d 6e 69 6c 2c 20 69	ch..EXTRA-AG-ARGS,.if.non-nil,.i
1e0a0	73 20 61 70 70 65 6e 64 65 64 20 74 6f 20 60 63 6f 75 6e 73 65 6c 2d 61 67 2d 62 61 73 65 2d 63	s.appended.to.`counsel-ag-base-c
1e0c0	6f 6d 6d 61 6e 64 27 2e 0a 41 47 2d 50 52 4f 4d 50 54 2c 20 69 66 20 6e 6f 6e 2d 6e 69 6c 2c 20	ommand'..AG-PROMPT,.if.non-nil,.
1e0e0	69 73 20 70 61 73 73 65 64 20 61 73 20 60 69 76 79 2d 72 65 61 64 27 20 70 72 6f 6d 70 74 20 61	is.passed.as.`ivy-read'.prompt.a
1e100	72 67 75 6d 65 6e 74 2e 0a 43 41 4c 4c 45 52 20 69 73 20 70 61 73 73 65 64 20 74 6f 20 60 69 76	rgument..CALLER.is.passed.to.`iv
1e120	79 2d 72 65 61 64 27 2e 0a 0a 57 69 74 68 20 61 20 60 5c 5c 5b 75 6e 69 76 65 72 73 61 6c 2d 61	y-read'...With.a.`\\[universal-a
1e140	72 67 75 6d 65 6e 74 5d 27 20 70 72 65 66 69 78 20 61 72 67 75 6d 65 6e 74 2c 20 70 72 6f 6d 70	rgument]'.prefix.argument,.promp
1e160	74 20 66 6f 72 20 49 4e 49 54 49 41 4c 2d 44 49 52 45 43 54 4f 52 59 2e 0a 57 69 74 68 20 61 20	t.for.INITIAL-DIRECTORY..With.a.
1e180	60 5c 5c 5b 75 6e 69 76 65 72 73 61 6c 2d 61 72 67 75 6d 65 6e 74 5d 20 5c 5c 5b 75 6e 69 76 65	`\\[universal-argument].\\[unive
1e1a0	72 73 61 6c 2d 61 72 67 75 6d 65 6e 74 5d 27 20 70 72 65 66 69 78 20 61 72 67 75 6d 65 6e 74 2c	rsal-argument]'.prefix.argument,
1e1c0	20 5c 0a 70 72 6f 6d 70 74 20 61 64 64 69 74 69 6f 6e 61 6c 6c 79 20 66 6f 72 20 45 58 54 52 41	.\.prompt.additionally.for.EXTRA
1e1e0	2d 41 47 2d 41 52 47 53 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 73 65	-AG-ARGS."...(interactive)...(se
1e200	74 71 20 63 6f 75 6e 73 65 6c 2d 61 67 2d 63 6f 6d 6d 61 6e 64 20 63 6f 75 6e 73 65 6c 2d 61 67	tq.counsel-ag-command.counsel-ag
1e220	2d 62 61 73 65 2d 63 6f 6d 6d 61 6e 64 29 0a 20 20 28 73 65 74 71 20 63 6f 75 6e 73 65 6c 2d 2d	-base-command)...(setq.counsel--
1e240	72 65 67 65 78 2d 6c 6f 6f 6b 2d 61 72 6f 75 6e 64 20 63 6f 75 6e 73 65 6c 2d 2d 67 72 65 70 2d	regex-look-around.counsel--grep-
1e260	74 6f 6f 6c 2d 6c 6f 6f 6b 2d 61 72 6f 75 6e 64 29 0a 20 20 28 63 6f 75 6e 73 65 6c 2d 72 65 71	tool-look-around)...(counsel-req
1e280	75 69 72 65 2d 70 72 6f 67 72 61 6d 20 63 6f 75 6e 73 65 6c 2d 61 67 2d 63 6f 6d 6d 61 6e 64 29	uire-program.counsel-ag-command)
1e2a0	0a 20 20 28 6c 65 74 20 28 28 70 72 6f 67 2d 6e 61 6d 65 20 28 63 61 72 20 28 69 66 20 28 6c 69	...(let.((prog-name.(car.(if.(li
1e2c0	73 74 70 20 63 6f 75 6e 73 65 6c 2d 61 67 2d 63 6f 6d 6d 61 6e 64 29 20 63 6f 75 6e 73 65 6c 2d	stp.counsel-ag-command).counsel-
1e2e0	61 67 2d 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 20	ag-command......................
1e300	20 20 20 20 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 63 6f 75 6e 73 65 6c 2d 61 67 2d 63 6f	.....(split-string.counsel-ag-co
1e320	6d 6d 61 6e 64 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 61 72 67 20 28 70 72 65 66 69 78 2d 6e	mmand)))).........(arg.(prefix-n
1e340	75 6d 65 72 69 63 2d 76 61 6c 75 65 20 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 29	umeric-value.current-prefix-arg)
1e360	29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 3e 3d 20 61 72 67 20 34 29 0a 20 20 20 20 20 20 28 73	)).....(when.(>=.arg.4).......(s
1e380	65 74 71 20 69 6e 69 74 69 61 6c 2d 64 69 72 65 63 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20	etq.initial-directory...........
1e3a0	20 20 28 6f 72 20 69 6e 69 74 69 61 6c 2d 64 69 72 65 63 74 6f 72 79 0a 20 20 20 20 20 20 20 20	..(or.initial-directory.........
1e3c0	20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 72 65 61 64 2d 64 69 72 65 63 74 6f 72 79 2d	........(counsel-read-directory-
1e3e0	6e 61 6d 65 20 28 63 6f 6e 63 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	name.(concat....................
1e400	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 72 6f 67 2d	...........................prog-
1e420	6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	name............................
1e440	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 20 69 6e 20 64 69 72 65 63 74 6f 72	...................".in.director
1e460	79 3a 20 22 29 29 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 3e 3d 20 61 72 67 20 31 36 29 0a	y:."))))).....(when.(>=.arg.16).
1e480	20 20 20 20 20 20 28 73 65 74 71 20 65 78 74 72 61 2d 61 67 2d 61 72 67 73 0a 20 20 20 20 20 20	......(setq.extra-ag-args.......
1e4a0	20 20 20 20 20 20 28 6f 72 20 65 78 74 72 61 2d 61 67 2d 61 72 67 73 0a 20 20 20 20 20 20 20 20	......(or.extra-ag-args.........
1e4c0	20 20 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 28 66	........(read-from-minibuffer.(f
1e4e0	6f 72 6d 61 74 20 22 25 73 20 61 72 67 73 3a 20 22 20 70 72 6f 67 2d 6e 61 6d 65 29 29 29 29 29	ormat."%s.args:.".prog-name)))))
1e500	0a 20 20 20 20 28 73 65 74 71 20 63 6f 75 6e 73 65 6c 2d 61 67 2d 63 6f 6d 6d 61 6e 64 20 28 63	.....(setq.counsel-ag-command.(c
1e520	6f 75 6e 73 65 6c 2d 2d 66 6f 72 6d 61 74 2d 61 67 2d 63 6f 6d 6d 61 6e 64 20 28 6f 72 20 65 78	ounsel--format-ag-command.(or.ex
1e540	74 72 61 2d 61 67 2d 61 72 67 73 20 22 22 29 20 22 25 73 22 29 29 0a 20 20 20 20 28 6c 65 74 20	tra-ag-args."")."%s")).....(let.
1e560	28 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 28 6f 72 20 69 6e 69 74 69 61 6c 2d	((default-directory.(or.initial-
1e580	64 69 72 65 63 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	directory.......................
1e5a0	20 20 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 67 69 74 2d 72 6f 6f 74 29 0a 20	...........(counsel--git-root)..
1e5c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
1e5e0	64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 29 29 0a 20 20 20 20 20 20 28 69 76 79 2d	default-directory))).......(ivy-
1e600	72 65 61 64 20 28 6f 72 20 61 67 2d 70 72 6f 6d 70 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	read.(or.ag-prompt..............
1e620	20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 70 72 6f 67 2d 6e 61 6d 65 20 22 3a 20 22 29 29 0a	.......(concat.prog-name.":.")).
1e640	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 63 6f 75 6e 73 65 6c 2d 61 67 2d 66 75 6e	................#'counsel-ag-fun
1e660	63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 69 61 6c 2d 69	ction.................:initial-i
1e680	6e 70 75 74 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	nput.initial-input..............
1e6a0	20 20 20 3a 64 79 6e 61 6d 69 63 2d 63 6f 6c 6c 65 63 74 69 6f 6e 20 74 0a 20 20 20 20 20 20 20	...:dynamic-collection.t........
1e6c0	20 20 20 20 20 20 20 20 20 3a 6b 65 79 6d 61 70 20 63 6f 75 6e 73 65 6c 2d 61 67 2d 6d 61 70 0a	.........:keymap.counsel-ag-map.
1e6e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 69 73 74 6f 72 79 20 27 63 6f 75 6e 73 65	................:history.'counse
1e700	6c 2d 67 69 74 2d 67 72 65 70 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	l-git-grep-history..............
1e720	20 20 20 3a 61 63 74 69 6f 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 61 63	...:action.#'counsel-git-grep-ac
1e740	74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 71 75 69 72 65 2d 6d 61	tion.................:require-ma
1e760	74 63 68 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 28 6f	tch.t.................:caller.(o
1e780	72 20 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 61 67 29 29 29 29 29 0a 0a 28 69 76 79 2d	r.caller.'counsel-ag)))))..(ivy-
1e7a0	63 6f 6e 66 69 67 75 72 65 20 27 63 6f 75 6e 73 65 6c 2d 61 67 0a 20 20 3a 6f 63 63 75 72 20 23	configure.'counsel-ag...:occur.#
1e7c0	27 63 6f 75 6e 73 65 6c 2d 61 67 2d 6f 63 63 75 72 0a 20 20 3a 75 6e 77 69 6e 64 2d 66 6e 20 23	'counsel-ag-occur...:unwind-fn.#
1e7e0	27 63 6f 75 6e 73 65 6c 2d 2d 67 72 65 70 2d 75 6e 77 69 6e 64 0a 20 20 3a 64 69 73 70 6c 61 79	'counsel--grep-unwind...:display
1e800	2d 74 72 61 6e 73 66 6f 72 6d 65 72 2d 66 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72	-transformer-fn.#'counsel-git-gr
1e820	65 70 2d 74 72 61 6e 73 66 6f 72 6d 65 72 0a 20 20 3a 67 72 65 70 2d 70 20 74 0a 20 20 3a 65 78	ep-transformer...:grep-p.t...:ex
1e840	69 74 2d 63 6f 64 65 73 20 27 28 31 20 22 4e 6f 20 6d 61 74 63 68 65 73 20 66 6f 75 6e 64 22 29	it-codes.'(1."No.matches.found")
1e860	29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 72 65 61 64 2d 64 69 72 65 63 74 6f 72 79	)..(defun.counsel-read-directory
1e880	2d 6e 61 6d 65 20 28 70 72 6f 6d 70 74 20 26 6f 70 74 69 6f 6e 61 6c 20 64 65 66 61 75 6c 74 29	-name.(prompt.&optional.default)
1e8a0	0a 20 20 22 52 65 61 64 20 61 20 64 69 72 65 63 74 6f 72 79 20 6e 61 6d 65 2e 0a 54 68 69 73 20	..."Read.a.directory.name..This.
1e8c0	69 73 20 69 6e 74 65 6e 64 65 64 20 61 73 20 61 20 28 70 61 72 74 69 61 6c 29 20 72 65 70 6c 61	is.intended.as.a.(partial).repla
1e8e0	63 65 6d 65 6e 74 20 66 6f 72 0a 60 72 65 61 64 2d 64 69 72 65 63 74 6f 72 79 2d 6e 61 6d 65 27	cement.for.`read-directory-name'
1e900	2e 22 0a 20 20 28 6c 65 74 20 28 28 63 6f 75 6e 73 65 6c 2d 2d 66 69 6e 64 2d 66 69 6c 65 2d 70	."...(let.((counsel--find-file-p
1e920	72 65 64 69 63 61 74 65 20 23 27 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 2d 70 29 29 0a 20 20	redicate.#'file-directory-p))...
1e940	20 20 28 69 76 79 2d 72 65 61 64 20 70 72 6f 6d 70 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	..(ivy-read.prompt..............
1e960	20 23 27 72 65 61 64 2d 66 69 6c 65 2d 6e 61 6d 65 2d 69 6e 74 65 72 6e 61 6c 0a 20 20 20 20 20	.#'read-file-name-internal......
1e980	20 20 20 20 20 20 20 20 20 3a 6d 61 74 63 68 65 72 20 23 27 63 6f 75 6e 73 65 6c 2d 2d 66 69 6e	.........:matcher.#'counsel--fin
1e9a0	64 2d 66 69 6c 65 2d 6d 61 74 63 68 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 64 65	d-file-matcher...............:de
1e9c0	66 20 64 65 66 61 75 6c 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 69 73 74 6f 72 79	f.default...............:history
1e9e0	20 27 66 69 6c 65 2d 6e 61 6d 65 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20	.'file-name-history.............
1ea00	20 20 3a 6b 65 79 6d 61 70 20 63 6f 75 6e 73 65 6c 2d 66 69 6e 64 2d 66 69 6c 65 2d 6d 61 70 0a	..:keymap.counsel-find-file-map.
1ea20	20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 72	..............:caller.'counsel-r
1ea40	65 61 64 2d 64 69 72 65 63 74 6f 72 79 2d 6e 61 6d 65 29 29 29 0a 0a 28 69 76 79 2d 63 6f 6e 66	ead-directory-name)))..(ivy-conf
1ea60	69 67 75 72 65 20 27 63 6f 75 6e 73 65 6c 2d 72 65 61 64 2d 64 69 72 65 63 74 6f 72 79 2d 6e 61	igure.'counsel-read-directory-na
1ea80	6d 65 0a 20 20 3a 70 61 72 65 6e 74 20 27 72 65 61 64 2d 66 69 6c 65 2d 6e 61 6d 65 2d 69 6e 74	me...:parent.'read-file-name-int
1eaa0	65 72 6e 61 6c 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 63 64 20 28 29 0a 20 20 22	ernal)..(defun.counsel-cd.()..."
1eac0	43 68 61 6e 67 65 20 74 68 65 20 64 69 72 65 63 74 6f 72 79 20 66 6f 72 20 74 68 65 20 63 75 72	Change.the.directory.for.the.cur
1eae0	72 65 6e 74 6c 79 20 72 75 6e 6e 69 6e 67 20 49 76 79 20 67 72 65 70 2d 6c 69 6b 65 20 63 6f 6d	rently.running.Ivy.grep-like.com
1eb00	6d 61 6e 64 2e 0a 57 6f 72 6b 73 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65	mand..Works.for.`counsel-git-gre
1eb20	70 27 2c 20 60 63 6f 75 6e 73 65 6c 2d 61 67 27 2c 20 65 74 63 2e 22 0a 20 20 28 69 6e 74 65 72	p',.`counsel-ag',.etc."...(inter
1eb40	61 63 74 69 76 65 29 0a 20 20 28 63 6f 75 6e 73 65 6c 2d 64 65 6c 65 74 65 2d 70 72 6f 63 65 73	active)...(counsel-delete-proces
1eb60	73 29 0a 20 20 28 6c 65 74 2a 20 28 28 69 6e 70 75 74 20 69 76 79 2d 74 65 78 74 29 0a 20 20 20	s)...(let*.((input.ivy-text)....
1eb80	20 20 20 20 20 20 28 65 6e 61 62 6c 65 2d 72 65 63 75 72 73 69 76 65 2d 6d 69 6e 69 62 75 66 66	......(enable-recursive-minibuff
1eba0	65 72 73 20 74 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 2d 64 69 72 20 28 62 75 66 66 65 72	ers.t)..........(def-dir.(buffer
1ebc0	2d 66 69 6c 65 2d 6e 61 6d 65 20 28 69 76 79 2d 73 74 61 74 65 2d 62 75 66 66 65 72 20 69 76 79	-file-name.(ivy-state-buffer.ivy
1ebe0	2d 6c 61 73 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 2d 64 69 72 20 28 61 6e 64 20	-last)))..........(def-dir.(and.
1ec00	64 65 66 2d 64 69 72 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 64 65 66	def-dir.(file-name-directory.def
1ec20	2d 64 69 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 6e 65 77 2d 64 69 72 20 28 63 6f 75 6e 73	-dir)))..........(new-dir.(couns
1ec40	65 6c 2d 72 65 61 64 2d 64 69 72 65 63 74 6f 72 79 2d 6e 61 6d 65 20 22 63 64 3a 20 22 20 64 65	el-read-directory-name."cd:.".de
1ec60	66 2d 64 69 72 29 29 29 0a 20 20 20 20 28 69 76 79 2d 71 75 69 74 2d 61 6e 64 2d 72 75 6e 0a 20	f-dir))).....(ivy-quit-and-run..
1ec80	20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 28 69 76 79 2d 73 74 61 74 65 2d 63 61 6c 6c 65 72 20	.....(funcall.(ivy-state-caller.
1eca0	69 76 79 2d 6c 61 73 74 29 20 69 6e 70 75 74 20 6e 65 77 2d 64 69 72 29 29 29 29 0a 0a 28 64 65	ivy-last).input.new-dir))))..(de
1ecc0	66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 67 72 65 70 2d 73 6d 61 72 74 2d 63 61 73 65 2d 66 6c 61	fun.counsel--grep-smart-case-fla
1ece0	67 20 28 29 0a 20 20 28 69 66 20 28 69 76 79 2d 2d 63 61 73 65 2d 66 6f 6c 64 2d 70 20 69 76 79	g.()...(if.(ivy--case-fold-p.ivy
1ed00	2d 74 65 78 74 29 0a 20 20 20 20 20 20 22 2d 69 22 0a 20 20 20 20 28 69 66 20 28 61 6e 64 20 28	-text)......."-i".....(if.(and.(
1ed20	73 74 72 69 6e 67 70 20 63 6f 75 6e 73 65 6c 2d 61 67 2d 62 61 73 65 2d 63 6f 6d 6d 61 6e 64 29	stringp.counsel-ag-base-command)
1ed40	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 2d 70 72 65 66 69 78 2d 70 20 22	..............(string-prefix-p."
1ed60	70 74 22 20 63 6f 75 6e 73 65 6c 2d 61 67 2d 62 61 73 65 2d 63 6f 6d 6d 61 6e 64 29 29 0a 20 20	pt".counsel-ag-base-command))...
1ed80	20 20 20 20 20 20 22 2d 53 22 0a 20 20 20 20 20 20 22 2d 73 22 29 29 29 0a 0a 28 64 65 66 75 6e	......"-S"......."-s")))..(defun
1eda0	20 63 6f 75 6e 73 65 6c 2d 67 72 65 70 2d 6c 69 6b 65 2d 6f 63 63 75 72 20 28 63 6d 64 2d 74 65	.counsel-grep-like-occur.(cmd-te
1edc0	6d 70 6c 61 74 65 29 0a 20 20 28 75 6e 6c 65 73 73 20 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65	mplate)...(unless.(eq.major-mode
1ede0	20 27 69 76 79 2d 6f 63 63 75 72 2d 67 72 65 70 2d 6d 6f 64 65 29 0a 20 20 20 20 28 69 76 79 2d	.'ivy-occur-grep-mode).....(ivy-
1ee00	6f 63 63 75 72 2d 67 72 65 70 2d 6d 6f 64 65 29 0a 20 20 20 20 28 73 65 74 71 20 64 65 66 61 75	occur-grep-mode).....(setq.defau
1ee20	6c 74 2d 64 69 72 65 63 74 6f 72 79 20 28 69 76 79 2d 73 74 61 74 65 2d 64 69 72 65 63 74 6f 72	lt-directory.(ivy-state-director
1ee40	79 20 69 76 79 2d 6c 61 73 74 29 29 29 0a 20 20 28 69 76 79 2d 73 65 74 2d 74 65 78 74 0a 20 20	y.ivy-last)))...(ivy-set-text...
1ee60	20 28 6c 65 74 20 28 28 6e 61 6d 65 20 28 62 75 66 66 65 72 2d 6e 61 6d 65 29 29 29 0a 20 20 20	.(let.((name.(buffer-name)))....
1ee80	20 20 28 69 66 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 5c 22 5c 5c 28 2e 2a 5c 5c 29 5c	..(if.(string-match."\"\\(.*\\)\
1eea0	22 22 20 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20	"".name)..........(match-string.
1eec0	31 20 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 28 69 76 79 2d 73 74 61 74 65 2d 74 65 78 74 20 69	1.name)........(ivy-state-text.i
1eee0	76 79 2d 6f 63 63 75 72 2d 6c 61 73 74 29 29 29 29 0a 20 20 28 6c 65 74 2a 20 28 28 63 6d 64 0a	vy-occur-last))))...(let*.((cmd.
1ef00	20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 66 75 6e 63 74 69 6f 6e 70 20 63 6d 64 2d 74 65 6d	..........(if.(functionp.cmd-tem
1ef20	70 6c 61 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 63 6d	plate)...............(funcall.cm
1ef40	64 2d 74 65 6d 70 6c 61 74 65 20 69 76 79 2d 74 65 78 74 29 0a 20 20 20 20 20 20 20 20 20 20 20	d-template.ivy-text)............
1ef60	20 28 6c 65 74 2a 20 28 28 63 6f 6d 6d 61 6e 64 2d 61 72 67 73 20 28 63 6f 75 6e 73 65 6c 2d 2d	.(let*.((command-args.(counsel--
1ef80	73 70 6c 69 74 2d 63 6f 6d 6d 61 6e 64 2d 61 72 67 73 20 69 76 79 2d 74 65 78 74 29 29 0a 20 20	split-command-args.ivy-text))...
1efa0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 67 65 78 20 28 63 6f 75 6e 73 65 6c	.................(regex.(counsel
1efc0	2d 2d 67 72 65 70 2d 72 65 67 65 78 20 28 63 64 72 20 63 6f 6d 6d 61 6e 64 2d 61 72 67 73 29 29	--grep-regex.(cdr.command-args))
1efe0	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 78 74 72 61 2d 73 77 69 74	)....................(extra-swit
1f000	63 68 65 73 20 28 63 6f 75 6e 73 65 6c 2d 2d 61 67 2d 65 78 74 72 61 2d 73 77 69 74 63 68 65 73	ches.(counsel--ag-extra-switches
1f020	20 72 65 67 65 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6c 6c	.regex))....................(all
1f040	2d 61 72 67 73 20 28 61 70 70 65 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	-args.(append...................
1f060	20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 63 61 72 20 63 6f 6d 6d 61 6e 64 2d 61	............(when.(car.command-a
1f080	72 67 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	rgs)............................
1f0a0	20 20 20 20 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 28 63 61 72 20 63 6f 6d 6d 61 6e 64 2d	.....(split-string.(car.command-
1f0c0	61 72 67 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	args))).........................
1f0e0	20 20 20 20 20 20 28 77 68 65 6e 20 65 78 74 72 61 2d 73 77 69 74 63 68 65 73 0a 20 20 20 20 20	......(when.extra-switches......
1f100	20 20 20 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 70 6c 69	...........................(spli
1f120	74 2d 73 74 72 69 6e 67 20 65 78 74 72 61 2d 73 77 69 74 63 68 65 73 29 29 0a 20 20 20 20 20 20	t-string.extra-switches)).......
1f140	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 69 73 74 0a 20 20	........................(list...
1f160	20 20 20 20 20 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	.............................(co
1f180	75 6e 73 65 6c 2d 2d 67 72 65 70 2d 73 6d 61 72 74 2d 63 61 73 65 2d 66 6c 61 67 29 0a 20 20 20	unsel--grep-smart-case-flag)....
1f1a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 67 65	............................rege
1f1c0	78 29 29 29 29 0a 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	x))))...............(if.(stringp
1f1e0	20 63 6d 64 2d 74 65 6d 70 6c 61 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.cmd-template)..................
1f200	20 28 63 6f 75 6e 73 65 6c 2d 2d 66 6f 72 6d 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.(counsel--format...............
1f220	20 20 20 20 20 63 6d 64 2d 74 65 6d 70 6c 61 74 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.....cmd-template...............
1f240	20 20 20 20 20 28 6d 61 70 63 6f 6e 63 61 74 20 23 27 73 68 65 6c 6c 2d 71 75 6f 74 65 2d 61 72	.....(mapconcat.#'shell-quote-ar
1f260	67 75 6d 65 6e 74 20 61 6c 6c 2d 61 72 67 73 20 22 20 22 29 29 0a 20 20 20 20 20 20 20 20 20 20	gument.all-args."."))...........
1f280	20 20 20 20 20 20 28 63 6c 2d 6d 61 70 63 61 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	......(cl-mapcan................
1f2a0	20 20 28 6c 61 6d 62 64 61 20 28 78 29 20 28 69 66 20 28 73 74 72 69 6e 67 3d 20 78 20 22 25 73	..(lambda.(x).(if.(string=.x."%s
1f2c0	22 29 20 28 63 6f 70 79 2d 73 65 71 75 65 6e 63 65 20 61 6c 6c 2d 61 72 67 73 29 20 28 6c 69 73	").(copy-sequence.all-args).(lis
1f2e0	74 20 78 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6d 64 2d 74 65 6d 70	t.x)))..................cmd-temp
1f300	6c 61 74 65 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 63 61 6e 64 73 20 28 63 6f 75 6e 73	late)))))..........(cands.(couns
1f320	65 6c 2d 2d 73 70 6c 69 74 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	el--split-string................
1f340	20 20 28 69 66 20 28 73 74 72 69 6e 67 70 20 63 6d 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	..(if.(stringp.cmd).............
1f360	20 20 20 20 20 20 20 20 20 28 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e 64 2d 74 6f 2d 73 74 72 69 6e	.........(shell-command-to-strin
1f380	67 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 28 63 6f 75 6e 73	g.cmd)....................(couns
1f3a0	65 6c 2d 2d 63 61 6c 6c 20 63 6d 64 29 29 29 29 29 0a 20 20 20 20 28 73 77 69 70 65 72 2d 2d 6f	el--call.cmd))))).....(swiper--o
1f3c0	63 63 75 72 2d 69 6e 73 65 72 74 2d 6c 69 6e 65 73 20 28 6d 61 70 63 61 72 20 23 27 63 6f 75 6e	ccur-insert-lines.(mapcar.#'coun
1f3e0	73 65 6c 2d 2d 6e 6f 72 6d 61 6c 69 7a 65 2d 67 72 65 70 2d 6d 61 74 63 68 20 63 61 6e 64 73 29	sel--normalize-grep-match.cands)
1f400	29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 61 67 2d 6f 63 63 75 72 20 28 26 6f	)))..(defun.counsel-ag-occur.(&o
1f420	70 74 69 6f 6e 61 6c 20 5f 63 61 6e 64 73 29 0a 20 20 22 47 65 6e 65 72 61 74 65 20 61 20 63 75	ptional._cands)..."Generate.a.cu
1f440	73 74 6f 6d 20 6f 63 63 75 72 20 62 75 66 66 65 72 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 61	stom.occur.buffer.for.`counsel-a
1f460	67 27 2e 22 0a 20 20 28 63 6f 75 6e 73 65 6c 2d 67 72 65 70 2d 6c 69 6b 65 2d 6f 63 63 75 72 0a	g'."...(counsel-grep-like-occur.
1f480	20 20 20 63 6f 75 6e 73 65 6c 2d 61 67 2d 63 6f 6d 6d 61 6e 64 29 29 0a 0a 3b 3b 3b 3b 20 60 63	...counsel-ag-command))..;;;;.`c
1f4a0	6f 75 6e 73 65 6c 2d 70 74 27 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 70	ounsel-pt'..(defcustom.counsel-p
1f4c0	74 2d 62 61 73 65 2d 63 6f 6d 6d 61 6e 64 20 22 70 74 20 2d 2d 6e 6f 63 6f 6c 6f 72 20 2d 2d 6e	t-base-command."pt.--nocolor.--n
1f4e0	6f 67 72 6f 75 70 20 2d 65 20 25 73 22 0a 20 20 22 41 6c 74 65 72 6e 61 74 69 76 65 20 74 6f 20	ogroup.-e.%s"..."Alternative.to.
1f500	60 63 6f 75 6e 73 65 6c 2d 61 67 2d 62 61 73 65 2d 63 6f 6d 6d 61 6e 64 27 20 75 73 69 6e 67 20	`counsel-ag-base-command'.using.
1f520	70 74 2e 22 0a 20 20 3a 74 79 70 65 20 27 73 74 72 69 6e 67 29 0a 0a 3b 3b 3b 23 23 23 61 75 74	pt."...:type.'string)..;;;###aut
1f540	6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 70 74 20 28 26 6f 70 74 69 6f 6e	oload.(defun.counsel-pt.(&option
1f560	61 6c 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 29 0a 20 20 22 47 72 65 70 20 66 6f 72 20 61 20	al.initial-input)..."Grep.for.a.
1f580	73 74 72 69 6e 67 20 69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 64 69 72 65 63 74 6f 72 79 20	string.in.the.current.directory.
1f5a0	75 73 69 6e 67 20 70 74 2e 0a 49 4e 49 54 49 41 4c 2d 49 4e 50 55 54 20 63 61 6e 20 62 65 20 67	using.pt..INITIAL-INPUT.can.be.g
1f5c0	69 76 65 6e 20 61 73 20 74 68 65 20 69 6e 69 74 69 61 6c 20 6d 69 6e 69 62 75 66 66 65 72 20 69	iven.as.the.initial.minibuffer.i
1f5e0	6e 70 75 74 2e 0a 54 68 69 73 20 75 73 65 73 20 60 63 6f 75 6e 73 65 6c 2d 61 67 27 20 77 69 74	nput..This.uses.`counsel-ag'.wit
1f600	68 20 60 63 6f 75 6e 73 65 6c 2d 70 74 2d 62 61 73 65 2d 63 6f 6d 6d 61 6e 64 27 20 69 6e 73 74	h.`counsel-pt-base-command'.inst
1f620	65 61 64 20 6f 66 0a 60 63 6f 75 6e 73 65 6c 2d 61 67 2d 62 61 73 65 2d 63 6f 6d 6d 61 6e 64 27	ead.of.`counsel-ag-base-command'
1f640	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 63 6f 75 6e	."...(interactive)...(let.((coun
1f660	73 65 6c 2d 61 67 2d 62 61 73 65 2d 63 6f 6d 6d 61 6e 64 20 63 6f 75 6e 73 65 6c 2d 70 74 2d 62	sel-ag-base-command.counsel-pt-b
1f680	61 73 65 2d 63 6f 6d 6d 61 6e 64 29 0a 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 67	ase-command).........(counsel--g
1f6a0	72 65 70 2d 74 6f 6f 6c 2d 6c 6f 6f 6b 2d 61 72 6f 75 6e 64 20 6e 69 6c 29 29 0a 20 20 20 20 28	rep-tool-look-around.nil)).....(
1f6c0	63 6f 75 6e 73 65 6c 2d 61 67 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20 6e 69 6c 20 6e 69 6c	counsel-ag.initial-input.nil.nil
1f6e0	20 6e 69 6c 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 70 74 29 29 29 0a 0a 28 69 76	.nil.:caller.'counsel-pt)))..(iv
1f700	79 2d 63 6f 6e 66 69 67 75 72 65 20 27 63 6f 75 6e 73 65 6c 2d 70 74 0a 20 20 3a 75 6e 77 69 6e	y-configure.'counsel-pt...:unwin
1f720	64 2d 66 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 2d 67 72 65 70 2d 75 6e 77 69 6e 64 0a 20 20 3a 64	d-fn.#'counsel--grep-unwind...:d
1f740	69 73 70 6c 61 79 2d 74 72 61 6e 73 66 6f 72 6d 65 72 2d 66 6e 20 23 27 63 6f 75 6e 73 65 6c 2d	isplay-transformer-fn.#'counsel-
1f760	67 69 74 2d 67 72 65 70 2d 74 72 61 6e 73 66 6f 72 6d 65 72 0a 20 20 3a 67 72 65 70 2d 70 20 74	git-grep-transformer...:grep-p.t
1f780	29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 61 63 6b 27 0a 0a 28 64 65 66 63 75 73 74 6f	)..;;;;.`counsel-ack'..(defcusto
1f7a0	6d 20 63 6f 75 6e 73 65 6c 2d 61 63 6b 2d 62 61 73 65 2d 63 6f 6d 6d 61 6e 64 0a 20 20 28 63 6f	m.counsel-ack-base-command...(co
1f7c0	6e 63 61 74 0a 20 20 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 72 65 63 74 6f 72 79 0a	ncat....(file-name-nondirectory.
1f7e0	20 20 20 20 28 6f 72 20 28 65 78 65 63 75 74 61 62 6c 65 2d 66 69 6e 64 20 22 61 63 6b 2d 67 72	....(or.(executable-find."ack-gr
1f800	65 70 22 29 20 22 61 63 6b 22 29 29 0a 20 20 20 22 20 2d 2d 6e 6f 63 6f 6c 6f 72 20 2d 2d 6e 6f	ep")."ack"))....".--nocolor.--no
1f820	67 72 6f 75 70 20 25 73 22 29 0a 20 20 22 41 6c 74 65 72 6e 61 74 69 76 65 20 74 6f 20 60 63 6f	group.%s")..."Alternative.to.`co
1f840	75 6e 73 65 6c 2d 61 67 2d 62 61 73 65 2d 63 6f 6d 6d 61 6e 64 27 20 75 73 69 6e 67 20 61 63 6b	unsel-ag-base-command'.using.ack
1f860	2e 22 0a 20 20 3a 74 79 70 65 20 27 73 74 72 69 6e 67 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c	."...:type.'string)..;;;###autol
1f880	6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 61 63 6b 20 28 26 6f 70 74 69 6f 6e 61	oad.(defun.counsel-ack.(&optiona
1f8a0	6c 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 29 0a 20 20 22 47 72 65 70 20 66 6f 72 20 61 20 73	l.initial-input)..."Grep.for.a.s
1f8c0	74 72 69 6e 67 20 69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 64 69 72 65 63 74 6f 72 79 20 75	tring.in.the.current.directory.u
1f8e0	73 69 6e 67 20 61 63 6b 2e 0a 49 4e 49 54 49 41 4c 2d 49 4e 50 55 54 20 63 61 6e 20 62 65 20 67	sing.ack..INITIAL-INPUT.can.be.g
1f900	69 76 65 6e 20 61 73 20 74 68 65 20 69 6e 69 74 69 61 6c 20 6d 69 6e 69 62 75 66 66 65 72 20 69	iven.as.the.initial.minibuffer.i
1f920	6e 70 75 74 2e 0a 54 68 69 73 20 75 73 65 73 20 60 63 6f 75 6e 73 65 6c 2d 61 67 27 20 77 69 74	nput..This.uses.`counsel-ag'.wit
1f940	68 20 60 63 6f 75 6e 73 65 6c 2d 61 63 6b 2d 62 61 73 65 2d 63 6f 6d 6d 61 6e 64 27 20 72 65 70	h.`counsel-ack-base-command'.rep
1f960	6c 61 63 69 6e 67 0a 60 63 6f 75 6e 73 65 6c 2d 61 67 2d 62 61 73 65 2d 63 6f 6d 6d 61 6e 64 27	lacing.`counsel-ag-base-command'
1f980	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 63 6f 75 6e	."...(interactive)...(let.((coun
1f9a0	73 65 6c 2d 61 67 2d 62 61 73 65 2d 63 6f 6d 6d 61 6e 64 20 63 6f 75 6e 73 65 6c 2d 61 63 6b 2d	sel-ag-base-command.counsel-ack-
1f9c0	62 61 73 65 2d 63 6f 6d 6d 61 6e 64 29 0a 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d	base-command).........(counsel--
1f9e0	67 72 65 70 2d 74 6f 6f 6c 2d 6c 6f 6f 6b 2d 61 72 6f 75 6e 64 20 74 29 29 0a 20 20 20 20 28 63	grep-tool-look-around.t)).....(c
1fa00	6f 75 6e 73 65 6c 2d 61 67 0a 20 20 20 20 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20 6e 69 6c	ounsel-ag......initial-input.nil
1fa20	20 6e 69 6c 20 6e 69 6c 0a 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 61	.nil.nil......:caller.'counsel-a
1fa40	63 6b 29 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 72 67 27 0a 0a 28 64 65 66 63 75	ck)))..;;;;.`counsel-rg'..(defcu
1fa60	73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 72 67 2d 62 61 73 65 2d 63 6f 6d 6d 61 6e 64 0a 20 20 60	stom.counsel-rg-base-command...`
1fa80	28 22 72 67 22 0a 20 20 20 20 22 2d 2d 6d 61 78 2d 63 6f 6c 75 6d 6e 73 22 20 22 32 34 30 22 0a	("rg"....."--max-columns"."240".
1faa0	20 20 20 20 22 2d 2d 77 69 74 68 2d 66 69 6c 65 6e 61 6d 65 22 0a 20 20 20 20 22 2d 2d 6e 6f 2d	...."--with-filename"....."--no-
1fac0	68 65 61 64 69 6e 67 22 0a 20 20 20 20 22 2d 2d 6c 69 6e 65 2d 6e 75 6d 62 65 72 22 0a 20 20 20	heading"....."--line-number"....
1fae0	20 22 2d 2d 63 6f 6c 6f 72 22 20 22 6e 65 76 65 72 22 0a 20 20 20 20 22 25 73 22 0a 20 20 20 20	."--color"."never"....."%s".....
1fb00	2c 40 28 61 6e 64 20 28 6d 65 6d 71 20 73 79 73 74 65 6d 2d 74 79 70 65 20 27 28 6d 73 2d 64 6f	,@(and.(memq.system-type.'(ms-do
1fb20	73 20 77 69 6e 64 6f 77 73 2d 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20	s.windows-nt))............(list.
1fb40	22 2d 2d 70 61 74 68 2d 73 65 70 61 72 61 74 6f 72 22 20 22 2f 22 20 22 2e 22 29 29 29 0a 20 20	"--path-separator"."/".".")))...
1fb60	22 4c 69 6b 65 20 60 63 6f 75 6e 73 65 6c 2d 61 67 2d 62 61 73 65 2d 63 6f 6d 6d 61 6e 64 27 2c	"Like.`counsel-ag-base-command',
1fb80	20 62 75 74 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 72 67 27 2e 0a 0a 4e 6f 74 65 3a 20 64 6f	.but.for.`counsel-rg'...Note:.do
1fba0	6e 27 74 20 75 73 65 20 73 69 6e 67 6c 65 20 71 75 6f 74 65 73 20 66 6f 72 20 74 68 65 20 72 65	n't.use.single.quotes.for.the.re
1fbc0	67 65 78 70 2e 22 0a 20 20 3a 70 61 63 6b 61 67 65 2d 76 65 72 73 69 6f 6e 20 27 28 63 6f 75 6e	gexp."...:package-version.'(coun
1fbe0	73 65 6c 20 2e 20 22 30 2e 31 34 2e 30 22 29 0a 20 20 3a 74 79 70 65 20 27 28 63 68 6f 69 63 65	sel..."0.14.0")...:type.'(choice
1fc00	20 28 72 65 70 65 61 74 20 3a 74 61 67 20 22 43 6f 6d 6d 61 6e 64 20 6c 69 73 74 20 74 6f 20 63	.(repeat.:tag."Command.list.to.c
1fc20	61 6c 6c 20 64 69 72 65 63 74 6c 79 22 20 73 74 72 69 6e 67 29 0a 20 20 20 20 20 20 20 20 20 20	all.directly".string)...........
1fc40	20 20 20 20 20 20 20 28 73 74 72 69 6e 67 20 3a 74 61 67 20 22 53 68 65 6c 6c 20 63 6f 6d 6d 61	.......(string.:tag."Shell.comma
1fc60	6e 64 22 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 72 67 2d 74 61 72 67 65	nd")))..(defun.counsel--rg-targe
1fc80	74 73 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 6c 69 73 74 20 6f 66 20 66 69 6c 65 73 20	ts.()..."Return.a.list.of.files.
1fca0	74 6f 20 6f 70 65 72 61 74 65 20 6f 6e 2c 20 62 61 73 65 64 20 6f 6e 20 60 64 69 72 65 64 2d 6d	to.operate.on,.based.on.`dired-m
1fcc0	6f 64 65 27 20 6d 61 72 6b 73 2e 22 0a 20 20 28 77 68 65 6e 20 28 64 65 72 69 76 65 64 2d 6d 6f	ode'.marks."...(when.(derived-mo
1fce0	64 65 2d 70 20 27 64 69 72 65 64 2d 6d 6f 64 65 29 0a 20 20 20 20 28 64 65 63 6c 61 72 65 2d 66	de-p.'dired-mode).....(declare-f
1fd00	75 6e 63 74 69 6f 6e 20 64 69 72 65 64 2d 67 65 74 2d 6d 61 72 6b 65 64 2d 66 69 6c 65 73 20 22	unction.dired-get-marked-files."
1fd20	64 69 72 65 64 22 29 0a 20 20 20 20 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 64 69	dired").....(declare-function.di
1fd40	72 65 64 2d 74 6f 67 67 6c 65 2d 6d 61 72 6b 73 20 22 64 69 72 65 64 22 29 0a 20 20 20 20 28 6c	red-toggle-marks."dired").....(l
1fd60	65 74 20 28 28 66 69 6c 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 67 65 74	et.((files............(dired-get
1fd80	2d 6d 61 72 6b 65 64 2d 66 69 6c 65 73 20 27 6e 6f 2d 64 69 72 20 6e 69 6c 20 6e 69 6c 20 74 29	-marked-files.'no-dir.nil.nil.t)
1fda0	29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 6f 72 20 28 63 64 72 20 66 69 6c 65 73 29 0a 20	)).......(when.(or.(cdr.files)..
1fdc0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 69 76 79 2d 2d 73 74 72 69 6e	...............(when.(ivy--strin
1fde0	67 2d 73 65 61 72 63 68 20 22 2a 69 76 79 2d 6f 63 63 75 72 22 20 28 62 75 66 66 65 72 2d 6e 61	g-search."*ivy-occur".(buffer-na
1fe00	6d 65 29 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 74 6f	me))...................(dired-to
1fe20	67 67 6c 65 2d 6d 61 72 6b 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73	ggle-marks)...................(s
1fe40	65 74 71 20 66 69 6c 65 73 20 28 64 69 72 65 64 2d 67 65 74 2d 6d 61 72 6b 65 64 2d 66 69 6c 65	etq.files.(dired-get-marked-file
1fe60	73 20 27 6e 6f 2d 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64	s.'no-dir))...................(d
1fe80	69 72 65 64 2d 74 6f 67 67 6c 65 2d 6d 61 72 6b 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	ired-toggle-marks)..............
1fea0	20 20 20 20 20 74 29 29 0a 20 20 20 20 20 20 20 20 28 64 65 6c 71 20 74 20 66 69 6c 65 73 29 29	.....t)).........(delq.t.files))
1fec0	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 63 6f 75 6e 73	)))..;;;###autoload.(defun.couns
1fee0	65 6c 2d 72 67 20 28 26 6f 70 74 69 6f 6e 61 6c 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20 69	el-rg.(&optional.initial-input.i
1ff00	6e 69 74 69 61 6c 2d 64 69 72 65 63 74 6f 72 79 20 65 78 74 72 61 2d 72 67 2d 61 72 67 73 20 72	nitial-directory.extra-rg-args.r
1ff20	67 2d 70 72 6f 6d 70 74 29 0a 20 20 22 47 72 65 70 20 66 6f 72 20 61 20 73 74 72 69 6e 67 20 69	g-prompt)..."Grep.for.a.string.i
1ff40	6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 64 69 72 65 63 74 6f 72 79 20 75 73 69 6e 67 20 60 72	n.the.current.directory.using.`r
1ff60	67 27 2e 0a 49 4e 49 54 49 41 4c 2d 49 4e 50 55 54 20 63 61 6e 20 62 65 20 67 69 76 65 6e 20 61	g'..INITIAL-INPUT.can.be.given.a
1ff80	73 20 74 68 65 20 69 6e 69 74 69 61 6c 20 6d 69 6e 69 62 75 66 66 65 72 20 69 6e 70 75 74 2e 0a	s.the.initial.minibuffer.input..
1ffa0	49 4e 49 54 49 41 4c 2d 44 49 52 45 43 54 4f 52 59 2c 20 69 66 20 6e 6f 6e 2d 6e 69 6c 2c 20 69	INITIAL-DIRECTORY,.if.non-nil,.i
1ffc0	73 20 75 73 65 64 20 61 73 20 74 68 65 20 72 6f 6f 74 20 64 69 72 65 63 74 6f 72 79 20 66 6f 72	s.used.as.the.root.directory.for
1ffe0	20 73 65 61 72 63 68 2e 0a 45 58 54 52 41 2d 52 47 2d 41 52 47 53 20 73 74 72 69 6e 67 2c 20 69	.search..EXTRA-RG-ARGS.string,.i
20000	66 20 6e 6f 6e 2d 6e 69 6c 2c 20 69 73 20 61 70 70 65 6e 64 65 64 20 74 6f 20 60 63 6f 75 6e 73	f.non-nil,.is.appended.to.`couns
20020	65 6c 2d 72 67 2d 62 61 73 65 2d 63 6f 6d 6d 61 6e 64 27 2e 0a 52 47 2d 50 52 4f 4d 50 54 2c 20	el-rg-base-command'..RG-PROMPT,.
20040	69 66 20 6e 6f 6e 2d 6e 69 6c 2c 20 69 73 20 70 61 73 73 65 64 20 61 73 20 60 69 76 79 2d 72 65	if.non-nil,.is.passed.as.`ivy-re
20060	61 64 27 20 70 72 6f 6d 70 74 20 61 72 67 75 6d 65 6e 74 2e 0a 0a 45 78 61 6d 70 6c 65 20 69 6e	ad'.prompt.argument...Example.in
20080	70 75 74 20 77 69 74 68 20 69 6e 63 6c 75 73 69 6f 6e 20 61 6e 64 20 65 78 63 6c 75 73 69 6f 6e	put.with.inclusion.and.exclusion
200a0	20 66 69 6c 65 20 70 61 74 74 65 72 6e 73 3a 0a 20 20 20 20 72 65 71 75 69 72 65 20 69 20 2d 2d	.file.patterns:.....require.i.--
200c0	20 2d 67 2a 2e 65 6c 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	.-g*.el"...(interactive)...(let.
200e0	28 28 63 6f 75 6e 73 65 6c 2d 61 67 2d 62 61 73 65 2d 63 6f 6d 6d 61 6e 64 0a 20 20 20 20 20 20	((counsel-ag-base-command.......
20100	20 20 20 28 69 66 20 28 6c 69 73 74 70 20 63 6f 75 6e 73 65 6c 2d 72 67 2d 62 61 73 65 2d 63 6f	...(if.(listp.counsel-rg-base-co
20120	6d 6d 61 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 70 70 65 6e 64 20 63 6f 75 6e	mmand)..............(append.coun
20140	73 65 6c 2d 72 67 2d 62 61 73 65 2d 63 6f 6d 6d 61 6e 64 20 28 63 6f 75 6e 73 65 6c 2d 2d 72 67	sel-rg-base-command.(counsel--rg
20160	2d 74 61 72 67 65 74 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 63 6f	-targets))............(concat.co
20180	75 6e 73 65 6c 2d 72 67 2d 62 61 73 65 2d 63 6f 6d 6d 61 6e 64 20 22 20 22 0a 20 20 20 20 20 20	unsel-rg-base-command.".".......
201a0	20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 6f 6e 63 61 74 20 23 27 73 68 65 6c 6c 2d	.............(mapconcat.#'shell-
201c0	71 75 6f 74 65 2d 61 72 67 75 6d 65 6e 74 20 28 63 6f 75 6e 73 65 6c 2d 2d 72 67 2d 74 61 72 67	quote-argument.(counsel--rg-targ
201e0	65 74 73 29 20 22 20 22 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 67	ets).".")))).........(counsel--g
20200	72 65 70 2d 74 6f 6f 6c 2d 6c 6f 6f 6b 2d 61 72 6f 75 6e 64 0a 20 20 20 20 20 20 20 20 20 28 6c	rep-tool-look-around..........(l
20220	65 74 20 28 28 72 67 20 28 63 61 72 20 28 69 66 20 28 6c 69 73 74 70 20 63 6f 75 6e 73 65 6c 2d	et.((rg.(car.(if.(listp.counsel-
20240	72 67 2d 62 61 73 65 2d 63 6f 6d 6d 61 6e 64 29 20 63 6f 75 6e 73 65 6c 2d 72 67 2d 62 61 73 65	rg-base-command).counsel-rg-base
20260	2d 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 20 20 20	-command........................
20280	20 20 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 63 6f 75 6e 73 65 6c 2d 72 67 2d 62 61 73 65	...(split-string.counsel-rg-base
202a0	2d 63 6f 6d 6d 61 6e 64 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 77 69	-command))))................(swi
202c0	74 63 68 20 22 2d 2d 70 63 72 65 32 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20	tch."--pcre2"))............(and.
202e0	28 65 71 20 30 20 28 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 72 67 20 6e 69 6c 20 6e 69 6c 20 6e	(eq.0.(call-process.rg.nil.nil.n
20300	69 6c 20 73 77 69 74 63 68 20 22 2d 2d 70 63 72 65 32 2d 76 65 72 73 69 6f 6e 22 29 29 0a 20 20	il.switch."--pcre2-version"))...
20320	20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 77 69 74 63 68 29 29 29 29 0a 20 20 20 20 28 63 6f	..............switch)))).....(co
20340	75 6e 73 65 6c 2d 61 67 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20 69 6e 69 74 69 61 6c 2d 64	unsel-ag.initial-input.initial-d
20360	69 72 65 63 74 6f 72 79 20 65 78 74 72 61 2d 72 67 2d 61 72 67 73 20 72 67 2d 70 72 6f 6d 70 74	irectory.extra-rg-args.rg-prompt
20380	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65	.................:caller.'counse
203a0	6c 2d 72 67 29 29 29 0a 0a 28 69 76 79 2d 63 6f 6e 66 69 67 75 72 65 20 27 63 6f 75 6e 73 65 6c	l-rg)))..(ivy-configure.'counsel
203c0	2d 72 67 0a 20 20 3a 6f 63 63 75 72 20 23 27 63 6f 75 6e 73 65 6c 2d 61 67 2d 6f 63 63 75 72 0a	-rg...:occur.#'counsel-ag-occur.
203e0	20 20 3a 75 6e 77 69 6e 64 2d 66 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 2d 67 72 65 70 2d 75 6e 77	..:unwind-fn.#'counsel--grep-unw
20400	69 6e 64 0a 20 20 3a 64 69 73 70 6c 61 79 2d 74 72 61 6e 73 66 6f 72 6d 65 72 2d 66 6e 20 23 27	ind...:display-transformer-fn.#'
20420	63 6f 75 6e 73 65 6c 2d 67 69 74 2d 67 72 65 70 2d 74 72 61 6e 73 66 6f 72 6d 65 72 0a 20 20 3a	counsel-git-grep-transformer...:
20440	67 72 65 70 2d 70 20 74 0a 20 20 3a 65 78 69 74 2d 63 6f 64 65 73 20 27 28 31 20 22 4e 6f 20 6d	grep-p.t...:exit-codes.'(1."No.m
20460	61 74 63 68 65 73 20 66 6f 75 6e 64 22 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 67	atches.found"))..;;;;.`counsel-g
20480	72 65 70 27 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 67 72 65 70 2d 6d 61 70 0a 20	rep'..(defvar.counsel-grep-map..
204a0	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 61 70 29	.(let.((map.(make-sparse-keymap)
204c0	29 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 43 2d 6c	)).....(define-key.map.(kbd."C-l
204e0	22 29 20 23 27 69 76 79 2d 63 61 6c 6c 2d 61 6e 64 2d 72 65 63 65 6e 74 65 72 29 0a 20 20 20 20	").#'ivy-call-and-recenter).....
20500	28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 28 6b 62 64 20 22 4d 2d 71 22 29 20 23 27 73 77	(define-key.map.(kbd."M-q").#'sw
20520	69 70 65 72 2d 71 75 65 72 79 2d 72 65 70 6c 61 63 65 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d	iper-query-replace).....(define-
20540	6b 65 79 20 6d 61 70 20 28 6b 62 64 20 22 43 2d 27 22 29 20 23 27 73 77 69 70 65 72 2d 61 76 79	key.map.(kbd."C-'").#'swiper-avy
20560	29 0a 20 20 20 20 6d 61 70 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d	).....map))..(defcustom.counsel-
20580	67 72 65 70 2d 62 61 73 65 2d 63 6f 6d 6d 61 6e 64 20 22 67 72 65 70 20 2d 45 20 2d 6e 20 2d 65	grep-base-command."grep.-E.-n.-e
205a0	20 25 73 20 25 73 22 0a 20 20 22 46 6f 72 6d 61 74 20 73 74 72 69 6e 67 20 75 73 65 64 20 62 79	.%s.%s"..."Format.string.used.by
205c0	20 60 63 6f 75 6e 73 65 6c 2d 67 72 65 70 27 20 74 6f 20 62 75 69 6c 64 20 61 20 73 68 65 6c 6c	.`counsel-grep'.to.build.a.shell
205e0	20 63 6f 6d 6d 61 6e 64 2e 0a 49 74 20 73 68 6f 75 6c 64 20 63 6f 6e 74 61 69 6e 20 74 77 6f 20	.command..It.should.contain.two.
20600	25 2d 73 65 71 75 65 6e 63 65 73 20 28 73 65 65 20 66 75 6e 63 74 69 6f 6e 20 60 66 6f 72 6d 61	%-sequences.(see.function.`forma
20620	74 27 29 20 74 6f 20 62 65 0a 73 75 62 73 74 69 74 75 74 65 64 20 62 79 20 74 68 65 20 73 65 61	t').to.be.substituted.by.the.sea
20640	72 63 68 20 72 65 67 65 78 70 20 61 6e 64 20 66 69 6c 65 2c 20 72 65 73 70 65 63 74 69 76 65 6c	rch.regexp.and.file,.respectivel
20660	79 2e 20 20 4e 65 69 74 68 65 72 0a 25 2d 73 65 71 75 65 6e 63 65 20 73 68 6f 75 6c 64 20 62 65	y...Neither.%-sequence.should.be
20680	20 63 6f 6e 74 61 69 6e 65 64 20 69 6e 20 73 69 6e 67 6c 65 20 71 75 6f 74 65 73 2e 22 0a 20 20	.contained.in.single.quotes."...
206a0	3a 74 79 70 65 20 27 73 74 72 69 6e 67 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d	:type.'string)..(defvar.counsel-
206c0	67 72 65 70 2d 63 6f 6d 6d 61 6e 64 20 6e 69 6c 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65	grep-command.nil)..(defun.counse
206e0	6c 2d 67 72 65 70 2d 66 75 6e 63 74 69 6f 6e 20 28 73 74 72 69 6e 67 29 0a 20 20 22 47 72 65 70	l-grep-function.(string)..."Grep
20700	20 69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 64 69 72 65 63 74 6f 72 79 20 66 6f 72 20 53 54	.in.the.current.directory.for.ST
20720	52 49 4e 47 2e 22 0a 20 20 28 6f 72 0a 20 20 20 28 69 76 79 2d 6d 6f 72 65 2d 63 68 61 72 73 29	RING."...(or....(ivy-more-chars)
20740	0a 20 20 20 28 6c 65 74 2a 20 28 28 72 65 67 65 78 20 28 63 6f 75 6e 73 65 6c 2d 2d 67 72 65 70	....(let*.((regex.(counsel--grep
20760	2d 72 65 67 65 78 20 73 74 72 69 6e 67 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6d 64 20 28	-regex.string))...........(cmd.(
20780	63 6f 75 6e 73 65 6c 2d 2d 66 6f 72 6d 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	counsel--format.................
207a0	63 6f 75 6e 73 65 6c 2d 67 72 65 70 2d 63 6f 6d 6d 61 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20	counsel-grep-command............
207c0	20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 28 69 66 20 28 6c 69 73 74 70 20 63 6f 75 6e 73 65 6c	.....(funcall.(if.(listp.counsel
207e0	2d 67 72 65 70 2d 63 6f 6d 6d 61 6e 64 29 20 23 27 69 64 65 6e 74 69 74 79 0a 20 20 20 20 20 20	-grep-command).#'identity.......
20800	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 73 68 65 6c 6c 2d 71 75 6f	.....................#'shell-quo
20820	74 65 2d 61 72 67 75 6d 65 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	te-argument)....................
20840	20 20 20 20 20 20 72 65 67 65 78 29 29 29 29 0a 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 61	......regex))))......(counsel--a
20860	73 79 6e 63 2d 63 6f 6d 6d 61 6e 64 0a 20 20 20 20 20 20 28 69 66 20 28 69 76 79 2d 2d 63 61 73	sync-command.......(if.(ivy--cas
20880	65 2d 66 6f 6c 64 2d 70 20 72 65 67 65 78 29 0a 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 6c	e-fold-p.regex)...........(if.(l
208a0	69 73 74 70 20 63 6d 64 29 20 28 6e 63 6f 6e 63 20 28 6c 69 73 74 20 28 63 61 72 20 63 6d 64 29	istp.cmd).(nconc.(list.(car.cmd)
208c0	20 22 2d 69 22 29 20 28 63 64 72 20 63 6d 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73	."-i").(cdr.cmd)).............(s
208e0	74 72 69 6e 67 2d 6d 61 74 63 68 20 22 20 22 20 63 6d 64 29 0a 20 20 20 20 20 20 20 20 20 20 20	tring-match.".".cmd)............
20900	20 28 72 65 70 6c 61 63 65 2d 6d 61 74 63 68 20 22 20 2d 69 20 22 20 6e 69 6c 20 6e 69 6c 20 63	.(replace-match.".-i.".nil.nil.c
20920	6d 64 29 29 0a 20 20 20 20 20 20 20 20 63 6d 64 29 29 0a 20 20 20 20 20 6e 69 6c 29 29 29 0a 0a	md)).........cmd))......nil)))..
20940	28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 2d 67 72 65 70 2d 6c 61 73 74 2d 70 6f 73 20 6e	(defvar.counsel--grep-last-pos.n
20960	69 6c 0a 20 20 22 53 74 6f 72 65 20 74 68 65 20 6c 61 73 74 20 70 6f 69 6e 74 20 61 6e 64 20 6c	il..."Store.the.last.point.and.l
20980	69 6e 65 20 74 68 61 74 20 60 63 6f 75 6e 73 65 6c 2d 67 72 65 70 2d 61 63 74 69 6f 6e 27 20 73	ine.that.`counsel-grep-action'.s
209a0	63 72 6f 6c 6c 65 64 20 74 6f 2e 0a 54 68 69 73 20 73 70 65 65 64 73 20 75 70 20 73 63 72 6f 6c	crolled.to..This.speeds.up.scrol
209c0	6c 69 6e 67 3a 20 69 6e 73 74 65 61 64 20 6f 66 20 67 6f 69 6e 67 20 74 6f 20 60 70 6f 69 6e 74	ling:.instead.of.going.to.`point
209e0	2d 6d 69 6e 27 20 61 6e 64 0a 60 66 6f 72 77 61 72 64 2d 6c 69 6e 65 27 20 77 69 74 68 20 61 20	-min'.and.`forward-line'.with.a.
20a00	68 75 67 65 20 61 72 67 20 28 65 2e 67 2e 20 74 6f 20 73 63 72 6f 6c 6c 20 35 30 4b 20 6c 69 6e	huge.arg.(e.g..to.scroll.50K.lin
20a20	65 73 29 2c 20 73 63 72 6f 6c 6c 0a 72 65 6c 61 74 69 76 65 20 74 6f 20 74 68 65 20 6c 61 73 74	es),.scroll.relative.to.the.last
20a40	20 70 6f 73 69 74 69 6f 6e 20 73 74 6f 72 65 64 20 68 65 72 65 2e 22 29 0a 0a 28 64 65 66 75 6e	.position.stored.here.")..(defun
20a60	20 63 6f 75 6e 73 65 6c 2d 67 72 65 70 2d 61 63 74 69 6f 6e 20 28 78 29 0a 20 20 22 47 6f 20 74	.counsel-grep-action.(x)..."Go.t
20a80	6f 20 63 61 6e 64 69 64 61 74 65 20 58 2e 22 0a 20 20 28 77 69 74 68 2d 69 76 79 2d 77 69 6e 64	o.candidate.X."...(with-ivy-wind
20aa0	6f 77 0a 20 20 20 20 28 73 77 69 70 65 72 2d 2d 63 6c 65 61 6e 75 70 29 0a 20 20 20 20 28 6c 65	ow.....(swiper--cleanup).....(le
20ac0	74 20 28 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20	t.((default-directory...........
20ae0	20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20	.(file-name-directory...........
20b00	20 20 28 69 76 79 2d 73 74 61 74 65 2d 64 69 72 65 63 74 6f 72 79 20 69 76 79 2d 6c 61 73 74 29	..(ivy-state-directory.ivy-last)
20b20	29 29 0a 20 20 20 20 20 20 20 20 20 20 66 69 6c 65 2d 6e 61 6d 65 20 6c 69 6e 65 2d 6e 75 6d 62	))...........file-name.line-numb
20b40	65 72 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 63 6f 6e 64 20 28 28 73 74 72 69 6e 67 2d 6d	er).......(when.(cond.((string-m
20b60	61 74 63 68 20 22 5c 5c 60 5c 5c 28 5b 30 2d 39 5d 2b 5c 5c 29 3a 5c 5c 28 2e 2a 5c 5c 29 5c 5c	atch."\\`\\([0-9]+\\):\\(.*\\)\\
20b80	27 22 20 78 29 0a 20 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	'".x)....................(setq.f
20ba0	69 6c 65 2d 6e 61 6d 65 20 28 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 28 69 76 79 2d	ile-name.(buffer-file-name.(ivy-
20bc0	73 74 61 74 65 2d 62 75 66 66 65 72 20 69 76 79 2d 6c 61 73 74 29 29 29 0a 20 20 20 20 20 20 20	state-buffer.ivy-last)))........
20be0	20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 6c 69 6e 65 2d 6e 75 6d 62 65 72 20 28 6d	............(setq.line-number.(m
20c00	61 74 63 68 2d 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 31 20 78 29 29 29	atch-string-no-properties.1.x)))
20c20	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 73 74 72 69 6e 67 2d 6d 61 74 63	...................((string-matc
20c40	68 20 22 5c 5c 60 5c 5c 28 5b 5e 3a 5d 2b 5c 5c 29 3a 5c 5c 28 5b 30 2d 39 5d 2b 5c 5c 29 3a 5c	h."\\`\\([^:]+\\):\\([0-9]+\\):\
20c60	5c 28 2e 2a 5c 5c 29 5c 5c 27 22 20 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	\(.*\\)\\'".x)..................
20c80	20 20 28 73 65 74 71 20 66 69 6c 65 2d 6e 61 6d 65 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 2d	..(setq.file-name.(match-string-
20ca0	6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 31 20 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	no-properties.1.x)).............
20cc0	20 20 20 20 20 20 20 28 73 65 74 71 20 6c 69 6e 65 2d 6e 75 6d 62 65 72 20 28 6d 61 74 63 68 2d	.......(setq.line-number.(match-
20ce0	73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 32 20 78 29 29 29 29 0a 20 20 20	string-no-properties.2.x))))....
20d00	20 20 20 20 20 3b 3b 20 49 66 20 74 68 65 20 66 69 6c 65 20 62 75 66 66 65 72 20 69 73 20 61 6c	.....;;.If.the.file.buffer.is.al
20d20	72 65 61 64 79 20 6f 70 65 6e 2c 20 6a 75 73 74 20 67 65 74 20 69 74 2e 20 50 72 65 76 65 6e 74	ready.open,.just.get.it..Prevent
20d40	20 64 6f 69 6e 67 0a 20 20 20 20 20 20 20 20 3b 3b 20 60 66 69 6e 64 2d 66 69 6c 65 27 2c 20 61	.doing.........;;.`find-file',.a
20d60	73 20 74 68 61 74 20 66 69 6c 65 20 63 6f 75 6c 64 20 68 61 76 65 20 61 6c 72 65 61 64 79 20 62	s.that.file.could.have.already.b
20d80	65 65 6e 20 6f 70 65 6e 65 64 20 75 73 69 6e 67 0a 20 20 20 20 20 20 20 20 3b 3b 20 60 66 69 6e	een.opened.using.........;;.`fin
20da0	64 2d 66 69 6c 65 2d 6c 69 74 65 72 61 6c 6c 79 27 2e 0a 20 20 20 20 20 20 20 20 28 77 69 74 68	d-file-literally'..........(with
20dc0	2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 28 6f 72 20 28 67 65 74 2d 66 69 6c 65 2d 62 75	-current-buffer.(or.(get-file-bu
20de0	66 66 65 72 20 66 69 6c 65 2d 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ffer.file-name).................
20e00	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6e 64 2d 66 69 6c 65 20 66 69 6c 65	.................(find-file.file
20e20	2d 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 6c 69 6e 65 2d 6e 75 6d	-name))...........(setq.line-num
20e40	62 65 72 20 28 73 74 72 69 6e 67 2d 74 6f 2d 6e 75 6d 62 65 72 20 6c 69 6e 65 2d 6e 75 6d 62 65	ber.(string-to-number.line-numbe
20e60	72 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 61 6e 64 20 63 6f 75 6e 73 65 6c 2d 2d	r))...........(if.(and.counsel--
20e80	67 72 65 70 2d 6c 61 73 74 2d 70 6f 73 20 28 3d 20 28 70 6f 69 6e 74 29 20 28 63 61 72 20 63 6f	grep-last-pos.(=.(point).(car.co
20ea0	75 6e 73 65 6c 2d 2d 67 72 65 70 2d 6c 61 73 74 2d 70 6f 73 29 29 29 0a 20 20 20 20 20 20 20 20	unsel--grep-last-pos))).........
20ec0	20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 28 2d 20 6c 69 6e 65 2d 6e 75 6d 62	......(forward-line.(-.line-numb
20ee0	65 72 20 28 63 64 72 20 63 6f 75 6e 73 65 6c 2d 2d 67 72 65 70 2d 6c 61 73 74 2d 70 6f 73 29 29	er.(cdr.counsel--grep-last-pos))
20f00	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d	).............(goto-char.(point-
20f20	6d 69 6e 29 29 0a 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	min)).............(forward-line.
20f40	28 31 2d 20 6c 69 6e 65 2d 6e 75 6d 62 65 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65	(1-.line-number)))...........(se
20f60	74 71 20 63 6f 75 6e 73 65 6c 2d 2d 67 72 65 70 2d 6c 61 73 74 2d 70 6f 73 20 28 63 6f 6e 73 20	tq.counsel--grep-last-pos.(cons.
20f80	28 70 6f 69 6e 74 29 20 6c 69 6e 65 2d 6e 75 6d 62 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 20	(point).line-number))...........
20fa0	28 77 68 65 6e 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 28 69 76 79 2d 2d 72	(when.(re-search-forward.(ivy--r
20fc0	65 67 65 78 20 69 76 79 2d 74 65 78 74 20 74 29 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74	egex.ivy-text.t).(line-end-posit
20fe0	69 6f 6e 29 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 73 77 69 70 65 72	ion).t).............(when.swiper
21000	2d 67 6f 74 6f 2d 73 74 61 72 74 2d 6f 66 2d 6d 61 74 63 68 0a 20 20 20 20 20 20 20 20 20 20 20	-goto-start-of-match............
21020	20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 30	...(goto-char.(match-beginning.0
21040	29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 72 75 6e 2d 68 6f 6f 6b 73 20 27 63 6f 75 6e 73	))))...........(run-hooks.'couns
21060	65 6c 2d 67 72 65 70 2d 70 6f 73 74 2d 61 63 74 69 6f 6e 2d 68 6f 6f 6b 29 0a 20 20 20 20 20 20	el-grep-post-action-hook).......
21080	20 20 20 20 28 69 66 20 28 65 71 20 69 76 79 2d 65 78 69 74 20 27 64 6f 6e 65 29 0a 20 20 20 20	....(if.(eq.ivy-exit.'done).....
210a0	20 20 20 20 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 2d 65 6e 73 75 72 65 2d 76 69 73 69 62 6c	..........(swiper--ensure-visibl
210c0	65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 69 73 65 61 72 63 68 2d 72 61 6e 67 65 2d 69 6e	e).............(isearch-range-in
210e0	76 69 73 69 62 6c 65 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	visible.(line-beginning-position
21100	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	)...............................
21120	20 20 20 20 20 20 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 29 29 0a 20 20 20 20	.......(line-end-position)).....
21140	20 20 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 2d 61 64 64 2d 6f 76 65 72 6c 61 79 73 20 28 69	........(swiper--add-overlays.(i
21160	76 79 2d 2d 72 65 67 65 78 20 69 76 79 2d 74 65 78 74 29 29 29 29 29 29 29 29 0a 0a 28 64 65 66	vy--regex.ivy-text))))))))..(def
21180	75 6e 20 63 6f 75 6e 73 65 6c 2d 67 72 65 70 2d 6f 63 63 75 72 20 28 26 6f 70 74 69 6f 6e 61 6c	un.counsel-grep-occur.(&optional
211a0	20 5f 63 61 6e 64 73 29 0a 20 20 22 47 65 6e 65 72 61 74 65 20 61 20 63 75 73 74 6f 6d 20 4f 63	._cands)..."Generate.a.custom.Oc
211c0	63 75 72 20 62 75 66 66 65 72 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 67 72 65 70 27 2e 22 0a	cur.buffer.for.`counsel-grep'.".
211e0	20 20 28 6c 65 74 20 28 28 66 69 6c 65 20 28 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20	..(let.((file.(buffer-file-name.
21200	28 69 76 79 2d 73 74 61 74 65 2d 62 75 66 66 65 72 20 69 76 79 2d 6c 61 73 74 29 29 29 29 0a 20	(ivy-state-buffer.ivy-last))))..
21220	20 20 20 28 63 6f 75 6e 73 65 6c 2d 67 72 65 70 2d 6c 69 6b 65 2d 6f 63 63 75 72 0a 20 20 20 20	...(counsel-grep-like-occur.....
21240	20 28 66 6f 72 6d 61 74 20 22 67 72 65 70 20 2d 6e 69 45 20 25 25 73 20 25 73 20 25 73 22 0a 20	.(format."grep.-niE.%%s.%s.%s"..
21260	20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 66 69 6c 65 20 28 73 68 65 6c 6c 2d 71 75 6f 74	............(if.file.(shell-quot
21280	65 2d 61 72 67 75 6d 65 6e 74 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 72 65 63 74 6f	e-argument.(file-name-nondirecto
212a0	72 79 20 66 69 6c 65 29 29 20 22 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 68 65 6c	ry.file))."")..............(shel
212c0	6c 2d 71 75 6f 74 65 2d 61 72 67 75 6d 65 6e 74 20 28 63 6f 75 6e 73 65 6c 2d 2d 6e 75 6c 6c 2d	l-quote-argument.(counsel--null-
212e0	64 65 76 69 63 65 29 29 29 29 29 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 67 72	device))))))..(defvar.counsel-gr
21300	65 70 2d 68 69 73 74 6f 72 79 20 6e 69 6c 0a 20 20 22 48 69 73 74 6f 72 79 20 66 6f 72 20 60 63	ep-history.nil..."History.for.`c
21320	6f 75 6e 73 65 6c 2d 67 72 65 70 27 2e 22 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a	ounsel-grep'.")..;;;###autoload.
21340	28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 67 72 65 70 20 28 26 6f 70 74 69 6f 6e 61 6c 20 69	(defun.counsel-grep.(&optional.i
21360	6e 69 74 69 61 6c 2d 69 6e 70 75 74 29 0a 20 20 22 47 72 65 70 20 66 6f 72 20 61 20 73 74 72 69	nitial-input)..."Grep.for.a.stri
21380	6e 67 20 69 6e 20 74 68 65 20 66 69 6c 65 20 76 69 73 69 74 65 64 20 62 79 20 74 68 65 20 63 75	ng.in.the.file.visited.by.the.cu
213a0	72 72 65 6e 74 20 62 75 66 66 65 72 2e 0a 57 68 65 6e 20 6e 6f 6e 2d 6e 69 6c 2c 20 49 4e 49 54	rrent.buffer..When.non-nil,.INIT
213c0	49 41 4c 2d 49 4e 50 55 54 20 69 73 20 74 68 65 20 69 6e 69 74 69 61 6c 20 73 65 61 72 63 68 20	IAL-INPUT.is.the.initial.search.
213e0	70 61 74 74 65 72 6e 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 75 6e 6c	pattern."...(interactive)...(unl
21400	65 73 73 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 0a 20 20 20 20 28 75 73 65 72 2d 65	ess.buffer-file-name.....(user-e
21420	72 72 6f 72 20 22 43 75 72 72 65 6e 74 20 62 75 66 66 65 72 20 69 73 20 6e 6f 74 20 76 69 73 69	rror."Current.buffer.is.not.visi
21440	74 69 6e 67 20 61 20 66 69 6c 65 22 29 29 0a 20 20 28 63 6f 75 6e 73 65 6c 2d 72 65 71 75 69 72	ting.a.file"))...(counsel-requir
21460	65 2d 70 72 6f 67 72 61 6d 20 63 6f 75 6e 73 65 6c 2d 67 72 65 70 2d 62 61 73 65 2d 63 6f 6d 6d	e-program.counsel-grep-base-comm
21480	61 6e 64 29 0a 20 20 28 73 65 74 71 20 63 6f 75 6e 73 65 6c 2d 67 72 65 70 2d 63 6f 6d 6d 61 6e	and)...(setq.counsel-grep-comman
214a0	64 0a 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 66 6f 72 6d 61 74 20 63 6f 75 6e 73	d.........(counsel--format.couns
214c0	65 6c 2d 67 72 65 70 2d 62 61 73 65 2d 63 6f 6d 6d 61 6e 64 20 22 25 73 22 0a 20 20 20 20 20 20	el-grep-base-command."%s".......
214e0	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 28 69 66 20	...................(funcall.(if.
21500	28 6c 69 73 74 70 20 63 6f 75 6e 73 65 6c 2d 67 72 65 70 2d 62 61 73 65 2d 63 6f 6d 6d 61 6e 64	(listp.counsel-grep-base-command
21520	29 20 23 27 69 64 65 6e 74 69 74 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	).#'identity....................
21540	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 73 68 65 6c 6c 2d 71 75 6f 74 65 2d 61	.................#'shell-quote-a
21560	72 67 75 6d 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 20	rgument)........................
21580	20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 72 65 63 74 6f	...........(file-name-nondirecto
215a0	72 79 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	ry..............................
215c0	20 20 20 20 20 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 29 29 29 29 0a 20 20 28 6c 65	......buffer-file-name))))...(le
215e0	74 20 28 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 28 66 69 6c 65 2d 6e 61 6d 65	t.((default-directory.(file-name
21600	2d 64 69 72 65 63 74 6f 72 79 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 29 29 0a 20 20	-directory.buffer-file-name))...
21620	20 20 20 20 20 20 28 69 6e 69 74 2d 70 6f 69 6e 74 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20	......(init-point.(point))......
21640	20 20 20 72 65 73 29 0a 20 20 20 20 28 75 6e 77 69 6e 64 2d 70 72 6f 74 65 63 74 0a 20 20 20 20	...res).....(unwind-protect.....
21660	20 20 20 20 20 28 73 65 74 71 20 72 65 73 20 28 69 76 79 2d 72 65 61 64 20 22 67 72 65 70 3a 20	.....(setq.res.(ivy-read."grep:.
21680	22 20 23 27 63 6f 75 6e 73 65 6c 2d 67 72 65 70 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20	".#'counsel-grep-function.......
216a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 69 61 6c 2d	.......................:initial-
216c0	69 6e 70 75 74 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 0a 20 20 20 20 20 20 20 20 20 20 20 20	input.initial-input.............
216e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 64 79 6e 61 6d 69 63 2d 63 6f 6c 6c 65 63	.................:dynamic-collec
21700	74 69 6f 6e 20 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	tion.t..........................
21720	20 20 20 20 3a 72 65 71 75 69 72 65 2d 6d 61 74 63 68 20 74 0a 20 20 20 20 20 20 20 20 20 20 20	....:require-match.t............
21740	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 70 72 65 73 65 6c 65 63 74 0a 20 20 20	..................:preselect....
21760	20 20 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 68 65 6e 20	..........................(when.
21780	28 3c 20 28 2d 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 29 20 28 6c 69 6e 65 2d	(<.(-.(line-end-position).(line-
217a0	62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 29 29 20 33 30 30 29 0a 20 20 20 20 20 20	beginning-position)).300).......
217c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74	.........................(format
217e0	20 22 25 64 3a 25 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	."%d:%s"........................
21800	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 2d 6e 75 6d 62 65 72 2d 61 74 2d	................(line-number-at-
21820	70 6f 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	pos)............................
21840	20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 67 65 78 70 2d 71 75 6f 74 65 0a 20 20 20 20 20 20	............(regexp-quote.......
21860	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
21880	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 65 72 74 69 65	..(buffer-substring-no-propertie
218a0	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...............................
218c0	20 20 20 20 20 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	...........(line-beginning-posit
218e0	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 20 20 20	ion)............................
21900	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e	..............(line-end-position
21920	29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	)))))...........................
21940	20 20 20 3a 6b 65 79 6d 61 70 20 63 6f 75 6e 73 65 6c 2d 67 72 65 70 2d 6d 61 70 0a 20 20 20 20	...:keymap.counsel-grep-map.....
21960	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 69 73 74 6f 72	.........................:histor
21980	79 20 27 63 6f 75 6e 73 65 6c 2d 67 72 65 70 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20	y.'counsel-grep-history.........
219a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 2d 62 75 69 6c 64 65 72	.....................:re-builder
219c0	20 23 27 69 76 79 2d 2d 72 65 67 65 78 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.#'ivy--regex...................
219e0	20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 67 72 65	...........:action.#'counsel-gre
21a00	70 2d 61 63 74 69 6f 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	p-action........................
21a20	20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 67 72 65 70 29 29 0a 20 20	......:caller.'counsel-grep))...
21a40	20 20 20 20 28 75 6e 6c 65 73 73 20 72 65 73 0a 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68	....(unless.res.........(goto-ch
21a60	61 72 20 69 6e 69 74 2d 70 6f 69 6e 74 29 29 29 29 29 0a 0a 28 69 76 79 2d 63 6f 6e 66 69 67 75	ar.init-point)))))..(ivy-configu
21a80	72 65 20 27 63 6f 75 6e 73 65 6c 2d 67 72 65 70 0a 20 20 3a 75 70 64 61 74 65 2d 66 6e 20 27 61	re.'counsel-grep...:update-fn.'a
21aa0	75 74 6f 0a 20 20 3a 75 6e 77 69 6e 64 2d 66 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 2d 67 72 65 70	uto...:unwind-fn.#'counsel--grep
21ac0	2d 75 6e 77 69 6e 64 0a 20 20 3a 69 6e 64 65 78 2d 66 6e 20 23 27 69 76 79 2d 72 65 63 6f 6d 70	-unwind...:index-fn.#'ivy-recomp
21ae0	75 74 65 2d 69 6e 64 65 78 2d 73 77 69 70 65 72 2d 61 73 79 6e 63 0a 20 20 3a 6f 63 63 75 72 20	ute-index-swiper-async...:occur.
21b00	23 27 63 6f 75 6e 73 65 6c 2d 67 72 65 70 2d 6f 63 63 75 72 0a 20 20 3a 6d 6f 72 65 2d 63 68 61	#'counsel-grep-occur...:more-cha
21b20	72 73 20 32 0a 20 20 3a 67 72 65 70 2d 70 20 74 0a 20 20 3a 65 78 69 74 2d 63 6f 64 65 73 20 27	rs.2...:grep-p.t...:exit-codes.'
21b40	28 31 20 22 22 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 63	(1.""))..;;;###autoload.(defun.c
21b60	6f 75 6e 73 65 6c 2d 67 72 65 70 2d 62 61 63 6b 77 61 72 64 20 28 26 6f 70 74 69 6f 6e 61 6c 20	ounsel-grep-backward.(&optional.
21b80	69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 29 0a 20 20 22 47 72 65 70 20 66 6f 72 20 61 20 73 74 72	initial-input)..."Grep.for.a.str
21ba0	69 6e 67 20 69 6e 20 74 68 65 20 66 69 6c 65 20 76 69 73 69 74 65 64 20 62 79 20 74 68 65 20 63	ing.in.the.file.visited.by.the.c
21bc0	75 72 72 65 6e 74 20 62 75 66 66 65 72 20 67 6f 69 6e 67 0a 62 61 63 6b 77 61 72 64 20 73 69 6d	urrent.buffer.going.backward.sim
21be0	69 6c 61 72 20 74 6f 20 60 73 77 69 70 65 72 2d 62 61 63 6b 77 61 72 64 27 2e 20 57 68 65 6e 20	ilar.to.`swiper-backward'..When.
21c00	6e 6f 6e 2d 6e 69 6c 2c 20 49 4e 49 54 49 41 4c 2d 49 4e 50 55 54 20 69 73 0a 74 68 65 20 69 6e	non-nil,.INITIAL-INPUT.is.the.in
21c20	69 74 69 61 6c 20 73 65 61 72 63 68 20 70 61 74 74 65 72 6e 2e 22 0a 20 20 28 69 6e 74 65 72 61	itial.search.pattern."...(intera
21c40	63 74 69 76 65 29 0a 20 20 28 6c 65 74 20 28 28 69 76 79 2d 69 6e 64 65 78 2d 66 75 6e 63 74 69	ctive)...(let.((ivy-index-functi
21c60	6f 6e 73 2d 61 6c 69 73 74 0a 20 20 20 20 20 20 20 20 20 27 28 28 63 6f 75 6e 73 65 6c 2d 67 72	ons-alist..........'((counsel-gr
21c80	65 70 20 2e 20 69 76 79 2d 72 65 63 6f 6d 70 75 74 65 2d 69 6e 64 65 78 2d 73 77 69 70 65 72 2d	ep...ivy-recompute-index-swiper-
21ca0	61 73 79 6e 63 2d 62 61 63 6b 77 61 72 64 29 29 29 29 0a 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d	async-backward)))).....(counsel-
21cc0	67 72 65 70 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 29 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75	grep.initial-input)))..;;;;.`cou
21ce0	6e 73 65 6c 2d 67 72 65 70 2d 6f 72 2d 73 77 69 70 65 72 27 0a 0a 28 64 65 66 63 75 73 74 6f 6d	nsel-grep-or-swiper'..(defcustom
21d00	20 63 6f 75 6e 73 65 6c 2d 67 72 65 70 2d 73 77 69 70 65 72 2d 6c 69 6d 69 74 20 33 30 30 30 30	.counsel-grep-swiper-limit.30000
21d20	30 0a 20 20 22 42 75 66 66 65 72 20 73 69 7a 65 20 74 68 72 65 73 68 6f 6c 64 20 66 6f 72 20 60	0..."Buffer.size.threshold.for.`
21d40	63 6f 75 6e 73 65 6c 2d 67 72 65 70 2d 6f 72 2d 73 77 69 70 65 72 27 2e 0a 57 68 65 6e 20 74 68	counsel-grep-or-swiper'..When.th
21d60	65 20 6e 75 6d 62 65 72 20 6f 66 20 63 68 61 72 61 63 74 65 72 73 20 69 6e 20 61 20 62 75 66 66	e.number.of.characters.in.a.buff
21d80	65 72 20 65 78 63 65 65 64 73 20 74 68 69 73 20 74 68 72 65 73 68 6f 6c 64 2c 0a 60 63 6f 75 6e	er.exceeds.this.threshold,.`coun
21da0	73 65 6c 2d 67 72 65 70 27 20 77 69 6c 6c 20 62 65 20 75 73 65 64 20 69 6e 73 74 65 61 64 20 6f	sel-grep'.will.be.used.instead.o
21dc0	66 20 60 73 77 69 70 65 72 27 2e 22 0a 20 20 3a 74 79 70 65 20 27 69 6e 74 65 67 65 72 29 0a 0a	f.`swiper'."...:type.'integer)..
21de0	28 64 65 66 63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 67 72 65 70 2d 75 73 65 2d 73 77 69 70	(defcustom.counsel-grep-use-swip
21e00	65 72 2d 70 20 23 27 63 6f 75 6e 73 65 6c 2d 67 72 65 70 2d 75 73 65 2d 73 77 69 70 65 72 2d 70	er-p.#'counsel-grep-use-swiper-p
21e20	2d 64 65 66 61 75 6c 74 0a 20 20 22 57 68 65 6e 20 74 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 72	-default..."When.this.function.r
21e40	65 74 75 72 6e 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 63 61 6c 6c 20 60 73 77 69 70 65 72 27 2c 20 65	eturns.non-nil,.call.`swiper',.e
21e60	6c 73 65 20 60 63 6f 75 6e 73 65 6c 2d 67 72 65 70 27 2e 22 0a 20 20 3a 74 79 70 65 20 27 28 63	lse.`counsel-grep'."...:type.'(c
21e80	68 6f 69 63 65 0a 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 6c	hoice...........(const.:tag."Rel
21ea0	79 20 6f 6e 20 60 63 6f 75 6e 73 65 6c 2d 67 72 65 70 2d 73 77 69 70 65 72 2d 6c 69 6d 69 74 27	y.on.`counsel-grep-swiper-limit'
21ec0	2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 63 6f 75 6e 73 65 6c 2d 67 72 65 70 2d 75 73 65 2d 73	."............counsel-grep-use-s
21ee0	77 69 70 65 72 2d 70 2d 64 65 66 61 75 6c 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73	wiper-p-default)...........(cons
21f00	74 20 3a 74 61 67 20 22 41 6c 77 61 79 73 20 75 73 65 20 60 63 6f 75 6e 73 65 6c 2d 67 72 65 70	t.:tag."Always.use.`counsel-grep
21f20	27 2e 22 20 69 67 6e 6f 72 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 74 69 6f 6e 20	'.".ignore)...........(function.
21f40	3a 74 61 67 20 22 43 75 73 74 6f 6d 22 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c	:tag."Custom")))..(defun.counsel
21f60	2d 67 72 65 70 2d 75 73 65 2d 73 77 69 70 65 72 2d 70 2d 64 65 66 61 75 6c 74 20 28 29 0a 20 20	-grep-use-swiper-p-default.()...
21f80	28 3c 3d 20 28 62 75 66 66 65 72 2d 73 69 7a 65 29 0a 20 20 20 20 20 20 28 2f 20 63 6f 75 6e 73	(<=.(buffer-size).......(/.couns
21fa0	65 6c 2d 67 72 65 70 2d 73 77 69 70 65 72 2d 6c 69 6d 69 74 0a 20 20 20 20 20 20 20 20 20 28 69	el-grep-swiper-limit..........(i
21fc0	66 20 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 6f 72 67 2d 6d 6f 64 65 29 20 34 20 31 29	f.(eq.major-mode.'org-mode).4.1)
21fe0	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 63 6f 75 6e 73	)))..;;;###autoload.(defun.couns
22000	65 6c 2d 67 72 65 70 2d 6f 72 2d 73 77 69 70 65 72 20 28 26 6f 70 74 69 6f 6e 61 6c 20 69 6e 69	el-grep-or-swiper.(&optional.ini
22020	74 69 61 6c 2d 69 6e 70 75 74 29 0a 20 20 22 43 61 6c 6c 20 60 73 77 69 70 65 72 27 20 66 6f 72	tial-input)..."Call.`swiper'.for
22040	20 73 6d 61 6c 6c 20 62 75 66 66 65 72 73 20 61 6e 64 20 60 63 6f 75 6e 73 65 6c 2d 67 72 65 70	.small.buffers.and.`counsel-grep
22060	27 20 66 6f 72 20 6c 61 72 67 65 20 6f 6e 65 73 2e 0a 57 68 65 6e 20 6e 6f 6e 2d 6e 69 6c 2c 20	'.for.large.ones..When.non-nil,.
22080	49 4e 49 54 49 41 4c 2d 49 4e 50 55 54 20 69 73 20 74 68 65 20 69 6e 69 74 69 61 6c 20 73 65 61	INITIAL-INPUT.is.the.initial.sea
220a0	72 63 68 20 70 61 74 74 65 72 6e 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20	rch.pattern."...(interactive)...
220c0	28 69 66 20 28 6f 72 20 28 6e 6f 74 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 29 0a 20	(if.(or.(not.buffer-file-name)..
220e0	20 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 2d 6e 61 72 72 6f 77 65 64 2d 70 29 0a 20 20 20	.........(buffer-narrowed-p)....
22100	20 20 20 20 20 20 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 20	.......(ignore-errors...........
22120	20 20 28 66 69 6c 65 2d 72 65 6d 6f 74 65 2d 70 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d	..(file-remote-p.buffer-file-nam
22140	65 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6a 6b 61 2d 63 6f 6d 70 72 2d 67 65 74 2d 63 6f 6d	e))...........(jka-compr-get-com
22160	70 72 65 73 73 69 6f 6e 2d 69 6e 66 6f 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 29 0a	pression-info.buffer-file-name).
22180	20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 63 6f 75 6e 73 65 6c 2d 67 72 65 70 2d	..........(funcall.counsel-grep-
221a0	75 73 65 2d 73 77 69 70 65 72 2d 70 29 29 0a 20 20 20 20 20 20 28 73 77 69 70 65 72 20 69 6e 69	use-swiper-p)).......(swiper.ini
221c0	74 69 61 6c 2d 69 6e 70 75 74 29 0a 20 20 20 20 28 77 68 65 6e 20 28 66 69 6c 65 2d 77 72 69 74	tial-input).....(when.(file-writ
221e0	61 62 6c 65 2d 70 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 28	able-p.buffer-file-name).......(
22200	73 61 76 65 2d 62 75 66 66 65 72 29 29 0a 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 67 72 65 70 20	save-buffer)).....(counsel-grep.
22220	69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 29 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d	initial-input)))..;;;;.`counsel-
22240	67 72 65 70 2d 6f 72 2d 73 77 69 70 65 72 2d 62 61 63 6b 77 61 72 64 27 0a 0a 3b 3b 3b 23 23 23	grep-or-swiper-backward'..;;;###
22260	61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 67 72 65 70 2d 6f 72 2d	autoload.(defun.counsel-grep-or-
22280	73 77 69 70 65 72 2d 62 61 63 6b 77 61 72 64 20 28 26 6f 70 74 69 6f 6e 61 6c 20 69 6e 69 74 69	swiper-backward.(&optional.initi
222a0	61 6c 2d 69 6e 70 75 74 29 0a 20 20 22 43 61 6c 6c 20 60 73 77 69 70 65 72 2d 62 61 63 6b 77 61	al-input)..."Call.`swiper-backwa
222c0	72 64 27 20 66 6f 72 20 73 6d 61 6c 6c 20 62 75 66 66 65 72 73 20 61 6e 64 20 60 63 6f 75 6e 73	rd'.for.small.buffers.and.`couns
222e0	65 6c 2d 67 72 65 70 2d 62 61 63 6b 77 61 72 64 27 20 66 6f 72 0a 6c 61 72 67 65 20 6f 6e 65 73	el-grep-backward'.for.large.ones
22300	2e 20 20 57 68 65 6e 20 6e 6f 6e 2d 6e 69 6c 2c 20 49 4e 49 54 49 41 4c 2d 49 4e 50 55 54 20 69	...When.non-nil,.INITIAL-INPUT.i
22320	73 20 74 68 65 20 69 6e 69 74 69 61 6c 20 73 65 61 72 63 68 20 70 61 74 74 65 72 6e 2e 22 0a 20	s.the.initial.search.pattern."..
22340	20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 20 28 28 69 76 79 2d 69 6e 64 65	.(interactive)...(let.((ivy-inde
22360	78 2d 66 75 6e 63 74 69 6f 6e 73 2d 61 6c 69 73 74 0a 20 20 20 20 20 20 20 20 20 27 28 28 73 77	x-functions-alist..........'((sw
22380	69 70 65 72 20 2e 20 69 76 79 2d 72 65 63 6f 6d 70 75 74 65 2d 69 6e 64 65 78 2d 73 77 69 70 65	iper...ivy-recompute-index-swipe
223a0	72 2d 62 61 63 6b 77 61 72 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d	r-backward)............(counsel-
223c0	67 72 65 70 20 2e 20 69 76 79 2d 72 65 63 6f 6d 70 75 74 65 2d 69 6e 64 65 78 2d 73 77 69 70 65	grep...ivy-recompute-index-swipe
223e0	72 2d 61 73 79 6e 63 2d 62 61 63 6b 77 61 72 64 29 29 29 29 0a 20 20 20 20 28 63 6f 75 6e 73 65	r-async-backward)))).....(counse
22400	6c 2d 67 72 65 70 2d 6f 72 2d 73 77 69 70 65 72 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 29 29	l-grep-or-swiper.initial-input))
22420	29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 72 65 63 6f 6c 6c 27 0a 0a 28 64 65 66 75 6e	)..;;;;.`counsel-recoll'..(defun
22440	20 63 6f 75 6e 73 65 6c 2d 72 65 63 6f 6c 6c 2d 66 75 6e 63 74 69 6f 6e 20 28 73 74 72 29 0a 20	.counsel-recoll-function.(str)..
22460	20 22 52 75 6e 20 72 65 63 6f 6c 6c 20 66 6f 72 20 53 54 52 2e 22 0a 20 20 28 6f 72 0a 20 20 20	."Run.recoll.for.STR."...(or....
22480	28 69 76 79 2d 6d 6f 72 65 2d 63 68 61 72 73 29 0a 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20	(ivy-more-chars)....(progn......
224a0	28 63 6f 75 6e 73 65 6c 2d 2d 61 73 79 6e 63 2d 63 6f 6d 6d 61 6e 64 0a 20 20 20 20 20 20 28 66	(counsel--async-command.......(f
224c0	6f 72 6d 61 74 20 22 72 65 63 6f 6c 6c 20 2d 74 20 2d 62 20 25 73 22 0a 20 20 20 20 20 20 20 20	ormat."recoll.-t.-b.%s".........
224e0	20 20 20 20 20 20 28 73 68 65 6c 6c 2d 71 75 6f 74 65 2d 61 72 67 75 6d 65 6e 74 20 73 74 72 29	......(shell-quote-argument.str)
22500	29 29 0a 20 20 20 20 20 6e 69 6c 29 29 29 0a 0a 3b 3b 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20	))......nil)))..;;.This.command.
22520	75 73 65 73 20 74 68 65 20 72 65 63 6f 6c 6c 71 20 63 6f 6d 6d 61 6e 64 20 6c 69 6e 65 20 74 6f	uses.the.recollq.command.line.to
22540	6f 6c 20 74 68 61 74 20 63 6f 6d 65 73 20 74 6f 67 65 74 68 65 72 0a 3b 3b 20 77 69 74 68 20 74	ol.that.comes.together.;;.with.t
22560	68 65 20 72 65 63 6f 6c 6c 20 28 74 68 65 20 64 6f 63 75 6d 65 6e 74 20 69 6e 64 65 78 69 6e 67	he.recoll.(the.document.indexing
22580	20 64 61 74 61 62 61 73 65 29 20 73 6f 75 72 63 65 3a 0a 3b 3b 20 20 20 20 20 68 74 74 70 73 3a	.database).source:.;;.....https:
225a0	2f 2f 77 77 77 2e 6c 65 73 62 6f 6e 73 63 6f 6d 70 74 65 73 2e 63 6f 6d 2f 72 65 63 6f 6c 6c 2f	//www.lesbonscomptes.com/recoll/
225c0	64 6f 77 6e 6c 6f 61 64 2e 68 74 6d 6c 0a 3b 3b 20 59 6f 75 20 6e 65 65 64 20 74 6f 20 62 75 69	download.html.;;.You.need.to.bui
225e0	6c 64 20 69 74 20 79 6f 75 72 73 65 6c 66 20 28 74 6f 67 65 74 68 65 72 20 77 69 74 68 20 72 65	ld.it.yourself.(together.with.re
22600	63 6f 6c 6c 29 3a 0a 3b 3b 20 20 20 20 20 63 64 20 2e 2f 71 75 65 72 79 20 26 26 20 6d 61 6b 65	coll):.;;.....cd../query.&&.make
22620	20 26 26 20 73 75 64 6f 20 63 70 20 72 65 63 6f 6c 6c 71 20 2f 75 73 72 2f 6c 6f 63 61 6c 2f 62	.&&.sudo.cp.recollq./usr/local/b
22640	69 6e 0a 3b 3b 20 59 6f 75 20 63 61 6e 20 74 72 79 20 74 68 65 20 47 55 49 20 76 65 72 73 69 6f	in.;;.You.can.try.the.GUI.versio
22660	6e 20 6f 66 20 72 65 63 6f 6c 6c 20 77 69 74 68 3a 0a 3b 3b 20 20 20 20 20 73 75 64 6f 20 61 70	n.of.recoll.with:.;;.....sudo.ap
22680	74 2d 67 65 74 20 69 6e 73 74 61 6c 6c 20 72 65 63 6f 6c 6c 0a 3b 3b 20 55 6e 66 6f 72 74 75 6e	t-get.install.recoll.;;.Unfortun
226a0	61 74 65 6c 79 2c 20 74 68 61 74 20 64 6f 65 73 20 6e 6f 74 20 69 6e 73 74 61 6c 6c 20 72 65 63	ately,.that.does.not.install.rec
226c0	6f 6c 6c 71 2e 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e	ollq..;;;###autoload.(defun.coun
226e0	73 65 6c 2d 72 65 63 6f 6c 6c 20 28 26 6f 70 74 69 6f 6e 61 6c 20 69 6e 69 74 69 61 6c 2d 69 6e	sel-recoll.(&optional.initial-in
22700	70 75 74 29 0a 20 20 22 53 65 61 72 63 68 20 66 6f 72 20 61 20 73 74 72 69 6e 67 20 69 6e 20 74	put)..."Search.for.a.string.in.t
22720	68 65 20 72 65 63 6f 6c 6c 20 64 61 74 61 62 61 73 65 2e 0a 59 6f 75 27 6c 6c 20 62 65 20 67 69	he.recoll.database..You'll.be.gi
22740	76 65 6e 20 61 20 6c 69 73 74 20 6f 66 20 66 69 6c 65 73 20 74 68 61 74 20 6d 61 74 63 68 2e 0a	ven.a.list.of.files.that.match..
22760	53 65 6c 65 63 74 69 6e 67 20 61 20 66 69 6c 65 20 77 69 6c 6c 20 6c 61 75 6e 63 68 20 60 73 77	Selecting.a.file.will.launch.`sw
22780	69 70 65 72 27 20 66 6f 72 20 74 68 61 74 20 66 69 6c 65 2e 0a 49 4e 49 54 49 41 4c 2d 49 4e 50	iper'.for.that.file..INITIAL-INP
227a0	55 54 20 63 61 6e 20 62 65 20 67 69 76 65 6e 20 61 73 20 74 68 65 20 69 6e 69 74 69 61 6c 20 6d	UT.can.be.given.as.the.initial.m
227c0	69 6e 69 62 75 66 66 65 72 20 69 6e 70 75 74 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65	inibuffer.input."...(interactive
227e0	29 0a 20 20 28 63 6f 75 6e 73 65 6c 2d 72 65 71 75 69 72 65 2d 70 72 6f 67 72 61 6d 20 22 72 65	)...(counsel-require-program."re
22800	63 6f 6c 6c 22 29 0a 20 20 28 69 76 79 2d 72 65 61 64 20 22 72 65 63 6f 6c 6c 3a 20 22 20 27 63	coll")...(ivy-read."recoll:.".'c
22820	6f 75 6e 73 65 6c 2d 72 65 63 6f 6c 6c 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20	ounsel-recoll-function..........
22840	20 20 20 3a 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 0a	...:initial-input.initial-input.
22860	20 20 20 20 20 20 20 20 20 20 20 20 3a 64 79 6e 61 6d 69 63 2d 63 6f 6c 6c 65 63 74 69 6f 6e 20	............:dynamic-collection.
22880	74 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 69 73 74 6f 72 79 20 27 63 6f 75 6e 73 65 6c 2d	t.............:history.'counsel-
228a0	67 69 74 2d 67 72 65 70 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63	git-grep-history.............:ac
228c0	74 69 6f 6e 20 28 6c 61 6d 62 64 61 20 28 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	tion.(lambda.(x)................
228e0	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 66 69 6c 65	.......(when.(string-match."file
22900	3a 2f 2f 5c 5c 28 2e 2a 5c 5c 29 5c 5c 27 22 20 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	://\\(.*\\)\\'".x)..............
22920	20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 66 69 6c 65 2d 6e 61 6d 65 20 28 6d 61 74	...........(let.((file-name.(mat
22940	63 68 2d 73 74 72 69 6e 67 20 31 20 78 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ch-string.1.x)))................
22960	20 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 2d 6e 61 6d 65 29	...........(find-file.file-name)
22980	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 75 6e 6c 65	...........................(unle
229a0	73 73 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 70 64 66 24 22 20 78 29 0a 20 20 20 20 20	ss.(string-match."pdf$".x)......
229c0	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 77 69 70 65 72 20 69	.......................(swiper.i
229e0	76 79 2d 74 65 78 74 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72	vy-text))))).............:caller
22a00	20 27 63 6f 75 6e 73 65 6c 2d 72 65 63 6f 6c 6c 29 29 0a 0a 28 69 76 79 2d 63 6f 6e 66 69 67 75	.'counsel-recoll))..(ivy-configu
22a20	72 65 20 27 63 6f 75 6e 73 65 6c 2d 72 65 63 6f 6c 6c 0a 20 20 3a 75 6e 77 69 6e 64 2d 66 6e 20	re.'counsel-recoll...:unwind-fn.
22a40	23 27 63 6f 75 6e 73 65 6c 2d 64 65 6c 65 74 65 2d 70 72 6f 63 65 73 73 29 0a 0c 0a 3b 3b 3b 20	#'counsel-delete-process)...;;;.
22a60	4f 72 67 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 74 61 67 27 0a 0a 28 64 65 66	Org.;;;;.`counsel-org-tag'..(def
22a80	76 61 72 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 74 61 67 73 20 6e 69 6c 0a 20 20 22 53 74 6f 72	var.counsel-org-tags.nil..."Stor
22aa0	65 20 74 68 65 20 63 75 72 72 65 6e 74 20 6c 69 73 74 20 6f 66 20 74 61 67 73 2e 22 29 0a 0a 28	e.the.current.list.of.tags.")..(
22ac0	64 65 66 76 61 72 20 6f 72 67 2d 6f 75 74 6c 69 6e 65 2d 72 65 67 65 78 70 29 0a 28 64 65 66 76	defvar.org-outline-regexp).(defv
22ae0	61 72 20 6f 72 67 2d 69 6e 64 65 6e 74 2d 6d 6f 64 65 29 0a 28 64 65 66 76 61 72 20 6f 72 67 2d	ar.org-indent-mode).(defvar.org-
22b00	69 6e 64 65 6e 74 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 70 65 72 2d 6c 65 76 65 6c 29 0a 28 64	indent-indentation-per-level).(d
22b20	65 66 76 61 72 20 6f 72 67 2d 74 61 67 73 2d 63 6f 6c 75 6d 6e 29 0a 28 64 65 63 6c 61 72 65 2d	efvar.org-tags-column).(declare-
22b40	66 75 6e 63 74 69 6f 6e 20 6f 72 67 2d 67 65 74 2d 74 61 67 73 20 22 6f 72 67 22 29 0a 28 64 65	function.org-get-tags."org").(de
22b60	63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 6f 72 67 2d 6d 6f 76 65 2d 74 6f 2d 63 6f 6c 75 6d	clare-function.org-move-to-colum
22b80	6e 20 22 6f 72 67 2d 63 6f 6d 70 61 74 22 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d	n."org-compat")..(defun.counsel-
22ba0	2d 6f 72 67 2d 6d 61 6b 65 2d 74 61 67 2d 73 74 72 69 6e 67 20 28 29 0a 20 20 28 69 66 20 28 66	-org-make-tag-string.()...(if.(f
22bc0	62 6f 75 6e 64 70 20 27 6f 72 67 2d 6d 61 6b 65 2d 74 61 67 2d 73 74 72 69 6e 67 29 0a 20 20 20	boundp.'org-make-tag-string)....
22be0	20 20 20 3b 3b 20 3e 3d 20 4f 72 67 20 39 2e 32 0a 20 20 20 20 20 20 28 6f 72 67 2d 6d 61 6b 65	...;;.>=.Org.9.2.......(org-make
22c00	2d 74 61 67 2d 73 74 72 69 6e 67 20 28 63 6f 75 6e 73 65 6c 2d 2d 6f 72 67 2d 67 65 74 2d 74 61	-tag-string.(counsel--org-get-ta
22c20	67 73 29 29 0a 20 20 20 20 28 77 69 74 68 2d 6e 6f 2d 77 61 72 6e 69 6e 67 73 0a 20 20 20 20 20	gs)).....(with-no-warnings......
22c40	20 28 6f 72 67 2d 67 65 74 2d 74 61 67 73 2d 73 74 72 69 6e 67 29 29 29 29 0a 0a 28 64 65 66 75	.(org-get-tags-string))))..(defu
22c60	6e 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 63 68 61 6e 67 65 2d 74 61 67 73 20 28 74 61 67 73 29	n.counsel-org-change-tags.(tags)
22c80	0a 20 20 22 43 68 61 6e 67 65 20 74 61 67 73 20 6f 66 20 63 75 72 72 65 6e 74 20 6f 72 67 20 68	..."Change.tags.of.current.org.h
22ca0	65 61 64 6c 69 6e 65 20 74 6f 20 54 41 47 53 2e 22 0a 20 20 28 6c 65 74 20 28 28 63 75 72 72 65	eadline.to.TAGS."...(let.((curre
22cc0	6e 74 20 28 63 6f 75 6e 73 65 6c 2d 2d 6f 72 67 2d 6d 61 6b 65 2d 74 61 67 2d 73 74 72 69 6e 67	nt.(counsel--org-make-tag-string
22ce0	29 29 0a 20 20 20 20 20 20 20 20 28 63 6f 6c 20 28 63 75 72 72 65 6e 74 2d 63 6f 6c 75 6d 6e 29	)).........(col.(current-column)
22d00	29 0a 20 20 20 20 20 20 20 20 6c 65 76 65 6c 29 0a 20 20 20 20 3b 3b 20 49 6e 73 65 72 74 20 6e	).........level).....;;.Insert.n
22d20	65 77 20 74 61 67 73 20 61 74 20 74 68 65 20 63 6f 72 72 65 63 74 20 63 6f 6c 75 6d 6e 0a 20 20	ew.tags.at.the.correct.column...
22d40	20 20 28 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 20 31 29 0a 20 20 20 20 28 73 65 74	..(beginning-of-line.1).....(set
22d60	71 20 6c 65 76 65 6c 20 28 6f 72 20 28 61 6e 64 20 28 6c 6f 6f 6b 69 6e 67 2d 61 74 20 6f 72 67	q.level.(or.(and.(looking-at.org
22d80	2d 6f 75 74 6c 69 6e 65 2d 72 65 67 65 78 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	-outline-regexp)................
22da0	20 20 20 20 20 20 20 20 20 20 28 2d 20 28 6d 61 74 63 68 2d 65 6e 64 20 30 29 20 28 70 6f 69 6e	..........(-.(match-end.0).(poin
22dc0	74 29 20 31 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 29 29 0a 20	t).1)).....................1))..
22de0	20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 20 28 28 61 6e 64 20 28 65 71 75 61 6c 20 63 75 72 72	...(cond.......((and.(equal.curr
22e00	65 6e 74 20 22 22 29 20 28 65 71 75 61 6c 20 74 61 67 73 20 22 22 29 29 29 0a 20 20 20 20 20 20	ent."").(equal.tags.""))).......
22e20	28 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 0a 20 20 20 20 20 20 20 20 28 63 6f 6e	((re-search-forward.........(con
22e40	63 61 74 20 22 5c 5c 28 5b 20 5c 74 5d 2a 22 20 28 72 65 67 65 78 70 2d 71 75 6f 74 65 20 63 75	cat."\\([.\t]*".(regexp-quote.cu
22e60	72 72 65 6e 74 29 20 22 5c 5c 29 5b 20 5c 74 5d 2a 24 22 29 0a 20 20 20 20 20 20 20 20 28 6c 69	rrent)."\\)[.\t]*$").........(li
22e80	6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 29 20 74 29 0a 20 20 20 20 20 20 20 28 69 66 20 28	ne-end-position).t)........(if.(
22ea0	65 71 75 61 6c 20 74 61 67 73 20 22 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 64 65 6c 65 74	equal.tags."")............(delet
22ec0	65 2d 72 65 67 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 74 63 68 2d 62 65 67 69	e-region.............(match-begi
22ee0	6e 6e 69 6e 67 20 30 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 74 63 68 2d 65 6e 64 20	nning.0).............(match-end.
22f00	30 29 29 0a 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 6d 61 74 63 68 2d 62	0))..........(goto-char.(match-b
22f20	65 67 69 6e 6e 69 6e 67 20 30 29 29 0a 20 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 63 30	eginning.0))..........(let*.((c0
22f40	20 28 63 75 72 72 65 6e 74 2d 63 6f 6c 75 6d 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	.(current-column))..............
22f60	20 20 20 3b 3b 20 63 6f 6d 70 75 74 65 20 6f 66 66 73 65 74 20 66 6f 72 20 74 68 65 20 63 61 73	...;;.compute.offset.for.the.cas
22f80	65 20 6f 66 20 6f 72 67 2d 69 6e 64 65 6e 74 2d 6d 6f 64 65 20 61 63 74 69 76 65 0a 20 20 20 20	e.of.org-indent-mode.active.....
22fa0	20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 20 28 69 66 20 28 62 6f 75 6e 64 2d 61 6e 64 2d 74	............(di.(if.(bound-and-t
22fc0	72 75 65 2d 70 20 6f 72 67 2d 69 6e 64 65 6e 74 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20	rue-p.org-indent-mode)..........
22fe0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2a 20 28 31 2d 20 6f 72 67 2d 69 6e 64 65 6e 74	...............(*.(1-.org-indent
23000	2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 70 65 72 2d 6c 65 76 65 6c 29 20 28 31 2d 20 6c 65 76 65	-indentation-per-level).(1-.leve
23020	6c 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 30 29 29 0a 20 20	l)).......................0))...
23040	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 30 20 28 69 66 20 28 65 71 75 61 6c 20 28 63 68	..............(p0.(if.(equal.(ch
23060	61 72 2d 62 65 66 6f 72 65 29 20 3f 2a 29 20 28 31 2b 20 28 70 6f 69 6e 74 29 29 20 28 70 6f 69	ar-before).?*).(1+.(point)).(poi
23080	6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 63 20 28 2b 20 6f 72 67	nt))).................(tc.(+.org
230a0	2d 74 61 67 73 2d 63 6f 6c 75 6d 6e 20 28 69 66 20 28 3e 20 6f 72 67 2d 74 61 67 73 2d 63 6f 6c	-tags-column.(if.(>.org-tags-col
230c0	75 6d 6e 20 30 29 20 28 2d 20 64 69 29 20 64 69 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	umn.0).(-.di).di))).............
230e0	20 20 20 20 28 63 31 20 28 6d 61 78 20 28 31 2b 20 63 30 29 20 28 69 66 20 28 3e 20 74 63 20 30	....(c1.(max.(1+.c0).(if.(>.tc.0
23100	29 20 74 63 20 28 2d 20 28 2d 20 74 63 29 20 28 73 74 72 69 6e 67 2d 77 69 64 74 68 20 74 61 67	).tc.(-.(-.tc).(string-width.tag
23120	73 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 70 6c 20 28 63 6f 6e	s))))).................(rpl.(con
23140	63 61 74 20 28 6d 61 6b 65 2d 73 74 72 69 6e 67 20 28 6d 61 78 20 30 20 28 2d 20 63 31 20 63 30	cat.(make-string.(max.0.(-.c1.c0
23160	29 29 20 3f 5c 20 29 20 74 61 67 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 72 65 70 6c	)).?\.).tags)))............(repl
23180	61 63 65 2d 6d 61 74 63 68 20 72 70 6c 20 74 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 61	ace-match.rpl.t.t)............(a
231a0	6e 64 20 63 30 20 69 6e 64 65 6e 74 2d 74 61 62 73 2d 6d 6f 64 65 20 28 74 61 62 69 66 79 20 70	nd.c0.indent-tabs-mode.(tabify.p
231c0	30 20 28 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 74 61 67 73 29 29 29 0a 20	0.(point)))............tags)))..
231e0	20 20 20 20 20 28 74 20 28 65 72 72 6f 72 20 22 54 61 67 73 20 61 6c 69 67 6e 6d 65 6e 74 20 66	.....(t.(error."Tags.alignment.f
23200	61 69 6c 65 64 22 29 29 29 0a 20 20 20 20 28 6f 72 67 2d 6d 6f 76 65 2d 74 6f 2d 63 6f 6c 75 6d	ailed"))).....(org-move-to-colum
23220	6e 20 63 6f 6c 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 2d 73 65	n.col)))..(defun.counsel-org--se
23240	74 2d 74 61 67 73 20 28 29 0a 20 20 22 53 65 74 20 74 61 67 73 20 6f 66 20 63 75 72 72 65 6e 74	t-tags.()..."Set.tags.of.current
23260	20 6f 72 67 20 68 65 61 64 6c 69 6e 65 20 74 6f 20 60 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 74 61	.org.headline.to.`counsel-org-ta
23280	67 73 27 2e 22 0a 20 20 28 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 63 68 61 6e 67 65 2d 74 61 67 73	gs'."...(counsel-org-change-tags
232a0	0a 20 20 20 28 69 66 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 74 61 67 73 0a 20 20 20 20 20 20 20	....(if.counsel-org-tags........
232c0	28 66 6f 72 6d 61 74 20 22 3a 25 73 3a 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d	(format.":%s:"................(m
232e0	61 70 63 6f 6e 63 61 74 20 23 27 69 64 65 6e 74 69 74 79 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d	apconcat.#'identity.counsel-org-
23300	74 61 67 73 20 22 3a 22 29 29 0a 20 20 20 20 20 22 22 29 29 29 0a 0a 28 64 65 66 76 61 72 20 6f	tags.":"))......"")))..(defvar.o
23320	72 67 2d 61 67 65 6e 64 61 2d 62 75 6c 6b 2d 6d 61 72 6b 65 64 2d 65 6e 74 72 69 65 73 29 0a 0a	rg-agenda-bulk-marked-entries)..
23340	3b 3b 20 4d 6f 76 65 64 20 66 72 6f 6d 20 60 6f 72 67 27 20 74 6f 20 60 6f 72 67 2d 6d 61 63 73	;;.Moved.from.`org'.to.`org-macs
23360	27 20 69 6e 20 45 6d 61 63 73 20 32 37 2e 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e	'.in.Emacs.27..(declare-function
23380	20 6f 72 67 2d 67 65 74 2d 61 74 2d 62 6f 6c 20 22 6f 72 67 2d 6d 61 63 73 22 29 0a 28 64 65 63	.org-get-at-bol."org-macs").(dec
233a0	6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 6f 72 67 2d 74 72 69 6d 20 22 6f 72 67 2d 6d 61 63 73	lare-function.org-trim."org-macs
233c0	22 29 0a 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 6f 72 67 2d 61 67 65 6e 64 61	")..(declare-function.org-agenda
233e0	2d 65 72 72 6f 72 20 22 6f 72 67 2d 61 67 65 6e 64 61 22 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75	-error."org-agenda")..(defun.cou
23400	6e 73 65 6c 2d 6f 72 67 2d 74 61 67 2d 61 63 74 69 6f 6e 20 28 78 29 0a 20 20 22 41 64 64 20 74	nsel-org-tag-action.(x)..."Add.t
23420	61 67 20 58 20 74 6f 20 60 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 74 61 67 73 27 2e 0a 49 66 20 58	ag.X.to.`counsel-org-tags'..If.X
23440	20 69 73 20 61 6c 72 65 61 64 79 20 70 61 72 74 20 6f 66 20 74 68 65 20 6c 69 73 74 2c 20 72 65	.is.already.part.of.the.list,.re
23460	6d 6f 76 65 20 69 74 20 69 6e 73 74 65 61 64 2e 20 20 51 75 69 74 20 74 68 65 20 73 65 6c 65 63	move.it.instead...Quit.the.selec
23480	74 69 6f 6e 20 69 66 0a 58 20 69 73 20 73 65 6c 65 63 74 65 64 20 62 79 20 65 69 74 68 65 72 20	tion.if.X.is.selected.by.either.
234a0	60 69 76 79 2d 64 6f 6e 65 27 2c 20 60 69 76 79 2d 61 6c 74 2d 64 6f 6e 65 27 20 6f 72 20 60 69	`ivy-done',.`ivy-alt-done'.or.`i
234c0	76 79 2d 69 6d 6d 65 64 69 61 74 65 2d 64 6f 6e 65 27 2c 0a 6f 74 68 65 72 77 69 73 65 20 63 6f	vy-immediate-done',.otherwise.co
234e0	6e 74 69 6e 75 65 20 70 72 6f 6d 70 74 69 6e 67 20 66 6f 72 20 74 61 67 73 2e 22 0a 20 20 28 69	ntinue.prompting.for.tags."...(i
23500	66 20 28 6d 65 6d 62 65 72 20 78 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 74 61 67 73 29 0a 20 20	f.(member.x.counsel-org-tags)...
23520	20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 6f 75 6e 73 65 6c	....(progn.........(setq.counsel
23540	2d 6f 72 67 2d 74 61 67 73 20 28 64 65 6c 65 74 65 20 78 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d	-org-tags.(delete.x.counsel-org-
23560	74 61 67 73 29 29 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 28 65 71 75 61 6c 20 78 20 22 22 29	tags))).....(unless.(equal.x."")
23580	0a 20 20 20 20 20 20 28 73 65 74 71 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 74 61 67 73 20 28 61	.......(setq.counsel-org-tags.(a
235a0	70 70 65 6e 64 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 74 61 67 73 20 28 6c 69 73 74 20 78 29 29	ppend.counsel-org-tags.(list.x))
235c0	29 0a 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 6d 65 6d 62 65 72 20 78 20 69 76 79 2d 2d 61	).......(unless.(member.x.ivy--a
235e0	6c 6c 2d 63 61 6e 64 69 64 61 74 65 73 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 69 76 79	ll-candidates).........(setq.ivy
23600	2d 2d 61 6c 6c 2d 63 61 6e 64 69 64 61 74 65 73 20 28 61 70 70 65 6e 64 20 69 76 79 2d 2d 61 6c	--all-candidates.(append.ivy--al
23620	6c 2d 63 61 6e 64 69 64 61 74 65 73 20 28 6c 69 73 74 20 78 29 29 29 29 29 29 0a 20 20 28 6c 65	l-candidates.(list.x))))))...(le
23640	74 20 28 28 70 72 6f 6d 70 74 20 28 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 74 61 67 2d 70 72 6f 6d	t.((prompt.(counsel-org-tag-prom
23660	70 74 29 29 29 0a 20 20 20 20 28 73 65 74 66 20 28 69 76 79 2d 73 74 61 74 65 2d 70 72 6f 6d 70	pt))).....(setf.(ivy-state-promp
23680	74 20 69 76 79 2d 6c 61 73 74 29 20 70 72 6f 6d 70 74 29 0a 20 20 20 20 28 73 65 74 71 20 69 76	t.ivy-last).prompt).....(setq.iv
236a0	79 2d 2d 70 72 6f 6d 70 74 20 28 63 6f 6e 63 61 74 20 22 25 2d 34 64 20 22 20 70 72 6f 6d 70 74	y--prompt.(concat."%-4d.".prompt
236c0	29 29 29 0a 20 20 28 63 6f 6e 64 20 28 28 6d 65 6d 71 20 74 68 69 73 2d 63 6f 6d 6d 61 6e 64 20	)))...(cond.((memq.this-command.
236e0	27 28 69 76 79 2d 64 6f 6e 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	'(ivy-done......................
23700	20 20 20 20 20 20 20 20 20 69 76 79 2d 61 6c 74 2d 64 6f 6e 65 0a 20 20 20 20 20 20 20 20 20 20	.........ivy-alt-done...........
23720	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 76 79 2d 69 6d 6d 65 64 69 61 74	....................ivy-immediat
23740	65 2d 64 6f 6e 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 69 66 20 28 65 71 20 6d 61 6a 6f 72 2d	e-done))..........(if.(eq.major-
23760	6d 6f 64 65 20 27 6f 72 67 2d 61 67 65 6e 64 61 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20	mode.'org-agenda-mode)..........
23780	20 20 20 20 28 69 66 20 28 6e 75 6c 6c 20 6f 72 67 2d 61 67 65 6e 64 61 2d 62 75 6c 6b 2d 6d 61	....(if.(null.org-agenda-bulk-ma
237a0	72 6b 65 64 2d 65 6e 74 72 69 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	rked-entries)..................(
237c0	6c 65 74 20 28 28 68 64 6d 61 72 6b 65 72 20 28 6f 72 20 28 6f 72 67 2d 67 65 74 2d 61 74 2d 62	let.((hdmarker.(or.(org-get-at-b
237e0	6f 6c 20 27 6f 72 67 2d 68 64 2d 6d 61 72 6b 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	ol.'org-hd-marker)..............
23800	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 67 2d 61 67 65	........................(org-age
23820	6e 64 61 2d 65 72 72 6f 72 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	nda-error))))...................
23840	20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 28 6d 61 72 6b 65 72 2d 62 75	.(with-current-buffer.(marker-bu
23860	66 66 65 72 20 68 64 6d 61 72 6b 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ffer.hdmarker)..................
23880	20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 68 64 6d 61 72 6b 65 72 29 0a 20 20 20 20 20 20 20	....(goto-char.hdmarker)........
238a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 2d 73 65 74 2d	..............(counsel-org--set-
238c0	74 61 67 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 61 64	tags)))................(let.((ad
238e0	64 2d 74 61 67 73 20 28 63 6f 70 79 2d 73 65 71 75 65 6e 63 65 20 63 6f 75 6e 73 65 6c 2d 6f 72	d-tags.(copy-sequence.counsel-or
23900	67 2d 74 61 67 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 6f 6c 69	g-tags)))..................(doli
23920	73 74 20 28 6d 20 6f 72 67 2d 61 67 65 6e 64 61 2d 62 75 6c 6b 2d 6d 61 72 6b 65 64 2d 65 6e 74	st.(m.org-agenda-bulk-marked-ent
23940	72 69 65 73 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 68 2d 63	ries)....................(with-c
23960	75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 28 6d 61 72 6b 65 72 2d 62 75 66 66 65 72 20 6d 29 0a	urrent-buffer.(marker-buffer.m).
23980	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 75 72	.....................(save-excur
239a0	73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74	sion........................(got
239c0	6f 2d 63 68 61 72 20 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	o-char.m).......................
239e0	20 28 73 65 74 71 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 74 61 67 73 0a 20 20 20 20 20 20 20 20	.(setq.counsel-org-tags.........
23a00	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 64 75 70	.....................(delete-dup
23a20	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...............................
23a40	28 61 70 70 65 6e 64 20 28 63 6f 75 6e 73 65 6c 2d 2d 6f 72 67 2d 67 65 74 2d 74 61 67 73 29 20	(append.(counsel--org-get-tags).
23a60	61 64 64 2d 74 61 67 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	add-tags))).....................
23a80	20 20 20 28 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 2d 73 65 74 2d 74 61 67 73 29 29 29 29 29 29 0a	...(counsel-org--set-tags)))))).
23aa0	20 20 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 2d 73 65 74 2d 74 61 67	...........(counsel-org--set-tag
23ac0	73 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 6d 65 6d 62 65 72 20 78 20	s)............(unless.(member.x.
23ae0	63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 74 61 67 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28	counsel-org-tags)..............(
23b00	6d 65 73 73 61 67 65 20 22 54 61 67 20 25 53 20 68 61 73 20 62 65 65 6e 20 72 65 6d 6f 76 65 64	message."Tag.%S.has.been.removed
23b20	2e 22 20 78 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 28 65 71 20 74 68 69 73 2d 63 6f 6d 6d 61	.".x)))).........((eq.this-comma
23b40	6e 64 20 27 69 76 79 2d 63 61 6c 6c 29 0a 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 73 65 6c	nd.'ivy-call)..........(with-sel
23b60	65 63 74 65 64 2d 77 69 6e 64 6f 77 20 28 61 63 74 69 76 65 2d 6d 69 6e 69 62 75 66 66 65 72 2d	ected-window.(active-minibuffer-
23b80	77 69 6e 64 6f 77 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 6d 69 6e 69 62	window)............(delete-minib
23ba0	75 66 66 65 72 2d 63 6f 6e 74 65 6e 74 73 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e	uffer-contents)))))..(defun.coun
23bc0	73 65 6c 2d 6f 72 67 2d 74 61 67 2d 70 72 6f 6d 70 74 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20	sel-org-tag-prompt.()..."Return.
23be0	70 72 6f 6d 70 74 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 74 61 67 27 2e 22 0a 20	prompt.for.`counsel-org-tag'."..
23c00	20 28 66 6f 72 6d 61 74 20 22 54 61 67 73 20 28 25 73 29 3a 20 22 0a 20 20 20 20 20 20 20 20 20	.(format."Tags.(%s):."..........
23c20	20 28 6d 61 70 63 6f 6e 63 61 74 20 23 27 69 64 65 6e 74 69 74 79 20 63 6f 75 6e 73 65 6c 2d 6f	.(mapconcat.#'identity.counsel-o
23c40	72 67 2d 74 61 67 73 20 22 2c 20 22 29 29 29 0a 0a 28 64 65 66 76 61 72 20 6f 72 67 2d 73 65 74	rg-tags.",.")))..(defvar.org-set
23c60	74 69 6e 67 2d 74 61 67 73 29 0a 28 64 65 66 76 61 72 20 6f 72 67 2d 6c 61 73 74 2d 74 61 67 73	ting-tags).(defvar.org-last-tags
23c80	2d 63 6f 6d 70 6c 65 74 69 6f 6e 2d 74 61 62 6c 65 29 0a 28 64 65 66 76 61 72 20 6f 72 67 2d 74	-completion-table).(defvar.org-t
23ca0	61 67 2d 70 65 72 73 69 73 74 65 6e 74 2d 61 6c 69 73 74 29 0a 28 64 65 66 76 61 72 20 6f 72 67	ag-persistent-alist).(defvar.org
23cc0	2d 74 61 67 2d 61 6c 69 73 74 29 0a 28 64 65 66 76 61 72 20 6f 72 67 2d 63 6f 6d 70 6c 65 74 65	-tag-alist).(defvar.org-complete
23ce0	2d 74 61 67 73 2d 61 6c 77 61 79 73 2d 6f 66 66 65 72 2d 61 6c 6c 2d 61 67 65 6e 64 61 2d 74 61	-tags-always-offer-all-agenda-ta
23d00	67 73 29 0a 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 6f 72 67 2d 61 74 2d 68 65	gs)..(declare-function.org-at-he
23d20	61 64 69 6e 67 2d 70 20 22 6f 72 67 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e	ading-p."org").(declare-function
23d40	20 6f 72 67 2d 62 61 63 6b 2d 74 6f 2d 68 65 61 64 69 6e 67 20 22 6f 72 67 22 29 0a 28 64 65 63	.org-back-to-heading."org").(dec
23d60	6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 6f 72 67 2d 67 65 74 2d 62 75 66 66 65 72 2d 74 61 67	lare-function.org-get-buffer-tag
23d80	73 20 22 6f 72 67 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 6f 72 67 2d 67	s."org").(declare-function.org-g
23da0	6c 6f 62 61 6c 2d 74 61 67 73 2d 63 6f 6d 70 6c 65 74 69 6f 6e 2d 74 61 62 6c 65 20 22 6f 72 67	lobal-tags-completion-table."org
23dc0	22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 6f 72 67 2d 61 67 65 6e 64 61 2d	").(declare-function.org-agenda-
23de0	66 69 6c 65 73 20 22 6f 72 67 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 6f	files."org").(declare-function.o
23e00	72 67 2d 61 67 65 6e 64 61 2d 73 65 74 2d 74 61 67 73 20 22 6f 72 67 2d 61 67 65 6e 64 61 22 29	rg-agenda-set-tags."org-agenda")
23e20	0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 6f 72 67 2d 74 61 67 73 2d 63 6f 6d 70	.(declare-function.org-tags-comp
23e40	6c 65 74 69 6f 6e 2d 66 75 6e 63 74 69 6f 6e 20 22 6f 72 67 22 29 0a 0a 3b 3b 3b 23 23 23 61 75	letion-function."org")..;;;###au
23e60	74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 6f 72 67 2d 67 65 74 2d 74	toload.(defun.counsel--org-get-t
23e80	61 67 73 20 28 29 0a 20 20 28 64 65 6c 65 74 65 20 22 22 20 28 63 6f 6e 64 69 74 69 6f 6e 2d 63	ags.()...(delete."".(condition-c
23ea0	61 73 65 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 67 2d 67 65	ase.nil..................(org-ge
23ec0	74 2d 74 61 67 73 20 6e 69 6c 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 72	t-tags.nil.t)................(er
23ee0	72 6f 72 20 28 6f 72 67 2d 67 65 74 2d 74 61 67 73 29 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75	ror.(org-get-tags)))))..;;;###au
23f00	74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 74 61 67 20 28 29	toload.(defun.counsel-org-tag.()
23f20	0a 20 20 22 41 64 64 20 6f 72 20 72 65 6d 6f 76 65 20 74 61 67 73 20 69 6e 20 60 6f 72 67 2d 6d	..."Add.or.remove.tags.in.`org-m
23f40	6f 64 65 27 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 73 61 76 65 2d 65	ode'."...(interactive)...(save-e
23f60	78 63 75 72 73 69 6f 6e 0a 20 20 20 20 28 69 66 20 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20	xcursion.....(if.(eq.major-mode.
23f80	27 6f 72 67 2d 61 67 65 6e 64 61 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 28 69 66 20 6f 72	'org-agenda-mode).........(if.or
23fa0	67 2d 61 67 65 6e 64 61 2d 62 75 6c 6b 2d 6d 61 72 6b 65 64 2d 65 6e 74 72 69 65 73 0a 20 20 20	g-agenda-bulk-marked-entries....
23fc0	20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 74 61 67 73 20	.........(setq.counsel-org-tags.
23fe0	6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 68 64 6d 61 72 6b 65 72 20 28	nil)...........(let.((hdmarker.(
24000	6f 72 20 28 6f 72 67 2d 67 65 74 2d 61 74 2d 62 6f 6c 20 27 6f 72 67 2d 68 64 2d 6d 61 72 6b 65	or.(org-get-at-bol.'org-hd-marke
24020	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 20 20	r)..............................
24040	20 28 6f 72 67 2d 61 67 65 6e 64 61 2d 65 72 72 6f 72 29 29 29 29 0a 20 20 20 20 20 20 20 20 20	.(org-agenda-error))))..........
24060	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 6d 61 72 6b 65 72 2d	...(with-current-buffer.(marker-
24080	62 75 66 66 65 72 20 68 64 6d 61 72 6b 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	buffer.hdmarker)...............(
240a0	67 6f 74 6f 2d 63 68 61 72 20 68 64 6d 61 72 6b 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	goto-char.hdmarker).............
240c0	20 20 28 73 65 74 71 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 74 61 67 73 20 28 63 6f 75 6e 73 65	..(setq.counsel-org-tags.(counse
240e0	6c 2d 2d 6f 72 67 2d 67 65 74 2d 74 61 67 73 29 29 29 29 29 0a 20 20 20 20 20 20 28 75 6e 6c 65	l--org-get-tags))))).......(unle
24100	73 73 20 28 6f 72 67 2d 61 74 2d 68 65 61 64 69 6e 67 2d 70 29 0a 20 20 20 20 20 20 20 20 28 6f	ss.(org-at-heading-p).........(o
24120	72 67 2d 62 61 63 6b 2d 74 6f 2d 68 65 61 64 69 6e 67 20 74 29 29 0a 20 20 20 20 20 20 28 73 65	rg-back-to-heading.t)).......(se
24140	74 71 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 74 61 67 73 20 28 63 6f 75 6e 73 65 6c 2d 2d 6f 72	tq.counsel-org-tags.(counsel--or
24160	67 2d 67 65 74 2d 74 61 67 73 29 29 29 0a 20 20 20 20 28 6c 65 74 20 28 28 6f 72 67 2d 6c 61 73	g-get-tags))).....(let.((org-las
24180	74 2d 74 61 67 73 2d 63 6f 6d 70 6c 65 74 69 6f 6e 2d 74 61 62 6c 65 0a 20 20 20 20 20 20 20 20	t-tags-completion-table.........
241a0	20 20 20 28 61 70 70 65 6e 64 20 28 61 6e 64 20 28 6f 72 20 6f 72 67 2d 63 6f 6d 70 6c 65 74 65	...(append.(and.(or.org-complete
241c0	2d 74 61 67 73 2d 61 6c 77 61 79 73 2d 6f 66 66 65 72 2d 61 6c 6c 2d 61 67 65 6e 64 61 2d 74 61	-tags-always-offer-all-agenda-ta
241e0	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 20 20 20 20 20 20 28	gs.............................(
24200	65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 6f 72 67 2d 61 67 65 6e 64 61 2d 6d 6f 64 65 29 29	eq.major-mode.'org-agenda-mode))
24220	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 6f 72 67 2d 67 6c	.........................(org-gl
24240	6f 62 61 6c 2d 74 61 67 73 2d 63 6f 6d 70 6c 65 74 69 6f 6e 2d 74 61 62 6c 65 0a 20 20 20 20 20	obal-tags-completion-table......
24260	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 67 2d 61 67 65 6e 64 61 2d	....................(org-agenda-
24280	66 69 6c 65 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c	files)))....................(unl
242a0	65 73 73 20 28 62 6f 75 6e 64 70 20 27 6f 72 67 2d 63 75 72 72 65 6e 74 2d 74 61 67 2d 61 6c 69	ess.(boundp.'org-current-tag-ali
242c0	73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6f 72 67 2d 74 61 67	st)......................org-tag
242e0	2d 70 65 72 73 69 73 74 65 6e 74 2d 61 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	-persistent-alist)..............
24300	20 20 20 20 20 20 28 6f 72 20 28 69 66 20 28 62 6f 75 6e 64 70 20 27 6f 72 67 2d 63 75 72 72 65	......(or.(if.(boundp.'org-curre
24320	6e 74 2d 74 61 67 2d 61 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	nt-tag-alist)...................
24340	20 20 20 20 20 20 20 20 20 6f 72 67 2d 63 75 72 72 65 6e 74 2d 74 61 67 2d 61 6c 69 73 74 0a 20	.........org-current-tag-alist..
24360	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6f 72 67 2d 74 61 67 2d	........................org-tag-
24380	61 6c 69 73 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 28 6f	alist)........................(o
243a0	72 67 2d 67 65 74 2d 62 75 66 66 65 72 2d 74 61 67 73 29 29 29 29 29 0a 20 20 20 20 20 20 28 69	rg-get-buffer-tags))))).......(i
243c0	76 79 2d 72 65 61 64 20 28 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 74 61 67 2d 70 72 6f 6d 70 74 29	vy-read.(counsel-org-tag-prompt)
243e0	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 73 74 72 20 5f 70	.................(lambda.(str._p
24400	72 65 64 20 5f 61 63 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	red._action)...................(
24420	64 65 6c 65 74 65 2d 64 75 70 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	delete-dups....................(
24440	61 6c 6c 2d 63 6f 6d 70 6c 65 74 69 6f 6e 73 20 73 74 72 20 23 27 6f 72 67 2d 74 61 67 73 2d 63	all-completions.str.#'org-tags-c
24460	6f 6d 70 6c 65 74 69 6f 6e 2d 66 75 6e 63 74 69 6f 6e 29 29 29 0a 20 20 20 20 20 20 20 20 20 20	ompletion-function)))...........
24480	20 20 20 20 20 20 3a 68 69 73 74 6f 72 79 20 27 6f 72 67 2d 74 61 67 73 2d 68 69 73 74 6f 72 79	......:history.'org-tags-history
244a0	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 23 27 63 6f 75 6e 73	.................:action.#'couns
244c0	65 6c 2d 6f 72 67 2d 74 61 67 2d 61 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	el-org-tag-action...............
244e0	20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 74 61 67 29 29 29 29 0a 0a	..:caller.'counsel-org-tag))))..
24500	28 64 65 66 76 61 72 20 6f 72 67 2d 76 65 72 73 69 6f 6e 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f	(defvar.org-version)..;;;###auto
24520	6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 74 61 67 2d 61 67 65 6e	load.(defun.counsel-org-tag-agen
24540	64 61 20 28 29 0a 20 20 22 53 65 74 20 74 61 67 73 20 66 6f 72 20 74 68 65 20 63 75 72 72 65 6e	da.()..."Set.tags.for.the.curren
24560	74 20 61 67 65 6e 64 61 20 69 74 65 6d 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a	t.agenda.item."...(interactive).
24580	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 28 69	..(cl-letf.(((symbol-function.(i
245a0	66 20 28 76 65 72 73 69 6f 6e 3c 20 6f 72 67 2d 76 65 72 73 69 6f 6e 20 22 39 2e 32 22 29 0a 20	f.(version<.org-version."9.2")..
245c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
245e0	20 27 6f 72 67 2d 73 65 74 2d 74 61 67 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.'org-set-tags..................
24600	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 6f 72 67 2d 73 65 74 2d 74 61 67 73 2d 63 6f 6d	...............'org-set-tags-com
24620	6d 61 6e 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 63 6f 75 6e 73 65 6c 2d 6f 72	mand))..............#'counsel-or
24640	67 2d 74 61 67 29 29 0a 20 20 20 20 28 6f 72 67 2d 61 67 65 6e 64 61 2d 73 65 74 2d 74 61 67 73	g-tag)).....(org-agenda-set-tags
24660	29 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 68 65 61 64	)))..(defcustom.counsel-org-head
24680	6c 69 6e 65 2d 64 69 73 70 6c 61 79 2d 74 61 67 73 20 6e 69 6c 0a 20 20 22 49 66 20 6e 6f 6e 2d	line-display-tags.nil..."If.non-
246a0	6e 69 6c 2c 20 64 69 73 70 6c 61 79 20 74 61 67 73 20 69 6e 20 6d 61 74 63 68 65 64 20 60 6f 72	nil,.display.tags.in.matched.`or
246c0	67 2d 6d 6f 64 65 27 20 68 65 61 64 6c 69 6e 65 73 2e 22 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f	g-mode'.headlines."...:type.'boo
246e0	6c 65 61 6e 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 68 65	lean)..(defcustom.counsel-org-he
24700	61 64 6c 69 6e 65 2d 64 69 73 70 6c 61 79 2d 74 6f 64 6f 20 6e 69 6c 0a 20 20 22 49 66 20 6e 6f	adline-display-todo.nil..."If.no
24720	6e 2d 6e 69 6c 2c 20 64 69 73 70 6c 61 79 20 74 6f 64 6f 20 6b 65 79 77 6f 72 64 73 20 69 6e 20	n-nil,.display.todo.keywords.in.
24740	6d 61 74 63 68 65 64 20 60 6f 72 67 2d 6d 6f 64 65 27 20 68 65 61 64 6c 69 6e 65 73 2e 22 0a 20	matched.`org-mode'.headlines."..
24760	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 6f 6d 20 63 6f 75	.:type.'boolean)..(defcustom.cou
24780	6e 73 65 6c 2d 6f 72 67 2d 68 65 61 64 6c 69 6e 65 2d 64 69 73 70 6c 61 79 2d 70 72 69 6f 72 69	nsel-org-headline-display-priori
247a0	74 79 20 6e 69 6c 0a 20 20 22 49 66 20 6e 6f 6e 2d 6e 69 6c 2c 20 64 69 73 70 6c 61 79 20 70 72	ty.nil..."If.non-nil,.display.pr
247c0	69 6f 72 69 74 69 65 73 20 69 6e 20 6d 61 74 63 68 65 64 20 60 6f 72 67 2d 6d 6f 64 65 27 20 68	iorities.in.matched.`org-mode'.h
247e0	65 61 64 6c 69 6e 65 73 2e 22 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 29 0a 0a 28 64	eadlines."...:type.'boolean)..(d
24800	65 66 63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 68 65 61 64 6c 69 6e 65 2d 64 69	efcustom.counsel-org-headline-di
24820	73 70 6c 61 79 2d 63 6f 6d 6d 65 6e 74 20 6e 69 6c 0a 20 20 22 49 66 20 6e 6f 6e 2d 6e 69 6c 2c	splay-comment.nil..."If.non-nil,
24840	20 64 69 73 70 6c 61 79 20 43 4f 4d 4d 45 4e 54 20 73 74 72 69 6e 67 20 69 6e 20 6d 61 74 63 68	.display.COMMENT.string.in.match
24860	65 64 20 60 6f 72 67 2d 6d 6f 64 65 27 20 68 65 61 64 6c 69 6e 65 73 2e 22 0a 20 20 3a 74 79 70	ed.`org-mode'.headlines."...:typ
24880	65 20 27 62 6f 6f 6c 65 61 6e 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d	e.'boolean)..(defcustom.counsel-
248a0	6f 72 67 2d 68 65 61 64 6c 69 6e 65 2d 64 69 73 70 6c 61 79 2d 73 74 61 74 69 73 74 69 63 73 20	org-headline-display-statistics.
248c0	6e 69 6c 0a 20 20 22 49 66 20 6e 6f 6e 2d 6e 69 6c 2c 20 64 69 73 70 6c 61 79 20 73 74 61 74 69	nil..."If.non-nil,.display.stati
248e0	73 74 69 63 73 20 63 6f 6f 6b 69 65 20 69 6e 20 6d 61 74 63 68 65 64 20 60 6f 72 67 2d 6d 6f 64	stics.cookie.in.matched.`org-mod
24900	65 27 20 68 65 61 64 6c 69 6e 65 73 2e 22 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 29	e'.headlines."...:type.'boolean)
24920	0a 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 6f 72 67 2d 67 65 74 2d 68 65 61 64	..(declare-function.org-get-head
24940	69 6e 67 20 22 6f 72 67 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 6f 72 67	ing."org").(declare-function.org
24960	2d 67 6f 74 6f 2d 6d 61 72 6b 65 72 2d 6f 72 2d 62 6d 6b 20 22 6f 72 67 22 29 0a 28 64 65 63 6c	-goto-marker-or-bmk."org").(decl
24980	61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 6f 75 74 6c 69 6e 65 2d 6e 65 78 74 2d 68 65 61 64 69 6e	are-function.outline-next-headin
249a0	67 20 22 6f 75 74 6c 69 6e 65 22 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65	g."outline")..;;;###autoload.(de
249c0	66 61 6c 69 61 73 20 27 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 67 6f 74 6f 20 23 27 63 6f 75 6e 73	falias.'counsel-org-goto.#'couns
249e0	65 6c 2d 6f 75 74 6c 69 6e 65 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d	el-outline)..(defcustom.counsel-
24a00	6f 72 67 2d 67 6f 74 6f 2d 61 6c 6c 2d 6f 75 74 6c 69 6e 65 2d 70 61 74 68 2d 70 72 65 66 69 78	org-goto-all-outline-path-prefix
24a20	20 6e 69 6c 0a 20 20 22 50 72 65 66 69 78 20 66 6f 72 20 6f 75 74 6c 69 6e 65 20 63 61 6e 64 69	.nil..."Prefix.for.outline.candi
24a40	64 61 74 65 73 20 69 6e 20 60 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 67 6f 74 6f 2d 61 6c 6c 27 2e	dates.in.`counsel-org-goto-all'.
24a60	22 0a 20 20 3a 74 79 70 65 20 27 28 63 68 6f 69 63 65 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f	"...:type.'(choice...........(co
24a80	6e 73 74 20 3a 74 61 67 20 22 4e 6f 6e 65 22 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 28	nst.:tag."None".nil)...........(
24aa0	63 6f 6e 73 74 20 3a 74 61 67 20 22 46 69 6c 65 20 6e 61 6d 65 22 20 66 69 6c 65 2d 6e 61 6d 65	const.:tag."File.name".file-name
24ac0	29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 46 69 6c 65 20 6e 61	)...........(const.:tag."File.na
24ae0	6d 65 20 28 6e 6f 6e 64 69 72 65 63 74 6f 72 79 20 70 61 72 74 29 22 20 66 69 6c 65 2d 6e 61 6d	me.(nondirectory.part)".file-nam
24b00	65 2d 6e 6f 6e 64 69 72 65 63 74 6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74	e-nondirectory)...........(const
24b20	20 3a 74 61 67 20 22 42 75 66 66 65 72 20 6e 61 6d 65 22 20 62 75 66 66 65 72 2d 6e 61 6d 65 29	.:tag."Buffer.name".buffer-name)
24b40	29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 67 6f 74 6f 2d 61 6c 6c 2d	))..(defun.counsel-org-goto-all-
24b60	2d 6f 75 74 6c 69 6e 65 2d 70 61 74 68 2d 70 72 65 66 69 78 20 28 29 0a 20 20 28 63 6c 2d 63 61	-outline-path-prefix.()...(cl-ca
24b80	73 65 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 67 6f 74 6f 2d 61 6c 6c 2d 6f 75 74 6c 69 6e 65 2d	se.counsel-org-goto-all-outline-
24ba0	70 61 74 68 2d 70 72 65 66 69 78 0a 20 20 20 20 28 66 69 6c 65 2d 6e 61 6d 65 20 62 75 66 66 65	path-prefix.....(file-name.buffe
24bc0	72 2d 66 69 6c 65 2d 6e 61 6d 65 29 0a 20 20 20 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64	r-file-name).....(file-name-nond
24be0	69 72 65 63 74 6f 72 79 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 72 65 63 74 6f 72 79	irectory.(file-name-nondirectory
24c00	20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 29 29 0a 20 20 20 20 28 62 75 66 66 65 72 2d	.buffer-file-name)).....(buffer-
24c20	6e 61 6d 65 20 28 62 75 66 66 65 72 2d 6e 61 6d 65 29 29 29 29 0a 0a 28 64 65 66 76 61 72 20 63	name.(buffer-name))))..(defvar.c
24c40	6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 73 65 74 74 69 6e 67 73 0a 20 20 27 28 28 65 6d 61	ounsel-outline-settings...'((ema
24c60	63 73 2d 6c 69 73 70 2d 6d 6f 64 65 0a 20 20 20 20 20 3a 6f 75 74 6c 69 6e 65 2d 72 65 67 65 78	cs-lisp-mode......:outline-regex
24c80	70 20 22 3b 3b 5b 3b 2a 5d 2b 5b 5c 73 5c 74 5d 2b 22 0a 20 20 20 20 20 3a 6f 75 74 6c 69 6e 65	p.";;[;*]+[\s\t]+"......:outline
24ca0	2d 6c 65 76 65 6c 20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 6c 65 76 65 6c 2d 65 6d 61	-level.counsel-outline-level-ema
24cc0	63 73 2d 6c 69 73 70 29 0a 20 20 20 20 28 6f 72 67 2d 6d 6f 64 65 0a 20 20 20 20 20 3a 6f 75 74	cs-lisp).....(org-mode......:out
24ce0	6c 69 6e 65 2d 74 69 74 6c 65 20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 74 69 74 6c 65	line-title.counsel-outline-title
24d00	2d 6f 72 67 0a 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 67 6f	-org......:action.counsel-org-go
24d20	74 6f 2d 61 63 74 69 6f 6e 0a 20 20 20 20 20 3a 68 69 73 74 6f 72 79 20 63 6f 75 6e 73 65 6c 2d	to-action......:history.counsel-
24d40	6f 72 67 2d 67 6f 74 6f 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 63 6f	org-goto-history......:caller.co
24d60	75 6e 73 65 6c 2d 6f 72 67 2d 67 6f 74 6f 29 0a 20 20 20 20 3b 3b 20 6d 61 72 6b 64 6f 77 6e 2d	unsel-org-goto).....;;.markdown-
24d80	6d 6f 64 65 20 70 61 63 6b 61 67 65 0a 20 20 20 20 28 6d 61 72 6b 64 6f 77 6e 2d 6d 6f 64 65 0a	mode.package.....(markdown-mode.
24da0	20 20 20 20 20 3a 6f 75 74 6c 69 6e 65 2d 74 69 74 6c 65 20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c	.....:outline-title.counsel-outl
24dc0	69 6e 65 2d 74 69 74 6c 65 2d 6d 61 72 6b 64 6f 77 6e 29 0a 20 20 20 20 3b 3b 20 42 75 69 6c 74	ine-title-markdown).....;;.Built
24de0	2d 69 6e 20 6d 6f 64 65 20 6f 72 20 41 55 43 54 65 58 20 70 61 63 6b 61 67 65 0a 20 20 20 20 28	-in.mode.or.AUCTeX.package.....(
24e00	6c 61 74 65 78 2d 6d 6f 64 65 0a 20 20 20 20 20 3a 6f 75 74 6c 69 6e 65 2d 74 69 74 6c 65 20 63	latex-mode......:outline-title.c
24e20	6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 74 69 74 6c 65 2d 6c 61 74 65 78 29 29 0a 20 20 22	ounsel-outline-title-latex))..."
24e40	41 6c 69 73 74 20 6d 61 70 70 69 6e 67 20 6d 61 6a 6f 72 20 6d 6f 64 65 73 20 74 6f 20 74 68 65	Alist.mapping.major.modes.to.the
24e60	69 72 20 60 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 27 20 73 65 74 74 69 6e 67 73 2e 0a 0a	ir.`counsel-outline'.settings...
24e80	45 61 63 68 20 65 6e 74 72 79 20 69 73 20 61 20 70 61 69 72 20 28 4d 41 4a 4f 52 2d 4d 4f 44 45	Each.entry.is.a.pair.(MAJOR-MODE
24ea0	20 2e 20 50 4c 49 53 54 29 2e 20 20 60 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 27 0a 63 68	...PLIST)...`counsel-outline'.ch
24ec0	65 63 6b 73 20 77 68 65 74 68 65 72 20 61 6e 20 65 6e 74 72 79 20 65 78 69 73 74 73 20 66 6f 72	ecks.whether.an.entry.exists.for
24ee0	20 74 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 27 73 0a 4d 41 4a 4f 52 2d 4d 4f 44 45	.the.current.buffer's.MAJOR-MODE
24f00	20 61 6e 64 2c 20 69 66 20 73 6f 2c 20 6c 6f 61 64 73 20 74 68 65 20 73 65 74 74 69 6e 67 73 20	.and,.if.so,.loads.the.settings.
24f20	73 70 65 63 69 66 69 65 64 20 62 79 20 50 4c 49 53 54 0a 69 6e 73 74 65 61 64 20 6f 66 20 74 68	specified.by.PLIST.instead.of.th
24f40	65 20 64 65 66 61 75 6c 74 20 73 65 74 74 69 6e 67 73 2e 20 20 54 68 65 20 66 6f 6c 6c 6f 77 69	e.default.settings...The.followi
24f60	6e 67 20 73 65 74 74 69 6e 67 73 20 61 72 65 0a 72 65 63 6f 67 6e 69 7a 65 64 3a 0a 0a 2d 20 60	ng.settings.are.recognized:..-.`
24f80	3a 6f 75 74 6c 69 6e 65 2d 72 65 67 65 78 70 27 20 69 73 20 61 20 72 65 67 65 78 70 20 74 6f 20	:outline-regexp'.is.a.regexp.to.
24fa0	6d 61 74 63 68 20 74 68 65 20 62 65 67 69 6e 6e 69 6e 67 20 6f 66 20 61 6e 0a 20 20 6f 75 74 6c	match.the.beginning.of.an...outl
24fc0	69 6e 65 20 68 65 61 64 69 6e 67 2e 20 20 49 74 20 69 73 20 6f 6e 6c 79 20 63 68 65 63 6b 65 64	ine.heading...It.is.only.checked
24fe0	20 61 74 20 74 68 65 20 73 74 61 72 74 20 6f 66 20 61 20 6c 69 6e 65 20 61 6e 64 0a 20 20 73 6f	.at.the.start.of.a.line.and...so
25000	20 6e 65 65 64 20 6e 6f 74 20 73 74 61 72 74 20 77 69 74 68 20 5c 22 5e 5c 22 2e 0a 20 20 44 65	.need.not.start.with.\"^\"....De
25020	66 61 75 6c 74 73 20 74 6f 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 74 68 65 20 76 61 72 69 61	faults.to.the.value.of.the.varia
25040	62 6c 65 20 60 6f 75 74 6c 69 6e 65 2d 72 65 67 65 78 70 27 2e 0a 0a 2d 20 60 3a 6f 75 74 6c 69	ble.`outline-regexp'...-.`:outli
25060	6e 65 2d 6c 65 76 65 6c 27 20 69 73 20 61 20 66 75 6e 63 74 69 6f 6e 20 6f 66 20 6e 6f 20 61 72	ne-level'.is.a.function.of.no.ar
25080	67 75 6d 65 6e 74 73 20 77 68 69 63 68 20 63 6f 6d 70 75 74 65 73 0a 20 20 74 68 65 20 6c 65 76	guments.which.computes...the.lev
250a0	65 6c 20 6f 66 20 61 6e 20 6f 75 74 6c 69 6e 65 20 68 65 61 64 69 6e 67 2e 20 20 49 74 20 69 73	el.of.an.outline.heading...It.is
250c0	20 63 61 6c 6c 65 64 20 77 69 74 68 20 70 6f 69 6e 74 20 61 74 0a 20 20 74 68 65 20 62 65 67 69	.called.with.point.at...the.begi
250e0	6e 6e 69 6e 67 20 6f 66 20 60 6f 75 74 6c 69 6e 65 2d 72 65 67 65 78 70 27 20 61 6e 64 20 77 69	nning.of.`outline-regexp'.and.wi
25100	74 68 20 74 68 65 20 6d 61 74 63 68 20 64 61 74 61 0a 20 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e	th.the.match.data...correspondin
25120	67 20 74 6f 20 60 6f 75 74 6c 69 6e 65 2d 72 65 67 65 78 70 27 2e 0a 20 20 44 65 66 61 75 6c 74	g.to.`outline-regexp'....Default
25140	73 20 74 6f 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 74 68 65 20 76 61 72 69 61 62 6c 65 20 60	s.to.the.value.of.the.variable.`
25160	6f 75 74 6c 69 6e 65 2d 6c 65 76 65 6c 27 2e 0a 0a 2d 20 60 3a 6f 75 74 6c 69 6e 65 2d 74 69 74	outline-level'...-.`:outline-tit
25180	6c 65 27 20 69 73 20 61 20 66 75 6e 63 74 69 6f 6e 20 6f 66 20 6e 6f 20 61 72 67 75 6d 65 6e 74	le'.is.a.function.of.no.argument
251a0	73 20 77 68 69 63 68 20 72 65 74 75 72 6e 73 0a 20 20 74 68 65 20 74 69 74 6c 65 20 6f 66 20 61	s.which.returns...the.title.of.a
251c0	6e 20 6f 75 74 6c 69 6e 65 20 68 65 61 64 69 6e 67 2e 20 20 49 74 20 69 73 20 63 61 6c 6c 65 64	n.outline.heading...It.is.called
251e0	20 77 69 74 68 20 70 6f 69 6e 74 20 61 74 0a 20 20 74 68 65 20 65 6e 64 20 6f 66 20 60 6f 75 74	.with.point.at...the.end.of.`out
25200	6c 69 6e 65 2d 72 65 67 65 78 70 27 20 61 6e 64 20 77 69 74 68 20 74 68 65 20 6d 61 74 63 68 20	line-regexp'.and.with.the.match.
25220	64 61 74 61 0a 20 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 74 6f 20 60 6f 75 74 6c 69 6e 65	data...corresponding.to.`outline
25240	2d 72 65 67 65 78 70 27 2e 0a 20 20 44 65 66 61 75 6c 74 73 20 74 6f 20 74 68 65 20 66 75 6e 63	-regexp'....Defaults.to.the.func
25260	74 69 6f 6e 20 60 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 74 69 74 6c 65 27 2e 0a 0a 2d	tion.`counsel-outline-title'...-
25280	20 60 3a 61 63 74 69 6f 6e 27 20 69 73 20 61 20 66 75 6e 63 74 69 6f 6e 20 6f 66 20 6f 6e 65 20	.`:action'.is.a.function.of.one.
252a0	61 72 67 75 6d 65 6e 74 2c 20 74 68 65 20 73 65 6c 65 63 74 65 64 20 6f 75 74 6c 69 6e 65 0a 20	argument,.the.selected.outline..
252c0	20 68 65 61 64 69 6e 67 20 74 6f 20 6a 75 6d 70 20 74 6f 2e 20 20 54 68 69 73 20 73 65 74 74 69	.heading.to.jump.to...This.setti
252e0	6e 67 20 63 6f 72 72 65 73 70 6f 6e 64 73 20 64 69 72 65 63 74 6c 79 20 74 6f 20 69 74 73 0a 20	ng.corresponds.directly.to.its..
25300	20 65 70 6f 6e 79 6d 6f 75 73 20 60 69 76 79 2d 72 65 61 64 27 20 6b 65 79 77 6f 72 64 2c 20 61	.eponymous.`ivy-read'.keyword,.a
25320	73 20 75 73 65 64 20 62 79 20 60 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 27 2c 20 73 6f 0a	s.used.by.`counsel-outline',.so.
25340	20 20 74 68 65 20 74 79 70 65 20 6f 66 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 27 73 20 61 72 67	..the.type.of.the.function's.arg
25360	75 6d 65 6e 74 20 64 65 70 65 6e 64 73 20 6f 6e 20 74 68 65 20 76 61 6c 75 65 0a 20 20 72 65 74	ument.depends.on.the.value...ret
25380	75 72 6e 65 64 20 62 79 20 60 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 63 61 6e 64 69 64	urned.by.`counsel-outline-candid
253a0	61 74 65 73 27 2e 0a 20 20 44 65 66 61 75 6c 74 73 20 74 6f 20 74 68 65 20 66 75 6e 63 74 69 6f	ates'....Defaults.to.the.functio
253c0	6e 20 60 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 61 63 74 69 6f 6e 27 2e 0a 0a 2d 20 60	n.`counsel-outline-action'...-.`
253e0	3a 68 69 73 74 6f 72 79 27 20 69 73 20 61 20 68 69 73 74 6f 72 79 20 6c 69 73 74 2c 20 75 73 75	:history'.is.a.history.list,.usu
25400	61 6c 6c 79 20 61 20 73 79 6d 62 6f 6c 20 72 65 70 72 65 73 65 6e 74 69 6e 67 20 61 0a 20 20 68	ally.a.symbol.representing.a...h
25420	69 73 74 6f 72 79 20 6c 69 73 74 20 76 61 72 69 61 62 6c 65 2e 20 20 49 74 20 63 6f 72 72 65 73	istory.list.variable...It.corres
25440	70 6f 6e 64 73 20 64 69 72 65 63 74 6c 79 20 74 6f 20 69 74 73 0a 20 20 65 70 6f 6e 79 6d 6f 75	ponds.directly.to.its...eponymou
25460	73 20 60 69 76 79 2d 72 65 61 64 27 20 6b 65 79 77 6f 72 64 2c 20 61 73 20 75 73 65 64 20 62 79	s.`ivy-read'.keyword,.as.used.by
25480	20 60 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 27 2e 0a 20 20 44 65 66 61 75 6c 74 73 20 74	.`counsel-outline'....Defaults.t
254a0	6f 20 74 68 65 20 73 79 6d 62 6f 6c 20 60 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 68 69	o.the.symbol.`counsel-outline-hi
254c0	73 74 6f 72 79 27 2e 0a 0a 2d 20 60 3a 63 61 6c 6c 65 72 27 20 69 73 20 61 20 73 79 6d 62 6f 6c	story'...-.`:caller'.is.a.symbol
254e0	20 74 6f 20 75 6e 69 71 75 65 6c 79 20 69 64 65 6e 74 69 66 79 20 74 68 65 20 63 61 6c 6c 65 72	.to.uniquely.identify.the.caller
25500	20 74 6f 0a 20 20 60 69 76 79 2d 72 65 61 64 27 2e 20 20 49 74 20 63 6f 72 72 65 73 70 6f 6e 64	.to...`ivy-read'...It.correspond
25520	73 20 64 69 72 65 63 74 6c 79 20 74 6f 20 69 74 73 20 65 70 6f 6e 79 6d 6f 75 73 0a 20 20 60 69	s.directly.to.its.eponymous...`i
25540	76 79 2d 72 65 61 64 27 20 6b 65 79 77 6f 72 64 2c 20 61 73 20 75 73 65 64 20 62 79 20 60 63 6f	vy-read'.keyword,.as.used.by.`co
25560	75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 27 2e 0a 20 20 44 65 66 61 75 6c 74 73 20 74 6f 20 74 68	unsel-outline'....Defaults.to.th
25580	65 20 73 79 6d 62 6f 6c 20 60 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 27 2e 0a 0a 2d 20 60	e.symbol.`counsel-outline'...-.`
255a0	3a 64 69 73 70 6c 61 79 2d 73 74 79 6c 65 27 20 6f 76 65 72 72 69 64 65 73 20 74 68 65 20 76 61	:display-style'.overrides.the.va
255c0	72 69 61 62 6c 65 0a 20 20 60 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 64 69 73 70 6c 61	riable...`counsel-outline-displa
255e0	79 2d 73 74 79 6c 65 27 2e 0a 0a 2d 20 60 3a 70 61 74 68 2d 73 65 70 61 72 61 74 6f 72 27 20 6f	y-style'...-.`:path-separator'.o
25600	76 65 72 72 69 64 65 73 20 74 68 65 20 76 61 72 69 61 62 6c 65 0a 20 20 60 63 6f 75 6e 73 65 6c	verrides.the.variable...`counsel
25620	2d 6f 75 74 6c 69 6e 65 2d 70 61 74 68 2d 73 65 70 61 72 61 74 6f 72 27 2e 0a 0a 2d 20 60 3a 66	-outline-path-separator'...-.`:f
25640	61 63 65 2d 73 74 79 6c 65 27 20 6f 76 65 72 72 69 64 65 73 20 74 68 65 20 76 61 72 69 61 62 6c	ace-style'.overrides.the.variabl
25660	65 0a 20 20 60 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 66 61 63 65 2d 73 74 79 6c 65 27	e...`counsel-outline-face-style'
25680	2e 0a 0a 2d 20 60 3a 63 75 73 74 6f 6d 2d 66 61 63 65 73 27 20 6f 76 65 72 72 69 64 65 73 20 74	...-.`:custom-faces'.overrides.t
256a0	68 65 20 76 61 72 69 61 62 6c 65 0a 20 20 60 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 63	he.variable...`counsel-outline-c
256c0	75 73 74 6f 6d 2d 66 61 63 65 73 27 2e 22 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a	ustom-faces'.")..;;;###autoload.
256e0	28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 67 6f 74 6f 2d 61 6c 6c 20 28 29 0a 20	(defun.counsel-org-goto-all.()..
25700	20 22 47 6f 20 74 6f 20 61 20 64 69 66 66 65 72 65 6e 74 20 6c 6f 63 61 74 69 6f 6e 20 69 6e 20	."Go.to.a.different.location.in.
25720	61 6e 79 20 6f 72 67 20 66 69 6c 65 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20	any.org.file."...(interactive)..
25740	20 28 6c 65 74 20 28 65 6e 74 72 69 65 73 29 0a 20 20 20 20 28 64 6f 6c 69 73 74 20 28 62 20 28	.(let.(entries).....(dolist.(b.(
25760	62 75 66 66 65 72 2d 6c 69 73 74 29 29 0a 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e	buffer-list)).......(with-curren
25780	74 2d 62 75 66 66 65 72 20 62 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 64 65 72 69 76 65	t-buffer.b.........(when.(derive
257a0	64 2d 6d 6f 64 65 2d 70 20 27 6f 72 67 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 73	d-mode-p.'org-mode)...........(s
257c0	65 74 71 20 65 6e 74 72 69 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 63 6f	etq.entries.................(nco
257e0	6e 63 20 65 6e 74 72 69 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	nc.entries......................
25800	20 20 28 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 63 61 6e 64 69 64 61 74 65 73 0a 20 20	..(counsel-outline-candidates...
25820	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 64 72 20 28 61 73 73 71	......................(cdr.(assq
25840	20 27 6f 72 67 2d 6d 6f 64 65 20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 73 65 74 74 69	.'org-mode.counsel-outline-setti
25860	6e 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 20 28 63	ngs)).........................(c
25880	6f 75 6e 73 65 6c 2d 6f 72 67 2d 67 6f 74 6f 2d 61 6c 6c 2d 2d 6f 75 74 6c 69 6e 65 2d 70 61 74	ounsel-org-goto-all--outline-pat
258a0	68 2d 70 72 65 66 69 78 29 29 29 29 29 29 29 0a 20 20 20 20 28 69 76 79 2d 72 65 61 64 20 22 47	h-prefix))))))).....(ivy-read."G
258c0	6f 74 6f 3a 20 22 20 65 6e 74 72 69 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 69	oto:.".entries...............:hi
258e0	73 74 6f 72 79 20 27 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 67 6f 74 6f 2d 68 69 73 74 6f 72 79 0a	story.'counsel-org-goto-history.
25900	20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 23 27 63 6f 75 6e 73 65 6c 2d	..............:action.#'counsel-
25920	6f 72 67 2d 67 6f 74 6f 2d 61 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63	org-goto-action...............:c
25940	61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 67 6f 74 6f 2d 61 6c 6c 29 29 29 0a 0a	aller.'counsel-org-goto-all)))..
25960	28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 67 6f 74 6f 2d 61 63 74 69 6f 6e 20 28	(defun.counsel-org-goto-action.(
25980	78 29 0a 20 20 22 47 6f 20 74 6f 20 68 65 61 64 6c 69 6e 65 20 69 6e 20 63 61 6e 64 69 64 61 74	x)..."Go.to.headline.in.candidat
259a0	65 20 58 2e 22 0a 20 20 28 6f 72 67 2d 67 6f 74 6f 2d 6d 61 72 6b 65 72 2d 6f 72 2d 62 6d 6b 20	e.X."...(org-goto-marker-or-bmk.
259c0	28 63 64 72 20 78 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 6f 72 67 2d 67	(cdr.x)))..(defun.counsel--org-g
259e0	65 74 2d 68 65 61 64 69 6e 67 2d 61 72 67 73 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 6c 69 73	et-heading-args.()..."Return.lis
25a00	74 20 6f 66 20 61 72 67 75 6d 65 6e 74 73 20 66 6f 72 20 60 6f 72 67 2d 67 65 74 2d 68 65 61 64	t.of.arguments.for.`org-get-head
25a20	69 6e 67 27 2e 0a 54 72 79 20 74 6f 20 72 65 74 75 72 6e 20 74 68 65 20 72 69 67 68 74 20 6e 75	ing'..Try.to.return.the.right.nu
25a40	6d 62 65 72 20 6f 66 20 61 72 67 75 6d 65 6e 74 73 20 66 6f 72 20 74 68 65 20 63 75 72 72 65 6e	mber.of.arguments.for.the.curren
25a60	74 20 4f 72 67 0a 76 65 72 73 69 6f 6e 2e 20 20 41 72 67 75 6d 65 6e 74 20 76 61 6c 75 65 73 20	t.Org.version...Argument.values.
25a80	61 72 65 20 62 61 73 65 64 20 6f 6e 20 74 68 65 0a 60 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 68 65	are.based.on.the.`counsel-org-he
25aa0	61 64 6c 69 6e 65 2d 64 69 73 70 6c 61 79 2d 2a 27 20 75 73 65 72 20 6f 70 74 69 6f 6e 73 2e 22	adline-display-*'.user.options."
25ac0	0a 20 20 28 6e 62 75 74 6c 61 73 74 20 28 6d 61 70 63 61 72 20 23 27 6e 6f 74 20 28 6c 69 73 74	...(nbutlast.(mapcar.#'not.(list
25ae0	20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 68 65 61 64 6c 69 6e 65 2d 64 69 73 70 6c 61 79 2d 74 61	.counsel-org-headline-display-ta
25b00	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 20 20 20 20 20 20 20	gs..............................
25b20	20 20 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 68 65 61 64 6c 69 6e 65 2d 64 69 73 70 6c 61 79 2d	...counsel-org-headline-display-
25b40	74 6f 64 6f 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	todo............................
25b60	20 20 20 20 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 68 65 61 64 6c 69 6e 65 2d 64 69 73 70 6c 61	.....counsel-org-headline-displa
25b80	79 2d 70 72 69 6f 72 69 74 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	y-priority......................
25ba0	20 20 20 20 20 20 20 20 20 20 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 68 65 61 64 6c 69 6e 65 2d	...........counsel-org-headline-
25bc0	64 69 73 70 6c 61 79 2d 63 6f 6d 6d 65 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b	display-comment)).............;;
25be0	20 41 64 64 65 64 20 69 6e 20 45 6d 61 63 73 20 32 36 2e 31 2e 0a 20 20 20 20 20 20 20 20 20 20	.Added.in.Emacs.26.1............
25c00	20 20 28 69 66 20 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 66 75 6e 63 2d 61 72 69 74 79 29 0a	..(if.(if.(fboundp.'func-arity).
25c20	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3c 20 28 63 64 72 20 28 66 75 6e	....................(<.(cdr.(fun
25c40	63 2d 61 72 69 74 79 20 23 27 6f 72 67 2d 67 65 74 2d 68 65 61 64 69 6e 67 29 29 20 33 29 0a 20	c-arity.#'org-get-heading)).3)..
25c60	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 76 65 72 73 69 6f 6e 3c 20 6f 72 67 2d 76	.................(version<.org-v
25c80	65 72 73 69 6f 6e 20 22 39 2e 31 2e 31 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ersion."9.1.1"))................
25ca0	20 32 20 30 29 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 66 69 6c 65 27	.2.0)))..;;;;.`counsel-org-file'
25cc0	0a 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 6f 72 67 2d 61 74 74 61 63 68 2d 64	..(declare-function.org-attach-d
25ce0	69 72 20 22 6f 72 67 2d 61 74 74 61 63 68 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69	ir."org-attach").(declare-functi
25d00	6f 6e 20 6f 72 67 2d 61 74 74 61 63 68 2d 66 69 6c 65 2d 6c 69 73 74 20 22 6f 72 67 2d 61 74 74	on.org-attach-file-list."org-att
25d20	61 63 68 22 29 0a 28 64 65 66 76 61 72 20 6f 72 67 2d 61 74 74 61 63 68 2d 64 69 72 65 63 74 6f	ach").(defvar.org-attach-directo
25d40	72 79 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 66 69 6c 65 73 20 28 29	ry)..(defun.counsel-org-files.()
25d60	0a 20 20 22 52 65 74 75 72 6e 20 6c 69 73 74 20 6f 66 20 61 6c 6c 20 66 69 6c 65 73 20 75 6e 64	..."Return.list.of.all.files.und
25d80	65 72 20 63 75 72 72 65 6e 74 20 4f 72 67 20 61 74 74 61 63 68 6d 65 6e 74 20 64 69 72 65 63 74	er.current.Org.attachment.direct
25da0	6f 72 69 65 73 2e 0a 46 69 6c 65 6e 61 6d 65 73 20 72 65 74 75 72 6e 65 64 20 61 72 65 20 72 65	ories..Filenames.returned.are.re
25dc0	6c 61 74 69 76 65 20 74 6f 20 60 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 27 2e 20 20	lative.to.`default-directory'...
25de0	46 6f 72 20 65 61 63 68 0a 61 74 74 61 63 68 6d 65 6e 74 20 64 69 72 65 63 74 6f 72 79 20 61 73	For.each.attachment.directory.as
25e00	73 6f 63 69 61 74 65 64 20 77 69 74 68 20 74 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72	sociated.with.the.current.buffer
25e20	2c 20 61 6c 6c 0a 63 6f 6e 74 61 69 6e 65 64 20 66 69 6c 65 73 20 61 72 65 20 6c 69 73 74 65 64	,.all.contained.files.are.listed
25e40	2c 20 73 6f 20 74 68 65 20 72 65 74 75 72 6e 20 76 61 6c 75 65 20 63 6f 75 6c 64 20 63 6f 6e 63	,.so.the.return.value.could.conc
25e60	65 69 76 61 62 6c 79 0a 69 6e 63 6c 75 64 65 20 61 74 74 61 63 68 6d 65 6e 74 73 20 6f 66 20 6f	eivably.include.attachments.of.o
25e80	74 68 65 72 20 4f 72 67 20 62 75 66 66 65 72 73 2e 22 0a 20 20 28 72 65 71 75 69 72 65 20 27 6f	ther.Org.buffers."...(require.'o
25ea0	72 67 2d 61 74 74 61 63 68 29 0a 20 20 28 6c 65 74 20 28 64 69 72 73 29 0a 20 20 20 20 28 73 61	rg-attach)...(let.(dirs).....(sa
25ec0	76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70	ve-excursion.......(goto-char.(p
25ee0	6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 72 65 2d 73 65 61 72	oint-min)).......(while.(re-sear
25f00	63 68 2d 66 6f 72 77 61 72 64 20 22 3a 5c 5c 28 3f 3a 41 54 54 41 43 48 5f 44 49 52 5c 5c 7c 49	ch-forward.":\\(?:ATTACH_DIR\\|I
25f20	44 5c 5c 29 3a 5b 5c 74 20 5d 2b 2e 2a 24 22 20 6e 69 6c 20 74 29 0a 20 20 20 20 20 20 20 20 28	D\\):[\t.]+.*$".nil.t).........(
25f40	6c 65 74 20 28 28 64 69 72 20 28 6f 72 67 2d 61 74 74 61 63 68 2d 64 69 72 29 29 29 0a 20 20 20	let.((dir.(org-attach-dir)))....
25f60	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 20 20 20 20 28 70 75	.......(when.dir.............(pu
25f80	73 68 20 64 69 72 20 64 69 72 73 29 29 29 29 29 0a 20 20 20 20 28 63 6c 2d 6d 61 70 63 61 6e 0a	sh.dir.dirs))))).....(cl-mapcan.
25fa0	20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 64 69 72 29 0a 20 20 20 20 20 20 20 28 6d 61 70 63 61	.....(lambda.(dir)........(mapca
25fc0	72 20 28 6c 61 6d 62 64 61 20 28 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	r.(lambda.(file)................
25fe0	20 20 28 66 69 6c 65 2d 72 65 6c 61 74 69 76 65 2d 6e 61 6d 65 20 28 65 78 70 61 6e 64 2d 66 69	..(file-relative-name.(expand-fi
26000	6c 65 2d 6e 61 6d 65 20 66 69 6c 65 20 64 69 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	le-name.file.dir))).............
26020	20 20 20 28 6f 72 67 2d 61 74 74 61 63 68 2d 66 69 6c 65 2d 6c 69 73 74 20 64 69 72 29 29 29 0a	...(org-attach-file-list.dir))).
26040	20 20 20 20 20 28 6e 72 65 76 65 72 73 65 20 64 69 72 73 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61	.....(nreverse.dirs))))..;;;###a
26060	75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 66 69 6c 65 20	utoload.(defun.counsel-org-file.
26080	28 29 0a 20 20 22 42 72 6f 77 73 65 20 61 6c 6c 20 61 74 74 61 63 68 6d 65 6e 74 73 20 66 6f 72	()..."Browse.all.attachments.for
260a0	20 63 75 72 72 65 6e 74 20 4f 72 67 20 66 69 6c 65 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69	.current.Org.file."...(interacti
260c0	76 65 29 0a 20 20 28 69 76 79 2d 72 65 61 64 20 22 66 69 6c 65 3a 20 22 20 28 63 6f 75 6e 73 65	ve)...(ivy-read."file:.".(counse
260e0	6c 2d 6f 72 67 2d 66 69 6c 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e	l-org-files).............:action
26100	20 23 27 63 6f 75 6e 73 65 6c 2d 6c 6f 63 61 74 65 2d 61 63 74 69 6f 6e 2d 64 69 72 65 64 0a 20	.#'counsel-locate-action-dired..
26120	20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d	...........:caller.'counsel-org-
26140	66 69 6c 65 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 65 6e 74 69 74 79	file))..;;;;.`counsel-org-entity
26160	27 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c	'..;;;###autoload.(defun.counsel
26180	2d 6f 72 67 2d 65 6e 74 69 74 79 20 28 29 0a 20 20 22 43 6f 6d 70 6c 65 74 65 20 4f 72 67 20 65	-org-entity.()..."Complete.Org.e
261a0	6e 74 69 74 69 65 73 20 75 73 69 6e 67 20 49 76 79 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69	ntities.using.Ivy."...(interacti
261c0	76 65 29 0a 20 20 28 72 65 71 75 69 72 65 20 27 6f 72 67 29 0a 20 20 28 64 65 66 76 61 72 20 6f	ve)...(require.'org)...(defvar.o
261e0	72 67 2d 65 6e 74 69 74 69 65 73 29 0a 20 20 28 64 65 66 76 61 72 20 6f 72 67 2d 65 6e 74 69 74	rg-entities)...(defvar.org-entit
26200	69 65 73 2d 75 73 65 72 29 0a 20 20 28 69 76 79 2d 72 65 61 64 20 22 45 6e 74 69 74 79 3a 20 22	ies-user)...(ivy-read."Entity:."
26220	0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 65 6c 65 6d 65 6e	.............(cl-loop.for.elemen
26240	74 20 69 6e 20 28 61 70 70 65 6e 64 20 6f 72 67 2d 65 6e 74 69 74 69 65 73 20 6f 72 67 2d 65 6e	t.in.(append.org-entities.org-en
26260	74 69 74 69 65 73 2d 75 73 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	tities-user)....................
26280	20 20 77 68 65 6e 20 28 63 6f 6e 73 70 20 65 6c 65 6d 65 6e 74 29 0a 20 20 20 20 20 20 20 20 20	..when.(consp.element)..........
262a0	20 20 20 20 20 20 20 20 20 20 20 20 63 6f 6c 6c 65 63 74 20 28 63 6f 6e 73 0a 20 20 20 20 20 20	............collect.(cons.......
262c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20	........................(format.
262e0	22 25 32 30 73 20 7c 20 25 32 30 73 20 7c 20 25 32 30 73 20 7c 20 25 73 22 0a 20 20 20 20 20 20	"%20s.|.%20s.|.%20s.|.%s".......
26300	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
26320	28 6e 74 68 20 30 20 65 6c 65 6d 65 6e 74 29 20 20 3b 20 4e 61 6d 65 2e 0a 20 20 20 20 20 20 20	(nth.0.element)..;.Name.........
26340	20 20 20 20 20 20 20 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	...............................(
26360	6e 74 68 20 31 20 65 6c 65 6d 65 6e 74 29 20 20 3b 20 4c 61 54 65 58 2e 0a 20 20 20 20 20 20 20	nth.1.element)..;.LaTeX.........
26380	20 20 20 20 20 20 20 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	...............................(
263a0	6e 74 68 20 33 20 65 6c 65 6d 65 6e 74 29 20 20 3b 20 48 54 4d 4c 2e 0a 20 20 20 20 20 20 20 20	nth.3.element)..;.HTML..........
263c0	20 20 20 20 20 20 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 6e	..............................(n
263e0	74 68 20 36 20 65 6c 65 6d 65 6e 74 29 29 20 3b 20 55 54 46 2d 38 2e 0a 20 20 20 20 20 20 20 20	th.6.element)).;.UTF-8..........
26400	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6c 65 6d 65 6e 74 29 29 0a	......................element)).
26420	20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 71 75 69 72 65 2d 6d 61 74 63 68 20 74 0a 20 20 20	............:require-match.t....
26440	20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 60 28 31 0a 20 20 20 20 20 20 20 20 20 20 20	.........:action.`(1............
26460	20 20 20 20 20 20 20 20 20 20 20 28 22 75 22 20 2c 28 6c 61 6d 62 64 61 20 28 63 61 6e 64 69 64	...........("u".,(lambda.(candid
26480	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 20 20 20 20 20	ate)............................
264a0	20 20 20 28 69 6e 73 65 72 74 20 28 6e 74 68 20 36 20 28 63 64 72 20 63 61 6e 64 69 64 61 74 65	...(insert.(nth.6.(cdr.candidate
264c0	29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 55 54 46	))))........................"UTF
264e0	2d 38 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 28 22 6f 22 20	-8").......................("o".
26500	2c 28 6c 61 6d 62 64 61 20 28 63 61 6e 64 69 64 61 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20	,(lambda.(candidate)............
26520	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 5c 5c 22 20	...................(insert."\\".
26540	28 6e 74 68 20 30 20 28 63 64 72 20 63 61 6e 64 69 64 61 74 65 29 29 29 29 0a 20 20 20 20 20 20	(nth.0.(cdr.candidate)))).......
26560	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 4f 72 67 20 65 6e 74 69 74 79 22 29 0a 20	................."Org.entity")..
26580	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 22 6c 22 20 2c 28 6c 61 6d 62	.....................("l".,(lamb
265a0	64 61 20 28 63 61 6e 64 69 64 61 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	da.(candidate)..................
265c0	20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 6e 74 68 20 31 20 28 63 64 72	.............(insert.(nth.1.(cdr
265e0	20 63 61 6e 64 69 64 61 74 65 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.candidate))))..................
26600	20 20 20 20 20 20 22 4c 61 54 65 58 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	......"LaTeX")..................
26620	20 20 20 20 20 28 22 68 22 20 2c 28 6c 61 6d 62 64 61 20 28 63 61 6e 64 69 64 61 74 65 29 0a 20	.....("h".,(lambda.(candidate)..
26640	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e	.............................(in
26660	73 65 72 74 20 28 6e 74 68 20 33 20 28 63 64 72 20 63 61 6e 64 69 64 61 74 65 29 29 29 29 0a 20	sert.(nth.3.(cdr.candidate))))..
26680	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 48 54 4d 4c 22 29 0a 20 20	......................"HTML")...
266a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 22 61 22 20 2c 28 6c 61 6d 62 64	....................("a".,(lambd
266c0	61 20 28 63 61 6e 64 69 64 61 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	a.(candidate)...................
266e0	20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 6e 74 68 20 34 20 28 63 64 72 20	............(insert.(nth.4.(cdr.
26700	63 61 6e 64 69 64 61 74 65 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	candidate))))...................
26720	20 20 20 20 20 22 41 53 43 49 49 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	....."ASCII")...................
26740	20 20 20 20 28 22 4c 22 20 2c 28 6c 61 6d 62 64 61 20 28 63 61 6e 64 69 64 61 74 65 29 0a 20 20	....("L".,(lambda.(candidate)...
26760	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73	............................(ins
26780	65 72 74 20 28 6e 74 68 20 35 20 28 63 64 72 20 63 61 6e 64 69 64 61 74 65 29 29 29 29 0a 20 20	ert.(nth.5.(cdr.candidate))))...
267a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 4c 61 74 69 6e 2d 31 22 29 29	....................."Latin-1"))
267c0	29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 63 61 70 74 75 72 65 27 0a 0a	))..;;;;.`counsel-org-capture'..
267e0	28 64 65 66 76 61 72 20 6f 72 67 2d 63 61 70 74 75 72 65 2d 74 65 6d 70 6c 61 74 65 73 29 0a 28	(defvar.org-capture-templates).(
26800	64 65 66 76 61 72 20 6f 72 67 2d 63 61 70 74 75 72 65 2d 74 65 6d 70 6c 61 74 65 73 2d 63 6f 6e	defvar.org-capture-templates-con
26820	74 65 78 74 73 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 6f 72 67 2d 63 6f 6e	texts).(declare-function.org-con
26840	74 65 78 74 75 61 6c 69 7a 65 2d 6b 65 79 73 20 22 6f 72 67 22 29 0a 28 64 65 63 6c 61 72 65 2d	textualize-keys."org").(declare-
26860	66 75 6e 63 74 69 6f 6e 20 6f 72 67 2d 63 61 70 74 75 72 65 2d 67 6f 74 6f 2d 6c 61 73 74 2d 73	function.org-capture-goto-last-s
26880	74 6f 72 65 64 20 22 6f 72 67 2d 63 61 70 74 75 72 65 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75	tored."org-capture").(declare-fu
268a0	6e 63 74 69 6f 6e 20 6f 72 67 2d 63 61 70 74 75 72 65 2d 67 6f 74 6f 2d 74 61 72 67 65 74 20 22	nction.org-capture-goto-target."
268c0	6f 72 67 2d 63 61 70 74 75 72 65 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20	org-capture").(declare-function.
268e0	6f 72 67 2d 63 61 70 74 75 72 65 2d 75 70 67 72 61 64 65 2d 74 65 6d 70 6c 61 74 65 73 20 22 6f	org-capture-upgrade-templates."o
26900	72 67 2d 63 61 70 74 75 72 65 22 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65	rg-capture")..;;;###autoload.(de
26920	66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 63 61 70 74 75 72 65 20 28 29 0a 20 20 22 43 61	fun.counsel-org-capture.()..."Ca
26940	70 74 75 72 65 20 73 6f 6d 65 74 68 69 6e 67 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65	pture.something."...(interactive
26960	29 0a 20 20 28 72 65 71 75 69 72 65 20 27 6f 72 67 2d 63 61 70 74 75 72 65 29 0a 20 20 28 69 76	)...(require.'org-capture)...(iv
26980	79 2d 72 65 61 64 20 22 43 61 70 74 75 72 65 20 74 65 6d 70 6c 61 74 65 3a 20 22 0a 20 20 20 20	y-read."Capture.template:.".....
269a0	20 20 20 20 20 20 20 20 3b 3b 20 57 65 20 62 75 69 6c 64 20 74 68 65 20 6c 69 73 74 20 6f 66 20	........;;.We.build.the.list.of.
269c0	63 61 70 74 75 72 65 20 74 65 6d 70 6c 61 74 65 73 20 61 73 20 69 6e 20 60 6f 72 67 2d 63 61 70	capture.templates.as.in.`org-cap
269e0	74 75 72 65 2d 73 65 6c 65 63 74 2d 74 65 6d 70 6c 61 74 65 27 3a 0a 20 20 20 20 20 20 20 20 20	ture-select-template':..........
26a00	20 20 20 28 6c 65 74 20 28 70 72 65 66 69 78 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	...(let.(prefixes)..............
26a20	20 28 63 6c 2d 6d 61 70 63 61 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62	.(cl-mapcan................(lamb
26a40	64 61 20 28 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 78	da.(x)..................(let.((x
26a60	2d 6b 65 79 73 20 28 63 61 72 20 78 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	-keys.(car.x))).................
26a80	20 20 20 3b 3b 20 52 65 6d 6f 76 65 20 70 72 65 66 69 78 65 64 20 6b 65 79 73 20 75 6e 74 69 6c	...;;.Remove.prefixed.keys.until
26aa0	20 77 65 20 67 65 74 20 6f 6e 65 20 74 68 61 74 20 6d 61 74 63 68 65 73 20 74 68 65 20 63 75 72	.we.get.one.that.matches.the.cur
26ac0	72 65 6e 74 20 69 74 65 6d 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77	rent.item.....................(w
26ae0	68 69 6c 65 20 28 61 6e 64 20 70 72 65 66 69 78 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	hile.(and.prefixes..............
26b00	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 70 31 2d 6b 65 79 73	..................(let.((p1-keys
26b20	20 28 63 61 61 72 20 70 72 65 66 69 78 65 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	.(caar.prefixes)))..............
26b40	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 0a 20 20 20 20 20 20 20 20	....................(or.........
26b60	20 20 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 3d 20 28 6c	..........................(<=.(l
26b80	65 6e 67 74 68 20 78 2d 6b 65 79 73 29 20 28 6c 65 6e 67 74 68 20 70 31 2d 6b 65 79 73 29 29 0a	ength.x-keys).(length.p1-keys)).
26ba0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
26bc0	20 20 28 6e 6f 74 20 28 73 74 72 69 6e 67 2d 70 72 65 66 69 78 2d 70 20 70 31 2d 6b 65 79 73 20	..(not.(string-prefix-p.p1-keys.
26be0	78 2d 6b 65 79 73 29 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	x-keys))))).....................
26c00	20 28 70 6f 70 20 70 72 65 66 69 78 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.(pop.prefixes))................
26c20	20 20 20 20 28 69 66 20 28 3e 20 28 6c 65 6e 67 74 68 20 78 29 20 32 29 0a 20 20 20 20 20 20 20	....(if.(>.(length.x).2)........
26c40	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 64 65 73 63 20 28 6d 61 70	................(let.((desc.(map
26c60	63 6f 6e 63 61 74 20 23 27 63 61 64 72 20 28 72 65 76 65 72 73 65 20 28 63 6f 6e 73 20 78 20 70	concat.#'cadr.(reverse.(cons.x.p
26c80	72 65 66 69 78 65 73 29 29 20 22 20 7c 20 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	refixes)).".|.")))..............
26ca0	20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 28 66 6f 72 6d 61 74 20 22 25 2d 35 73 20	............(list.(format."%-5s.
26cc0	25 73 22 20 78 2d 6b 65 79 73 20 64 65 73 63 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	%s".x-keys.desc)))..............
26ce0	20 20 20 20 20 20 20 20 28 70 75 73 68 20 78 20 70 72 65 66 69 78 65 73 29 0a 20 20 20 20 20 20	........(push.x.prefixes).......
26d00	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 29 29 29 0a 20 20 20 20 20 20 20 20 20 20	...............nil)))...........
26d20	20 20 20 20 20 28 6f 72 20 28 6f 72 67 2d 63 6f 6e 74 65 78 74 75 61 6c 69 7a 65 2d 6b 65 79 73	.....(or.(org-contextualize-keys
26d40	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 67 2d 63 61 70 74 75 72	.....................(org-captur
26d60	65 2d 75 70 67 72 61 64 65 2d 74 65 6d 70 6c 61 74 65 73 20 6f 72 67 2d 63 61 70 74 75 72 65 2d	e-upgrade-templates.org-capture-
26d80	74 65 6d 70 6c 61 74 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6f	templates).....................o
26da0	72 67 2d 63 61 70 74 75 72 65 2d 74 65 6d 70 6c 61 74 65 73 2d 63 6f 6e 74 65 78 74 73 29 0a 20	rg-capture-templates-contexts)..
26dc0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 28 28 22 74 22 20 22 54 61 73 6b 22 20	..................'(("t"."Task".
26de0	65 6e 74 72 79 20 28 66 69 6c 65 2b 68 65 61 64 6c 69 6e 65 20 22 22 20 22 54 61 73 6b 73 22 29	entry.(file+headline.""."Tasks")
26e00	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2a 20 54 4f 44 4f 20 25	......................."*.TODO.%
26e20	3f 5c 6e 20 20 25 75 5c 6e 20 20 25 61 22 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	?\n..%u\n..%a"))))).............
26e40	3a 72 65 71 75 69 72 65 2d 6d 61 74 63 68 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63	:require-match.t.............:ac
26e60	74 69 6f 6e 20 28 6c 61 6d 62 64 61 20 28 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	tion.(lambda.(x)................
26e80	20 20 20 20 20 20 20 28 6f 72 67 2d 63 61 70 74 75 72 65 20 6e 69 6c 20 28 63 61 72 20 28 73 70	.......(org-capture.nil.(car.(sp
26ea0	6c 69 74 2d 73 74 72 69 6e 67 20 78 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61	lit-string.x)))).............:ca
26ec0	6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 63 61 70 74 75 72 65 29 29 0a 0a 28 69 76	ller.'counsel-org-capture))..(iv
26ee0	79 2d 63 6f 6e 66 69 67 75 72 65 20 27 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 63 61 70 74 75 72 65	y-configure.'counsel-org-capture
26f00	0a 20 20 3a 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20 22 5e 22 29 0a 0a 28 69 76 79 2d 73 65 74	...:initial-input."^")..(ivy-set
26f20	2d 61 63 74 69 6f 6e 73 0a 20 27 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 63 61 70 74 75 72 65 0a 20	-actions..'counsel-org-capture..
26f40	60 28 28 22 74 22 20 2c 28 6c 61 6d 62 64 61 20 28 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 28	`(("t".,(lambda.(x)............(
26f60	6f 72 67 2d 63 61 70 74 75 72 65 2d 67 6f 74 6f 2d 74 61 72 67 65 74 20 28 63 61 72 20 28 73 70	org-capture-goto-target.(car.(sp
26f80	6c 69 74 2d 73 74 72 69 6e 67 20 78 29 29 29 29 0a 20 20 20 20 20 20 20 20 22 67 6f 20 74 6f 20	lit-string.x))))........."go.to.
26fa0	74 61 72 67 65 74 22 29 0a 20 20 20 28 22 6c 22 20 2c 28 6c 61 6d 62 64 61 20 28 5f 78 29 0a 20	target")....("l".,(lambda.(_x)..
26fc0	20 20 20 20 20 20 20 20 20 20 28 6f 72 67 2d 63 61 70 74 75 72 65 2d 67 6f 74 6f 2d 6c 61 73 74	..........(org-capture-goto-last
26fe0	2d 73 74 6f 72 65 64 29 29 0a 20 20 20 20 20 20 20 20 22 67 6f 20 74 6f 20 6c 61 73 74 20 73 74	-stored))........."go.to.last.st
27000	6f 72 65 64 22 29 0a 20 20 20 28 22 70 22 20 2c 28 6c 61 6d 62 64 61 20 28 78 29 0a 20 20 20 20	ored")....("p".,(lambda.(x).....
27020	20 20 20 20 20 20 20 28 6f 72 67 2d 63 61 70 74 75 72 65 20 30 20 28 63 61 72 20 28 73 70 6c 69	.......(org-capture.0.(car.(spli
27040	74 2d 73 74 72 69 6e 67 20 78 29 29 29 29 0a 20 20 20 20 20 20 20 20 22 69 6e 73 65 72 74 20 74	t-string.x))))........."insert.t
27060	65 6d 70 6c 61 74 65 20 61 74 20 70 6f 69 6e 74 22 29 0a 20 20 20 28 22 63 22 20 2c 28 6c 61 6d	emplate.at.point")....("c".,(lam
27080	62 64 61 20 28 5f 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 75 73 74 6f 6d 69 7a 65 2d 76	bda.(_x)............(customize-v
270a0	61 72 69 61 62 6c 65 20 27 6f 72 67 2d 63 61 70 74 75 72 65 2d 74 65 6d 70 6c 61 74 65 73 29 29	ariable.'org-capture-templates))
270c0	0a 20 20 20 20 20 20 20 20 22 63 75 73 74 6f 6d 69 7a 65 20 6f 72 67 2d 63 61 70 74 75 72 65 2d	........."customize.org-capture-
270e0	74 65 6d 70 6c 61 74 65 73 22 29 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 6f 72 67	templates")))..;;;;.`counsel-org
27100	2d 61 67 65 6e 64 61 2d 68 65 61 64 6c 69 6e 65 73 27 0a 0a 28 64 65 66 76 61 72 20 6f 72 67 2d	-agenda-headlines'..(defvar.org-
27120	6f 64 64 2d 6c 65 76 65 6c 73 2d 6f 6e 6c 79 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69	odd-levels-only).(declare-functi
27140	6f 6e 20 6f 72 67 2d 6d 61 70 2d 65 6e 74 72 69 65 73 20 22 6f 72 67 22 29 0a 28 64 65 63 6c 61	on.org-map-entries."org").(decla
27160	72 65 2d 66 75 6e 63 74 69 6f 6e 20 6f 72 67 2d 68 65 61 64 69 6e 67 2d 63 6f 6d 70 6f 6e 65 6e	re-function.org-heading-componen
27180	74 73 20 22 6f 72 67 22 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 61 67	ts."org")..(defun.counsel-org-ag
271a0	65 6e 64 61 2d 68 65 61 64 6c 69 6e 65 73 2d 61 63 74 69 6f 6e 2d 67 6f 74 6f 20 28 68 65 61 64	enda-headlines-action-goto.(head
271c0	6c 69 6e 65 29 0a 20 20 22 47 6f 20 74 6f 20 74 68 65 20 60 6f 72 67 2d 6d 6f 64 65 27 20 61 67	line)..."Go.to.the.`org-mode'.ag
271e0	65 6e 64 61 20 48 45 41 44 4c 49 4e 45 2e 22 0a 20 20 28 66 69 6e 64 2d 66 69 6c 65 20 28 6e 74	enda.HEADLINE."...(find-file.(nt
27200	68 20 31 20 68 65 61 64 6c 69 6e 65 29 29 0a 20 20 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 6f	h.1.headline))...(if.(fboundp.'o
27220	72 67 2d 63 79 63 6c 65 2d 73 65 74 2d 73 74 61 72 74 75 70 2d 76 69 73 69 62 69 6c 69 74 79 29	rg-cycle-set-startup-visibility)
27240	0a 20 20 20 20 20 20 28 6f 72 67 2d 63 79 63 6c 65 2d 73 65 74 2d 73 74 61 72 74 75 70 2d 76 69	.......(org-cycle-set-startup-vi
27260	73 69 62 69 6c 69 74 79 29 0a 20 20 20 20 3b 3b 20 4f 62 73 6f 6c 65 74 65 20 61 6c 69 61 73 20	sibility).....;;.Obsolete.alias.
27280	73 69 6e 63 65 20 4f 72 67 20 39 2e 36 20 2f 20 45 6d 61 63 73 20 32 39 2e 0a 20 20 20 20 28 77	since.Org.9.6./.Emacs.29......(w
272a0	69 74 68 2d 6e 6f 2d 77 61 72 6e 69 6e 67 73 0a 20 20 20 20 20 20 28 6f 72 67 2d 73 65 74 2d 73	ith-no-warnings.......(org-set-s
272c0	74 61 72 74 75 70 2d 76 69 73 69 62 69 6c 69 74 79 29 29 29 0a 20 20 28 67 6f 74 6f 2d 63 68 61	tartup-visibility)))...(goto-cha
272e0	72 20 28 6e 74 68 20 32 20 68 65 61 64 6c 69 6e 65 29 29 0a 20 20 28 69 66 20 28 66 62 6f 75 6e	r.(nth.2.headline))...(if.(fboun
27300	64 70 20 27 6f 72 67 2d 66 6f 6c 64 2d 73 68 6f 77 2d 65 6e 74 72 79 29 0a 20 20 20 20 20 20 28	dp.'org-fold-show-entry).......(
27320	6f 72 67 2d 66 6f 6c 64 2d 73 68 6f 77 2d 65 6e 74 72 79 29 0a 20 20 20 20 3b 3b 20 4f 62 73 6f	org-fold-show-entry).....;;.Obso
27340	6c 65 74 65 20 61 6c 69 61 73 20 73 69 6e 63 65 20 4f 72 67 20 39 2e 36 20 2f 20 45 6d 61 63 73	lete.alias.since.Org.9.6./.Emacs
27360	20 32 39 2e 0a 20 20 20 20 28 77 69 74 68 2d 6e 6f 2d 77 61 72 6e 69 6e 67 73 0a 20 20 20 20 20	.29......(with-no-warnings......
27380	20 28 6f 72 67 2d 73 68 6f 77 2d 65 6e 74 72 79 29 29 29 29 0a 0a 28 69 76 79 2d 73 65 74 2d 61	.(org-show-entry))))..(ivy-set-a
273a0	63 74 69 6f 6e 73 0a 20 27 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 61 67 65 6e 64 61 2d 68 65 61 64	ctions..'counsel-org-agenda-head
273c0	6c 69 6e 65 73 0a 20 27 28 28 22 67 22 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 61 67 65 6e 64 61	lines..'(("g".counsel-org-agenda
273e0	2d 68 65 61 64 6c 69 6e 65 73 2d 61 63 74 69 6f 6e 2d 67 6f 74 6f 20 22 67 6f 74 6f 20 68 65 61	-headlines-action-goto."goto.hea
27400	64 6c 69 6e 65 22 29 29 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 61	dline")))..(defvar.counsel-org-a
27420	67 65 6e 64 61 2d 68 65 61 64 6c 69 6e 65 73 2d 68 69 73 74 6f 72 79 20 6e 69 6c 0a 20 20 22 48	genda-headlines-history.nil..."H
27440	69 73 74 6f 72 79 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 61 67 65 6e 64 61 2d 68	istory.for.`counsel-org-agenda-h
27460	65 61 64 6c 69 6e 65 73 27 2e 22 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c	eadlines'.")..(defcustom.counsel
27480	2d 6f 75 74 6c 69 6e 65 2d 64 69 73 70 6c 61 79 2d 73 74 79 6c 65 20 27 70 61 74 68 0a 20 20 22	-outline-display-style.'path..."
274a0	54 68 65 20 73 74 79 6c 65 20 75 73 65 64 20 77 68 65 6e 20 64 69 73 70 6c 61 79 69 6e 67 20 6d	The.style.used.when.displaying.m
274c0	61 74 63 68 65 64 20 6f 75 74 6c 69 6e 65 20 68 65 61 64 69 6e 67 73 2e 0a 0a 49 66 20 60 68 65	atched.outline.headings...If.`he
274e0	61 64 6c 69 6e 65 27 2c 20 74 68 65 20 74 69 74 6c 65 20 69 73 20 64 69 73 70 6c 61 79 65 64 20	adline',.the.title.is.displayed.
27500	77 69 74 68 20 6c 65 61 64 69 6e 67 20 73 74 61 72 73 0a 69 6e 64 69 63 61 74 69 6e 67 20 74 68	with.leading.stars.indicating.th
27520	65 20 6f 75 74 6c 69 6e 65 20 6c 65 76 65 6c 2e 0a 0a 49 66 20 60 70 61 74 68 27 2c 20 74 68 65	e.outline.level...If.`path',.the
27540	20 70 61 74 68 20 68 69 65 72 61 72 63 68 79 20 69 73 20 64 69 73 70 6c 61 79 65 64 2e 20 20 46	.path.hierarchy.is.displayed...F
27560	6f 72 20 65 61 63 68 20 65 6e 74 72 79 20 74 68 65 0a 74 69 74 6c 65 20 69 73 20 73 68 6f 77 6e	or.each.entry.the.title.is.shown
27580	2e 20 20 45 6e 74 72 69 65 73 20 61 72 65 20 73 65 70 61 72 61 74 65 64 20 77 69 74 68 0a 60 63	...Entries.are.separated.with.`c
275a0	6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 70 61 74 68 2d 73 65 70 61 72 61 74 6f 72 27 2e 0a	ounsel-outline-path-separator'..
275c0	0a 49 66 20 60 74 69 74 6c 65 27 20 6f 72 20 61 6e 79 20 6f 74 68 65 72 20 76 61 6c 75 65 2c 20	.If.`title'.or.any.other.value,.
275e0	6f 6e 6c 79 20 74 68 65 20 74 69 74 6c 65 20 6f 66 20 74 68 65 20 68 65 61 64 69 6e 67 20 69 73	only.the.title.of.the.heading.is
27600	0a 64 69 73 70 6c 61 79 65 64 2e 0a 0a 46 6f 72 20 64 69 73 70 6c 61 79 69 6e 67 20 74 61 67 73	.displayed...For.displaying.tags
27620	20 61 6e 64 20 54 4f 44 4f 20 6b 65 79 77 6f 72 64 73 20 69 6e 20 60 6f 72 67 2d 6d 6f 64 65 27	.and.TODO.keywords.in.`org-mode'
27640	20 62 75 66 66 65 72 73 2c 20 73 65 65 0a 60 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 68 65 61 64 6c	.buffers,.see.`counsel-org-headl
27660	69 6e 65 2d 64 69 73 70 6c 61 79 2d 74 61 67 73 27 20 61 6e 64 0a 60 63 6f 75 6e 73 65 6c 2d 6f	ine-display-tags'.and.`counsel-o
27680	72 67 2d 68 65 61 64 6c 69 6e 65 2d 64 69 73 70 6c 61 79 2d 74 6f 64 6f 27 2c 20 72 65 73 70 65	rg-headline-display-todo',.respe
276a0	63 74 69 76 65 6c 79 2e 22 0a 20 20 3a 74 79 70 65 20 27 28 63 68 6f 69 63 65 0a 20 20 20 20 20	ctively."...:type.'(choice......
276c0	20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 54 69 74 6c 65 20 6f 6e 6c 79 22 20 74 69	.....(const.:tag."Title.only".ti
276e0	74 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 48 65 61 64	tle)...........(const.:tag."Head
27700	6c 69 6e 65 22 20 68 65 61 64 6c 69 6e 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74	line".headline)...........(const
27720	20 3a 74 61 67 20 22 50 61 74 68 22 20 70 61 74 68 29 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d	.:tag."Path".path)))..(defcustom
27740	20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 70 61 74 68 2d 73 65 70 61 72 61 74 6f 72 20	.counsel-outline-path-separator.
27760	22 2f 22 0a 20 20 22 53 74 72 69 6e 67 20 73 65 70 61 72 61 74 69 6e 67 20 70 61 74 68 20 65 6e	"/"..."String.separating.path.en
27780	74 72 69 65 73 20 69 6e 20 6d 61 74 63 68 65 64 20 6f 75 74 6c 69 6e 65 20 68 65 61 64 69 6e 67	tries.in.matched.outline.heading
277a0	73 2e 0a 54 68 69 73 20 76 61 72 69 61 62 6c 65 20 68 61 73 20 6e 6f 20 65 66 66 65 63 74 20 75	s..This.variable.has.no.effect.u
277c0	6e 6c 65 73 73 0a 60 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 64 69 73 70 6c 61 79 2d 73	nless.`counsel-outline-display-s
277e0	74 79 6c 65 27 20 69 73 20 73 65 74 20 74 6f 20 60 70 61 74 68 27 2e 22 0a 20 20 3a 74 79 70 65	tyle'.is.set.to.`path'."...:type
27800	20 27 73 74 72 69 6e 67 29 0a 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 6f 72 67	.'string)..(declare-function.org
27820	2d 67 65 74 2d 6f 75 74 6c 69 6e 65 2d 70 61 74 68 20 22 6f 72 67 22 29 0a 0a 28 64 65 66 75 6e	-get-outline-path."org")..(defun
27840	20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 61 67 65 6e 64 61 2d 68 65 61 64 6c 69 6e 65 73 2d 2d 63	.counsel-org-agenda-headlines--c
27860	61 6e 64 69 64 61 74 65 73 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 6c 69 73 74 20 6f 66	andidates.()..."Return.a.list.of
27880	20 63 6f 6d 70 6c 65 74 69 6f 6e 20 63 61 6e 64 69 64 61 74 65 73 20 66 6f 72 20 60 63 6f 75 6e	.completion.candidates.for.`coun
278a0	73 65 6c 2d 6f 72 67 2d 61 67 65 6e 64 61 2d 68 65 61 64 6c 69 6e 65 73 27 2e 22 0a 20 20 28 6f	sel-org-agenda-headlines'."...(o
278c0	72 67 2d 6d 61 70 2d 65 6e 74 72 69 65 73 0a 20 20 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20	rg-map-entries....(lambda.()....
278e0	20 20 28 6c 65 74 2a 20 28 28 63 6f 6d 70 6f 6e 65 6e 74 73 20 28 6f 72 67 2d 68 65 61 64 69 6e	..(let*.((components.(org-headin
27900	67 2d 63 6f 6d 70 6f 6e 65 6e 74 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 76 65	g-components)).............(leve
27920	6c 20 28 61 6e 64 20 28 65 71 20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 64 69 73 70 6c	l.(and.(eq.counsel-outline-displ
27940	61 79 2d 73 74 79 6c 65 20 27 68 65 61 64 6c 69 6e 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	ay-style.'headline).............
27960	20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 6b 65 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20	............(make-string........
27980	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 6f 72 67 2d 6f 64 64 2d 6c 65	..................(if.org-odd-le
279a0	76 65 6c 73 2d 6f 6e 6c 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	vels-only.......................
279c0	20 20 20 20 20 20 20 28 6e 74 68 20 31 20 63 6f 6d 70 6f 6e 65 6e 74 73 29 0a 20 20 20 20 20 20	.......(nth.1.components).......
279e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 74 68 20 30 20 63 6f 6d 70	.....................(nth.0.comp
27a00	6f 6e 65 6e 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	onents))........................
27a20	20 20 3f 2a 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 74 6f 64 6f 20 28 61 6e 64 20 63	..?*))).............(todo.(and.c
27a40	6f 75 6e 73 65 6c 2d 6f 72 67 2d 68 65 61 64 6c 69 6e 65 2d 64 69 73 70 6c 61 79 2d 74 6f 64 6f	ounsel-org-headline-display-todo
27a60	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 6e 74 68 20 32 20 63	........................(nth.2.c
27a80	6f 6d 70 6f 6e 65 6e 74 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 74 68 20 28	omponents))).............(path.(
27aa0	61 6e 64 20 28 65 71 20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 64 69 73 70 6c 61 79 2d	and.(eq.counsel-outline-display-
27ac0	73 74 79 6c 65 20 27 70 61 74 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	style.'path)....................
27ae0	20 20 20 20 28 6f 72 67 2d 67 65 74 2d 6f 75 74 6c 69 6e 65 2d 70 61 74 68 29 29 29 0a 20 20 20	....(org-get-outline-path)))....
27b00	20 20 20 20 20 20 20 20 20 28 70 72 69 6f 72 69 74 79 20 28 61 6e 64 20 63 6f 75 6e 73 65 6c 2d	.........(priority.(and.counsel-
27b20	6f 72 67 2d 68 65 61 64 6c 69 6e 65 2d 64 69 73 70 6c 61 79 2d 70 72 69 6f 72 69 74 79 0a 20 20	org-headline-display-priority...
27b40	20 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 6e 74 68 20 33 20	.........................(nth.3.
27b60	63 6f 6d 70 6f 6e 65 6e 74 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 74 65 78 74 20	components))).............(text.
27b80	28 6e 74 68 20 34 20 63 6f 6d 70 6f 6e 65 6e 74 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	(nth.4.components)).............
27ba0	28 74 61 67 73 20 28 61 6e 64 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 68 65 61 64 6c 69 6e 65 2d	(tags.(and.counsel-org-headline-
27bc0	64 69 73 70 6c 61 79 2d 74 61 67 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	display-tags....................
27be0	20 20 20 20 28 6e 74 68 20 35 20 63 6f 6d 70 6f 6e 65 6e 74 73 29 29 29 29 0a 20 20 20 20 20 20	....(nth.5.components)))).......
27c00	20 28 6c 69 73 74 20 28 73 74 72 69 6e 67 2d 6a 6f 69 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20	.(list.(string-join.............
27c20	20 20 28 64 65 6c 71 20 6e 69 6c 20 28 6c 69 73 74 20 6c 65 76 65 6c 0a 20 20 20 20 20 20 20 20	..(delq.nil.(list.level.........
27c40	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 6f 64 6f 0a 20 20 20 20 20	......................todo......
27c60	20 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 6e 64 20 70 72	.........................(and.pr
27c80	69 6f 72 69 74 79 20 28 66 6f 72 6d 61 74 20 22 5b 23 25 63 5d 22 20 70 72 69 6f 72 69 74 79 29	iority.(format."[#%c]".priority)
27ca0	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	)...............................
27cc0	28 73 74 72 69 6e 67 2d 6a 6f 69 6e 20 28 61 70 70 65 6e 64 20 70 61 74 68 20 28 6c 69 73 74 20	(string-join.(append.path.(list.
27ce0	74 65 78 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	text))..........................
27d00	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e	..................counsel-outlin
27d20	65 2d 70 61 74 68 2d 73 65 70 61 72 61 74 6f 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	e-path-separator)...............
27d40	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 61 67 73 29 29 0a 20 20 20 20 20 20 20 20 20	................tags))..........
27d60	20 20 20 20 20 22 20 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 62 75 66 66 65 72 2d 66 69	.....".")..............buffer-fi
27d80	6c 65 2d 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6f 69 6e 74 29 29 29 29 0a	le-name..............(point)))).
27da0	20 20 20 6e 69 6c 0a 20 20 20 27 61 67 65 6e 64 61 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c	...nil....'agenda))..;;;###autol
27dc0	6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 61 67 65 6e 64 61 2d 68 65	oad.(defun.counsel-org-agenda-he
27de0	61 64 6c 69 6e 65 73 20 28 29 0a 20 20 22 43 68 6f 6f 73 65 20 66 72 6f 6d 20 68 65 61 64 65 72	adlines.()..."Choose.from.header
27e00	73 20 6f 66 20 60 6f 72 67 2d 6d 6f 64 65 27 20 66 69 6c 65 73 20 69 6e 20 74 68 65 20 61 67 65	s.of.`org-mode'.files.in.the.age
27e20	6e 64 61 2e 22 0a 20 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	nda."...(interactive)...(require
27e40	20 27 6f 72 67 29 0a 20 20 28 6c 65 74 20 28 28 6d 69 6e 69 62 75 66 66 65 72 2d 61 6c 6c 6f 77	.'org)...(let.((minibuffer-allow
27e60	2d 74 65 78 74 2d 70 72 6f 70 65 72 74 69 65 73 20 74 29 29 0a 20 20 20 20 28 69 76 79 2d 72 65	-text-properties.t)).....(ivy-re
27e80	61 64 20 22 4f 72 67 20 68 65 61 64 6c 69 6e 65 3a 20 22 0a 20 20 20 20 20 20 20 20 20 20 20 20	ad."Org.headline:.".............
27ea0	20 20 28 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 61 67 65 6e 64 61 2d 68 65 61 64 6c 69 6e 65 73 2d	..(counsel-org-agenda-headlines-
27ec0	2d 63 61 6e 64 69 64 61 74 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69	-candidates)...............:acti
27ee0	6f 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 61 67 65 6e 64 61 2d 68 65 61 64 6c 69 6e 65	on.#'counsel-org-agenda-headline
27f00	73 2d 61 63 74 69 6f 6e 2d 67 6f 74 6f 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 69 73	s-action-goto...............:his
27f20	74 6f 72 79 20 27 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 61 67 65 6e 64 61 2d 68 65 61 64 6c 69 6e	tory.'counsel-org-agenda-headlin
27f40	65 73 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72	es-history...............:caller
27f60	20 27 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 61 67 65 6e 64 61 2d 68 65 61 64 6c 69 6e 65 73 29 29	.'counsel-org-agenda-headlines))
27f80	29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 6c 69 6e 6b 27 0a 0a 3b 3b 20 4d	)..;;;;.`counsel-org-link'..;;.M
27fa0	6f 76 65 64 20 66 72 6f 6d 20 60 6f 72 67 27 20 74 6f 20 60 6f 6c 27 20 69 6e 20 45 6d 61 63 73	oved.from.`org'.to.`ol'.in.Emacs
27fc0	20 32 37 2e 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 6f 72 67 2d 69 6e 73 65 72	.27..(declare-function.org-inser
27fe0	74 2d 6c 69 6e 6b 20 22 6f 6c 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 6f	t-link."ol").(declare-function.o
28000	72 67 2d 69 64 2d 67 65 74 2d 63 72 65 61 74 65 20 22 6f 72 67 2d 69 64 22 29 0a 0a 28 64 65 66	rg-id-get-create."org-id")..(def
28020	75 6e 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 6c 69 6e 6b 2d 61 63 74 69 6f 6e 20 28 78 29 0a 20	un.counsel-org-link-action.(x)..
28040	20 22 49 6e 73 65 72 74 20 61 20 6c 69 6e 6b 20 74 6f 20 58 2e 22 0a 20 20 28 6c 65 74 20 28 28	."Insert.a.link.to.X."...(let.((
28060	69 64 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	id.(save-excursion..............
28080	20 28 67 6f 74 6f 2d 63 68 61 72 20 28 63 64 72 20 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20	.(goto-char.(cdr.x))............
280a0	20 20 20 28 6f 72 67 2d 69 64 2d 67 65 74 2d 63 72 65 61 74 65 29 29 29 29 0a 20 20 20 20 28 6f	...(org-id-get-create)))).....(o
280c0	72 67 2d 69 6e 73 65 72 74 2d 6c 69 6e 6b 20 6e 69 6c 20 28 63 6f 6e 63 61 74 20 22 69 64 3a 22	rg-insert-link.nil.(concat."id:"
280e0	20 69 64 29 20 28 63 61 72 20 78 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a	.id).(car.x))))..;;;###autoload.
28100	28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 6c 69 6e 6b 20 28 29 0a 20 20 22 49 6e	(defun.counsel-org-link.()..."In
28120	73 65 72 74 20 61 20 6c 69 6e 6b 20 74 6f 20 61 6e 20 68 65 61 64 6c 69 6e 65 20 77 69 74 68 20	sert.a.link.to.an.headline.with.
28140	63 6f 6d 70 6c 65 74 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	completion."...(interactive)...(
28160	69 76 79 2d 72 65 61 64 20 22 4c 69 6e 6b 3a 20 22 20 28 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69	ivy-read."Link:.".(counsel-outli
28180	6e 65 2d 63 61 6e 64 69 64 61 74 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ne-candidates...................
281a0	20 20 20 20 27 28 3a 6f 75 74 6c 69 6e 65 2d 74 69 74 6c 65 20 63 6f 75 6e 73 65 6c 2d 6f 75 74	....'(:outline-title.counsel-out
281c0	6c 69 6e 65 2d 74 69 74 6c 65 2d 6f 72 67 20 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 61	line-title-org.)).............:a
281e0	63 74 69 6f 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 6c 69 6e 6b 2d 61 63 74 69 6f 6e 0a	ction.#'counsel-org-link-action.
28200	20 20 20 20 20 20 20 20 20 20 20 20 3a 68 69 73 74 6f 72 79 20 27 63 6f 75 6e 73 65 6c 2d 6f 72	............:history.'counsel-or
28220	67 2d 6c 69 6e 6b 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c	g-link-history.............:call
28240	65 72 20 27 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 6c 69 6e 6b 29 29 0a 0c 0a 3b 3b 3b 20 4d 69 73	er.'counsel-org-link))...;;;.Mis
28260	63 2e 20 45 6d 61 63 73 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 6d 61 72 6b 2d 72 69 6e 67	c..Emacs.;;;;.`counsel-mark-ring
28280	27 0a 0a 28 64 65 66 66 61 63 65 20 63 6f 75 6e 73 65 6c 2d 2d 6d 61 72 6b 2d 72 69 6e 67 2d 68	'..(defface.counsel--mark-ring-h
282a0	69 67 68 6c 69 67 68 74 0a 20 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 68 69 67 68 6c 69 67	ighlight...'((t.:inherit.highlig
282c0	68 74 29 29 0a 20 20 22 46 61 63 65 20 66 6f 72 20 63 75 72 72 65 6e 74 20 60 63 6f 75 6e 73 65	ht))..."Face.for.current.`counse
282e0	6c 2d 6d 61 72 6b 2d 72 69 6e 67 27 20 6c 69 6e 65 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 69 76	l-mark-ring'.line."...:group.'iv
28300	79 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 2d 6d 61 72 6b 2d	y-faces)..(defvar.counsel--mark-
28320	72 69 6e 67 2d 6f 76 65 72 6c 61 79 20 6e 69 6c 0a 20 20 22 49 6e 74 65 72 6e 61 6c 20 6f 76 65	ring-overlay.nil..."Internal.ove
28340	72 6c 61 79 20 74 6f 20 68 69 67 68 6c 69 67 68 74 20 6c 69 6e 65 20 62 79 20 63 61 6e 64 69 64	rlay.to.highlight.line.by.candid
28360	61 74 65 20 6f 66 20 60 63 6f 75 6e 73 65 6c 2d 6d 61 72 6b 2d 72 69 6e 67 27 2e 22 29 0a 0a 28	ate.of.`counsel-mark-ring'.")..(
28380	64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 6d 61 72 6b 2d 72 69 6e 67 2d 61 64 64 2d 68 69 67	defun.counsel--mark-ring-add-hig
283a0	68 6c 69 67 68 74 20 28 29 0a 20 20 22 41 64 64 20 68 69 67 68 6c 69 67 68 74 20 74 6f 20 63 75	hlight.()..."Add.highlight.to.cu
283c0	72 72 65 6e 74 20 6c 69 6e 65 2e 22 0a 20 20 28 73 65 74 71 20 63 6f 75 6e 73 65 6c 2d 2d 6d 61	rrent.line."...(setq.counsel--ma
283e0	72 6b 2d 72 69 6e 67 2d 6f 76 65 72 6c 61 79 0a 20 20 20 20 20 20 20 20 28 6d 61 6b 65 2d 6f 76	rk-ring-overlay.........(make-ov
28400	65 72 6c 61 79 20 28 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 29 20	erlay.(line-beginning-position).
28420	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 29 0a 20 20 28 77 69	(1+.(line-end-position))))...(wi
28440	74 68 2d 69 76 79 2d 77 69 6e 64 6f 77 0a 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 63	th-ivy-window.....(overlay-put.c
28460	6f 75 6e 73 65 6c 2d 2d 6d 61 72 6b 2d 72 69 6e 67 2d 6f 76 65 72 6c 61 79 20 27 66 61 63 65 0a	ounsel--mark-ring-overlay.'face.
28480	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 63 6f 75 6e 73 65 6c 2d 2d 6d 61 72 6b 2d	.................'counsel--mark-
284a0	72 69 6e 67 2d 68 69 67 68 6c 69 67 68 74 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65	ring-highlight)))..(defun.counse
284c0	6c 2d 2d 6d 61 72 6b 2d 72 69 6e 67 2d 64 65 6c 65 74 65 2d 68 69 67 68 6c 69 67 68 74 20 28 29	l--mark-ring-delete-highlight.()
284e0	0a 20 20 22 49 66 20 60 63 6f 75 6e 73 65 6c 2d 6d 61 72 6b 2d 72 69 6e 67 27 20 68 61 76 65 20	..."If.`counsel-mark-ring'.have.
28500	68 69 67 68 6c 69 67 68 74 2c 20 64 65 6c 65 74 65 20 68 69 67 68 6c 69 67 68 74 2e 22 0a 20 20	highlight,.delete.highlight."...
28520	28 69 66 20 63 6f 75 6e 73 65 6c 2d 2d 6d 61 72 6b 2d 72 69 6e 67 2d 6f 76 65 72 6c 61 79 20 28	(if.counsel--mark-ring-overlay.(
28540	64 65 6c 65 74 65 2d 6f 76 65 72 6c 61 79 20 63 6f 75 6e 73 65 6c 2d 2d 6d 61 72 6b 2d 72 69 6e	delete-overlay.counsel--mark-rin
28560	67 2d 6f 76 65 72 6c 61 79 29 29 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 2d 6d	g-overlay)))..(defvar.counsel--m
28580	61 72 6b 2d 72 69 6e 67 2d 63 61 6c 6c 69 6e 67 2d 70 6f 69 6e 74 20 30 0a 20 20 22 49 6e 74 65	ark-ring-calling-point.0..."Inte
285a0	72 6e 61 6c 20 76 61 72 69 61 62 6c 65 20 74 6f 20 72 65 6d 65 6d 62 65 72 20 63 61 6c 6c 69 6e	rnal.variable.to.remember.callin
285c0	67 20 70 6f 73 69 74 69 6f 6e 2e 22 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 6d	g.position.")..(defun.counsel--m
285e0	61 72 6b 2d 72 69 6e 67 2d 75 6e 77 69 6e 64 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 62 61 63	ark-ring-unwind.()..."Return.bac
28600	6b 20 74 6f 20 63 61 6c 6c 69 6e 67 20 70 6f 73 69 74 69 6f 6e 20 6f 66 20 60 63 6f 75 6e 73 65	k.to.calling.position.of.`counse
28620	6c 2d 6d 61 72 6b 2d 72 69 6e 67 27 2e 22 0a 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 63 6f 75 6e	l-mark-ring'."...(goto-char.coun
28640	73 65 6c 2d 2d 6d 61 72 6b 2d 72 69 6e 67 2d 63 61 6c 6c 69 6e 67 2d 70 6f 69 6e 74 29 0a 20 20	sel--mark-ring-calling-point)...
28660	28 63 6f 75 6e 73 65 6c 2d 2d 6d 61 72 6b 2d 72 69 6e 67 2d 64 65 6c 65 74 65 2d 68 69 67 68 6c	(counsel--mark-ring-delete-highl
28680	69 67 68 74 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 6d 61 72 6b 2d 72 69 6e	ight))..(defun.counsel--mark-rin
286a0	67 2d 75 70 64 61 74 65 2d 66 6e 20 28 29 0a 20 20 22 53 68 6f 77 20 70 72 65 76 69 65 77 20 62	g-update-fn.()..."Show.preview.b
286c0	79 20 63 61 6e 64 69 64 61 74 65 2e 22 0a 20 20 28 6c 65 74 20 28 28 70 6f 73 20 28 67 65 74 2d	y.candidate."...(let.((pos.(get-
286e0	74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 27 70 6f 69 6e 74 20 28 69 76 79 2d 73 74 61 74	text-property.0.'point.(ivy-stat
28700	65 2d 63 75 72 72 65 6e 74 20 69 76 79 2d 6c 61 73 74 29 29 29 29 0a 20 20 20 20 28 63 6f 75 6e	e-current.ivy-last)))).....(coun
28720	73 65 6c 2d 2d 6d 61 72 6b 2d 72 69 6e 67 2d 64 65 6c 65 74 65 2d 68 69 67 68 6c 69 67 68 74 29	sel--mark-ring-delete-highlight)
28740	0a 20 20 20 20 28 77 69 74 68 2d 69 76 79 2d 77 69 6e 64 6f 77 0a 20 20 20 20 20 20 28 67 6f 74	.....(with-ivy-window.......(got
28760	6f 2d 63 68 61 72 20 70 6f 73 29 0a 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 6d 61 72 6b	o-char.pos).......(counsel--mark
28780	2d 72 69 6e 67 2d 61 64 64 2d 68 69 67 68 6c 69 67 68 74 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61	-ring-add-highlight))))..;;;###a
287a0	75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6d 61 72 6b 2d 72 69 6e 67	utoload.(defun.counsel-mark-ring
287c0	20 28 29 0a 20 20 22 42 72 6f 77 73 65 20 60 6d 61 72 6b 2d 72 69 6e 67 27 20 69 6e 74 65 72 61	.()..."Browse.`mark-ring'.intera
287e0	63 74 69 76 65 6c 79 2e 0a 4f 62 65 79 73 20 60 77 69 64 65 6e 2d 61 75 74 6f 6d 61 74 69 63 61	ctively..Obeys.`widen-automatica
28800	6c 6c 79 27 2c 20 77 68 69 63 68 20 73 65 65 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65	lly',.which.see."...(interactive
28820	29 0a 20 20 28 6c 65 74 2a 20 28 28 63 6f 75 6e 73 65 6c 2d 2d 6d 61 72 6b 2d 72 69 6e 67 2d 63	)...(let*.((counsel--mark-ring-c
28840	61 6c 6c 69 6e 67 2d 70 6f 69 6e 74 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 28	alling-point.(point))..........(
28860	6d 61 72 6b 73 20 28 63 6f 70 79 2d 73 65 71 75 65 6e 63 65 20 6d 61 72 6b 2d 72 69 6e 67 29 29	marks.(copy-sequence.mark-ring))
28880	0a 20 20 20 20 20 20 20 20 20 28 6d 61 72 6b 73 20 28 64 65 6c 65 74 65 2d 64 75 70 73 20 6d 61	..........(marks.(delete-dups.ma
288a0	72 6b 73 29 29 0a 20 20 20 20 20 20 20 20 20 28 6d 61 72 6b 73 0a 20 20 20 20 20 20 20 20 20 20	rks))..........(marks...........
288c0	3b 3b 20 6d 61 72 6b 2d 6d 61 72 6b 65 72 20 69 73 20 65 6d 70 74 79 3f 0a 20 20 20 20 20 20 20	;;.mark-marker.is.empty?........
288e0	20 20 20 28 69 66 20 28 65 71 75 61 6c 20 28 6d 61 72 6b 2d 6d 61 72 6b 65 72 29 20 28 6d 61 6b	...(if.(equal.(mark-marker).(mak
28900	65 2d 6d 61 72 6b 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6d 61 72 6b 73 0a 20	e-marker))...............marks..
28920	20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 28 63 6f 70 79 2d 6d 61 72 6b 65 72 20 28 6d	...........(cons.(copy-marker.(m
28940	61 72 6b 2d 6d 61 72 6b 65 72 29 29 20 6d 61 72 6b 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 28	ark-marker)).marks)))..........(
28960	63 61 6e 64 69 64 61 74 65 73 20 28 63 6f 75 6e 73 65 6c 2d 6d 61 72 6b 2d 2d 67 65 74 2d 63 61	candidates.(counsel-mark--get-ca
28980	6e 64 69 64 61 74 65 73 20 6d 61 72 6b 73 29 29 29 0a 20 20 20 20 28 69 66 20 63 61 6e 64 69 64	ndidates.marks))).....(if.candid
289a0	61 74 65 73 0a 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 6d 61 72 6b 2d 2d 69 76 79 2d	ates.........(counsel-mark--ivy-
289c0	72 65 61 64 20 22 4d 61 72 6b 3a 20 22 20 63 61 6e 64 69 64 61 74 65 73 20 27 63 6f 75 6e 73 65	read."Mark:.".candidates.'counse
289e0	6c 2d 6d 61 72 6b 2d 72 69 6e 67 29 0a 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 4d 61 72	l-mark-ring).......(message."Mar
28a00	6b 20 72 69 6e 67 20 69 73 20 65 6d 70 74 79 22 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75	k.ring.is.empty"))))..(defun.cou
28a20	6e 73 65 6c 2d 6d 61 72 6b 2d 2d 67 65 74 2d 63 61 6e 64 69 64 61 74 65 73 20 28 6d 61 72 6b 73	nsel-mark--get-candidates.(marks
28a40	29 0a 20 20 22 43 6f 6e 76 65 72 74 20 61 20 6c 69 73 74 20 6f 66 20 4d 41 52 4b 53 20 69 6e 74	)..."Convert.a.list.of.MARKS.int
28a60	6f 20 6d 61 72 6b 20 63 61 6e 64 69 64 61 74 65 73 2e 0a 63 61 6e 64 69 64 61 74 65 73 20 61 72	o.mark.candidates..candidates.ar
28a80	65 20 73 69 6d 70 6c 79 20 73 74 72 69 6e 67 73 20 66 6f 72 6d 61 74 74 65 64 20 74 6f 20 68 61	e.simply.strings.formatted.to.ha
28aa0	76 65 20 74 68 65 20 6c 69 6e 65 20 6e 75 6d 62 65 72 20 6f 66 20 74 68 65 0a 61 73 73 6f 63 69	ve.the.line.number.of.the.associ
28ac0	61 74 65 64 20 6d 61 72 6b 20 70 72 65 70 65 6e 64 65 64 20 74 6f 20 74 68 65 6d 20 61 6e 64 20	ated.mark.prepended.to.them.and.
28ae0	68 61 76 69 6e 67 20 61 6e 20 65 78 74 72 61 20 74 65 78 74 20 70 72 6f 70 65 72 74 79 20 6f 66	having.an.extra.text.property.of
28b00	0a 70 6f 69 6e 74 20 74 6f 20 69 6e 64 69 63 61 72 74 65 20 77 68 65 72 65 20 74 68 65 20 63 61	.point.to.indicarte.where.the.ca
28b20	6e 64 69 64 61 74 65 20 6d 61 72 6b 20 69 73 2e 22 0a 20 20 28 77 68 65 6e 20 6d 61 72 6b 73 0a	ndidate.mark.is."...(when.marks.
28b40	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 73 61 76 65 2d	....(save-excursion.......(save-
28b60	72 65 73 74 72 69 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 3b 3b 20 57 69 64 65 6e 2c 20 62 6f	restriction.........;;.Widen,.bo
28b80	74 68 20 74 6f 20 73 61 76 65 20 60 6c 69 6e 65 2d 6e 75 6d 62 65 72 2d 61 74 2d 70 6f 73 27 20	th.to.save.`line-number-at-pos'.
28ba0	74 68 65 20 74 72 6f 75 62 6c 65 0a 20 20 20 20 20 20 20 20 3b 3b 20 61 6e 64 20 66 6f 72 20 60	the.trouble.........;;.and.for.`
28bc0	62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 27 20 74 6f 20 77 6f 72 6b 2e 0a 20 20 20 20 20	buffer-substring'.to.work.......
28be0	20 20 20 28 77 69 64 65 6e 29 0a 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 77 69 64 74 68	...(widen).........(let*.((width
28c00	20 28 6c 65 6e 67 74 68 20 28 6e 75 6d 62 65 72 2d 74 6f 2d 73 74 72 69 6e 67 20 28 6c 69 6e 65	.(length.(number-to-string.(line
28c20	2d 6e 75 6d 62 65 72 2d 61 74 2d 70 6f 73 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 29 29 0a 20	-number-at-pos.(point-max)))))..
28c40	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6d 74 20 28 66 6f 72 6d 61 74 20 22 25 25 25 64	..............(fmt.(format."%%%d
28c60	64 20 25 25 73 22 20 77 69 64 74 68 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 61	d.%%s".width)))...........(mapca
28c80	72 20 28 6c 61 6d 62 64 61 20 28 6d 61 72 6b 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	r.(lambda.(mark)................
28ca0	20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 6d 61 72 6b 65 72 2d 70 6f 73 69 74 69 6f 6e	.....(goto-char.(marker-position
28cc0	20 6d 61 72 6b 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74	.mark)).....................(let
28ce0	20 28 28 6c 69 6e 75 6d 20 28 6c 69 6e 65 2d 6e 75 6d 62 65 72 2d 61 74 2d 70 6f 73 29 29 0a 20	.((linum.(line-number-at-pos))..
28d00	20 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 69 6e 65 20 20	.........................(line..
28d20	28 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	(buffer-substring...............
28d40	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 2d 62 65 67 69 6e 6e	....................(line-beginn
28d60	69 6e 67 2d 70 6f 73 69 74 69 6f 6e 29 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e	ing-position).(line-end-position
28d80	29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70	)))).......................(prop
28da0	65 72 74 69 7a 65 20 28 66 6f 72 6d 61 74 20 66 6d 74 20 6c 69 6e 75 6d 20 6c 69 6e 65 29 20 27	ertize.(format.fmt.linum.line).'
28dc0	70 6f 69 6e 74 20 28 70 6f 69 6e 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	point.(point))))................
28de0	20 20 20 6d 61 72 6b 73 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6d	...marks))))))..(defun.counsel-m
28e00	61 72 6b 2d 2d 69 76 79 2d 72 65 61 64 20 28 70 72 6f 6d 70 74 20 63 61 6e 64 69 64 61 74 65 73	ark--ivy-read.(prompt.candidates
28e20	20 63 61 6c 6c 65 72 29 0a 20 20 22 43 61 6c 6c 20 60 69 76 79 2d 72 65 61 64 27 20 77 69 74 68	.caller)..."Call.`ivy-read'.with
28e40	20 73 61 6e 65 20 64 65 66 61 75 6c 74 73 20 66 6f 72 20 74 72 61 76 65 72 73 69 6e 67 20 6d 61	.sane.defaults.for.traversing.ma
28e60	72 6b 73 2e 0a 43 41 4e 44 49 44 41 54 45 53 20 73 68 6f 75 6c 64 20 62 65 20 61 6e 20 61 6c 69	rks..CANDIDATES.should.be.an.ali
28e80	73 74 20 77 69 74 68 20 74 68 65 20 60 63 61 72 27 20 6f 66 20 74 68 65 20 6c 69 73 74 20 62 65	st.with.the.`car'.of.the.list.be
28ea0	69 6e 67 0a 74 68 65 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 63 61 6e 64 69 64 61 74 65 20 73 74 72	ing.the.completion.candidate.str
28ec0	69 6e 67 20 61 6e 64 20 74 68 65 20 60 63 64 72 27 20 62 65 69 6e 67 20 74 68 65 20 70 6f 69 6e	ing.and.the.`cdr'.being.the.poin
28ee0	74 20 74 68 61 74 0a 6d 61 72 6b 20 73 68 6f 75 6c 64 20 74 61 6b 65 20 79 6f 75 20 74 6f 2e 0a	t.that.mark.should.take.you.to..
28f00	0a 54 68 69 73 20 73 75 62 72 6f 75 74 69 6e 65 20 69 73 20 69 6e 74 65 6e 64 65 64 20 74 6f 20	.This.subroutine.is.intended.to.
28f20	62 65 20 75 73 65 64 20 62 79 20 62 6f 74 68 20 60 63 6f 75 6e 73 65 6c 2d 6d 61 72 6b 2d 72 69	be.used.by.both.`counsel-mark-ri
28f40	6e 67 27 20 61 6e 64 0a 60 63 6f 75 6e 73 65 6c 2d 65 76 69 6c 2d 6d 61 72 6b 73 27 2e 22 0a 20	ng'.and.`counsel-evil-marks'."..
28f60	20 28 69 76 79 2d 72 65 61 64 20 70 72 6f 6d 70 74 20 63 61 6e 64 69 64 61 74 65 73 0a 20 20 20	.(ivy-read.prompt.candidates....
28f80	20 20 20 20 20 20 20 20 20 3a 72 65 71 75 69 72 65 2d 6d 61 74 63 68 20 74 0a 20 20 20 20 20 20	.........:require-match.t.......
28fa0	20 20 20 20 20 20 3a 75 70 64 61 74 65 2d 66 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 2d 6d 61 72 6b	......:update-fn.#'counsel--mark
28fc0	2d 72 69 6e 67 2d 75 70 64 61 74 65 2d 66 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74	-ring-update-fn.............:act
28fe0	69 6f 6e 20 28 6c 61 6d 62 64 61 20 28 63 61 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	ion.(lambda.(cand)..............
29000	20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 70 6f 73 20 28 67 65 74 2d 74 65 78 74 2d 70 72	.........(let.((pos.(get-text-pr
29020	6f 70 65 72 74 79 20 30 20 27 70 6f 69 6e 74 20 63 61 6e 64 29 29 29 0a 20 20 20 20 20 20 20 20	operty.0.'point.cand))).........
29040	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 70 6f 73 0a 20 20 20 20 20 20	................(when.pos.......
29060	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 3c 3d 20	....................(unless.(<=.
29080	28 70 6f 69 6e 74 2d 6d 69 6e 29 20 70 6f 73 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 20 20 20	(point-min).pos.(point-max))....
290a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 77 69 64	.........................(if.wid
290c0	65 6e 2d 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	en-automatically................
290e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 64 65 6e 29 0a 20 20 20 20 20 20 20	.................(widen)........
29100	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 6f 72 20 22 5c	.......................(error."\
29120	0a 50 6f 73 69 74 69 6f 6e 20 6f 66 20 73 65 6c 65 63 74 65 64 20 6d 61 72 6b 20 6f 75 74 73 69	.Position.of.selected.mark.outsi
29140	64 65 20 61 63 63 65 73 73 69 62 6c 65 20 70 61 72 74 20 6f 66 20 62 75 66 66 65 72 22 29 29 29	de.accessible.part.of.buffer")))
29160	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 67 6f 74 6f	...........................(goto
29180	2d 63 68 61 72 20 70 6f 73 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 75 6e 77 69 6e	-char.pos)))).............:unwin
291a0	64 20 23 27 63 6f 75 6e 73 65 6c 2d 2d 6d 61 72 6b 2d 72 69 6e 67 2d 75 6e 77 69 6e 64 0a 20 20	d.#'counsel--mark-ring-unwind...
291c0	20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 63 61 6c 6c 65 72 29 29 0a 0a 28 69 76 79	..........:caller.caller))..(ivy
291e0	2d 63 6f 6e 66 69 67 75 72 65 20 27 63 6f 75 6e 73 65 6c 2d 6d 61 72 6b 2d 72 69 6e 67 0a 20 20	-configure.'counsel-mark-ring...
29200	3a 75 70 64 61 74 65 2d 66 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 2d 6d 61 72 6b 2d 72 69 6e 67 2d	:update-fn.#'counsel--mark-ring-
29220	75 70 64 61 74 65 2d 66 6e 0a 20 20 3a 75 6e 77 69 6e 64 2d 66 6e 20 23 27 63 6f 75 6e 73 65 6c	update-fn...:unwind-fn.#'counsel
29240	2d 2d 6d 61 72 6b 2d 72 69 6e 67 2d 75 6e 77 69 6e 64 0a 20 20 3a 73 6f 72 74 2d 66 6e 20 23 27	--mark-ring-unwind...:sort-fn.#'
29260	69 76 79 2d 73 74 72 69 6e 67 3c 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 65 76 69 6c	ivy-string<)..;;;;.`counsel-evil
29280	2d 6d 61 72 6b 73 27 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 65 76 69 6c 2d 6d 61	-marks'..(defvar.counsel-evil-ma
292a0	72 6b 73 2d 65 78 63 6c 75 64 65 2d 72 65 67 69 73 74 65 72 73 20 6e 69 6c 0a 20 20 22 4c 69 73	rks-exclude-registers.nil..."Lis
292c0	74 20 6f 66 20 65 76 69 6c 20 72 65 67 69 73 74 65 72 73 20 74 6f 20 6e 6f 74 20 64 69 73 70 6c	t.of.evil.registers.to.not.displ
292e0	61 79 20 69 6e 20 60 63 6f 75 6e 73 65 6c 2d 65 76 69 6c 2d 6d 61 72 6b 73 27 20 62 79 20 64 65	ay.in.`counsel-evil-marks'.by.de
29300	66 61 75 6c 74 2e 0a 45 61 63 68 20 6d 65 6d 62 65 72 20 6f 66 20 74 68 65 20 6c 69 73 74 20 73	fault..Each.member.of.the.list.s
29320	68 6f 75 6c 64 20 62 65 20 61 20 63 68 61 72 61 63 74 65 72 20 28 73 74 6f 72 65 64 20 61 73 20	hould.be.a.character.(stored.as.
29340	61 6e 20 69 6e 74 65 67 65 72 29 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 65 76 69 6c 2d 6d 61 72	an.integer).")..(defvar.evil-mar
29360	6b 65 72 73 2d 61 6c 69 73 74 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 65 76	kers-alist).(declare-function.ev
29380	69 6c 2d 67 6c 6f 62 61 6c 2d 6d 61 72 6b 65 72 2d 70 20 22 65 78 74 3a 65 76 69 6c 2d 63 6f 6d	il-global-marker-p."ext:evil-com
293a0	6d 6f 6e 22 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6d 61 72 6b 2d 2d 67 65 74 2d	mon")..(defun.counsel-mark--get-
293c0	65 76 69 6c 2d 63 61 6e 64 69 64 61 74 65 73 20 28 61 6c 6c 2d 6d 61 72 6b 65 72 73 2d 70 29 0a	evil-candidates.(all-markers-p).
293e0	20 20 22 43 6f 6e 76 65 72 74 20 61 6c 6c 20 65 76 69 6c 20 4d 41 52 4b 53 20 69 6e 20 74 68 65	.."Convert.all.evil.MARKS.in.the
29400	20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 20 74 6f 20 6d 61 72 6b 20 63 61 6e 64 69 64 61 74	.current.buffer.to.mark.candidat
29420	65 73 2e 0a 57 6f 72 6b 73 20 6c 69 6b 65 20 60 63 6f 75 6e 73 65 6c 2d 6d 61 72 6b 2d 2d 67 65	es..Works.like.`counsel-mark--ge
29440	74 2d 63 61 6e 64 69 64 61 74 65 73 27 20 62 75 74 20 61 6c 73 6f 20 70 72 65 70 65 6e 64 73 20	t-candidates'.but.also.prepends.
29460	74 68 65 0a 72 65 67 69 73 74 65 72 20 74 69 65 64 20 74 6f 20 61 20 6d 61 72 6b 20 69 6e 20 74	the.register.tied.to.a.mark.in.t
29480	68 65 20 6d 65 73 73 61 67 65 20 73 74 72 69 6e 67 2e 22 0a 20 20 3b 3b 20 65 76 69 6c 20 64 6f	he.message.string."...;;.evil.do
294a0	65 73 6e 27 74 20 70 72 6f 76 69 64 65 20 61 20 73 74 61 6e 64 61 6c 6f 6e 65 20 6d 65 74 68 6f	esn't.provide.a.standalone.metho
294c0	64 20 74 6f 20 61 63 63 65 73 73 20 74 68 65 20 6c 69 73 74 20 6f 66 0a 20 20 3b 3b 20 6d 61 72	d.to.access.the.list.of...;;.mar
294e0	6b 73 20 69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2c 20 61 73 20 69 74 20	ks.in.the.current.buffer,.as.it.
29500	64 6f 65 73 20 77 69 74 68 20 72 65 67 69 73 74 65 72 73 2e 0a 20 20 28 6c 65 74 2a 20 28 28 61	does.with.registers....(let*.((a
29520	6c 6c 2d 6d 61 72 6b 65 72 73 0a 20 20 20 20 20 20 20 20 20 20 28 61 70 70 65 6e 64 0a 20 20 20	ll-markers...........(append....
29540	20 20 20 20 20 20 20 20 28 63 6c 2d 72 65 6d 6f 76 65 2d 69 66 20 28 6c 61 6d 62 64 61 20 28 6d	........(cl-remove-if.(lambda.(m
29560	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 6f 72	)............................(or
29580	20 28 65 76 69 6c 2d 67 6c 6f 62 61 6c 2d 6d 61 72 6b 65 72 2d 70 20 28 63 61 72 20 6d 29 29 0a	.(evil-global-marker-p.(car.m)).
295a0	20 20 20 20 20 20 20 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	...............................(
295c0	6e 6f 74 20 28 6d 61 72 6b 65 72 70 20 28 63 64 72 20 6d 29 29 29 29 29 0a 20 20 20 20 20 20 20	not.(markerp.(cdr.m)))))........
295e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 76 69 6c 2d 6d 61 72 6b 65 72 73 2d 61	..................evil-markers-a
29600	6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 72 65 6d 6f 76 65 2d 69 66 20 28	list)............(cl-remove-if.(
29620	6c 61 6d 62 64 61 20 28 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	lambda.(m)......................
29640	20 20 20 20 20 20 28 6f 72 20 28 6e 6f 74 20 28 65 76 69 6c 2d 67 6c 6f 62 61 6c 2d 6d 61 72 6b	......(or.(not.(evil-global-mark
29660	65 72 2d 70 20 28 63 61 72 20 6d 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	er-p.(car.m)))..................
29680	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 6d 61 72 6b 65 72 70 20 28 63 64 72	..............(not.(markerp.(cdr
296a0	20 6d 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.m))))).........................
296c0	20 28 64 65 66 61 75 6c 74 2d 76 61 6c 75 65 20 27 65 76 69 6c 2d 6d 61 72 6b 65 72 73 2d 61 6c	.(default-value.'evil-markers-al
296e0	69 73 74 29 29 29 29 0a 0a 20 20 20 20 20 20 20 20 20 28 61 6c 6c 2d 6d 61 72 6b 65 72 73 0a 20	ist))))...........(all-markers..
29700	20 20 20 20 20 20 20 20 20 3b 3b 20 77 69 74 68 20 70 72 65 66 69 78 2c 20 69 67 6e 6f 72 65 20	.........;;.with.prefix,.ignore.
29720	72 65 67 69 73 74 65 72 20 65 78 63 6c 75 73 69 6f 6e 20 6c 69 73 74 2e 0a 20 20 20 20 20 20 20	register.exclusion.list.........
29740	20 20 20 28 69 66 20 61 6c 6c 2d 6d 61 72 6b 65 72 73 2d 70 0a 20 20 20 20 20 20 20 20 20 20 20	...(if.all-markers-p............
29760	20 20 20 61 6c 6c 2d 6d 61 72 6b 65 72 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 72	...all-markers.............(cl-r
29780	65 6d 6f 76 65 2d 69 66 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 78	emove-if..............(lambda.(x
297a0	29 20 28 6d 65 6d 62 65 72 20 28 63 61 72 20 78 29 20 63 6f 75 6e 73 65 6c 2d 65 76 69 6c 2d 6d	).(member.(car.x).counsel-evil-m
297c0	61 72 6b 73 2d 65 78 63 6c 75 64 65 2d 72 65 67 69 73 74 65 72 73 29 29 0a 20 20 20 20 20 20 20	arks-exclude-registers))........
297e0	20 20 20 20 20 20 61 6c 6c 2d 6d 61 72 6b 65 72 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 3b 3b	......all-markers)))..........;;
29800	20 73 65 70 61 72 61 74 65 20 74 68 65 20 6d 61 72 6b 65 72 73 20 66 72 6f 6d 20 74 68 65 20 65	.separate.the.markers.from.the.e
29820	76 69 6c 20 72 65 67 69 73 74 65 72 73 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 66 6f 72 20 63 61	vil.registers..........;;.for.ca
29840	6c 6c 20 74 6f 20 60 63 6f 75 6e 73 65 6c 2d 6d 61 72 6b 2d 2d 67 65 74 2d 63 61 6e 64 69 64 61	ll.to.`counsel-mark--get-candida
29860	74 65 73 27 0a 20 20 20 20 20 20 20 20 20 28 72 65 67 69 73 74 65 72 73 20 28 6d 61 70 63 61 72	tes'..........(registers.(mapcar
29880	20 23 27 63 61 72 20 61 6c 6c 2d 6d 61 72 6b 65 72 73 29 29 0a 20 20 20 20 20 20 20 20 20 28 6d	.#'car.all-markers))..........(m
298a0	61 72 6b 65 72 73 20 28 6d 61 70 63 61 72 20 23 27 63 64 72 20 61 6c 6c 2d 6d 61 72 6b 65 72 73	arkers.(mapcar.#'cdr.all-markers
298c0	29 29 0a 20 20 20 20 20 20 20 20 20 28 63 61 6e 64 69 64 61 74 65 73 20 28 63 6f 75 6e 73 65 6c	))..........(candidates.(counsel
298e0	2d 6d 61 72 6b 2d 2d 67 65 74 2d 63 61 6e 64 69 64 61 74 65 73 20 6d 61 72 6b 65 72 73 29 29 29	-mark--get-candidates.markers)))
29900	0a 20 20 20 20 28 77 68 65 6e 20 63 61 6e 64 69 64 61 74 65 73 0a 20 20 20 20 20 20 28 6c 65 74	.....(when.candidates.......(let
29920	20 28 72 65 67 69 73 74 65 72 20 63 61 6e 64 69 64 61 74 65 20 72 65 73 75 6c 74 29 0a 20 20 20	.(register.candidate.result)....
29940	20 20 20 20 20 28 77 68 69 6c 65 20 28 61 6e 64 20 28 73 65 74 71 20 72 65 67 69 73 74 65 72 20	.....(while.(and.(setq.register.
29960	28 70 6f 70 20 72 65 67 69 73 74 65 72 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	(pop.registers))................
29980	20 20 20 20 20 28 73 65 74 71 20 63 61 6e 64 69 64 61 74 65 20 28 70 6f 70 20 63 61 6e 64 69 64	.....(setq.candidate.(pop.candid
299a0	61 74 65 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 70 6f 69 6e 74 20 28	ates)))...........(let.((point.(
299c0	67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 27 70 6f 69 6e 74 20 63 61 6e 64 69	get-text-property.0.'point.candi
299e0	64 61 74 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 76 69 6c 2d 63 61 6e	date)).................(evil-can
29a00	64 69 64 61 74 65 0a 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	didate..................(format.
29a20	22 5b 25 73 5d 3a 20 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	"[%s]:.%s"......................
29a40	20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28 63 68 61 72 2d 74 6f 2d 73 74 72 69 6e 67 20	....(propertize.(char-to-string.
29a60	72 65 67 69 73 74 65 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	register).......................
29a80	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 27 63 6f 75 6e 73 65 6c 2d 65 76	...............'face.'counsel-ev
29aa0	69 6c 2d 72 65 67 69 73 74 65 72 2d 66 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	il-register-face)...............
29ac0	20 20 20 20 20 20 20 20 20 20 20 63 61 6e 64 69 64 61 74 65 29 29 29 0a 20 20 20 20 20 20 20 20	...........candidate))).........
29ae0	20 20 20 20 28 70 75 73 68 20 28 70 72 6f 70 65 72 74 69 7a 65 20 65 76 69 6c 2d 63 61 6e 64 69	....(push.(propertize.evil-candi
29b00	64 61 74 65 20 27 70 6f 69 6e 74 20 70 6f 69 6e 74 29 20 72 65 73 75 6c 74 29 29 29 0a 20 20 20	date.'point.point).result)))....
29b20	20 20 20 20 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	.....result))))..;;;###autoload.
29b40	28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 65 76 69 6c 2d 6d 61 72 6b 73 20 28 26 6f 70 74 69	(defun.counsel-evil-marks.(&opti
29b60	6f 6e 61 6c 20 61 72 67 29 0a 20 20 22 49 76 79 20 72 65 70 6c 61 63 65 6d 65 6e 74 20 66 6f 72	onal.arg)..."Ivy.replacement.for
29b80	20 60 65 76 69 6c 2d 73 68 6f 77 2d 6d 61 72 6b 73 27 2e 0a 42 79 20 64 65 66 61 75 6c 74 2c 20	.`evil-show-marks'..By.default,.
29ba0	74 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 72 65 73 70 65 63 74 73 20 60 63 6f 75 6e 73 65 6c 2d	this.function.respects.`counsel-
29bc0	65 76 69 6c 2d 6d 61 72 6b 73 2d 65 78 63 6c 75 64 65 2d 72 65 67 69 73 74 65 72 73 27 2e 0a 57	evil-marks-exclude-registers'..W
29be0	68 65 6e 20 41 52 47 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 64 69 73 70 6c 61 79 20 61 6c 6c 20	hen.ARG.is.non-nil,.display.all.
29c00	61 63 74 69 76 65 20 65 76 69 6c 20 72 65 67 69 73 74 65 72 73 2e 22 0a 20 20 28 69 6e 74 65 72	active.evil.registers."...(inter
29c20	61 63 74 69 76 65 20 22 50 22 29 0a 20 20 28 69 66 20 28 61 6e 64 20 28 62 6f 75 6e 64 70 20 27	active."P")...(if.(and.(boundp.'
29c40	65 76 69 6c 2d 6d 61 72 6b 65 72 73 2d 61 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 28	evil-markers-alist)............(
29c60	66 62 6f 75 6e 64 70 20 27 65 76 69 6c 2d 67 6c 6f 62 61 6c 2d 6d 61 72 6b 65 72 2d 70 29 29 0a	fboundp.'evil-global-marker-p)).
29c80	20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 63 6f 75 6e 73 65 6c 2d 2d 6d 61 72 6b 2d 72 69 6e 67	......(let*.((counsel--mark-ring
29ca0	2d 63 61 6c 6c 69 6e 67 2d 70 6f 69 6e 74 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20	-calling-point.(point)).........
29cc0	20 20 20 20 20 28 63 61 6e 64 69 64 61 74 65 73 20 28 63 6f 75 6e 73 65 6c 2d 6d 61 72 6b 2d 2d	.....(candidates.(counsel-mark--
29ce0	67 65 74 2d 65 76 69 6c 2d 63 61 6e 64 69 64 61 74 65 73 20 61 72 67 29 29 29 0a 20 20 20 20 20	get-evil-candidates.arg)))......
29d00	20 20 20 28 69 66 20 63 61 6e 64 69 64 61 74 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63	...(if.candidates.............(c
29d20	6f 75 6e 73 65 6c 2d 6d 61 72 6b 2d 2d 69 76 79 2d 72 65 61 64 20 22 45 76 69 6c 20 6d 61 72 6b	ounsel-mark--ivy-read."Evil.mark
29d40	3a 20 22 20 63 61 6e 64 69 64 61 74 65 73 20 27 63 6f 75 6e 73 65 6c 2d 65 76 69 6c 2d 6d 61 72	:.".candidates.'counsel-evil-mar
29d60	6b 73 29 0a 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 4e 6f 20 65 76 69 6c 20	ks)...........(message."No.evil.
29d80	6d 61 72 6b 73 20 61 72 65 20 61 63 74 69 76 65 22 29 29 29 0a 20 20 20 20 28 75 73 65 72 2d 65	marks.are.active"))).....(user-e
29da0	72 72 6f 72 20 22 52 65 71 75 69 72 65 64 20 66 65 61 74 75 72 65 20 60 65 76 69 6c 27 20 6e 6f	rror."Required.feature.`evil'.no
29dc0	74 20 69 6e 73 74 61 6c 6c 65 64 20 6f 72 20 6c 6f 61 64 65 64 22 29 29 29 0a 0a 3b 3b 3b 3b 20	t.installed.or.loaded")))..;;;;.
29de0	60 63 6f 75 6e 73 65 6c 2d 70 61 63 6b 61 67 65 27 0a 0a 28 64 65 66 76 61 72 20 70 61 63 6b 61	`counsel-package'..(defvar.packa
29e00	67 65 2d 2d 69 6e 69 74 69 61 6c 69 7a 65 64 29 0a 28 64 65 66 76 61 72 20 70 61 63 6b 61 67 65	ge--initialized).(defvar.package
29e20	2d 61 6c 69 73 74 29 0a 28 64 65 66 76 61 72 20 70 61 63 6b 61 67 65 2d 61 72 63 68 69 76 65 2d	-alist).(defvar.package-archive-
29e40	63 6f 6e 74 65 6e 74 73 29 0a 28 64 65 66 76 61 72 20 70 61 63 6b 61 67 65 2d 61 72 63 68 69 76	contents).(defvar.package-archiv
29e60	65 73 29 0a 28 64 65 66 76 61 72 20 70 61 63 6b 61 67 65 2d 75 73 65 72 2d 64 69 72 29 0a 28 64	es).(defvar.package-user-dir).(d
29e80	65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 70 61 63 6b 61 67 65 2d 69 6e 73 74 61 6c 6c 65	eclare-function.package-installe
29ea0	64 2d 70 20 22 70 61 63 6b 61 67 65 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e	d-p."package").(declare-function
29ec0	20 70 61 63 6b 61 67 65 2d 64 65 6c 65 74 65 20 22 70 61 63 6b 61 67 65 22 29 0a 28 64 65 63 6c	.package-delete."package").(decl
29ee0	61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 70 61 63 6b 61 67 65 2d 64 65 73 63 2d 65 78 74 72 61 73	are-function.package-desc-extras
29f00	20 22 70 61 63 6b 61 67 65 22 20 74 20 74 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c	."package".t.t)..(defvar.counsel
29f20	2d 70 61 63 6b 61 67 65 2d 68 69 73 74 6f 72 79 20 6e 69 6c 0a 20 20 22 48 69 73 74 6f 72 79 20	-package-history.nil..."History.
29f40	66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 70 61 63 6b 61 67 65 27 2e 22 29 0a 0a 28 64 65 66 75 6e	for.`counsel-package'.")..(defun
29f60	20 63 6f 75 6e 73 65 6c 2d 2d 70 61 63 6b 61 67 65 2d 63 61 6e 64 69 64 61 74 65 73 20 28 29 0a	.counsel--package-candidates.().
29f80	20 20 22 52 65 74 75 72 6e 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 61 6c 69 73 74 20 66 6f 72 20 60	.."Return.completion.alist.for.`
29fa0	63 6f 75 6e 73 65 6c 2d 70 61 63 6b 61 67 65 27 2e 22 0a 20 20 28 75 6e 6c 65 73 73 20 70 61 63	counsel-package'."...(unless.pac
29fc0	6b 61 67 65 2d 2d 69 6e 69 74 69 61 6c 69 7a 65 64 0a 20 20 20 20 28 70 61 63 6b 61 67 65 2d 69	kage--initialized.....(package-i
29fe0	6e 69 74 69 61 6c 69 7a 65 20 74 29 29 0a 20 20 28 69 66 20 28 6f 72 20 28 6e 6f 74 20 70 61 63	nitialize.t))...(if.(or.(not.pac
2a000	6b 61 67 65 2d 61 72 63 68 69 76 65 2d 63 6f 6e 74 65 6e 74 73 29 0a 20 20 20 20 20 20 20 20 20	kage-archive-contents)..........
2a020	20 28 63 6c 2d 66 69 6e 64 2d 69 66 20 28 6c 61 6d 62 64 61 20 28 70 61 63 6b 61 67 65 2d 61 72	.(cl-find-if.(lambda.(package-ar
2a040	63 68 69 76 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 28	chive).........................(
2a060	6c 65 74 20 28 28 66 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	let.((fname.....................
2a080	20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	...........(format..............
2a0a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 25 73 2f 61 72 63 68 69 76 65 73 2f	..................."%s/archives/
2a0c0	25 73 2f 61 72 63 68 69 76 65 2d 63 6f 6e 74 65 6e 74 73 22 0a 20 20 20 20 20 20 20 20 20 20 20	%s/archive-contents"............
2a0e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 61 63 6b 61 67 65 2d 75 73 65	.....................package-use
2a100	72 2d 64 69 72 20 28 63 61 72 20 70 61 63 6b 61 67 65 2d 61 72 63 68 69 76 65 29 29 29 29 0a 20	r-dir.(car.package-archive))))..
2a120	20 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 20 28 6e 6f	.........................(or.(no
2a140	74 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 66 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20	t.(file-exists-p.fname))........
2a160	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 73 65 6c 2d	.......................(counsel-
2a180	66 69 6c 65 2d 73 74 61 6c 65 2d 70 20 66 6e 61 6d 65 20 28 2a 20 34 20 36 30 20 36 30 29 29 29	file-stale-p.fname.(*.4.60.60)))
2a1a0	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 70 61 63 6b 61 67 65	)).......................package
2a1c0	2d 61 72 63 68 69 76 65 73 29 29 0a 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 72 65 66 72 65	-archives)).......(package-refre
2a1e0	73 68 2d 63 6f 6e 74 65 6e 74 73 29 29 0a 20 20 28 73 6f 72 74 20 28 6d 61 70 63 61 72 20 28 6c	sh-contents))...(sort.(mapcar.(l
2a200	61 6d 62 64 61 20 28 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	ambda.(entry)...................
2a220	28 63 6f 6e 73 20 28 6c 65 74 20 28 28 70 6b 67 20 28 63 61 72 20 65 6e 74 72 79 29 29 29 0a 20	(cons.(let.((pkg.(car.entry)))..
2a240	20 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 6e 63 61 74	.........................(concat
2a260	20 28 69 66 20 28 70 61 63 6b 61 67 65 2d 69 6e 73 74 61 6c 6c 65 64 2d 70 20 70 6b 67 29 20 22	.(if.(package-installed-p.pkg)."
2a280	2d 22 20 22 2b 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	-"."+").........................
2a2a0	20 20 20 20 20 20 20 20 20 20 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 70 6b 67 29 29 29 0a 20 20	..........(symbol-name.pkg)))...
2a2c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6e 74 72 79 29 29 0a 20 20	......................entry))...
2a2e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 61 63 6b 61 67 65 2d 61 72 63 68 69 76 65 2d 63 6f	..............package-archive-co
2a300	6e 74 65 6e 74 73 29 0a 20 20 20 20 20 20 20 20 23 27 63 6f 75 6e 73 65 6c 2d 2d 70 61 63 6b 61	ntents).........#'counsel--packa
2a320	67 65 2d 73 6f 72 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	ge-sort))..;;;###autoload.(defun
2a340	20 63 6f 75 6e 73 65 6c 2d 70 61 63 6b 61 67 65 20 28 29 0a 20 20 22 49 6e 73 74 61 6c 6c 20 6f	.counsel-package.()..."Install.o
2a360	72 20 64 65 6c 65 74 65 20 70 61 63 6b 61 67 65 73 2e 0a 0a 50 61 63 6b 61 67 65 73 20 6e 6f 74	r.delete.packages...Packages.not
2a380	20 63 75 72 72 65 6e 74 6c 79 20 69 6e 73 74 61 6c 6c 65 64 20 61 72 65 20 70 72 65 66 69 78 65	.currently.installed.are.prefixe
2a3a0	64 20 77 69 74 68 20 5c 22 2b 5c 22 2c 20 61 6e 64 0a 73 65 6c 65 63 74 69 6e 67 20 6f 6e 65 20	d.with.\"+\",.and.selecting.one.
2a3c0	6f 66 20 74 68 65 73 65 20 77 69 6c 6c 20 74 72 79 20 74 6f 20 69 6e 73 74 61 6c 6c 20 69 74 2e	of.these.will.try.to.install.it.
2a3e0	0a 50 61 63 6b 61 67 65 73 20 63 75 72 72 65 6e 74 6c 79 20 69 6e 73 74 61 6c 6c 65 64 20 61 72	.Packages.currently.installed.ar
2a400	65 20 70 72 65 66 69 78 65 64 20 77 69 74 68 20 5c 22 2d 5c 22 2c 20 61 6e 64 0a 73 65 6c 65 63	e.prefixed.with.\"-\",.and.selec
2a420	74 69 6e 67 20 6f 6e 65 20 6f 66 20 74 68 65 73 65 20 77 69 6c 6c 20 74 72 79 20 74 6f 20 64 65	ting.one.of.these.will.try.to.de
2a440	6c 65 74 65 20 69 74 2e 0a 0a 41 64 64 69 74 69 6f 6e 61 6c 20 61 63 74 69 6f 6e 73 3a 5c 5c 3c	lete.it...Additional.actions:\\<
2a460	69 76 79 2d 6d 69 6e 69 62 75 66 66 65 72 2d 6d 61 70 3e 0a 0a 20 20 5c 5c 5b 69 76 79 2d 64 69	ivy-minibuffer-map>....\\[ivy-di
2a480	73 70 61 74 63 68 69 6e 67 2d 64 6f 6e 65 5d 20 64 3a 20 44 65 73 63 72 69 62 65 20 70 61 63 6b	spatching-done].d:.Describe.pack
2a4a0	61 67 65 0a 20 20 5c 5c 5b 69 76 79 2d 64 69 73 70 61 74 63 68 69 6e 67 2d 64 6f 6e 65 5d 20 68	age...\\[ivy-dispatching-done].h
2a4c0	3a 20 56 69 73 69 74 20 70 61 63 6b 61 67 65 27 73 20 68 6f 6d 65 70 61 67 65 22 0a 20 20 28 69	:.Visit.package's.homepage"...(i
2a4e0	6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 72 65 71 75 69 72 65 20 27 70 61 63 6b 61 67 65 29	nteractive)...(require.'package)
2a500	0a 20 20 28 69 76 79 2d 72 65 61 64 20 22 50 61 63 6b 61 67 65 73 20 28 69 6e 73 74 61 6c 6c 20	...(ivy-read."Packages.(install.
2a520	2b 70 6b 67 20 6f 72 20 64 65 6c 65 74 65 20 2d 70 6b 67 29 3a 20 22 0a 20 20 20 20 20 20 20 20	+pkg.or.delete.-pkg):.".........
2a540	20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 70 61 63 6b 61 67 65 2d 63 61 6e 64 69 64 61 74 65 73	....(counsel--package-candidates
2a560	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 23 27 63 6f 75 6e 73 65 6c 2d	).............:action.#'counsel-
2a580	70 61 63 6b 61 67 65 2d 61 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 71 75	package-action.............:requ
2a5a0	69 72 65 2d 6d 61 74 63 68 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 69 73 74 6f 72 79	ire-match.t.............:history
2a5c0	20 27 63 6f 75 6e 73 65 6c 2d 70 61 63 6b 61 67 65 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20	.'counsel-package-history.......
2a5e0	20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 70 61 63 6b 61 67 65 29 29	......:caller.'counsel-package))
2a600	0a 0a 28 69 76 79 2d 63 6f 6e 66 69 67 75 72 65 20 27 63 6f 75 6e 73 65 6c 2d 70 61 63 6b 61 67	..(ivy-configure.'counsel-packag
2a620	65 0a 20 20 3a 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20 22 5e 2b 22 29 0a 0a 28 64 65 66 75 6e	e...:initial-input."^+")..(defun
2a640	20 63 6f 75 6e 73 65 6c 2d 70 61 63 6b 61 67 65 2d 61 63 74 69 6f 6e 20 28 70 61 63 6b 61 67 65	.counsel-package-action.(package
2a660	29 0a 20 20 22 44 65 6c 65 74 65 20 6f 72 20 69 6e 73 74 61 6c 6c 20 50 41 43 4b 41 47 45 2e 22	)..."Delete.or.install.PACKAGE."
2a680	0a 20 20 28 73 65 74 71 20 70 61 63 6b 61 67 65 20 28 63 61 64 72 20 70 61 63 6b 61 67 65 29 29	...(setq.package.(cadr.package))
2a6a0	0a 20 20 28 69 66 20 28 70 61 63 6b 61 67 65 2d 69 6e 73 74 61 6c 6c 65 64 2d 70 20 70 61 63 6b	...(if.(package-installed-p.pack
2a6c0	61 67 65 29 0a 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 64 65 6c 65 74 65 20 28 63 61 64 72	age).......(package-delete.(cadr
2a6e0	20 28 61 73 73 71 20 70 61 63 6b 61 67 65 20 70 61 63 6b 61 67 65 2d 61 6c 69 73 74 29 29 29 0a	.(assq.package.package-alist))).
2a700	20 20 20 20 28 70 61 63 6b 61 67 65 2d 69 6e 73 74 61 6c 6c 20 70 61 63 6b 61 67 65 29 29 29 0a	....(package-install.package))).
2a720	0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 70 61 63 6b 61 67 65 2d 61 63 74 69 6f 6e 2d 64	.(defun.counsel-package-action-d
2a740	65 73 63 72 69 62 65 20 28 70 61 63 6b 61 67 65 29 0a 20 20 22 43 61 6c 6c 20 60 64 65 73 63 72	escribe.(package)..."Call.`descr
2a760	69 62 65 2d 70 61 63 6b 61 67 65 27 20 6f 6e 20 50 41 43 4b 41 47 45 2e 22 0a 20 20 28 64 65 73	ibe-package'.on.PACKAGE."...(des
2a780	63 72 69 62 65 2d 70 61 63 6b 61 67 65 20 28 63 61 64 72 20 70 61 63 6b 61 67 65 29 29 29 0a 0a	cribe-package.(cadr.package)))..
2a7a0	28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 70 61 63 6b 61 67 65 2d 61 63 74 69 6f 6e 2d 68 6f	(defun.counsel-package-action-ho
2a7c0	6d 65 70 61 67 65 20 28 70 61 63 6b 61 67 65 29 0a 20 20 22 4f 70 65 6e 20 68 6f 6d 65 70 61 67	mepage.(package)..."Open.homepag
2a7e0	65 20 66 6f 72 20 50 41 43 4b 41 47 45 20 69 6e 20 61 20 57 57 57 20 62 72 6f 77 73 65 72 2e 22	e.for.PACKAGE.in.a.WWW.browser."
2a800	0a 20 20 28 6c 65 74 20 28 28 75 72 6c 20 28 63 64 72 20 28 61 73 73 71 20 3a 75 72 6c 20 28 70	...(let.((url.(cdr.(assq.:url.(p
2a820	61 63 6b 61 67 65 2d 64 65 73 63 2d 65 78 74 72 61 73 20 28 6e 74 68 20 32 20 70 61 63 6b 61 67	ackage-desc-extras.(nth.2.packag
2a840	65 29 29 29 29 29 29 0a 20 20 20 20 28 69 66 20 75 72 6c 0a 20 20 20 20 20 20 20 20 28 62 72 6f	e)))))).....(if.url.........(bro
2a860	77 73 65 2d 75 72 6c 20 75 72 6c 29 0a 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 4e 6f 20	wse-url.url).......(message."No.
2a880	68 6f 6d 65 70 61 67 65 20 73 70 65 63 69 66 69 65 64 20 66 6f 72 20 70 61 63 6b 61 67 65 20 60	homepage.specified.for.package.`
2a8a0	25 73 27 22 20 28 6e 74 68 20 31 20 70 61 63 6b 61 67 65 29 29 29 29 29 0a 0a 28 64 65 66 75 6e	%s'".(nth.1.package)))))..(defun
2a8c0	20 63 6f 75 6e 73 65 6c 2d 2d 70 61 63 6b 61 67 65 2d 73 6f 72 74 20 28 61 20 62 29 0a 20 20 22	.counsel--package-sort.(a.b)..."
2a8e0	53 6f 72 74 20 66 75 6e 63 74 69 6f 6e 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 70 61 63 6b 61	Sort.function.for.`counsel-packa
2a900	67 65 27 20 63 61 6e 64 69 64 61 74 65 73 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 61 20 28 63 61	ge'.candidates."...(let*.((a.(ca
2a920	72 20 61 29 29 0a 20 20 20 20 20 20 20 20 20 28 62 20 28 63 61 72 20 62 29 29 0a 20 20 20 20 20	r.a))..........(b.(car.b))......
2a940	20 20 20 20 28 61 2d 69 6e 73 74 20 28 3d 20 28 73 74 72 69 6e 67 2d 74 6f 2d 63 68 61 72 20 61	....(a-inst.(=.(string-to-char.a
2a960	29 20 3f 2b 29 29 0a 20 20 20 20 20 20 20 20 20 28 62 2d 69 6e 73 74 20 28 3d 20 28 73 74 72 69	).?+))..........(b-inst.(=.(stri
2a980	6e 67 2d 74 6f 2d 63 68 61 72 20 62 29 20 3f 2b 29 29 29 0a 20 20 20 20 28 6f 72 20 28 61 6e 64	ng-to-char.b).?+))).....(or.(and
2a9a0	20 61 2d 69 6e 73 74 20 28 6e 6f 74 20 62 2d 69 6e 73 74 29 29 0a 20 20 20 20 20 20 20 20 28 61	.a-inst.(not.b-inst)).........(a
2a9c0	6e 64 20 28 65 71 20 61 2d 69 6e 73 74 20 62 2d 69 6e 73 74 29 20 28 73 74 72 69 6e 67 2d 6c 65	nd.(eq.a-inst.b-inst).(string-le
2a9e0	73 73 70 20 61 20 62 29 29 29 29 29 0a 0a 28 69 76 79 2d 73 65 74 2d 61 63 74 69 6f 6e 73 0a 20	ssp.a.b)))))..(ivy-set-actions..
2aa00	27 63 6f 75 6e 73 65 6c 2d 70 61 63 6b 61 67 65 0a 20 27 28 28 22 64 22 20 63 6f 75 6e 73 65 6c	'counsel-package..'(("d".counsel
2aa20	2d 70 61 63 6b 61 67 65 2d 61 63 74 69 6f 6e 2d 64 65 73 63 72 69 62 65 20 22 64 65 73 63 72 69	-package-action-describe."descri
2aa40	62 65 20 70 61 63 6b 61 67 65 22 29 0a 20 20 20 28 22 68 22 20 63 6f 75 6e 73 65 6c 2d 70 61 63	be.package")....("h".counsel-pac
2aa60	6b 61 67 65 2d 61 63 74 69 6f 6e 2d 68 6f 6d 65 70 61 67 65 20 22 6f 70 65 6e 20 70 61 63 6b 61	kage-action-homepage."open.packa
2aa80	67 65 20 68 6f 6d 65 70 61 67 65 22 29 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 74	ge.homepage")))..;;;;.`counsel-t
2aaa0	6d 6d 27 0a 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 74 6d 6d 2d 67 65 74 2d 6b	mm'..(declare-function.tmm-get-k
2aac0	65 79 6d 61 70 20 22 74 6d 6d 22 20 28 65 6c 74 20 26 6f 70 74 69 6f 6e 61 6c 20 69 6e 2d 78 2d	eymap."tmm".(elt.&optional.in-x-
2aae0	6d 65 6e 75 29 29 0a 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6f 75 6e 73 65 6c 2d 2d 6d 65 6e 75	menu))..(defalias.'counsel--menu
2ab00	2d 6b 65 79 6d 61 70 0a 20 20 3b 3b 20 41 64 64 65 64 20 69 6e 20 45 6d 61 63 73 20 32 38 2e 31	-keymap...;;.Added.in.Emacs.28.1
2ab20	2e 0a 20 20 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 6d 65 6e 75 2d 62 61 72 2d 6b 65 79 6d 61	....(if.(fboundp.'menu-bar-keyma
2ab40	70 29 0a 20 20 20 20 20 20 23 27 6d 65 6e 75 2d 62 61 72 2d 6b 65 79 6d 61 70 0a 20 20 20 20 3b	p).......#'menu-bar-keymap.....;
2ab60	3b 20 52 65 6d 6f 76 65 64 20 69 6e 20 45 6d 61 63 73 20 32 38 2e 31 2e 0a 20 20 20 20 28 64 65	;.Removed.in.Emacs.28.1......(de
2ab80	63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 74 6d 6d 2d 67 65 74 2d 6b 65 79 62 69 6e 64 20 22	clare-function.tmm-get-keybind."
2aba0	74 6d 6d 22 20 28 6b 65 79 73 65 71 29 20 74 29 0a 20 20 20 20 28 6c 61 6d 62 64 61 20 28 29 20	tmm".(keyseq).t).....(lambda.().
2abc0	28 74 6d 6d 2d 67 65 74 2d 6b 65 79 62 69 6e 64 20 5b 6d 65 6e 75 2d 62 61 72 5d 29 29 29 0a 20	(tmm-get-keybind.[menu-bar])))..
2abe0	20 22 43 6f 6d 70 61 74 69 62 69 6c 69 74 79 20 73 68 69 6d 20 66 6f 72 20 60 6d 65 6e 75 2d 62	."Compatibility.shim.for.`menu-b
2ac00	61 72 2d 6b 65 79 6d 61 70 27 2e 22 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 74 6d	ar-keymap'.")..(defun.counsel-tm
2ac20	6d 2d 70 72 6f 6d 70 74 20 28 6d 65 6e 75 29 0a 20 20 22 53 65 6c 65 63 74 20 61 6e 64 20 63 61	m-prompt.(menu)..."Select.and.ca
2ac40	6c 6c 20 61 6e 20 69 74 65 6d 20 66 72 6f 6d 20 74 68 65 20 4d 45 4e 55 20 6b 65 79 6d 61 70 2e	ll.an.item.from.the.MENU.keymap.
2ac60	22 0a 20 20 28 64 65 66 76 61 72 20 74 6d 6d 2d 6b 6d 2d 6c 69 73 74 29 0a 20 20 28 6c 65 74 20	"...(defvar.tmm-km-list)...(let.
2ac80	28 6f 75 74 0a 20 20 20 20 20 20 20 20 63 68 6f 69 63 65 0a 20 20 20 20 20 20 20 20 63 68 6f 73	(out.........choice.........chos
2aca0	65 6e 2d 73 74 72 69 6e 67 29 0a 20 20 20 20 28 73 65 74 71 20 74 6d 6d 2d 6b 6d 2d 6c 69 73 74	en-string).....(setq.tmm-km-list
2acc0	20 6e 69 6c 29 0a 20 20 20 20 28 6d 61 70 2d 6b 65 79 6d 61 70 20 28 6c 61 6d 62 64 61 20 28 6b	.nil).....(map-keymap.(lambda.(k
2ace0	20 76 29 20 28 74 6d 6d 2d 67 65 74 2d 6b 65 79 6d 61 70 20 28 63 6f 6e 73 20 6b 20 76 29 29 29	.v).(tmm-get-keymap.(cons.k.v)))
2ad00	20 6d 65 6e 75 29 0a 20 20 20 20 28 6c 65 74 20 28 28 69 74 65 6d 73 20 28 73 65 74 71 20 74 6d	.menu).....(let.((items.(setq.tm
2ad20	6d 2d 6b 6d 2d 6c 69 73 74 20 28 6e 72 65 76 65 72 73 65 20 74 6d 6d 2d 6b 6d 2d 6c 69 73 74 29	m-km-list.(nreverse.tmm-km-list)
2ad40	29 29 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 6f 75 74 20 28 69 76 79 2d 72 65 61 64 20 22 4d	))).......(setq.out.(ivy-read."M
2ad60	65 6e 75 20 62 61 72 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	enu.bar:."......................
2ad80	20 20 20 20 20 3b 3b 20 46 72 6f 6d 20 60 74 6d 6d 2d 2d 63 6f 6d 70 6c 65 74 69 6f 6e 2d 74 61	.....;;.From.`tmm--completion-ta
2ada0	62 6c 65 27 2c 20 72 65 6d 6f 76 65 64 20 69 6e 20 45 6d 61 63 73 20 33 31 2e 0a 20 20 20 20 20	ble',.removed.in.Emacs.31.......
2adc0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 73 74	.....................(lambda.(st
2ade0	72 20 70 72 65 64 20 61 63 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	r.pred.action)..................
2ae00	20 20 20 20 20 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	...........(if.(eq.action.'metad
2ae20	61 74 61 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	ata)............................
2ae40	20 20 20 20 20 27 28 6d 65 74 61 64 61 74 61 20 28 64 69 73 70 6c 61 79 2d 73 6f 72 74 2d 66 75	.....'(metadata.(display-sort-fu
2ae60	6e 63 74 69 6f 6e 20 2e 20 69 64 65 6e 74 69 74 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	nction...identity)).............
2ae80	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6d 70 6c 65 74 65 2d 77 69 74 68	..................(complete-with
2aea0	2d 61 63 74 69 6f 6e 20 61 63 74 69 6f 6e 20 69 74 65 6d 73 20 73 74 72 20 70 72 65 64 29 29 29	-action.action.items.str.pred)))
2aec0	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 3a 72 65 71 75	...........................:requ
2aee0	69 72 65 2d 6d 61 74 63 68 20 74 29 29 29 0a 20 20 20 20 28 73 65 74 71 20 63 68 6f 69 63 65 20	ire-match.t))).....(setq.choice.
2af00	28 63 64 72 20 28 61 73 73 6f 63 20 6f 75 74 20 74 6d 6d 2d 6b 6d 2d 6c 69 73 74 29 29 29 0a 20	(cdr.(assoc.out.tmm-km-list)))..
2af20	20 20 20 28 73 65 74 71 20 63 68 6f 73 65 6e 2d 73 74 72 69 6e 67 20 28 63 61 72 20 63 68 6f 69	...(setq.chosen-string.(car.choi
2af40	63 65 29 29 0a 20 20 20 20 28 73 65 74 71 20 63 68 6f 69 63 65 20 28 63 64 72 20 63 68 6f 69 63	ce)).....(setq.choice.(cdr.choic
2af60	65 29 29 0a 20 20 20 20 28 63 6f 6e 64 20 28 28 6b 65 79 6d 61 70 70 20 63 68 6f 69 63 65 29 0a	e)).....(cond.((keymapp.choice).
2af80	20 20 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 74 6d 6d 2d 70 72 6f 6d 70 74 20 63	...........(counsel-tmm-prompt.c
2afa0	68 6f 69 63 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 28 61 6e 64 20 63 68 6f 69 63 65 20 63	hoice))...........((and.choice.c
2afc0	68 6f 73 65 6e 2d 73 74 72 69 6e 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 6c	hosen-string)............(setq.l
2afe0	61 73 74 2d 63 6f 6d 6d 61 6e 64 2d 65 76 65 6e 74 20 63 68 6f 73 65 6e 2d 73 74 72 69 6e 67 29	ast-command-event.chosen-string)
2b000	0a 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6c 6c 2d 69 6e 74 65 72 61 63 74 69 76 65 6c 79 20	............(call-interactively.
2b020	63 68 6f 69 63 65 29 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66	choice)))))..;;;###autoload.(def
2b040	75 6e 20 63 6f 75 6e 73 65 6c 2d 74 6d 6d 20 28 29 0a 20 20 22 54 65 78 74 2d 6d 6f 64 65 20 65	un.counsel-tmm.()..."Text-mode.e
2b060	6d 75 6c 61 74 69 6f 6e 20 6f 66 20 6c 6f 6f 6b 69 6e 67 20 61 6e 64 20 63 68 6f 6f 73 69 6e 67	mulation.of.looking.and.choosing
2b080	20 66 72 6f 6d 20 61 20 6d 65 6e 75 20 62 61 72 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76	.from.a.menu.bar."...(interactiv
2b0a0	65 29 0a 20 20 28 72 65 71 75 69 72 65 20 27 74 6d 6d 29 0a 20 20 28 64 65 66 76 61 72 20 74 6d	e)...(require.'tmm)...(defvar.tm
2b0c0	6d 2d 74 61 62 6c 65 2d 75 6e 64 65 66 29 0a 20 20 28 72 75 6e 2d 68 6f 6f 6b 73 20 27 6d 65 6e	m-table-undef)...(run-hooks.'men
2b0e0	75 2d 62 61 72 2d 75 70 64 61 74 65 2d 68 6f 6f 6b 29 0a 20 20 28 73 65 74 71 20 74 6d 6d 2d 74	u-bar-update-hook)...(setq.tmm-t
2b100	61 62 6c 65 2d 75 6e 64 65 66 20 6e 69 6c 29 0a 20 20 28 63 6f 75 6e 73 65 6c 2d 74 6d 6d 2d 70	able-undef.nil)...(counsel-tmm-p
2b120	72 6f 6d 70 74 20 28 63 6f 75 6e 73 65 6c 2d 2d 6d 65 6e 75 2d 6b 65 79 6d 61 70 29 29 29 0a 0a	rompt.(counsel--menu-keymap)))..
2b140	3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 27 0a 0a 28 64 65 66 63 75 73	;;;;.`counsel-yank-pop'..(defcus
2b160	74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 2d 74 72 75 6e 63 61 74 65 2d 72 61	tom.counsel-yank-pop-truncate-ra
2b180	64 69 75 73 20 32 0a 20 20 22 4e 75 6d 62 65 72 20 6f 66 20 63 6f 6e 74 65 78 74 20 6c 69 6e 65	dius.2..."Number.of.context.line
2b1a0	73 20 61 72 6f 75 6e 64 20 60 63 6f 75 6e 73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 27 20 63 61 6e 64	s.around.`counsel-yank-pop'.cand
2b1c0	69 64 61 74 65 73 2e 22 0a 20 20 3a 74 79 70 65 20 27 69 6e 74 65 67 65 72 29 0a 0a 28 64 65 66	idates."...:type.'integer)..(def
2b1e0	75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 79 61 6e 6b 2d 70 6f 70 2d 74 72 75 6e 63 61 74 65 20 28 73	un.counsel--yank-pop-truncate.(s
2b200	74 72 29 0a 20 20 22 54 72 75 6e 63 61 74 65 20 53 54 52 20 66 6f 72 20 75 73 65 20 69 6e 20 60	tr)..."Truncate.STR.for.use.in.`
2b220	63 6f 75 6e 73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 27 2e 22 0a 20 20 28 63 6f 6e 64 69 74 69 6f 6e	counsel-yank-pop'."...(condition
2b240	2d 63 61 73 65 20 6e 69 6c 0a 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 6c 69 6e 65 73 20 28 73	-case.nil.......(let*.((lines.(s
2b260	70 6c 69 74 2d 73 74 72 69 6e 67 20 73 74 72 20 22 5c 6e 22 20 74 29 29 0a 20 20 20 20 20 20 20	plit-string.str."\n".t))........
2b280	20 20 20 20 20 20 28 6e 20 28 6c 65 6e 67 74 68 20 6c 69 6e 65 73 29 29 0a 20 20 20 20 20 20 20	......(n.(length.lines))........
2b2a0	20 20 20 20 20 20 28 72 65 20 28 69 76 79 2d 72 65 2d 74 6f 2d 73 74 72 20 69 76 79 2d 2d 6f 6c	......(re.(ivy-re-to-str.ivy--ol
2b2c0	64 2d 72 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 72 73 74 2d 6d 61 74 63 68	d-re))..............(first-match
2b2e0	20 28 63 6c 2d 70 6f 73 69 74 69 6f 6e 2d 69 66 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.(cl-position-if................
2b300	20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 73 29 20 28 73 74 72 69 6e 67 2d	............(lambda.(s).(string-
2b320	6d 61 74 63 68 20 72 65 20 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	match.re.s))....................
2b340	20 20 20 20 20 20 20 20 6c 69 6e 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 65	........lines))..............(be
2b360	67 20 28 6d 61 78 20 30 20 28 2d 20 66 69 72 73 74 2d 6d 61 74 63 68 0a 20 20 20 20 20 20 20 20	g.(max.0.(-.first-match.........
2b380	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 75 6e 73 65 6c 2d 79 61 6e 6b	....................counsel-yank
2b3a0	2d 70 6f 70 2d 74 72 75 6e 63 61 74 65 2d 72 61 64 69 75 73 29 29 29 0a 20 20 20 20 20 20 20 20	-pop-truncate-radius))).........
2b3c0	20 20 20 20 20 28 65 6e 64 20 28 6d 69 6e 20 6e 20 28 2b 20 66 69 72 73 74 2d 6d 61 74 63 68 0a	.....(end.(min.n.(+.first-match.
2b3e0	20 20 20 20 20 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 75 6e	............................coun
2b400	73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 2d 74 72 75 6e 63 61 74 65 2d 72 61 64 69 75 73 0a 20 20 20	sel-yank-pop-truncate-radius....
2b420	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 29 29 29 0a 20 20	.........................1)))...
2b440	20 20 20 20 20 20 20 20 20 20 20 28 73 65 71 20 28 63 6c 2d 73 75 62 73 65 71 20 6c 69 6e 65 73	...........(seq.(cl-subseq.lines
2b460	20 62 65 67 20 65 6e 64 29 29 29 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 6e 75 6c 6c 20 66 69	.beg.end))).........(if.(null.fi
2b480	72 73 74 2d 6d 61 74 63 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 43	rst-match).............(error."C
2b4a0	6f 75 6c 64 20 6e 6f 74 20 6d 61 74 63 68 20 25 73 22 20 73 74 72 29 0a 20 20 20 20 20 20 20 20	ould.not.match.%s".str).........
2b4c0	20 20 28 77 68 65 6e 20 28 3e 20 62 65 67 20 30 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73	..(when.(>.beg.0).............(s
2b4e0	65 74 63 61 72 20 73 65 71 20 28 63 6f 6e 63 61 74 20 22 5b 2e 2e 2e 5d 20 22 20 28 63 61 72 20	etcar.seq.(concat."[...].".(car.
2b500	73 65 71 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 3c 20 65 6e 64 20 6e	seq))))...........(when.(<.end.n
2b520	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 63 61 72 20 28 6c 61 73 74 20 73 65 71 29	).............(setcar.(last.seq)
2b540	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 74 20 28 63 61	.....................(concat.(ca
2b560	72 20 28 6c 61 73 74 20 73 65 71 29 29 20 22 20 5b 2e 2e 2e 5d 22 29 29 29 0a 20 20 20 20 20 20	r.(last.seq)).".[...]"))).......
2b580	20 20 20 20 28 6d 61 70 63 6f 6e 63 61 74 20 23 27 69 64 65 6e 74 69 74 79 20 73 65 71 20 22 5c	....(mapconcat.#'identity.seq."\
2b5a0	6e 22 29 29 29 0a 20 20 20 20 28 65 72 72 6f 72 20 73 74 72 29 29 29 0a 0a 28 64 65 66 63 75 73	n"))).....(error.str)))..(defcus
2b5c0	74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 2d 73 65 70 61 72 61 74 6f 72 20 22	tom.counsel-yank-pop-separator."
2b5e0	5c 6e 22 0a 20 20 22 53 65 70 61 72 61 74 6f 72 20 66 6f 72 20 74 68 65 20 6b 69 6c 6c 20 72 69	\n"..."Separator.for.the.kill.ri
2b600	6e 67 20 73 74 72 69 6e 67 73 20 69 6e 20 60 63 6f 75 6e 73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 27	ng.strings.in.`counsel-yank-pop'
2b620	2e 22 0a 20 20 3a 74 79 70 65 20 27 28 63 68 6f 69 63 65 0a 20 20 20 20 20 20 20 20 20 20 28 63	."...:type.'(choice...........(c
2b640	6f 6e 73 74 20 3a 74 61 67 20 22 50 6c 61 69 6e 22 20 22 5c 6e 22 29 0a 20 20 20 20 20 20 20 20	onst.:tag."Plain"."\n").........
2b660	20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 44 61 73 68 65 73 22 20 22 5c 6e 2d 2d 2d 2d 5c 6e	..(const.:tag."Dashes"."\n----\n
2b680	22 29 0a 20 20 20 20 20 20 20 20 20 20 73 74 72 69 6e 67 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f	")...........string))..(defun.co
2b6a0	75 6e 73 65 6c 2d 2d 79 61 6e 6b 2d 70 6f 70 2d 66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 20	unsel--yank-pop-format-function.
2b6c0	28 63 61 6e 64 2d 70 61 69 72 73 29 0a 20 20 22 54 72 61 6e 73 66 6f 72 6d 20 43 41 4e 44 2d 50	(cand-pairs)..."Transform.CAND-P
2b6e0	41 49 52 53 20 69 6e 74 6f 20 61 20 73 74 72 69 6e 67 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d	AIRS.into.a.string.for.`counsel-
2b700	79 61 6e 6b 2d 70 6f 70 27 2e 22 0a 20 20 28 69 76 79 2d 2d 66 6f 72 6d 61 74 2d 66 75 6e 63 74	yank-pop'."...(ivy--format-funct
2b720	69 6f 6e 2d 67 65 6e 65 72 69 63 0a 20 20 20 28 6c 61 6d 62 64 61 20 28 73 74 72 29 0a 20 20 20	ion-generic....(lambda.(str)....
2b740	20 20 28 6d 61 70 63 6f 6e 63 61 74 0a 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 73 29 0a 20	..(mapconcat.......(lambda.(s)..
2b760	20 20 20 20 20 20 20 28 69 76 79 2d 2d 61 64 64 2d 66 61 63 65 20 73 20 27 69 76 79 2d 63 75 72	.......(ivy--add-face.s.'ivy-cur
2b780	72 65 6e 74 2d 6d 61 74 63 68 29 29 0a 20 20 20 20 20 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67	rent-match)).......(split-string
2b7a0	0a 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 79 61 6e 6b 2d 70 6f 70 2d 74 72 75 6e 63	........(counsel--yank-pop-trunc
2b7c0	61 74 65 20 73 74 72 29 20 22 5c 6e 22 20 74 29 0a 20 20 20 20 20 20 22 5c 6e 22 29 29 0a 20 20	ate.str)."\n".t)......."\n"))...
2b7e0	20 28 6c 61 6d 62 64 61 20 28 73 74 72 29 0a 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 79 61	.(lambda.(str)......(counsel--ya
2b800	6e 6b 2d 70 6f 70 2d 74 72 75 6e 63 61 74 65 20 73 74 72 29 29 0a 20 20 20 63 61 6e 64 2d 70 61	nk-pop-truncate.str))....cand-pa
2b820	69 72 73 0a 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 63 6f 75 6e 73 65 6c 2d 79 61 6e 6b 2d	irs....(propertize.counsel-yank-
2b840	70 6f 70 2d 73 65 70 61 72 61 74 6f 72 20 27 66 61 63 65 20 27 69 76 79 2d 73 65 70 61 72 61 74	pop-separator.'face.'ivy-separat
2b860	6f 72 29 29 29 0a 0a 3b 3b 20 4d 61 63 72 6f 20 74 6f 20 6c 65 76 65 72 61 67 65 20 60 63 6f 6d	or)))..;;.Macro.to.leverage.`com
2b880	70 69 6c 65 72 2d 6d 61 63 72 6f 27 20 6f 66 20 60 63 6c 2d 6d 65 6d 62 65 72 27 20 69 6e 20 45	piler-macro'.of.`cl-member'.in.E
2b8a0	6d 61 63 73 20 3e 3d 20 32 34 2e 0a 28 64 65 66 6d 61 63 72 6f 20 63 6f 75 6e 73 65 6c 2d 2d 69	macs.>=.24..(defmacro.counsel--i
2b8c0	64 78 2d 6f 66 20 28 65 6c 74 20 6c 69 73 74 20 74 65 73 74 29 0a 20 20 22 52 65 74 75 72 6e 20	dx-of.(elt.list.test)..."Return.
2b8e0	69 6e 64 65 78 20 6f 66 20 45 4c 54 20 69 6e 20 4c 49 53 54 2c 20 63 6f 6d 70 61 72 69 6e 67 20	index.of.ELT.in.LIST,.comparing.
2b900	77 69 74 68 20 54 45 53 54 2e 0a 54 79 70 69 63 61 6c 6c 79 20 66 61 73 74 65 72 20 74 68 61 6e	with.TEST..Typically.faster.than
2b920	20 60 63 6c 2d 70 6f 73 69 74 69 6f 6e 27 20 75 73 69 6e 67 20 60 65 71 75 61 6c 27 20 6f 6e 20	.`cl-position'.using.`equal'.on.
2b940	6c 61 72 67 65 20 4c 49 53 54 2e 22 0a 20 20 3b 3b 20 4e 6f 20 60 6d 61 63 72 6f 65 78 70 2d 6c	large.LIST."...;;.No.`macroexp-l
2b960	65 74 32 2a 27 20 62 65 66 6f 72 65 20 45 6d 61 63 73 20 32 35 2e 0a 20 20 28 6d 61 63 72 6f 65	et2*'.before.Emacs.25....(macroe
2b980	78 70 2d 6c 65 74 32 20 6e 69 6c 20 65 6c 74 20 65 6c 74 0a 20 20 20 20 28 6d 61 63 72 6f 65 78	xp-let2.nil.elt.elt.....(macroex
2b9a0	70 2d 6c 65 74 32 20 6e 69 6c 20 6c 69 73 74 20 6c 69 73 74 0a 20 20 20 20 20 20 28 6d 61 63 72	p-let2.nil.list.list.......(macr
2b9c0	6f 65 78 70 2d 6c 65 74 32 20 6e 69 6c 20 74 61 69 6c 20 60 28 63 6c 2d 6d 65 6d 62 65 72 20 2c	oexp-let2.nil.tail.`(cl-member.,
2b9e0	65 6c 74 20 2c 6c 69 73 74 20 3a 74 65 73 74 20 2c 74 65 73 74 29 0a 20 20 20 20 20 20 20 20 60	elt.,list.:test.,test).........`
2ba00	28 61 6e 64 20 2c 74 61 69 6c 20 28 2d 20 28 6c 65 6e 67 74 68 20 2c 6c 69 73 74 29 20 28 6c 65	(and.,tail.(-.(length.,list).(le
2ba20	6e 67 74 68 20 2c 74 61 69 6c 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65	ngth.,tail)))))))..(defun.counse
2ba40	6c 2d 2d 79 61 6e 6b 2d 70 6f 70 2d 70 6f 73 69 74 69 6f 6e 20 28 73 29 0a 20 20 22 52 65 74 75	l--yank-pop-position.(s)..."Retu
2ba60	72 6e 20 70 6f 73 69 74 69 6f 6e 20 6f 66 20 53 20 69 6e 20 60 6b 69 6c 6c 2d 72 69 6e 67 27 20	rn.position.of.S.in.`kill-ring'.
2ba80	72 65 6c 61 74 69 76 65 20 74 6f 20 6c 61 73 74 20 79 61 6e 6b 2e 22 0a 20 20 28 6f 72 20 28 63	relative.to.last.yank."...(or.(c
2baa0	6f 75 6e 73 65 6c 2d 2d 69 64 78 2d 6f 66 20 73 20 6b 69 6c 6c 2d 72 69 6e 67 2d 79 61 6e 6b 2d	ounsel--idx-of.s.kill-ring-yank-
2bac0	70 6f 69 6e 74 65 72 20 23 27 65 71 75 61 6c 2d 69 6e 63 6c 75 64 69 6e 67 2d 70 72 6f 70 65 72	pointer.#'equal-including-proper
2bae0	74 69 65 73 29 0a 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 69 64 78 2d 6f 66 20 73 20 6b	ties).......(counsel--idx-of.s.k
2bb00	69 6c 6c 2d 72 69 6e 67 2d 79 61 6e 6b 2d 70 6f 69 6e 74 65 72 20 23 27 65 71 75 61 6c 29 0a 20	ill-ring-yank-pointer.#'equal)..
2bb20	20 20 20 20 20 28 2b 20 28 6f 72 20 28 63 6f 75 6e 73 65 6c 2d 2d 69 64 78 2d 6f 66 20 73 20 6b	.....(+.(or.(counsel--idx-of.s.k
2bb40	69 6c 6c 2d 72 69 6e 67 20 23 27 65 71 75 61 6c 2d 69 6e 63 6c 75 64 69 6e 67 2d 70 72 6f 70 65	ill-ring.#'equal-including-prope
2bb60	72 74 69 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 69 64	rties)..............(counsel--id
2bb80	78 2d 6f 66 20 73 20 6b 69 6c 6c 2d 72 69 6e 67 20 23 27 65 71 75 61 6c 29 29 0a 20 20 20 20 20	x-of.s.kill-ring.#'equal))......
2bba0	20 20 20 20 28 2d 20 28 6c 65 6e 67 74 68 20 6b 69 6c 6c 2d 72 69 6e 67 2d 79 61 6e 6b 2d 70 6f	....(-.(length.kill-ring-yank-po
2bbc0	69 6e 74 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 6e 67 74 68 20 6b 69 6c 6c 2d	inter).............(length.kill-
2bbe0	72 69 6e 67 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 73 74 72 69 6e 67	ring)))))..(defun.counsel-string
2bc00	2d 6e 6f 6e 2d 62 6c 61 6e 6b 2d 70 20 28 73 29 0a 20 20 22 52 65 74 75 72 6e 20 6e 6f 6e 2d 6e	-non-blank-p.(s)..."Return.non-n
2bc20	69 6c 20 69 66 20 53 20 69 6e 63 6c 75 64 65 73 20 6e 6f 6e 2d 62 6c 61 6e 6b 20 63 68 61 72 61	il.if.S.includes.non-blank.chara
2bc40	63 74 65 72 73 2e 0a 4e 65 77 6c 69 6e 65 73 20 61 6e 64 20 63 61 72 72 69 61 67 65 20 72 65 74	cters..Newlines.and.carriage.ret
2bc60	75 72 6e 73 20 61 72 65 20 63 6f 6e 73 69 64 65 72 65 64 20 62 6c 61 6e 6b 2e 22 0a 20 20 28 73	urns.are.considered.blank."...(s
2bc80	74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 22 5b 5e 5c 6e 5c 72 5b 3a 62 6c 61 6e 6b 3a 5d 5d 22	tring-match-p."[^\n\r[:blank:]]"
2bca0	20 73 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 79 61 6e 6b 2d 70 6f	.s))..(defcustom.counsel-yank-po
2bcc0	70 2d 66 69 6c 74 65 72 20 23 27 63 6f 75 6e 73 65 6c 2d 73 74 72 69 6e 67 2d 6e 6f 6e 2d 62 6c	p-filter.#'counsel-string-non-bl
2bce0	61 6e 6b 2d 70 0a 20 20 22 55 6e 61 72 79 20 66 69 6c 74 65 72 20 66 75 6e 63 74 69 6f 6e 20 61	ank-p..."Unary.filter.function.a
2bd00	70 70 6c 69 65 64 20 74 6f 20 60 63 6f 75 6e 73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 27 20 63 61 6e	pplied.to.`counsel-yank-pop'.can
2bd20	64 69 64 61 74 65 73 2e 0a 41 6c 6c 20 65 6c 65 6d 65 6e 74 73 20 6f 66 20 60 6b 69 6c 6c 2d 72	didates..All.elements.of.`kill-r
2bd40	69 6e 67 27 20 66 6f 72 20 77 68 69 63 68 20 74 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 72 65 74	ing'.for.which.this.function.ret
2bd60	75 72 6e 73 20 6e 69 6c 0a 77 69 6c 6c 20 62 65 20 64 65 73 74 72 75 63 74 69 76 65 6c 79 20 72	urns.nil.will.be.destructively.r
2bd80	65 6d 6f 76 65 64 20 66 72 6f 6d 20 60 6b 69 6c 6c 2d 72 69 6e 67 27 20 62 65 66 6f 72 65 20 63	emoved.from.`kill-ring'.before.c
2bda0	6f 6d 70 6c 65 74 69 6f 6e 2e 0a 41 6c 6c 20 62 6c 61 6e 6b 20 73 74 72 69 6e 67 73 20 61 72 65	ompletion..All.blank.strings.are
2bdc0	20 64 65 6c 65 74 65 64 20 66 72 6f 6d 20 60 6b 69 6c 6c 2d 72 69 6e 67 27 20 62 79 20 64 65 66	.deleted.from.`kill-ring'.by.def
2bde0	61 75 6c 74 2e 22 0a 20 20 3a 74 79 70 65 20 27 28 72 61 64 69 6f 0a 20 20 20 20 20 20 20 20 20	ault."...:type.'(radio..........
2be00	20 28 66 75 6e 63 74 69 6f 6e 2d 69 74 65 6d 20 63 6f 75 6e 73 65 6c 2d 73 74 72 69 6e 67 2d 6e	.(function-item.counsel-string-n
2be20	6f 6e 2d 62 6c 61 6e 6b 2d 70 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 74 69 6f 6e 2d	on-blank-p)...........(function-
2be40	69 74 65 6d 20 69 64 65 6e 74 69 74 79 29 20 3b 3b 20 46 61 73 74 65 72 20 74 68 61 6e 20 74 68	item.identity).;;.Faster.than.th
2be60	65 20 6e 65 77 65 72 20 60 61 6c 77 61 79 73 27 2e 0a 20 20 20 20 20 20 20 20 20 20 28 66 75 6e	e.newer.`always'............(fun
2be80	63 74 69 6f 6e 20 3a 74 61 67 20 22 4f 74 68 65 72 22 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f	ction.:tag."Other")))..(defun.co
2bea0	75 6e 73 65 6c 2d 2d 65 71 75 61 6c 2d 77 2d 70 72 6f 70 73 20 28 29 0a 20 20 22 52 65 74 75 72	unsel--equal-w-props.()..."Retur
2bec0	6e 20 61 20 60 68 61 73 68 2d 74 61 62 6c 65 2d 74 65 73 74 27 20 75 73 69 6e 67 20 60 65 71 75	n.a.`hash-table-test'.using.`equ
2bee0	61 6c 2d 69 6e 63 6c 75 64 69 6e 67 2d 70 72 6f 70 65 72 74 69 65 73 27 2e 0a 49 66 20 6e 6f 74	al-including-properties'..If.not
2bf00	20 61 76 61 69 6c 61 62 6c 65 2c 20 72 65 74 75 72 6e 20 6e 69 6c 2e 22 0a 20 20 3b 3b 20 41 64	.available,.return.nil."...;;.Ad
2bf20	64 65 64 20 69 6e 20 45 6d 61 63 73 20 32 38 2e 0a 20 20 28 77 68 65 6e 20 28 66 62 6f 75 6e 64	ded.in.Emacs.28....(when.(fbound
2bf40	70 20 27 73 78 68 61 73 68 2d 65 71 75 61 6c 2d 69 6e 63 6c 75 64 69 6e 67 2d 70 72 6f 70 65 72	p.'sxhash-equal-including-proper
2bf60	74 69 65 73 29 0a 20 20 20 20 28 6c 65 74 20 28 28 6e 61 6d 65 20 27 63 6f 75 6e 73 65 6c 2d 2d	ties).....(let.((name.'counsel--
2bf80	65 71 75 61 6c 2d 77 2d 70 72 6f 70 73 29 29 0a 20 20 20 20 20 20 3b 3b 20 44 65 66 69 6e 65 20	equal-w-props)).......;;.Define.
2bfa0	74 68 65 20 74 65 73 74 20 6f 6e 6c 79 20 6f 6e 63 65 2e 0a 20 20 20 20 20 20 28 75 6e 6c 65 73	the.test.only.once........(unles
2bfc0	73 20 28 67 65 74 20 6e 61 6d 65 20 27 68 61 73 68 2d 74 61 62 6c 65 2d 74 65 73 74 29 0a 20 20	s.(get.name.'hash-table-test)...
2bfe0	20 20 20 20 20 20 28 64 65 66 69 6e 65 2d 68 61 73 68 2d 74 61 62 6c 65 2d 74 65 73 74 20 6e 61	......(define-hash-table-test.na
2c000	6d 65 20 23 27 65 71 75 61 6c 2d 69 6e 63 6c 75 64 69 6e 67 2d 70 72 6f 70 65 72 74 69 65 73 0a	me.#'equal-including-properties.
2c020	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
2c040	23 27 73 78 68 61 73 68 2d 65 71 75 61 6c 2d 69 6e 63 6c 75 64 69 6e 67 2d 70 72 6f 70 65 72 74	#'sxhash-equal-including-propert
2c060	69 65 73 29 29 0a 20 20 20 20 20 20 6e 61 6d 65 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e	ies)).......name)))..(defun.coun
2c080	73 65 6c 2d 2d 79 61 6e 6b 2d 70 6f 70 2d 66 69 6c 74 65 72 20 28 6b 69 6c 6c 73 29 0a 20 20 22	sel--yank-pop-filter.(kills)..."
2c0a0	41 70 70 6c 79 20 60 63 6f 75 6e 73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 2d 66 69 6c 74 65 72 27 20	Apply.`counsel-yank-pop-filter'.
2c0c0	74 6f 20 61 6e 64 20 64 65 64 75 70 6c 69 63 61 74 65 20 4b 49 4c 4c 53 2e 0a 45 71 75 61 6c 69	to.and.deduplicate.KILLS..Equali
2c0e0	74 79 20 69 73 20 64 65 66 69 6e 65 64 20 62 79 20 60 65 71 75 61 6c 2d 69 6e 63 6c 75 64 69 6e	ty.is.defined.by.`equal-includin
2c100	67 2d 70 72 6f 70 65 72 74 69 65 73 27 20 66 6f 72 20 73 6f 6d 65 20 63 6f 6e 73 69 73 74 65 6e	g-properties'.for.some.consisten
2c120	63 79 0a 77 69 74 68 20 60 6b 69 6c 6c 2d 64 6f 2d 6e 6f 74 2d 73 61 76 65 2d 64 75 70 6c 69 63	cy.with.`kill-do-not-save-duplic
2c140	61 74 65 73 27 20 28 77 68 69 63 68 20 69 73 20 6f 74 68 65 72 77 69 73 65 20 69 67 6e 6f 72 65	ates'.(which.is.otherwise.ignore
2c160	64 29 2e 20 20 54 68 69 73 0a 66 75 6e 63 74 69 6f 6e 20 74 72 69 65 73 20 74 6f 20 62 65 20 66	d)...This.function.tries.to.be.f
2c180	61 73 74 65 72 20 74 68 61 6e 20 60 63 6c 2d 64 65 6c 65 74 65 2d 64 75 70 6c 69 63 61 74 65 73	aster.than.`cl-delete-duplicates
2c1a0	27 20 77 68 65 6e 20 70 6f 73 73 69 62 6c 65 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 70 72 65 64	'.when.possible."...(let*.((pred
2c1c0	20 63 6f 75 6e 73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 2d 66 69 6c 74 65 72 29 0a 20 20 20 20 20 20	.counsel-yank-pop-filter).......
2c1e0	20 20 20 28 6c 65 6e 20 28 6c 65 6e 67 74 68 20 6b 69 6c 6c 73 29 29 0a 20 20 20 20 20 20 20 20	...(len.(length.kills)).........
2c200	20 3b 3b 20 53 61 6d 65 20 74 68 72 65 73 68 6f 6c 64 20 61 73 20 60 64 65 6c 65 74 65 2d 64 75	.;;.Same.threshold.as.`delete-du
2c220	70 73 27 2e 0a 20 20 20 20 20 20 20 20 20 28 74 65 73 74 20 28 61 6e 64 20 28 3e 20 6c 65 6e 20	ps'...........(test.(and.(>.len.
2c240	31 30 30 29 20 28 63 6f 75 6e 73 65 6c 2d 2d 65 71 75 61 6c 2d 77 2d 70 72 6f 70 73 29 29 29 29	100).(counsel--equal-w-props))))
2c260	0a 20 20 20 20 28 69 66 20 28 6e 6f 74 20 74 65 73 74 29 20 3b 3b 20 53 6c 6f 77 20 66 61 6c 6c	.....(if.(not.test).;;.Slow.fall
2c280	62 61 63 6b 2e 0a 20 20 20 20 20 20 20 20 28 63 6c 2d 64 65 6c 65 74 65 2d 64 75 70 6c 69 63 61	back..........(cl-delete-duplica
2c2a0	74 65 73 20 28 63 6c 2d 64 65 6c 65 74 65 2d 69 66 2d 6e 6f 74 20 70 72 65 64 20 6b 69 6c 6c 73	tes.(cl-delete-if-not.pred.kills
2c2c0	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	)...............................
2c2e0	3a 74 65 73 74 20 23 27 65 71 75 61 6c 2d 69 6e 63 6c 75 64 69 6e 67 2d 70 72 6f 70 65 72 74 69	:test.#'equal-including-properti
2c300	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 20 20 20 20 20 20	es..............................
2c320	20 3a 66 72 6f 6d 2d 65 6e 64 20 74 29 0a 20 20 20 20 20 20 3b 3b 20 54 68 65 20 72 65 73 74 20	.:from-end.t).......;;.The.rest.
2c340	69 73 20 60 64 65 6c 65 74 65 2d 64 75 70 73 27 20 63 6f 6d 62 69 6e 65 64 20 77 69 74 68 20 60	is.`delete-dups'.combined.with.`
2c360	64 65 6c 65 74 65 27 20 69 6e 20 61 20 73 69 6e 67 6c 65 20 70 61 73 73 2e 0a 20 20 20 20 20 20	delete'.in.a.single.pass........
2c380	3b 3b 20 46 69 6e 64 20 66 69 72 73 74 20 28 6f 72 20 6e 6f 29 20 65 6c 65 6d 65 6e 74 20 74 68	;;.Find.first.(or.no).element.th
2c3a0	61 74 20 70 61 73 73 65 73 20 74 68 72 6f 75 67 68 20 66 69 6c 74 65 72 2e 0a 20 20 20 20 20 20	at.passes.through.filter........
2c3c0	28 77 68 69 6c 65 20 28 75 6e 6c 65 73 73 20 28 66 75 6e 63 61 6c 6c 20 70 72 65 64 20 28 63 61	(while.(unless.(funcall.pred.(ca
2c3e0	72 20 6b 69 6c 6c 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 64 65 63	r.kills))................(cl-dec
2c400	66 20 6c 65 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 6b 69 6c 6c	f.len)................(setq.kill
2c420	73 20 28 63 64 72 20 6b 69 6c 6c 73 29 29 29 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 68 74	s.(cdr.kills)))).......(let.((ht
2c440	20 28 6d 61 6b 65 2d 68 61 73 68 2d 74 61 62 6c 65 20 3a 74 65 73 74 20 74 65 73 74 20 3a 73 69	.(make-hash-table.:test.test.:si
2c460	7a 65 20 6c 65 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 74 61 69 6c 20 6b 69 6c 6c 73	ze.len)).............(tail.kills
2c480	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 72 65 74 61 69 6c 29 0a 20 20 20 20 20 20 20 20 3b 3b	).............retail).........;;
2c4a0	20 4d 61 72 6b 20 69 74 20 61 6e 64 20 63 6f 6e 74 69 6e 75 65 20 77 69 74 68 20 74 68 65 20 72	.Mark.it.and.continue.with.the.r
2c4c0	65 73 74 2e 0a 20 20 20 20 20 20 20 20 28 70 75 74 68 61 73 68 20 28 63 61 72 20 74 61 69 6c 29	est..........(puthash.(car.tail)
2c4e0	20 74 20 68 74 29 0a 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 73 65 74 71 20 72 65 74 61	.t.ht).........(while.(setq.reta
2c500	69 6c 20 28 63 64 72 20 74 61 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28	il.(cdr.tail))...........(let.((
2c520	65 6c 74 20 28 63 61 72 20 72 65 74 61 69 6c 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28	elt.(car.retail))).............(
2c540	69 66 20 28 6f 72 20 28 67 65 74 68 61 73 68 20 65 6c 74 20 68 74 29 0a 20 20 20 20 20 20 20 20	if.(or.(gethash.elt.ht).........
2c560	20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 66 75 6e 63 61 6c 6c 20 70 72 65 64 20 65	............(not.(funcall.pred.e
2c580	6c 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 63 64 72 20 74 61	lt))).................(setcdr.ta
2c5a0	69 6c 20 28 63 64 72 20 72 65 74 61 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	il.(cdr.retail))...............(
2c5c0	70 75 74 68 61 73 68 20 65 6c 74 20 74 20 68 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	puthash.elt.t.ht)...............
2c5e0	28 73 65 74 71 20 74 61 69 6c 20 72 65 74 61 69 6c 29 29 29 29 29 0a 20 20 20 20 20 20 6b 69 6c	(setq.tail.retail))))).......kil
2c600	6c 73 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 79 61 6e 6b 2d 70 6f 70 2d	ls)))..(defun.counsel--yank-pop-
2c620	6b 69 6c 6c 73 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 66 69 6c 74 65 72 65 64 20 60 6b 69 6c	kills.()..."Return.filtered.`kil
2c640	6c 2d 72 69 6e 67 27 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 27 20 63	l-ring'.for.`counsel-yank-pop'.c
2c660	6f 6d 70 6c 65 74 69 6f 6e 2e 0a 42 6f 74 68 20 60 6b 69 6c 6c 2d 72 69 6e 67 27 20 61 6e 64 20	ompletion..Both.`kill-ring'.and.
2c680	60 6b 69 6c 6c 2d 72 69 6e 67 2d 79 61 6e 6b 2d 70 6f 69 6e 74 65 72 27 20 6d 61 79 20 62 65 0a	`kill-ring-yank-pointer'.may.be.
2c6a0	64 65 73 74 72 75 63 74 69 76 65 6c 79 20 6d 6f 64 69 66 69 65 64 20 74 6f 20 65 6c 69 6d 69 6e	destructively.modified.to.elimin
2c6c0	61 74 65 20 64 75 70 6c 69 63 61 74 65 73 20 75 6e 64 65 72 0a 60 65 71 75 61 6c 2d 69 6e 63 6c	ate.duplicates.under.`equal-incl
2c6e0	75 64 69 6e 67 2d 70 72 6f 70 65 72 74 69 65 73 27 2c 20 73 61 74 69 73 66 79 20 60 63 6f 75 6e	uding-properties',.satisfy.`coun
2c700	73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 2d 66 69 6c 74 65 72 27 2c 0a 61 6e 64 20 69 6e 63 6f 72 70	sel-yank-pop-filter',.and.incorp
2c720	6f 72 61 74 65 20 60 69 6e 74 65 72 70 72 6f 67 72 61 6d 2d 70 61 73 74 65 2d 66 75 6e 63 74 69	orate.`interprogram-paste-functi
2c740	6f 6e 27 2e 22 0a 20 20 3b 3b 20 50 72 6f 74 65 63 74 20 61 67 61 69 6e 73 74 20 60 6b 69 6c 6c	on'."...;;.Protect.against.`kill
2c760	2d 72 69 6e 67 27 20 61 6e 64 20 72 65 73 75 6c 74 20 6f 66 0a 20 20 3b 3b 20 60 69 6e 74 65 72	-ring'.and.result.of...;;.`inter
2c780	70 72 6f 67 72 61 6d 2d 70 61 73 74 65 2d 66 75 6e 63 74 69 6f 6e 27 20 62 6f 74 68 20 62 65 69	program-paste-function'.both.bei
2c7a0	6e 67 20 6e 69 6c 0a 20 20 28 69 67 6e 6f 72 65 2d 65 72 72 6f 72 73 20 28 63 75 72 72 65 6e 74	ng.nil...(ignore-errors.(current
2c7c0	2d 6b 69 6c 6c 20 30 29 29 0a 20 20 3b 3b 20 4b 65 65 70 20 74 68 69 6e 67 73 20 63 6f 6e 73 69	-kill.0))...;;.Keep.things.consi
2c7e0	73 74 65 6e 74 20 77 69 74 68 20 74 68 65 20 72 65 73 74 20 6f 66 20 45 6d 61 63 73 0a 20 20 28	stent.with.the.rest.of.Emacs...(
2c800	70 72 6f 67 31 20 28 73 65 74 71 20 6b 69 6c 6c 2d 72 69 6e 67 20 28 63 6f 75 6e 73 65 6c 2d 2d	prog1.(setq.kill-ring.(counsel--
2c820	79 61 6e 6b 2d 70 6f 70 2d 66 69 6c 74 65 72 20 6b 69 6c 6c 2d 72 69 6e 67 29 29 0a 20 20 20 20	yank-pop-filter.kill-ring)).....
2c840	28 73 65 74 71 20 6b 69 6c 6c 2d 72 69 6e 67 2d 79 61 6e 6b 2d 70 6f 69 6e 74 65 72 0a 20 20 20	(setq.kill-ring-yank-pointer....
2c860	20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 79 61 6e 6b 2d 70 6f 70 2d 66 69 6c 74 65 72	.......(counsel--yank-pop-filter
2c880	20 6b 69 6c 6c 2d 72 69 6e 67 2d 79 61 6e 6b 2d 70 6f 69 6e 74 65 72 29 29 29 29 0a 0a 28 64 65	.kill-ring-yank-pointer))))..(de
2c8a0	66 63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 2d 61 66 74 65 72 2d 70	fcustom.counsel-yank-pop-after-p
2c8c0	6f 69 6e 74 20 6e 69 6c 0a 20 20 22 57 68 65 74 68 65 72 20 60 63 6f 75 6e 73 65 6c 2d 79 61 6e	oint.nil..."Whether.`counsel-yan
2c8e0	6b 2d 70 6f 70 27 20 79 61 6e 6b 73 20 61 66 74 65 72 20 70 6f 69 6e 74 2e 0a 4e 69 6c 20 6d 65	k-pop'.yanks.after.point..Nil.me
2c900	61 6e 73 20 60 63 6f 75 6e 73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 27 20 70 75 74 73 20 70 6f 69 6e	ans.`counsel-yank-pop'.puts.poin
2c920	74 20 61 74 20 74 68 65 20 65 6e 64 20 6f 66 20 74 68 65 20 79 61 6e 6b 65 64 0a 74 65 78 74 20	t.at.the.end.of.the.yanked.text.
2c940	61 6e 64 20 6d 61 72 6b 20 61 74 20 69 74 73 20 62 65 67 69 6e 6e 69 6e 67 2c 20 61 73 20 70 65	and.mark.at.its.beginning,.as.pe
2c960	72 20 74 68 65 20 64 65 66 61 75 6c 74 20 5c 5c 5b 79 61 6e 6b 5d 2e 0a 4e 6f 6e 2d 6e 69 6c 20	r.the.default.\\[yank]..Non-nil.
2c980	6d 65 61 6e 73 20 60 63 6f 75 6e 73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 27 20 73 77 61 70 73 20 74	means.`counsel-yank-pop'.swaps.t
2c9a0	68 65 20 72 65 73 75 6c 74 69 6e 67 20 70 6f 69 6e 74 20 61 6e 64 0a 6d 61 72 6b 2c 20 61 73 20	he.resulting.point.and.mark,.as.
2c9c0	70 65 72 20 5c 5c 5b 75 6e 69 76 65 72 73 61 6c 2d 61 72 67 75 6d 65 6e 74 5d 20 5c 5c 5b 79 61	per.\\[universal-argument].\\[ya
2c9e0	6e 6b 5d 2e 22 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 29 0a 0a 28 64 65 66 75 6e 20	nk]."...:type.'boolean)..(defun.
2ca00	63 6f 75 6e 73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 2d 61 63 74 69 6f 6e 20 28 73 29 0a 20 20 22 4c	counsel-yank-pop-action.(s)..."L
2ca20	69 6b 65 20 60 79 61 6e 6b 2d 70 6f 70 27 2c 20 62 75 74 20 69 6e 73 65 72 74 20 74 68 65 20 6b	ike.`yank-pop',.but.insert.the.k
2ca40	69 6c 6c 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 74 6f 20 53 2e 0a 53 69 67 6e 61 6c 20 61	ill.corresponding.to.S..Signal.a
2ca60	20 60 62 75 66 66 65 72 2d 72 65 61 64 2d 6f 6e 6c 79 27 20 65 72 72 6f 72 20 69 66 20 63 61 6c	.`buffer-read-only'.error.if.cal
2ca80	6c 65 64 20 66 72 6f 6d 20 61 20 72 65 61 64 2d 6f 6e 6c 79 0a 62 75 66 66 65 72 20 70 6f 73 69	led.from.a.read-only.buffer.posi
2caa0	74 69 6f 6e 2e 22 0a 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f	tion."...(when.(and.(eq.major-mo
2cac0	64 65 20 27 76 74 65 72 6d 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 62	de.'vterm-mode)..............(fb
2cae0	6f 75 6e 64 70 20 27 76 74 65 72 6d 2d 69 6e 73 65 72 74 29 29 0a 20 20 20 20 28 6c 65 74 20 28	oundp.'vterm-insert)).....(let.(
2cb00	28 69 6e 68 69 62 69 74 2d 72 65 61 64 2d 6f 6e 6c 79 20 74 29 29 0a 20 20 20 20 20 20 28 76 74	(inhibit-read-only.t)).......(vt
2cb20	65 72 6d 2d 69 6e 73 65 72 74 20 73 29 29 29 0a 20 20 28 62 61 72 66 2d 69 66 2d 62 75 66 66 65	erm-insert.s)))...(barf-if-buffe
2cb40	72 2d 72 65 61 64 2d 6f 6e 6c 79 29 0a 20 20 28 73 65 74 71 20 79 61 6e 6b 2d 77 69 6e 64 6f 77	r-read-only)...(setq.yank-window
2cb60	2d 73 74 61 72 74 20 28 77 69 6e 64 6f 77 2d 73 74 61 72 74 29 29 0a 20 20 28 75 6e 6c 65 73 73	-start.(window-start))...(unless
2cb80	20 28 65 71 20 6c 61 73 74 2d 63 6f 6d 6d 61 6e 64 20 27 79 61 6e 6b 29 0a 20 20 20 20 3b 3b 20	.(eq.last-command.'yank).....;;.
2cba0	41 76 6f 69 64 20 75 6e 65 78 70 65 63 74 65 64 20 64 65 6c 65 74 69 6f 6e 73 20 77 69 74 68 20	Avoid.unexpected.deletions.with.
2cbc0	60 79 61 6e 6b 2d 68 61 6e 64 6c 65 72 27 20 70 72 6f 70 65 72 74 69 65 73 2e 0a 20 20 20 20 28	`yank-handler'.properties......(
2cbe0	73 65 74 71 20 79 61 6e 6b 2d 75 6e 64 6f 2d 66 75 6e 63 74 69 6f 6e 20 6e 69 6c 29 29 0a 20 20	setq.yank-undo-function.nil))...
2cc00	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 28 6c 65 74 20 28	(condition-case.nil.......(let.(
2cc20	3b 3b 20 44 65 63 65 69 76 65 20 60 79 61 6e 6b 2d 70 6f 70 27 2e 0a 20 20 20 20 20 20 20 20 20	;;.Deceive.`yank-pop'...........
2cc40	20 20 20 28 6c 61 73 74 2d 63 6f 6d 6d 61 6e 64 20 27 79 61 6e 6b 29 0a 20 20 20 20 20 20 20 20	...(last-command.'yank).........
2cc60	20 20 20 20 3b 3b 20 41 76 6f 69 64 20 75 6e 65 78 70 65 63 74 65 64 20 61 64 64 69 74 69 6f 6e	....;;.Avoid.unexpected.addition
2cc80	73 20 74 6f 20 60 6b 69 6c 6c 2d 72 69 6e 67 27 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 69 6e	s.to.`kill-ring'..............in
2cca0	74 65 72 70 72 6f 67 72 61 6d 2d 70 61 73 74 65 2d 66 75 6e 63 74 69 6f 6e 29 0a 20 20 20 20 20	terprogram-paste-function)......
2ccc0	20 20 20 28 79 61 6e 6b 2d 70 6f 70 20 28 63 6f 75 6e 73 65 6c 2d 2d 79 61 6e 6b 2d 70 6f 70 2d	...(yank-pop.(counsel--yank-pop-
2cce0	70 6f 73 69 74 69 6f 6e 20 73 29 29 29 0a 20 20 20 20 28 65 72 72 6f 72 0a 20 20 20 20 20 3b 3b	position.s))).....(error......;;
2cd00	20 53 75 70 70 6f 72 74 20 73 74 72 69 6e 67 73 20 6e 6f 74 20 70 72 65 73 65 6e 74 20 69 6e 20	.Support.strings.not.present.in.
2cd20	74 68 65 20 6b 69 6c 6c 20 72 69 6e 67 2e 0a 20 20 20 20 20 28 69 6e 73 65 72 74 20 73 29 29 29	the.kill.ring.......(insert.s)))
2cd40	0a 20 20 28 77 68 65 6e 20 28 66 75 6e 63 61 6c 6c 20 28 69 66 20 63 6f 75 6e 73 65 6c 2d 79 61	...(when.(funcall.(if.counsel-ya
2cd60	6e 6b 2d 70 6f 70 2d 61 66 74 65 72 2d 70 6f 69 6e 74 20 23 27 3e 20 23 27 3c 29 0a 20 20 20 20	nk-pop-after-point.#'>.#'<).....
2cd80	20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6f 69 6e 74 29 20 28 6d 61 72 6b 20 74 29 29 0a 20	.............(point).(mark.t))..
2cda0	20 20 20 28 65 78 63 68 61 6e 67 65 2d 70 6f 69 6e 74 2d 61 6e 64 2d 6d 61 72 6b 20 74 29 29 29	...(exchange-point-and-mark.t)))
2cdc0	0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 2d 61 63 74 69 6f 6e	..(defun.counsel-yank-pop-action
2cde0	2d 72 65 6d 6f 76 65 20 28 73 29 0a 20 20 22 52 65 6d 6f 76 65 20 61 6c 6c 20 6f 63 63 75 72 72	-remove.(s)..."Remove.all.occurr
2ce00	65 6e 63 65 73 20 6f 66 20 53 20 66 72 6f 6d 20 74 68 65 20 6b 69 6c 6c 20 72 69 6e 67 2e 22 0a	ences.of.S.from.the.kill.ring.".
2ce20	20 20 28 73 65 74 71 20 6b 69 6c 6c 2d 72 69 6e 67 0a 20 20 20 20 20 20 20 20 28 63 6c 2d 64 65	..(setq.kill-ring.........(cl-de
2ce40	6c 65 74 65 20 73 20 6b 69 6c 6c 2d 72 69 6e 67 20 3a 74 65 73 74 20 23 27 65 71 75 61 6c 2d 69	lete.s.kill-ring.:test.#'equal-i
2ce60	6e 63 6c 75 64 69 6e 67 2d 70 72 6f 70 65 72 74 69 65 73 29 29 0a 20 20 28 73 65 74 71 20 6b 69	ncluding-properties))...(setq.ki
2ce80	6c 6c 2d 72 69 6e 67 2d 79 61 6e 6b 2d 70 6f 69 6e 74 65 72 0a 20 20 20 20 20 20 20 20 28 63 6c	ll-ring-yank-pointer.........(cl
2cea0	2d 64 65 6c 65 74 65 20 73 20 6b 69 6c 6c 2d 72 69 6e 67 2d 79 61 6e 6b 2d 70 6f 69 6e 74 65 72	-delete.s.kill-ring-yank-pointer
2cec0	20 3a 74 65 73 74 20 23 27 65 71 75 61 6c 2d 69 6e 63 6c 75 64 69 6e 67 2d 70 72 6f 70 65 72 74	.:test.#'equal-including-propert
2cee0	69 65 73 29 29 0a 20 20 3b 3b 20 55 70 64 61 74 65 20 63 6f 6c 6c 65 63 74 69 6f 6e 20 61 6e 64	ies))...;;.Update.collection.and
2cf00	20 70 72 65 73 65 6c 65 63 74 20 66 6f 72 20 6e 65 78 74 20 60 69 76 79 2d 63 61 6c 6c 27 0a 20	.preselect.for.next.`ivy-call'..
2cf20	20 28 73 65 74 66 20 28 69 76 79 2d 73 74 61 74 65 2d 63 6f 6c 6c 65 63 74 69 6f 6e 20 69 76 79	.(setf.(ivy-state-collection.ivy
2cf40	2d 6c 61 73 74 29 20 6b 69 6c 6c 2d 72 69 6e 67 29 0a 20 20 28 73 65 74 66 20 28 69 76 79 2d 73	-last).kill-ring)...(setf.(ivy-s
2cf60	74 61 74 65 2d 70 72 65 73 65 6c 65 63 74 20 69 76 79 2d 6c 61 73 74 29 0a 20 20 20 20 20 20 20	tate-preselect.ivy-last)........
2cf80	20 28 6e 74 68 20 28 6d 69 6e 20 69 76 79 2d 2d 69 6e 64 65 78 20 28 31 2d 20 28 6c 65 6e 67 74	.(nth.(min.ivy--index.(1-.(lengt
2cfa0	68 20 6b 69 6c 6c 2d 72 69 6e 67 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 6b 69 6c 6c	h.kill-ring)))..............kill
2cfc0	2d 72 69 6e 67 29 29 0a 20 20 28 69 76 79 2d 2d 72 65 73 65 74 2d 73 74 61 74 65 20 69 76 79 2d	-ring))...(ivy--reset-state.ivy-
2cfe0	6c 61 73 74 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 2d	last))..(defun.counsel-yank-pop-
2d000	61 63 74 69 6f 6e 2d 72 6f 74 61 74 65 20 28 73 29 0a 20 20 22 52 6f 74 61 74 65 20 74 68 65 20	action-rotate.(s)..."Rotate.the.
2d020	79 61 6e 6b 69 6e 67 20 70 6f 69 6e 74 20 74 6f 20 53 20 69 6e 20 74 68 65 20 6b 69 6c 6c 20 72	yanking.point.to.S.in.the.kill.r
2d040	69 6e 67 2e 0a 53 65 65 20 60 63 75 72 72 65 6e 74 2d 6b 69 6c 6c 27 20 66 6f 72 20 68 6f 77 20	ing..See.`current-kill'.for.how.
2d060	74 68 69 73 20 69 6e 74 65 72 61 63 74 73 20 77 69 74 68 20 74 68 65 20 77 69 6e 64 6f 77 20 73	this.interacts.with.the.window.s
2d080	79 73 74 65 6d 0a 73 65 6c 65 63 74 69 6f 6e 2e 22 0a 20 20 28 6c 65 74 20 28 28 69 20 28 63 6f	ystem.selection."...(let.((i.(co
2d0a0	75 6e 73 65 6c 2d 2d 79 61 6e 6b 2d 70 6f 70 2d 70 6f 73 69 74 69 6f 6e 20 73 29 29 29 0a 20 20	unsel--yank-pop-position.s)))...
2d0c0	20 20 3b 3b 20 41 76 6f 69 64 20 75 6e 65 78 70 65 63 74 65 64 20 61 64 64 69 74 69 6f 6e 73 20	..;;.Avoid.unexpected.additions.
2d0e0	74 6f 20 60 6b 69 6c 6c 2d 72 69 6e 67 27 0a 20 20 20 20 28 6c 65 74 20 28 69 6e 74 65 72 70 72	to.`kill-ring'.....(let.(interpr
2d100	6f 67 72 61 6d 2d 70 61 73 74 65 2d 66 75 6e 63 74 69 6f 6e 29 0a 20 20 20 20 20 20 28 73 65 74	ogram-paste-function).......(set
2d120	66 20 28 69 76 79 2d 73 74 61 74 65 2d 70 72 65 73 65 6c 65 63 74 20 69 76 79 2d 6c 61 73 74 29	f.(ivy-state-preselect.ivy-last)
2d140	20 28 63 75 72 72 65 6e 74 2d 6b 69 6c 6c 20 69 29 29 29 0a 20 20 20 20 3b 3b 20 4d 61 6e 75 61	.(current-kill.i))).....;;.Manua
2d160	6c 6c 79 20 63 68 61 6e 67 65 20 77 69 6e 64 6f 77 20 73 79 73 74 65 6d 20 73 65 6c 65 63 74 69	lly.change.window.system.selecti
2d180	6f 6e 20 62 65 63 61 75 73 65 20 60 63 75 72 72 65 6e 74 2d 6b 69 6c 6c 27 20 77 6f 6e 27 74 0a	on.because.`current-kill'.won't.
2d1a0	20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 7a 65 72 6f 70 20 69 29 0a 20 20 20 20 20 20 20	....(when.(and.(zerop.i)........
2d1c0	20 20 20 20 20 20 20 20 79 61 6e 6b 2d 70 6f 70 2d 63 68 61 6e 67 65 2d 73 65 6c 65 63 74 69 6f	........yank-pop-change-selectio
2d1e0	6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 6e 74 65 72 70 72 6f 67 72 61 6d 2d 63 75	n................interprogram-cu
2d200	74 2d 66 75 6e 63 74 69 6f 6e 29 0a 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 69 6e 74 65 72	t-function).......(funcall.inter
2d220	70 72 6f 67 72 61 6d 2d 63 75 74 2d 66 75 6e 63 74 69 6f 6e 20 28 63 61 72 20 6b 69 6c 6c 2d 72	program-cut-function.(car.kill-r
2d240	69 6e 67 2d 79 61 6e 6b 2d 70 6f 69 6e 74 65 72 29 29 29 29 0a 20 20 28 69 76 79 2d 2d 72 65 73	ing-yank-pointer))))...(ivy--res
2d260	65 74 2d 73 74 61 74 65 20 69 76 79 2d 6c 61 73 74 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20	et-state.ivy-last))..(defcustom.
2d280	63 6f 75 6e 73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 2d 70 72 65 73 65 6c 65 63 74 2d 6c 61 73 74 20	counsel-yank-pop-preselect-last.
2d2a0	6e 69 6c 0a 20 20 22 57 68 65 74 68 65 72 20 60 63 6f 75 6e 73 65 6c 2d 79 61 6e 6b 2d 70 6f 70	nil..."Whether.`counsel-yank-pop
2d2c0	27 20 70 72 65 73 65 6c 65 63 74 73 20 74 68 65 20 6c 61 73 74 20 6b 69 6c 6c 20 62 79 20 64 65	'.preselects.the.last.kill.by.de
2d2e0	66 61 75 6c 74 2e 0a 0a 54 68 65 20 63 6f 6d 6d 61 6e 64 20 60 63 6f 75 6e 73 65 6c 2d 79 61 6e	fault...The.command.`counsel-yan
2d300	6b 2d 70 6f 70 27 20 61 6c 77 61 79 73 20 70 72 65 73 65 6c 65 63 74 73 20 74 68 65 20 73 61 6d	k-pop'.always.preselects.the.sam
2d320	65 20 6b 69 6c 6c 0a 74 68 61 74 20 60 79 61 6e 6b 2d 70 6f 70 27 20 77 6f 75 6c 64 20 68 61 76	e.kill.that.`yank-pop'.would.hav
2d340	65 20 69 6e 73 65 72 74 65 64 2c 20 67 69 76 65 6e 20 74 68 65 20 73 61 6d 65 20 70 72 65 66 69	e.inserted,.given.the.same.prefi
2d360	78 0a 61 72 67 75 6d 65 6e 74 2e 0a 0a 57 68 65 6e 20 60 63 6f 75 6e 73 65 6c 2d 79 61 6e 6b 2d	x.argument...When.`counsel-yank-
2d380	70 6f 70 2d 70 72 65 73 65 6c 65 63 74 2d 6c 61 73 74 27 20 69 73 20 6e 69 6c 20 28 74 68 65 20	pop-preselect-last'.is.nil.(the.
2d3a0	64 65 66 61 75 6c 74 29 2c 20 74 68 65 0a 70 72 65 66 69 78 20 61 72 67 75 6d 65 6e 74 20 6f 66	default),.the.prefix.argument.of
2d3c0	20 60 63 6f 75 6e 73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 27 20 64 65 66 61 75 6c 74 73 20 74 6f 20	.`counsel-yank-pop'.defaults.to.
2d3e0	31 20 28 61 73 20 70 65 72 0a 60 79 61 6e 6b 2d 70 6f 70 27 29 2c 20 77 68 69 63 68 20 63 61 75	1.(as.per.`yank-pop'),.which.cau
2d400	73 65 73 20 74 68 65 20 6e 65 78 74 2d 74 6f 2d 6c 61 73 74 20 6b 69 6c 6c 20 74 6f 20 62 65 0a	ses.the.next-to-last.kill.to.be.
2d420	70 72 65 73 65 6c 65 63 74 65 64 2e 20 20 4f 74 68 65 72 77 69 73 65 2c 20 74 68 65 20 70 72 65	preselected...Otherwise,.the.pre
2d440	66 69 78 20 61 72 67 75 6d 65 6e 74 20 64 65 66 61 75 6c 74 73 20 74 6f 20 30 2c 20 77 68 69 63	fix.argument.defaults.to.0,.whic
2d460	68 0a 72 65 73 75 6c 74 73 20 69 6e 20 74 68 65 20 6d 6f 73 74 20 72 65 63 65 6e 74 20 6b 69 6c	h.results.in.the.most.recent.kil
2d480	6c 20 62 65 69 6e 67 20 70 72 65 73 65 6c 65 63 74 65 64 2e 22 0a 20 20 3a 74 79 70 65 20 27 62	l.being.preselected."...:type.'b
2d4a0	6f 6f 6c 65 61 6e 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 63	oolean)..;;;###autoload.(defun.c
2d4c0	6f 75 6e 73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 29 0a	ounsel-yank-pop.(&optional.arg).
2d4e0	20 20 22 49 76 79 20 72 65 70 6c 61 63 65 6d 65 6e 74 20 66 6f 72 20 60 79 61 6e 6b 2d 70 6f 70	.."Ivy.replacement.for.`yank-pop
2d500	27 2e 0a 57 69 74 68 20 61 20 70 6c 61 69 6e 20 70 72 65 66 69 78 20 61 72 67 75 6d 65 6e 74 20	'..With.a.plain.prefix.argument.
2d520	28 5c 5c 5b 75 6e 69 76 65 72 73 61 6c 2d 61 72 67 75 6d 65 6e 74 5d 29 2c 0a 74 65 6d 70 6f 72	(\\[universal-argument]),.tempor
2d540	61 72 69 6c 79 20 74 6f 67 67 6c 65 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 60 63 6f 75 6e 73	arily.toggle.the.value.of.`couns
2d560	65 6c 2d 79 61 6e 6b 2d 70 6f 70 2d 61 66 74 65 72 2d 70 6f 69 6e 74 27 2e 0a 41 6e 79 20 6f 74	el-yank-pop-after-point'..Any.ot
2d580	68 65 72 20 76 61 6c 75 65 20 6f 66 20 41 52 47 20 68 61 73 20 74 68 65 20 73 61 6d 65 20 6d 65	her.value.of.ARG.has.the.same.me
2d5a0	61 6e 69 6e 67 20 61 73 20 69 6e 20 60 79 61 6e 6b 2d 70 6f 70 27 2c 20 62 75 74 0a 60 63 6f 75	aning.as.in.`yank-pop',.but.`cou
2d5c0	6e 73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 2d 70 72 65 73 65 6c 65 63 74 2d 6c 61 73 74 27 20 64 65	nsel-yank-pop-preselect-last'.de
2d5e0	74 65 72 6d 69 6e 65 73 20 69 74 73 20 64 65 66 61 75 6c 74 20 76 61 6c 75 65 2e 0a 53 65 65 20	termines.its.default.value..See.
2d600	61 6c 73 6f 20 60 63 6f 75 6e 73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 2d 66 69 6c 74 65 72 27 20 66	also.`counsel-yank-pop-filter'.f
2d620	6f 72 20 68 6f 77 20 74 6f 20 66 69 6c 74 65 72 20 63 61 6e 64 69 64 61 74 65 73 2e 0a 0a 4e 6f	or.how.to.filter.candidates...No
2d640	74 65 3a 20 44 75 70 6c 69 63 61 74 65 20 65 6c 65 6d 65 6e 74 73 20 6f 66 20 60 6b 69 6c 6c 2d	te:.Duplicate.elements.of.`kill-
2d660	72 69 6e 67 27 20 61 72 65 20 61 6c 77 61 79 73 20 64 65 6c 65 74 65 64 2e 22 0a 20 20 3b 3b 20	ring'.are.always.deleted."...;;.
2d680	44 6f 20 6e 6f 74 20 73 70 65 63 69 66 79 20 60 2a 27 20 74 6f 20 61 6c 6c 6f 77 20 62 72 6f 77	Do.not.specify.`*'.to.allow.brow
2d6a0	73 69 6e 67 20 60 6b 69 6c 6c 2d 72 69 6e 67 27 20 69 6e 20 72 65 61 64 2d 6f 6e 6c 79 20 62 75	sing.`kill-ring'.in.read-only.bu
2d6c0	66 66 65 72 73 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 50 22 29 0a 20 20 28 6c 65 74	ffers...(interactive."P")...(let
2d6e0	20 28 28 6b 69 6c 6c 73 20 28 6f 72 20 28 63 6f 75 6e 73 65 6c 2d 2d 79 61 6e 6b 2d 70 6f 70 2d	.((kills.(or.(counsel--yank-pop-
2d700	6b 69 6c 6c 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 72 72 6f 72	kills)....................(error
2d720	20 22 4b 69 6c 6c 20 72 69 6e 67 20 69 73 20 65 6d 70 74 79 20 6f 72 20 62 6c 61 6e 6b 22 29 29	."Kill.ring.is.empty.or.blank"))
2d740	29 0a 20 20 20 20 20 20 20 20 28 70 72 65 73 65 6c 65 63 74 20 28 6c 65 74 20 28 69 6e 74 65 72	).........(preselect.(let.(inter
2d760	70 72 6f 67 72 61 6d 2d 70 61 73 74 65 2d 66 75 6e 63 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 20	program-paste-function).........
2d780	20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 75 72 72 65 6e 74 2d 6b 69 6c 6c 20 28 63 6f 6e 64	.............(current-kill.(cond
2d7a0	20 28 28 6e 6c 69 73 74 70 20 61 72 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.((nlistp.arg)..................
2d7c0	20 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 70 72 65 66 69 78	.........................(prefix
2d7e0	2d 6e 75 6d 65 72 69 63 2d 76 61 6c 75 65 20 61 72 67 29 29 0a 20 20 20 20 20 20 20 20 20 20 20	-numeric-value.arg))............
2d800	20 20 20 20 20 20 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	..............................(c
2d820	6f 75 6e 73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 2d 70 72 65 73 65 6c 65 63 74 2d 6c 61 73 74 20 30	ounsel-yank-pop-preselect-last.0
2d840	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	)...............................
2d860	20 20 20 20 20 20 20 20 20 20 20 28 74 20 31 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	...........(t.1))...............
2d880	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 0a 20 20 20 20 20 20	.....................t))).......
2d8a0	20 20 28 63 6f 75 6e 73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 2d 61 66 74 65 72 2d 70 6f 69 6e 74 0a	..(counsel-yank-pop-after-point.
2d8c0	20 20 20 20 20 20 20 20 20 28 78 6f 72 20 28 63 6f 6e 73 70 20 61 72 67 29 20 63 6f 75 6e 73 65	.........(xor.(consp.arg).counse
2d8e0	6c 2d 79 61 6e 6b 2d 70 6f 70 2d 61 66 74 65 72 2d 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 28 75	l-yank-pop-after-point))).....(u
2d900	6e 6c 65 73 73 20 28 65 71 20 6c 61 73 74 2d 63 6f 6d 6d 61 6e 64 20 27 79 61 6e 6b 29 0a 20 20	nless.(eq.last-command.'yank)...
2d920	20 20 20 20 28 70 75 73 68 2d 6d 61 72 6b 29 29 0a 20 20 20 20 28 69 76 79 2d 72 65 61 64 20 22	....(push-mark)).....(ivy-read."
2d940	6b 69 6c 6c 2d 72 69 6e 67 3a 20 22 20 6b 69 6c 6c 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	kill-ring:.".kills..............
2d960	20 3a 72 65 71 75 69 72 65 2d 6d 61 74 63 68 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.:require-match.t...............
2d980	3a 70 72 65 73 65 6c 65 63 74 20 70 72 65 73 65 6c 65 63 74 0a 20 20 20 20 20 20 20 20 20 20 20	:preselect.preselect............
2d9a0	20 20 20 3a 61 63 74 69 6f 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 2d 61 63	...:action.#'counsel-yank-pop-ac
2d9c0	74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e	tion...............:caller.'coun
2d9e0	73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 29 29 29 0a 0a 28 66 75 6e 63 74 69 6f 6e 2d 70 75 74 20 23	sel-yank-pop)))..(function-put.#
2da00	27 63 6f 75 6e 73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 20 27 64 65 6c 65 74 65 2d 73 65 6c 65 63 74	'counsel-yank-pop.'delete-select
2da20	69 6f 6e 20 27 79 61 6e 6b 29 0a 0a 28 69 76 79 2d 63 6f 6e 66 69 67 75 72 65 20 27 63 6f 75 6e	ion.'yank)..(ivy-configure.'coun
2da40	73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 0a 20 20 3a 68 65 69 67 68 74 20 35 0a 20 20 3a 66 6f 72 6d	sel-yank-pop...:height.5...:form
2da60	61 74 2d 66 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 2d 79 61 6e 6b 2d 70 6f 70 2d 66 6f 72 6d 61 74	at-fn.#'counsel--yank-pop-format
2da80	2d 66 75 6e 63 74 69 6f 6e 29 0a 0a 28 69 76 79 2d 73 65 74 2d 61 63 74 69 6f 6e 73 0a 20 27 63	-function)..(ivy-set-actions..'c
2daa0	6f 75 6e 73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 0a 20 27 28 28 22 64 22 20 63 6f 75 6e 73 65 6c 2d	ounsel-yank-pop..'(("d".counsel-
2dac0	79 61 6e 6b 2d 70 6f 70 2d 61 63 74 69 6f 6e 2d 72 65 6d 6f 76 65 20 22 64 65 6c 65 74 65 22 29	yank-pop-action-remove."delete")
2dae0	0a 20 20 20 28 22 72 22 20 63 6f 75 6e 73 65 6c 2d 79 61 6e 6b 2d 70 6f 70 2d 61 63 74 69 6f 6e	....("r".counsel-yank-pop-action
2db00	2d 72 6f 74 61 74 65 20 22 72 6f 74 61 74 65 22 29 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73	-rotate."rotate")))..;;;;.`couns
2db20	65 6c 2d 72 65 67 69 73 74 65 72 27 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 72 65	el-register'..(defvar.counsel-re
2db40	67 69 73 74 65 72 2d 61 63 74 69 6f 6e 73 0a 20 20 27 28 28 22 5c 5c 60 62 75 66 66 65 72 22 20	gister-actions...'(("\\`buffer".
2db60	2e 20 6a 75 6d 70 2d 74 6f 2d 72 65 67 69 73 74 65 72 29 0a 20 20 20 20 28 22 5c 5c 60 74 65 78	..jump-to-register).....("\\`tex
2db80	74 22 20 2e 20 69 6e 73 65 72 74 2d 72 65 67 69 73 74 65 72 29 0a 20 20 20 20 28 22 5c 5c 60 72	t"...insert-register).....("\\`r
2dba0	65 63 74 61 6e 67 6c 65 22 20 2e 20 69 6e 73 65 72 74 2d 72 65 67 69 73 74 65 72 29 0a 20 20 20	ectangle"...insert-register)....
2dbc0	20 28 22 5c 5c 60 77 69 6e 64 6f 77 22 20 2e 20 6a 75 6d 70 2d 74 6f 2d 72 65 67 69 73 74 65 72	.("\\`window"...jump-to-register
2dbe0	29 0a 20 20 20 20 28 22 5c 5c 60 66 72 61 6d 65 22 20 2e 20 6a 75 6d 70 2d 74 6f 2d 72 65 67 69	).....("\\`frame"...jump-to-regi
2dc00	73 74 65 72 29 0a 20 20 20 20 28 22 5c 5c 60 5b 2d 2b 5d 3f 5b 30 2d 39 5d 2b 5c 5c 28 3f 3a 5c	ster).....("\\`[-+]?[0-9]+\\(?:\
2dc20	5c 2e 5b 30 2d 39 5d 5c 5c 29 3f 5c 5c 27 22 20 2e 20 69 6e 73 65 72 74 2d 72 65 67 69 73 74 65	\.[0-9]\\)?\\'"...insert-registe
2dc40	72 29 0a 20 20 20 20 28 22 5c 5c 60 5c 5c 28 3f 3a 74 68 65 20 5c 5c 29 3f 66 69 6c 65 20 22 20	r).....("\\`\\(?:the.\\)?file.".
2dc60	2e 20 6a 75 6d 70 2d 74 6f 2d 72 65 67 69 73 74 65 72 29 0a 20 20 20 20 28 22 5c 5c 60 6b 65 79	..jump-to-register).....("\\`key
2dc80	62 6f 61 72 64 22 20 2e 20 6a 75 6d 70 2d 74 6f 2d 72 65 67 69 73 74 65 72 29 0a 20 20 20 20 28	board"...jump-to-register).....(
2dca0	22 5c 5c 60 66 69 6c 65 2d 71 75 65 72 79 22 20 2e 20 6a 75 6d 70 2d 74 6f 2d 72 65 67 69 73 74	"\\`file-query"...jump-to-regist
2dcc0	65 72 29 29 0a 20 20 22 41 6c 69 73 74 20 6f 66 20 28 52 45 47 45 58 50 20 2e 20 46 55 4e 43 54	er))..."Alist.of.(REGEXP...FUNCT
2dce0	49 4f 4e 29 20 70 61 69 72 73 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 72 65 67 69 73 74 65 72	ION).pairs.for.`counsel-register
2dd00	27 2e 0a 53 65 6c 65 63 74 69 6e 67 20 61 20 72 65 67 69 73 74 65 72 20 77 68 6f 73 65 20 64 65	'..Selecting.a.register.whose.de
2dd20	73 63 72 69 70 74 69 6f 6e 20 6d 61 74 63 68 65 73 20 52 45 47 45 58 50 20 73 70 65 63 69 66 69	scription.matches.REGEXP.specifi
2dd40	65 73 0a 46 55 4e 43 54 49 4f 4e 20 61 73 20 74 68 65 20 61 63 74 69 6f 6e 20 74 6f 20 74 61 6b	es.FUNCTION.as.the.action.to.tak
2dd60	65 20 6f 6e 20 74 68 65 20 72 65 67 69 73 74 65 72 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 63 6f	e.on.the.register.")..(defvar.co
2dd80	75 6e 73 65 6c 2d 72 65 67 69 73 74 65 72 2d 68 69 73 74 6f 72 79 20 6e 69 6c 0a 20 20 22 48 69	unsel-register-history.nil..."Hi
2dda0	73 74 6f 72 79 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 72 65 67 69 73 74 65 72 27 2e 22 29 0a	story.for.`counsel-register'.").
2ddc0	0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 72 65 67 69 73 74 65 72 2d 61 63 74 69 6f 6e 20	.(defun.counsel-register-action.
2dde0	28 72 65 67 69 73 74 65 72 29 0a 20 20 22 44 65 66 61 75 6c 74 20 61 63 74 69 6f 6e 20 66 6f 72	(register)..."Default.action.for
2de00	20 60 63 6f 75 6e 73 65 6c 2d 72 65 67 69 73 74 65 72 27 2e 0a 0a 43 61 6c 6c 20 61 20 66 75 6e	.`counsel-register'...Call.a.fun
2de20	63 74 69 6f 6e 20 6f 6e 20 52 45 47 49 53 54 45 52 2e 20 20 54 68 65 20 66 75 6e 63 74 69 6f 6e	ction.on.REGISTER...The.function
2de40	20 69 73 20 64 65 74 65 72 6d 69 6e 65 64 20 62 79 0a 6d 61 74 63 68 69 6e 67 20 74 68 65 20 72	.is.determined.by.matching.the.r
2de60	65 67 69 73 74 65 72 27 73 20 76 61 6c 75 65 20 64 65 73 63 72 69 70 74 69 6f 6e 20 61 67 61 69	egister's.value.description.agai
2de80	6e 73 74 20 61 20 72 65 67 65 78 70 20 69 6e 0a 60 63 6f 75 6e 73 65 6c 2d 72 65 67 69 73 74 65	nst.a.regexp.in.`counsel-registe
2dea0	72 2d 61 63 74 69 6f 6e 73 27 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 76 61 6c 20 28 67 65 74 2d	r-actions'."...(let*.((val.(get-
2dec0	74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 27 72 65 67 69 73 74 65 72 20 72 65 67 69 73 74	text-property.0.'register.regist
2dee0	65 72 29 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 73 63 20 28 72 65 67 69 73 74 65 72 2d 64 65	er))..........(desc.(register-de
2df00	73 63 72 69 62 65 2d 6f 6e 65 6c 69 6e 65 20 76 61 6c 29 29 0a 20 20 20 20 20 20 20 20 20 28 61	scribe-oneline.val))..........(a
2df20	63 74 69 6f 6e 20 28 63 64 72 20 28 63 6c 2d 61 73 73 6f 63 2d 69 66 20 28 6c 61 6d 62 64 61 20	ction.(cdr.(cl-assoc-if.(lambda.
2df40	28 72 65 29 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 72 65 20 64 65 73 63 29 29 0a 20	(re).(string-match-p.re.desc))..
2df60	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
2df80	20 20 63 6f 75 6e 73 65 6c 2d 72 65 67 69 73 74 65 72 2d 61 63 74 69 6f 6e 73 29 29 29 29 0a 20	..counsel-register-actions))))..
2dfa0	20 20 20 28 69 66 20 61 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 61	...(if.action.........(funcall.a
2dfc0	63 74 69 6f 6e 20 76 61 6c 29 0a 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 4e 6f 20 61 63 74 69	ction.val).......(error."No.acti
2dfe0	6f 6e 20 77 61 73 20 66 6f 75 6e 64 20 66 6f 72 20 72 65 67 69 73 74 65 72 20 25 73 22 0a 20 20	on.was.found.for.register.%s"...
2e000	20 20 20 20 20 20 20 20 20 20 20 28 73 69 6e 67 6c 65 2d 6b 65 79 2d 64 65 73 63 72 69 70 74 69	...........(single-key-descripti
2e020	6f 6e 20 76 61 6c 29 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66	on.val)))))..;;;###autoload.(def
2e040	75 6e 20 63 6f 75 6e 73 65 6c 2d 72 65 67 69 73 74 65 72 20 28 29 0a 20 20 22 49 6e 74 65 72 61	un.counsel-register.()..."Intera
2e060	63 74 69 76 65 6c 79 20 63 68 6f 6f 73 65 20 61 20 72 65 67 69 73 74 65 72 2e 22 0a 20 20 28 69	ctively.choose.a.register."...(i
2e080	6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 69 76 79 2d 72 65 61 64 20 22 52 65 67 69 73 74 65	nteractive)...(ivy-read."Registe
2e0a0	72 3a 20 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 6d 61 70 63 61 6e 0a 20 20 20 20	r:.".............(cl-mapcan.....
2e0c0	20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 72 65 67 29 0a 20 20 20 20 20 20 20 20 20	.........(lambda.(reg)..........
2e0e0	20 20 20 20 20 20 28 6c 65 74 20 28 28 73 20 28 66 75 6e 63 61 6c 6c 20 72 65 67 69 73 74 65 72	......(let.((s.(funcall.register
2e100	2d 70 72 65 76 69 65 77 2d 66 75 6e 63 74 69 6f 6e 20 72 65 67 29 29 29 0a 20 20 20 20 20 20 20	-preview-function.reg)))........
2e120	20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 73 20 28 73 75 62 73 74 72 69 6e 67 20 73 20 30	..........(setq.s.(substring.s.0
2e140	20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 22 5b 20 5c 74 5c 6e 5c 72 5d 2b 5c 5c 27 22	.(string-match-p."[.\t\n\r]+\\'"
2e160	20 73 29 29 29 0a 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	.s)))..................(unless.(
2e180	73 74 72 69 6e 67 3d 20 73 20 22 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	string=.s."")...................
2e1a0	20 28 70 75 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 31 20 27 72 65 67 69 73 74 65	.(put-text-property.0.1.'registe
2e1c0	72 20 28 63 61 72 20 72 65 67 29 20 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	r.(car.reg).s)..................
2e1e0	20 20 28 6c 69 73 74 20 73 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 67 69 73	..(list.s))))..............regis
2e200	74 65 72 2d 61 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 71 75 69 72 65 2d	ter-alist).............:require-
2e220	6d 61 74 63 68 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 69 73 74 6f 72 79 20 27 63 6f	match.t.............:history.'co
2e240	75 6e 73 65 6c 2d 72 65 67 69 73 74 65 72 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20	unsel-register-history..........
2e260	20 20 20 3a 61 63 74 69 6f 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 72 65 67 69 73 74 65 72 2d 61 63	...:action.#'counsel-register-ac
2e280	74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65	tion.............:caller.'counse
2e2a0	6c 2d 72 65 67 69 73 74 65 72 29 29 0a 0a 28 69 76 79 2d 63 6f 6e 66 69 67 75 72 65 20 27 63 6f	l-register))..(ivy-configure.'co
2e2c0	75 6e 73 65 6c 2d 72 65 67 69 73 74 65 72 0a 20 20 3a 73 6f 72 74 2d 66 6e 20 23 27 69 76 79 2d	unsel-register...:sort-fn.#'ivy-
2e2e0	73 74 72 69 6e 67 3c 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 65 76 69 6c 2d 72 65 67	string<)..;;;;.`counsel-evil-reg
2e300	69 73 74 65 72 73 27 0a 0a 28 64 65 66 66 61 63 65 20 63 6f 75 6e 73 65 6c 2d 65 76 69 6c 2d 72	isters'..(defface.counsel-evil-r
2e320	65 67 69 73 74 65 72 2d 66 61 63 65 0a 20 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 63 6f 75	egister-face...'((t.:inherit.cou
2e340	6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 31 29 29 0a 20 20 22 46 61 63 65 20 66 6f 72 20 68 69 67	nsel-outline-1))..."Face.for.hig
2e360	68 6c 69 67 68 74 69 6e 67 20 60 65 76 69 6c 27 20 72 65 67 69 73 74 65 72 73 20 69 6e 20 69 76	hlighting.`evil'.registers.in.iv
2e380	79 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 69 76 79 2d 66 61 63 65 73 29 0a 0a 3b 3b 3b 23 23 23	y."...:group.'ivy-faces)..;;;###
2e3a0	61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 65 76 69 6c 2d 72 65 67	autoload.(defun.counsel-evil-reg
2e3c0	69 73 74 65 72 73 20 28 29 0a 20 20 22 49 76 79 20 72 65 70 6c 61 63 65 6d 65 6e 74 20 66 6f 72	isters.()..."Ivy.replacement.for
2e3e0	20 60 65 76 69 6c 2d 73 68 6f 77 2d 72 65 67 69 73 74 65 72 73 27 2e 22 0a 20 20 28 69 6e 74 65	.`evil-show-registers'."...(inte
2e400	72 61 63 74 69 76 65 29 0a 20 20 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 65 76 69 6c 2d 72 65	ractive)...(if.(fboundp.'evil-re
2e420	67 69 73 74 65 72 2d 6c 69 73 74 29 0a 20 20 20 20 20 20 28 69 76 79 2d 72 65 61 64 20 22 65 76	gister-list).......(ivy-read."ev
2e440	69 6c 2d 72 65 67 69 73 74 65 72 73 3a 20 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	il-registers:.".................
2e460	28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 28 6b 65 79 20 2e 20 76 61 6c 29 20 69 6e 20 28 65 76 69	(cl-loop.for.(key...val).in.(evi
2e480	6c 2d 72 65 67 69 73 74 65 72 2d 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	l-register-list)................
2e4a0	20 20 20 20 63 6f 6c 6c 65 63 74 20 28 66 6f 72 6d 61 74 20 22 5b 25 73 5d 3a 20 25 73 22 0a 20	....collect.(format."[%s]:.%s"..
2e4c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
2e4e0	20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28 63 68 61 72 2d 74 6f 2d 73 74 72 69 6e 67 20 6b 65	..(propertize.(char-to-string.ke
2e500	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 20 20 20 20 20	y)..............................
2e520	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 63 6f 75 6e 73 65 6c	..................'face.'counsel
2e540	2d 65 76 69 6c 2d 72 65 67 69 73 74 65 72 2d 66 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20	-evil-register-face)............
2e560	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 73 74 72	........................(if.(str
2e580	69 6e 67 70 20 76 61 6c 29 20 76 61 6c 20 22 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	ingp.val).val.""))).............
2e5a0	20 20 20 20 3a 72 65 71 75 69 72 65 2d 6d 61 74 63 68 20 74 0a 20 20 20 20 20 20 20 20 20 20 20	....:require-match.t............
2e5c0	20 20 20 20 20 3a 61 63 74 69 6f 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 65 76 69 6c 2d 72 65 67 69	.....:action.#'counsel-evil-regi
2e5e0	73 74 65 72 73 2d 61 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61	sters-action.................:ca
2e600	6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 65 76 69 6c 2d 72 65 67 69 73 74 65 72 73 29 0a 20 20	ller.'counsel-evil-registers)...
2e620	20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 52 65 71 75 69 72 65 64 20 66 65 61 74 75 72 65 20	..(user-error."Required.feature.
2e640	60 65 76 69 6c 27 20 6e 6f 74 20 69 6e 73 74 61 6c 6c 65 64 22 29 29 29 0a 0a 28 69 76 79 2d 63	`evil'.not.installed")))..(ivy-c
2e660	6f 6e 66 69 67 75 72 65 20 27 63 6f 75 6e 73 65 6c 2d 65 76 69 6c 2d 72 65 67 69 73 74 65 72 73	onfigure.'counsel-evil-registers
2e680	0a 20 20 3a 68 65 69 67 68 74 20 35 0a 20 20 3a 66 6f 72 6d 61 74 2d 66 6e 20 23 27 63 6f 75 6e	...:height.5...:format-fn.#'coun
2e6a0	73 65 6c 2d 2d 79 61 6e 6b 2d 70 6f 70 2d 66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 29 0a 0a	sel--yank-pop-format-function)..
2e6c0	28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 65 76 69 6c 2d 72 65 67 69 73 74 65 72 73 2d 61 63	(defun.counsel-evil-registers-ac
2e6e0	74 69 6f 6e 20 28 73 29 0a 20 20 22 50 61 73 74 65 20 63 6f 6e 74 65 6e 74 73 20 6f 66 20 53 2c	tion.(s)..."Paste.contents.of.S,
2e700	20 74 72 69 6d 6d 69 6e 67 20 74 68 65 20 72 65 67 69 73 74 65 72 20 70 61 72 74 2e 0a 0a 53 20	.trimming.the.register.part...S.
2e720	77 69 6c 6c 20 62 65 20 6f 66 20 74 68 65 20 66 6f 72 6d 20 5c 22 5b 72 65 67 69 73 74 65 72 5d	will.be.of.the.form.\"[register]
2e740	3a 20 63 6f 6e 74 65 6e 74 5c 22 2e 22 0a 20 20 28 77 69 74 68 2d 69 76 79 2d 77 69 6e 64 6f 77	:.content\"."...(with-ivy-window
2e760	0a 20 20 20 20 28 69 6e 73 65 72 74 0a 20 20 20 20 20 28 72 65 70 6c 61 63 65 2d 72 65 67 65 78	.....(insert......(replace-regex
2e780	70 2d 69 6e 2d 73 74 72 69 6e 67 20 22 5c 5c 60 5c 5c 5b 2e 2a 3f 5d 3a 20 22 20 22 22 20 73 20	p-in-string."\\`\\[.*?]:."."".s.
2e7a0	74 20 74 29 29 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 69 6d 65 6e 75 27 0a 0a 28	t.t))))..;;;;.`counsel-imenu'..(
2e7c0	64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 69 6d 65 6e 75 2d 2d 73 75 62 61 6c 69 73 74	declare-function.imenu--subalist
2e7e0	2d 70 20 22 69 6d 65 6e 75 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 69 6d	-p."imenu").(declare-function.im
2e800	65 6e 75 2d 2d 6d 61 6b 65 2d 69 6e 64 65 78 2d 61 6c 69 73 74 20 22 69 6d 65 6e 75 22 29 0a 0a	enu--make-index-alist."imenu")..
2e820	28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 69 6d 65 6e 75 2d 63 61 6e 64 69 64 61 74 65 73	(defun.counsel--imenu-candidates
2e840	20 28 29 0a 20 20 28 72 65 71 75 69 72 65 20 27 69 6d 65 6e 75 29 0a 20 20 28 64 65 66 76 61 72	.()...(require.'imenu)...(defvar
2e860	20 69 6d 65 6e 75 2d 61 75 74 6f 2d 72 65 73 63 61 6e 29 0a 20 20 28 64 65 66 76 61 72 20 69 6d	.imenu-auto-rescan)...(defvar.im
2e880	65 6e 75 2d 61 75 74 6f 2d 72 65 73 63 61 6e 2d 6d 61 78 6f 75 74 29 0a 20 20 28 6c 65 74 2a 20	enu-auto-rescan-maxout)...(let*.
2e8a0	28 28 69 6d 65 6e 75 2d 61 75 74 6f 2d 72 65 73 63 61 6e 20 74 29 0a 20 20 20 20 20 20 20 20 20	((imenu-auto-rescan.t)..........
2e8c0	28 69 6d 65 6e 75 2d 61 75 74 6f 2d 72 65 73 63 61 6e 2d 6d 61 78 6f 75 74 20 28 69 66 20 63 75	(imenu-auto-rescan-maxout.(if.cu
2e8e0	72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	rrent-prefix-arg................
2e900	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 62 75 66 66 65 72 2d	........................(buffer-
2e920	73 69 7a 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	size)...........................
2e940	20 20 20 20 20 20 20 20 20 20 20 69 6d 65 6e 75 2d 61 75 74 6f 2d 72 65 73 63 61 6e 2d 6d 61 78	...........imenu-auto-rescan-max
2e960	6f 75 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 69 74 65 6d 73 20 28 69 6d 65 6e 75 2d 2d 6d 61	out))..........(items.(imenu--ma
2e980	6b 65 2d 69 6e 64 65 78 2d 61 6c 69 73 74 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 69 74 65	ke-index-alist.t))..........(ite
2e9a0	6d 73 20 28 64 65 6c 65 74 65 20 28 61 73 73 6f 63 20 22 2a 52 65 73 63 61 6e 2a 22 20 69 74 65	ms.(delete.(assoc."*Rescan*".ite
2e9c0	6d 73 29 20 69 74 65 6d 73 29 29 0a 20 20 20 20 20 20 20 20 20 28 69 74 65 6d 73 20 28 63 6f 6e	ms).items))..........(items.(con
2e9e0	64 20 28 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 65 6d 61 63 73 2d 6c 69 73 70 2d 6d 6f	d.((eq.major-mode.'emacs-lisp-mo
2ea00	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 20 20 28 63 6f 75 6e	de)........................(coun
2ea20	73 65 6c 2d 69 6d 65 6e 75 2d 63 61 74 65 67 6f 72 69 7a 65 2d 66 75 6e 63 74 69 6f 6e 73 20 69	sel-imenu-categorize-functions.i
2ea40	74 65 6d 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 28 61	tems)).......................((a
2ea60	6e 64 20 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 70 79 74 68 6f 6e 2d 6d 6f 64 65 29	nd.(derived-mode-p.'python-mode)
2ea80	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 66 62	.............................(fb
2eaa0	6f 75 6e 64 70 20 27 70 79 74 68 6f 6e 2d 69 6d 65 6e 75 2d 63 72 65 61 74 65 2d 66 6c 61 74 2d	oundp.'python-imenu-create-flat-
2eac0	69 6e 64 65 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	index))........................(
2eae0	70 79 74 68 6f 6e 2d 69 6d 65 6e 75 2d 63 72 65 61 74 65 2d 66 6c 61 74 2d 69 6e 64 65 78 29 29	python-imenu-create-flat-index))
2eb00	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 0a 20 20 20 20 20 20	.......................(t.......
2eb20	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 74 65 6d 73 29 29 29 29 0a 20 20 20 20 28	.................items)))).....(
2eb40	63 6f 75 6e 73 65 6c 2d 69 6d 65 6e 75 2d 67 65 74 2d 63 61 6e 64 69 64 61 74 65 73 2d 66 72 6f	counsel-imenu-get-candidates-fro
2eb60	6d 20 69 74 65 6d 73 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 69 6d 65 6e 75	m.items)))..(defun.counsel-imenu
2eb80	2d 67 65 74 2d 63 61 6e 64 69 64 61 74 65 73 2d 66 72 6f 6d 20 28 61 6c 69 73 74 20 26 6f 70 74	-get-candidates-from.(alist.&opt
2eba0	69 6f 6e 61 6c 20 70 72 65 66 69 78 29 0a 20 20 22 43 72 65 61 74 65 20 61 20 6c 69 73 74 20 6f	ional.prefix)..."Create.a.list.o
2ebc0	66 20 28 6b 65 79 20 2e 20 76 61 6c 75 65 29 20 66 72 6f 6d 20 41 4c 49 53 54 2e 0a 50 52 45 46	f.(key...value).from.ALIST..PREF
2ebe0	49 58 20 69 73 20 75 73 65 64 20 74 6f 20 63 72 65 61 74 65 20 74 68 65 20 6b 65 79 2e 22 0a 20	IX.is.used.to.create.the.key."..
2ec00	20 28 63 6c 2d 6d 61 70 63 61 6e 0a 20 20 20 28 6c 61 6d 62 64 61 20 28 65 6c 6d 29 0a 20 20 20	.(cl-mapcan....(lambda.(elm)....
2ec20	20 20 28 69 66 20 28 69 6d 65 6e 75 2d 2d 73 75 62 61 6c 69 73 74 2d 70 20 65 6c 6d 29 0a 20 20	..(if.(imenu--subalist-p.elm)...
2ec40	20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 69 6d 65 6e 75 2d 67 65 74 2d 63 61 6e 64 69 64	.......(counsel-imenu-get-candid
2ec60	61 74 65 73 2d 66 72 6f 6d 0a 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72	ates-from...........(cl-loop.for
2ec80	20 28 65 20 2e 20 76 29 20 69 6e 20 28 63 64 72 20 65 6c 6d 29 20 63 6f 6c 6c 65 63 74 0a 20 20	.(e...v).in.(cdr.elm).collect...
2eca0	20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 65 20 28 69 66 20 28 69 6e 74 65 67 65	.............(cons.e.(if.(intege
2ecc0	72 70 20 76 29 20 28 63 6f 70 79 2d 6d 61 72 6b 65 72 20 76 29 20 76 29 29 29 0a 20 20 20 20 20	rp.v).(copy-marker.v).v)))......
2ece0	20 20 20 20 20 3b 3b 20 70 61 73 73 20 74 68 65 20 70 72 65 66 69 78 20 74 6f 20 6e 65 78 74 20	.....;;.pass.the.prefix.to.next.
2ed00	72 65 63 75 72 73 69 76 65 20 63 61 6c 6c 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74	recursive.call...........(concat
2ed20	20 70 72 65 66 69 78 20 28 69 66 20 70 72 65 66 69 78 20 22 2e 22 29 20 28 63 61 72 20 65 6c 6d	.prefix.(if.prefix.".").(car.elm
2ed40	29 29 29 0a 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 6b 65 79 20 28 63 6f 6e 63 61 74 0a 20 20	)))........(let.((key.(concat...
2ed60	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 70 72 65 66 69 78 0a 20 20	.................(when.prefix...
2ed80	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 0a 20 20 20 20 20	...................(concat......
2eda0	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 70 72 65	.................(propertize.pre
2edc0	66 69 78 20 27 66 61 63 65 20 27 69 76 79 2d 67 72 65 70 2d 69 6e 66 6f 29 0a 20 20 20 20 20 20	fix.'face.'ivy-grep-info).......
2ede0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3a 20 22 29 29 0a 20 20 20 20 20 20 20 20 20	................":."))..........
2ee00	20 20 20 20 20 20 20 20 20 20 28 63 61 72 20 65 6c 6d 29 29 29 29 0a 20 20 20 20 20 20 20 20 20	..........(car.elm))))..........
2ee20	28 6c 69 73 74 20 28 63 6f 6e 73 20 6b 65 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	(list.(cons.key.................
2ee40	20 20 20 20 20 28 63 6f 6e 73 20 6b 65 79 20 28 69 66 20 28 6f 76 65 72 6c 61 79 70 20 28 63 64	.....(cons.key.(if.(overlayp.(cd
2ee60	72 20 65 6c 6d 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	r.elm)).........................
2ee80	20 20 20 20 20 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 73 74 61 72 74 20 28 63 64 72 20 65	...........(overlay-start.(cdr.e
2eea0	6c 6d 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	lm))............................
2eec0	20 20 20 20 20 20 28 63 64 72 20 65 6c 6d 29 29 29 29 29 29 29 29 0a 20 20 20 61 6c 69 73 74 29	......(cdr.elm))))))))....alist)
2eee0	29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 69 6d 65 6e 75 2d 6d 61 70 0a 20 20 28	)..(defvar.counsel-imenu-map...(
2ef00	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 61 70 29 29 29	let.((map.(make-sparse-keymap)))
2ef20	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 43 2d 6c 22 29	.....(define-key.map.(kbd."C-l")
2ef40	20 23 27 69 76 79 2d 63 61 6c 6c 2d 61 6e 64 2d 72 65 63 65 6e 74 65 72 29 0a 20 20 20 20 6d 61	.#'ivy-call-and-recenter).....ma
2ef60	70 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 69 6d 65 6e 75 2d 63 61 74 65 67 6f	p))..(defun.counsel-imenu-catego
2ef80	72 69 7a 65 2d 66 75 6e 63 74 69 6f 6e 73 20 28 69 74 65 6d 73 29 0a 20 20 22 43 61 74 65 67 6f	rize-functions.(items)..."Catego
2efa0	72 69 7a 65 20 61 6c 6c 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 73 20 6f 66 20 69 6d 65 6e 75 2e	rize.all.the.functions.of.imenu.
2efc0	22 0a 20 20 28 6c 65 74 20 28 28 66 6e 73 20 28 63 6c 2d 72 65 6d 6f 76 65 2d 69 66 20 23 27 6c	"...(let.((fns.(cl-remove-if.#'l
2efe0	69 73 74 70 20 69 74 65 6d 73 20 3a 6b 65 79 20 23 27 63 64 72 29 29 29 0a 20 20 20 20 28 69 66	istp.items.:key.#'cdr))).....(if
2f000	20 66 6e 73 0a 20 20 20 20 20 20 20 20 28 61 70 70 65 6e 64 20 28 63 6c 2d 72 65 6d 6f 76 65 2d	.fns.........(append.(cl-remove-
2f020	69 66 20 23 27 6e 6c 69 73 74 70 20 69 74 65 6d 73 20 3a 6b 65 79 20 23 27 63 64 72 29 0a 20 20	if.#'nlistp.items.:key.#'cdr)...
2f040	20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 28 22 46 75 6e 63 74 69 6f 6e 73 22 20 2c 40 66	..............`(("Functions".,@f
2f060	6e 73 29 29 29 0a 20 20 20 20 20 20 69 74 65 6d 73 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75	ns))).......items)))..(defun.cou
2f080	6e 73 65 6c 2d 69 6d 65 6e 75 2d 61 63 74 69 6f 6e 20 28 78 29 0a 20 20 28 69 6d 65 6e 75 20 28	nsel-imenu-action.(x)...(imenu.(
2f0a0	63 64 72 20 78 29 29 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 69 6d 65 6e 75 2d	cdr.x)))..(defvar.counsel-imenu-
2f0c0	68 69 73 74 6f 72 79 20 6e 69 6c 0a 20 20 22 48 69 73 74 6f 72 79 20 66 6f 72 20 60 63 6f 75 6e	history.nil..."History.for.`coun
2f0e0	73 65 6c 2d 69 6d 65 6e 75 27 2e 22 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64	sel-imenu'.")..;;;###autoload.(d
2f100	65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 69 6d 65 6e 75 20 28 29 0a 20 20 22 4a 75 6d 70 20 74 6f	efun.counsel-imenu.()..."Jump.to
2f120	20 61 20 62 75 66 66 65 72 20 70 6f 73 69 74 69 6f 6e 20 69 6e 64 65 78 65 64 20 62 79 20 69 6d	.a.buffer.position.indexed.by.im
2f140	65 6e 75 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 69 76 79 2d 72 65 61	enu."...(interactive)...(ivy-rea
2f160	64 20 22 69 6d 65 6e 75 20 69 74 65 6d 73 3a 20 22 20 28 63 6f 75 6e 73 65 6c 2d 2d 69 6d 65 6e	d."imenu.items:.".(counsel--imen
2f180	75 2d 63 61 6e 64 69 64 61 74 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 70 72 65 73 65	u-candidates).............:prese
2f1a0	6c 65 63 74 20 28 74 68 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 20 27 73 79 6d 62 6f 6c 29 0a 20 20	lect.(thing-at-point.'symbol)...
2f1c0	20 20 20 20 20 20 20 20 20 20 3a 72 65 71 75 69 72 65 2d 6d 61 74 63 68 20 74 0a 20 20 20 20 20	..........:require-match.t......
2f1e0	20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 69 6d 65 6e 75 2d 61	.......:action.#'counsel-imenu-a
2f200	63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 6b 65 79 6d 61 70 20 63 6f 75 6e 73 65	ction.............:keymap.counse
2f220	6c 2d 69 6d 65 6e 75 2d 6d 61 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 69 73 74 6f 72 79	l-imenu-map.............:history
2f240	20 27 63 6f 75 6e 73 65 6c 2d 69 6d 65 6e 75 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20	.'counsel-imenu-history.........
2f260	20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 69 6d 65 6e 75 29 29 0a 0a 3b 3b	....:caller.'counsel-imenu))..;;
2f280	3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 6c 69 73 74 2d 70 72 6f 63 65 73 73 65 73 27 0a 0a 28 64 65	;;.`counsel-list-processes'..(de
2f2a0	66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6c 69 73 74 2d 70 72 6f 63 65 73 73 65 73 2d 61 63 74 69 6f	fun.counsel-list-processes-actio
2f2c0	6e 2d 64 65 6c 65 74 65 20 28 78 29 0a 20 20 22 44 65 6c 65 74 65 20 70 72 6f 63 65 73 73 20 58	n-delete.(x)..."Delete.process.X
2f2e0	2e 22 0a 20 20 28 64 65 6c 65 74 65 2d 70 72 6f 63 65 73 73 20 78 29 0a 20 20 28 73 65 74 66 20	."...(delete-process.x)...(setf.
2f300	28 69 76 79 2d 73 74 61 74 65 2d 63 6f 6c 6c 65 63 74 69 6f 6e 20 69 76 79 2d 6c 61 73 74 29 0a	(ivy-state-collection.ivy-last).
2f320	20 20 20 20 20 20 20 20 28 73 65 74 71 20 69 76 79 2d 2d 61 6c 6c 2d 63 61 6e 64 69 64 61 74 65	........(setq.ivy--all-candidate
2f340	73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 6c 65 74 65 20 78 20 69 76 79 2d 2d 61	s...............(delete.x.ivy--a
2f360	6c 6c 2d 63 61 6e 64 69 64 61 74 65 73 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65	ll-candidates))))..(defun.counse
2f380	6c 2d 6c 69 73 74 2d 70 72 6f 63 65 73 73 65 73 2d 61 63 74 69 6f 6e 2d 73 77 69 74 63 68 20 28	l-list-processes-action-switch.(
2f3a0	78 29 0a 20 20 22 53 77 69 74 63 68 20 74 6f 20 62 75 66 66 65 72 20 6f 66 20 70 72 6f 63 65 73	x)..."Switch.to.buffer.of.proces
2f3c0	73 20 58 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 70 72 6f 63 20 28 67 65 74 2d 70 72 6f 63 65 73	s.X."...(let*.((proc.(get-proces
2f3e0	73 20 78 29 29 0a 20 20 20 20 20 20 20 20 20 28 62 75 66 20 28 61 6e 64 20 70 72 6f 63 20 28 70	s.x))..........(buf.(and.proc.(p
2f400	72 6f 63 65 73 73 2d 62 75 66 66 65 72 20 70 72 6f 63 29 29 29 29 0a 20 20 20 20 28 69 66 20 62	rocess-buffer.proc)))).....(if.b
2f420	75 66 0a 20 20 20 20 20 20 20 20 28 73 77 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 20 62 75 66	uf.........(switch-to-buffer.buf
2f440	29 0a 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 50 72 6f 63 65 73 73 20 25 73 20 64 6f 65	).......(message."Process.%s.doe
2f460	73 6e 27 74 20 68 61 76 65 20 61 20 62 75 66 66 65 72 22 20 78 29 29 29 29 0a 0a 3b 3b 3b 23 23	sn't.have.a.buffer".x))))..;;;##
2f480	23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6c 69 73 74 2d 70 72	#autoload.(defun.counsel-list-pr
2f4a0	6f 63 65 73 73 65 73 20 28 29 0a 20 20 22 4f 66 66 65 72 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 66	ocesses.()..."Offer.completion.f
2f4c0	6f 72 20 60 70 72 6f 63 65 73 73 2d 6c 69 73 74 27 2e 0a 54 68 65 20 64 65 66 61 75 6c 74 20 61	or.`process-list'..The.default.a
2f4e0	63 74 69 6f 6e 20 64 65 6c 65 74 65 73 20 74 68 65 20 73 65 6c 65 63 74 65 64 20 70 72 6f 63 65	ction.deletes.the.selected.proce
2f500	73 73 2e 0a 41 6e 20 65 78 74 72 61 20 61 63 74 69 6f 6e 20 61 6c 6c 6f 77 73 20 74 6f 20 73 77	ss..An.extra.action.allows.to.sw
2f520	69 74 63 68 20 74 6f 20 74 68 65 20 70 72 6f 63 65 73 73 20 62 75 66 66 65 72 2e 22 0a 20 20 28	itch.to.the.process.buffer."...(
2f540	69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72	interactive)...(with-temp-buffer
2f560	0a 20 20 20 20 28 6c 69 73 74 2d 70 72 6f 63 65 73 73 65 73 2d 2d 72 65 66 72 65 73 68 29 29 0a	.....(list-processes--refresh)).
2f580	20 20 28 69 76 79 2d 72 65 61 64 20 22 50 72 6f 63 65 73 73 3a 20 22 20 28 6d 61 70 63 61 72 20	..(ivy-read."Process:.".(mapcar.
2f5a0	23 27 70 72 6f 63 65 73 73 2d 6e 61 6d 65 20 28 70 72 6f 63 65 73 73 2d 6c 69 73 74 29 29 0a 20	#'process-name.(process-list))..
2f5c0	20 20 20 20 20 20 20 20 20 20 20 3a 72 65 71 75 69 72 65 2d 6d 61 74 63 68 20 74 0a 20 20 20 20	...........:require-match.t.....
2f5e0	20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 27 28 31 0a	........:action.............'(1.
2f600	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 22 6f 22 20 63 6f 75 6e 73 65 6c 2d 6c 69 73 74 2d	..............("o".counsel-list-
2f620	70 72 6f 63 65 73 73 65 73 2d 61 63 74 69 6f 6e 2d 64 65 6c 65 74 65 20 22 6b 69 6c 6c 22 29 0a	processes-action-delete."kill").
2f640	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 22 73 22 20 63 6f 75 6e 73 65 6c 2d 6c 69 73 74 2d	..............("s".counsel-list-
2f660	70 72 6f 63 65 73 73 65 73 2d 61 63 74 69 6f 6e 2d 73 77 69 74 63 68 20 22 73 77 69 74 63 68 22	processes-action-switch."switch"
2f680	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d	)).............:caller.'counsel-
2f6a0	6c 69 73 74 2d 70 72 6f 63 65 73 73 65 73 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d	list-processes))..;;;;.`counsel-
2f6c0	61 63 65 2d 6c 69 6e 6b 27 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 61 63 65 2d 6c 69	ace-link'..(defun.counsel-ace-li
2f6e0	6e 6b 20 28 29 0a 20 20 22 55 73 65 20 49 76 79 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 66 6f 72 20	nk.()..."Use.Ivy.completion.for.
2f700	60 61 63 65 2d 6c 69 6e 6b 27 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28	`ace-link'."...(interactive)...(
2f720	6c 65 74 20 28 63 6f 6c 6c 65 63 74 69 6f 6e 20 61 63 74 69 6f 6e 29 0a 20 20 20 20 28 63 6f 6e	let.(collection.action).....(con
2f740	64 20 28 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 49 6e 66 6f 2d 6d 6f 64 65 29 0a 20 20	d.((eq.major-mode.'Info-mode)...
2f760	20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 6f 6c 6c 65 63 74 69 6f 6e 20 27 61 63 65 2d 6c	.........(setq.collection.'ace-l
2f780	69 6e 6b 2d 2d 69 6e 66 6f 2d 63 6f 6c 6c 65 63 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 73	ink--info-collect)............(s
2f7a0	65 74 71 20 61 63 74 69 6f 6e 20 27 61 63 65 2d 6c 69 6e 6b 2d 2d 69 6e 66 6f 2d 61 63 74 69 6f	etq.action.'ace-link--info-actio
2f7c0	6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 68	n))...........((eq.major-mode.'h
2f7e0	65 6c 70 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 6f 6c 6c 65	elp-mode)............(setq.colle
2f800	63 74 69 6f 6e 20 27 61 63 65 2d 6c 69 6e 6b 2d 2d 68 65 6c 70 2d 63 6f 6c 6c 65 63 74 29 0a 20	ction.'ace-link--help-collect)..
2f820	20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 61 63 74 69 6f 6e 20 27 61 63 65 2d 6c 69 6e 6b	..........(setq.action.'ace-link
2f840	2d 2d 68 65 6c 70 2d 61 63 74 69 6f 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 28 65 71 20 6d	--help-action))...........((eq.m
2f860	61 6a 6f 72 2d 6d 6f 64 65 20 27 77 6f 6d 61 6e 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20	ajor-mode.'woman-mode)..........
2f880	20 20 28 73 65 74 71 20 63 6f 6c 6c 65 63 74 69 6f 6e 20 27 61 63 65 2d 6c 69 6e 6b 2d 2d 77 6f	..(setq.collection.'ace-link--wo
2f8a0	6d 61 6e 2d 63 6f 6c 6c 65 63 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 61 63	man-collect)............(setq.ac
2f8c0	74 69 6f 6e 20 27 61 63 65 2d 6c 69 6e 6b 2d 2d 77 6f 6d 61 6e 2d 61 63 74 69 6f 6e 29 29 0a 20	tion.'ace-link--woman-action))..
2f8e0	20 20 20 20 20 20 20 20 20 28 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 65 77 77 2d 6d 6f	.........((eq.major-mode.'eww-mo
2f900	64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 6f 6c 6c 65 63 74 69 6f 6e 20	de)............(setq.collection.
2f920	27 61 63 65 2d 6c 69 6e 6b 2d 2d 65 77 77 2d 63 6f 6c 6c 65 63 74 29 0a 20 20 20 20 20 20 20 20	'ace-link--eww-collect).........
2f940	20 20 20 28 73 65 74 71 20 61 63 74 69 6f 6e 20 27 61 63 65 2d 6c 69 6e 6b 2d 2d 65 77 77 2d 61	...(setq.action.'ace-link--eww-a
2f960	63 74 69 6f 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64	ction))...........((eq.major-mod
2f980	65 20 27 63 6f 6d 70 69 6c 61 74 69 6f 6e 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20	e.'compilation-mode)............
2f9a0	28 73 65 74 71 20 63 6f 6c 6c 65 63 74 69 6f 6e 20 27 61 63 65 2d 6c 69 6e 6b 2d 2d 65 77 77 2d	(setq.collection.'ace-link--eww-
2f9c0	63 6f 6c 6c 65 63 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 61 63 74 69 6f 6e	collect)............(setq.action
2f9e0	20 27 61 63 65 2d 6c 69 6e 6b 2d 2d 63 6f 6d 70 69 6c 61 74 69 6f 6e 2d 61 63 74 69 6f 6e 29 29	.'ace-link--compilation-action))
2fa00	0a 20 20 20 20 20 20 20 20 20 20 28 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 6f 72 67 2d	...........((eq.major-mode.'org-
2fa20	6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 6f 6c 6c 65 63 74 69 6f	mode)............(setq.collectio
2fa40	6e 20 27 61 63 65 2d 6c 69 6e 6b 2d 2d 6f 72 67 2d 63 6f 6c 6c 65 63 74 29 0a 20 20 20 20 20 20	n.'ace-link--org-collect).......
2fa60	20 20 20 20 20 28 73 65 74 71 20 61 63 74 69 6f 6e 20 27 61 63 65 2d 6c 69 6e 6b 2d 2d 6f 72 67	.....(setq.action.'ace-link--org
2fa80	2d 61 63 74 69 6f 6e 29 29 29 0a 20 20 20 20 28 69 66 20 28 6e 75 6c 6c 20 63 6f 6c 6c 65 63 74	-action))).....(if.(null.collect
2faa0	69 6f 6e 29 0a 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 25 53 20 69 73 20 6e 6f 74 20 73	ion).........(error."%S.is.not.s
2fac0	75 70 70 6f 72 74 65 64 22 20 6d 61 6a 6f 72 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 28 69 76 79	upported".major-mode).......(ivy
2fae0	2d 72 65 61 64 20 22 41 63 65 2d 4c 69 6e 6b 3a 20 22 20 28 66 75 6e 63 61 6c 6c 20 63 6f 6c 6c	-read."Ace-Link:.".(funcall.coll
2fb00	65 63 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20	ection).................:action.
2fb20	28 6c 61 6d 62 64 61 20 28 78 29 20 28 66 75 6e 63 61 6c 6c 20 61 63 74 69 6f 6e 20 28 63 64 72	(lambda.(x).(funcall.action.(cdr
2fb40	20 78 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 71 75 69 72 65 2d 6d	.x))).................:require-m
2fb60	61 74 63 68 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27	atch.t.................:caller.'
2fb80	63 6f 75 6e 73 65 6c 2d 61 63 65 2d 6c 69 6e 6b 29 29 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e	counsel-ace-link))))..;;;;.`coun
2fba0	73 65 6c 2d 6d 69 6e 69 62 75 66 66 65 72 2d 68 69 73 74 6f 72 79 27 0a 0a 3b 3b 3b 23 23 23 61	sel-minibuffer-history'..;;;###a
2fbc0	75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6d 69 6e 69 62 75 66 66 65	utoload.(defun.counsel-minibuffe
2fbe0	72 2d 68 69 73 74 6f 72 79 20 28 29 0a 20 20 22 42 72 6f 77 73 65 20 6d 69 6e 69 62 75 66 66 65	r-history.()..."Browse.minibuffe
2fc00	72 20 68 69 73 74 6f 72 79 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c	r.history."...(interactive)...(l
2fc20	65 74 20 28 28 65 6e 61 62 6c 65 2d 72 65 63 75 72 73 69 76 65 2d 6d 69 6e 69 62 75 66 66 65 72	et.((enable-recursive-minibuffer
2fc40	73 20 74 29 29 0a 20 20 20 20 28 69 76 79 2d 72 65 61 64 20 22 48 69 73 74 6f 72 79 3a 20 22 20	s.t)).....(ivy-read."History:.".
2fc60	28 69 76 79 2d 68 69 73 74 6f 72 79 2d 63 6f 6e 74 65 6e 74 73 20 6d 69 6e 69 62 75 66 66 65 72	(ivy-history-contents.minibuffer
2fc80	2d 68 69 73 74 6f 72 79 2d 76 61 72 69 61 62 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	-history-variable)..............
2fca0	20 3a 6b 65 79 6d 61 70 20 69 76 79 2d 72 65 76 65 72 73 65 2d 69 2d 73 65 61 72 63 68 2d 6d 61	.:keymap.ivy-reverse-i-search-ma
2fcc0	70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 28 6c 61 6d 62 64 61 20	p...............:action.(lambda.
2fce0	28 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 6c	(x).........................(del
2fd00	65 74 65 2d 6d 69 6e 69 62 75 66 66 65 72 2d 63 6f 6e 74 65 6e 74 73 29 0a 20 20 20 20 20 20 20	ete-minibuffer-contents)........
2fd20	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 73 75 62 73 74 72	.................(insert.(substr
2fd40	69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 28 63 61 72 20 78 29 29 29 29 0a 20 20 20	ing-no-properties.(car.x))))....
2fd60	20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 6d 69 6e 69	...........:caller.'counsel-mini
2fd80	62 75 66 66 65 72 2d 68 69 73 74 6f 72 79 29 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c	buffer-history)))..;;;;.`counsel
2fda0	2d 65 73 68 2d 68 69 73 74 6f 72 79 27 0a 0a 28 64 65 66 76 61 72 20 63 6f 6d 69 6e 74 2d 69 6e	-esh-history'..(defvar.comint-in
2fdc0	70 75 74 2d 72 69 6e 67 2d 69 6e 64 65 78 29 0a 28 64 65 66 76 61 72 20 65 73 68 65 6c 6c 2d 68	put-ring-index).(defvar.eshell-h
2fde0	69 73 74 6f 72 79 2d 69 6e 64 65 78 29 0a 28 64 65 66 76 61 72 20 73 6c 69 6d 65 2d 72 65 70 6c	istory-index).(defvar.slime-repl
2fe00	2d 69 6e 70 75 74 2d 68 69 73 74 6f 72 79 2d 70 6f 73 69 74 69 6f 6e 29 0a 0a 28 64 65 66 76 61	-input-history-position)..(defva
2fe20	72 20 63 6f 75 6e 73 65 6c 2d 65 73 68 2d 2d 69 6e 64 65 78 2d 6c 61 73 74 20 6e 69 6c 0a 20 20	r.counsel-esh--index-last.nil...
2fe40	22 49 6e 64 65 78 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 74 6f 20 6c 61 73 74 20 73 65 6c	"Index.corresponding.to.last.sel
2fe60	65 63 74 69 6f 6e 20 77 69 74 68 20 60 63 6f 75 6e 73 65 6c 2d 65 73 68 2d 68 69 73 74 6f 72 79	ection.with.`counsel-esh-history
2fe80	27 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 73 68 65 6c 6c 2d 68 69 73 74	'.")..(defvar.counsel-shell-hist
2fea0	6f 72 79 2d 2d 69 6e 64 65 78 2d 6c 61 73 74 20 6e 69 6c 0a 20 20 22 49 6e 64 65 78 20 63 6f 72	ory--index-last.nil..."Index.cor
2fec0	72 65 73 70 6f 6e 64 69 6e 67 20 74 6f 20 6c 61 73 74 20 73 65 6c 65 63 74 69 6f 6e 20 77 69 74	responding.to.last.selection.wit
2fee0	68 20 60 63 6f 75 6e 73 65 6c 2d 73 68 65 6c 6c 2d 68 69 73 74 6f 72 79 27 2e 22 29 0a 0a 28 64	h.`counsel-shell-history'.")..(d
2ff00	65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 62 72 6f 77 73 65 2d 68 69 73 74 6f 72 79 2d 61 63 74	efun.counsel--browse-history-act
2ff20	69 6f 6e 20 28 70 61 69 72 29 0a 20 20 28 6c 65 74 20 28 28 73 6e 64 20 28 63 64 72 20 70 61 69	ion.(pair)...(let.((snd.(cdr.pai
2ff40	72 29 29 29 0a 20 20 20 20 28 63 6c 2d 63 61 73 65 20 28 69 76 79 2d 73 74 61 74 65 2d 63 61 6c	r))).....(cl-case.(ivy-state-cal
2ff60	6c 65 72 20 69 76 79 2d 6c 61 73 74 29 0a 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 65 73 68	ler.ivy-last).......(counsel-esh
2ff80	2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 28 73 65 74 71 20 65 73 68 65 6c 6c 2d 68 69 73	-history........(setq.eshell-his
2ffa0	74 6f 72 79 2d 69 6e 64 65 78 20 73 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 75 6e	tory-index.snd..............coun
2ffc0	73 65 6c 2d 65 73 68 2d 2d 69 6e 64 65 78 2d 6c 61 73 74 20 73 6e 64 29 29 0a 20 20 20 20 20 20	sel-esh--index-last.snd)).......
2ffe0	28 63 6f 75 6e 73 65 6c 2d 73 68 65 6c 6c 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 28 73	(counsel-shell-history........(s
30000	65 74 71 20 63 6f 6d 69 6e 74 2d 69 6e 70 75 74 2d 72 69 6e 67 2d 69 6e 64 65 78 20 73 6e 64 0a	etq.comint-input-ring-index.snd.
30020	20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 75 6e 73 65 6c 2d 73 68 65 6c 6c 2d 68 69 73 74 6f	.............counsel-shell-histo
30040	72 79 2d 2d 69 6e 64 65 78 2d 6c 61 73 74 20 73 6e 64 29 29 0a 20 20 20 20 20 20 3b 3b 20 4c 65	ry--index-last.snd)).......;;.Le
30060	61 76 65 20 74 68 69 73 20 61 73 20 61 20 6e 6f 2d 6f 70 2e 20 49 66 20 73 6f 6d 65 6f 6e 65 20	ave.this.as.a.no-op..If.someone.
30080	64 65 63 69 64 65 73 20 74 6f 20 70 61 74 63 68 0a 20 20 20 20 20 20 3b 3b 20 60 73 6c 69 6d 65	decides.to.patch.......;;.`slime
300a0	2d 72 65 70 6c 2d 70 72 65 76 69 6f 75 73 2d 69 6e 70 75 74 27 20 6f 72 20 6f 6e 65 20 6f 66 20	-repl-previous-input'.or.one.of.
300c0	69 74 73 20 75 74 69 6c 69 74 79 20 66 75 6e 63 74 69 6f 6e 73 2c 0a 20 20 20 20 20 20 3b 3b 20	its.utility.functions,.......;;.
300e0	6f 72 20 74 6f 20 61 64 64 20 68 69 73 74 6f 72 79 2d 72 65 70 6c 61 79 20 74 6f 20 53 6c 69 6d	or.to.add.history-replay.to.Slim
30100	65 2c 20 74 68 65 6e 20 74 68 69 73 20 73 65 63 74 69 6f 6e 20 63 61 6e 20 62 65 0a 20 20 20 20	e,.then.this.section.can.be.....
30120	20 20 3b 3b 20 75 70 64 61 74 65 64 20 74 6f 20 61 64 64 20 74 68 65 20 72 65 6c 65 76 61 6e 74	..;;.updated.to.add.the.relevant
30140	20 73 75 70 70 6f 72 74 20 66 6f 72 20 74 68 6f 73 65 20 63 6f 6d 6d 61 6e 64 73 2e 0a 20 20 20	.support.for.those.commands.....
30160	20 20 20 28 63 6f 75 6e 73 65 6c 2d 73 6c 69 6d 65 2d 72 65 70 6c 2d 68 69 73 74 6f 72 79 0a 20	...(counsel-slime-repl-history..
30180	20 20 20 20 20 20 6e 69 6c 29 29 0a 20 20 20 20 28 69 76 79 2d 63 6f 6d 70 6c 65 74 69 6f 6e 2d	......nil)).....(ivy-completion-
301a0	69 6e 2d 72 65 67 69 6f 6e 2d 61 63 74 69 6f 6e 20 28 63 61 72 20 70 61 69 72 29 29 29 29 0a 0a	in-region-action.(car.pair))))..
301c0	28 63 6c 2d 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 62 72 6f 77 73 65 2d 68 69 73 74 6f 72	(cl-defun.counsel--browse-histor
301e0	79 20 28 72 69 6e 67 20 26 6b 65 79 20 63 61 6c 6c 65 72 29 0a 20 20 22 55 73 65 20 49 76 79 20	y.(ring.&key.caller)..."Use.Ivy.
30200	74 6f 20 6e 61 76 69 67 61 74 65 20 74 68 72 6f 75 67 68 20 52 49 4e 47 2e 22 0a 20 20 28 6c 65	to.navigate.through.RING."...(le
30220	74 2a 20 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 63	t*.((proc.(get-buffer-process.(c
30240	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 20 28 65 6e 64 20 28	urrent-buffer)))..........(end.(
30260	70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 62 65 67 20 28 69 66 20 70 72 6f 63 0a 20	point))..........(beg.(if.proc..
30280	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 69 6e 20 28 70 72 6f 63 65 73 73 2d 6d	.................(min.(process-m
302a0	61 72 6b 20 70 72 6f 63 29 20 65 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65	ark.proc).end).................e
302c0	6e 64 29 29 0a 20 20 20 20 20 20 20 20 20 28 69 6e 70 75 74 20 28 77 68 65 6e 20 28 3c 20 62 65	nd))..........(input.(when.(<.be
302e0	67 20 65 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74	g.end)...................(concat
30300	20 22 5e 22 20 28 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 20 62 65 67 20 65 6e 64 29 29	."^".(buffer-substring.beg.end))
30320	29 29 29 0a 20 20 20 20 28 73 65 74 71 20 69 76 79 2d 63 6f 6d 70 6c 65 74 69 6f 6e 2d 62 65 67	))).....(setq.ivy-completion-beg
30340	20 62 65 67 29 0a 20 20 20 20 28 73 65 74 71 20 69 76 79 2d 63 6f 6d 70 6c 65 74 69 6f 6e 2d 65	.beg).....(setq.ivy-completion-e
30360	6e 64 20 65 6e 64 29 0a 20 20 20 20 28 69 76 79 2d 72 65 61 64 20 22 48 69 73 74 6f 72 79 3a 20	nd.end).....(ivy-read."History:.
30380	22 20 28 69 76 79 2d 68 69 73 74 6f 72 79 2d 63 6f 6e 74 65 6e 74 73 20 72 69 6e 67 29 0a 20 20	".(ivy-history-contents.ring)...
303a0	20 20 20 20 20 20 20 20 20 20 20 20 3a 6b 65 79 6d 61 70 20 69 76 79 2d 72 65 76 65 72 73 65 2d	............:keymap.ivy-reverse-
303c0	69 2d 73 65 61 72 63 68 2d 6d 61 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74	i-search-map...............:init
303e0	69 61 6c 2d 69 6e 70 75 74 20 69 6e 70 75 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61	ial-input.input...............:a
30400	63 74 69 6f 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 2d 62 72 6f 77 73 65 2d 68 69 73 74 6f 72 79 2d	ction.#'counsel--browse-history-
30420	61 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 63 61 6c	action...............:caller.cal
30440	6c 65 72 29 29 29 0a 0a 28 64 65 66 76 61 72 20 65 73 68 65 6c 6c 2d 68 69 73 74 6f 72 79 2d 72	ler)))..(defvar.eshell-history-r
30460	69 6e 67 29 0a 28 64 65 66 76 61 72 20 65 73 68 65 6c 6c 2d 6d 61 74 63 68 69 6e 67 2d 69 6e 70	ing).(defvar.eshell-matching-inp
30480	75 74 2d 66 72 6f 6d 2d 69 6e 70 75 74 2d 73 74 72 69 6e 67 29 0a 0a 3b 3b 3b 23 23 23 61 75 74	ut-from-input-string)..;;;###aut
304a0	6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 65 73 68 2d 68 69 73 74 6f 72 79	oload.(defun.counsel-esh-history
304c0	20 28 29 0a 20 20 22 42 72 6f 77 73 65 20 45 73 68 65 6c 6c 20 68 69 73 74 6f 72 79 2e 22 0a 20	.()..."Browse.Eshell.history."..
304e0	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 65 6d 2d 68 69	.(interactive)...(require.'em-hi
30500	73 74 29 0a 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 62 72 6f 77 73 65 2d 68 69 73 74 6f 72 79 20 65	st)...(counsel--browse-history.e
30520	73 68 65 6c 6c 2d 68 69 73 74 6f 72 79 2d 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	shell-history-ring..............
30540	20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 23 27 63 6f 75 6e 73 65 6c 2d	..............:caller.#'counsel-
30560	65 73 68 2d 68 69 73 74 6f 72 79 29 29 0a 0a 28 61 64 76 69 63 65 2d 61 64 64 20 27 65 73 68 65	esh-history))..(advice-add.'eshe
30580	6c 6c 2d 70 72 65 76 69 6f 75 73 2d 6d 61 74 63 68 69 6e 67 2d 69 6e 70 75 74 0a 20 20 20 20 20	ll-previous-matching-input......
305a0	20 20 20 20 20 20 20 3a 62 65 66 6f 72 65 20 23 27 63 6f 75 6e 73 65 6c 2d 2d 73 65 74 2d 65 73	.......:before.#'counsel--set-es
305c0	68 65 6c 6c 2d 68 69 73 74 6f 72 79 2d 69 6e 64 65 78 29 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73	hell-history-index).(defun.couns
305e0	65 6c 2d 2d 73 65 74 2d 65 73 68 65 6c 6c 2d 68 69 73 74 6f 72 79 2d 69 6e 64 65 78 20 28 26 72	el--set-eshell-history-index.(&r
30600	65 73 74 20 5f 29 0a 20 20 22 52 65 61 73 73 69 67 6e 20 60 65 73 68 65 6c 6c 2d 68 69 73 74 6f	est._)..."Reassign.`eshell-histo
30620	72 79 2d 69 6e 64 65 78 27 2e 22 0a 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 6d 65 6d 71 20 6c	ry-index'."...(when.(and.(memq.l
30640	61 73 74 2d 63 6f 6d 6d 61 6e 64 20 27 28 69 76 79 2d 61 6c 74 2d 64 6f 6e 65 20 69 76 79 2d 64	ast-command.'(ivy-alt-done.ivy-d
30660	6f 6e 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 75 61 6c 20 28 69 76 79 2d 73	one))..............(equal.(ivy-s
30680	74 61 74 65 2d 63 61 6c 6c 65 72 20 69 76 79 2d 6c 61 73 74 29 20 27 63 6f 75 6e 73 65 6c 2d 65	tate-caller.ivy-last).'counsel-e
306a0	73 68 2d 68 69 73 74 6f 72 79 29 29 0a 20 20 20 20 28 73 65 74 71 20 65 73 68 65 6c 6c 2d 68 69	sh-history)).....(setq.eshell-hi
306c0	73 74 6f 72 79 2d 69 6e 64 65 78 20 63 6f 75 6e 73 65 6c 2d 65 73 68 2d 2d 69 6e 64 65 78 2d 6c	story-index.counsel-esh--index-l
306e0	61 73 74 29 29 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 6d 69 6e 74 2d 69 6e 70 75 74 2d 72 69 6e	ast)))..(defvar.comint-input-rin
30700	67 29 0a 28 64 65 66 76 61 72 20 63 6f 6d 69 6e 74 2d 6d 61 74 63 68 69 6e 67 2d 69 6e 70 75 74	g).(defvar.comint-matching-input
30720	2d 66 72 6f 6d 2d 69 6e 70 75 74 2d 73 74 72 69 6e 67 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c	-from-input-string)..;;;###autol
30740	6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 73 68 65 6c 6c 2d 68 69 73 74 6f 72 79	oad.(defun.counsel-shell-history
30760	20 28 29 0a 20 20 22 42 72 6f 77 73 65 20 73 68 65 6c 6c 20 68 69 73 74 6f 72 79 2e 22 0a 20 20	.()..."Browse.shell.history."...
30780	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 63 6f 6d 69 6e 74	(interactive)...(require.'comint
307a0	29 0a 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 62 72 6f 77 73 65 2d 68 69 73 74 6f 72 79 20 63 6f 6d	)...(counsel--browse-history.com
307c0	69 6e 74 2d 69 6e 70 75 74 2d 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	int-input-ring..................
307e0	20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 23 27 63 6f 75 6e 73 65 6c 2d 73 68 65 6c	..........:caller.#'counsel-shel
30800	6c 2d 68 69 73 74 6f 72 79 29 29 0a 0a 28 61 64 76 69 63 65 2d 61 64 64 20 27 63 6f 6d 69 6e 74	l-history))..(advice-add.'comint
30820	2d 70 72 65 76 69 6f 75 73 2d 6d 61 74 63 68 69 6e 67 2d 69 6e 70 75 74 0a 20 20 20 20 20 20 20	-previous-matching-input........
30840	20 20 20 20 20 3a 62 65 66 6f 72 65 20 23 27 63 6f 75 6e 73 65 6c 2d 2d 73 65 74 2d 63 6f 6d 69	.....:before.#'counsel--set-comi
30860	6e 74 2d 68 69 73 74 6f 72 79 2d 69 6e 64 65 78 29 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c	nt-history-index).(defun.counsel
30880	2d 2d 73 65 74 2d 63 6f 6d 69 6e 74 2d 68 69 73 74 6f 72 79 2d 69 6e 64 65 78 20 28 26 72 65 73	--set-comint-history-index.(&res
308a0	74 20 5f 29 0a 20 20 22 52 65 61 73 73 69 67 6e 20 60 63 6f 6d 69 6e 74 2d 69 6e 70 75 74 2d 72	t._)..."Reassign.`comint-input-r
308c0	69 6e 67 2d 69 6e 64 65 78 27 2e 22 0a 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 6d 65 6d 71 20	ing-index'."...(when.(and.(memq.
308e0	6c 61 73 74 2d 63 6f 6d 6d 61 6e 64 20 27 28 69 76 79 2d 61 6c 74 2d 64 6f 6e 65 20 69 76 79 2d	last-command.'(ivy-alt-done.ivy-
30900	64 6f 6e 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 75 61 6c 20 28 69 76 79 2d	done))..............(equal.(ivy-
30920	73 74 61 74 65 2d 63 61 6c 6c 65 72 20 69 76 79 2d 6c 61 73 74 29 20 27 63 6f 75 6e 73 65 6c 2d	state-caller.ivy-last).'counsel-
30940	73 68 65 6c 6c 2d 68 69 73 74 6f 72 79 29 29 0a 20 20 20 20 28 73 65 74 71 20 63 6f 6d 69 6e 74	shell-history)).....(setq.comint
30960	2d 69 6e 70 75 74 2d 72 69 6e 67 2d 69 6e 64 65 78 20 63 6f 75 6e 73 65 6c 2d 73 68 65 6c 6c 2d	-input-ring-index.counsel-shell-
30980	68 69 73 74 6f 72 79 2d 2d 69 6e 64 65 78 2d 6c 61 73 74 29 29 29 0a 0a 28 64 65 66 76 61 72 20	history--index-last)))..(defvar.
309a0	73 6c 69 6d 65 2d 72 65 70 6c 2d 69 6e 70 75 74 2d 68 69 73 74 6f 72 79 29 0a 0a 3b 3b 3b 23 23	slime-repl-input-history)..;;;##
309c0	23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 73 6c 69 6d 65 2d 72	#autoload.(defun.counsel-slime-r
309e0	65 70 6c 2d 68 69 73 74 6f 72 79 20 28 29 0a 20 20 22 42 72 6f 77 73 65 20 53 6c 69 6d 65 20 52	epl-history.()..."Browse.Slime.R
30a00	45 50 4c 20 68 69 73 74 6f 72 79 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20	EPL.history."...(interactive)...
30a20	28 72 65 71 75 69 72 65 20 27 73 6c 69 6d 65 2d 72 65 70 6c 29 0a 20 20 28 63 6f 75 6e 73 65 6c	(require.'slime-repl)...(counsel
30a40	2d 2d 62 72 6f 77 73 65 2d 68 69 73 74 6f 72 79 20 73 6c 69 6d 65 2d 72 65 70 6c 2d 69 6e 70 75	--browse-history.slime-repl-inpu
30a60	74 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	t-history.......................
30a80	20 20 20 20 20 3a 63 61 6c 6c 65 72 20 23 27 63 6f 75 6e 73 65 6c 2d 73 6c 69 6d 65 2d 72 65 70	.....:caller.#'counsel-slime-rep
30aa0	6c 2d 68 69 73 74 6f 72 79 29 29 0a 0a 3b 3b 20 54 4f 44 4f 3a 20 61 64 64 20 61 64 76 69 63 65	l-history))..;;.TODO:.add.advice
30ac0	20 66 6f 72 20 73 6c 69 6d 65 2d 72 65 70 6c 2d 69 6e 70 75 74 2d 70 72 65 76 69 6f 75 73 2f 6e	.for.slime-repl-input-previous/n
30ae0	65 78 74 20 74 6f 20 70 72 6f 70 65 72 6c 79 0a 3b 3b 20 72 65 61 73 73 69 67 6e 20 74 68 65 20	ext.to.properly.;;.reassign.the.
30b00	72 69 6e 67 20 69 6e 64 65 78 20 61 6e 64 20 6d 61 74 63 68 20 73 74 72 69 6e 67 2e 20 20 54 68	ring.index.and.match.string...Th
30b20	69 73 20 72 65 71 75 69 72 65 73 20 61 20 63 61 73 65 20 66 6f 72 0a 3b 3b 20 60 63 6f 75 6e 73	is.requires.a.case.for.;;.`couns
30b40	65 6c 2d 73 6c 69 6d 65 2d 72 65 70 6c 2d 68 69 73 74 6f 72 79 27 20 77 69 74 68 69 6e 0a 3b 3b	el-slime-repl-history'.within.;;
30b60	20 60 63 6f 75 6e 73 65 6c 2d 2d 62 72 6f 77 73 65 2d 68 69 73 74 6f 72 79 2d 61 63 74 69 6f 6e	.`counsel--browse-history-action
30b80	27 2e 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 68 79 64 72 61 2d 68 65 61 64 73 27 0a 0a	'...;;;;.`counsel-hydra-heads'..
30ba0	28 64 65 66 76 61 72 20 68 79 64 72 61 2d 63 75 72 72 2d 62 6f 64 79 2d 66 6e 29 0a 28 64 65 63	(defvar.hydra-curr-body-fn).(dec
30bc0	6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 68 79 64 72 61 2d 6b 65 79 62 6f 61 72 64 2d 71 75 69	lare-function.hydra-keyboard-qui
30be0	74 20 22 65 78 74 3a 68 79 64 72 61 22 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28	t."ext:hydra")..;;;###autoload.(
30c00	64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 68 79 64 72 61 2d 68 65 61 64 73 20 28 29 0a 20 20 22	defun.counsel-hydra-heads.()..."
30c20	43 61 6c 6c 20 61 20 68 65 61 64 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 2f 6c 61 73 74 20	Call.a.head.of.the.current/last.
30c40	68 79 64 72 61 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 2a 20	hydra."...(interactive)...(let*.
30c60	28 28 62 61 73 65 20 28 73 75 62 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	((base.(substring...............
30c80	20 20 28 70 72 69 6e 31 2d 74 6f 2d 73 74 72 69 6e 67 20 68 79 64 72 61 2d 63 75 72 72 2d 62 6f	..(prin1-to-string.hydra-curr-bo
30ca0	64 79 2d 66 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 20 2d 34 29 29 0a 20 20	dy-fn).................0.-4))...
30cc0	20 20 20 20 20 20 20 28 68 65 61 64 73 20 28 73 79 6d 62 6f 6c 2d 76 61 6c 75 65 20 28 69 6e 74	.......(heads.(symbol-value.(int
30ce0	65 72 6e 20 28 63 6f 6e 63 61 74 20 62 61 73 65 20 22 68 65 61 64 73 22 29 29 29 29 0a 20 20 20	ern.(concat.base."heads"))))....
30d00	20 20 20 20 20 20 28 6b 65 79 6d 61 70 20 28 73 79 6d 62 6f 6c 2d 76 61 6c 75 65 20 28 69 6e 74	......(keymap.(symbol-value.(int
30d20	65 72 6e 20 28 63 6f 6e 63 61 74 20 62 61 73 65 20 22 6b 65 79 6d 61 70 22 29 29 29 29 0a 20 20	ern.(concat.base."keymap"))))...
30d40	20 20 20 20 20 20 20 28 68 65 61 64 2d 6e 61 6d 65 73 0a 20 20 20 20 20 20 20 20 20 20 28 6d 61	.......(head-names...........(ma
30d60	70 63 61 72 20 28 6c 61 6d 62 64 61 20 28 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	pcar.(lambda.(x)................
30d80	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 20 20 20 20 20 20 20	.....(cons......................
30da0	28 69 66 20 28 6e 74 68 20 32 20 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	(if.(nth.2.x)...................
30dc0	20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 5b 25 73 5d 20 25 53 20 28 25 73 29 22 20 28 6e	.......(format."[%s].%S.(%s)".(n
30de0	74 68 20 30 20 78 29 20 28 6e 74 68 20 31 20 78 29 20 28 6e 74 68 20 32 20 78 29 29 0a 20 20 20	th.0.x).(nth.1.x).(nth.2.x))....
30e00	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 5b 25 73	....................(format."[%s
30e20	5d 20 25 53 22 20 28 6e 74 68 20 30 20 78 29 20 28 6e 74 68 20 31 20 78 29 29 29 0a 20 20 20 20	].%S".(nth.0.x).(nth.1.x))).....
30e40	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 6f 6b 75 70 2d 6b 65 79 20 6b 65 79	.................(lookup-key.key
30e60	6d 61 70 20 28 6b 62 64 20 28 6e 74 68 20 30 20 78 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20	map.(kbd.(nth.0.x)))))..........
30e80	20 20 20 20 20 20 20 20 20 68 65 61 64 73 29 29 29 0a 20 20 20 20 28 69 76 79 2d 72 65 61 64 20	.........heads))).....(ivy-read.
30ea0	22 68 65 61 64 3a 20 22 20 68 65 61 64 2d 6e 61 6d 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20	"head:.".head-names.............
30ec0	20 20 3a 61 63 74 69 6f 6e 20 28 6c 61 6d 62 64 61 20 28 78 29 20 28 63 61 6c 6c 2d 69 6e 74 65	..:action.(lambda.(x).(call-inte
30ee0	72 61 63 74 69 76 65 6c 79 20 28 63 64 72 20 78 29 29 29 29 0a 20 20 20 20 28 68 79 64 72 61 2d	ractively.(cdr.x)))).....(hydra-
30f00	6b 65 79 62 6f 61 72 64 2d 71 75 69 74 29 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d	keyboard-quit)))..;;;;.`counsel-
30f20	73 65 6d 61 6e 74 69 63 27 0a 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 73 65 6d	semantic'..(declare-function.sem
30f40	61 6e 74 69 63 2d 74 61 67 2d 73 74 61 72 74 20 22 73 65 6d 61 6e 74 69 63 2f 74 61 67 22 29 0a	antic-tag-start."semantic/tag").
30f60	28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 73 65 6d 61 6e 74 69 63 2d 74 61 67 2d 63	(declare-function.semantic-tag-c
30f80	6c 61 73 73 20 22 73 65 6d 61 6e 74 69 63 2f 74 61 67 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75	lass."semantic/tag").(declare-fu
30fa0	6e 63 74 69 6f 6e 20 73 65 6d 61 6e 74 69 63 2d 74 61 67 2d 6e 61 6d 65 20 22 73 65 6d 61 6e 74	nction.semantic-tag-name."semant
30fc0	69 63 2f 74 61 67 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 73 65 6d 61 6e	ic/tag").(declare-function.seman
30fe0	74 69 63 2d 74 61 67 2d 70 75 74 2d 61 74 74 72 69 62 75 74 65 20 22 73 65 6d 61 6e 74 69 63 2f	tic-tag-put-attribute."semantic/
31000	74 61 67 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 73 65 6d 61 6e 74 69 63	tag").(declare-function.semantic
31020	2d 74 61 67 2d 67 65 74 2d 61 74 74 72 69 62 75 74 65 20 22 73 65 6d 61 6e 74 69 63 2f 74 61 67	-tag-get-attribute."semantic/tag
31040	22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 73 65 6d 61 6e 74 69 63 2d 66 65	").(declare-function.semantic-fe
31060	74 63 68 2d 74 61 67 73 20 22 73 65 6d 61 6e 74 69 63 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75	tch-tags."semantic").(declare-fu
31080	6e 63 74 69 6f 6e 20 73 65 6d 61 6e 74 69 63 2d 66 6f 72 6d 61 74 2d 74 61 67 2d 73 75 6d 6d 61	nction.semantic-format-tag-summa
310a0	72 69 7a 65 20 22 73 65 6d 61 6e 74 69 63 2f 66 6f 72 6d 61 74 22 29 0a 28 64 65 63 6c 61 72 65	rize."semantic/format").(declare
310c0	2d 66 75 6e 63 74 69 6f 6e 20 73 65 6d 61 6e 74 69 63 2d 61 63 74 69 76 65 2d 70 20 22 73 65 6d	-function.semantic-active-p."sem
310e0	61 6e 74 69 63 2f 66 77 22 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 73 65 6d 61 6e	antic/fw")..(defun.counsel-seman
31100	74 69 63 2d 61 63 74 69 6f 6e 20 28 78 29 0a 20 20 22 47 6f 74 20 74 6f 20 73 65 6d 61 6e 74 69	tic-action.(x)..."Got.to.semanti
31120	63 20 54 41 47 2e 22 0a 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 73 65 6d 61 6e 74 69 63 2d 74	c.TAG."...(goto-char.(semantic-t
31140	61 67 2d 73 74 61 72 74 20 28 63 64 72 20 78 29 29 29 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75	ag-start.(cdr.x))))..(defvar.cou
31160	6e 73 65 6c 2d 73 65 6d 61 6e 74 69 63 2d 68 69 73 74 6f 72 79 20 6e 69 6c 0a 20 20 22 48 69 73	nsel-semantic-history.nil..."His
31180	74 6f 72 79 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 73 65 6d 61 6e 74 69 63 27 2e 22 29 0a 0a	tory.for.`counsel-semantic'.")..
311a0	28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 73 65 6d 61 6e 74 69 63 2d 66 6f 72 6d 61 74 2d 74	(defun.counsel-semantic-format-t
311c0	61 67 20 28 74 61 67 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 70 72 65 74 74 79 20 73 74 72 69	ag.(tag)..."Return.a.pretty.stri
311e0	6e 67 20 72 65 70 72 65 73 65 6e 74 61 74 69 6f 6e 20 6f 66 20 54 41 47 2e 22 0a 20 20 28 6c 65	ng.representation.of.TAG."...(le
31200	74 20 28 28 64 65 70 74 68 20 28 6f 72 20 28 73 65 6d 61 6e 74 69 63 2d 74 61 67 2d 67 65 74 2d	t.((depth.(or.(semantic-tag-get-
31220	61 74 74 72 69 62 75 74 65 20 74 61 67 20 3a 64 65 70 74 68 29 20 30 29 29 0a 20 20 20 20 20 20	attribute.tag.:depth).0)).......
31240	20 20 28 70 61 72 65 6e 74 20 28 73 65 6d 61 6e 74 69 63 2d 74 61 67 2d 67 65 74 2d 61 74 74 72	..(parent.(semantic-tag-get-attr
31260	69 62 75 74 65 20 74 61 67 20 3a 70 61 72 65 6e 74 29 29 29 0a 20 20 20 20 28 63 6f 6e 63 61 74	ibute.tag.:parent))).....(concat
31280	20 28 6d 61 6b 65 2d 73 74 72 69 6e 67 20 28 2a 20 64 65 70 74 68 20 32 29 20 3f 5c 20 29 0a 20	.(make-string.(*.depth.2).?\.)..
312a0	20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 70 61 72 65 6e 74 0a 20 20 20 20 20 20 20 20 20 20	...........(if.parent...........
312c0	20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 22 28 22 20 70 61 72 65 6e 74 20 22 29 20 22 29 0a 20	......(concat."(".parent.").")..
312e0	20 20 20 20 20 20 20 20 20 20 20 20 20 22 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65	............."").............(se
31300	6d 61 6e 74 69 63 2d 66 6f 72 6d 61 74 2d 74 61 67 2d 73 75 6d 6d 61 72 69 7a 65 20 74 61 67 20	mantic-format-tag-summarize.tag.
31320	6e 69 6c 20 74 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 66 6c 61 74 74 65	nil.t))))..(defun.counsel-flatte
31340	6e 2d 66 6f 72 65 73 74 20 28 66 75 6e 63 20 74 72 65 65 70 20 66 6f 72 65 73 74 29 0a 20 20 22	n-forest.(func.treep.forest)..."
31360	55 73 65 20 46 55 4e 43 20 61 6e 64 20 54 52 45 45 50 20 74 6f 20 66 6c 61 74 74 65 6e 20 46 4f	Use.FUNC.and.TREEP.to.flatten.FO
31380	52 45 53 54 2e 0a 46 55 4e 43 20 69 73 20 61 70 70 6c 69 65 64 20 74 6f 20 65 61 63 68 20 6e 6f	REST..FUNC.is.applied.to.each.no
313a0	64 65 2e 0a 54 52 45 45 50 20 69 73 20 75 73 65 64 20 74 6f 20 65 78 70 61 6e 64 20 69 6e 74 65	de..TREEP.is.used.to.expand.inte
313c0	72 6e 61 6c 20 6e 6f 64 65 73 2e 22 0a 20 20 28 63 6c 2d 6c 61 62 65 6c 73 20 28 28 72 65 64 75	rnal.nodes."...(cl-labels.((redu
313e0	63 65 72 20 28 66 6f 72 65 73 74 20 6f 75 74 20 64 65 70 74 68 29 0a 20 20 20 20 20 20 20 20 20	cer.(forest.out.depth)..........
31400	20 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 74 72 65 65 20 66 6f 72 65 73 74 29 0a 20 20 20	.......(dolist.(tree.forest)....
31420	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 74 68 69 73 20 28 63 6f 6e 73	...............(let.((this.(cons
31440	20 28 66 75 6e 63 61 6c 6c 20 66 75 6e 63 20 74 72 65 65 20 64 65 70 74 68 29 20 6f 75 74 29 29	.(funcall.func.tree.depth).out))
31460	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 6c 65 61 66 73 20	.........................(leafs.
31480	28 66 75 6e 63 61 6c 6c 20 74 72 65 65 70 20 74 72 65 65 29 29 29 0a 20 20 20 20 20 20 20 20 20	(funcall.treep.tree)))..........
314a0	20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 6f 75 74 0a 20 20 20 20 20 20 20 20 20 20 20	...........(setq.out............
314c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 6c 65 61 66 73 0a 20 20 20 20 20 20 20	...............(if.leafs........
314e0	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 64 75 63 65 72 20	.......................(reducer.
31500	6c 65 61 66 73 20 74 68 69 73 20 28 31 2b 20 64 65 70 74 68 29 29 0a 20 20 20 20 20 20 20 20 20	leafs.this.(1+.depth))..........
31520	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 68 69 73 29 29 29 29 0a 20 20 20 20	...................this)))).....
31540	20 20 20 20 20 20 20 20 20 20 20 20 6f 75 74 29 29 0a 20 20 20 20 28 6e 72 65 76 65 72 73 65 20	............out)).....(nreverse.
31560	28 72 65 64 75 63 65 72 20 66 6f 72 65 73 74 20 6e 69 6c 20 30 29 29 29 29 0a 0a 28 64 65 66 75	(reducer.forest.nil.0))))..(defu
31580	6e 20 63 6f 75 6e 73 65 6c 2d 73 65 6d 61 6e 74 69 63 2d 74 61 67 73 20 28 29 0a 20 20 22 46 65	n.counsel-semantic-tags.()..."Fe
315a0	74 63 68 20 73 65 6d 61 6e 74 69 63 20 74 61 67 73 2e 22 0a 20 20 28 63 6f 75 6e 73 65 6c 2d 66	tch.semantic.tags."...(counsel-f
315c0	6c 61 74 74 65 6e 2d 66 6f 72 65 73 74 0a 20 20 20 28 6c 61 6d 62 64 61 20 28 74 72 65 65 20 64	latten-forest....(lambda.(tree.d
315e0	65 70 74 68 29 0a 20 20 20 20 20 28 73 65 6d 61 6e 74 69 63 2d 74 61 67 2d 70 75 74 2d 61 74 74	epth)......(semantic-tag-put-att
31600	72 69 62 75 74 65 20 74 72 65 65 20 3a 64 65 70 74 68 20 64 65 70 74 68 29 29 0a 20 20 20 28 6c	ribute.tree.:depth.depth))....(l
31620	61 6d 62 64 61 20 28 74 61 67 29 0a 20 20 20 20 20 28 77 68 65 6e 20 28 65 71 20 28 73 65 6d 61	ambda.(tag)......(when.(eq.(sema
31640	6e 74 69 63 2d 74 61 67 2d 63 6c 61 73 73 20 74 61 67 29 20 27 74 79 70 65 29 0a 20 20 20 20 20	ntic-tag-class.tag).'type)......
31660	20 20 28 6c 65 74 20 28 28 6e 61 6d 65 20 28 73 65 6d 61 6e 74 69 63 2d 74 61 67 2d 6e 61 6d 65	..(let.((name.(semantic-tag-name
31680	20 74 61 67 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 0a 20 20 20 20 20 20 20	.tag)))..........(mapcar........
316a0	20 20 20 28 6c 61 6d 62 64 61 20 28 78 29 20 28 73 65 6d 61 6e 74 69 63 2d 74 61 67 2d 70 75 74	...(lambda.(x).(semantic-tag-put
316c0	2d 61 74 74 72 69 62 75 74 65 20 78 20 3a 70 61 72 65 6e 74 20 6e 61 6d 65 29 29 0a 20 20 20 20	-attribute.x.:parent.name)).....
316e0	20 20 20 20 20 20 28 73 65 6d 61 6e 74 69 63 2d 74 61 67 2d 67 65 74 2d 61 74 74 72 69 62 75 74	......(semantic-tag-get-attribut
31700	65 20 74 61 67 20 3a 6d 65 6d 62 65 72 73 29 29 29 29 29 0a 20 20 20 28 73 65 6d 61 6e 74 69 63	e.tag.:members)))))....(semantic
31720	2d 66 65 74 63 68 2d 74 61 67 73 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28	-fetch-tags)))..;;;###autoload.(
31740	64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 73 65 6d 61 6e 74 69 63 20 28 29 0a 20 20 22 4a 75 6d	defun.counsel-semantic.()..."Jum
31760	70 20 74 6f 20 61 20 73 65 6d 61 6e 74 69 63 20 74 61 67 20 69 6e 20 74 68 65 20 63 75 72 72 65	p.to.a.semantic.tag.in.the.curre
31780	6e 74 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 6c	nt.buffer."...(interactive)...(l
317a0	65 74 20 28 28 74 61 67 73 20 28 6d 61 70 63 61 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	et.((tags.(mapcar...............
317c0	20 28 6c 61 6d 62 64 61 20 28 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63	.(lambda.(x)..................(c
317e0	6f 6e 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 73	ons...................(counsel-s
31800	65 6d 61 6e 74 69 63 2d 66 6f 72 6d 61 74 2d 74 61 67 20 78 29 0a 20 20 20 20 20 20 20 20 20 20	emantic-format-tag.x)...........
31820	20 20 20 20 20 20 20 20 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e	........x))................(coun
31840	73 65 6c 2d 73 65 6d 61 6e 74 69 63 2d 74 61 67 73 29 29 29 29 0a 20 20 20 20 28 69 76 79 2d 72	sel-semantic-tags)))).....(ivy-r
31860	65 61 64 20 22 74 61 67 3a 20 22 20 74 61 67 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a	ead."tag:.".tags...............:
31880	61 63 74 69 6f 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 73 65 6d 61 6e 74 69 63 2d 61 63 74 69 6f 6e	action.#'counsel-semantic-action
318a0	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 69 73 74 6f 72 79 20 27 63 6f 75 6e 73 65 6c	...............:history.'counsel
318c0	2d 73 65 6d 61 6e 74 69 63 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	-semantic-history...............
318e0	3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 73 65 6d 61 6e 74 69 63 29 29 29 0a 0a 3b 3b	:caller.'counsel-semantic)))..;;
31900	3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 73 65 6d 61	;###autoload.(defun.counsel-sema
31920	6e 74 69 63 2d 6f 72 2d 69 6d 65 6e 75 20 28 29 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29	ntic-or-imenu.()...(interactive)
31940	0a 20 20 28 72 65 71 75 69 72 65 20 27 73 65 6d 61 6e 74 69 63 2f 66 77 29 0a 20 20 28 69 66 20	...(require.'semantic/fw)...(if.
31960	28 73 65 6d 61 6e 74 69 63 2d 61 63 74 69 76 65 2d 70 29 0a 20 20 20 20 20 20 28 63 6f 75 6e 73	(semantic-active-p).......(couns
31980	65 6c 2d 73 65 6d 61 6e 74 69 63 29 0a 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 69 6d 65 6e 75 29	el-semantic).....(counsel-imenu)
319a0	29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 27 0a 0a 28 64 65 66	))..;;;;.`counsel-outline'..(def
319c0	63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 66 61 63 65 2d 73 74 79 6c	custom.counsel-outline-face-styl
319e0	65 20 6e 69 6c 0a 20 20 22 44 65 74 65 72 6d 69 6e 65 73 20 68 6f 77 20 74 6f 20 73 74 79 6c 65	e.nil..."Determines.how.to.style
31a00	20 6f 75 74 6c 69 6e 65 20 68 65 61 64 69 6e 67 73 20 64 75 72 69 6e 67 20 63 6f 6d 70 6c 65 74	.outline.headings.during.complet
31a20	69 6f 6e 2e 0a 0a 49 66 20 60 6f 72 67 27 2c 20 74 68 65 20 66 61 63 65 73 20 60 63 6f 75 6e 73	ion...If.`org',.the.faces.`couns
31a40	65 6c 2d 6f 75 74 6c 69 6e 65 2d 31 27 20 74 68 72 6f 75 67 68 0a 60 63 6f 75 6e 73 65 6c 2d 6f	el-outline-1'.through.`counsel-o
31a60	75 74 6c 69 6e 65 2d 38 27 20 61 72 65 20 61 70 70 6c 69 65 64 20 69 6e 20 61 20 73 69 6d 69 6c	utline-8'.are.applied.in.a.simil
31a80	61 72 20 77 61 79 20 74 6f 20 4f 72 67 2e 0a 4e 6f 74 65 20 74 68 61 74 20 6e 6f 20 63 79 63 6c	ar.way.to.Org..Note.that.no.cycl
31aa0	69 6e 67 20 69 73 20 70 65 72 66 6f 72 6d 65 64 2c 20 73 6f 20 68 65 61 64 69 6e 67 73 20 6f 6e	ing.is.performed,.so.headings.on
31ac0	20 6c 65 76 65 6c 73 20 39 20 61 6e 64 0a 68 69 67 68 65 72 20 61 72 65 20 6e 6f 74 20 73 74 79	.levels.9.and.higher.are.not.sty
31ae0	6c 65 64 2e 0a 0a 49 66 20 60 76 65 72 62 61 74 69 6d 27 2c 20 74 68 65 20 66 61 63 65 73 20 75	led...If.`verbatim',.the.faces.u
31b00	73 65 64 20 69 6e 20 74 68 65 20 62 75 66 66 65 72 20 61 72 65 20 61 70 70 6c 69 65 64 2e 20 20	sed.in.the.buffer.are.applied...
31b20	46 6f 72 0a 73 69 6d 70 6c 65 20 68 65 61 64 6c 69 6e 65 73 20 69 6e 20 60 6f 72 67 2d 6d 6f 64	For.simple.headlines.in.`org-mod
31b40	65 27 20 62 75 66 66 65 72 73 2c 20 74 68 69 73 20 69 73 20 75 73 75 61 6c 6c 79 20 74 68 65 20	e'.buffers,.this.is.usually.the.
31b60	73 61 6d 65 0a 61 73 20 74 68 65 20 60 6f 72 67 27 20 73 65 74 74 69 6e 67 2c 20 65 78 63 65 70	same.as.the.`org'.setting,.excep
31b80	74 20 74 68 61 74 20 69 74 20 64 65 70 65 6e 64 73 20 6f 6e 20 68 6f 77 20 6d 75 63 68 20 6f 66	t.that.it.depends.on.how.much.of
31ba0	20 74 68 65 0a 62 75 66 66 65 72 20 68 61 73 20 62 65 65 6e 20 63 6f 6d 70 6c 65 74 65 6c 79 20	.the.buffer.has.been.completely.
31bc0	66 6f 6e 74 69 66 69 65 64 2e 20 20 49 66 20 79 6f 75 72 20 62 75 66 66 65 72 20 65 78 63 65 65	fontified...If.your.buffer.excee
31be0	64 73 20 61 0a 63 65 72 74 61 69 6e 20 73 69 7a 65 2c 20 68 65 61 64 6c 69 6e 65 73 20 61 72 65	ds.a.certain.size,.headlines.are
31c00	20 73 74 79 6c 65 64 20 6c 61 7a 69 6c 79 20 64 65 70 65 6e 64 69 6e 67 20 6f 6e 20 77 68 69 63	.styled.lazily.depending.on.whic
31c20	68 0a 70 61 72 74 73 20 6f 66 20 74 68 65 20 74 72 65 65 20 61 72 65 20 76 69 73 69 62 6c 65 2e	h.parts.of.the.tree.are.visible.
31c40	20 20 48 65 61 64 6c 69 6e 65 73 20 77 68 69 63 68 20 61 72 65 20 6e 6f 74 20 79 65 74 0a 73 74	..Headlines.which.are.not.yet.st
31c60	79 6c 65 64 20 69 6e 20 74 68 65 20 62 75 66 66 65 72 20 77 69 6c 6c 20 61 70 70 65 61 72 20 75	yled.in.the.buffer.will.appear.u
31c80	6e 73 74 79 6c 65 64 20 69 6e 20 74 68 65 20 6d 69 6e 69 62 75 66 66 65 72 20 61 73 0a 77 65 6c	nstyled.in.the.minibuffer.as.wel
31ca0	6c 2e 20 20 49 66 20 79 6f 75 72 20 68 65 61 64 6c 69 6e 65 73 20 63 6f 6e 74 61 69 6e 20 70 61	l...If.your.headlines.contain.pa
31cc0	72 74 73 20 77 68 69 63 68 20 61 72 65 20 66 6f 6e 74 69 66 69 65 64 0a 64 69 66 66 65 72 65 6e	rts.which.are.fontified.differen
31ce0	74 6c 79 20 74 68 61 6e 20 74 68 65 20 68 65 61 64 6c 69 6e 65 20 69 74 73 65 6c 66 20 28 65 2e	tly.than.the.headline.itself.(e.
31d00	67 2e 20 54 4f 44 4f 20 6b 65 79 77 6f 72 64 73 2c 20 74 61 67 73 2c 0a 6c 69 6e 6b 73 29 20 61	g..TODO.keywords,.tags,.links).a
31d20	6e 64 20 79 6f 75 20 77 61 6e 74 20 74 68 65 73 65 20 70 61 72 74 73 20 74 6f 20 62 65 20 73 74	nd.you.want.these.parts.to.be.st
31d40	79 6c 65 64 20 70 72 6f 70 65 72 6c 79 2c 20 76 65 72 62 61 74 69 6d 0a 69 73 20 74 68 65 20 77	yled.properly,.verbatim.is.the.w
31d60	61 79 20 74 6f 20 67 6f 3b 20 6f 74 68 65 72 77 69 73 65 20 79 6f 75 20 61 72 65 20 70 72 6f 62	ay.to.go;.otherwise.you.are.prob
31d80	61 62 6c 79 20 62 65 74 74 65 72 20 6f 66 66 20 75 73 69 6e 67 20 74 68 65 0a 60 6f 72 67 27 20	ably.better.off.using.the.`org'.
31da0	73 65 74 74 69 6e 67 20 69 6e 73 74 65 61 64 2e 0a 0a 49 66 20 60 63 75 73 74 6f 6d 27 2c 20 74	setting.instead...If.`custom',.t
31dc0	68 65 20 66 61 63 65 73 20 64 65 66 69 6e 65 64 20 69 6e 20 60 63 6f 75 6e 73 65 6c 2d 6f 75 74	he.faces.defined.in.`counsel-out
31de0	6c 69 6e 65 2d 63 75 73 74 6f 6d 2d 66 61 63 65 73 27 0a 61 72 65 20 61 70 70 6c 69 65 64 2e 20	line-custom-faces'.are.applied..
31e00	20 4e 6f 74 65 20 74 68 61 74 20 6e 6f 20 63 79 63 6c 69 6e 67 20 69 73 20 70 65 72 66 6f 72 6d	.Note.that.no.cycling.is.perform
31e20	65 64 2c 20 73 6f 20 69 66 20 74 68 65 72 65 20 69 73 0a 6e 6f 20 66 61 63 65 20 64 65 66 69 6e	ed,.so.if.there.is.no.face.defin
31e40	65 64 20 66 6f 72 20 61 20 63 65 72 74 61 69 6e 20 6c 65 76 65 6c 2c 20 68 65 61 64 6c 69 6e 65	ed.for.a.certain.level,.headline
31e60	73 20 6f 6e 20 74 68 61 74 20 6c 65 76 65 6c 20 77 69 6c 6c 0a 6e 6f 74 20 62 65 20 73 74 79 6c	s.on.that.level.will.not.be.styl
31e80	65 64 2e 0a 0a 49 66 20 60 6e 69 6c 27 2c 20 61 6c 6c 20 68 65 61 64 6c 69 6e 65 73 20 61 72 65	ed...If.`nil',.all.headlines.are
31ea0	20 68 69 67 68 6c 69 67 68 74 65 64 20 75 73 69 6e 67 0a 60 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c	.highlighted.using.`counsel-outl
31ec0	69 6e 65 2d 64 65 66 61 75 6c 74 27 2e 0a 0a 46 6f 72 20 64 69 73 70 6c 61 79 69 6e 67 20 74 61	ine-default'...For.displaying.ta
31ee0	67 73 20 61 6e 64 20 54 4f 44 4f 20 6b 65 79 77 6f 72 64 73 20 69 6e 20 60 6f 72 67 2d 6d 6f 64	gs.and.TODO.keywords.in.`org-mod
31f00	65 27 20 62 75 66 66 65 72 73 2c 20 73 65 65 0a 60 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 68 65 61	e'.buffers,.see.`counsel-org-hea
31f20	64 6c 69 6e 65 2d 64 69 73 70 6c 61 79 2d 74 61 67 73 27 20 61 6e 64 0a 60 63 6f 75 6e 73 65 6c	dline-display-tags'.and.`counsel
31f40	2d 6f 72 67 2d 68 65 61 64 6c 69 6e 65 2d 64 69 73 70 6c 61 79 2d 74 6f 64 6f 27 2c 20 72 65 73	-org-headline-display-todo',.res
31f60	70 65 63 74 69 76 65 6c 79 2e 22 0a 20 20 3a 74 79 70 65 20 27 28 63 68 6f 69 63 65 0a 20 20 20	pectively."...:type.'(choice....
31f80	20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 53 61 6d 65 20 61 73 20 6f 72 67 2d	.......(const.:tag."Same.as.org-
31fa0	6d 6f 64 65 22 20 6f 72 67 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67	mode".org)...........(const.:tag
31fc0	20 22 56 65 72 62 61 74 69 6d 22 20 76 65 72 62 61 74 69 6d 29 0a 20 20 20 20 20 20 20 20 20 20	."Verbatim".verbatim)...........
31fe0	28 63 6f 6e 73 74 20 3a 74 61 67 20 22 43 75 73 74 6f 6d 22 20 63 75 73 74 6f 6d 29 0a 20 20 20	(const.:tag."Custom".custom)....
32000	20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 4e 6f 20 73 74 79 6c 65 22 20 6e 69	.......(const.:tag."No.style".ni
32020	6c 29 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65	l)))..(defcustom.counsel-outline
32040	2d 63 75 73 74 6f 6d 2d 66 61 63 65 73 20 6e 69 6c 0a 20 20 22 4c 69 73 74 20 6f 66 20 66 61 63	-custom-faces.nil..."List.of.fac
32060	65 73 20 66 6f 72 20 63 75 73 74 6f 6d 20 64 69 73 70 6c 61 79 20 6f 66 20 6f 75 74 6c 69 6e 65	es.for.custom.display.of.outline
32080	20 68 65 61 64 69 6e 67 73 2e 0a 0a 48 65 61 64 6c 69 6e 65 73 20 6f 6e 20 6c 65 76 65 6c 20 4e	.headings...Headlines.on.level.N
320a0	20 61 72 65 20 66 6f 6e 74 69 66 69 65 64 20 77 69 74 68 20 74 68 65 20 4e 74 68 20 65 6e 74 72	.are.fontified.with.the.Nth.entr
320c0	79 20 6f 66 20 74 68 69 73 0a 6c 69 73 74 2c 20 73 74 61 72 74 69 6e 67 20 77 69 74 68 20 4e 20	y.of.this.list,.starting.with.N.
320e0	3d 20 31 2e 20 20 48 65 61 64 6c 69 6e 65 20 6c 65 76 65 6c 73 20 77 69 74 68 20 6e 6f 20 63 6f	=.1...Headline.levels.with.no.co
32100	72 72 65 73 70 6f 6e 64 69 6e 67 0a 65 6e 74 72 79 20 69 6e 20 74 68 69 73 20 6c 69 73 74 20 77	rresponding.entry.in.this.list.w
32120	69 6c 6c 20 6e 6f 74 20 62 65 20 73 74 79 6c 65 64 2e 0a 0a 54 68 69 73 20 76 61 72 69 61 62 6c	ill.not.be.styled...This.variabl
32140	65 20 68 61 73 20 6e 6f 20 65 66 66 65 63 74 20 75 6e 6c 65 73 73 20 60 63 6f 75 6e 73 65 6c 2d	e.has.no.effect.unless.`counsel-
32160	6f 75 74 6c 69 6e 65 2d 66 61 63 65 2d 73 74 79 6c 65 27 0a 69 73 20 73 65 74 20 74 6f 20 60 63	outline-face-style'.is.set.to.`c
32180	75 73 74 6f 6d 27 2e 22 0a 20 20 3a 74 79 70 65 20 27 28 72 65 70 65 61 74 20 66 61 63 65 29 29	ustom'."...:type.'(repeat.face))
321a0	0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 74 69 74 6c 65 20 28	..(defun.counsel-outline-title.(
321c0	29 0a 20 20 22 52 65 74 75 72 6e 20 74 69 74 6c 65 20 6f 66 20 63 75 72 72 65 6e 74 20 6f 75 74	)..."Return.title.of.current.out
321e0	6c 69 6e 65 20 68 65 61 64 69 6e 67 2e 0a 49 6e 74 65 6e 64 65 64 20 61 73 20 61 20 76 61 6c 75	line.heading..Intended.as.a.valu
32200	65 20 66 6f 72 20 74 68 65 20 60 3a 6f 75 74 6c 69 6e 65 2d 74 69 74 6c 65 27 20 73 65 74 74 69	e.for.the.`:outline-title'.setti
32220	6e 67 20 69 6e 0a 60 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 73 65 74 74 69 6e 67 73 27	ng.in.`counsel-outline-settings'
32240	2c 20 77 68 69 63 68 20 73 65 65 2e 22 0a 20 20 28 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e	,.which.see."...(buffer-substrin
32260	67 20 28 70 6f 69 6e 74 29 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 29 29 29 0a	g.(point).(line-end-position))).
32280	0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 74 69 74 6c 65 2d 6f 72	.(defun.counsel-outline-title-or
322a0	67 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 74 69 74 6c 65 20 6f 66 20 63 75 72 72 65 6e 74 20	g.()..."Return.title.of.current.
322c0	6f 75 74 6c 69 6e 65 20 68 65 61 64 69 6e 67 2e 0a 4c 69 6b 65 20 60 63 6f 75 6e 73 65 6c 2d 6f	outline.heading..Like.`counsel-o
322e0	75 74 6c 69 6e 65 2d 74 69 74 6c 65 27 20 28 77 68 69 63 68 20 73 65 65 29 2c 20 62 75 74 20 66	utline-title'.(which.see),.but.f
32300	6f 72 20 60 6f 72 67 2d 6d 6f 64 65 27 0a 62 75 66 66 65 72 73 2e 22 0a 20 20 28 6c 65 74 20 28	or.`org-mode'.buffers."...(let.(
32320	28 73 74 61 74 69 73 74 69 63 73 2d 72 65 20 22 5c 5c 5b 5b 30 2d 39 5d 2a 5c 5c 28 3f 3a 25 5c	(statistics-re."\\[[0-9]*\\(?:%\
32340	5c 7c 2f 5b 30 2d 39 5d 2a 5c 5c 29 5d 22 29 0a 20 20 20 20 20 20 20 20 28 68 65 61 64 69 6e 67	\|/[0-9]*\\)]").........(heading
32360	20 28 61 70 70 6c 79 20 23 27 6f 72 67 2d 67 65 74 2d 68 65 61 64 69 6e 67 20 28 63 6f 75 6e 73	.(apply.#'org-get-heading.(couns
32380	65 6c 2d 2d 6f 72 67 2d 67 65 74 2d 68 65 61 64 69 6e 67 2d 61 72 67 73 29 29 29 29 0a 20 20 20	el--org-get-heading-args))))....
323a0	20 28 63 6f 6e 64 20 28 63 6f 75 6e 73 65 6c 2d 6f 72 67 2d 68 65 61 64 6c 69 6e 65 2d 64 69 73	.(cond.(counsel-org-headline-dis
323c0	70 6c 61 79 2d 73 74 61 74 69 73 74 69 63 73 0a 20 20 20 20 20 20 20 20 20 20 20 68 65 61 64 69	play-statistics............headi
323e0	6e 67 29 0a 20 20 20 20 20 20 20 20 20 20 28 68 65 61 64 69 6e 67 0a 20 20 20 20 20 20 20 20 20	ng)...........(heading..........
32400	20 20 28 6f 72 67 2d 74 72 69 6d 20 28 72 65 70 6c 61 63 65 2d 72 65 67 65 78 70 2d 69 6e 2d 73	..(org-trim.(replace-regexp-in-s
32420	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 20 20 73 74 61 74	tring.......................stat
32440	69 73 74 69 63 73 2d 72 65 20 22 20 22 20 68 65 61 64 69 6e 67 20 74 20 74 29 29 29 29 29 29 0a	istics-re.".".heading.t.t)))))).
32460	0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 74 69 74 6c 65 2d 6d 61	.(defun.counsel-outline-title-ma
32480	72 6b 64 6f 77 6e 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 74 69 74 6c 65 20 6f 66 20 63 75 72	rkdown.()..."Return.title.of.cur
324a0	72 65 6e 74 20 6f 75 74 6c 69 6e 65 20 68 65 61 64 69 6e 67 2e 0a 4c 69 6b 65 20 60 63 6f 75 6e	rent.outline.heading..Like.`coun
324c0	73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 74 69 74 6c 65 27 20 28 77 68 69 63 68 20 73 65 65 29 2c 20	sel-outline-title'.(which.see),.
324e0	62 75 74 20 66 6f 72 0a 60 6d 61 72 6b 64 6f 77 6e 2d 6d 6f 64 65 27 20 28 66 72 6f 6d 20 74 68	but.for.`markdown-mode'.(from.th
32500	65 20 65 70 6f 6e 79 6d 6f 75 73 20 70 61 63 6b 61 67 65 29 20 62 75 66 66 65 72 73 2e 22 0a 20	e.eponymous.package).buffers."..
32520	20 3b 3b 20 60 6f 75 74 6c 69 6e 65 2d 72 65 67 65 78 70 27 20 69 73 20 73 65 74 20 62 79 20 60	.;;.`outline-regexp'.is.set.by.`
32540	6d 61 72 6b 64 6f 77 6e 2d 6d 6f 64 65 27 20 74 6f 20 6d 61 74 63 68 20 62 6f 74 68 20 73 65 74	markdown-mode'.to.match.both.set
32560	65 78 74 0a 20 20 3b 3b 20 28 75 6e 64 65 72 6c 69 6e 65 29 20 61 6e 64 20 61 74 78 20 28 68 61	ext...;;.(underline).and.atx.(ha
32580	73 68 29 20 68 65 61 64 69 6e 67 73 20 28 73 65 65 0a 20 20 3b 3b 20 60 6d 61 72 6b 64 6f 77 6e	sh).headings.(see...;;.`markdown
325a0	2d 72 65 67 65 78 2d 68 65 61 64 65 72 27 29 2e 0a 20 20 28 6f 72 20 28 6d 61 74 63 68 2d 73 74	-regex-header')....(or.(match-st
325c0	72 69 6e 67 20 31 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 73 65 74 65 78	ring.1)..................;.setex
325e0	74 20 68 65 61 64 69 6e 67 20 74 69 74 6c 65 0a 20 20 20 20 20 20 28 6d 61 74 63 68 2d 73 74 72	t.heading.title.......(match-str
32600	69 6e 67 20 35 29 29 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 61 74 78 20 68 65	ing.5)))................;.atx.he
32620	61 64 69 6e 67 20 74 69 74 6c 65 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c	ading.title..(defun.counsel-outl
32640	69 6e 65 2d 74 69 74 6c 65 2d 6c 61 74 65 78 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 74 69 74	ine-title-latex.()..."Return.tit
32660	6c 65 20 6f 66 20 63 75 72 72 65 6e 74 20 6f 75 74 6c 69 6e 65 20 68 65 61 64 69 6e 67 2e 0a 4c	le.of.current.outline.heading..L
32680	69 6b 65 20 60 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 74 69 74 6c 65 27 20 28 77 68 69	ike.`counsel-outline-title'.(whi
326a0	63 68 20 73 65 65 29 2c 20 62 75 74 20 66 6f 72 20 60 6c 61 74 65 78 2d 6d 6f 64 65 27 0a 62 75	ch.see),.but.for.`latex-mode'.bu
326c0	66 66 65 72 73 2e 22 0a 20 20 3b 3b 20 60 6f 75 74 6c 69 6e 65 2d 72 65 67 65 78 70 27 20 69 73	ffers."...;;.`outline-regexp'.is
326e0	20 73 65 74 20 62 79 20 60 6c 61 74 65 78 2d 6d 6f 64 65 27 20 28 73 65 65 20 76 61 72 69 61 62	.set.by.`latex-mode'.(see.variab
32700	6c 65 0a 20 20 3b 3b 20 60 6c 61 74 65 78 2d 73 65 63 74 69 6f 6e 2d 61 6c 69 73 74 27 20 66 6f	le...;;.`latex-section-alist'.fo
32720	72 20 74 68 65 20 62 75 69 6c 74 2d 69 6e 20 6d 6f 64 65 20 6f 72 20 66 75 6e 63 74 69 6f 6e 0a	r.the.built-in.mode.or.function.
32740	20 20 3b 3b 20 60 4c 61 54 65 58 2d 6f 75 74 6c 69 6e 65 2d 72 65 67 65 78 70 27 20 66 6f 72 20	..;;.`LaTeX-outline-regexp'.for.
32760	74 68 65 20 41 55 43 54 65 58 20 70 61 63 6b 61 67 65 29 20 74 6f 20 6d 61 74 63 68 20 73 65 63	the.AUCTeX.package).to.match.sec
32780	74 69 6f 6e 0a 20 20 3b 3b 20 6d 61 63 72 6f 73 2c 20 69 6e 20 77 68 69 63 68 20 63 61 73 65 20	tion...;;.macros,.in.which.case.
327a0	77 65 20 67 65 74 20 74 68 65 20 73 65 63 74 69 6f 6e 20 6e 61 6d 65 2c 20 61 73 20 77 65 6c 6c	we.get.the.section.name,.as.well
327c0	20 61 73 0a 20 20 3b 3b 20 60 5c 61 70 70 65 6e 64 69 78 27 2c 20 60 5c 64 6f 63 75 6d 65 6e 74	.as...;;.`\appendix',.`\document
327e0	63 6c 61 73 73 27 2c 20 60 5c 62 65 67 69 6e 7b 64 6f 63 75 6d 65 6e 74 7d 27 2c 20 61 6e 64 0a	class',.`\begin{document}',.and.
32800	20 20 3b 3b 20 60 5c 65 6e 64 7b 64 6f 63 75 6d 65 6e 74 7d 27 2c 20 69 6e 20 77 68 69 63 68 20	..;;.`\end{document}',.in.which.
32820	63 61 73 65 20 77 65 20 73 69 6d 70 6c 79 20 72 65 74 75 72 6e 20 74 68 61 74 2e 0a 20 20 28 69	case.we.simply.return.that....(i
32840	66 20 28 61 6e 64 20 28 61 73 73 6f 63 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 31 29 20 20	f.(and.(assoc.(match-string.1)..
32860	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 4d 61 63	...........................;.Mac
32880	72 6f 20 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 62	ro.name...................(or.(b
328a0	6f 75 6e 64 2d 61 6e 64 2d 74 72 75 65 2d 70 20 4c 61 54 65 58 2d 73 65 63 74 69 6f 6e 2d 6c 69	ound-and-true-p.LaTeX-section-li
328c0	73 74 29 20 20 20 20 3b 20 41 55 43 54 65 58 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	st)....;.AUCTeX.................
328e0	20 20 20 20 20 20 28 62 6f 75 6e 64 2d 61 6e 64 2d 74 72 75 65 2d 70 20 6c 61 74 65 78 2d 73 65	......(bound-and-true-p.latex-se
32900	63 74 69 6f 6e 2d 61 6c 69 73 74 29 29 29 20 3b 20 42 75 69 6c 74 2d 69 6e 0a 20 20 20 20 20 20	ction-alist))).;.Built-in.......
32920	20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 50 6f 69 6e	.....(progn..............;;.Poin
32940	74 20 69 73 20 61 74 20 65 6e 64 20 6f 66 20 6d 61 63 72 6f 20 6e 61 6d 65 2c 20 73 6b 69 70 20	t.is.at.end.of.macro.name,.skip.
32960	73 74 61 72 73 20 61 6e 64 20 6f 70 74 69 6f 6e 61 6c 20 61 72 67 73 0a 20 20 20 20 20 20 20 20	stars.and.optional.args.........
32980	20 20 20 20 20 28 73 6b 69 70 2d 63 68 61 72 73 2d 66 6f 72 77 61 72 64 20 22 2a 22 29 0a 20 20	.....(skip-chars-forward."*")...
329a0	20 20 20 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 6c 6f 6f 6b 69 6e 67 2d 61 74 2d 70 20	...........(while.(looking-at-p.
329c0	22 5c 5c 5b 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c	"\\[")................(forward-l
329e0	69 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 46 69 72 73 74 20 6d 61 6e 64	ist))..............;;.First.mand
32a00	61 74 6f 72 79 20 61 72 67 20 73 68 6f 75 6c 64 20 62 65 20 73 65 63 74 69 6f 6e 20 74 69 74 6c	atory.arg.should.be.section.titl
32a20	65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 6f 6b 69 6e 67 2d 61 74 2d 70 20 22 7b 22	e..............(looking-at-p."{"
32a40	29 29 29 0a 20 20 20 20 20 20 28 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 20 28 31 2b 20	))).......(buffer-substring.(1+.
32a60	28 70 6f 69 6e 74 29 29 20 28 31 2d 20 28 70 72 6f 67 6e 20 28 66 6f 72 77 61 72 64 2d 6c 69 73	(point)).(1-.(progn.(forward-lis
32a80	74 29 20 28 70 6f 69 6e 74 29 29 29 29 0a 20 20 20 20 28 62 75 66 66 65 72 2d 73 75 62 73 74 72	t).(point)))).....(buffer-substr
32aa0	69 6e 67 20 28 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 29 20 28 70	ing.(line-beginning-position).(p
32ac0	6f 69 6e 74 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65	oint))))..(defun.counsel-outline
32ae0	2d 6c 65 76 65 6c 2d 65 6d 61 63 73 2d 6c 69 73 70 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 6c	-level-emacs-lisp.()..."Return.l
32b00	65 76 65 6c 20 6f 66 20 63 75 72 72 65 6e 74 20 6f 75 74 6c 69 6e 65 20 68 65 61 64 69 6e 67 2e	evel.of.current.outline.heading.
32b20	0a 4c 69 6b 65 20 60 6c 69 73 70 2d 6f 75 74 6c 69 6e 65 2d 6c 65 76 65 6c 27 2c 20 62 75 74 20	.Like.`lisp-outline-level',.but.
32b40	61 64 61 70 74 65 64 20 66 6f 72 20 74 68 65 20 60 3a 6f 75 74 6c 69 6e 65 2d 6c 65 76 65 6c 27	adapted.for.the.`:outline-level'
32b60	0a 73 65 74 74 69 6e 67 20 69 6e 20 60 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 73 65 74	.setting.in.`counsel-outline-set
32b80	74 69 6e 67 73 27 2c 20 77 68 69 63 68 20 73 65 65 2e 22 0a 20 20 28 69 66 20 28 6c 6f 6f 6b 69	tings',.which.see."...(if.(looki
32ba0	6e 67 2d 61 74 20 22 3b 3b 5c 5c 28 5b 3b 2a 5d 2b 5c 5c 29 22 29 0a 20 20 20 20 20 20 28 2d 20	ng-at.";;\\([;*]+\\)").......(-.
32bc0	28 6d 61 74 63 68 2d 65 6e 64 20 31 29 20 28 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 31	(match-end.1).(match-beginning.1
32be0	29 29 0a 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 6f 75 74 6c 69 6e 65 2d 6c 65 76 65 6c 29 29 29	)).....(funcall.outline-level)))
32c00	0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 2d 70 72 65 73 65	..(defvar.counsel-outline--prese
32c20	6c 65 63 74 20 30 0a 20 20 22 49 6e 64 65 78 20 6f 66 20 74 68 65 20 70 72 65 73 65 6c 65 63 74	lect.0..."Index.of.the.preselect
32c40	65 64 20 63 61 6e 64 69 64 61 74 65 20 69 6e 20 60 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65	ed.candidate.in.`counsel-outline
32c60	27 2e 22 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 63 61 6e	'.")..(defun.counsel-outline-can
32c80	64 69 64 61 74 65 73 20 28 26 6f 70 74 69 6f 6e 61 6c 20 73 65 74 74 69 6e 67 73 20 70 72 65 66	didates.(&optional.settings.pref
32ca0	69 78 29 0a 20 20 22 52 65 74 75 72 6e 20 61 6e 20 61 6c 69 73 74 20 6f 66 20 6f 75 74 6c 69 6e	ix)..."Return.an.alist.of.outlin
32cc0	65 20 68 65 61 64 69 6e 67 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 63 61 6e 64 69 64 61 74 65 73 2e	e.heading.completion.candidates.
32ce0	0a 45 61 63 68 20 65 6c 65 6d 65 6e 74 20 69 73 20 61 20 70 61 69 72 20 28 48 45 41 44 49 4e 47	.Each.element.is.a.pair.(HEADING
32d00	20 2e 20 4d 41 52 4b 45 52 29 2c 20 77 68 65 72 65 20 74 68 65 20 73 74 72 69 6e 67 0a 48 45 41	...MARKER),.where.the.string.HEA
32d20	44 49 4e 47 20 69 73 20 6c 6f 63 61 74 65 64 20 61 74 20 74 68 65 20 70 6f 73 69 74 69 6f 6e 20	DING.is.located.at.the.position.
32d40	6f 66 20 4d 41 52 4b 45 52 2e 20 20 53 45 54 54 49 4e 47 53 20 69 73 20 61 0a 70 6c 69 73 74 20	of.MARKER...SETTINGS.is.a.plist.
32d60	65 6e 74 72 79 20 66 72 6f 6d 20 60 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 73 65 74 74	entry.from.`counsel-outline-sett
32d80	69 6e 67 73 27 2c 20 77 68 69 63 68 20 73 65 65 2e 0a 50 52 45 46 49 58 20 69 73 20 61 20 73 74	ings',.which.see..PREFIX.is.a.st
32da0	72 69 6e 67 20 70 72 65 70 65 6e 64 65 64 20 74 6f 20 61 6c 6c 20 63 61 6e 64 69 64 61 74 65 73	ring.prepended.to.all.candidates
32dc0	2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 62 6f 6c 2d 72 65 67 65 78 20 28 63 6f 6e 63 61 74 20 22	."...(let*.((bol-regex.(concat."
32de0	5e 5c 5c 28 3f 3a 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	^\\(?:".........................
32e00	20 20 20 20 28 6f 72 20 28 70 6c 69 73 74 2d 67 65 74 20 73 65 74 74 69 6e 67 73 20 3a 6f 75 74	....(or.(plist-get.settings.:out
32e20	6c 69 6e 65 2d 72 65 67 65 78 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	line-regexp)....................
32e40	20 20 20 20 20 20 20 20 20 20 20 20 20 6f 75 74 6c 69 6e 65 2d 72 65 67 65 78 70 29 0a 20 20 20	.............outline-regexp)....
32e60	20 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 5c 5c 29 22 29 29	........................."\\)"))
32e80	0a 20 20 20 20 20 20 20 20 20 28 6f 75 74 6c 69 6e 65 2d 74 69 74 6c 65 2d 66 6e 20 28 6f 72 20	..........(outline-title-fn.(or.
32ea0	28 70 6c 69 73 74 2d 67 65 74 20 73 65 74 74 69 6e 67 73 20 3a 6f 75 74 6c 69 6e 65 2d 74 69 74	(plist-get.settings.:outline-tit
32ec0	6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	le).............................
32ee0	20 20 20 23 27 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 74 69 74 6c 65 29 29 0a 20 20 20	...#'counsel-outline-title))....
32f00	20 20 20 20 20 20 28 6f 75 74 6c 69 6e 65 2d 6c 65 76 65 6c 2d 66 6e 20 28 6f 72 20 28 70 6c 69	......(outline-level-fn.(or.(pli
32f20	73 74 2d 67 65 74 20 73 65 74 74 69 6e 67 73 20 3a 6f 75 74 6c 69 6e 65 2d 6c 65 76 65 6c 29 0a	st-get.settings.:outline-level).
32f40	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6f	...............................o
32f60	75 74 6c 69 6e 65 2d 6c 65 76 65 6c 29 29 0a 20 20 20 20 20 20 20 20 20 28 64 69 73 70 6c 61 79	utline-level))..........(display
32f80	2d 73 74 79 6c 65 20 28 6f 72 20 28 70 6c 69 73 74 2d 67 65 74 20 73 65 74 74 69 6e 67 73 20 3a	-style.(or.(plist-get.settings.:
32fa0	64 69 73 70 6c 61 79 2d 73 74 79 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	display-style)..................
32fc0	20 20 20 20 20 20 20 20 20 20 20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 64 69 73 70 6c	...........counsel-outline-displ
32fe0	61 79 2d 73 74 79 6c 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 70 61 74 68 2d 73 65 70 61 72 61	ay-style))..........(path-separa
33000	74 6f 72 20 28 6f 72 20 28 70 6c 69 73 74 2d 67 65 74 20 73 65 74 74 69 6e 67 73 20 3a 70 61 74	tor.(or.(plist-get.settings.:pat
33020	68 2d 73 65 70 61 72 61 74 6f 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	h-separator)....................
33040	20 20 20 20 20 20 20 20 20 20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 70 61 74 68 2d 73	..........counsel-outline-path-s
33060	65 70 61 72 61 74 6f 72 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 61 63 65 2d 73 74 79 6c 65 20	eparator))..........(face-style.
33080	28 6f 72 20 28 70 6c 69 73 74 2d 67 65 74 20 73 65 74 74 69 6e 67 73 20 3a 66 61 63 65 2d 73 74	(or.(plist-get.settings.:face-st
330a0	79 6c 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 63 6f	yle)..........................co
330c0	75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 66 61 63 65 2d 73 74 79 6c 65 29 29 0a 20 20 20 20 20	unsel-outline-face-style))......
330e0	20 20 20 20 28 63 75 73 74 6f 6d 2d 66 61 63 65 73 20 28 6f 72 20 28 70 6c 69 73 74 2d 67 65 74	....(custom-faces.(or.(plist-get
33100	20 73 65 74 74 69 6e 67 73 20 3a 63 75 73 74 6f 6d 2d 66 61 63 65 73 29 0a 20 20 20 20 20 20 20	.settings.:custom-faces)........
33120	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c	....................counsel-outl
33140	69 6e 65 2d 63 75 73 74 6f 6d 2d 66 61 63 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 28 73 74 61	ine-custom-faces))..........(sta
33160	63 6b 2d 6c 65 76 65 6c 20 30 29 0a 20 20 20 20 20 20 20 20 20 28 6f 72 69 67 2d 70 6f 69 6e 74	ck-level.0)..........(orig-point
33180	20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 73 74 61 63 6b 20 28 61 6e 64 20 70	.(point))..........(stack.(and.p
331a0	72 65 66 69 78 20 28 6c 69 73 74 20 28 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 2d 61 64	refix.(list.(counsel-outline--ad
331c0	64 2d 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	d-face..........................
331e0	20 20 20 20 20 20 20 20 20 20 70 72 65 66 69 78 20 30 20 66 61 63 65 2d 73 74 79 6c 65 20 63 75	..........prefix.0.face-style.cu
33200	73 74 6f 6d 2d 66 61 63 65 73 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 63 61 6e 64 73 20 6e 61	stom-faces))))..........cands.na
33220	6d 65 20 6c 65 76 65 6c 20 6d 61 72 6b 65 72 29 0a 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72	me.level.marker).....(save-excur
33240	73 69 6f 6e 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65	sion.......(setq.counsel-outline
33260	2d 2d 70 72 65 73 65 6c 65 63 74 20 30 29 0a 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20	--preselect.0).......(goto-char.
33280	28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 72 65 2d 73 65	(point-min)).......(while.(re-se
332a0	61 72 63 68 2d 66 6f 72 77 61 72 64 20 62 6f 6c 2d 72 65 67 65 78 20 6e 69 6c 20 74 29 0a 20 20	arch-forward.bol-regex.nil.t)...
332c0	20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20	......(save-excursion...........
332e0	28 73 65 74 71 20 6e 61 6d 65 20 28 6f 72 20 28 73 61 76 65 2d 6d 61 74 63 68 2d 64 61 74 61 0a	(setq.name.(or.(save-match-data.
33300	20 20 20 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	...........................(func
33320	61 6c 6c 20 6f 75 74 6c 69 6e 65 2d 74 69 74 6c 65 2d 66 6e 29 29 0a 20 20 20 20 20 20 20 20 20	all.outline-title-fn))..........
33340	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 28	................""))...........(
33360	67 6f 74 6f 2d 63 68 61 72 20 28 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 30 29 29 0a 20	goto-char.(match-beginning.0))..
33380	20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 6d 61 72 6b 65 72 20 28 70 6f 69 6e 74 2d 6d 61 72	.........(setq.marker.(point-mar
333a0	6b 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 6c 65 76 65 6c 20 28 66 75 6e	ker))...........(setq.level.(fun
333c0	63 61 6c 6c 20 6f 75 74 6c 69 6e 65 2d 6c 65 76 65 6c 2d 66 6e 29 29 0a 20 20 20 20 20 20 20 20	call.outline-level-fn)).........
333e0	20 20 28 63 6f 6e 64 20 28 28 65 71 20 64 69 73 70 6c 61 79 2d 73 74 79 6c 65 20 27 70 61 74 68	..(cond.((eq.display-style.'path
33400	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 55 70 64 61 74 65 20 73 74 61	)..................;;.Update.sta
33420	63 6b 2e 20 20 54 68 65 20 65 6d 70 74 79 20 65 6e 74 72 79 20 67 75 61 72 64 73 20 61 67 61 69	ck...The.empty.entry.guards.agai
33440	6e 73 74 20 69 6e 63 6f 72 72 65 63 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b	nst.incorrect..................;
33460	3b 20 68 65 61 64 6c 69 6e 65 20 68 69 65 72 61 72 63 68 69 65 73 2c 20 65 2e 67 2e 20 61 20 6c	;.headline.hierarchies,.e.g..a.l
33480	65 76 65 6c 20 33 20 68 65 61 64 6c 69 6e 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	evel.3.headline.................
334a0	20 3b 3b 20 69 6d 6d 65 64 69 61 74 65 6c 79 20 66 6f 6c 6c 6f 77 69 6e 67 20 61 20 6c 65 76 65	.;;.immediately.following.a.leve
334c0	6c 20 31 20 65 6e 74 72 79 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 69	l.1.entry...................(whi
334e0	6c 65 20 28 3c 3d 20 6c 65 76 65 6c 20 73 74 61 63 6b 2d 6c 65 76 65 6c 29 0a 20 20 20 20 20 20	le.(<=.level.stack-level).......
33500	20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6f 70 20 73 74 61 63 6b 29 0a 20 20 20 20 20 20 20	.............(pop.stack)........
33520	20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 64 65 63 66 20 73 74 61 63 6b 2d 6c 65 76 65 6c	............(cl-decf.stack-level
33540	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 3e 20 6c 65	))..................(while.(>.le
33560	76 65 6c 20 73 74 61 63 6b 2d 6c 65 76 65 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	vel.stack-level)................
33580	20 20 20 20 28 70 75 73 68 20 22 22 20 73 74 61 63 6b 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	....(push."".stack).............
335a0	20 20 20 20 20 20 20 28 63 6c 2d 69 6e 63 66 20 73 74 61 63 6b 2d 6c 65 76 65 6c 29 29 0a 20 20	.......(cl-incf.stack-level))...
335c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 66 20 28 63 61 72 20 73 74 61 63 6b 29	...............(setf.(car.stack)
335e0	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 75 6e 73 65 6c	........................(counsel
33600	2d 6f 75 74 6c 69 6e 65 2d 2d 61 64 64 2d 66 61 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	-outline--add-face..............
33620	20 20 20 20 20 20 20 20 20 20 20 6e 61 6d 65 20 6c 65 76 65 6c 20 66 61 63 65 2d 73 74 79 6c 65	...........name.level.face-style
33640	20 63 75 73 74 6f 6d 2d 66 61 63 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.custom-faces)).................
33660	20 28 73 65 74 71 20 6e 61 6d 65 20 28 6d 61 70 63 6f 6e 63 61 74 20 23 27 69 64 65 6e 74 69 74	.(setq.name.(mapconcat.#'identit
33680	79 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	y...............................
336a0	20 20 20 20 20 20 20 20 20 28 72 65 76 65 72 73 65 20 73 74 61 63 6b 29 0a 20 20 20 20 20 20 20	.........(reverse.stack)........
336c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
336e0	70 61 74 68 2d 73 65 70 61 72 61 74 6f 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	path-separator)))...............
33700	20 20 28 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 65 71 20	..(t..................(when.(eq.
33720	64 69 73 70 6c 61 79 2d 73 74 79 6c 65 20 27 68 65 61 64 6c 69 6e 65 29 0a 20 20 20 20 20 20 20	display-style.'headline)........
33740	20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 6e 61 6d 65 20 28 63 6f 6e 63 61 74 20 28	............(setq.name.(concat.(
33760	6d 61 6b 65 2d 73 74 72 69 6e 67 20 6c 65 76 65 6c 20 3f 2a 29 20 22 20 22 20 6e 61 6d 65 29 29	make-string.level.?*).".".name))
33780	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 6e 61 6d 65 20 28 63	)..................(setq.name.(c
337a0	6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 2d 61 64 64 2d 66 61 63 65 0a 20 20 20 20 20 20 20	ounsel-outline--add-face........
337c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 61 6d 65 20 6c 65 76 65 6c	......................name.level
337e0	20 66 61 63 65 2d 73 74 79 6c 65 20 63 75 73 74 6f 6d 2d 66 61 63 65 73 29 29 29 29 0a 20 20 20	.face-style.custom-faces))))....
33800	20 20 20 20 20 20 20 28 70 75 73 68 20 28 63 6f 6e 73 20 6e 61 6d 65 20 6d 61 72 6b 65 72 29 20	.......(push.(cons.name.marker).
33820	63 61 6e 64 73 29 29 0a 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 6f 72 20 28 73 74 72	cands)).........(unless.(or.(str
33840	69 6e 67 3d 20 6e 61 6d 65 20 22 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ing=.name."")...................
33860	20 20 28 3c 20 6f 72 69 67 2d 70 6f 69 6e 74 20 6d 61 72 6b 65 72 29 29 0a 20 20 20 20 20 20 20	..(<.orig-point.marker))........
33880	20 20 20 28 63 6c 2d 69 6e 63 66 20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 2d 70 72 65	...(cl-incf.counsel-outline--pre
338a0	73 65 6c 65 63 74 29 29 29 29 0a 20 20 20 20 28 6e 72 65 76 65 72 73 65 20 63 61 6e 64 73 29 29	select)))).....(nreverse.cands))
338c0	29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 2d 61 64 64 2d 66	)..(defun.counsel-outline--add-f
338e0	61 63 65 20 28 6e 61 6d 65 20 6c 65 76 65 6c 20 26 6f 70 74 69 6f 6e 61 6c 20 66 61 63 65 2d 73	ace.(name.level.&optional.face-s
33900	74 79 6c 65 20 63 75 73 74 6f 6d 2d 66 61 63 65 73 29 0a 20 20 22 53 65 74 20 74 68 65 20 60 66	tyle.custom-faces)..."Set.the.`f
33920	61 63 65 27 20 70 72 6f 70 65 72 74 79 20 6f 6e 20 68 65 61 64 6c 69 6e 65 20 4e 41 4d 45 20 61	ace'.property.on.headline.NAME.a
33940	63 63 6f 72 64 69 6e 67 20 74 6f 20 4c 45 56 45 4c 2e 0a 46 41 43 45 2d 53 54 59 4c 45 20 61 6e	ccording.to.LEVEL..FACE-STYLE.an
33960	64 20 43 55 53 54 4f 4d 2d 46 41 43 45 53 20 6f 76 65 72 72 69 64 65 20 60 63 6f 75 6e 73 65 6c	d.CUSTOM-FACES.override.`counsel
33980	2d 6f 75 74 6c 69 6e 65 2d 66 61 63 65 2d 73 74 79 6c 65 27 0a 61 6e 64 20 60 63 6f 75 6e 73 65	-outline-face-style'.and.`counse
339a0	6c 2d 6f 75 74 6c 69 6e 65 2d 63 75 73 74 6f 6d 2d 66 61 63 65 73 27 2c 20 72 65 73 70 65 63 74	l-outline-custom-faces',.respect
339c0	69 76 65 6c 79 2c 20 77 68 69 63 68 20 64 65 74 65 72 6d 69 6e 65 0a 74 68 65 20 66 61 63 65 20	ively,.which.determine.the.face.
339e0	74 6f 20 61 70 70 6c 79 2e 22 0a 20 20 28 6c 65 74 20 28 28 66 61 63 65 20 28 63 6c 2d 63 61 73	to.apply."...(let.((face.(cl-cas
33a00	65 20 28 6f 72 20 66 61 63 65 2d 73 74 79 6c 65 20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65	e.(or.face-style.counsel-outline
33a20	2d 66 61 63 65 2d 73 74 79 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 76 65	-face-style).................(ve
33a40	72 62 61 74 69 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 75 73 74 6f 6d 20	rbatim).................(custom.
33a60	28 6e 74 68 20 28 31 2d 20 6c 65 76 65 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	(nth.(1-.level).................
33a80	20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 63 75 73 74 6f 6d 2d 66 61 63 65 73 20 63 6f	.............(or.custom-faces.co
33aa0	75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 63 75 73 74 6f 6d 2d 66 61 63 65 73 29 29 29 0a 20 20	unsel-outline-custom-faces)))...
33ac0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 67 20 28 66 6f 72 6d 61 74 20 22 63 6f 75 6e	..............(org.(format."coun
33ae0	73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 25 64 22 20 6c 65 76 65 6c 29 29 0a 20 20 20 20 20 20 20 20	sel-outline-%d".level)).........
33b00	20 20 20 20 20 20 20 20 28 74 20 27 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 64 65 66 61	........(t.'counsel-outline-defa
33b20	75 6c 74 29 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 66 61 63 65 0a 20 20 20 20 20 20 28 70 75	ult)))).....(when.face.......(pu
33b40	74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 28 6c 65 6e 67 74 68 20 6e 61 6d 65 29 20	t-text-property.0.(length.name).
33b60	27 66 61 63 65 20 66 61 63 65 20 6e 61 6d 65 29 29 29 0a 20 20 6e 61 6d 65 29 0a 0a 28 64 65 66	'face.face.name)))...name)..(def
33b80	75 6e 20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 61 63 74 69 6f 6e 20 28 78 29 0a 20 20	un.counsel-outline-action.(x)...
33ba0	22 47 6f 20 74 6f 20 6f 75 74 6c 69 6e 65 20 58 2e 22 0a 20 20 28 67 6f 74 6f 2d 63 68 61 72 20	"Go.to.outline.X."...(goto-char.
33bc0	28 63 64 72 20 78 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	(cdr.x)))..;;;###autoload.(defun
33be0	20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 20 28 29 0a 20 20 22 4a 75 6d 70 20 74 6f 20 61	.counsel-outline.()..."Jump.to.a
33c00	6e 20 6f 75 74 6c 69 6e 65 20 68 65 61 64 69 6e 67 20 77 69 74 68 20 63 6f 6d 70 6c 65 74 69 6f	n.outline.heading.with.completio
33c20	6e 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 20 28 28 73 65 74	n."...(interactive)...(let.((set
33c40	74 69 6e 67 73 20 28 63 64 72 20 28 61 73 73 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 63 6f 75 6e	tings.(cdr.(assq.major-mode.coun
33c60	73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 73 65 74 74 69 6e 67 73 29 29 29 29 0a 20 20 20 20 28 69 76	sel-outline-settings)))).....(iv
33c80	79 2d 72 65 61 64 20 22 4f 75 74 6c 69 6e 65 3a 20 22 20 28 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c	y-read."Outline:.".(counsel-outl
33ca0	69 6e 65 2d 63 61 6e 64 69 64 61 74 65 73 20 73 65 74 74 69 6e 67 73 29 0a 20 20 20 20 20 20 20	ine-candidates.settings)........
33cc0	20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 28 6f 72 20 28 70 6c 69 73 74 2d 67 65 74 20 73 65	.......:action.(or.(plist-get.se
33ce0	74 74 69 6e 67 73 20 3a 61 63 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ttings.:action).................
33d00	20 20 20 20 20 20 20 20 20 20 23 27 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 61 63 74 69	..........#'counsel-outline-acti
33d20	6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 69 73 74 6f 72 79 20 28 6f 72 20 28	on)...............:history.(or.(
33d40	70 6c 69 73 74 2d 67 65 74 20 73 65 74 74 69 6e 67 73 20 3a 68 69 73 74 6f 72 79 29 0a 20 20 20	plist-get.settings.:history)....
33d60	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 63 6f 75 6e 73 65 6c	........................'counsel
33d80	2d 6f 75 74 6c 69 6e 65 2d 68 69 73 74 6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	-outline-history)...............
33da0	3a 70 72 65 73 65 6c 65 63 74 20 28 6d 61 78 20 28 31 2d 20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c	:preselect.(max.(1-.counsel-outl
33dc0	69 6e 65 2d 2d 70 72 65 73 65 6c 65 63 74 29 20 30 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	ine--preselect).0)..............
33de0	20 3a 63 61 6c 6c 65 72 20 28 6f 72 20 28 70 6c 69 73 74 2d 67 65 74 20 73 65 74 74 69 6e 67 73	.:caller.(or.(plist-get.settings
33e00	20 3a 63 61 6c 6c 65 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	.:caller).......................
33e20	20 20 20 20 27 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 29 29 29 29 0a 0a 3b 3b 3b 3b 20 60	....'counsel-outline))))..;;;;.`
33e40	63 6f 75 6e 73 65 6c 2d 69 62 75 66 66 65 72 27 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65	counsel-ibuffer'..(defvar.counse
33e60	6c 2d 69 62 75 66 66 65 72 2d 2d 62 75 66 66 65 72 2d 6e 61 6d 65 20 6e 69 6c 0a 20 20 22 4e 61	l-ibuffer--buffer-name.nil..."Na
33e80	6d 65 20 6f 66 20 74 68 65 20 62 75 66 66 65 72 20 74 6f 20 75 73 65 20 66 6f 72 20 60 63 6f 75	me.of.the.buffer.to.use.for.`cou
33ea0	6e 73 65 6c 2d 69 62 75 66 66 65 72 27 2e 22 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64	nsel-ibuffer'.")..;;;###autoload
33ec0	0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 69 62 75 66 66 65 72 20 28 26 6f 70 74 69 6f 6e	.(defun.counsel-ibuffer.(&option
33ee0	61 6c 20 6e 61 6d 65 29 0a 20 20 22 55 73 65 20 69 62 75 66 66 65 72 20 74 6f 20 73 77 69 74 63	al.name)..."Use.ibuffer.to.switc
33f00	68 20 74 6f 20 61 6e 6f 74 68 65 72 20 62 75 66 66 65 72 2e 0a 4e 41 4d 45 20 73 70 65 63 69 66	h.to.another.buffer..NAME.specif
33f20	69 65 73 20 74 68 65 20 6e 61 6d 65 20 6f 66 20 74 68 65 20 62 75 66 66 65 72 20 28 64 65 66 61	ies.the.name.of.the.buffer.(defa
33f40	75 6c 74 73 20 74 6f 20 5c 22 2a 49 62 75 66 66 65 72 2a 5c 22 29 2e 22 0a 20 20 28 69 6e 74 65	ults.to.\"*Ibuffer*\")."...(inte
33f60	72 61 63 74 69 76 65 29 0a 20 20 28 73 65 74 71 20 63 6f 75 6e 73 65 6c 2d 69 62 75 66 66 65 72	ractive)...(setq.counsel-ibuffer
33f80	2d 2d 62 75 66 66 65 72 2d 6e 61 6d 65 20 28 6f 72 20 6e 61 6d 65 20 22 2a 49 62 75 66 66 65 72	--buffer-name.(or.name."*Ibuffer
33fa0	2a 22 29 29 0a 20 20 28 69 76 79 2d 72 65 61 64 20 22 53 77 69 74 63 68 20 74 6f 20 62 75 66 66	*"))...(ivy-read."Switch.to.buff
33fc0	65 72 3a 20 22 20 28 63 6f 75 6e 73 65 6c 2d 2d 69 62 75 66 66 65 72 2d 67 65 74 2d 62 75 66 66	er:.".(counsel--ibuffer-get-buff
33fe0	65 72 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 69 73 74 6f 72 79 20 27 63 6f 75 6e 73	ers).............:history.'couns
34000	65 6c 2d 69 62 75 66 66 65 72 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a	el-ibuffer-history.............:
34020	61 63 74 69 6f 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 69 62 75 66 66 65 72 2d 76 69 73 69 74 2d 62	action.#'counsel-ibuffer-visit-b
34040	75 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73	uffer.............:caller.'couns
34060	65 6c 2d 69 62 75 66 66 65 72 29 29 0a 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20	el-ibuffer))..(declare-function.
34080	69 62 75 66 66 65 72 2d 75 70 64 61 74 65 20 22 69 62 75 66 66 65 72 22 29 0a 28 64 65 63 6c 61	ibuffer-update."ibuffer").(decla
340a0	72 65 2d 66 75 6e 63 74 69 6f 6e 20 69 62 75 66 66 65 72 2d 63 75 72 72 65 6e 74 2d 62 75 66 66	re-function.ibuffer-current-buff
340c0	65 72 20 22 69 62 75 66 66 65 72 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20	er."ibuffer").(declare-function.
340e0	69 62 75 66 66 65 72 2d 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 22 69 62 75 66 66 65 72 22 29 0a	ibuffer-forward-line."ibuffer").
34100	28 64 65 66 76 61 72 20 69 62 75 66 66 65 72 2d 6d 6f 76 65 6d 65 6e 74 2d 63 79 63 6c 65 29 0a	(defvar.ibuffer-movement-cycle).
34120	0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 69 62 75 66 66 65 72 2d 67 65 74 2d 62 75 66	.(defun.counsel--ibuffer-get-buf
34140	66 65 72 73 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 61 6e 20 61 6c 69 73 74 20 77 69 74 68 20	fers.()..."Return.an.alist.with.
34160	62 75 66 66 65 72 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 63 61 6e 64 69 64 61 74 65 73 20 66 72 6f	buffer.completion.candidates.fro
34180	6d 20 49 62 75 66 66 65 72 2e 0a 54 68 65 20 6b 65 79 73 20 61 72 65 20 62 75 66 66 65 72 2d 72	m.Ibuffer..The.keys.are.buffer-r
341a0	65 6c 61 74 65 64 20 6c 69 6e 65 73 20 66 72 6f 6d 20 49 62 75 66 66 65 72 20 61 73 20 73 74 72	elated.lines.from.Ibuffer.as.str
341c0	69 6e 67 73 2c 20 61 6e 64 0a 74 68 65 20 76 61 6c 75 65 73 20 61 72 65 20 74 68 65 20 63 6f 72	ings,.and.the.values.are.the.cor
341e0	72 65 73 70 6f 6e 64 69 6e 67 20 62 75 66 66 65 72 20 6f 62 6a 65 63 74 73 2e 22 0a 20 20 28 6c	responding.buffer.objects."...(l
34200	65 74 20 28 28 6f 6c 64 62 75 66 20 28 67 65 74 2d 62 75 66 66 65 72 20 63 6f 75 6e 73 65 6c 2d	et.((oldbuf.(get-buffer.counsel-
34220	69 62 75 66 66 65 72 2d 2d 62 75 66 66 65 72 2d 6e 61 6d 65 29 29 29 0a 20 20 20 20 28 75 6e 6c	ibuffer--buffer-name))).....(unl
34240	65 73 73 20 6f 6c 64 62 75 66 0a 20 20 20 20 20 20 3b 3b 20 41 76 6f 69 64 20 6d 65 73 73 69 6e	ess.oldbuf.......;;.Avoid.messin
34260	67 20 77 69 74 68 20 74 68 65 20 75 73 65 72 27 73 20 70 72 65 63 69 6f 75 73 20 77 69 6e 64 6f	g.with.the.user's.precious.windo
34280	77 2f 66 72 61 6d 65 20 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e 2e 0a 20 20 20 20 20 20 28 73 61	w/frame.configuration........(sa
342a0	76 65 2d 77 69 6e 64 6f 77 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 28 6c 65 74	ve-window-excursion.........(let
342c0	20 28 28 64 69 73 70 6c 61 79 2d 62 75 66 66 65 72 2d 6f 76 65 72 72 69 64 69 6e 67 2d 61 63 74	.((display-buffer-overriding-act
342e0	69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 28 64 69 73 70 6c 61 79 2d 62 75 66	ion................'(display-buf
34300	66 65 72 2d 73 61 6d 65 2d 77 69 6e 64 6f 77 20 28 69 6e 68 69 62 69 74 2d 73 61 6d 65 2d 77 69	fer-same-window.(inhibit-same-wi
34320	6e 64 6f 77 20 2e 20 6e 69 6c 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 69 62 75 66 66 65	ndow...nil))))...........(ibuffe
34340	72 20 6e 69 6c 20 63 6f 75 6e 73 65 6c 2d 69 62 75 66 66 65 72 2d 2d 62 75 66 66 65 72 2d 6e 61	r.nil.counsel-ibuffer--buffer-na
34360	6d 65 20 6e 69 6c 20 74 29 29 29 29 0a 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62	me.nil.t)))).....(with-current-b
34380	75 66 66 65 72 20 63 6f 75 6e 73 65 6c 2d 69 62 75 66 66 65 72 2d 2d 62 75 66 66 65 72 2d 6e 61	uffer.counsel-ibuffer--buffer-na
343a0	6d 65 0a 20 20 20 20 20 20 28 77 68 65 6e 20 6f 6c 64 62 75 66 0a 20 20 20 20 20 20 20 20 3b 3b	me.......(when.oldbuf.........;;
343c0	20 46 6f 72 63 69 62 6c 79 20 75 70 64 61 74 65 20 70 6f 73 73 69 62 6c 79 20 73 74 61 6c 65 20	.Forcibly.update.possibly.stale.
343e0	65 78 69 73 74 69 6e 67 20 62 75 66 66 65 72 2e 0a 20 20 20 20 20 20 20 20 28 69 62 75 66 66 65	existing.buffer..........(ibuffe
34400	72 2d 75 70 64 61 74 65 20 6e 69 6c 20 74 29 29 0a 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61	r-update.nil.t)).......(goto-cha
34420	72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 69 62 75 66	r.(point-min)).......(let.((ibuf
34440	66 65 72 2d 6d 6f 76 65 6d 65 6e 74 2d 63 79 63 6c 65 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20	fer-movement-cycle.nil).........
34460	20 20 20 20 65 6e 74 72 69 65 73 29 0a 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 6e 6f 74	....entries).........(while.(not
34480	20 28 65 6f 62 70 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 69 62 75 66 66 65 72 2d 66 6f 72 77	.(eobp))...........(ibuffer-forw
344a0	61 72 64 2d 6c 69 6e 65 20 31 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 62	ard-line.1.t)...........(let.((b
344c0	75 66 20 28 69 62 75 66 66 65 72 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 0a 20 20	uf.(ibuffer-current-buffer)))...
344e0	20 20 20 20 20 20 20 20 20 20 3b 3b 20 57 65 20 61 72 65 20 6f 6e 6c 79 20 69 6e 74 65 72 65 73	..........;;.We.are.only.interes
34500	74 65 64 20 69 6e 20 62 75 66 66 65 72 73 20 77 65 20 63 61 6e 20 61 63 74 75 61 6c 6c 79 20 76	ted.in.buffers.we.can.actually.v
34520	69 73 69 74 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 54 68 69 73 20 66 69 6c 74 65 72	isit..............;;.This.filter
34540	73 20 6f 75 74 20 68 65 61 64 69 6e 67 73 20 61 6e 64 20 6f 74 68 65 72 20 75 6e 75 73 61 62 6c	s.out.headings.and.other.unusabl
34560	65 20 65 6e 74 72 69 65 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 62 75	e.entries..............(when.(bu
34580	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 28	ffer-live-p.buf)...............(
345a0	70 75 73 68 20 28 63 6f 6e 73 20 28 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d	push.(cons.(buffer-substring-no-
345c0	70 72 6f 70 65 72 74 69 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	properties......................
345e0	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 29 0a	......(line-beginning-position).
34600	20 20 20 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 69 6e 65	...........................(line
34620	2d 65 6e 64 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	-end-position)).................
34640	20 20 20 20 20 20 20 20 20 20 62 75 66 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	..........buf)..................
34660	20 20 20 65 6e 74 72 69 65 73 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 6e 72 65 76 65 72 73 65	...entries)))).........(nreverse
34680	20 65 6e 74 72 69 65 73 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 69 62	.entries)))))..(defun.counsel-ib
346a0	75 66 66 65 72 2d 76 69 73 69 74 2d 62 75 66 66 65 72 20 28 78 29 0a 20 20 22 53 77 69 74 63 68	uffer-visit-buffer.(x)..."Switch
346c0	20 74 6f 20 62 75 66 66 65 72 20 6f 66 20 63 61 6e 64 69 64 61 74 65 20 58 2e 22 0a 20 20 28 73	.to.buffer.of.candidate.X."...(s
346e0	77 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 20 28 6f 72 20 28 63 64 72 2d 73 61 66 65 20 78 29	witch-to-buffer.(or.(cdr-safe.x)
34700	20 78 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 69 62 75 66 66 65 72 2d 76 69	.x)))..(defun.counsel-ibuffer-vi
34720	73 69 74 2d 62 75 66 66 65 72 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 20 28 78 29 0a 20 20 22 53	sit-buffer-other-window.(x)..."S
34740	77 69 74 63 68 20 74 6f 20 62 75 66 66 65 72 20 6f 66 20 63 61 6e 64 69 64 61 74 65 20 58 20 69	witch.to.buffer.of.candidate.X.i
34760	6e 20 61 6e 6f 74 68 65 72 20 77 69 6e 64 6f 77 2e 22 0a 20 20 28 73 77 69 74 63 68 2d 74 6f 2d	n.another.window."...(switch-to-
34780	62 75 66 66 65 72 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 20 28 6f 72 20 28 63 64 72 2d 73 61 66	buffer-other-window.(or.(cdr-saf
347a0	65 20 78 29 20 78 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 69 62 75 66 66 65	e.x).x)))..(defun.counsel-ibuffe
347c0	72 2d 76 69 73 69 74 2d 69 62 75 66 66 65 72 20 28 5f 29 0a 20 20 22 53 77 69 74 63 68 20 74 6f	r-visit-ibuffer.(_)..."Switch.to
347e0	20 49 62 75 66 66 65 72 20 62 75 66 66 65 72 2e 22 0a 20 20 28 73 77 69 74 63 68 2d 74 6f 2d 62	.Ibuffer.buffer."...(switch-to-b
34800	75 66 66 65 72 20 63 6f 75 6e 73 65 6c 2d 69 62 75 66 66 65 72 2d 2d 62 75 66 66 65 72 2d 6e 61	uffer.counsel-ibuffer--buffer-na
34820	6d 65 29 29 0a 0a 28 69 76 79 2d 73 65 74 2d 61 63 74 69 6f 6e 73 0a 20 27 63 6f 75 6e 73 65 6c	me))..(ivy-set-actions..'counsel
34840	2d 69 62 75 66 66 65 72 0a 20 27 28 28 22 6a 22 20 63 6f 75 6e 73 65 6c 2d 69 62 75 66 66 65 72	-ibuffer..'(("j".counsel-ibuffer
34860	2d 76 69 73 69 74 2d 62 75 66 66 65 72 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 20 22 6f 74 68 65	-visit-buffer-other-window."othe
34880	72 20 77 69 6e 64 6f 77 22 29 0a 20 20 20 28 22 76 22 20 63 6f 75 6e 73 65 6c 2d 69 62 75 66 66	r.window")....("v".counsel-ibuff
348a0	65 72 2d 76 69 73 69 74 2d 69 62 75 66 66 65 72 20 22 73 77 69 74 63 68 20 74 6f 20 49 62 75 66	er-visit-ibuffer."switch.to.Ibuf
348c0	66 65 72 22 29 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 73 77 69 74 63 68 2d 74 6f	fer")))..;;;;.`counsel-switch-to
348e0	2d 73 68 65 6c 6c 2d 62 75 66 66 65 72 27 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d	-shell-buffer'..(defun.counsel--
34900	62 75 66 66 65 72 73 2d 77 69 74 68 2d 6d 6f 64 65 20 28 6d 6f 64 65 29 0a 20 20 22 52 65 74 75	buffers-with-mode.(mode)..."Retu
34920	72 6e 20 6e 61 6d 65 73 20 6f 66 20 62 75 66 66 65 72 73 20 77 69 74 68 20 4d 4f 44 45 20 61 73	rn.names.of.buffers.with.MODE.as
34940	20 74 68 65 69 72 20 60 6d 61 6a 6f 72 2d 6d 6f 64 65 27 2e 22 0a 20 20 28 6c 65 74 20 28 62 75	.their.`major-mode'."...(let.(bu
34960	66 73 29 0a 20 20 20 20 28 64 6f 6c 69 73 74 20 28 62 75 66 20 28 62 75 66 66 65 72 2d 6c 69 73	fs).....(dolist.(buf.(buffer-lis
34980	74 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 65 71 20 28 62 75 66 66 65 72 2d 6c 6f 63 61	t)).......(when.(eq.(buffer-loca
349a0	6c 2d 76 61 6c 75 65 20 27 6d 61 6a 6f 72 2d 6d 6f 64 65 20 62 75 66 29 20 6d 6f 64 65 29 0a 20	l-value.'major-mode.buf).mode)..
349c0	20 20 20 20 20 20 20 28 70 75 73 68 20 28 62 75 66 66 65 72 2d 6e 61 6d 65 20 62 75 66 29 20 62	.......(push.(buffer-name.buf).b
349e0	75 66 73 29 29 29 0a 20 20 20 20 28 6e 72 65 76 65 72 73 65 20 62 75 66 73 29 29 29 0a 0a 28 64	ufs))).....(nreverse.bufs)))..(d
34a00	65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 73 68 65 6c 6c 2d 6d 6f 64 65 20 22 73 68 65 6c	eclare-function.shell-mode."shel
34a20	6c 22 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73	l")..;;;###autoload.(defun.couns
34a40	65 6c 2d 73 77 69 74 63 68 2d 74 6f 2d 73 68 65 6c 6c 2d 62 75 66 66 65 72 20 28 29 0a 20 20 22	el-switch-to-shell-buffer.()..."
34a60	53 77 69 74 63 68 20 74 6f 20 61 20 73 68 65 6c 6c 20 62 75 66 66 65 72 2c 20 6f 72 20 63 72 65	Switch.to.a.shell.buffer,.or.cre
34a80	61 74 65 20 6f 6e 65 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 69 76 79	ate.one."...(interactive)...(ivy
34aa0	2d 72 65 61 64 20 22 53 68 65 6c 6c 20 62 75 66 66 65 72 3a 20 22 20 28 63 6f 75 6e 73 65 6c 2d	-read."Shell.buffer:.".(counsel-
34ac0	2d 62 75 66 66 65 72 73 2d 77 69 74 68 2d 6d 6f 64 65 20 23 27 73 68 65 6c 6c 2d 6d 6f 64 65 29	-buffers-with-mode.#'shell-mode)
34ae0	0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 2d	.............:action.#'counsel--
34b00	73 77 69 74 63 68 2d 74 6f 2d 73 68 65 6c 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c	switch-to-shell.............:cal
34b20	6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 73 77 69 74 63 68 2d 74 6f 2d 73 68 65 6c 6c 2d 62 75 66	ler.'counsel-switch-to-shell-buf
34b40	66 65 72 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 73 77 69 74 63 68 2d 74 6f	fer))..(defun.counsel--switch-to
34b60	2d 73 68 65 6c 6c 20 28 6e 61 6d 65 29 0a 20 20 22 44 69 73 70 6c 61 79 20 73 68 65 6c 6c 20 62	-shell.(name)..."Display.shell.b
34b80	75 66 66 65 72 20 77 69 74 68 20 4e 41 4d 45 20 61 6e 64 20 73 65 6c 65 63 74 20 69 74 73 20 77	uffer.with.NAME.and.select.its.w
34ba0	69 6e 64 6f 77 2e 0a 52 65 75 73 65 20 61 6e 79 20 65 78 69 73 74 69 6e 67 20 77 69 6e 64 6f 77	indow..Reuse.any.existing.window
34bc0	20 61 6c 72 65 61 64 79 20 64 69 73 70 6c 61 79 69 6e 67 20 74 68 65 20 6e 61 6d 65 64 20 62 75	.already.displaying.the.named.bu
34be0	66 66 65 72 2e 0a 49 66 20 74 68 65 72 65 20 69 73 20 6e 6f 20 73 75 63 68 20 62 75 66 66 65 72	ffer..If.there.is.no.such.buffer
34c00	2c 20 73 74 61 72 74 20 61 20 6e 65 77 20 60 73 68 65 6c 6c 27 20 77 69 74 68 20 4e 41 4d 45 2e	,.start.a.new.`shell'.with.NAME.
34c20	22 0a 20 20 28 69 66 20 28 67 65 74 2d 62 75 66 66 65 72 20 6e 61 6d 65 29 0a 20 20 20 20 20 20	"...(if.(get-buffer.name).......
34c40	28 70 6f 70 2d 74 6f 2d 62 75 66 66 65 72 20 6e 61 6d 65 20 27 28 28 64 69 73 70 6c 61 79 2d 62	(pop-to-buffer.name.'((display-b
34c60	75 66 66 65 72 2d 72 65 75 73 65 2d 77 69 6e 64 6f 77 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	uffer-reuse-window..............
34c80	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 73 70 6c 61 79 2d 62 75 66 66 65 72 2d 73	................display-buffer-s
34ca0	61 6d 65 2d 77 69 6e 64 6f 77 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ame-window).....................
34cc0	20 20 20 20 20 20 20 20 28 69 6e 68 69 62 69 74 2d 73 61 6d 65 2d 77 69 6e 64 6f 77 20 2e 20 6e	........(inhibit-same-window...n
34ce0	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 20 20 20 20 20 20	il).............................
34d00	28 72 65 75 73 61 62 6c 65 2d 66 72 61 6d 65 73 20 2e 20 76 69 73 69 62 6c 65 29 29 29 0a 20 20	(reusable-frames...visible)))...
34d20	20 20 28 73 68 65 6c 6c 20 6e 61 6d 65 29 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d	..(shell.name)))..;;;;.`counsel-
34d40	75 6e 69 63 6f 64 65 2d 63 68 61 72 27 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 75	unicode-char'..(defvar.counsel-u
34d60	6e 69 63 6f 64 65 2d 63 68 61 72 2d 68 69 73 74 6f 72 79 20 6e 69 6c 0a 20 20 22 48 69 73 74 6f	nicode-char-history.nil..."Histo
34d80	72 79 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 75 6e 69 63 6f 64 65 2d 63 68 61 72 27 2e 22 29	ry.for.`counsel-unicode-char'.")
34da0	0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 75 6e 69 63 6f 64 65 2d 6e 61 6d 65 73 20	..(defun.counsel--unicode-names.
34dc0	28 29 0a 20 20 22 52 65 74 75 72 6e 20 66 6f 72 6d 61 74 74 65 64 20 61 6e 64 20 73 6f 72 74 65	()..."Return.formatted.and.sorte
34de0	64 20 6c 69 73 74 20 6f 66 20 60 75 63 73 2d 6e 61 6d 65 73 27 2e 0a 54 68 65 20 72 65 73 75 6c	d.list.of.`ucs-names'..The.resul
34e00	74 20 6f 66 20 60 75 63 73 2d 6e 61 6d 65 73 27 20 69 73 20 6d 6f 73 74 6c 79 2c 20 62 75 74 20	t.of.`ucs-names'.is.mostly,.but.
34e20	6e 6f 74 20 63 6f 6d 70 6c 65 74 65 6c 79 2c 20 73 6f 72 74 65 64 2c 0a 73 6f 20 74 68 69 73 20	not.completely,.sorted,.so.this.
34e40	66 75 6e 63 74 69 6f 6e 20 65 6e 73 75 72 65 73 20 6c 65 78 69 63 6f 67 72 61 70 68 69 63 20 6f	function.ensures.lexicographic.o
34e60	72 64 65 72 2e 22 0a 20 20 28 6c 65 74 2a 20 28 63 61 6e 64 73 0a 20 20 20 20 20 20 20 20 20 28	rder."...(let*.(cands..........(
34e80	74 61 62 6c 65 20 28 75 63 73 2d 6e 61 6d 65 73 29 29 20 20 20 20 20 20 20 20 20 20 20 20 3b 20	table.(ucs-names))............;.
34ea0	45 69 74 68 65 72 20 68 61 73 68 20 6d 61 70 20 6f 72 20 61 6c 69 73 74 0a 20 20 20 20 20 20 20	Either.hash.map.or.alist........
34ec0	20 20 28 66 6d 74 20 28 6c 61 6d 62 64 61 20 28 6e 61 6d 65 20 63 6f 64 65 29 20 20 20 20 20 20	..(fmt.(lambda.(name.code)......
34ee0	20 3b 20 43 6f 6d 6d 6f 6e 20 66 6f 72 6d 61 74 20 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20	.;.Common.format.function.......
34f00	20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 63 61 6e 64 20 28 66 6f 72 6d 61 74 20 22 25	..........(let.((cand.(format."%
34f20	30 36 58 20 25 2d 35 38 73 20 25 63 22 20 63 6f 64 65 20 6e 61 6d 65 20 63 6f 64 65 29 29 29 0a	06X.%-58s.%c".code.name.code))).
34f40	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 74 2d 74 65 78 74 2d 70 72 6f 70	..................(put-text-prop
34f60	65 72 74 79 20 30 20 31 20 27 63 6f 64 65 20 63 6f 64 65 20 63 61 6e 64 29 0a 20 20 20 20 20 20	erty.0.1.'code.code.cand).......
34f80	20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 63 61 6e 64 20 63 61 6e 64 73 29 29 29 29	............(push.cand.cands))))
34fa0	29 0a 20 20 20 20 28 69 66 20 28 6e 6f 74 20 28 68 61 73 68 2d 74 61 62 6c 65 2d 70 20 74 61 62	).....(if.(not.(hash-table-p.tab
34fc0	6c 65 29 29 0a 20 20 20 20 20 20 20 20 3b 3b 20 53 75 70 70 6f 72 74 20 60 75 63 73 2d 6e 61 6d	le)).........;;.Support.`ucs-nam
34fe0	65 73 27 20 72 65 74 75 72 6e 69 6e 67 20 61 6e 20 61 6c 69 73 74 20 69 6e 20 45 6d 61 63 73 20	es'.returning.an.alist.in.Emacs.
35000	3c 20 32 36 2e 0a 20 20 20 20 20 20 20 20 3b 3b 20 54 68 65 20 72 65 73 75 6c 74 20 6f 66 20 60	<.26..........;;.The.result.of.`
35020	75 63 73 2d 6e 61 6d 65 73 27 20 63 6f 6d 65 73 20 70 72 65 2d 72 65 76 65 72 73 65 64 20 73 6f	ucs-names'.comes.pre-reversed.so
35040	20 6e 6f 20 6e 65 65 64 20 74 6f 20 72 65 70 65 61 74 2e 0a 20 20 20 20 20 20 20 20 28 64 6f 6c	.no.need.to.repeat..........(dol
35060	69 73 74 20 28 65 6e 74 72 79 20 74 61 62 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 75 6e	ist.(entry.table)...........(fun
35080	63 61 6c 6c 20 66 6d 74 20 28 63 61 72 20 65 6e 74 72 79 29 20 28 63 64 72 20 65 6e 74 72 79 29	call.fmt.(car.entry).(cdr.entry)
350a0	29 29 0a 20 20 20 20 20 20 28 6d 61 70 68 61 73 68 20 66 6d 74 20 74 61 62 6c 65 29 0a 20 20 20	)).......(maphash.fmt.table)....
350c0	20 20 20 3b 3b 20 52 65 76 65 72 73 65 20 74 6f 20 73 70 65 65 64 20 75 70 20 73 6f 72 74 69 6e	...;;.Reverse.to.speed.up.sortin
350e0	67 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6e 64 73 20 28 6e 72 65 76 65 72 73 65 20 63 61	g.......(setq.cands.(nreverse.ca
35100	6e 64 73 29 29 29 0a 20 20 20 20 28 73 6f 72 74 20 63 61 6e 64 73 20 23 27 73 74 72 69 6e 67 2d	nds))).....(sort.cands.#'string-
35120	6c 65 73 73 70 29 29 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 2d 75 6e 69 63 6f	lessp)))..(defvar.counsel--unico
35140	64 65 2d 74 61 62 6c 65 0a 20 20 28 6c 61 7a 79 2d 63 6f 6d 70 6c 65 74 69 6f 6e 2d 74 61 62 6c	de-table...(lazy-completion-tabl
35160	65 20 63 6f 75 6e 73 65 6c 2d 2d 75 6e 69 63 6f 64 65 2d 74 61 62 6c 65 20 63 6f 75 6e 73 65 6c	e.counsel--unicode-table.counsel
35180	2d 2d 75 6e 69 63 6f 64 65 2d 6e 61 6d 65 73 29 0a 20 20 22 4c 61 7a 79 20 63 6f 6d 70 6c 65 74	--unicode-names)..."Lazy.complet
351a0	69 6f 6e 20 74 61 62 6c 65 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 75 6e 69 63 6f 64 65 2d 63	ion.table.for.`counsel-unicode-c
351c0	68 61 72 27 2e 0a 43 61 6e 64 69 64 61 74 65 73 20 63 6f 6d 70 72 69 73 65 20 60 63 6f 75 6e 73	har'..Candidates.comprise.`couns
351e0	65 6c 2d 2d 75 6e 69 63 6f 64 65 2d 6e 61 6d 65 73 27 2c 20 77 68 69 63 68 20 73 65 65 2e 22 29	el--unicode-names',.which.see.")
35200	0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d	..;;;###autoload.(defun.counsel-
35220	75 6e 69 63 6f 64 65 2d 63 68 61 72 20 28 26 6f 70 74 69 6f 6e 61 6c 20 63 6f 75 6e 74 29 0a 20	unicode-char.(&optional.count)..
35240	20 22 49 6e 73 65 72 74 20 43 4f 55 4e 54 20 63 6f 70 69 65 73 20 6f 66 20 61 20 55 6e 69 63 6f	."Insert.COUNT.copies.of.a.Unico
35260	64 65 20 63 68 61 72 61 63 74 65 72 20 61 74 20 70 6f 69 6e 74 2e 0a 43 4f 55 4e 54 20 64 65 66	de.character.at.point..COUNT.def
35280	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 20 22 70 22 29	aults.to.1."...(interactive."p")
352a0	0a 20 20 28 73 65 74 71 20 69 76 79 2d 63 6f 6d 70 6c 65 74 69 6f 6e 2d 62 65 67 20 28 70 6f 69	...(setq.ivy-completion-beg.(poi
352c0	6e 74 29 29 0a 20 20 28 73 65 74 71 20 69 76 79 2d 63 6f 6d 70 6c 65 74 69 6f 6e 2d 65 6e 64 20	nt))...(setq.ivy-completion-end.
352e0	28 70 6f 69 6e 74 29 29 0a 20 20 28 69 76 79 2d 72 65 61 64 20 22 55 6e 69 63 6f 64 65 20 6e 61	(point))...(ivy-read."Unicode.na
35300	6d 65 3a 20 22 20 63 6f 75 6e 73 65 6c 2d 2d 75 6e 69 63 6f 64 65 2d 74 61 62 6c 65 0a 20 20 20	me:.".counsel--unicode-table....
35320	20 20 20 20 20 20 20 20 20 3a 68 69 73 74 6f 72 79 20 27 63 6f 75 6e 73 65 6c 2d 75 6e 69 63 6f	.........:history.'counsel-unico
35340	64 65 2d 63 68 61 72 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74	de-char-history.............:act
35360	69 6f 6e 20 28 6c 61 6d 62 64 61 20 28 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	ion.(lambda.(name)..............
35380	20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 69 76 79 2d 77 69 6e 64 6f 77 0a 20 20 20 20 20 20	.........(with-ivy-window.......
353a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 72 65 67 69 6f 6e	..................(delete-region
353c0	20 69 76 79 2d 63 6f 6d 70 6c 65 74 69 6f 6e 2d 62 65 67 20 69 76 79 2d 63 6f 6d 70 6c 65 74 69	.ivy-completion-beg.ivy-completi
353e0	6f 6e 2d 65 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	on-end).........................
35400	28 73 65 74 71 20 69 76 79 2d 63 6f 6d 70 6c 65 74 69 6f 6e 2d 62 65 67 20 28 70 6f 69 6e 74 29	(setq.ivy-completion-beg.(point)
35420	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 69 6e 73 65 72	).........................(inser
35440	74 2d 63 68 61 72 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 27 63 6f 64	t-char.(get-text-property.0.'cod
35460	65 20 6e 61 6d 65 29 20 63 6f 75 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	e.name).count)..................
35480	20 20 20 20 20 20 20 28 73 65 74 71 20 69 76 79 2d 63 6f 6d 70 6c 65 74 69 6f 6e 2d 65 6e 64 20	.......(setq.ivy-completion-end.
354a0	28 70 6f 69 6e 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27	(point)))).............:caller.'
354c0	63 6f 75 6e 73 65 6c 2d 75 6e 69 63 6f 64 65 2d 63 68 61 72 29 29 0a 0a 28 69 76 79 2d 63 6f 6e	counsel-unicode-char))..(ivy-con
354e0	66 69 67 75 72 65 20 27 63 6f 75 6e 73 65 6c 2d 75 6e 69 63 6f 64 65 2d 63 68 61 72 0a 20 20 3a	figure.'counsel-unicode-char...:
35500	73 6f 72 74 2d 66 6e 20 23 27 69 76 79 2d 73 74 72 69 6e 67 3c 29 0a 0a 28 64 65 66 75 6e 20 63	sort-fn.#'ivy-string<)..(defun.c
35520	6f 75 6e 73 65 6c 2d 75 6e 69 63 6f 64 65 2d 63 6f 70 79 20 28 6e 61 6d 65 29 0a 20 20 22 49 76	ounsel-unicode-copy.(name)..."Iv
35540	79 20 61 63 74 69 6f 6e 20 74 6f 20 63 6f 70 79 20 74 68 65 20 75 6e 69 63 6f 64 65 20 66 72 6f	y.action.to.copy.the.unicode.fro
35560	6d 20 4e 41 4d 45 20 74 6f 20 74 68 65 20 6b 69 6c 6c 20 72 69 6e 67 2e 22 0a 20 20 28 6b 69 6c	m.NAME.to.the.kill.ring."...(kil
35580	6c 2d 6e 65 77 20 28 63 68 61 72 2d 74 6f 2d 73 74 72 69 6e 67 20 28 67 65 74 2d 74 65 78 74 2d	l-new.(char-to-string.(get-text-
355a0	70 72 6f 70 65 72 74 79 20 30 20 27 63 6f 64 65 20 6e 61 6d 65 29 29 29 29 0a 0a 28 69 76 79 2d	property.0.'code.name))))..(ivy-
355c0	73 65 74 2d 61 63 74 69 6f 6e 73 0a 20 27 63 6f 75 6e 73 65 6c 2d 75 6e 69 63 6f 64 65 2d 63 68	set-actions..'counsel-unicode-ch
355e0	61 72 0a 20 27 28 28 22 77 22 20 63 6f 75 6e 73 65 6c 2d 75 6e 69 63 6f 64 65 2d 63 6f 70 79 20	ar..'(("w".counsel-unicode-copy.
35600	22 63 6f 70 79 22 29 29 29 0a 0a 3b 3b 3b 3b 20 43 6f 6c 6f 72 73 0a 0a 28 64 65 66 75 6e 20 63	"copy")))..;;;;.Colors..(defun.c
35620	6f 75 6e 73 65 6c 2d 63 6f 6c 6f 72 73 2d 61 63 74 69 6f 6e 2d 69 6e 73 65 72 74 2d 68 65 78 20	ounsel-colors-action-insert-hex.
35640	28 63 6f 6c 6f 72 29 0a 20 20 22 49 6e 73 65 72 74 20 74 68 65 20 68 65 78 61 64 65 63 69 6d 61	(color)..."Insert.the.hexadecima
35660	6c 20 52 47 42 20 76 61 6c 75 65 20 6f 66 20 43 4f 4c 4f 52 2e 22 0a 20 20 28 69 6e 73 65 72 74	l.RGB.value.of.COLOR."...(insert
35680	20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 27 68 65 78 20 63 6f 6c 6f 72	.(get-text-property.0.'hex.color
356a0	29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 63 6f 6c 6f 72 73 2d 61 63 74 69 6f	)))..(defun.counsel-colors-actio
356c0	6e 2d 6b 69 6c 6c 2d 68 65 78 20 28 63 6f 6c 6f 72 29 0a 20 20 22 4b 69 6c 6c 20 74 68 65 20 68	n-kill-hex.(color)..."Kill.the.h
356e0	65 78 61 64 65 63 69 6d 61 6c 20 52 47 42 20 76 61 6c 75 65 20 6f 66 20 43 4f 4c 4f 52 2e 22 0a	exadecimal.RGB.value.of.COLOR.".
35700	20 20 28 6b 69 6c 6c 2d 6e 65 77 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30	..(kill-new.(get-text-property.0
35720	20 27 68 65 78 20 63 6f 6c 6f 72 29 29 29 0a 0a 3b 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 63	.'hex.color)))..;;;;;.`counsel-c
35740	6f 6c 6f 72 73 2d 65 6d 61 63 73 27 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 63 6f	olors-emacs'..(defvar.counsel-co
35760	6c 6f 72 73 2d 65 6d 61 63 73 2d 68 69 73 74 6f 72 79 20 28 29 0a 20 20 22 48 69 73 74 6f 72 79	lors-emacs-history.()..."History
35780	20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 63 6f 6c 6f 72 73 2d 65 6d 61 63 73 27 2e 22 29 0a 0a	.for.`counsel-colors-emacs'.")..
357a0	28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 63 6f 6c 6f 72 73 2d 2d 6e 61 6d 65 2d 74 6f 2d 68	(defun.counsel-colors--name-to-h
357c0	65 78 20 28 6e 61 6d 65 29 0a 20 20 22 52 65 74 75 72 6e 20 68 65 78 61 64 65 63 69 6d 61 6c 20	ex.(name)..."Return.hexadecimal.
357e0	52 47 42 20 76 61 6c 75 65 20 6f 66 20 63 6f 6c 6f 72 20 77 69 74 68 20 4e 41 4d 45 2e 0a 0a 52	RGB.value.of.color.with.NAME...R
35800	65 74 75 72 6e 20 6e 69 6c 20 69 66 20 4e 41 4d 45 20 64 6f 65 73 20 6e 6f 74 20 64 65 73 69 67	eturn.nil.if.NAME.does.not.desig
35820	6e 61 74 65 20 61 20 76 61 6c 69 64 20 63 6f 6c 6f 72 2e 22 0a 20 20 28 6c 65 74 20 28 28 72 67	nate.a.valid.color."...(let.((rg
35840	62 20 28 63 6f 6c 6f 72 2d 6e 61 6d 65 2d 74 6f 2d 72 67 62 20 6e 61 6d 65 29 29 29 0a 20 20 20	b.(color-name-to-rgb.name)))....
35860	20 28 77 68 65 6e 20 72 67 62 0a 20 20 20 20 20 20 28 61 70 70 6c 79 20 23 27 63 6f 6c 6f 72 2d	.(when.rgb.......(apply.#'color-
35880	72 67 62 2d 74 6f 2d 68 65 78 20 72 67 62 29 29 29 29 0a 0a 28 64 65 66 76 61 72 20 73 68 72 2d	rgb-to-hex.rgb))))..(defvar.shr-
358a0	63 6f 6c 6f 72 2d 76 69 73 69 62 6c 65 2d 6c 75 6d 69 6e 61 6e 63 65 2d 6d 69 6e 29 0a 28 64 65	color-visible-luminance-min).(de
358c0	63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 73 68 72 2d 63 6f 6c 6f 72 2d 76 69 73 69 62 6c 65	clare-function.shr-color-visible
358e0	20 22 73 68 72 2d 63 6f 6c 6f 72 22 29 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 2d 63	."shr-color").(defvar.counsel--c
35900	6f 6c 6f 72 73 2d 66 6f 72 6d 61 74 20 22 25 2d 32 30 73 20 25 73 20 25 73 25 73 22 29 0a 0a 28	olors-format."%-20s.%s.%s%s")..(
35920	64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 63 6f 6c 6f 72 73 2d 65 6d 61 63 73 2d 66 6f 72 6d	defun.counsel--colors-emacs-form
35940	61 74 2d 66 75 6e 63 74 69 6f 6e 20 28 63 6f 6c 6f 72 73 29 0a 20 20 22 46 6f 72 6d 61 74 20 66	at-function.(colors)..."Format.f
35960	75 6e 63 74 69 6f 6e 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 63 6f 6c 6f 72 73 2d 65 6d 61 63	unction.for.`counsel-colors-emac
35980	73 27 2e 22 0a 20 20 28 72 65 71 75 69 72 65 20 27 73 68 72 2d 63 6f 6c 6f 72 29 0a 20 20 28 6c	s'."...(require.'shr-color)...(l
359a0	65 74 2a 20 28 28 62 6c 61 6e 6b 20 28 6d 61 6b 65 2d 73 74 72 69 6e 67 20 31 30 20 3f 5c 73 29	et*.((blank.(make-string.10.?\s)
359c0	29 0a 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 74 65 72 0a 20 20 20 20 20 20 20 20 20 20	)..........(formatter...........
359e0	28 6c 61 6d 62 64 61 20 28 63 6f 6c 6f 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74	(lambda.(color).............(let
35a00	20 28 28 66 67 20 28 6c 69 73 74 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 63 6f 6c 6f 72 29 29 29	.((fg.(list.:foreground.color)))
35a20	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 63 6f 75 6e 73 65 6c 2d 2d	...............(format.counsel--
35a40	63 6f 6c 6f 72 73 2d 66 6f 72 6d 61 74 20 63 6f 6c 6f 72 0a 20 20 20 20 20 20 20 20 20 20 20 20	colors-format.color.............
35a60	20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28 67 65 74 2d 74 65 78 74 2d	..........(propertize.(get-text-
35a80	70 72 6f 70 65 72 74 79 20 30 20 27 68 65 78 20 63 6f 6c 6f 72 29 20 27 66 61 63 65 20 66 67 29	property.0.'hex.color).'face.fg)
35aa0	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
35ac0	7a 65 20 62 6c 61 6e 6b 20 27 66 61 63 65 20 28 6c 69 73 74 20 3a 62 61 63 6b 67 72 6f 75 6e 64	ze.blank.'face.(list.:background
35ae0	20 63 6f 6c 6f 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 28	.color)).......................(
35b00	70 72 6f 70 65 72 74 69 7a 65 20 28 6d 61 70 63 6f 6e 63 61 74 20 28 6c 61 6d 62 64 61 20 28 64	propertize.(mapconcat.(lambda.(d
35b20	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 20 20 20 20 20 20 20	up).............................
35b40	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 22 20 22 20 64	...................(concat.".".d
35b60	75 70 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	up))............................
35b80	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70	..................(get-text-prop
35ba0	65 72 74 79 20 30 20 27 64 75 70 73 20 63 6f 6c 6f 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	erty.0.'dups.color).............
35bc0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
35be0	20 22 2c 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 20 20	.",")...........................
35c00	20 20 20 20 20 20 20 20 27 66 61 63 65 20 66 67 29 29 29 29 29 29 0a 20 20 20 20 28 69 76 79 2d	........'face.fg)))))).....(ivy-
35c20	2d 66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 2d 67 65 6e 65 72 69 63 0a 20 20 20 20 20 28 6c	-format-function-generic......(l
35c40	61 6d 62 64 61 20 28 63 6f 6c 6f 72 29 0a 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 68 65 78	ambda.(color)........(let*.((hex
35c60	20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 27 68 65 78 20 63 6f 6c 6f 72	.(get-text-property.0.'hex.color
35c80	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 68 72 2d 63 6f 6c 6f 72 2d 76 69 73 69	))...............(shr-color-visi
35ca0	62 6c 65 2d 6c 75 6d 69 6e 61 6e 63 65 2d 6d 69 6e 20 31 30 30 29 0a 20 20 20 20 20 20 20 20 20	ble-luminance-min.100)..........
35cc0	20 20 20 20 20 28 66 67 20 28 63 61 64 72 20 28 73 68 72 2d 63 6f 6c 6f 72 2d 76 69 73 69 62 6c	.....(fg.(cadr.(shr-color-visibl
35ce0	65 20 68 65 78 20 22 62 6c 61 63 6b 22 20 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 70 72	e.hex."black".t))))..........(pr
35d00	6f 70 65 72 74 69 7a 65 20 28 66 75 6e 63 61 6c 6c 20 66 6f 72 6d 61 74 74 65 72 20 63 6f 6c 6f	opertize.(funcall.formatter.colo
35d20	72 29 0a 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 28 6c	r)......................'face.(l
35d40	69 73 74 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 66 67 20 3a 62 61 63 6b 67 72 6f 75 6e 64 20 68	ist.:foreground.fg.:background.h
35d60	65 78 29 29 29 29 0a 20 20 20 20 20 66 6f 72 6d 61 74 74 65 72 20 63 6f 6c 6f 72 73 20 22 5c 6e	ex))))......formatter.colors."\n
35d80	22 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 63 6f 6c 6f 72 73 2d 77 65 62	")))..(defun.counsel--colors-web
35da0	2d 66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 20 28 63 6f 6c 6f 72 73 29 0a 20 20 22 46 6f 72	-format-function.(colors)..."For
35dc0	6d 61 74 20 66 75 6e 63 74 69 6f 6e 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 63 6f 6c 6f 72 73	mat.function.for.`counsel-colors
35de0	2d 77 65 62 27 2e 22 0a 20 20 28 72 65 71 75 69 72 65 20 27 73 68 72 2d 63 6f 6c 6f 72 29 0a 20	-web'."...(require.'shr-color)..
35e00	20 28 6c 65 74 2a 20 28 28 62 6c 61 6e 6b 20 28 6d 61 6b 65 2d 73 74 72 69 6e 67 20 31 30 20 3f	.(let*.((blank.(make-string.10.?
35e20	5c 73 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 74 65 72 20 28 6c 61 6d 62 64 61	\s))..........(formatter.(lambda
35e40	20 28 63 6f 6c 6f 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 28	.(color).......................(
35e60	6c 65 74 20 28 28 68 65 78 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 27	let.((hex.(get-text-property.0.'
35e80	68 65 78 20 63 6f 6c 6f 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	hex.color)))....................
35ea0	20 20 20 20 20 28 66 6f 72 6d 61 74 20 63 6f 75 6e 73 65 6c 2d 2d 63 6f 6c 6f 72 73 2d 66 6f 72	.....(format.counsel--colors-for
35ec0	6d 61 74 20 63 6f 6c 6f 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	mat.color.......................
35ee0	20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 68 65 78 20 27 66 61 63 65 20	..........(propertize.hex.'face.
35f00	28 6c 69 73 74 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 68 65 78 29 29 0a 20 20 20 20 20 20 20 20	(list.:foreground.hex)).........
35f20	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 70 72 6f 70 65 72 74	........................(propert
35f40	69 7a 65 20 62 6c 61 6e 6b 20 27 66 61 63 65 20 28 6c 69 73 74 20 3a 62 61 63 6b 67 72 6f 75 6e	ize.blank.'face.(list.:backgroun
35f60	64 20 68 65 78 29 29 29 29 29 29 29 0a 20 20 20 20 28 69 76 79 2d 2d 66 6f 72 6d 61 74 2d 66 75	d.hex))))))).....(ivy--format-fu
35f80	6e 63 74 69 6f 6e 2d 67 65 6e 65 72 69 63 0a 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 63 6f 6c	nction-generic......(lambda.(col
35fa0	6f 72 29 0a 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 68 65 78 20 28 67 65 74 2d 74 65 78 74	or)........(let*.((hex.(get-text
35fc0	2d 70 72 6f 70 65 72 74 79 20 30 20 27 68 65 78 20 63 6f 6c 6f 72 29 29 0a 20 20 20 20 20 20 20	-property.0.'hex.color))........
35fe0	20 20 20 20 20 20 20 28 73 68 72 2d 63 6f 6c 6f 72 2d 76 69 73 69 62 6c 65 2d 6c 75 6d 69 6e 61	.......(shr-color-visible-lumina
36000	6e 63 65 2d 6d 69 6e 20 31 30 30 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 67 20 28	nce-min.100)...............(fg.(
36020	63 61 64 72 20 28 73 68 72 2d 63 6f 6c 6f 72 2d 76 69 73 69 62 6c 65 20 68 65 78 20 22 62 6c 61	cadr.(shr-color-visible.hex."bla
36040	63 6b 22 20 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28	ck".t))))..........(propertize.(
36060	66 75 6e 63 61 6c 6c 20 66 6f 72 6d 61 74 74 65 72 20 63 6f 6c 6f 72 29 0a 20 20 20 20 20 20 20	funcall.formatter.color)........
36080	20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 28 6c 69 73 74 20 3a 66 6f 72 65 67	..............'face.(list.:foreg
360a0	72 6f 75 6e 64 20 66 67 20 3a 62 61 63 6b 67 72 6f 75 6e 64 20 68 65 78 29 29 29 29 0a 20 20 20	round.fg.:background.hex))))....
360c0	20 20 66 6f 72 6d 61 74 74 65 72 20 63 6f 6c 6f 72 73 20 22 5c 6e 22 29 29 29 0a 0a 3b 3b 20 4e	..formatter.colors."\n")))..;;.N
360e0	6f 20 6c 6f 6e 67 65 72 20 70 72 65 6c 6f 61 64 65 64 20 69 6e 20 45 6d 61 63 73 20 32 38 2e 0a	o.longer.preloaded.in.Emacs.28..
36100	28 61 75 74 6f 6c 6f 61 64 20 27 6c 69 73 74 2d 63 6f 6c 6f 72 73 2d 64 75 70 6c 69 63 61 74 65	(autoload.'list-colors-duplicate
36120	73 20 22 66 61 63 65 6d 65 6e 75 22 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64	s."facemenu")..;;;###autoload.(d
36140	65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 63 6f 6c 6f 72 73 2d 65 6d 61 63 73 20 28 29 0a 20 20 22	efun.counsel-colors-emacs.()..."
36160	53 68 6f 77 20 61 20 6c 69 73 74 20 6f 66 20 61 6c 6c 20 73 75 70 70 6f 72 74 65 64 20 63 6f 6c	Show.a.list.of.all.supported.col
36180	6f 72 73 20 66 6f 72 20 61 20 70 61 72 74 69 63 75 6c 61 72 20 66 72 61 6d 65 2e 0a 0a 59 6f 75	ors.for.a.particular.frame...You
361a0	20 63 61 6e 20 69 6e 73 65 72 74 20 6f 72 20 6b 69 6c 6c 20 74 68 65 20 6e 61 6d 65 20 6f 72 20	.can.insert.or.kill.the.name.or.
361c0	68 65 78 61 64 65 63 69 6d 61 6c 20 52 47 42 20 76 61 6c 75 65 20 6f 66 20 74 68 65 0a 73 65 6c	hexadecimal.RGB.value.of.the.sel
361e0	65 63 74 65 64 20 63 6f 6c 6f 72 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20	ected.color."...(interactive)...
36200	28 6c 65 74 2a 20 28 28 63 6f 6c 6f 72 73 0a 20 20 20 20 20 20 20 20 20 20 28 64 65 6c 65 74 65	(let*.((colors...........(delete
36220	20 6e 69 6c 0a 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 28	.nil...................(mapcar.(
36240	6c 61 6d 62 64 61 20 28 63 65 6c 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	lambda.(cell)...................
36260	20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 6e 61 6d 65 20 28 63 61 72 20 63 65 6c 6c	..........(let*.((name.(car.cell
36280	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 20	))..............................
362a0	20 20 20 20 20 20 28 64 75 70 73 20 28 63 64 72 20 63 65 6c 6c 29 29 0a 20 20 20 20 20 20 20 20	......(dups.(cdr.cell)).........
362c0	20 20 20 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 68 65 78 20	...........................(hex.
362e0	28 63 6f 75 6e 73 65 6c 2d 63 6f 6c 6f 72 73 2d 2d 6e 61 6d 65 2d 74 6f 2d 68 65 78 20 6e 61 6d	(counsel-colors--name-to-hex.nam
36300	65 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 20	e)))............................
36320	20 20 20 28 77 68 65 6e 20 68 65 78 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	...(when.hex....................
36340	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 6e 61 6d 65 20 27 68	.............(propertize.name.'h
36360	65 78 20 68 65 78 20 27 64 75 70 73 20 64 75 70 73 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20	ex.hex.'dups.dups))))...........
36380	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 2d 63 6f 6c 6f 72 73 2d 64 75 70	................(list-colors-dup
363a0	6c 69 63 61 74 65 73 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 63	licates))))..........(counsel--c
363c0	6f 6c 6f 72 73 2d 66 6f 72 6d 61 74 0a 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22	olors-format...........(format."
363e0	25 25 2d 25 64 73 20 25 25 73 20 25 25 73 25 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	%%-%ds.%%s.%%s%%s"..............
36400	20 20 20 20 20 28 61 70 70 6c 79 20 23 27 6d 61 78 20 30 20 28 6d 61 70 63 61 72 20 23 27 73 74	.....(apply.#'max.0.(mapcar.#'st
36420	72 69 6e 67 2d 77 69 64 74 68 20 63 6f 6c 6f 72 73 29 29 29 29 29 0a 20 20 20 20 28 69 76 79 2d	ring-width.colors))))).....(ivy-
36440	72 65 61 64 20 22 45 6d 61 63 73 20 63 6f 6c 6f 72 3a 20 22 20 63 6f 6c 6f 72 73 0a 20 20 20 20	read."Emacs.color:.".colors.....
36460	20 20 20 20 20 20 20 20 20 20 3a 72 65 71 75 69 72 65 2d 6d 61 74 63 68 20 74 0a 20 20 20 20 20	..........:require-match.t......
36480	20 20 20 20 20 20 20 20 20 3a 68 69 73 74 6f 72 79 20 27 63 6f 75 6e 73 65 6c 2d 63 6f 6c 6f 72	.........:history.'counsel-color
364a0	73 2d 65 6d 61 63 73 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61	s-emacs-history...............:a
364c0	63 74 69 6f 6e 20 23 27 69 6e 73 65 72 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61	ction.#'insert...............:ca
364e0	6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 63 6f 6c 6f 72 73 2d 65 6d 61 63 73 29 29 29 0a 28 69	ller.'counsel-colors-emacs))).(i
36500	76 79 2d 63 6f 6e 66 69 67 75 72 65 20 27 63 6f 75 6e 73 65 6c 2d 63 6f 6c 6f 72 73 2d 65 6d 61	vy-configure.'counsel-colors-ema
36520	63 73 0a 20 20 3a 66 6f 72 6d 61 74 2d 66 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 2d 63 6f 6c 6f 72	cs...:format-fn.#'counsel--color
36540	73 2d 65 6d 61 63 73 2d 66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 29 0a 0a 28 69 76 79 2d 73	s-emacs-format-function)..(ivy-s
36560	65 74 2d 61 63 74 69 6f 6e 73 0a 20 27 63 6f 75 6e 73 65 6c 2d 63 6f 6c 6f 72 73 2d 65 6d 61 63	et-actions..'counsel-colors-emac
36580	73 0a 20 27 28 28 22 68 22 20 63 6f 75 6e 73 65 6c 2d 63 6f 6c 6f 72 73 2d 61 63 74 69 6f 6e 2d	s..'(("h".counsel-colors-action-
365a0	69 6e 73 65 72 74 2d 68 65 78 20 22 69 6e 73 65 72 74 20 68 65 78 61 64 65 63 69 6d 61 6c 20 76	insert-hex."insert.hexadecimal.v
365c0	61 6c 75 65 22 29 0a 20 20 20 28 22 48 22 20 63 6f 75 6e 73 65 6c 2d 63 6f 6c 6f 72 73 2d 61 63	alue")....("H".counsel-colors-ac
365e0	74 69 6f 6e 2d 6b 69 6c 6c 2d 68 65 78 20 22 6b 69 6c 6c 20 68 65 78 61 64 65 63 69 6d 61 6c 20	tion-kill-hex."kill.hexadecimal.
36600	76 61 6c 75 65 22 29 29 29 0a 0a 3b 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 63 6f 6c 6f 72 73	value")))..;;;;;.`counsel-colors
36620	2d 77 65 62 27 0a 0a 28 64 65 66 76 61 72 20 73 68 72 2d 63 6f 6c 6f 72 2d 68 74 6d 6c 2d 63 6f	-web'..(defvar.shr-color-html-co
36640	6c 6f 72 73 2d 61 6c 69 73 74 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 63 6f 6c 6f	lors-alist)..(defun.counsel-colo
36660	72 73 2d 2d 77 65 62 2d 61 6c 69 73 74 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 6c 69 73 74 20	rs--web-alist.()..."Return.list.
36680	6f 66 20 43 53 53 20 63 6f 6c 6f 72 73 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 63 6f 6c 6f 72	of.CSS.colors.for.`counsel-color
366a0	73 2d 77 65 62 27 2e 22 0a 20 20 28 72 65 71 75 69 72 65 20 27 73 68 72 2d 63 6f 6c 6f 72 29 0a	s-web'."...(require.'shr-color).
366c0	20 20 28 6c 65 74 2a 20 28 28 61 6c 69 73 74 20 28 63 6f 70 79 2d 61 6c 69 73 74 20 73 68 72 2d	..(let*.((alist.(copy-alist.shr-
366e0	63 6f 6c 6f 72 2d 68 74 6d 6c 2d 63 6f 6c 6f 72 73 2d 61 6c 69 73 74 29 29 0a 20 20 20 20 20 20	color-html-colors-alist)).......
36700	20 20 20 28 6d 70 20 20 28 61 73 73 6f 63 20 22 4d 65 64 69 75 6d 50 75 72 70 6c 65 22 20 20 61	...(mp..(assoc."MediumPurple"..a
36720	6c 69 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 70 76 72 20 28 61 73 73 6f 63 20 22 50 61 6c	list))..........(pvr.(assoc."Pal
36740	65 56 69 6f 6c 65 74 52 65 64 22 20 61 6c 69 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 72 70	eVioletRed".alist))..........(rp
36760	20 20 28 61 73 73 6f 63 20 22 52 65 62 65 63 63 61 50 75 72 70 6c 65 22 20 61 6c 69 73 74 29 29	..(assoc."RebeccaPurple".alist))
36780	29 0a 20 20 20 20 3b 3b 20 42 61 63 6b 70 6f 72 74 20 47 4e 55 20 45 6d 61 63 73 20 62 75 67 23	).....;;.Backport.GNU.Emacs.bug#
367a0	33 30 33 37 37 0a 20 20 20 20 28 77 68 65 6e 20 6d 70 20 28 73 65 74 63 64 72 20 6d 70 20 22 23	30377.....(when.mp.(setcdr.mp."#
367c0	39 33 37 30 64 62 22 29 29 0a 20 20 20 20 28 77 68 65 6e 20 70 76 72 20 28 73 65 74 63 64 72 20	9370db")).....(when.pvr.(setcdr.
367e0	70 76 72 20 22 23 64 62 37 30 39 33 22 29 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 72 70 20 28	pvr."#db7093")).....(unless.rp.(
36800	70 75 73 68 20 28 63 6f 6e 73 20 22 72 65 62 65 63 63 61 70 75 72 70 6c 65 22 20 22 23 36 36 33	push.(cons."rebeccapurple"."#663
36820	33 39 39 22 29 20 61 6c 69 73 74 29 29 0a 20 20 20 20 28 73 6f 72 74 20 28 6d 61 70 63 61 72 20	399").alist)).....(sort.(mapcar.
36840	28 6c 61 6d 62 64 61 20 28 63 65 6c 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	(lambda.(cell)..................
36860	20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28 64 6f 77 6e 63 61 73 65 20 28 63 61 72 20 63 65	...(propertize.(downcase.(car.ce
36880	6c 6c 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	ll))............................
368a0	20 20 20 20 20 27 68 65 78 20 28 64 6f 77 6e 63 61 73 65 20 28 63 64 72 20 63 65 6c 6c 29 29 29	.....'hex.(downcase.(cdr.cell)))
368c0	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 6c 69 73 74 29 0a 20 20 20 20 20	)...................alist)......
368e0	20 20 20 20 20 23 27 73 74 72 69 6e 67 2d 6c 65 73 73 70 29 29 29 0a 0a 28 64 65 66 76 61 72 20	.....#'string-lessp)))..(defvar.
36900	63 6f 75 6e 73 65 6c 2d 63 6f 6c 6f 72 73 2d 77 65 62 2d 68 69 73 74 6f 72 79 20 28 29 0a 20 20	counsel-colors-web-history.()...
36920	22 48 69 73 74 6f 72 79 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 63 6f 6c 6f 72 73 2d 77 65 62	"History.for.`counsel-colors-web
36940	27 2e 22 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e	'.")..;;;###autoload.(defun.coun
36960	73 65 6c 2d 63 6f 6c 6f 72 73 2d 77 65 62 20 28 29 0a 20 20 22 53 68 6f 77 20 61 20 6c 69 73 74	sel-colors-web.()..."Show.a.list
36980	20 6f 66 20 61 6c 6c 20 57 33 43 20 77 65 62 20 63 6f 6c 6f 72 73 20 66 6f 72 20 75 73 65 20 69	.of.all.W3C.web.colors.for.use.i
369a0	6e 20 43 53 53 2e 0a 0a 59 6f 75 20 63 61 6e 20 69 6e 73 65 72 74 20 6f 72 20 6b 69 6c 6c 20 74	n.CSS...You.can.insert.or.kill.t
369c0	68 65 20 6e 61 6d 65 20 6f 72 20 68 65 78 61 64 65 63 69 6d 61 6c 20 52 47 42 20 76 61 6c 75 65	he.name.or.hexadecimal.RGB.value
369e0	20 6f 66 20 74 68 65 0a 73 65 6c 65 63 74 65 64 20 63 6f 6c 6f 72 2e 22 0a 20 20 28 69 6e 74 65	.of.the.selected.color."...(inte
36a00	72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 2a 20 28 28 63 6f 6c 6f 72 73 20 28 63 6f 75 6e 73	ractive)...(let*.((colors.(couns
36a20	65 6c 2d 63 6f 6c 6f 72 73 2d 2d 77 65 62 2d 61 6c 69 73 74 29 29 0a 20 20 20 20 20 20 20 20 20	el-colors--web-alist))..........
36a40	28 63 6f 75 6e 73 65 6c 2d 2d 63 6f 6c 6f 72 73 2d 66 6f 72 6d 61 74 0a 20 20 20 20 20 20 20 20	(counsel--colors-format.........
36a60	20 20 28 66 6f 72 6d 61 74 20 22 25 25 2d 25 64 73 20 25 25 73 20 25 25 73 22 0a 20 20 20 20 20	..(format."%%-%ds.%%s.%%s"......
36a80	20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 70 70 6c 79 20 23 27 6d 61 78 20 30 20 28 6d 61 70	.............(apply.#'max.0.(map
36aa0	63 61 72 20 23 27 73 74 72 69 6e 67 2d 77 69 64 74 68 20 63 6f 6c 6f 72 73 29 29 29 29 29 0a 20	car.#'string-width.colors)))))..
36ac0	20 20 20 28 69 76 79 2d 72 65 61 64 20 22 57 65 62 20 63 6f 6c 6f 72 3a 20 22 20 63 6f 6c 6f 72	...(ivy-read."Web.color:.".color
36ae0	73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 71 75 69 72 65 2d 6d 61 74 63 68 20 74	s...............:require-match.t
36b00	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 69 73 74 6f 72 79 20 27 63 6f 75 6e 73 65 6c	...............:history.'counsel
36b20	2d 63 6f 6c 6f 72 73 2d 77 65 62 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20	-colors-web-history.............
36b40	20 20 3a 61 63 74 69 6f 6e 20 23 27 69 6e 73 65 72 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	..:action.#'insert..............
36b60	20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 63 6f 6c 6f 72 73 2d 77 65 62 29 29 29 0a	.:caller.'counsel-colors-web))).
36b80	0a 28 69 76 79 2d 63 6f 6e 66 69 67 75 72 65 20 27 63 6f 75 6e 73 65 6c 2d 63 6f 6c 6f 72 73 2d	.(ivy-configure.'counsel-colors-
36ba0	77 65 62 0a 20 20 3a 73 6f 72 74 2d 66 6e 20 23 27 69 76 79 2d 73 74 72 69 6e 67 3c 0a 20 20 3a	web...:sort-fn.#'ivy-string<...:
36bc0	66 6f 72 6d 61 74 2d 66 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 2d 63 6f 6c 6f 72 73 2d 77 65 62 2d	format-fn.#'counsel--colors-web-
36be0	66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 29 0a 0a 28 69 76 79 2d 73 65 74 2d 61 63 74 69 6f	format-function)..(ivy-set-actio
36c00	6e 73 0a 20 27 63 6f 75 6e 73 65 6c 2d 63 6f 6c 6f 72 73 2d 77 65 62 0a 20 27 28 28 22 68 22 20	ns..'counsel-colors-web..'(("h".
36c20	63 6f 75 6e 73 65 6c 2d 63 6f 6c 6f 72 73 2d 61 63 74 69 6f 6e 2d 69 6e 73 65 72 74 2d 68 65 78	counsel-colors-action-insert-hex
36c40	20 22 69 6e 73 65 72 74 20 68 65 78 61 64 65 63 69 6d 61 6c 20 76 61 6c 75 65 22 29 0a 20 20 20	."insert.hexadecimal.value")....
36c60	28 22 48 22 20 63 6f 75 6e 73 65 6c 2d 63 6f 6c 6f 72 73 2d 61 63 74 69 6f 6e 2d 6b 69 6c 6c 2d	("H".counsel-colors-action-kill-
36c80	68 65 78 20 22 6b 69 6c 6c 20 68 65 78 61 64 65 63 69 6d 61 6c 20 76 61 6c 75 65 22 29 29 29 0a	hex."kill.hexadecimal.value"))).
36ca0	0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 66 6f 6e 74 73 27 0a 0a 28 64 65 66 76 61 72 20 63	.;;;;.`counsel-fonts'..(defvar.c
36cc0	6f 75 6e 73 65 6c 2d 66 6f 6e 74 73 2d 68 69 73 74 6f 72 79 20 28 29 0a 20 20 22 48 69 73 74 6f	ounsel-fonts-history.()..."Histo
36ce0	72 79 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 66 6f 6e 74 73 27 2e 22 29 0a 0a 3b 3b 3b 23 23	ry.for.`counsel-fonts'.")..;;;##
36d00	23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 66 6f 6e 74 73 20 28	#autoload.(defun.counsel-fonts.(
36d20	29 0a 20 20 22 53 68 6f 77 20 61 20 6c 69 73 74 20 6f 66 20 61 6c 6c 20 73 75 70 70 6f 72 74 65	)..."Show.a.list.of.all.supporte
36d40	64 20 66 6f 6e 74 20 66 61 6d 69 6c 69 65 73 20 66 6f 72 20 61 20 70 61 72 74 69 63 75 6c 61 72	d.font.families.for.a.particular
36d60	20 66 72 61 6d 65 2e 0a 0a 59 6f 75 20 63 61 6e 20 69 6e 73 65 72 74 20 6f 72 20 6b 69 6c 6c 20	.frame...You.can.insert.or.kill.
36d80	74 68 65 20 6e 61 6d 65 20 6f 66 20 74 68 65 20 73 65 6c 65 63 74 65 64 20 66 6f 6e 74 2e 22 0a	the.name.of.the.selected.font.".
36da0	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 63 75 72 72 65 6e 74	..(interactive)...(let.((current
36dc0	2d 66 6f 6e 74 0a 20 20 20 20 20 20 20 20 20 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 28 66 6f 6e	-font..........(symbol-name.(fon
36de0	74 2d 67 65 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	t-get.(face-attribute.'default.:
36e00	66 6f 6e 74 29 20 3a 66 61 6d 69 6c 79 29 29 29 29 0a 20 20 20 20 28 69 76 79 2d 72 65 61 64 20	font).:family)))).....(ivy-read.
36e20	22 46 6f 6e 74 3a 20 22 20 28 64 65 6c 65 74 65 2d 64 75 70 73 20 28 66 6f 6e 74 2d 66 61 6d 69	"Font:.".(delete-dups.(font-fami
36e40	6c 79 2d 6c 69 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 70 72 65 73 65 6c 65	ly-list))...............:presele
36e60	63 74 20 63 75 72 72 65 6e 74 2d 66 6f 6e 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 72	ct.current-font...............:r
36e80	65 71 75 69 72 65 2d 6d 61 74 63 68 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 69	equire-match.t...............:hi
36ea0	73 74 6f 72 79 20 27 63 6f 75 6e 73 65 6c 2d 66 6f 6e 74 73 2d 68 69 73 74 6f 72 79 0a 20 20 20	story.'counsel-fonts-history....
36ec0	20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 23 27 69 6e 73 65 72 74 0a 20 20 20 20	...........:action.#'insert.....
36ee0	20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 66 6f 6e 74 73	..........:caller.'counsel-fonts
36f00	29 29 29 0a 0a 28 69 76 79 2d 63 6f 6e 66 69 67 75 72 65 20 27 63 6f 75 6e 73 65 6c 2d 66 6f 6e	)))..(ivy-configure.'counsel-fon
36f20	74 73 0a 20 20 3a 64 69 73 70 6c 61 79 2d 74 72 61 6e 73 66 6f 72 6d 65 72 2d 66 6e 20 23 27 63	ts...:display-transformer-fn.#'c
36f40	6f 75 6e 73 65 6c 2d 2d 66 6f 6e 74 2d 77 69 74 68 2d 73 61 6d 70 6c 65 29 0a 0a 28 64 65 66 75	ounsel--font-with-sample)..(defu
36f60	6e 20 63 6f 75 6e 73 65 6c 2d 2d 66 6f 6e 74 2d 77 69 74 68 2d 73 61 6d 70 6c 65 20 28 66 6f 6e	n.counsel--font-with-sample.(fon
36f80	74 2d 6e 61 6d 65 29 0a 20 20 22 46 6f 72 6d 61 74 20 66 75 6e 63 74 69 6f 6e 20 66 6f 72 20 60	t-name)..."Format.function.for.`
36fa0	63 6f 75 6e 73 65 6c 2d 66 6f 6e 74 73 27 2e 22 0a 20 20 28 66 6f 72 6d 61 74 20 22 25 2d 37 35	counsel-fonts'."...(format."%-75
36fc0	73 25 73 22 20 66 6f 6e 74 2d 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72	s%s".font-name...........(proper
36fe0	74 69 7a 65 20 22 61 62 63 64 65 66 67 68 69 6a 6b 6c 6d 6e 6f 70 71 72 73 74 75 76 77 78 79 7a	tize."abcdefghijklmnopqrstuvwxyz
37000	41 42 43 44 45 46 47 48 49 4a 4b 4c 4d 4e 4f 50 51 52 53 54 55 56 57 58 59 5a 22 0a 20 20 20 20	ABCDEFGHIJKLMNOPQRSTUVWXYZ".....
37020	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 28 6c 69 73 74 20 3a 66	..................'face.(list.:f
37040	61 6d 69 6c 79 20 66 6f 6e 74 2d 6e 61 6d 65 29 29 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73	amily.font-name))))..;;;;.`couns
37060	65 6c 2d 6b 6d 61 63 72 6f 27 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 6b 6d 61 63	el-kmacro'..(defvar.counsel-kmac
37080	72 6f 2d 6d 61 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	ro-map...(let.((map.(make-sparse
370a0	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 20 6d 61 70 20 28	-keymap))).....(define-key.map.(
370c0	6b 62 64 20 22 43 2d 6b 22 29 20 23 27 63 6f 75 6e 73 65 6c 2d 6b 6d 61 63 72 6f 2d 6b 69 6c 6c	kbd."C-k").#'counsel-kmacro-kill
370e0	29 0a 20 20 20 20 6d 61 70 29 29 0a 0a 3b 3b 20 41 76 6f 69 64 20 28 64 65 63 6c 61 72 65 20 28	).....map))..;;.Avoid.(declare.(
37100	6d 6f 64 65 73 20 2e 2e 2e 29 29 20 77 61 72 6e 69 6e 67 73 20 69 6e 20 45 6d 61 63 73 20 3c 20	modes....)).warnings.in.Emacs.<.
37120	32 38 2e 0a 28 66 75 6e 63 74 69 6f 6e 2d 70 75 74 20 23 27 63 6f 75 6e 73 65 6c 2d 6b 6d 61 63	28..(function-put.#'counsel-kmac
37140	72 6f 2d 6b 69 6c 6c 20 27 63 6f 6d 6d 61 6e 64 2d 6d 6f 64 65 73 20 27 28 6d 69 6e 69 62 75 66	ro-kill.'command-modes.'(minibuf
37160	66 65 72 2d 6d 6f 64 65 29 29 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6b 6d 61 63 72 6f	fer-mode)).(defun.counsel-kmacro
37180	2d 6b 69 6c 6c 20 28 29 0a 20 20 22 4b 69 6c 6c 20 74 68 65 20 6c 69 6e 65 2c 20 6f 72 20 64 65	-kill.()..."Kill.the.line,.or.de
371a0	6c 65 74 65 20 74 68 65 20 63 75 72 72 65 6e 74 6c 79 20 73 65 6c 65 63 74 65 64 20 6b 65 79 62	lete.the.currently.selected.keyb
371c0	6f 61 72 64 20 6d 61 63 72 6f 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28	oard.macro."...(interactive)...(
371e0	75 6e 6c 65 73 73 20 28 77 69 6e 64 6f 77 2d 6d 69 6e 69 62 75 66 66 65 72 2d 70 29 0a 20 20 20	unless.(window-minibuffer-p)....
37200	20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 4e 6f 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 73 65 73 73	.(user-error."No.completion.sess
37220	69 6f 6e 20 69 73 20 61 63 74 69 76 65 22 29 29 0a 20 20 28 69 66 20 28 6e 6f 74 20 28 65 6f 6c	ion.is.active"))...(if.(not.(eol
37240	70 29 29 0a 20 20 20 20 20 20 28 69 76 79 2d 6b 69 6c 6c 2d 6c 69 6e 65 29 0a 20 20 20 20 28 63	p)).......(ivy-kill-line).....(c
37260	6f 75 6e 73 65 6c 2d 6b 6d 61 63 72 6f 2d 61 63 74 69 6f 6e 2d 64 65 6c 65 74 65 2d 6b 6d 61 63	ounsel-kmacro-action-delete-kmac
37280	72 6f 0a 20 20 20 20 20 28 61 73 73 6f 63 0a 20 20 20 20 20 20 28 69 76 79 2d 73 74 61 74 65 2d	ro......(assoc.......(ivy-state-
372a0	63 75 72 72 65 6e 74 20 69 76 79 2d 6c 61 73 74 29 0a 20 20 20 20 20 20 28 69 76 79 2d 73 74 61	current.ivy-last).......(ivy-sta
372c0	74 65 2d 63 6f 6c 6c 65 63 74 69 6f 6e 20 69 76 79 2d 6c 61 73 74 29 29 29 0a 20 20 20 20 28 69	te-collection.ivy-last))).....(i
372e0	76 79 2d 2d 6b 69 6c 6c 2d 63 75 72 72 65 6e 74 2d 63 61 6e 64 69 64 61 74 65 29 29 29 0a 0a 28	vy--kill-current-candidate)))..(
37300	64 65 66 76 61 72 20 6b 6d 61 63 72 6f 2d 63 6f 75 6e 74 65 72 29 0a 28 64 65 66 76 61 72 20 6b	defvar.kmacro-counter).(defvar.k
37320	6d 61 63 72 6f 2d 63 6f 75 6e 74 65 72 2d 66 6f 72 6d 61 74 2d 73 74 61 72 74 29 0a 28 64 65 66	macro-counter-format-start).(def
37340	76 61 72 20 6b 6d 61 63 72 6f 2d 72 69 6e 67 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69	var.kmacro-ring).(declare-functi
37360	6f 6e 20 6b 6d 61 63 72 6f 2d 63 79 63 6c 65 2d 72 69 6e 67 2d 6e 65 78 74 20 22 6b 6d 61 63 72	on.kmacro-cycle-ring-next."kmacr
37380	6f 22 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 29 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e	o".(&optional.arg)).(declare-fun
373a0	63 74 69 6f 6e 20 6b 6d 61 63 72 6f 2d 63 79 63 6c 65 2d 72 69 6e 67 2d 70 72 65 76 69 6f 75 73	ction.kmacro-cycle-ring-previous
373c0	20 22 6b 6d 61 63 72 6f 22 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 29 29 0a 28 64 65 63 6c	."kmacro".(&optional.arg)).(decl
373e0	61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 6b 6d 61 63 72 6f 2d 64 65 6c 65 74 65 2d 72 69 6e 67 2d	are-function.kmacro-delete-ring-
37400	68 65 61 64 20 22 6b 6d 61 63 72 6f 22 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 29 29 0a 28	head."kmacro".(&optional.arg)).(
37420	64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 6b 6d 61 63 72 6f 2d 72 69 6e 67 2d 68 65 61	declare-function.kmacro-ring-hea
37440	64 20 22 6b 6d 61 63 72 6f 22 20 28 29 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e	d."kmacro".()).(declare-function
37460	20 6b 6d 61 63 72 6f 2d 73 65 74 2d 63 6f 75 6e 74 65 72 20 22 6b 6d 61 63 72 6f 22 20 28 61 72	.kmacro-set-counter."kmacro".(ar
37480	67 29 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 6b 6d 61 63 72 6f 2d 73 65 74	g)).(declare-function.kmacro-set
374a0	2d 66 6f 72 6d 61 74 20 22 6b 6d 61 63 72 6f 22 20 28 66 6f 72 6d 61 74 29 29 0a 28 64 65 63 6c	-format."kmacro".(format)).(decl
374c0	61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 6b 6d 61 63 72 6f 2d 73 70 6c 69 74 2d 72 69 6e 67 2d 65	are-function.kmacro-split-ring-e
374e0	6c 65 6d 65 6e 74 20 22 6b 6d 61 63 72 6f 22 20 28 65 6c 74 29 29 0a 0a 3b 3b 3b 23 23 23 61 75	lement."kmacro".(elt))..;;;###au
37500	74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6b 6d 61 63 72 6f 20 28 29 0a	toload.(defun.counsel-kmacro.().
37520	20 20 22 49 6e 74 65 72 61 63 74 69 76 65 6c 79 20 63 68 6f 6f 73 65 20 61 6e 64 20 65 78 65 63	.."Interactively.choose.and.exec
37540	75 74 65 20 61 20 6b 65 79 62 6f 61 72 64 20 6d 61 63 72 6f 2e 0a 0a 57 69 74 68 20 61 20 70 72	ute.a.keyboard.macro...With.a.pr
37560	65 66 69 78 20 61 72 67 75 6d 65 6e 74 2c 20 65 78 65 63 75 74 65 20 74 68 65 20 6d 61 63 72 6f	efix.argument,.execute.the.macro
37580	20 74 68 61 74 20 6d 61 6e 79 20 74 69 6d 65 73 2e 0a 0a 4d 61 63 72 6f 73 20 61 72 65 20 65 78	.that.many.times...Macros.are.ex
375a0	65 63 75 74 65 64 20 75 73 69 6e 67 20 74 68 65 69 72 20 72 65 73 70 65 63 74 69 76 65 20 60 6b	ecuted.using.their.respective.`k
375c0	6d 61 63 72 6f 2d 63 6f 75 6e 74 65 72 27 20 76 61 6c 75 65 20 61 6e 64 0a 63 6f 75 6e 74 65 72	macro-counter'.value.and.counter
375e0	20 66 6f 72 6d 61 74 3b 20 74 68 65 73 65 20 76 61 6c 75 65 73 20 61 72 65 20 61 6c 73 6f 20 64	.format;.these.values.are.also.d
37600	69 73 70 6c 61 79 65 64 20 6e 65 78 74 20 74 6f 20 65 61 63 68 20 63 6f 6d 70 6c 65 74 69 6f 6e	isplayed.next.to.each.completion
37620	0a 63 61 6e 64 69 64 61 74 65 2e 0a 0a 54 68 65 20 64 65 66 61 75 6c 74 20 61 63 74 69 6f 6e 73	.candidate...The.default.actions
37640	20 69 6e 63 6c 75 64 65 20 74 68 65 20 61 62 69 6c 69 74 79 20 74 6f 20 63 6f 70 79 20 6f 6e 65	.include.the.ability.to.copy.one
37660	20 6d 61 63 72 6f 27 73 20 63 6f 75 6e 74 65 72 0a 76 61 6c 75 65 20 6f 72 20 66 6f 72 6d 61 74	.macro's.counter.value.or.format
37680	20 61 73 20 74 68 65 20 62 61 73 69 73 20 66 6f 72 20 61 6e 6f 74 68 65 72 20 6d 61 63 72 6f 20	.as.the.basis.for.another.macro.
376a0	65 78 65 63 75 74 69 6f 6e 20 6f 72 20 64 65 66 69 6e 69 74 69 6f 6e 2e 0a 0a 54 68 65 20 66 6f	execution.or.definition...The.fo
376c0	6c 6c 6f 77 69 6e 67 20 6b 65 79 20 62 69 6e 64 69 6e 67 73 20 61 72 65 20 61 6c 73 6f 20 61 76	llowing.key.bindings.are.also.av
376e0	61 69 6c 61 62 6c 65 3a 0a 5c 5c 7b 63 6f 75 6e 73 65 6c 2d 6b 6d 61 63 72 6f 2d 6d 61 70 7d 22	ailable:.\\{counsel-kmacro-map}"
37700	0a 20 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 6b 6d 61	...(interactive)...(require.'kma
37720	63 72 6f 29 0a 20 20 28 69 76 79 2d 72 65 61 64 20 22 45 78 65 63 75 74 65 20 6d 61 63 72 6f 3a	cro)...(ivy-read."Execute.macro:
37740	20 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 63 6f 75 6e 73 65 6c 2d 2d 6b 6d 61	.".............(or.(counsel--kma
37760	63 72 6f 2d 63 61 6e 64 69 64 61 74 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	cro-candidates).................
37780	28 75 73 65 72 2d 65 72 72 6f 72 20 22 4e 6f 20 6b 65 79 62 6f 61 72 64 20 6d 61 63 72 6f 73 20	(user-error."No.keyboard.macros.
377a0	64 65 66 69 6e 65 64 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 6b 65 79 6d 61 70 20 63	defined")).............:keymap.c
377c0	6f 75 6e 73 65 6c 2d 6b 6d 61 63 72 6f 2d 6d 61 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 72	ounsel-kmacro-map.............:r
377e0	65 71 75 69 72 65 2d 6d 61 74 63 68 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69	equire-match.t.............:acti
37800	6f 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 6b 6d 61 63 72 6f 2d 61 63 74 69 6f 6e 2d 72 75 6e 0a 20	on.#'counsel-kmacro-action-run..
37820	20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 6b 6d 61 63	...........:caller.'counsel-kmac
37840	72 6f 29 29 0a 0a 28 69 76 79 2d 63 6f 6e 66 69 67 75 72 65 20 27 63 6f 75 6e 73 65 6c 2d 6b 6d	ro))..(ivy-configure.'counsel-km
37860	61 63 72 6f 0a 20 20 3a 66 6f 72 6d 61 74 2d 66 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 2d 6b 6d 61	acro...:format-fn.#'counsel--kma
37880	63 72 6f 2d 66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d	cro-format-function)..(defcustom
378a0	20 63 6f 75 6e 73 65 6c 2d 6b 6d 61 63 72 6f 2d 73 65 70 61 72 61 74 6f 72 20 22 5c 6e 2d 2d 2d	.counsel-kmacro-separator."\n---
378c0	2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 5c 6e 22 0a 20 20 22 53 65 70 61	---------------------\n"..."Sepa
378e0	72 61 74 6f 72 20 64 69 73 70 6c 61 79 65 64 20 62 65 74 77 65 65 6e 20 6b 65 79 62 6f 61 72 64	rator.displayed.between.keyboard
37900	20 6d 61 63 72 6f 73 20 69 6e 20 60 63 6f 75 6e 73 65 6c 2d 6b 6d 61 63 72 6f 27 2e 22 0a 20 20	.macros.in.`counsel-kmacro'."...
37920	3a 74 79 70 65 20 27 73 74 72 69 6e 67 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d	:type.'string)..(defun.counsel--
37940	6b 6d 61 63 72 6f 2d 66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 20 28 66 6f 72 6d 61 74 74 65	kmacro-format-function.(formatte
37960	64 2d 6b 6d 61 63 72 6f 29 0a 20 20 22 54 72 61 6e 73 66 6f 72 6d 20 46 4f 52 4d 41 54 54 45 44	d-kmacro)..."Transform.FORMATTED
37980	2d 4b 4d 41 43 52 4f 20 69 6e 74 6f 20 61 20 73 74 72 69 6e 67 20 66 6f 72 20 60 63 6f 75 6e 73	-KMACRO.into.a.string.for.`couns
379a0	65 6c 2d 6b 6d 61 63 72 6f 27 2e 22 0a 20 20 28 69 76 79 2d 2d 66 6f 72 6d 61 74 2d 66 75 6e 63	el-kmacro'."...(ivy--format-func
379c0	74 69 6f 6e 2d 67 65 6e 65 72 69 63 0a 20 20 20 28 6c 61 6d 62 64 61 20 28 73 74 72 29 20 28 69	tion-generic....(lambda.(str).(i
379e0	76 79 2d 2d 61 64 64 2d 66 61 63 65 20 73 74 72 20 27 69 76 79 2d 63 75 72 72 65 6e 74 2d 6d 61	vy--add-face.str.'ivy-current-ma
37a00	74 63 68 29 29 0a 20 20 20 23 27 69 64 65 6e 74 69 74 79 0a 20 20 20 66 6f 72 6d 61 74 74 65 64	tch))....#'identity....formatted
37a20	2d 6b 6d 61 63 72 6f 0a 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 63 6f 75 6e 73 65 6c 2d 6b	-kmacro....(propertize.counsel-k
37a40	6d 61 63 72 6f 2d 73 65 70 61 72 61 74 6f 72 20 27 66 61 63 65 20 27 69 76 79 2d 73 65 70 61 72	macro-separator.'face.'ivy-separ
37a60	61 74 6f 72 29 29 29 0a 0a 28 64 65 66 6d 61 63 72 6f 20 63 6f 75 6e 73 65 6c 2d 2d 77 69 74 68	ator)))..(defmacro.counsel--with
37a80	2d 6b 6d 61 63 72 6f 20 28 6b 6d 61 63 72 6f 20 26 72 65 73 74 20 62 6f 64 79 29 0a 20 20 22 53	-kmacro.(kmacro.&rest.body)..."S
37aa0	70 6c 69 74 20 4b 4d 41 43 52 4f 20 73 6c 6f 74 73 20 69 6e 74 6f 20 63 6f 72 72 65 73 70 6f 6e	plit.KMACRO.slots.into.correspon
37ac0	64 69 6e 67 20 64 79 6e 76 61 72 73 20 61 72 6f 75 6e 64 20 42 4f 44 59 2e 22 0a 20 20 28 64 65	ding.dynvars.around.BODY."...(de
37ae0	63 6c 61 72 65 20 28 64 65 62 75 67 20 74 29 20 28 69 6e 64 65 6e 74 20 31 29 29 0a 20 20 60 28	clare.(debug.t).(indent.1))...`(
37b00	6c 65 74 20 28 28 6c 61 73 74 2d 6b 62 64 2d 6d 61 63 72 6f 20 6e 69 6c 29 0a 20 20 20 20 20 20	let.((last-kbd-macro.nil).......
37b20	20 20 20 28 6b 6d 61 63 72 6f 2d 63 6f 75 6e 74 65 72 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20	...(kmacro-counter.nil).........
37b40	20 28 6b 6d 61 63 72 6f 2d 63 6f 75 6e 74 65 72 2d 66 6f 72 6d 61 74 2d 73 74 61 72 74 20 6e 69	.(kmacro-counter-format-start.ni
37b60	6c 29 29 0a 20 20 20 20 20 3b 3b 20 57 6f 72 6b 73 20 77 69 74 68 20 62 6f 74 68 20 6f 6c 64 65	l))......;;.Works.with.both.olde
37b80	72 20 74 72 69 70 6c 65 74 73 20 61 6e 64 20 45 6d 61 63 73 20 32 39 20 4f 43 6c 6f 73 75 72 65	r.triplets.and.Emacs.29.OClosure
37ba0	73 2e 0a 20 20 20 20 20 28 6b 6d 61 63 72 6f 2d 73 70 6c 69 74 2d 72 69 6e 67 2d 65 6c 65 6d 65	s.......(kmacro-split-ring-eleme
37bc0	6e 74 20 2c 6b 6d 61 63 72 6f 29 0a 20 20 20 20 20 2c 40 62 6f 64 79 29 29 0a 0a 28 64 65 66 75	nt.,kmacro)......,@body))..(defu
37be0	6e 20 63 6f 75 6e 73 65 6c 2d 2d 66 6f 72 6d 61 74 2d 6b 6d 61 63 72 6f 20 28 29 0a 20 20 22 52	n.counsel--format-kmacro.()..."R
37c00	65 74 75 72 6e 20 73 74 72 69 6e 67 20 72 65 70 72 65 73 65 6e 74 61 74 69 6f 6e 20 6f 66 20 63	eturn.string.representation.of.c
37c20	75 72 72 65 6e 74 20 6b 65 79 62 6f 61 72 64 20 6d 61 63 72 6f 2e 22 0a 20 20 28 66 6f 72 6d 61	urrent.keyboard.macro."...(forma
37c40	74 20 22 28 25 73 2c 25 73 29 3a 20 25 73 22 20 6b 6d 61 63 72 6f 2d 63 6f 75 6e 74 65 72 2d 66	t."(%s,%s):.%s".kmacro-counter-f
37c60	6f 72 6d 61 74 2d 73 74 61 72 74 20 6b 6d 61 63 72 6f 2d 63 6f 75 6e 74 65 72 0a 20 20 20 20 20	ormat-start.kmacro-counter......
37c80	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 20	.....(condition-case.err........
37ca0	20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 2d 6b 62 64 2d 6d 61 63 72 6f 20 6c 61 73 74 2d 6b 62	.......(format-kbd-macro.last-kb
37cc0	64 2d 6d 61 63 72 6f 20 31 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 52 65 63 6f 76 65	d-macro.1).............;;.Recove
37ce0	72 20 66 72 6f 6d 20 65 72 72 6f 72 20 69 6e 20 60 65 64 6d 61 63 72 6f 2d 66 69 78 2d 6d 65 6e	r.from.error.in.`edmacro-fix-men
37d00	75 2d 63 6f 6d 6d 61 6e 64 73 27 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 65 73 70 65	u-commands',.............;;.espe
37d20	63 69 61 6c 6c 79 20 70 72 69 6f 72 20 74 6f 20 6d 6f 75 73 65 20 65 76 65 6e 74 20 73 75 70 70	cially.prior.to.mouse.event.supp
37d40	6f 72 74 20 69 6e 20 45 6d 61 63 73 20 32 37 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 65 72	ort.in.Emacs.27..............(er
37d60	72 6f 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 28 70 72 6f 70 65 72	ror..............(format.(proper
37d80	74 69 7a 65 20 22 5b 55 6e 70 72 69 6e 74 61 62 6c 65 20 6d 61 63 72 6f 3a 20 25 73 5d 22 20 27	tize."[Unprintable.macro:.%s]".'
37da0	66 61 63 65 20 27 77 61 72 6e 69 6e 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	face.'warning)..................
37dc0	20 20 20 20 28 65 72 72 6f 72 2d 6d 65 73 73 61 67 65 2d 73 74 72 69 6e 67 20 65 72 72 29 29 29	....(error-message-string.err)))
37de0	29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 6b 6d 61 63 72 6f 2d 63 61 6e 64	)))..(defun.counsel--kmacro-cand
37e00	69 64 61 74 65 73 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 61 6e 20 61 6c 69 73 74 20 6f 66 20	idates.()..."Return.an.alist.of.
37e20	6b 6e 6f 77 6e 20 6b 65 79 62 6f 61 72 64 20 6d 61 63 72 6f 73 20 66 6f 72 20 60 63 6f 75 6e 73	known.keyboard.macros.for.`couns
37e40	65 6c 2d 6b 6d 61 63 72 6f 27 2e 0a 54 68 65 20 63 64 72 73 20 61 72 65 20 74 68 65 20 6f 72 69	el-kmacro'..The.cdrs.are.the.ori
37e60	67 69 6e 61 6c 20 60 6b 6d 61 63 72 6f 27 20 6f 62 6a 65 63 74 73 20 66 72 6f 6d 20 60 6b 6d 61	ginal.`kmacro'.objects.from.`kma
37e80	63 72 6f 2d 72 69 6e 67 2d 68 65 61 64 27 20 61 6e 64 0a 60 6b 6d 61 63 72 6f 2d 72 69 6e 67 27	cro-ring-head'.and.`kmacro-ring'
37ea0	3b 20 74 68 65 20 63 61 72 73 20 61 72 65 20 61 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 73	;.the.cars.are.a.corresponding.s
37ec0	74 72 69 6e 67 20 72 65 70 72 65 73 65 6e 74 61 74 69 6f 6e 2e 22 0a 20 20 28 6d 61 70 63 61 72	tring.representation."...(mapcar
37ee0	20 28 6c 61 6d 62 64 61 20 28 6b 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20	.(lambda.(km).............(cons.
37f00	28 63 6f 75 6e 73 65 6c 2d 2d 77 69 74 68 2d 6b 6d 61 63 72 6f 20 6b 6d 0a 20 20 20 20 20 20 20	(counsel--with-kmacro.km........
37f20	20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 66 6f 72 6d 61 74 2d 6b 6d	.............(counsel--format-km
37f40	61 63 72 6f 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6b 6d 29 29 0a 20 20	acro))...................km))...
37f60	20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 68 65 61 64 20 28 6b 6d 61 63 72 6f 2d 72 69 6e 67	........(let.((head.(kmacro-ring
37f80	2d 68 65 61 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 68 65 61 64 20 28	-head))).............(and.head.(
37fa0	63 6f 6e 73 20 68 65 61 64 20 6b 6d 61 63 72 6f 2d 72 69 6e 67 29 29 29 29 29 0a 0a 28 64 65 66	cons.head.kmacro-ring)))))..(def
37fc0	75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 6b 6d 61 63 72 6f 2d 65 78 65 63 20 28 6b 6d 61 63 72 6f 20	un.counsel--kmacro-exec.(kmacro.
37fe0	6e 29 0a 20 20 22 45 78 65 63 75 74 65 20 4b 4d 41 43 52 4f 20 72 69 6e 67 20 69 74 65 6d 20 4e	n)..."Execute.KMACRO.ring.item.N
38000	20 74 69 6d 65 73 2e 22 0a 20 20 28 66 75 6e 63 61 6c 6c 20 28 69 66 20 28 61 6e 64 20 28 66 62	.times."...(funcall.(if.(and.(fb
38020	6f 75 6e 64 70 20 27 6b 6d 61 63 72 6f 2d 70 29 20 28 6b 6d 61 63 72 6f 2d 70 20 6b 6d 61 63 72	oundp.'kmacro-p).(kmacro-p.kmacr
38040	6f 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 66 75 6e 63 61 6c 6c 20 3b 3b 20	o))................#'funcall.;;.
38060	45 6d 61 63 73 20 32 39 20 4f 43 6c 6f 73 75 72 65 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	Emacs.29.OClosure...............
38080	27 6b 6d 61 63 72 6f 2d 65 78 65 63 2d 72 69 6e 67 2d 69 74 65 6d 29 0a 20 20 20 20 20 20 20 20	'kmacro-exec-ring-item).........
380a0	20 20 20 6b 6d 61 63 72 6f 20 6e 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6b 6d	...kmacro.n))..(defun.counsel-km
380c0	61 63 72 6f 2d 61 63 74 69 6f 6e 2d 72 75 6e 20 28 63 61 6e 64 69 64 61 74 65 29 0a 20 20 22 45	acro-action-run.(candidate)..."E
380e0	78 65 63 75 74 65 20 6b 65 79 62 6f 61 72 64 20 6d 61 63 72 6f 20 66 72 6f 6d 20 60 63 6f 75 6e	xecute.keyboard.macro.from.`coun
38100	73 65 6c 2d 6b 6d 61 63 72 6f 27 20 43 41 4e 44 49 44 41 54 45 2e 0a 57 69 74 68 20 61 20 70 72	sel-kmacro'.CANDIDATE..With.a.pr
38120	65 66 69 78 20 61 72 67 75 6d 65 6e 74 2c 20 65 78 65 63 75 74 65 20 74 68 65 20 6d 61 63 72 6f	efix.argument,.execute.the.macro
38140	20 74 68 61 74 20 6d 61 6e 79 20 74 69 6d 65 73 2e 22 0a 20 20 3b 3b 20 41 63 74 69 6f 6e 20 70	.that.many.times."...;;.Action.p
38160	72 65 66 69 78 20 6f 76 65 72 72 69 64 65 73 20 60 63 6f 75 6e 73 65 6c 2d 6b 6d 61 63 72 6f 27	refix.overrides.`counsel-kmacro'
38180	20 70 72 65 66 69 78 2e 0a 20 20 28 6c 65 74 2a 20 28 28 70 72 65 20 28 6f 72 20 69 76 79 2d 63	.prefix....(let*.((pre.(or.ivy-c
381a0	75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 20 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78	urrent-prefix-arg.current-prefix
381c0	2d 61 72 67 29 29 0a 20 20 20 20 20 20 20 20 20 28 6b 6d 20 28 63 64 72 20 63 61 6e 64 69 64 61	-arg))..........(km.(cdr.candida
381e0	74 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 68 65 61 64 20 28 65 71 75 61 6c 20 6b 6d 20 28 6b	te))..........(head.(equal.km.(k
38200	6d 61 63 72 6f 2d 72 69 6e 67 2d 68 65 61 64 29 29 29 29 0a 20 20 20 20 28 63 6f 75 6e 73 65 6c	macro-ring-head)))).....(counsel
38220	2d 2d 6b 6d 61 63 72 6f 2d 65 78 65 63 20 6b 6d 20 28 70 72 65 66 69 78 2d 6e 75 6d 65 72 69 63	--kmacro-exec.km.(prefix-numeric
38240	2d 76 61 6c 75 65 20 70 72 65 29 29 0a 20 20 20 20 28 77 68 65 6e 20 68 65 61 64 0a 20 20 20 20	-value.pre)).....(when.head.....
38260	20 20 3b 3b 20 45 78 65 63 75 74 69 6e 67 20 70 73 65 75 64 6f 20 60 6b 6d 61 63 72 6f 2d 72 69	..;;.Executing.pseudo.`kmacro-ri
38280	6e 67 2d 68 65 61 64 27 20 75 70 64 61 74 65 73 20 74 68 61 74 20 6f 62 6a 65 63 74 27 73 20 63	ng-head'.updates.that.object's.c
382a0	6f 75 6e 74 65 72 2c 0a 20 20 20 20 20 20 3b 3b 20 62 75 74 20 6e 6f 74 20 74 68 65 20 63 75 72	ounter,.......;;.but.not.the.cur
382c0	72 65 6e 74 20 60 6b 6d 61 63 72 6f 2d 63 6f 75 6e 74 65 72 27 2c 20 73 6f 20 72 65 63 6f 6e 63	rent.`kmacro-counter',.so.reconc
382e0	69 6c 65 20 74 68 65 6d 20 68 65 72 65 2e 0a 20 20 20 20 20 20 28 6b 6d 61 63 72 6f 2d 73 70 6c	ile.them.here........(kmacro-spl
38300	69 74 2d 72 69 6e 67 2d 65 6c 65 6d 65 6e 74 20 6b 6d 29 29 0a 20 20 20 20 3b 3b 20 55 70 64 61	it-ring-element.km)).....;;.Upda
38320	74 65 20 73 74 61 74 65 20 66 6f 72 20 6e 65 78 74 20 60 69 76 79 2d 63 61 6c 6c 27 2e 0a 20 20	te.state.for.next.`ivy-call'....
38340	20 20 28 63 6f 75 6e 73 65 6c 2d 2d 77 69 74 68 2d 6b 6d 61 63 72 6f 20 6b 6d 0a 20 20 20 20 20	..(counsel--with-kmacro.km......
38360	20 28 73 65 74 63 61 72 20 63 61 6e 64 69 64 61 74 65 20 28 63 6f 75 6e 73 65 6c 2d 2d 66 6f 72	.(setcar.candidate.(counsel--for
38380	6d 61 74 2d 6b 6d 61 63 72 6f 29 29 29 29 0a 20 20 28 73 65 74 66 20 28 69 76 79 2d 73 74 61 74	mat-kmacro))))...(setf.(ivy-stat
383a0	65 2d 63 75 72 72 65 6e 74 20 69 76 79 2d 6c 61 73 74 29 20 28 63 61 72 20 63 61 6e 64 69 64 61	e-current.ivy-last).(car.candida
383c0	74 65 29 29 0a 20 20 28 73 65 74 66 20 28 69 76 79 2d 73 74 61 74 65 2d 70 72 65 73 65 6c 65 63	te))...(setf.(ivy-state-preselec
383e0	74 20 69 76 79 2d 6c 61 73 74 29 20 69 76 79 2d 2d 69 6e 64 65 78 29 0a 20 20 28 69 76 79 2d 2d	t.ivy-last).ivy--index)...(ivy--
38400	72 65 73 65 74 2d 73 74 61 74 65 20 69 76 79 2d 6c 61 73 74 29 29 0a 0a 28 64 65 66 75 6e 20 63	reset-state.ivy-last))..(defun.c
38420	6f 75 6e 73 65 6c 2d 6b 6d 61 63 72 6f 2d 61 63 74 69 6f 6e 2d 64 65 6c 65 74 65 2d 6b 6d 61 63	ounsel-kmacro-action-delete-kmac
38440	72 6f 20 28 63 61 6e 64 69 64 61 74 65 29 0a 20 20 22 44 65 6c 65 74 65 20 74 68 65 20 6b 65 79	ro.(candidate)..."Delete.the.key
38460	62 6f 61 72 64 20 6d 61 63 72 6f 20 69 6e 20 60 63 6f 75 6e 73 65 6c 2d 6b 6d 61 63 72 6f 27 20	board.macro.in.`counsel-kmacro'.
38480	43 41 4e 44 49 44 41 54 45 2e 0a 45 69 74 68 65 72 20 64 65 6c 65 74 65 20 69 74 20 66 72 6f 6d	CANDIDATE..Either.delete.it.from
384a0	20 60 6b 6d 61 63 72 6f 2d 72 69 6e 67 27 2c 20 6f 72 20 73 65 74 20 60 6c 61 73 74 2d 6b 62 64	.`kmacro-ring',.or.set.`last-kbd
384c0	2d 6d 61 63 72 6f 27 0a 74 6f 20 74 68 65 20 70 6f 70 70 65 64 20 68 65 61 64 20 6f 66 20 74 68	-macro'.to.the.popped.head.of.th
384e0	65 20 72 69 6e 67 2e 22 0a 20 20 28 6c 65 74 20 28 28 6b 6d 20 28 63 64 72 20 63 61 6e 64 69 64	e.ring."...(let.((km.(cdr.candid
38500	61 74 65 29 29 29 0a 20 20 20 20 28 69 66 20 28 6d 65 6d 71 20 6b 6d 20 6b 6d 61 63 72 6f 2d 72	ate))).....(if.(memq.km.kmacro-r
38520	69 6e 67 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 6b 6d 61 63 72 6f 2d 72 69 6e 67 20 28	ing).........(setq.kmacro-ring.(
38540	64 65 6c 71 20 6b 6d 20 6b 6d 61 63 72 6f 2d 72 69 6e 67 29 29 0a 20 20 20 20 20 20 28 6b 6d 61	delq.km.kmacro-ring)).......(kma
38560	63 72 6f 2d 64 65 6c 65 74 65 2d 72 69 6e 67 2d 68 65 61 64 29 29 29 0a 20 20 3b 3b 20 55 70 64	cro-delete-ring-head)))...;;.Upd
38580	61 74 65 20 73 74 61 74 65 20 66 6f 72 20 6e 65 78 74 20 60 69 76 79 2d 63 61 6c 6c 27 2e 0a 20	ate.state.for.next.`ivy-call'...
385a0	20 3b 3b 20 54 4f 44 4f 3a 20 49 73 20 60 69 76 79 2d 2d 6b 69 6c 6c 2d 63 75 72 72 65 6e 74 2d	.;;.TODO:.Is.`ivy--kill-current-
385c0	63 61 6e 64 69 64 61 74 65 27 20 72 65 71 75 69 72 65 64 3f 0a 20 20 28 6c 65 74 20 28 28 6b 6d	candidate'.required?...(let.((km
385e0	73 20 28 69 76 79 2d 73 74 61 74 65 2d 63 6f 6c 6c 65 63 74 69 6f 6e 20 69 76 79 2d 6c 61 73 74	s.(ivy-state-collection.ivy-last
38600	29 29 29 0a 20 20 20 20 28 73 65 74 66 20 28 69 76 79 2d 73 74 61 74 65 2d 63 6f 6c 6c 65 63 74	))).....(setf.(ivy-state-collect
38620	69 6f 6e 20 69 76 79 2d 6c 61 73 74 29 20 28 64 65 6c 71 20 63 61 6e 64 69 64 61 74 65 20 6b 6d	ion.ivy-last).(delq.candidate.km
38640	73 29 29 0a 20 20 20 20 28 73 65 74 66 20 28 69 76 79 2d 73 74 61 74 65 2d 70 72 65 73 65 6c 65	s)).....(setf.(ivy-state-presele
38660	63 74 20 69 76 79 2d 6c 61 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 6d 61 78 20 30 20 28 6d	ct.ivy-last)...........(max.0.(m
38680	69 6e 20 69 76 79 2d 2d 69 6e 64 65 78 20 28 31 2d 20 28 6c 65 6e 67 74 68 20 6b 6d 73 29 29 29	in.ivy--index.(1-.(length.kms)))
386a0	29 29 29 0a 20 20 28 69 76 79 2d 2d 72 65 73 65 74 2d 73 74 61 74 65 20 69 76 79 2d 6c 61 73 74	)))...(ivy--reset-state.ivy-last
386c0	29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6b 6d 61 63 72 6f 2d 61 63 74 69 6f 6e	))..(defun.counsel-kmacro-action
386e0	2d 63 6f 70 79 2d 69 6e 69 74 69 61 6c 2d 63 6f 75 6e 74 65 72 2d 76 61 6c 75 65 20 28 63 61 6e	-copy-initial-counter-value.(can
38700	64 69 64 61 74 65 29 0a 20 20 22 50 61 73 73 20 60 63 6f 75 6e 73 65 6c 2d 6b 6d 61 63 72 6f 27	didate)..."Pass.`counsel-kmacro'
38720	20 43 41 4e 44 49 44 41 54 45 27 73 20 63 6f 75 6e 74 65 72 20 76 61 6c 75 65 20 74 6f 20 60 6b	.CANDIDATE's.counter.value.to.`k
38740	6d 61 63 72 6f 2d 73 65 74 2d 63 6f 75 6e 74 65 72 27 2e 0a 54 68 69 73 20 76 61 6c 75 65 20 77	macro-set-counter'..This.value.w
38760	69 6c 6c 20 62 65 20 75 73 65 64 20 62 79 20 74 68 65 20 6e 65 78 74 20 65 78 65 63 75 74 65 64	ill.be.used.by.the.next.executed
38780	20 6d 61 63 72 6f 2c 20 6f 72 20 61 73 20 61 0a 73 74 61 72 74 69 6e 67 20 76 61 6c 75 65 20 62	.macro,.or.as.a.starting.value.b
387a0	79 20 74 68 65 20 6e 65 78 74 20 6d 61 63 72 6f 20 64 65 66 69 6e 65 64 2e 0a 0a 4e 6f 74 65 20	y.the.next.macro.defined...Note.
387c0	74 68 61 74 20 65 78 65 63 75 74 69 6e 67 20 61 6e 20 65 78 69 73 74 69 6e 67 20 6d 61 63 72 6f	that.executing.an.existing.macro
387e0	20 74 68 61 74 20 69 74 73 65 6c 66 20 75 73 65 73 20 61 20 63 6f 75 6e 74 65 72 0a 65 66 66 65	.that.itself.uses.a.counter.effe
38800	63 74 69 76 65 6c 79 20 72 65 73 65 74 73 20 74 68 65 20 73 74 61 72 74 69 6e 67 20 63 6f 75 6e	ctively.resets.the.starting.coun
38820	74 65 72 20 76 61 6c 75 65 20 66 6f 72 20 74 68 65 20 6e 65 78 74 20 6d 61 63 72 6f 0a 64 65 66	ter.value.for.the.next.macro.def
38840	69 6e 69 74 69 6f 6e 20 74 6f 20 30 2e 22 0a 20 20 28 6b 6d 61 63 72 6f 2d 73 65 74 2d 63 6f 75	inition.to.0."...(kmacro-set-cou
38860	6e 74 65 72 20 28 63 6f 75 6e 73 65 6c 2d 2d 77 69 74 68 2d 6b 6d 61 63 72 6f 20 28 63 64 72 20	nter.(counsel--with-kmacro.(cdr.
38880	63 61 6e 64 69 64 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	candidate)......................
388a0	20 20 20 6b 6d 61 63 72 6f 2d 63 6f 75 6e 74 65 72 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75	...kmacro-counter)))..(defun.cou
388c0	6e 73 65 6c 2d 6b 6d 61 63 72 6f 2d 61 63 74 69 6f 6e 2d 63 6f 70 79 2d 63 6f 75 6e 74 65 72 2d	nsel-kmacro-action-copy-counter-
388e0	66 6f 72 6d 61 74 2d 66 6f 72 2d 6e 65 77 2d 6d 61 63 72 6f 20 28 63 61 6e 64 69 64 61 74 65 29	format-for-new-macro.(candidate)
38900	0a 20 20 22 50 61 73 73 20 60 63 6f 75 6e 73 65 6c 2d 6b 6d 61 63 72 6f 27 20 43 41 4e 44 49 44	..."Pass.`counsel-kmacro'.CANDID
38920	41 54 45 27 73 20 63 6f 75 6e 74 65 72 20 66 6f 72 6d 61 74 20 74 6f 20 60 6b 6d 61 63 72 6f 2d	ATE's.counter.format.to.`kmacro-
38940	73 65 74 2d 66 6f 72 6d 61 74 27 2e 0a 0a 57 68 65 6e 20 6e 6f 20 6b 65 79 62 6f 61 72 64 20 6d	set-format'...When.no.keyboard.m
38960	61 63 72 6f 20 69 73 20 62 65 69 6e 67 20 64 65 66 69 6e 65 64 20 6f 72 20 65 78 65 63 75 74 65	acro.is.being.defined.or.execute
38980	64 2c 20 74 68 69 73 20 61 66 66 65 63 74 73 20 74 68 65 0a 64 65 66 61 75 6c 74 20 66 6f 72 20	d,.this.affects.the.default.for.
389a0	61 6c 6c 20 73 75 62 73 65 71 75 65 6e 74 20 6d 61 63 72 6f 20 64 65 66 69 6e 69 74 69 6f 6e 73	all.subsequent.macro.definitions
389c0	2e 22 0a 20 20 28 6b 6d 61 63 72 6f 2d 73 65 74 2d 66 6f 72 6d 61 74 20 28 63 6f 75 6e 73 65 6c	."...(kmacro-set-format.(counsel
389e0	2d 2d 77 69 74 68 2d 6b 6d 61 63 72 6f 20 28 63 64 72 20 63 61 6e 64 69 64 61 74 65 29 0a 20 20	--with-kmacro.(cdr.candidate)...
38a00	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6b 6d 61 63 72 6f 2d 63 6f 75 6e	.....................kmacro-coun
38a20	74 65 72 2d 66 6f 72 6d 61 74 2d 73 74 61 72 74 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e	ter-format-start)))..(defun.coun
38a40	73 65 6c 2d 2d 6b 6d 61 63 72 6f 2d 63 79 63 6c 65 2d 75 6e 74 69 6c 20 28 6b 6d 61 63 72 6f 29	sel--kmacro-cycle-until.(kmacro)
38a60	0a 20 20 22 43 79 63 6c 65 20 6d 61 63 72 6f 20 72 69 6e 67 20 75 6e 74 69 6c 20 4b 4d 41 43 52	..."Cycle.macro.ring.until.KMACR
38a80	4f 20 69 73 20 74 68 65 20 68 65 61 64 3b 20 72 65 74 75 72 6e 20 6e 75 6d 62 65 72 20 6f 66 20	O.is.the.head;.return.number.of.
38aa0	73 74 65 70 73 2e 22 0a 20 20 28 6c 65 74 20 28 28 69 20 30 29 0a 20 20 20 20 20 20 20 20 3b 3b	steps."...(let.((i.0).........;;
38ac0	20 50 75 72 65 6c 79 20 64 65 66 65 6e 73 69 76 65 3b 20 69 6e 66 6c 6f 6f 70 20 73 68 6f 75 6c	.Purely.defensive;.infloop.shoul
38ae0	64 20 6e 65 76 65 72 20 68 61 70 70 65 6e 2e 0a 20 20 20 20 20 20 20 20 3b 3b 20 50 75 72 65 6c	d.never.happen..........;;.Purel
38b00	79 20 64 65 66 65 6e 73 69 76 65 3b 20 69 6e 66 6c 6f 6f 70 20 73 68 6f 75 6c 64 20 6e 65 76 65	y.defensive;.infloop.should.neve
38b20	72 20 68 61 70 70 65 6e 2e 0a 20 20 20 20 20 20 20 20 3b 3b 20 50 75 72 65 6c 79 20 64 65 66 65	r.happen..........;;.Purely.defe
38b40	6e 73 69 76 65 3b 20 69 6e 66 6c 6f 6f 70 20 73 68 6f 75 6c 64 20 6e 65 76 65 72 20 68 61 70 70	nsive;.infloop.should.never.happ
38b60	65 6e 2e 5b 51 75 69 74 5d 0a 20 20 20 20 20 20 20 20 28 66 75 65 6c 20 28 2a 20 34 20 28 31 2b	en.[Quit].........(fuel.(*.4.(1+
38b80	20 28 6c 65 6e 67 74 68 20 6b 6d 61 63 72 6f 2d 72 69 6e 67 29 29 29 29 29 0a 20 20 20 20 28 77	.(length.kmacro-ring))))).....(w
38ba0	68 69 6c 65 20 28 6e 6f 74 20 28 65 71 75 61 6c 20 6b 6d 61 63 72 6f 20 28 6b 6d 61 63 72 6f 2d	hile.(not.(equal.kmacro.(kmacro-
38bc0	72 69 6e 67 2d 68 65 61 64 29 29 29 0a 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 6e 61 74 6e	ring-head))).......(unless.(natn
38be0	75 6d 70 20 28 63 6c 2d 64 65 63 66 20 66 75 65 6c 29 29 0a 20 20 20 20 20 20 20 20 28 65 72 72	ump.(cl-decf.fuel)).........(err
38c00	6f 72 20 22 60 63 6f 75 6e 73 65 6c 2d 6b 6d 61 63 72 6f 27 20 62 75 67 3a 20 65 78 63 65 65 64	or."`counsel-kmacro'.bug:.exceed
38c20	65 64 20 63 79 63 6c 65 20 6c 69 6d 69 74 22 29 29 0a 20 20 20 20 20 20 28 6b 6d 61 63 72 6f 2d	ed.cycle.limit")).......(kmacro-
38c40	63 79 63 6c 65 2d 72 69 6e 67 2d 70 72 65 76 69 6f 75 73 29 0a 20 20 20 20 20 20 28 63 6c 2d 69	cycle-ring-previous).......(cl-i
38c60	6e 63 66 20 69 29 29 0a 20 20 20 20 69 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d	ncf.i)).....i))..(defun.counsel-
38c80	6b 6d 61 63 72 6f 2d 61 63 74 69 6f 6e 2d 63 79 63 6c 65 2d 72 69 6e 67 2d 74 6f 2d 6d 61 63 72	kmacro-action-cycle-ring-to-macr
38ca0	6f 20 28 63 61 6e 64 69 64 61 74 65 29 0a 20 20 22 43 79 63 6c 65 20 60 6b 6d 61 63 72 6f 2d 72	o.(candidate)..."Cycle.`kmacro-r
38cc0	69 6e 67 27 20 75 6e 74 69 6c 20 60 6c 61 73 74 2d 6b 62 64 2d 6d 61 63 72 6f 27 20 69 73 20 74	ing'.until.`last-kbd-macro'.is.t
38ce0	68 65 20 73 65 6c 65 63 74 65 64 20 6d 61 63 72 6f 2e 0a 54 68 69 73 20 69 73 20 63 6f 6e 76 65	he.selected.macro..This.is.conve
38d00	6e 69 65 6e 74 20 77 68 65 6e 20 75 73 69 6e 67 20 5c 5c 5b 6b 6d 61 63 72 6f 2d 65 6e 64 2d 6f	nient.when.using.\\[kmacro-end-o
38d20	72 2d 63 61 6c 6c 2d 6d 61 63 72 6f 5d 20 74 6f 20 63 61 6c 6c 20 6d 61 63 72 6f 73 2e 22 0a 20	r-call-macro].to.call.macros."..
38d40	20 28 63 6f 75 6e 73 65 6c 2d 2d 6b 6d 61 63 72 6f 2d 63 79 63 6c 65 2d 75 6e 74 69 6c 20 28 63	.(counsel--kmacro-cycle-until.(c
38d60	64 72 20 63 61 6e 64 69 64 61 74 65 29 29 0a 20 20 3b 3b 20 55 70 64 61 74 65 20 73 74 61 74 65	dr.candidate))...;;.Update.state
38d80	20 66 6f 72 20 6e 65 78 74 20 60 69 76 79 2d 63 61 6c 6c 27 2e 0a 20 20 28 73 65 74 66 20 28 69	.for.next.`ivy-call'....(setf.(i
38da0	76 79 2d 73 74 61 74 65 2d 63 6f 6c 6c 65 63 74 69 6f 6e 20 69 76 79 2d 6c 61 73 74 29 20 28 63	vy-state-collection.ivy-last).(c
38dc0	6f 75 6e 73 65 6c 2d 2d 6b 6d 61 63 72 6f 2d 63 61 6e 64 69 64 61 74 65 73 29 29 0a 20 20 28 69	ounsel--kmacro-candidates))...(i
38de0	76 79 2d 2d 72 65 73 65 74 2d 73 74 61 74 65 20 69 76 79 2d 6c 61 73 74 29 29 0a 0a 28 64 65 66	vy--reset-state.ivy-last))..(def
38e00	75 6e 20 63 6f 75 6e 73 65 6c 2d 6b 6d 61 63 72 6f 2d 61 63 74 69 6f 6e 2d 73 65 74 2d 73 61 76	un.counsel-kmacro-action-set-sav
38e20	65 64 2d 73 74 61 72 74 69 6e 67 2d 63 6f 75 6e 74 65 72 20 28 63 61 6e 64 69 64 61 74 65 29 0a	ed-starting-counter.(candidate).
38e40	20 20 22 53 65 74 20 74 68 65 20 63 6f 75 6e 74 65 72 20 76 61 6c 75 65 20 6f 66 20 60 63 6f 75	.."Set.the.counter.value.of.`cou
38e60	6e 73 65 6c 2d 6b 6d 61 63 72 6f 27 20 43 41 4e 44 49 44 41 54 45 2e 0a 49 6e 74 65 72 61 63 74	nsel-kmacro'.CANDIDATE..Interact
38e80	69 76 65 6c 79 20 72 65 61 64 73 20 61 20 6e 65 77 20 63 6f 75 6e 74 65 72 20 76 61 6c 75 65 20	ively.reads.a.new.counter.value.
38ea0	66 72 6f 6d 20 74 68 65 20 6d 69 6e 69 62 75 66 66 65 72 2e 0a 0a 4e 6f 74 65 20 74 68 61 74 20	from.the.minibuffer...Note.that.
38ec0	74 68 69 73 20 72 65 71 75 69 72 65 73 20 63 79 63 6c 69 6e 67 20 74 68 65 20 6b 65 79 62 6f 61	this.requires.cycling.the.keyboa
38ee0	72 64 20 6d 61 63 72 6f 20 72 69 6e 67 20 75 6e 74 69 6c 20 43 41 4e 44 49 44 41 54 45 2c 0a 61	rd.macro.ring.until.CANDIDATE,.a
38f00	6e 64 20 74 68 65 6e 20 63 79 63 6c 69 6e 67 20 62 61 63 6b 2e 22 0a 20 20 28 6c 65 74 2a 20 28	nd.then.cycling.back."...(let*.(
38f20	28 6b 6d 20 28 63 64 72 20 63 61 6e 64 69 64 61 74 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 63	(km.(cdr.candidate))..........(c
38f40	6e 74 20 28 63 6f 75 6e 73 65 6c 2d 2d 77 69 74 68 2d 6b 6d 61 63 72 6f 20 6b 6d 20 6b 6d 61 63	nt.(counsel--with-kmacro.km.kmac
38f60	72 6f 2d 63 6f 75 6e 74 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 28 63 6e 74 20 28 69 66 20 28	ro-counter))..........(cnt.(if.(
38f80	7a 65 72 6f 70 20 63 6e 74 29 20 63 6e 74 20 28 6c 69 73 74 20 30 20 63 6e 74 29 29 29 0a 20 20	zerop.cnt).cnt.(list.0.cnt)))...
38fa0	20 20 20 20 20 20 20 28 69 20 28 63 6f 75 6e 73 65 6c 2d 2d 6b 6d 61 63 72 6f 2d 63 79 63 6c 65	.......(i.(counsel--kmacro-cycle
38fc0	2d 75 6e 74 69 6c 20 6b 6d 29 29 29 0a 20 20 20 20 28 73 65 74 71 20 6b 6d 61 63 72 6f 2d 63 6f	-until.km))).....(setq.kmacro-co
38fe0	75 6e 74 65 72 20 28 72 65 61 64 2d 6e 75 6d 62 65 72 20 22 4e 65 77 20 6d 61 63 72 6f 20 63 6f	unter.(read-number."New.macro.co
39000	75 6e 74 65 72 3a 20 22 20 63 6e 74 29 29 0a 20 20 20 20 28 64 6f 74 69 6d 65 73 20 28 5f 20 69	unter:.".cnt)).....(dotimes.(_.i
39020	29 20 28 6b 6d 61 63 72 6f 2d 63 79 63 6c 65 2d 72 69 6e 67 2d 6e 65 78 74 29 29 29 0a 20 20 3b	).(kmacro-cycle-ring-next)))...;
39040	3b 20 55 70 64 61 74 65 20 73 74 61 74 65 20 66 6f 72 20 6e 65 78 74 20 60 69 76 79 2d 63 61 6c	;.Update.state.for.next.`ivy-cal
39060	6c 27 2e 0a 20 20 28 73 65 74 66 20 28 69 76 79 2d 73 74 61 74 65 2d 63 6f 6c 6c 65 63 74 69 6f	l'....(setf.(ivy-state-collectio
39080	6e 20 69 76 79 2d 6c 61 73 74 29 20 28 63 6f 75 6e 73 65 6c 2d 2d 6b 6d 61 63 72 6f 2d 63 61 6e	n.ivy-last).(counsel--kmacro-can
390a0	64 69 64 61 74 65 73 29 29 0a 20 20 28 73 65 74 66 20 28 69 76 79 2d 73 74 61 74 65 2d 70 72 65	didates))...(setf.(ivy-state-pre
390c0	73 65 6c 65 63 74 20 69 76 79 2d 6c 61 73 74 29 20 69 76 79 2d 2d 69 6e 64 65 78 29 0a 20 20 3b	select.ivy-last).ivy--index)...;
390e0	3b 20 45 6d 61 63 73 20 32 38 20 73 65 65 6d 73 20 74 6f 20 68 61 76 65 20 73 6f 6d 65 20 62 75	;.Emacs.28.seems.to.have.some.bu
39100	67 20 77 68 65 72 65 20 74 68 65 20 74 65 78 74 20 6f 66 20 74 68 65 20 63 61 6e 64 69 64 61 74	g.where.the.text.of.the.candidat
39120	65 73 0a 20 20 3b 3b 20 69 6e 20 74 68 65 20 6d 69 6e 69 62 75 66 66 65 72 20 69 73 20 6e 6f 74	es...;;.in.the.minibuffer.is.not
39140	20 69 6d 6d 65 64 69 61 74 65 6c 79 20 72 65 66 72 65 73 68 65 64 2e 0a 20 20 28 69 76 79 2d 2d	.immediately.refreshed....(ivy--
39160	72 65 73 65 74 2d 73 74 61 74 65 20 69 76 79 2d 6c 61 73 74 29 29 0a 0a 28 64 65 66 75 6e 20 63	reset-state.ivy-last))..(defun.c
39180	6f 75 6e 73 65 6c 2d 6b 6d 61 63 72 6f 2d 61 63 74 69 6f 6e 2d 65 78 65 63 75 74 65 2d 61 66 74	ounsel-kmacro-action-execute-aft
391a0	65 72 2d 70 72 6f 6d 70 74 20 28 63 61 6e 64 69 64 61 74 65 29 0a 20 20 22 45 78 65 63 75 74 65	er-prompt.(candidate)..."Execute
391c0	20 73 65 6c 65 63 74 65 64 20 6b 65 79 62 6f 61 72 64 20 6d 61 63 72 6f 20 77 69 74 68 20 61 20	.selected.keyboard.macro.with.a.
391e0	64 69 66 66 65 72 65 6e 74 20 63 6f 75 6e 74 65 72 20 61 6e 64 20 66 6f 72 6d 61 74 2e 0a 0a 50	different.counter.and.format...P
39200	72 6f 6d 70 74 20 66 6f 72 20 74 68 65 20 6e 75 6d 62 65 72 20 6f 66 20 74 69 6d 65 73 20 74 6f	rompt.for.the.number.of.times.to
39220	20 65 78 65 63 75 74 65 20 74 68 65 20 6d 61 63 72 6f 2c 20 74 68 65 20 73 74 61 72 74 69 6e 67	.execute.the.macro,.the.starting
39240	0a 63 6f 75 6e 74 65 72 2c 20 61 6e 64 20 74 68 65 20 63 6f 75 6e 74 65 72 20 66 6f 72 6d 61 74	.counter,.and.the.counter.format
39260	2e 20 20 54 68 65 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 76 61 6c 75 65 73 20 66 72 6f 6d	...The.corresponding.values.from
39280	20 74 68 65 0a 73 65 6c 65 63 74 65 64 20 60 63 6f 75 6e 73 65 6c 2d 6b 6d 61 63 72 6f 27 20 43	.the.selected.`counsel-kmacro'.C
392a0	41 4e 44 49 44 41 54 45 20 73 65 72 76 65 20 61 73 20 64 65 66 61 75 6c 74 73 2e 20 20 49 66 20	ANDIDATE.serve.as.defaults...If.
392c0	74 68 69 73 20 61 63 74 69 6f 6e 0a 69 73 20 63 61 6c 6c 65 64 20 77 69 74 68 20 61 20 70 72 65	this.action.is.called.with.a.pre
392e0	66 69 78 20 61 72 67 75 6d 65 6e 74 2c 20 69 74 73 20 6e 75 6d 65 72 69 63 20 76 61 6c 75 65 20	fix.argument,.its.numeric.value.
39300	61 6c 73 6f 20 73 65 72 76 65 73 20 61 73 20 61 0a 64 65 66 61 75 6c 74 20 6f 70 74 69 6f 6e 20	also.serves.as.a.default.option.
39320	66 6f 72 20 74 68 65 20 6e 75 6d 62 65 72 20 6f 66 20 69 74 65 72 61 74 69 6f 6e 73 20 61 6e 64	for.the.number.of.iterations.and
39340	20 63 6f 75 6e 74 65 72 2e 0a 0a 54 68 65 20 65 78 69 73 74 69 6e 67 20 43 41 4e 44 49 44 41 54	.counter...The.existing.CANDIDAT
39360	45 2c 20 69 74 73 20 63 6f 75 6e 74 65 72 20 61 6e 64 20 66 6f 72 6d 61 74 2c 20 61 72 65 20 6c	E,.its.counter.and.format,.are.l
39380	65 66 74 20 75 6e 63 68 61 6e 67 65 64 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 70 72 65 20 28 6f	eft.unchanged."...(let*.((pre.(o
393a0	72 20 69 76 79 2d 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 20 63 75 72 72 65 6e 74	r.ivy-current-prefix-arg.current
393c0	2d 70 72 65 66 69 78 2d 61 72 67 29 29 0a 20 20 20 20 20 20 20 20 20 28 70 72 65 20 28 61 6e 64	-prefix-arg))..........(pre.(and
393e0	20 70 72 65 20 28 70 72 65 66 69 78 2d 6e 75 6d 65 72 69 63 2d 76 61 6c 75 65 20 70 72 65 29 29	.pre.(prefix-numeric-value.pre))
39400	29 29 0a 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 77 69 74 68 2d 6b 6d 61 63 72 6f 20 28 63 64	)).....(counsel--with-kmacro.(cd
39420	72 20 63 61 6e 64 69 64 61 74 65 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 74 69 6d 65 73 20	r.candidate).......(let.((times.
39440	28 72 65 61 64 2d 6e 75 6d 62 65 72 20 22 4e 75 6d 62 65 72 20 6f 66 20 6d 61 63 72 6f 20 69 74	(read-number."Number.of.macro.it
39460	65 72 61 74 69 6f 6e 73 3a 20 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	erations:.".....................
39480	20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 64 65 66 20 27 28 31 20 32 29 29 29 0a	............(let.((def.'(1.2))).
394a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
394c0	20 20 28 69 66 20 70 72 65 20 28 63 6f 6e 73 20 70 72 65 20 64 65 66 29 20 64 65 66 29 29 29 29	..(if.pre.(cons.pre.def).def))))
394e0	29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 6b 6d 61 63 72 6f 2d 63 6f 75 6e 74 65 72 0a 20	).........(setq.kmacro-counter..
39500	20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 61 64 2d 6e 75 6d 62 65 72 20 22 4d 61 63 72 6f	.............(read-number."Macro
39520	20 63 6f 75 6e 74 65 72 20 76 61 6c 75 65 3a 20 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.counter.value:."...............
39540	20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 70 72 65 20 28 6c 69 73 74 20 70 72 65 20 6b	.............(if.pre.(list.pre.k
39560	6d 61 63 72 6f 2d 63 6f 75 6e 74 65 72 29 20 6b 6d 61 63 72 6f 2d 63 6f 75 6e 74 65 72 29 29 29	macro-counter).kmacro-counter)))
39580	0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 6b 6d 61 63 72 6f 2d 63 6f 75 6e 74 65 72 2d 66 6f	.........(setq.kmacro-counter-fo
395a0	72 6d 61 74 2d 73 74 61 72 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28	rmat-start...............(let.((
395c0	70 72 6f 6d 70 74 20 22 4d 61 63 72 6f 20 63 6f 75 6e 74 65 72 20 66 6f 72 6d 61 74 22 29 0a 20	prompt."Macro.counter.format")..
395e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 66 20 6b 6d 61 63 72 6f 2d 63	...................(def.kmacro-c
39600	6f 75 6e 74 65 72 2d 66 6f 72 6d 61 74 2d 73 74 61 72 74 29 29 0a 20 20 20 20 20 20 20 20 20 20	ounter-format-start))...........
39620	20 20 20 20 20 20 28 72 65 61 64 2d 73 74 72 69 6e 67 20 28 69 66 20 28 66 62 6f 75 6e 64 70 20	......(read-string.(if.(fboundp.
39640	27 66 6f 72 6d 61 74 2d 70 72 6f 6d 70 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	'format-prompt).................
39660	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 2d 70 72 6f 6d 70 74 20	.................(format-prompt.
39680	70 72 6f 6d 70 74 20 64 65 66 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	prompt.def).....................
396a0	20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 20 28 64 65 66 61 75 6c 74 3a	...........(format."%s.(default:
396c0	20 25 73 29 3a 20 22 20 70 72 6f 6d 70 74 20 64 65 66 29 29 0a 20 20 20 20 20 20 20 20 20 20 20	.%s):.".prompt.def))............
396e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 20 6e 69 6c 20 64 65 66 29 29 29	..................nil.nil.def)))
39700	0a 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 6b 6d 61 63 72 6f 2d 65 78 65 63 20 28	.........(counsel--kmacro-exec.(
39720	6b 6d 61 63 72 6f 2d 72 69 6e 67 2d 68 65 61 64 29 20 74 69 6d 65 73 29 29 29 29 29 0a 0a 28 69	kmacro-ring-head).times)))))..(i
39740	76 79 2d 73 65 74 2d 61 63 74 69 6f 6e 73 0a 20 27 63 6f 75 6e 73 65 6c 2d 6b 6d 61 63 72 6f 0a	vy-set-actions..'counsel-kmacro.
39760	20 60 28 28 22 63 22 20 2c 23 27 63 6f 75 6e 73 65 6c 2d 6b 6d 61 63 72 6f 2d 61 63 74 69 6f 6e	.`(("c".,#'counsel-kmacro-action
39780	2d 63 79 63 6c 65 2d 72 69 6e 67 2d 74 6f 2d 6d 61 63 72 6f 0a 20 20 20 20 22 63 79 63 6c 65 20	-cycle-ring-to-macro....."cycle.
397a0	74 6f 22 29 0a 20 20 20 28 22 64 22 20 2c 23 27 63 6f 75 6e 73 65 6c 2d 6b 6d 61 63 72 6f 2d 61	to")....("d".,#'counsel-kmacro-a
397c0	63 74 69 6f 6e 2d 64 65 6c 65 74 65 2d 6b 6d 61 63 72 6f 0a 20 20 20 20 22 64 65 6c 65 74 65 22	ction-delete-kmacro....."delete"
397e0	29 0a 20 20 20 28 22 65 22 20 2c 23 27 63 6f 75 6e 73 65 6c 2d 6b 6d 61 63 72 6f 2d 61 63 74 69	)....("e".,#'counsel-kmacro-acti
39800	6f 6e 2d 65 78 65 63 75 74 65 2d 61 66 74 65 72 2d 70 72 6f 6d 70 74 0a 20 20 20 20 22 65 78 65	on-execute-after-prompt....."exe
39820	63 75 74 65 20 61 66 74 65 72 20 70 72 6f 6d 70 74 22 29 0a 20 20 20 28 22 66 22 20 2c 23 27 63	cute.after.prompt")....("f".,#'c
39840	6f 75 6e 73 65 6c 2d 6b 6d 61 63 72 6f 2d 61 63 74 69 6f 6e 2d 63 6f 70 79 2d 63 6f 75 6e 74 65	ounsel-kmacro-action-copy-counte
39860	72 2d 66 6f 72 6d 61 74 2d 66 6f 72 2d 6e 65 77 2d 6d 61 63 72 6f 0a 20 20 20 20 22 63 6f 70 79	r-format-for-new-macro....."copy
39880	20 63 6f 75 6e 74 65 72 20 66 6f 72 6d 61 74 20 66 6f 72 20 6e 65 77 20 6d 61 63 72 6f 22 29 0a	.counter.format.for.new.macro").
398a0	20 20 20 28 22 73 22 20 2c 23 27 63 6f 75 6e 73 65 6c 2d 6b 6d 61 63 72 6f 2d 61 63 74 69 6f 6e	...("s".,#'counsel-kmacro-action
398c0	2d 73 65 74 2d 73 61 76 65 64 2d 73 74 61 72 74 69 6e 67 2d 63 6f 75 6e 74 65 72 0a 20 20 20 20	-set-saved-starting-counter.....
398e0	22 73 65 74 20 74 68 69 73 20 63 6f 75 6e 74 65 72 20 76 61 6c 75 65 22 29 0a 20 20 20 28 22 76	"set.this.counter.value")....("v
39900	22 20 2c 23 27 63 6f 75 6e 73 65 6c 2d 6b 6d 61 63 72 6f 2d 61 63 74 69 6f 6e 2d 63 6f 70 79 2d	".,#'counsel-kmacro-action-copy-
39920	69 6e 69 74 69 61 6c 2d 63 6f 75 6e 74 65 72 2d 76 61 6c 75 65 0a 20 20 20 20 22 63 6f 70 79 20	initial-counter-value....."copy.
39940	73 74 61 72 74 69 6e 67 20 63 6f 75 6e 74 65 72 20 76 61 6c 75 65 22 29 29 29 0a 0a 3b 3b 3b 3b	starting.counter.value")))..;;;;
39960	20 60 63 6f 75 6e 73 65 6c 2d 67 65 69 73 65 72 2d 64 6f 63 2d 6c 6f 6f 6b 2d 75 70 2d 6d 61 6e	.`counsel-geiser-doc-look-up-man
39980	75 61 6c 27 0a 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 67 65 69 73 65 72 2d 64	ual'..(declare-function.geiser-d
399a0	6f 63 2d 6d 61 6e 75 61 6c 2d 66 6f 72 2d 73 79 6d 62 6f 6c 20 22 65 78 74 3a 67 65 69 73 65 72	oc-manual-for-symbol."ext:geiser
399c0	2d 64 6f 63 22 29 0a 28 64 65 66 76 61 72 20 67 65 69 73 65 72 2d 63 6f 6d 70 6c 65 74 69 6f 6e	-doc").(defvar.geiser-completion
399e0	2d 73 79 6d 62 6f 6c 2d 6c 69 73 74 2d 66 75 6e 63 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e	-symbol-list-func)..(defvar.coun
39a00	73 65 6c 2d 67 65 69 73 65 72 2d 64 6f 63 2d 6c 6f 6f 6b 2d 75 70 2d 6d 61 6e 75 61 6c 2d 68 69	sel-geiser-doc-look-up-manual-hi
39a20	73 74 6f 72 79 20 28 29 0a 20 20 22 48 69 73 74 6f 72 79 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c	story.()..."History.for.`counsel
39a40	2d 67 65 69 73 65 72 2d 64 6f 63 2d 6c 6f 6f 6b 2d 75 70 2d 6d 61 6e 75 61 6c 27 2e 22 29 0a 0a	-geiser-doc-look-up-manual'.")..
39a60	3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 67 65	;;;###autoload.(defun.counsel-ge
39a80	69 73 65 72 2d 64 6f 63 2d 6c 6f 6f 6b 2d 75 70 2d 6d 61 6e 75 61 6c 20 28 29 0a 20 20 22 53 65	iser-doc-look-up-manual.()..."Se
39aa0	61 72 63 68 20 53 63 68 65 6d 65 20 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 2e 22 0a 20 20 28 69	arch.Scheme.documentation."...(i
39ac0	6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 69 76 79 2d 72 65 61 64 20 22 53 79 6d 62 6f 6c 3a	nteractive)...(ivy-read."Symbol:
39ae0	20 22 20 67 65 69 73 65 72 2d 63 6f 6d 70 6c 65 74 69 6f 6e 2d 73 79 6d 62 6f 6c 2d 6c 69 73 74	.".geiser-completion-symbol-list
39b00	2d 66 75 6e 63 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 71 75 69 72 65 2d 6d 61 74 63 68	-func.............:require-match
39b20	20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 69 73 74 6f 72 79 20 27 63 6f 75 6e 73 65 6c	.t.............:history.'counsel
39b40	2d 67 65 69 73 65 72 2d 64 6f 63 2d 6c 6f 6f 6b 2d 75 70 2d 6d 61 6e 75 61 6c 2d 68 69 73 74 6f	-geiser-doc-look-up-manual-histo
39b60	72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 28 6c 61 6d 62 64 61 20 28	ry.............:action.(lambda.(
39b80	63 61 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 65 69	cand).......................(gei
39ba0	73 65 72 2d 64 6f 63 2d 6d 61 6e 75 61 6c 2d 66 6f 72 2d 73 79 6d 62 6f 6c 20 28 69 6e 74 65 72	ser-doc-manual-for-symbol.(inter
39bc0	6e 20 63 61 6e 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63	n.cand))).............:caller.'c
39be0	6f 75 6e 73 65 6c 2d 67 65 69 73 65 72 2d 64 6f 63 2d 6c 6f 6f 6b 2d 75 70 2d 6d 61 6e 75 61 6c	ounsel-geiser-doc-look-up-manual
39c00	29 29 0a 0c 0a 3b 3b 3b 20 4d 69 73 63 2e 20 4f 53 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d	))...;;;.Misc..OS.;;;;.`counsel-
39c20	72 68 79 74 68 6d 62 6f 78 27 0a 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 64 62	rhythmbox'..(declare-function.db
39c40	75 73 2d 63 61 6c 6c 2d 6d 65 74 68 6f 64 20 22 64 62 75 73 22 29 0a 28 64 65 63 6c 61 72 65 2d	us-call-method."dbus").(declare-
39c60	66 75 6e 63 74 69 6f 6e 20 64 62 75 73 2d 67 65 74 2d 70 72 6f 70 65 72 74 79 20 22 64 62 75 73	function.dbus-get-property."dbus
39c80	22 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 72 75 6e 20 28 26 72 65 73 74 20 70	")..(defun.counsel--run.(&rest.p
39ca0	72 6f 67 72 61 6d 2d 61 6e 64 2d 61 72 67 73 29 0a 20 20 28 6c 65 74 20 28 28 6e 61 6d 65 20 28	rogram-and-args)...(let.((name.(
39cc0	6d 61 70 63 6f 6e 63 61 74 20 23 27 69 64 65 6e 74 69 74 79 20 70 72 6f 67 72 61 6d 2d 61 6e 64	mapconcat.#'identity.program-and
39ce0	2d 61 72 67 73 20 22 20 22 29 29 29 0a 20 20 20 20 28 61 70 70 6c 79 20 23 27 73 74 61 72 74 2d	-args."."))).....(apply.#'start-
39d00	70 72 6f 63 65 73 73 20 6e 61 6d 65 20 6e 69 6c 20 70 72 6f 67 72 61 6d 2d 61 6e 64 2d 61 72 67	process.name.nil.program-and-arg
39d20	73 29 0a 20 20 20 20 6e 61 6d 65 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 73	s).....name))..(defun.counsel--s
39d40	6c 20 28 63 6d 64 29 0a 20 20 22 53 68 65 6c 6c 20 63 6f 6d 6d 61 6e 64 20 74 6f 20 6c 69 73 74	l.(cmd)..."Shell.command.to.list
39d60	2e 22 0a 20 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 28 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e	."...(split-string.(shell-comman
39d80	64 2d 74 6f 2d 73 74 72 69 6e 67 20 63 6d 64 29 20 22 5c 6e 22 20 74 29 29 0a 0a 28 64 65 66 75	d-to-string.cmd)."\n".t))..(defu
39da0	6e 20 63 6f 75 6e 73 65 6c 2d 72 68 79 74 68 6d 62 6f 78 2d 70 6c 61 79 2d 73 6f 6e 67 20 28 73	n.counsel-rhythmbox-play-song.(s
39dc0	6f 6e 67 29 0a 20 20 22 4c 65 74 20 52 68 79 74 68 6d 62 6f 78 20 70 6c 61 79 20 53 4f 4e 47 2e	ong)..."Let.Rhythmbox.play.SONG.
39de0	22 0a 20 20 28 6c 65 74 20 28 28 66 69 72 73 74 20 28 73 74 72 69 6e 67 3d 20 28 73 68 65 6c 6c	"...(let.((first.(string=.(shell
39e00	2d 63 6f 6d 6d 61 6e 64 2d 74 6f 2d 73 74 72 69 6e 67 20 22 70 69 64 6f 66 20 72 68 79 74 68 6d	-command-to-string."pidof.rhythm
39e20	62 6f 78 22 29 20 22 22 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 72 76 69 63 65 20 22 6f 72 67	box")."")).........(service."org
39e40	2e 67 6e 6f 6d 65 2e 52 68 79 74 68 6d 62 6f 78 33 22 29 0a 20 20 20 20 20 20 20 20 28 70 61 74	.gnome.Rhythmbox3").........(pat
39e60	68 20 22 2f 6f 72 67 2f 6d 70 72 69 73 2f 4d 65 64 69 61 50 6c 61 79 65 72 32 22 29 0a 20 20 20	h."/org/mpris/MediaPlayer2")....
39e80	20 20 20 20 20 28 69 6e 74 65 72 66 61 63 65 20 22 6f 72 67 2e 6d 70 72 69 73 2e 4d 65 64 69 61	.....(interface."org.mpris.Media
39ea0	50 6c 61 79 65 72 32 2e 50 6c 61 79 65 72 22 29 29 0a 20 20 20 20 28 77 68 65 6e 20 66 69 72 73	Player2.Player")).....(when.firs
39ec0	74 0a 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 72 75 6e 20 22 6e 6f 68 75 70 22 20 22 72	t.......(counsel--run."nohup"."r
39ee0	68 79 74 68 6d 62 6f 78 22 29 0a 20 20 20 20 20 20 28 73 69 74 2d 66 6f 72 20 31 2e 35 29 29 0a	hythmbox").......(sit-for.1.5)).
39f00	20 20 20 20 28 64 62 75 73 2d 63 61 6c 6c 2d 6d 65 74 68 6f 64 20 3a 73 65 73 73 69 6f 6e 20 73	....(dbus-call-method.:session.s
39f20	65 72 76 69 63 65 20 70 61 74 68 20 69 6e 74 65 72 66 61 63 65 0a 20 20 20 20 20 20 20 20 20 20	ervice.path.interface...........
39f40	20 20 20 20 20 20 20 20 20 20 20 20 22 4f 70 65 6e 55 72 69 22 20 28 63 64 72 20 73 6f 6e 67 29	............"OpenUri".(cdr.song)
39f60	29 0a 20 20 20 20 28 6c 65 74 20 28 28 69 64 20 28 61 6e 64 20 66 69 72 73 74 0a 20 20 20 20 20	).....(let.((id.(and.first......
39f80	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 64 72 20 28 63 6f 75 6e 73 65 6c 2d 2d 77 6d 63	..............(cdr.(counsel--wmc
39fa0	74 72 6c 2d 70 61 72 73 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	trl-parse.......................
39fc0	20 20 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 20	...(shell-command-to-string.....
39fe0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 77 6d 63 74 72 6c 20 2d 6c	......................"wmctrl.-l
3a000	20 2d 70 20 7c 20 67 72 65 70 20 24 28 70 69 64 6f 66 20 72 68 79 74 68 6d 62 6f 78 29 22 29 29	.-p.|.grep.$(pidof.rhythmbox)"))
3a020	29 29 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 69 64 0a 20 20 20 20 20 20 20 20 28 73 69 74	)))).......(when.id.........(sit
3a040	2d 66 6f 72 20 30 2e 32 29 0a 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 72 75 6e 20	-for.0.2).........(counsel--run.
3a060	22 77 6d 63 74 72 6c 22 20 22 2d 69 63 22 20 69 64 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63	"wmctrl"."-ic".id)))))..(defun.c
3a080	6f 75 6e 73 65 6c 2d 72 68 79 74 68 6d 62 6f 78 2d 65 6e 71 75 65 75 65 2d 73 6f 6e 67 20 28 73	ounsel-rhythmbox-enqueue-song.(s
3a0a0	6f 6e 67 29 0a 20 20 22 4c 65 74 20 52 68 79 74 68 6d 62 6f 78 20 65 6e 71 75 65 75 65 20 53 4f	ong)..."Let.Rhythmbox.enqueue.SO
3a0c0	4e 47 2e 22 0a 20 20 28 6c 65 74 20 28 28 73 65 72 76 69 63 65 20 22 6f 72 67 2e 67 6e 6f 6d 65	NG."...(let.((service."org.gnome
3a0e0	2e 52 68 79 74 68 6d 62 6f 78 33 22 29 0a 20 20 20 20 20 20 20 20 28 70 61 74 68 20 22 2f 6f 72	.Rhythmbox3").........(path."/or
3a100	67 2f 67 6e 6f 6d 65 2f 52 68 79 74 68 6d 62 6f 78 33 2f 50 6c 61 79 51 75 65 75 65 22 29 0a 20	g/gnome/Rhythmbox3/PlayQueue")..
3a120	20 20 20 20 20 20 20 28 69 6e 74 65 72 66 61 63 65 20 22 6f 72 67 2e 67 6e 6f 6d 65 2e 52 68 79	.......(interface."org.gnome.Rhy
3a140	74 68 6d 62 6f 78 33 2e 50 6c 61 79 51 75 65 75 65 22 29 29 0a 20 20 20 20 28 64 62 75 73 2d 63	thmbox3.PlayQueue")).....(dbus-c
3a160	61 6c 6c 2d 6d 65 74 68 6f 64 20 3a 73 65 73 73 69 6f 6e 20 73 65 72 76 69 63 65 20 70 61 74 68	all-method.:session.service.path
3a180	20 69 6e 74 65 72 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	.interface......................
3a1a0	20 22 41 64 64 54 6f 51 75 65 75 65 22 20 28 63 64 72 20 73 6f 6e 67 29 29 29 29 0a 0a 28 64 65	."AddToQueue".(cdr.song))))..(de
3a1c0	66 75 6e 20 63 6f 75 6e 73 65 6c 2d 72 68 79 74 68 6d 62 6f 78 2d 70 6c 61 79 70 61 75 73 65 2d	fun.counsel-rhythmbox-playpause-
3a1e0	63 75 72 72 65 6e 74 2d 73 6f 6e 67 20 28 29 0a 20 20 22 50 6c 61 79 2f 70 61 75 73 65 20 74 68	current-song.()..."Play/pause.th
3a200	65 20 63 75 72 72 65 6e 74 20 73 6f 6e 67 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29	e.current.song."...(interactive)
3a220	0a 20 20 28 6c 65 74 20 28 28 73 65 72 76 69 63 65 20 22 6f 72 67 2e 67 6e 6f 6d 65 2e 52 68 79	...(let.((service."org.gnome.Rhy
3a240	74 68 6d 62 6f 78 33 22 29 0a 20 20 20 20 20 20 20 20 28 70 61 74 68 20 22 2f 6f 72 67 2f 6d 70	thmbox3").........(path."/org/mp
3a260	72 69 73 2f 4d 65 64 69 61 50 6c 61 79 65 72 32 22 29 0a 20 20 20 20 20 20 20 20 28 69 6e 74 65	ris/MediaPlayer2").........(inte
3a280	72 66 61 63 65 20 22 6f 72 67 2e 6d 70 72 69 73 2e 4d 65 64 69 61 50 6c 61 79 65 72 32 2e 50 6c	rface."org.mpris.MediaPlayer2.Pl
3a2a0	61 79 65 72 22 29 29 0a 20 20 20 20 28 64 62 75 73 2d 63 61 6c 6c 2d 6d 65 74 68 6f 64 20 3a 73	ayer")).....(dbus-call-method.:s
3a2c0	65 73 73 69 6f 6e 20 73 65 72 76 69 63 65 20 70 61 74 68 20 69 6e 74 65 72 66 61 63 65 0a 20 20	ession.service.path.interface...
3a2e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 50 6c 61 79 50 61 75 73 65 22 29	...................."PlayPause")
3a300	29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 72 68 79 74 68 6d 62 6f 78 2d 74 6f 67	))..(defun.counsel-rhythmbox-tog
3a320	67 6c 65 2d 73 68 75 66 66 6c 65 20 28 5f 73 6f 6e 67 29 0a 20 20 22 54 6f 67 67 6c 65 20 52 68	gle-shuffle.(_song)..."Toggle.Rh
3a340	79 74 68 6d 62 6f 78 20 73 68 75 66 66 6c 65 20 73 65 74 74 69 6e 67 2e 22 0a 20 20 28 6c 65 74	ythmbox.shuffle.setting."...(let
3a360	2a 20 28 28 6f 6c 64 2d 6f 72 64 65 72 20 28 63 6f 75 6e 73 65 6c 2d 2d 63 6f 6d 6d 61 6e 64 20	*.((old-order.(counsel--command.
3a380	22 64 63 6f 6e 66 22 20 22 72 65 61 64 22 20 22 2f 6f 72 67 2f 67 6e 6f 6d 65 2f 72 68 79 74 68	"dconf"."read"."/org/gnome/rhyth
3a3a0	6d 62 6f 78 2f 70 6c 61 79 65 72 2f 70 6c 61 79 2d 6f 72 64 65 72 22 29 29 0a 20 20 20 20 20 20	mbox/player/play-order")).......
3a3c0	20 20 20 28 6e 65 77 2d 6f 72 64 65 72 20 28 69 66 20 28 73 74 72 69 6e 67 3d 20 6f 6c 64 2d 6f	...(new-order.(if.(string=.old-o
3a3e0	72 64 65 72 20 22 27 73 68 75 66 66 6c 65 27 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	rder."'shuffle'")...............
3a400	20 20 20 20 20 20 20 20 20 20 22 27 6c 69 6e 65 61 72 27 22 0a 20 20 20 20 20 20 20 20 20 20 20	.........."'linear'"............
3a420	20 20 20 20 20 20 20 20 20 20 20 22 27 73 68 75 66 66 6c 65 27 22 29 29 29 0a 20 20 20 20 28 63	..........."'shuffle'"))).....(c
3a440	6f 75 6e 73 65 6c 2d 2d 63 6f 6d 6d 61 6e 64 0a 20 20 20 20 20 22 64 63 6f 6e 66 22 0a 20 20 20	ounsel--command......"dconf"....
3a460	20 20 22 77 72 69 74 65 22 0a 20 20 20 20 20 22 2f 6f 72 67 2f 67 6e 6f 6d 65 2f 72 68 79 74 68	.."write"......"/org/gnome/rhyth
3a480	6d 62 6f 78 2f 70 6c 61 79 65 72 2f 70 6c 61 79 2d 6f 72 64 65 72 22 0a 20 20 20 20 20 6e 65 77	mbox/player/play-order"......new
3a4a0	2d 6f 72 64 65 72 29 0a 20 20 20 20 28 6d 65 73 73 61 67 65 20 28 69 66 20 28 73 74 72 69 6e 67	-order).....(message.(if.(string
3a4c0	3d 20 6e 65 77 2d 6f 72 64 65 72 20 22 27 73 68 75 66 66 6c 65 27 22 29 0a 20 20 20 20 20 20 20	=.new-order."'shuffle'")........
3a4e0	20 20 20 20 20 20 20 20 20 20 22 73 68 75 66 66 6c 65 20 6f 6e 22 0a 20 20 20 20 20 20 20 20 20	.........."shuffle.on"..........
3a500	20 20 20 20 20 20 22 73 68 75 66 66 6c 65 20 6f 66 66 22 29 29 29 29 0a 0a 28 64 65 66 76 61 72	......"shuffle.off"))))..(defvar
3a520	20 63 6f 75 6e 73 65 6c 2d 72 68 79 74 68 6d 62 6f 78 2d 68 69 73 74 6f 72 79 20 6e 69 6c 0a 20	.counsel-rhythmbox-history.nil..
3a540	20 22 48 69 73 74 6f 72 79 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 72 68 79 74 68 6d 62 6f 78	."History.for.`counsel-rhythmbox
3a560	27 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 72 68 79 74 68 6d 62 6f 78 2d	'.")..(defvar.counsel-rhythmbox-
3a580	73 6f 6e 67 73 20 6e 69 6c 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 72 68 79 74 68	songs.nil)..(defun.counsel-rhyth
3a5a0	6d 62 6f 78 2d 63 75 72 72 65 6e 74 2d 73 6f 6e 67 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 74	mbox-current-song.()..."Return.t
3a5c0	68 65 20 63 75 72 72 65 6e 74 6c 79 20 70 6c 61 79 69 6e 67 20 73 6f 6e 67 20 74 69 74 6c 65 2e	he.currently.playing.song.title.
3a5e0	22 0a 20 20 28 69 67 6e 6f 72 65 2d 65 72 72 6f 72 73 0a 20 20 20 20 28 6c 65 74 2a 20 28 28 65	"...(ignore-errors.....(let*.((e
3a600	6e 74 72 79 20 28 64 62 75 73 2d 67 65 74 2d 70 72 6f 70 65 72 74 79 0a 20 20 20 20 20 20 20 20	ntry.(dbus-get-property.........
3a620	20 20 20 20 20 20 20 20 20 20 20 3a 73 65 73 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20	...........:session.............
3a640	20 20 20 20 20 20 20 22 6f 72 67 2e 6d 70 72 69 73 2e 4d 65 64 69 61 50 6c 61 79 65 72 32 2e 72	......."org.mpris.MediaPlayer2.r
3a660	68 79 74 68 6d 62 6f 78 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2f 6f	hythmbox"...................."/o
3a680	72 67 2f 6d 70 72 69 73 2f 4d 65 64 69 61 50 6c 61 79 65 72 32 22 0a 20 20 20 20 20 20 20 20 20	rg/mpris/MediaPlayer2"..........
3a6a0	20 20 20 20 20 20 20 20 20 20 22 6f 72 67 2e 6d 70 72 69 73 2e 4d 65 64 69 61 50 6c 61 79 65 72	.........."org.mpris.MediaPlayer
3a6c0	32 2e 50 6c 61 79 65 72 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 4d 65	2.Player"...................."Me
3a6e0	74 61 64 61 74 61 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 61 72 74 69 73 74 20 28 63 61	tadata"))............(artist.(ca
3a700	61 72 20 28 63 61 64 72 20 28 61 73 73 6f 63 20 22 78 65 73 61 6d 3a 61 72 74 69 73 74 22 20 65	ar.(cadr.(assoc."xesam:artist".e
3a720	6e 74 72 79 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 61 6c 62 75 6d 20 28 63 6c 2d 63	ntry))))............(album.(cl-c
3a740	61 61 64 72 20 28 61 73 73 6f 63 20 22 78 65 73 61 6d 3a 61 6c 62 75 6d 22 20 65 6e 74 72 79 29	aadr.(assoc."xesam:album".entry)
3a760	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 74 69 74 6c 65 20 28 63 6c 2d 63 61 61 64 72 20 28	))............(title.(cl-caadr.(
3a780	61 73 73 6f 63 20 22 78 65 73 61 6d 3a 74 69 74 6c 65 22 20 65 6e 74 72 79 29 29 29 29 0a 20 20	assoc."xesam:title".entry))))...
3a7a0	20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 20 2d 20 25 73 20 2d 20 25 73 22 20 61 72 74 69 73	....(format."%s.-.%s.-.%s".artis
3a7c0	74 20 61 6c 62 75 6d 20 74 69 74 6c 65 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61	t.album.title))))..;;;###autoloa
3a7e0	64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 72 68 79 74 68 6d 62 6f 78 20 28 26 6f 70 74	d.(defun.counsel-rhythmbox.(&opt
3a800	69 6f 6e 61 6c 20 61 72 67 29 0a 20 20 22 43 68 6f 6f 73 65 20 61 20 73 6f 6e 67 20 66 72 6f 6d	ional.arg)..."Choose.a.song.from
3a820	20 74 68 65 20 52 68 79 74 68 6d 62 6f 78 20 6c 69 62 72 61 72 79 20 74 6f 20 70 6c 61 79 20 6f	.the.Rhythmbox.library.to.play.o
3a840	72 20 65 6e 71 75 65 75 65 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 50 22 29 0a	r.enqueue."...(interactive."P").
3a860	20 20 28 72 65 71 75 69 72 65 20 27 64 62 75 73 29 0a 20 20 28 77 68 65 6e 20 28 6f 72 20 61 72	..(require.'dbus)...(when.(or.ar
3a880	67 20 28 6e 75 6c 6c 20 63 6f 75 6e 73 65 6c 2d 72 68 79 74 68 6d 62 6f 78 2d 73 6f 6e 67 73 29	g.(null.counsel-rhythmbox-songs)
3a8a0	29 0a 20 20 20 20 28 6c 65 74 2a 20 28 28 73 65 72 76 69 63 65 20 22 6f 72 67 2e 67 6e 6f 6d 65	).....(let*.((service."org.gnome
3a8c0	2e 52 68 79 74 68 6d 62 6f 78 33 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 70 61 74 68 20 22	.Rhythmbox3")............(path."
3a8e0	2f 6f 72 67 2f 67 6e 6f 6d 65 2f 55 50 6e 50 2f 4d 65 64 69 61 53 65 72 76 65 72 32 2f 4c 69 62	/org/gnome/UPnP/MediaServer2/Lib
3a900	72 61 72 79 2f 61 6c 6c 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 74 65 72 66 61 63 65	rary/all")............(interface
3a920	20 22 6f 72 67 2e 67 6e 6f 6d 65 2e 55 50 6e 50 2e 4d 65 64 69 61 43 6f 6e 74 61 69 6e 65 72 32	."org.gnome.UPnP.MediaContainer2
3a940	22 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6e 62 2d 73 6f 6e 67 73 20 28 64 62 75 73 2d 67 65	")............(nb-songs.(dbus-ge
3a960	74 2d 70 72 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	t-property......................
3a980	20 3a 73 65 73 73 69 6f 6e 20 73 65 72 76 69 63 65 20 70 61 74 68 20 69 6e 74 65 72 66 61 63 65	.:session.service.path.interface
3a9a0	20 22 43 68 69 6c 64 43 6f 75 6e 74 22 29 29 29 0a 20 20 20 20 20 20 28 69 66 20 28 6e 6f 74 20	."ChildCount"))).......(if.(not.
3a9c0	6e 62 2d 73 6f 6e 67 73 29 0a 20 20 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 43 6f 75 6c	nb-songs)...........(error."Coul
3a9e0	64 6e 27 74 20 63 6f 6e 6e 65 63 74 20 74 6f 20 52 68 79 74 68 6d 62 6f 78 22 29 0a 20 20 20 20	dn't.connect.to.Rhythmbox").....
3aa00	20 20 20 20 28 73 65 74 71 20 63 6f 75 6e 73 65 6c 2d 72 68 79 74 68 6d 62 6f 78 2d 73 6f 6e 67	....(setq.counsel-rhythmbox-song
3aa20	73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 20 28 6c 61 6d 62 64 61 20	s...............(mapcar.(lambda.
3aa40	28 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e	(x).........................(con
3aa60	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 28 66 6f 72 6d	s..........................(form
3aa80	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 22 25 73	at..........................."%s
3aaa0	20 2d 20 25 73 20 2d 20 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".....................
3aac0	20 20 20 20 20 20 28 63 6c 2d 63 61 61 64 72 20 28 61 73 73 6f 63 20 22 41 72 74 69 73 74 22 20	......(cl-caadr.(assoc."Artist".
3aae0	78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63	x))...........................(c
3ab00	6c 2d 63 61 61 64 72 20 28 61 73 73 6f 63 20 22 41 6c 62 75 6d 22 20 78 29 29 0a 20 20 20 20 20	l-caadr.(assoc."Album".x))......
3ab20	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 63 61 61 64 72 20 28	.....................(cl-caadr.(
3ab40	61 73 73 6f 63 20 22 44 69 73 70 6c 61 79 4e 61 6d 65 22 20 78 29 29 29 0a 20 20 20 20 20 20 20	assoc."DisplayName".x)))........
3ab60	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 63 61 61 61 64 72 20 28 61 73	..................(cl-caaadr.(as
3ab80	73 6f 63 20 22 55 52 4c 73 22 20 78 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	soc."URLs".x))))................
3aba0	20 20 20 20 20 20 20 28 64 62 75 73 2d 63 61 6c 6c 2d 6d 65 74 68 6f 64 0a 20 20 20 20 20 20 20	.......(dbus-call-method........
3abc0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 65 73 73 69 6f 6e 20 73 65 72 76 69 63 65	................:session.service
3abe0	20 70 61 74 68 20 69 6e 74 65 72 66 61 63 65 20 22 4c 69 73 74 43 68 69 6c 64 72 65 6e 22 0a 20	.path.interface."ListChildren"..
3ac00	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 20 6e 62 2d 73 6f 6e 67 73	......................0.nb-songs
3ac20	20 27 28 22 2a 22 29 29 29 29 29 29 29 0a 20 20 28 69 76 79 2d 72 65 61 64 20 22 52 68 79 74 68	.'("*")))))))...(ivy-read."Rhyth
3ac40	6d 62 6f 78 3a 20 22 20 63 6f 75 6e 73 65 6c 2d 72 68 79 74 68 6d 62 6f 78 2d 73 6f 6e 67 73 0a	mbox:.".counsel-rhythmbox-songs.
3ac60	20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 71 75 69 72 65 2d 6d 61 74 63 68 20 74 0a 20 20 20	............:require-match.t....
3ac80	20 20 20 20 20 20 20 20 20 3a 68 69 73 74 6f 72 79 20 27 63 6f 75 6e 73 65 6c 2d 72 68 79 74 68	.........:history.'counsel-rhyth
3aca0	6d 62 6f 78 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 70 72 65 73 65 6c	mbox-history.............:presel
3acc0	65 63 74 20 28 63 6f 75 6e 73 65 6c 2d 72 68 79 74 68 6d 62 6f 78 2d 63 75 72 72 65 6e 74 2d 73	ect.(counsel-rhythmbox-current-s
3ace0	6f 6e 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 0a 20 20 20 20 20 20 20	ong).............:action........
3ad00	20 20 20 20 20 27 28 31 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 22 70 22 20 63 6f 75 6e	.....'(1...............("p".coun
3ad20	73 65 6c 2d 72 68 79 74 68 6d 62 6f 78 2d 70 6c 61 79 2d 73 6f 6e 67 20 22 50 6c 61 79 20 73 6f	sel-rhythmbox-play-song."Play.so
3ad40	6e 67 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 22 65 22 20 63 6f 75 6e 73 65 6c 2d	ng")...............("e".counsel-
3ad60	72 68 79 74 68 6d 62 6f 78 2d 65 6e 71 75 65 75 65 2d 73 6f 6e 67 20 22 45 6e 71 75 65 75 65 20	rhythmbox-enqueue-song."Enqueue.
3ad80	73 6f 6e 67 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 22 73 22 20 63 6f 75 6e 73 65	song")...............("s".counse
3ada0	6c 2d 72 68 79 74 68 6d 62 6f 78 2d 74 6f 67 67 6c 65 2d 73 68 75 66 66 6c 65 20 22 53 68 75 66	l-rhythmbox-toggle-shuffle."Shuf
3adc0	66 6c 65 20 6f 6e 2f 6f 66 66 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65	fle.on/off")).............:calle
3ade0	72 20 27 63 6f 75 6e 73 65 6c 2d 72 68 79 74 68 6d 62 6f 78 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f	r.'counsel-rhythmbox))..;;;;.`co
3ae00	75 6e 73 65 6c 2d 6c 69 6e 75 78 2d 61 70 70 27 0a 0a 3b 3b 20 41 64 64 65 64 20 69 6e 20 45 6d	unsel-linux-app'..;;.Added.in.Em
3ae20	61 63 73 20 32 36 2e 31 2e 0a 28 72 65 71 75 69 72 65 20 27 78 64 67 20 6e 69 6c 20 74 29 0a 0a	acs.26.1..(require.'xdg.nil.t)..
3ae40	28 64 65 66 61 6c 69 61 73 20 27 63 6f 75 6e 73 65 6c 2d 2d 78 64 67 2d 64 61 74 61 2d 68 6f 6d	(defalias.'counsel--xdg-data-hom
3ae60	65 0a 20 20 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 78 64 67 2d 64 61 74 61 2d 68 6f 6d 65 29	e...(if.(fboundp.'xdg-data-home)
3ae80	0a 20 20 20 20 20 20 23 27 78 64 67 2d 64 61 74 61 2d 68 6f 6d 65 0a 20 20 20 20 28 6c 61 6d 62	.......#'xdg-data-home.....(lamb
3aea0	64 61 20 28 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 64 69 72 65 63 74 6f 72 79 20 28 67 65	da.().......(let.((directory.(ge
3aec0	74 65 6e 76 20 22 58 44 47 5f 44 41 54 41 5f 48 4f 4d 45 22 29 29 29 0a 20 20 20 20 20 20 20 20	tenv."XDG_DATA_HOME"))).........
3aee0	28 69 66 20 28 6f 72 20 28 6e 75 6c 6c 20 64 69 72 65 63 74 6f 72 79 29 20 28 73 74 72 69 6e 67	(if.(or.(null.directory).(string
3af00	3d 20 64 69 72 65 63 74 6f 72 79 20 22 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 22 7e 2f	=.directory.""))............."~/
3af20	2e 6c 6f 63 61 6c 2f 73 68 61 72 65 22 0a 20 20 20 20 20 20 20 20 20 20 64 69 72 65 63 74 6f 72	.local/share"...........director
3af40	79 29 29 29 29 0a 20 20 22 43 6f 6d 70 61 74 69 62 69 6c 69 74 79 20 73 68 69 6d 20 66 6f 72 20	y))))..."Compatibility.shim.for.
3af60	60 78 64 67 2d 64 61 74 61 2d 68 6f 6d 65 27 2e 22 29 0a 0a 28 64 65 66 61 6c 69 61 73 20 27 63	`xdg-data-home'.")..(defalias.'c
3af80	6f 75 6e 73 65 6c 2d 2d 78 64 67 2d 64 61 74 61 2d 64 69 72 73 0a 20 20 28 69 66 20 28 66 62 6f	ounsel--xdg-data-dirs...(if.(fbo
3afa0	75 6e 64 70 20 27 78 64 67 2d 64 61 74 61 2d 64 69 72 73 29 0a 20 20 20 20 20 20 23 27 78 64 67	undp.'xdg-data-dirs).......#'xdg
3afc0	2d 64 61 74 61 2d 64 69 72 73 0a 20 20 20 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20	-data-dirs.....(lambda.().......
3afe0	28 6c 65 74 20 28 28 70 61 74 68 20 28 67 65 74 65 6e 76 20 22 58 44 47 5f 44 41 54 41 5f 44 49	(let.((path.(getenv."XDG_DATA_DI
3b000	52 53 22 29 29 29 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 6f 72 20 28 6e 75 6c 6c 20 70 61 74	RS"))).........(if.(or.(null.pat
3b020	68 29 20 28 73 74 72 69 6e 67 3d 20 70 61 74 68 20 22 22 29 29 0a 20 20 20 20 20 20 20 20 20 20	h).(string=.path.""))...........
3b040	20 20 27 28 22 2f 75 73 72 2f 6c 6f 63 61 6c 2f 73 68 61 72 65 22 20 22 2f 75 73 72 2f 73 68 61	..'("/usr/local/share"."/usr/sha
3b060	72 65 22 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 61 72 73 65 2d 63 6f 6c 6f 6e 2d 70 61 74 68	re")...........(parse-colon-path
3b080	20 70 61 74 68 29 29 29 29 29 0a 20 20 22 43 6f 6d 70 61 74 69 62 69 6c 69 74 79 20 73 68 69 6d	.path)))))..."Compatibility.shim
3b0a0	20 66 6f 72 20 60 78 64 67 2d 64 61 74 61 2d 64 69 72 73 27 2e 22 29 0a 0a 28 64 65 66 63 75 73	.for.`xdg-data-dirs'.")..(defcus
3b0c0	74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 6c 69 6e 75 78 2d 61 70 70 73 2d 64 69 72 65 63 74 6f 72 69	tom.counsel-linux-apps-directori
3b0e0	65 73 0a 20 20 28 6d 61 70 63 61 72 20 28 6c 61 6d 62 64 61 20 28 64 69 72 29 20 28 65 78 70 61	es...(mapcar.(lambda.(dir).(expa
3b100	6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 73 22 20 64 69 72 29	nd-file-name."applications".dir)
3b120	29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 28 63 6f 75 6e 73 65 6c 2d 2d 78 64 67 2d	)...........(cons.(counsel--xdg-
3b140	64 61 74 61 2d 68 6f 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e	data-home).................(coun
3b160	73 65 6c 2d 2d 78 64 67 2d 64 61 74 61 2d 64 69 72 73 29 29 29 0a 20 20 22 44 69 72 65 63 74 6f	sel--xdg-data-dirs)))..."Directo
3b180	72 69 65 73 20 69 6e 20 77 68 69 63 68 20 74 6f 20 73 65 61 72 63 68 20 66 6f 72 20 61 70 70 6c	ries.in.which.to.search.for.appl
3b1a0	69 63 61 74 69 6f 6e 73 20 28 2e 64 65 73 6b 74 6f 70 20 66 69 6c 65 73 29 2e 22 0a 20 20 3a 74	ications.(.desktop.files)."...:t
3b1c0	79 70 65 20 27 28 72 65 70 65 61 74 20 64 69 72 65 63 74 6f 72 79 29 29 0a 0a 28 64 65 66 63 75	ype.'(repeat.directory))..(defcu
3b1e0	73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 6c 69 6e 75 78 2d 61 70 70 2d 66 6f 72 6d 61 74 2d 66 75	stom.counsel-linux-app-format-fu
3b200	6e 63 74 69 6f 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 6c 69 6e 75 78 2d 61 70 70 2d 66 6f 72 6d 61	nction.#'counsel-linux-app-forma
3b220	74 2d 66 75 6e 63 74 69 6f 6e 2d 64 65 66 61 75 6c 74 0a 20 20 22 46 75 6e 63 74 69 6f 6e 20 74	t-function-default..."Function.t
3b240	6f 20 66 6f 72 6d 61 74 20 4c 69 6e 75 78 20 61 70 70 6c 69 63 61 74 69 6f 6e 20 6e 61 6d 65 73	o.format.Linux.application.names
3b260	20 74 68 65 20 60 63 6f 75 6e 73 65 6c 2d 6c 69 6e 75 78 2d 61 70 70 27 20 6d 65 6e 75 2e 0a 54	.the.`counsel-linux-app'.menu..T
3b280	68 65 20 66 6f 72 6d 61 74 20 66 75 6e 63 74 69 6f 6e 20 77 69 6c 6c 20 62 65 20 70 61 73 73 65	he.format.function.will.be.passe
3b2a0	64 20 74 68 65 20 61 70 70 6c 69 63 61 74 69 6f 6e 27 73 20 6e 61 6d 65 2c 20 63 6f 6d 6d 65 6e	d.the.application's.name,.commen
3b2c0	74 2c 20 61 6e 64 20 63 6f 6d 6d 61 6e 64 0a 61 73 20 61 72 67 75 6d 65 6e 74 73 2e 22 0a 20 20	t,.and.command.as.arguments."...
3b2e0	3a 74 79 70 65 20 27 28 63 68 6f 69 63 65 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20	:type.'(choice...........(const.
3b300	3a 74 61 67 20 22 43 6f 6d 6d 61 6e 64 20 3a 20 4e 61 6d 65 20 2d 20 43 6f 6d 6d 65 6e 74 22 20	:tag."Command.:.Name.-.Comment".
3b320	63 6f 75 6e 73 65 6c 2d 6c 69 6e 75 78 2d 61 70 70 2d 66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f	counsel-linux-app-format-functio
3b340	6e 2d 64 65 66 61 75 6c 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67	n-default)...........(const.:tag
3b360	20 22 4e 61 6d 65 20 2d 20 43 6f 6d 6d 65 6e 74 20 28 43 6f 6d 6d 61 6e 64 29 22 20 63 6f 75 6e	."Name.-.Comment.(Command)".coun
3b380	73 65 6c 2d 6c 69 6e 75 78 2d 61 70 70 2d 66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 2d 6e 61	sel-linux-app-format-function-na
3b3a0	6d 65 2d 66 69 72 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20	me-first)...........(const.:tag.
3b3c0	22 4e 61 6d 65 20 2d 20 43 6f 6d 6d 65 6e 74 22 20 63 6f 75 6e 73 65 6c 2d 6c 69 6e 75 78 2d 61	"Name.-.Comment".counsel-linux-a
3b3e0	70 70 2d 66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 2d 6e 61 6d 65 2d 6f 6e 6c 79 29 0a 20 20	pp-format-function-name-only)...
3b400	20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 4e 61 6d 65 20 2d 20 43 6f 6d 6d	........(const.:tag."Name.-.Comm
3b420	65 6e 74 20 28 50 72 65 74 74 79 29 22 20 63 6f 75 6e 73 65 6c 2d 6c 69 6e 75 78 2d 61 70 70 2d	ent.(Pretty)".counsel-linux-app-
3b440	66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 2d 6e 61 6d 65 2d 70 72 65 74 74 79 29 0a 20 20 20	format-function-name-pretty)....
3b460	20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 43 6f 6d 6d 61 6e 64 22 20 63 6f 75	.......(const.:tag."Command".cou
3b480	6e 73 65 6c 2d 6c 69 6e 75 78 2d 61 70 70 2d 66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 2d 63	nsel-linux-app-format-function-c
3b4a0	6f 6d 6d 61 6e 64 2d 6f 6e 6c 79 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 74 69 6f 6e	ommand-only)...........(function
3b4c0	20 3a 74 61 67 20 22 43 75 73 74 6f 6d 22 29 29 29 0a 0a 28 64 65 66 66 61 63 65 20 63 6f 75 6e	.:tag."Custom")))..(defface.coun
3b4e0	73 65 6c 2d 61 70 70 6c 69 63 61 74 69 6f 6e 2d 6e 61 6d 65 0a 20 20 27 28 28 74 20 3a 69 6e 68	sel-application-name...'((t.:inh
3b500	65 72 69 74 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 62 75 69 6c 74 69 6e 2d 66 61 63 65 29 29 0a 20 20	erit.font-lock-builtin-face))...
3b520	22 46 61 63 65 20 66 6f 72 20 64 69 73 70 6c 61 79 69 6e 67 20 65 78 65 63 75 74 61 62 6c 65 20	"Face.for.displaying.executable.
3b540	6e 61 6d 65 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 69 76 79 2d 66 61 63 65 73 29 0a 0a 28 64	names."...:group.'ivy-faces)..(d
3b560	65 66 66 61 63 65 20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 31 0a 20 20 27 28 28 74 20	efface.counsel-outline-1...'((t.
3b580	3a 69 6e 68 65 72 69 74 20 6f 72 67 2d 6c 65 76 65 6c 2d 31 29 29 0a 20 20 22 46 61 63 65 20 66	:inherit.org-level-1))..."Face.f
3b5a0	6f 72 20 64 69 73 70 6c 61 79 69 6e 67 20 6c 65 76 65 6c 20 31 20 68 65 61 64 69 6e 67 73 2e 22	or.displaying.level.1.headings."
3b5c0	0a 20 20 3a 67 72 6f 75 70 20 27 69 76 79 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20	...:group.'ivy-faces)..(defface.
3b5e0	63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 32 0a 20 20 27 28 28 74 20 3a 69 6e 68 65 72 69	counsel-outline-2...'((t.:inheri
3b600	74 20 6f 72 67 2d 6c 65 76 65 6c 2d 32 29 29 0a 20 20 22 46 61 63 65 20 66 6f 72 20 64 69 73 70	t.org-level-2))..."Face.for.disp
3b620	6c 61 79 69 6e 67 20 6c 65 76 65 6c 20 32 20 68 65 61 64 69 6e 67 73 2e 22 0a 20 20 3a 67 72 6f	laying.level.2.headings."...:gro
3b640	75 70 20 27 69 76 79 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 63 6f 75 6e 73 65 6c	up.'ivy-faces)..(defface.counsel
3b660	2d 6f 75 74 6c 69 6e 65 2d 33 0a 20 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 6f 72 67 2d 6c	-outline-3...'((t.:inherit.org-l
3b680	65 76 65 6c 2d 33 29 29 0a 20 20 22 46 61 63 65 20 66 6f 72 20 64 69 73 70 6c 61 79 69 6e 67 20	evel-3))..."Face.for.displaying.
3b6a0	6c 65 76 65 6c 20 33 20 68 65 61 64 69 6e 67 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 69 76 79	level.3.headings."...:group.'ivy
3b6c0	2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e	-faces)..(defface.counsel-outlin
3b6e0	65 2d 34 0a 20 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 6f 72 67 2d 6c 65 76 65 6c 2d 34 29	e-4...'((t.:inherit.org-level-4)
3b700	29 0a 20 20 22 46 61 63 65 20 66 6f 72 20 64 69 73 70 6c 61 79 69 6e 67 20 6c 65 76 65 6c 20 34	)..."Face.for.displaying.level.4
3b720	20 68 65 61 64 69 6e 67 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 69 76 79 2d 66 61 63 65 73 29	.headings."...:group.'ivy-faces)
3b740	0a 0a 28 64 65 66 66 61 63 65 20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 35 0a 20 20 27	..(defface.counsel-outline-5...'
3b760	28 28 74 20 3a 69 6e 68 65 72 69 74 20 6f 72 67 2d 6c 65 76 65 6c 2d 35 29 29 0a 20 20 22 46 61	((t.:inherit.org-level-5))..."Fa
3b780	63 65 20 66 6f 72 20 64 69 73 70 6c 61 79 69 6e 67 20 6c 65 76 65 6c 20 35 20 68 65 61 64 69 6e	ce.for.displaying.level.5.headin
3b7a0	67 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 69 76 79 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66	gs."...:group.'ivy-faces)..(deff
3b7c0	61 63 65 20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 36 0a 20 20 27 28 28 74 20 3a 69 6e	ace.counsel-outline-6...'((t.:in
3b7e0	68 65 72 69 74 20 6f 72 67 2d 6c 65 76 65 6c 2d 36 29 29 0a 20 20 22 46 61 63 65 20 66 6f 72 20	herit.org-level-6))..."Face.for.
3b800	64 69 73 70 6c 61 79 69 6e 67 20 6c 65 76 65 6c 20 36 20 68 65 61 64 69 6e 67 73 2e 22 0a 20 20	displaying.level.6.headings."...
3b820	3a 67 72 6f 75 70 20 27 69 76 79 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 63 6f 75	:group.'ivy-faces)..(defface.cou
3b840	6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 37 0a 20 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 6f	nsel-outline-7...'((t.:inherit.o
3b860	72 67 2d 6c 65 76 65 6c 2d 37 29 29 0a 20 20 22 46 61 63 65 20 66 6f 72 20 64 69 73 70 6c 61 79	rg-level-7))..."Face.for.display
3b880	69 6e 67 20 6c 65 76 65 6c 20 37 20 68 65 61 64 69 6e 67 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20	ing.level.7.headings."...:group.
3b8a0	27 69 76 79 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 63 6f 75 6e 73 65 6c 2d 6f 75	'ivy-faces)..(defface.counsel-ou
3b8c0	74 6c 69 6e 65 2d 38 0a 20 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 6f 72 67 2d 6c 65 76 65	tline-8...'((t.:inherit.org-leve
3b8e0	6c 2d 38 29 29 0a 20 20 22 46 61 63 65 20 66 6f 72 20 64 69 73 70 6c 61 79 69 6e 67 20 6c 65 76	l-8))..."Face.for.displaying.lev
3b900	65 6c 20 38 20 68 65 61 64 69 6e 67 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 69 76 79 2d 66 61	el.8.headings."...:group.'ivy-fa
3b920	63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 63 6f 75 6e 73 65 6c 2d 6f 75 74 6c 69 6e 65 2d 64	ces)..(defface.counsel-outline-d
3b940	65 66 61 75 6c 74 0a 20 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 6d 69 6e 69 62 75 66 66 65	efault...'((t.:inherit.minibuffe
3b960	72 2d 70 72 6f 6d 70 74 29 29 0a 20 20 22 46 61 63 65 20 66 6f 72 20 64 69 73 70 6c 61 79 69 6e	r-prompt))..."Face.for.displayin
3b980	67 20 68 65 61 64 69 6e 67 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 69 76 79 2d 66 61 63 65 73	g.headings."...:group.'ivy-faces
3b9a0	29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 6c 69 6e 75 78 2d 61 70 70 73 2d 66 61	)..(defvar.counsel-linux-apps-fa
3b9c0	75 6c 74 79 20 6e 69 6c 0a 20 20 22 4c 69 73 74 20 6f 66 20 66 61 75 6c 74 79 20 64 65 73 6b 74	ulty.nil..."List.of.faulty.deskt
3b9e0	6f 70 20 66 69 6c 65 73 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 2d 6c 69	op.files.")..(defvar.counsel--li
3ba00	6e 75 78 2d 61 70 70 73 2d 63 61 63 68 65 20 6e 69 6c 0a 20 20 22 43 61 63 68 65 20 6f 66 20 64	nux-apps-cache.nil..."Cache.of.d
3ba20	65 73 6b 74 6f 70 20 66 69 6c 65 73 20 64 61 74 61 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 63 6f	esktop.files.data.")..(defvar.co
3ba40	75 6e 73 65 6c 2d 2d 6c 69 6e 75 78 2d 61 70 70 73 2d 63 61 63 68 65 64 2d 66 69 6c 65 73 20 6e	unsel--linux-apps-cached-files.n
3ba60	69 6c 0a 20 20 22 4c 69 73 74 20 6f 66 20 63 61 63 68 65 64 20 64 65 73 6b 74 6f 70 20 66 69 6c	il..."List.of.cached.desktop.fil
3ba80	65 73 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 2d 6c 69 6e 75 78 2d 61 70	es.")..(defvar.counsel--linux-ap
3baa0	70 73 2d 63 61 63 68 65 2d 74 69 6d 65 73 74 61 6d 70 20 6e 69 6c 0a 20 20 22 54 69 6d 65 20 77	ps-cache-timestamp.nil..."Time.w
3bac0	68 65 6e 20 77 65 20 6c 61 73 74 20 75 70 64 61 74 65 64 20 74 68 65 20 63 61 63 68 65 64 20 61	hen.we.last.updated.the.cached.a
3bae0	70 70 6c 69 63 61 74 69 6f 6e 20 6c 69 73 74 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e	pplication.list.")..(defvar.coun
3bb00	73 65 6c 2d 2d 6c 69 6e 75 78 2d 61 70 70 73 2d 63 61 63 68 65 2d 66 6f 72 6d 61 74 2d 66 75 6e	sel--linux-apps-cache-format-fun
3bb20	63 74 69 6f 6e 20 6e 69 6c 0a 20 20 22 54 68 65 20 66 75 6e 63 74 69 6f 6e 20 75 73 65 64 20 74	ction.nil..."The.function.used.t
3bb40	6f 20 66 6f 72 6d 61 74 20 74 68 65 20 63 61 63 68 65 64 20 4c 69 6e 75 78 20 61 70 70 6c 69 63	o.format.the.cached.Linux.applic
3bb60	61 74 69 6f 6e 20 6d 65 6e 75 2e 22 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6c 69	ation.menu.")..(defun.counsel-li
3bb80	6e 75 78 2d 61 70 70 2d 66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 2d 64 65 66 61 75 6c 74 20	nux-app-format-function-default.
3bba0	28 6e 61 6d 65 20 63 6f 6d 6d 65 6e 74 20 65 78 65 63 29 0a 20 20 22 44 65 66 61 75 6c 74 20 4c	(name.comment.exec)..."Default.L
3bbc0	69 6e 75 78 20 61 70 70 6c 69 63 61 74 69 6f 6e 20 6e 61 6d 65 20 66 6f 72 6d 61 74 74 65 72 2e	inux.application.name.formatter.
3bbe0	0a 4e 41 4d 45 20 69 73 20 74 68 65 20 6e 61 6d 65 20 6f 66 20 74 68 65 20 61 70 70 6c 69 63 61	.NAME.is.the.name.of.the.applica
3bc00	74 69 6f 6e 2c 20 43 4f 4d 4d 45 4e 54 20 69 74 73 20 63 6f 6d 6d 65 6e 74 20 61 6e 64 20 45 58	tion,.COMMENT.its.comment.and.EX
3bc20	45 43 0a 74 68 65 20 63 6f 6d 6d 61 6e 64 20 74 6f 20 6c 61 75 6e 63 68 20 69 74 2e 22 0a 20 20	EC.the.command.to.launch.it."...
3bc40	28 66 6f 72 6d 61 74 20 22 25 20 2d 34 35 73 3a 20 25 73 25 73 22 0a 20 20 20 20 20 20 20 20 20	(format."%.-45s:.%s%s"..........
3bc60	20 28 70 72 6f 70 65 72 74 69 7a 65 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 76 79 2d 2d 74 72	.(propertize............(ivy--tr
3bc80	75 6e 63 61 74 65 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 70 6c 61	uncate-string.............(repla
3bca0	63 65 2d 72 65 67 65 78 70 2d 69 6e 2d 73 74 72 69 6e 67 20 22 65 6e 76 20 2b 5b 5e 20 5d 2b 20	ce-regexp-in-string."env.+[^.]+.
3bcc0	2b 22 20 22 22 20 65 78 65 63 20 74 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 34 35 29 0a	+"."".exec.t.t).............45).
3bce0	20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 27 63 6f 75 6e 73 65 6c 2d 61 70 70 6c 69 63	...........'face.'counsel-applic
3bd00	61 74 69 6f 6e 2d 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 6e 61 6d 65 0a 20 20 20 20 20	ation-name)...........name......
3bd20	20 20 20 20 20 28 69 66 20 63 6f 6d 6d 65 6e 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	.....(if.comment...............(
3bd40	63 6f 6e 63 61 74 20 22 20 2d 20 22 20 63 6f 6d 6d 65 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20	concat.".-.".comment)...........
3bd60	20 20 22 22 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6c 69 6e 75 78 2d 61 70	.."")))..(defun.counsel-linux-ap
3bd80	70 2d 66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 2d 6e 61 6d 65 2d 66 69 72 73 74 20 28 6e 61	p-format-function-name-first.(na
3bda0	6d 65 20 63 6f 6d 6d 65 6e 74 20 65 78 65 63 29 0a 20 20 22 46 6f 72 6d 61 74 20 4c 69 6e 75 78	me.comment.exec)..."Format.Linux
3bdc0	20 61 70 70 6c 69 63 61 74 69 6f 6e 20 6e 61 6d 65 73 20 77 69 74 68 20 74 68 65 20 4e 41 4d 45	.application.names.with.the.NAME
3bde0	20 28 61 6e 64 20 43 4f 4d 4d 45 4e 54 29 20 66 69 72 73 74 2e 0a 45 58 45 43 20 69 73 20 74 68	.(and.COMMENT).first..EXEC.is.th
3be00	65 20 63 6f 6d 6d 61 6e 64 20 74 6f 20 6c 61 75 6e 63 68 20 74 68 65 20 61 70 70 6c 69 63 61 74	e.command.to.launch.the.applicat
3be20	69 6f 6e 2e 22 0a 20 20 28 66 6f 72 6d 61 74 20 22 25 73 25 73 20 28 25 73 29 22 0a 20 20 20 20	ion."...(format."%s%s.(%s)".....
3be40	20 20 20 20 20 20 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 28 69 66 20 63 6f 6d 6d 65 6e 74	......name...........(if.comment
3be60	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 22 20 2d 20 22 20 63 6f 6d	...............(concat.".-.".com
3be80	6d 65 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 22 22 29 0a 20 20 20 20 20 20 20 20 20 20	ment)............."")...........
3bea0	28 70 72 6f 70 65 72 74 69 7a 65 20 65 78 65 63 20 27 66 61 63 65 20 27 63 6f 75 6e 73 65 6c 2d	(propertize.exec.'face.'counsel-
3bec0	61 70 70 6c 69 63 61 74 69 6f 6e 2d 6e 61 6d 65 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e	application-name)))..(defun.coun
3bee0	73 65 6c 2d 6c 69 6e 75 78 2d 61 70 70 2d 66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 2d 6e 61	sel-linux-app-format-function-na
3bf00	6d 65 2d 6f 6e 6c 79 20 28 6e 61 6d 65 20 63 6f 6d 6d 65 6e 74 20 5f 65 78 65 63 29 0a 20 20 22	me-only.(name.comment._exec)..."
3bf20	46 6f 72 6d 61 74 20 4c 69 6e 75 78 20 61 70 70 6c 69 63 61 74 69 6f 6e 20 6e 61 6d 65 73 20 77	Format.Linux.application.names.w
3bf40	69 74 68 20 74 68 65 20 4e 41 4d 45 20 28 61 6e 64 20 43 4f 4d 4d 45 4e 54 29 20 6f 6e 6c 79 2e	ith.the.NAME.(and.COMMENT).only.
3bf60	22 0a 20 20 28 66 6f 72 6d 61 74 20 22 25 73 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 6e 61 6d	"...(format."%s%s"...........nam
3bf80	65 0a 20 20 20 20 20 20 20 20 20 20 28 69 66 20 63 6f 6d 6d 65 6e 74 0a 20 20 20 20 20 20 20 20	e...........(if.comment.........
3bfa0	20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 22 20 2d 20 22 20 63 6f 6d 6d 65 6e 74 29 0a 20 20 20	......(concat.".-.".comment)....
3bfc0	20 20 20 20 20 20 20 20 20 22 22 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6c	........."")))..(defun.counsel-l
3bfe0	69 6e 75 78 2d 61 70 70 2d 66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 2d 63 6f 6d 6d 61 6e 64	inux-app-format-function-command
3c000	2d 6f 6e 6c 79 20 28 5f 6e 61 6d 65 20 5f 63 6f 6d 6d 65 6e 74 20 65 78 65 63 29 0a 20 20 22 44	-only.(_name._comment.exec)..."D
3c020	69 73 70 6c 61 79 20 6f 6e 6c 79 20 74 68 65 20 63 6f 6d 6d 61 6e 64 20 45 58 45 43 20 77 68 65	isplay.only.the.command.EXEC.whe
3c040	6e 20 66 6f 72 6d 61 74 74 69 6e 67 20 4c 69 6e 75 78 20 61 70 70 6c 69 63 61 74 69 6f 6e 20 6e	n.formatting.Linux.application.n
3c060	61 6d 65 73 2e 22 0a 20 20 65 78 65 63 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6c	ames."...exec)..(defun.counsel-l
3c080	69 6e 75 78 2d 61 70 70 2d 66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 2d 6e 61 6d 65 2d 70 72	inux-app-format-function-name-pr
3c0a0	65 74 74 79 20 28 6e 61 6d 65 20 63 6f 6d 6d 65 6e 74 20 5f 65 78 65 63 29 0a 20 20 22 46 6f 72	etty.(name.comment._exec)..."For
3c0c0	6d 61 74 20 4c 69 6e 75 78 20 61 70 70 6c 69 63 61 74 69 6f 6e 20 6e 61 6d 65 73 20 77 69 74 68	mat.Linux.application.names.with
3c0e0	20 74 68 65 20 4e 41 4d 45 20 28 61 6e 64 20 43 4f 4d 4d 45 4e 54 29 20 6f 6e 6c 79 2c 20 62 75	.the.NAME.(and.COMMENT).only,.bu
3c100	74 20 70 72 65 74 74 79 2e 22 0a 20 20 28 66 6f 72 6d 61 74 20 22 25 20 2d 34 35 73 25 73 22 0a	t.pretty."...(format."%.-45s%s".
3c120	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 20 20 20 20 20	..........(propertize...........
3c140	20 28 69 76 79 2d 2d 74 72 75 6e 63 61 74 65 2d 73 74 72 69 6e 67 20 6e 61 6d 65 20 34 35 29 0a	.(ivy--truncate-string.name.45).
3c160	20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 27 63 6f 75 6e 73 65 6c 2d 61 70 70 6c 69 63	...........'face.'counsel-applic
3c180	61 74 69 6f 6e 2d 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 69 66 20 63 6f 6d 6d 65 6e	ation-name)...........(if.commen
3c1a0	74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 22 3a 20 22 20 63 6f 6d	t...............(concat.":.".com
3c1c0	6d 65 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 22 22 29 29 29 0a 0a 28 64 65 66 75 6e 20	ment)............."")))..(defun.
3c1e0	63 6f 75 6e 73 65 6c 2d 6c 69 6e 75 78 2d 61 70 70 73 2d 6c 69 73 74 2d 64 65 73 6b 74 6f 70 2d	counsel-linux-apps-list-desktop-
3c200	66 69 6c 65 73 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 61 6e 20 61 6c 69 73 74 20 6f 66 20 61	files.()..."Return.an.alist.of.a
3c220	6c 6c 20 4c 69 6e 75 78 20 61 70 70 6c 69 63 61 74 69 6f 6e 73 2e 0a 45 61 63 68 20 6c 69 73 74	ll.Linux.applications..Each.list
3c240	20 65 6e 74 72 79 20 69 73 20 61 20 70 61 69 72 20 6f 66 20 28 64 65 73 6b 74 6f 70 2d 6e 61 6d	.entry.is.a.pair.of.(desktop-nam
3c260	65 20 2e 20 64 65 73 6b 74 6f 70 2d 66 69 6c 65 29 2e 0a 54 68 69 73 20 66 75 6e 63 74 69 6f 6e	e...desktop-file)..This.function
3c280	20 61 6c 77 61 79 73 20 72 65 74 75 72 6e 73 20 69 74 73 20 65 6c 65 6d 65 6e 74 73 20 69 6e 20	.always.returns.its.elements.in.
3c2a0	61 20 73 74 61 62 6c 65 20 6f 72 64 65 72 2e 22 0a 20 20 28 6c 65 74 20 28 28 68 61 73 68 20 28	a.stable.order."...(let.((hash.(
3c2c0	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 29 29 0a	make-hash-table.:test.#'equal)).
3c2e0	20 20 20 20 20 20 20 20 72 65 73 75 6c 74 29 0a 20 20 20 20 28 64 6f 6c 69 73 74 20 28 64 69 72	........result).....(dolist.(dir
3c300	20 63 6f 75 6e 73 65 6c 2d 6c 69 6e 75 78 2d 61 70 70 73 2d 64 69 72 65 63 74 6f 72 69 65 73 29	.counsel-linux-apps-directories)
3c320	0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 64 69 72 29	.......(when.(file-exists-p.dir)
3c340	0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 64 69 72 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 61	.........(let.((dir.(file-name-a
3c360	73 2d 64 69 72 65 63 74 6f 72 79 20 64 69 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20	s-directory.dir)))...........;;.
3c380	46 75 6e 63 74 69 6f 6e 20 60 64 69 72 65 63 74 6f 72 79 2d 66 69 6c 65 73 2d 72 65 63 75 72 73	Function.`directory-files-recurs
3c3a0	69 76 65 6c 79 27 20 61 64 64 65 64 20 69 6e 20 45 6d 61 63 73 20 32 35 2e 31 2e 0a 20 20 20 20	ively'.added.in.Emacs.25.1......
3c3c0	20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 66 69 6c 65 20 28 61 6e 64 20 28 66 62 6f 75 6e 64	......(dolist.(file.(and.(fbound
3c3e0	70 20 27 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 29 0a	p.'directory-files-recursively).
3c400	20 20 20 20 20 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	.............................(di
3c420	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 64 69 72 20 22 5c	rectory-files-recursively.dir."\
3c440	5c 2e 64 65 73 6b 74 6f 70 5c 5c 27 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65	\.desktop\\'"))).............(le
3c460	74 20 28 28 69 64 20 28 73 75 62 73 74 2d 63 68 61 72 2d 69 6e 2d 73 74 72 69 6e 67 20 3f 2f 20	t.((id.(subst-char-in-string.?/.
3c480	3f 2d 20 28 66 69 6c 65 2d 72 65 6c 61 74 69 76 65 2d 6e 61 6d 65 20 66 69 6c 65 20 64 69 72 29	?-.(file-relative-name.file.dir)
3c4a0	29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 6e 6f	)))...............(when.(and.(no
3c4c0	74 20 28 67 65 74 68 61 73 68 20 69 64 20 68 61 73 68 29 29 20 28 66 69 6c 65 2d 72 65 61 64 61	t.(gethash.id.hash)).(file-reada
3c4e0	62 6c 65 2d 70 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 70 75	ble-p.file)).................(pu
3c500	73 68 20 28 63 6f 6e 73 20 69 64 20 66 69 6c 65 29 20 72 65 73 75 6c 74 29 0a 20 20 20 20 20 20	sh.(cons.id.file).result).......
3c520	20 20 20 20 20 20 20 20 20 20 28 70 75 74 68 61 73 68 20 69 64 20 66 69 6c 65 20 68 61 73 68 29	..........(puthash.id.file.hash)
3c540	29 29 29 29 29 29 0a 20 20 20 20 72 65 73 75 6c 74 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e	)))))).....result))..(defun.coun
3c560	73 65 6c 2d 6c 69 6e 75 78 2d 61 70 70 2d 2d 70 61 72 73 65 2d 66 69 6c 65 20 28 66 69 6c 65 29	sel-linux-app--parse-file.(file)
3c580	0a 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 20 28 69 6e 73 65 72 74	...(with-temp-buffer.....(insert
3c5a0	2d 66 69 6c 65 2d 63 6f 6e 74 65 6e 74 73 20 66 69 6c 65 29 0a 20 20 20 20 28 67 6f 74 6f 2d 63	-file-contents.file).....(goto-c
3c5c0	68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20 28 6c 65 74 20 28 28 73 74 61 72	har.(point-min)).....(let.((star
3c5e0	74 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 5e 5c 5c 5b 44 65 73 6b 74 6f	t.(re-search-forward."^\\[Deskto
3c600	70 20 45 6e 74 72 79 5c 5c 5d 20 2a 24 22 20 6e 69 6c 20 74 29 29 0a 20 20 20 20 20 20 20 20 20	p.Entry\\].*$".nil.t))..........
3c620	20 28 65 6e 64 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 5e 5c 5c 5b 22 20	.(end.(re-search-forward."^\\[".
3c640	6e 69 6c 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 76 69 73 69 62 6c 65 20 74 29 0a 20 20	nil.t))...........(visible.t)...
3c660	20 20 20 20 20 20 20 20 6e 61 6d 65 20 63 6f 6d 6d 65 6e 74 20 65 78 65 63 29 0a 20 20 20 20 20	........name.comment.exec)......
3c680	20 28 63 61 74 63 68 20 27 62 72 65 61 6b 0a 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 73	.(catch.'break.........(unless.s
3c6a0	74 61 72 74 0a 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 66 69 6c 65 20 63 6f 75 6e 73 65	tart...........(push.file.counse
3c6c0	6c 2d 6c 69 6e 75 78 2d 61 70 70 73 2d 66 61 75 6c 74 79 29 0a 20 20 20 20 20 20 20 20 20 20 28	l-linux-apps-faulty)...........(
3c6e0	6d 65 73 73 61 67 65 20 22 57 61 72 6e 69 6e 67 3a 20 46 69 6c 65 20 25 73 20 68 61 73 20 6e 6f	message."Warning:.File.%s.has.no
3c700	20 5b 44 65 73 6b 74 6f 70 20 45 6e 74 72 79 5d 20 67 72 6f 75 70 22 20 66 69 6c 65 29 0a 20 20	.[Desktop.Entry].group".file)...
3c720	20 20 20 20 20 20 20 20 28 74 68 72 6f 77 20 27 62 72 65 61 6b 20 6e 69 6c 29 29 0a 0a 20 20 20	........(throw.'break.nil)).....
3c740	20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 73 74 61 72 74 29 0a 20 20 20 20 20 20 20 20 28	.....(goto-char.start).........(
3c760	77 68 65 6e 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 5e 5c 5c 28 48 69 64	when.(re-search-forward."^\\(Hid
3c780	64 65 6e 5c 5c 7c 4e 6f 44 69 73 70 6c 61 79 5c 5c 29 20 2a 3d 20 2a 5c 5c 28 31 5c 5c 7c 74 72	den\\|NoDisplay\\).*=.*\\(1\\|tr
3c7a0	75 65 5c 5c 29 20 2a 24 22 20 65 6e 64 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71	ue\\).*$".end.t)...........(setq
3c7c0	20 76 69 73 69 62 6c 65 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 6e 61 6d	.visible.nil)).........(setq.nam
3c7e0	65 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 31 29 29 0a 0a 20 20 20 20 20 20 20 20 28 67 6f	e.(match-string.1))..........(go
3c800	74 6f 2d 63 68 61 72 20 73 74 61 72 74 29 0a 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28	to-char.start).........(unless.(
3c820	72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 5e 54 79 70 65 20 2a 3d 20 2a 41 70 70	re-search-forward."^Type.*=.*App
3c840	6c 69 63 61 74 69 6f 6e 20 2a 24 22 20 65 6e 64 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 74	lication.*$".end.t)...........(t
3c860	68 72 6f 77 20 27 62 72 65 61 6b 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20	hrow.'break.nil)).........(setq.
3c880	6e 61 6d 65 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 31 29 29 0a 0a 20 20 20 20 20 20 20 20	name.(match-string.1))..........
3c8a0	28 67 6f 74 6f 2d 63 68 61 72 20 73 74 61 72 74 29 0a 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73	(goto-char.start).........(unles
3c8c0	73 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 5e 4e 61 6d 65 20 2a 3d 20 2a	s.(re-search-forward."^Name.*=.*
3c8e0	5c 5c 28 2e 2b 5c 5c 29 24 22 20 65 6e 64 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 75 73	\\(.+\\)$".end.t)...........(pus
3c900	68 20 66 69 6c 65 20 63 6f 75 6e 73 65 6c 2d 6c 69 6e 75 78 2d 61 70 70 73 2d 66 61 75 6c 74 79	h.file.counsel-linux-apps-faulty
3c920	29 0a 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 57 61 72 6e 69 6e 67 3a 20 46	)...........(message."Warning:.F
3c940	69 6c 65 20 25 73 20 68 61 73 20 6e 6f 20 4e 61 6d 65 22 20 66 69 6c 65 29 0a 20 20 20 20 20 20	ile.%s.has.no.Name".file).......
3c960	20 20 20 20 28 74 68 72 6f 77 20 27 62 72 65 61 6b 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20	....(throw.'break.nil)).........
3c980	28 73 65 74 71 20 6e 61 6d 65 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 31 29 29 0a 0a 20 20	(setq.name.(match-string.1))....
3c9a0	20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 73 74 61 72 74 29 0a 20 20 20 20 20 20 20 20	......(goto-char.start).........
3c9c0	28 77 68 65 6e 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 5e 43 6f 6d 6d 65	(when.(re-search-forward."^Comme
3c9e0	6e 74 20 2a 3d 20 2a 5c 5c 28 2e 2b 5c 5c 29 24 22 20 65 6e 64 20 74 29 0a 20 20 20 20 20 20 20	nt.*=.*\\(.+\\)$".end.t)........
3ca00	20 20 20 28 73 65 74 71 20 63 6f 6d 6d 65 6e 74 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 31	...(setq.comment.(match-string.1
3ca20	29 29 29 0a 0a 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 73 74 61 72 74 29 0a 20	)))..........(goto-char.start)..
3ca40	20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72	.......(unless.(re-search-forwar
3ca60	64 20 22 5e 45 78 65 63 20 2a 3d 20 2a 5c 5c 28 2e 2b 5c 5c 29 24 22 20 65 6e 64 20 74 29 0a 20	d."^Exec.*=.*\\(.+\\)$".end.t)..
3ca80	20 20 20 20 20 20 20 20 20 3b 3b 20 44 6f 6e 27 74 20 77 61 72 6e 20 62 65 63 61 75 73 65 20 74	.........;;.Don't.warn.because.t
3caa0	68 69 73 20 63 61 6e 20 74 65 63 68 6e 69 63 61 6c 6c 79 20 62 65 20 61 20 76 61 6c 69 64 20 64	his.can.technically.be.a.valid.d
3cac0	65 73 6b 74 6f 70 20 66 69 6c 65 2e 0a 20 20 20 20 20 20 20 20 20 20 28 74 68 72 6f 77 20 27 62	esktop.file............(throw.'b
3cae0	72 65 61 6b 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 65 78 65 63 20 28 6d	reak.nil)).........(setq.exec.(m
3cb00	61 74 63 68 2d 73 74 72 69 6e 67 20 31 29 29 0a 0a 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63	atch-string.1))..........(goto-c
3cb20	68 61 72 20 73 74 61 72 74 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 72 65 2d 73 65 61	har.start).........(when.(re-sea
3cb40	72 63 68 2d 66 6f 72 77 61 72 64 20 22 5e 54 72 79 45 78 65 63 20 2a 3d 20 2a 5c 5c 28 2e 2b 5c	rch-forward."^TryExec.*=.*\\(.+\
3cb60	5c 29 24 22 20 65 6e 64 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 74 72 79	\)$".end.t)...........(let.((try
3cb80	2d 65 78 65 63 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 31 29 29 29 0a 20 20 20 20 20 20 20	-exec.(match-string.1)))........
3cba0	20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 6c 6f 63 61 74 65 2d 66 69 6c 65 20 74 72 79 2d 65 78	.....(unless.(locate-file.try-ex
3cbc0	65 63 20 65 78 65 63 2d 70 61 74 68 20 6e 69 6c 20 23 27 66 69 6c 65 2d 65 78 65 63 75 74 61 62	ec.exec-path.nil.#'file-executab
3cbe0	6c 65 2d 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 68 72 6f 77 20 27 62 72 65 61	le-p)...............(throw.'brea
3cc00	6b 20 6e 69 6c 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 0a 20 20	k.nil)))).........(propertize...
3cc20	20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 63 6f 75 6e 73 65 6c 2d 6c 69 6e 75 78 2d 61 70	.......(funcall.counsel-linux-ap
3cc40	70 2d 66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 20 6e 61 6d 65 20 63 6f 6d 6d 65 6e 74 20 65	p-format-function.name.comment.e
3cc60	78 65 63 29 0a 20 20 20 20 20 20 20 20 20 27 76 69 73 69 62 6c 65 20 76 69 73 69 62 6c 65 29 29	xec)..........'visible.visible))
3cc80	29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6c 69 6e 75 78 2d 61 70 70 73 2d 70	)))..(defun.counsel-linux-apps-p
3cca0	61 72 73 65 20 28 64 65 73 6b 74 6f 70 2d 65 6e 74 72 69 65 73 2d 61 6c 69 73 74 29 0a 20 20 22	arse.(desktop-entries-alist)..."
3ccc0	50 61 72 73 65 20 74 68 65 20 67 69 76 65 6e 20 61 6c 69 73 74 20 6f 66 20 4c 69 6e 75 78 20 64	Parse.the.given.alist.of.Linux.d
3cce0	65 73 6b 74 6f 70 20 65 6e 74 72 69 65 73 2e 0a 45 61 63 68 20 65 6e 74 72 79 20 69 6e 20 44 45	esktop.entries..Each.entry.in.DE
3cd00	53 4b 54 4f 50 2d 45 4e 54 52 49 45 53 2d 41 4c 49 53 54 20 69 73 20 61 20 70 61 69 72 20 6f 66	SKTOP-ENTRIES-ALIST.is.a.pair.of
3cd20	20 28 28 69 64 20 2e 20 66 69 6c 65 2d 6e 61 6d 65 29 29 2e 0a 41 6e 79 20 64 65 73 6b 74 6f 70	.((id...file-name))..Any.desktop
3cd40	20 65 6e 74 72 69 65 73 20 74 68 61 74 20 66 61 69 6c 20 74 6f 20 70 61 72 73 65 20 61 72 65 20	.entries.that.fail.to.parse.are.
3cd60	72 65 63 6f 72 64 65 64 20 69 6e 0a 60 63 6f 75 6e 73 65 6c 2d 6c 69 6e 75 78 2d 61 70 70 73 2d	recorded.in.`counsel-linux-apps-
3cd80	66 61 75 6c 74 79 27 2e 22 0a 20 20 28 6c 65 74 20 28 72 65 73 75 6c 74 29 0a 20 20 20 20 28 73	faulty'."...(let.(result).....(s
3cda0	65 74 71 20 63 6f 75 6e 73 65 6c 2d 6c 69 6e 75 78 2d 61 70 70 73 2d 66 61 75 6c 74 79 20 6e 69	etq.counsel-linux-apps-faulty.ni
3cdc0	6c 29 0a 20 20 20 20 28 64 6f 6c 69 73 74 20 28 65 6e 74 72 79 20 64 65 73 6b 74 6f 70 2d 65 6e	l).....(dolist.(entry.desktop-en
3cde0	74 72 69 65 73 2d 61 6c 69 73 74 20 72 65 73 75 6c 74 29 0a 20 20 20 20 20 20 28 6c 65 74 2a 20	tries-alist.result).......(let*.
3ce00	28 28 69 64 20 28 63 61 72 20 65 6e 74 72 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28	((id.(car.entry))..............(
3ce20	66 69 6c 65 20 28 63 64 72 20 65 6e 74 72 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28	file.(cdr.entry))..............(
3ce40	72 20 28 63 6f 75 6e 73 65 6c 2d 6c 69 6e 75 78 2d 61 70 70 2d 2d 70 61 72 73 65 2d 66 69 6c 65	r.(counsel-linux-app--parse-file
3ce60	20 66 69 6c 65 29 29 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 72 0a 20 20 20 20 20 20 20	.file))).........(when.r........
3ce80	20 20 20 28 70 75 73 68 20 28 63 6f 6e 73 20 72 20 69 64 29 20 72 65 73 75 6c 74 29 29 29 29 29	...(push.(cons.r.id).result)))))
3cea0	29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6c 69 6e 75 78 2d 61 70 70 73 2d 6c 69 73	)..(defun.counsel-linux-apps-lis
3cec0	74 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 6c 69 73 74 20 6f 66 20 61 6c 6c 20 4c 69 6e 75 78	t.()..."Return.list.of.all.Linux
3cee0	20 64 65 73 6b 74 6f 70 20 61 70 70 6c 69 63 61 74 69 6f 6e 73 2e 22 0a 20 20 28 6c 65 74 2a 20	.desktop.applications."...(let*.
3cf00	28 28 6e 65 77 2d 64 65 73 6b 74 6f 70 2d 61 6c 69 73 74 20 28 63 6f 75 6e 73 65 6c 2d 6c 69 6e	((new-desktop-alist.(counsel-lin
3cf20	75 78 2d 61 70 70 73 2d 6c 69 73 74 2d 64 65 73 6b 74 6f 70 2d 66 69 6c 65 73 29 29 0a 20 20 20	ux-apps-list-desktop-files))....
3cf40	20 20 20 20 20 20 28 6e 65 77 2d 66 69 6c 65 73 20 28 6d 61 70 63 61 72 20 23 27 63 64 72 20 6e	......(new-files.(mapcar.#'cdr.n
3cf60	65 77 2d 64 65 73 6b 74 6f 70 2d 61 6c 69 73 74 29 29 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20	ew-desktop-alist))).....(unless.
3cf80	28 61 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 20 63 6f 75 6e 73 65 6c 2d 6c 69	(and..............(eq.counsel-li
3cfa0	6e 75 78 2d 61 70 70 2d 66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20	nux-app-format-function.........
3cfc0	20 20 20 20 20 20 20 20 20 63 6f 75 6e 73 65 6c 2d 2d 6c 69 6e 75 78 2d 61 70 70 73 2d 63 61 63	.........counsel--linux-apps-cac
3cfe0	68 65 2d 66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	he-format-function).............
3d000	20 28 65 71 75 61 6c 20 6e 65 77 2d 66 69 6c 65 73 20 63 6f 75 6e 73 65 6c 2d 2d 6c 69 6e 75 78	.(equal.new-files.counsel--linux
3d020	2d 61 70 70 73 2d 63 61 63 68 65 64 2d 66 69 6c 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	-apps-cached-files).............
3d040	20 28 6e 75 6c 6c 20 28 63 6c 2d 66 69 6e 64 2d 69 66 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	.(null.(cl-find-if..............
3d060	20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20	.......(lambda.(file)...........
3d080	20 20 20 20 20 20 20 20 20 20 20 20 28 74 69 6d 65 2d 6c 65 73 73 2d 70 0a 20 20 20 20 20 20 20	............(time-less-p........
3d0a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 75 6e 73 65 6c 2d 2d 6c 69 6e 75 78 2d 61	................counsel--linux-a
3d0c0	70 70 73 2d 63 61 63 68 65 2d 74 69 6d 65 73 74 61 6d 70 0a 20 20 20 20 20 20 20 20 20 20 20 20	pps-cache-timestamp.............
3d0e0	20 20 20 20 20 20 20 20 20 20 20 28 6e 74 68 20 35 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74	...........(nth.5.(file-attribut
3d100	65 73 20 66 69 6c 65 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	es.file)))).....................
3d120	6e 65 77 2d 66 69 6c 65 73 29 29 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 6f 75 6e 73 65 6c	new-files))).......(setq.counsel
3d140	2d 2d 6c 69 6e 75 78 2d 61 70 70 73 2d 63 61 63 68 65 20 28 63 6f 75 6e 73 65 6c 2d 6c 69 6e 75	--linux-apps-cache.(counsel-linu
3d160	78 2d 61 70 70 73 2d 70 61 72 73 65 20 6e 65 77 2d 64 65 73 6b 74 6f 70 2d 61 6c 69 73 74 29 29	x-apps-parse.new-desktop-alist))
3d180	0a 20 20 20 20 20 20 28 73 65 74 71 20 63 6f 75 6e 73 65 6c 2d 2d 6c 69 6e 75 78 2d 61 70 70 73	.......(setq.counsel--linux-apps
3d1a0	2d 63 61 63 68 65 2d 66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 20 63 6f 75 6e 73 65 6c 2d 6c	-cache-format-function.counsel-l
3d1c0	69 6e 75 78 2d 61 70 70 2d 66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 29 0a 20 20 20 20 20 20	inux-app-format-function).......
3d1e0	28 73 65 74 71 20 63 6f 75 6e 73 65 6c 2d 2d 6c 69 6e 75 78 2d 61 70 70 73 2d 63 61 63 68 65 2d	(setq.counsel--linux-apps-cache-
3d200	74 69 6d 65 73 74 61 6d 70 20 28 63 75 72 72 65 6e 74 2d 74 69 6d 65 29 29 0a 20 20 20 20 20 20	timestamp.(current-time)).......
3d220	28 73 65 74 71 20 63 6f 75 6e 73 65 6c 2d 2d 6c 69 6e 75 78 2d 61 70 70 73 2d 63 61 63 68 65 64	(setq.counsel--linux-apps-cached
3d240	2d 66 69 6c 65 73 20 6e 65 77 2d 66 69 6c 65 73 29 29 29 0a 20 20 63 6f 75 6e 73 65 6c 2d 2d 6c	-files.new-files)))...counsel--l
3d260	69 6e 75 78 2d 61 70 70 73 2d 63 61 63 68 65 29 0a 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65	inux-apps-cache)...(defun.counse
3d280	6c 2d 6c 69 6e 75 78 2d 61 70 70 2d 61 63 74 69 6f 6e 2d 64 65 66 61 75 6c 74 20 28 64 65 73 6b	l-linux-app-action-default.(desk
3d2a0	74 6f 70 2d 73 68 6f 72 74 63 75 74 29 0a 20 20 22 4c 61 75 6e 63 68 20 44 45 53 4b 54 4f 50 2d	top-shortcut)..."Launch.DESKTOP-
3d2c0	53 48 4f 52 54 43 55 54 2e 22 0a 20 20 28 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 22 67 74 6b 2d	SHORTCUT."...(call-process."gtk-
3d2e0	6c 61 75 6e 63 68 22 20 6e 69 6c 20 30 20 6e 69 6c 20 28 63 64 72 20 64 65 73 6b 74 6f 70 2d 73	launch".nil.0.nil.(cdr.desktop-s
3d300	68 6f 72 74 63 75 74 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6c 69 6e 75 78	hortcut)))..(defun.counsel-linux
3d320	2d 61 70 70 2d 61 63 74 69 6f 6e 2d 66 69 6c 65 20 28 64 65 73 6b 74 6f 70 2d 73 68 6f 72 74 63	-app-action-file.(desktop-shortc
3d340	75 74 29 0a 20 20 22 4c 61 75 6e 63 68 20 44 45 53 4b 54 4f 50 2d 53 48 4f 52 54 43 55 54 20 77	ut)..."Launch.DESKTOP-SHORTCUT.w
3d360	69 74 68 20 61 20 73 65 6c 65 63 74 65 64 20 66 69 6c 65 2e 22 0a 20 20 28 63 61 6c 6c 2d 70 72	ith.a.selected.file."...(call-pr
3d380	6f 63 65 73 73 20 22 67 74 6b 2d 6c 61 75 6e 63 68 22 20 6e 69 6c 20 30 20 6e 69 6c 0a 20 20 20	ocess."gtk-launch".nil.0.nil....
3d3a0	20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 64 72 20 64 65 73 6b 74 6f 70 2d 73 68 6f 72 74 63	.............(cdr.desktop-shortc
3d3c0	75 74 29 0a 20 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	ut).................(read-file-n
3d3e0	61 6d 65 20 22 46 69 6c 65 3a 20 22 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d	ame."File:.")))..(defun.counsel-
3d400	6c 69 6e 75 78 2d 61 70 70 2d 61 63 74 69 6f 6e 2d 6f 70 65 6e 2d 64 65 73 6b 74 6f 70 20 28 64	linux-app-action-open-desktop.(d
3d420	65 73 6b 74 6f 70 2d 73 68 6f 72 74 63 75 74 29 0a 20 20 22 4f 70 65 6e 20 44 45 53 4b 54 4f 50	esktop-shortcut)..."Open.DESKTOP
3d440	2d 53 48 4f 52 54 43 55 54 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 61 70 70 20 28 63 64 72 20 64	-SHORTCUT."...(let*.((app.(cdr.d
3d460	65 73 6b 74 6f 70 2d 73 68 6f 72 74 63 75 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 69 6c 65	esktop-shortcut))..........(file
3d480	20 28 63 64 72 20 28 61 73 73 6f 63 20 61 70 70 20 28 63 6f 75 6e 73 65 6c 2d 6c 69 6e 75 78 2d	.(cdr.(assoc.app.(counsel-linux-
3d4a0	61 70 70 73 2d 6c 69 73 74 2d 64 65 73 6b 74 6f 70 2d 66 69 6c 65 73 29 29 29 29 29 0a 20 20 20	apps-list-desktop-files)))))....
3d4c0	20 28 69 66 20 66 69 6c 65 0a 20 20 20 20 20 20 20 20 28 66 69 6e 64 2d 66 69 6c 65 20 66 69 6c	.(if.file.........(find-file.fil
3d4e0	65 29 0a 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 43 6f 75 6c 64 20 6e 6f 74 20 66 69 6e 64 20	e).......(error."Could.not.find.
3d500	6c 6f 63 61 74 69 6f 6e 20 6f 66 20 66 69 6c 65 20 25 73 22 20 61 70 70 29 29 29 29 0a 0a 28 69	location.of.file.%s".app))))..(i
3d520	76 79 2d 73 65 74 2d 61 63 74 69 6f 6e 73 0a 20 27 63 6f 75 6e 73 65 6c 2d 6c 69 6e 75 78 2d 61	vy-set-actions..'counsel-linux-a
3d540	70 70 0a 20 27 28 28 22 66 22 20 63 6f 75 6e 73 65 6c 2d 6c 69 6e 75 78 2d 61 70 70 2d 61 63 74	pp..'(("f".counsel-linux-app-act
3d560	69 6f 6e 2d 66 69 6c 65 20 22 72 75 6e 20 6f 6e 20 61 20 66 69 6c 65 22 29 0a 20 20 20 28 22 64	ion-file."run.on.a.file")....("d
3d580	22 20 63 6f 75 6e 73 65 6c 2d 6c 69 6e 75 78 2d 61 70 70 2d 61 63 74 69 6f 6e 2d 6f 70 65 6e 2d	".counsel-linux-app-action-open-
3d5a0	64 65 73 6b 74 6f 70 20 22 6f 70 65 6e 20 64 65 73 6b 74 6f 70 20 66 69 6c 65 22 29 29 29 0a 0a	desktop."open.desktop.file")))..
3d5c0	3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 6c 69	;;;###autoload.(defun.counsel-li
3d5e0	6e 75 78 2d 61 70 70 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 29 0a 20 20 22 4c 61 75 6e 63	nux-app.(&optional.arg)..."Launc
3d600	68 20 61 20 4c 69 6e 75 78 20 64 65 73 6b 74 6f 70 20 61 70 70 6c 69 63 61 74 69 6f 6e 2c 20 73	h.a.Linux.desktop.application,.s
3d620	69 6d 69 6c 61 72 20 74 6f 20 41 6c 74 2d 3c 46 32 3e 2e 0a 57 68 65 6e 20 41 52 47 20 69 73 20	imilar.to.Alt-<F2>..When.ARG.is.
3d640	6e 6f 6e 2d 6e 69 6c 2c 20 69 67 6e 6f 72 65 20 4e 6f 44 69 73 70 6c 61 79 20 70 72 6f 70 65 72	non-nil,.ignore.NoDisplay.proper
3d660	74 79 20 69 6e 20 2a 2e 64 65 73 6b 74 6f 70 20 66 69 6c 65 73 2e 22 0a 20 20 28 69 6e 74 65 72	ty.in.*.desktop.files."...(inter
3d680	61 63 74 69 76 65 20 22 50 22 29 0a 20 20 28 69 76 79 2d 72 65 61 64 20 22 52 75 6e 20 61 70 70	active."P")...(ivy-read."Run.app
3d6a0	6c 69 63 61 74 69 6f 6e 3a 20 22 20 28 63 6f 75 6e 73 65 6c 2d 6c 69 6e 75 78 2d 61 70 70 73 2d	lication:.".(counsel-linux-apps-
3d6c0	6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 70 72 65 64 69 63 61 74 65 20 28 75 6e	list).............:predicate.(un
3d6e0	6c 65 73 73 20 61 72 67 20 28 6c 61 6d 62 64 61 20 28 78 29 20 28 67 65 74 2d 74 65 78 74 2d 70	less.arg.(lambda.(x).(get-text-p
3d700	72 6f 70 65 72 74 79 20 30 20 27 76 69 73 69 62 6c 65 20 28 63 61 72 20 78 29 29 29 29 0a 20 20	roperty.0.'visible.(car.x))))...
3d720	20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 23 27 63 6f 75 6e 73 65 6c 2d 6c 69 6e 75	..........:action.#'counsel-linu
3d740	78 2d 61 70 70 2d 61 63 74 69 6f 6e 2d 64 65 66 61 75 6c 74 0a 20 20 20 20 20 20 20 20 20 20 20	x-app-action-default............
3d760	20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 6c 69 6e 75 78 2d 61 70 70 29 29 0a 0a 3b	.:caller.'counsel-linux-app))..;
3d780	3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 77 6d 63 74 72 6c 27 0a 0a 28 64 65 66 75 6e 20 63 6f 75	;;;.`counsel-wmctrl'..(defun.cou
3d7a0	6e 73 65 6c 2d 77 6d 63 74 72 6c 2d 61 63 74 69 6f 6e 20 28 78 29 0a 20 20 22 53 65 6c 65 63 74	nsel-wmctrl-action.(x)..."Select
3d7c0	20 74 68 65 20 64 65 73 6b 74 6f 70 20 77 69 6e 64 6f 77 20 74 68 61 74 20 63 6f 72 72 65 73 70	.the.desktop.window.that.corresp
3d7e0	6f 6e 64 73 20 74 6f 20 58 2e 22 0a 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 72 75 6e 20 22 77 6d 63	onds.to.X."...(counsel--run."wmc
3d800	74 72 6c 22 20 22 2d 69 22 20 22 2d 61 22 20 28 63 64 72 20 78 29 29 29 0a 0a 28 64 65 66 76 61	trl"."-i"."-a".(cdr.x)))..(defva
3d820	72 20 63 6f 75 6e 73 65 6c 2d 77 6d 63 74 72 6c 2d 69 67 6e 6f 72 65 20 27 28 22 58 64 6e 64 43	r.counsel-wmctrl-ignore.'("XdndC
3d840	6f 6c 6c 65 63 74 69 6f 6e 57 69 6e 64 6f 77 49 6d 70 22 0a 20 20 20 20 20 20 20 20 20 20 20 20	ollectionWindowImp".............
3d860	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 75 6e 69 74 79 2d 6c 61 75 6e 63	...................."unity-launc
3d880	68 65 72 22 20 22 75 6e 69 74 79 2d 70 61 6e 65 6c 22 20 22 75 6e 69 74 79 2d 64 61 73 68 22 0a	her"."unity-panel"."unity-dash".
3d8a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
3d8c0	22 48 75 64 22 20 22 44 65 73 6b 74 6f 70 22 29 0a 20 20 22 4c 69 73 74 20 6f 66 20 77 69 6e 64	"Hud"."Desktop")..."List.of.wind
3d8e0	6f 77 20 74 69 74 6c 65 73 20 74 6f 20 69 67 6e 6f 72 65 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c	ow.titles.to.ignore.for.`counsel
3d900	2d 77 6d 63 74 72 6c 27 2e 22 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 77 6d 63	-wmctrl'.")..(defun.counsel--wmc
3d920	74 72 6c 2d 70 61 72 73 65 20 28 73 29 0a 20 20 28 77 68 65 6e 20 28 73 74 72 69 6e 67 2d 6d 61	trl-parse.(s)...(when.(string-ma
3d940	74 63 68 20 22 5c 5c 60 5c 5c 28 5b 30 2d 39 61 2d 66 78 5d 2b 5c 5c 29 20 2b 5c 5c 28 5b 2d 30	tch."\\`\\([0-9a-fx]+\\).+\\([-0
3d960	2d 39 5d 2b 5c 5c 29 20 2b 5c 5c 28 3f 3a 5b 30 2d 39 5d 2b 5c 5c 29 20 2b 5c 5c 28 5b 5e 20 5d	-9]+\\).+\\(?:[0-9]+\\).+\\([^.]
3d980	2b 5c 5c 29 20 5c 5c 28 2e 2b 5c 5c 29 24 22 20 73 29 0a 20 20 20 20 28 6c 65 74 20 28 28 74 69	+\\).\\(.+\\)$".s).....(let.((ti
3d9a0	74 6c 65 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 34 20 73 29 29 0a 20 20 20 20 20 20 20 20	tle.(match-string.4.s)).........
3d9c0	20 20 28 69 64 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 31 20 73 29 29 29 0a 20 20 20 20 20	..(id.(match-string.1.s)))......
3d9e0	20 28 75 6e 6c 65 73 73 20 28 6d 65 6d 62 65 72 20 74 69 74 6c 65 20 63 6f 75 6e 73 65 6c 2d 77	.(unless.(member.title.counsel-w
3da00	6d 63 74 72 6c 2d 69 67 6e 6f 72 65 29 0a 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 74 69 74 6c	mctrl-ignore).........(cons.titl
3da20	65 20 69 64 29 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e	e.id)))))..;;;###autoload.(defun
3da40	20 63 6f 75 6e 73 65 6c 2d 77 6d 63 74 72 6c 20 28 29 0a 20 20 22 53 65 6c 65 63 74 20 61 20 64	.counsel-wmctrl.()..."Select.a.d
3da60	65 73 6b 74 6f 70 20 77 69 6e 64 6f 77 20 75 73 69 6e 67 20 77 6d 63 74 72 6c 2e 22 0a 20 20 28	esktop.window.using.wmctrl."...(
3da80	69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 2a 20 28 28 63 61 6e 64 73 31 20 28 63	interactive)...(let*.((cands1.(c
3daa0	6f 75 6e 73 65 6c 2d 2d 73 6c 20 22 77 6d 63 74 72 6c 20 2d 6c 20 2d 70 22 29 29 0a 20 20 20 20	ounsel--sl."wmctrl.-l.-p")).....
3dac0	20 20 20 20 20 28 63 61 6e 64 73 32 20 28 64 65 6c 71 20 6e 69 6c 20 28 6d 61 70 63 61 72 20 23	.....(cands2.(delq.nil.(mapcar.#
3dae0	27 63 6f 75 6e 73 65 6c 2d 2d 77 6d 63 74 72 6c 2d 70 61 72 73 65 20 63 61 6e 64 73 31 29 29 29	'counsel--wmctrl-parse.cands1)))
3db00	29 0a 20 20 20 20 28 69 76 79 2d 72 65 61 64 20 22 77 69 6e 64 6f 77 3a 20 22 20 63 61 6e 64 73	).....(ivy-read."window:.".cands
3db20	32 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 23 27 63 6f 75 6e 73 65	2...............:action.#'counse
3db40	6c 2d 77 6d 63 74 72 6c 2d 61 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63	l-wmctrl-action...............:c
3db60	61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 77 6d 63 74 72 6c 29 29 29 0a 0a 28 64 65 66 76 61	aller.'counsel-wmctrl)))..(defva
3db80	72 20 63 6f 75 6e 73 65 6c 2d 2d 73 77 69 74 63 68 2d 62 75 66 66 65 72 2d 74 65 6d 70 6f 72 61	r.counsel--switch-buffer-tempora
3dba0	72 79 2d 62 75 66 66 65 72 73 20 6e 69 6c 0a 20 20 22 49 6e 74 65 72 6e 61 6c 2e 22 29 0a 0a 28	ry-buffers.nil..."Internal.")..(
3dbc0	64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 2d 73 77 69 74 63 68 2d 62 75 66 66 65 72 2d 70 72	defvar.counsel--switch-buffer-pr
3dbe0	65 76 69 6f 75 73 2d 62 75 66 66 65 72 73 20 6e 69 6c 0a 20 20 22 49 6e 74 65 72 6e 61 6c 2e 22	evious-buffers.nil..."Internal."
3dc00	29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 73 77 69 74 63 68 2d 62 75 66 66 65 72	)..(defun.counsel--switch-buffer
3dc20	2d 75 6e 77 69 6e 64 20 28 29 0a 20 20 22 43 6c 65 61 72 20 74 65 6d 70 6f 72 61 72 79 20 66 69	-unwind.()..."Clear.temporary.fi
3dc40	6c 65 20 62 75 66 66 65 72 73 20 61 6e 64 20 72 65 73 74 6f 72 65 20 60 62 75 66 66 65 72 2d 6c	le.buffers.and.restore.`buffer-l
3dc60	69 73 74 27 2e 0a 54 68 65 20 62 75 66 66 65 72 73 20 61 72 65 20 74 68 6f 73 65 20 6f 70 65 6e	ist'..The.buffers.are.those.open
3dc80	65 64 20 64 75 72 69 6e 67 20 61 20 73 65 73 73 69 6f 6e 20 6f 66 20 60 63 6f 75 6e 73 65 6c 2d	ed.during.a.session.of.`counsel-
3dca0	73 77 69 74 63 68 2d 62 75 66 66 65 72 27 2e 22 0a 20 20 28 6d 61 70 63 20 23 27 6b 69 6c 6c 2d	switch-buffer'."...(mapc.#'kill-
3dcc0	62 75 66 66 65 72 20 63 6f 75 6e 73 65 6c 2d 2d 73 77 69 74 63 68 2d 62 75 66 66 65 72 2d 74 65	buffer.counsel--switch-buffer-te
3dce0	6d 70 6f 72 61 72 79 2d 62 75 66 66 65 72 73 29 0a 20 20 28 64 6f 6c 69 73 74 20 28 62 75 66 20	mporary-buffers)...(dolist.(buf.
3dd00	63 6f 75 6e 73 65 6c 2d 2d 73 77 69 74 63 68 2d 62 75 66 66 65 72 2d 70 72 65 76 69 6f 75 73 2d	counsel--switch-buffer-previous-
3dd20	62 75 66 66 65 72 73 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	buffers).....(when.(buffer-live-
3dd40	70 20 62 75 66 29 20 28 62 75 72 79 2d 62 75 66 66 65 72 20 62 75 66 29 29 29 0a 20 20 28 73 65	p.buf).(bury-buffer.buf)))...(se
3dd60	74 71 20 63 6f 75 6e 73 65 6c 2d 2d 73 77 69 74 63 68 2d 62 75 66 66 65 72 2d 74 65 6d 70 6f 72	tq.counsel--switch-buffer-tempor
3dd80	61 72 79 2d 62 75 66 66 65 72 73 20 28 29 29 0a 20 20 28 73 65 74 71 20 63 6f 75 6e 73 65 6c 2d	ary-buffers.())...(setq.counsel-
3dda0	2d 73 77 69 74 63 68 2d 62 75 66 66 65 72 2d 70 72 65 76 69 6f 75 73 2d 62 75 66 66 65 72 73 20	-switch-buffer-previous-buffers.
3ddc0	28 29 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 73 77 69 74 63 68 2d	()))..(defcustom.counsel-switch-
3dde0	62 75 66 66 65 72 2d 70 72 65 76 69 65 77 2d 76 69 72 74 75 61 6c 2d 62 75 66 66 65 72 73 20 74	buffer-preview-virtual-buffers.t
3de00	0a 20 20 22 57 68 65 6e 20 6e 6f 6e 2d 6e 69 6c 2c 20 60 63 6f 75 6e 73 65 6c 2d 73 77 69 74 63	..."When.non-nil,.`counsel-switc
3de20	68 2d 62 75 66 66 65 72 27 20 77 69 6c 6c 20 70 72 65 76 69 65 77 20 76 69 72 74 75 61 6c 20 62	h-buffer'.will.preview.virtual.b
3de40	75 66 66 65 72 73 2e 22 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 29 0a 0a 28 64 65 66	uffers."...:type.'boolean)..(def
3de60	75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 73 77 69 74 63 68 2d 62 75 66 66 65 72 2d 75 70 64 61 74 65	un.counsel--switch-buffer-update
3de80	2d 66 6e 20 28 29 0a 20 20 28 75 6e 6c 65 73 73 20 63 6f 75 6e 73 65 6c 2d 2d 73 77 69 74 63 68	-fn.()...(unless.counsel--switch
3dea0	2d 62 75 66 66 65 72 2d 70 72 65 76 69 6f 75 73 2d 62 75 66 66 65 72 73 0a 20 20 20 20 28 73 65	-buffer-previous-buffers.....(se
3dec0	74 71 20 63 6f 75 6e 73 65 6c 2d 2d 73 77 69 74 63 68 2d 62 75 66 66 65 72 2d 70 72 65 76 69 6f	tq.counsel--switch-buffer-previo
3dee0	75 73 2d 62 75 66 66 65 72 73 20 28 62 75 66 66 65 72 2d 6c 69 73 74 29 29 29 0a 20 20 28 6c 65	us-buffers.(buffer-list)))...(le
3df00	74 2a 20 28 28 76 69 72 74 75 61 6c 20 28 61 73 73 6f 63 20 28 69 76 79 2d 73 74 61 74 65 2d 63	t*.((virtual.(assoc.(ivy-state-c
3df20	75 72 72 65 6e 74 20 69 76 79 2d 6c 61 73 74 29 20 69 76 79 2d 2d 76 69 72 74 75 61 6c 2d 62 75	urrent.ivy-last).ivy--virtual-bu
3df40	66 66 65 72 73 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 6d 65 6d 62 65 72 20 28 69 76 79 2d	ffers))).....(when.(member.(ivy-
3df60	73 74 61 74 65 2d 63 75 72 72 65 6e 74 20 69 76 79 2d 6c 61 73 74 29 20 69 76 79 2d 6d 61 72 6b	state-current.ivy-last).ivy-mark
3df80	65 64 2d 63 61 6e 64 69 64 61 74 65 73 29 0a 20 20 20 20 20 20 28 73 65 74 66 20 28 69 76 79 2d	ed-candidates).......(setf.(ivy-
3dfa0	73 74 61 74 65 2d 63 75 72 72 65 6e 74 20 69 76 79 2d 6c 61 73 74 29 0a 20 20 20 20 20 20 20 20	state-current.ivy-last).........
3dfc0	20 20 20 20 28 73 75 62 73 74 72 69 6e 67 20 28 69 76 79 2d 73 74 61 74 65 2d 63 75 72 72 65 6e	....(substring.(ivy-state-curren
3dfe0	74 20 69 76 79 2d 6c 61 73 74 29 20 28 6c 65 6e 67 74 68 20 69 76 79 2d 6d 61 72 6b 2d 70 72 65	t.ivy-last).(length.ivy-mark-pre
3e000	66 69 78 29 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 20 28 28 67 65 74 2d 62 75	fix)))).....(cond.......((get-bu
3e020	66 66 65 72 20 28 69 76 79 2d 73 74 61 74 65 2d 63 75 72 72 65 6e 74 20 69 76 79 2d 6c 61 73 74	ffer.(ivy-state-current.ivy-last
3e040	29 29 0a 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 69 76 79 2d 6d 61 72 6b 65 64 2d 63 61 6e 64	))........(let.((ivy-marked-cand
3e060	69 64 61 74 65 73 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 28 69 76 79 2d 63 61 6c 6c 29	idates.nil))..........(ivy-call)
3e080	29 29 0a 20 20 20 20 20 20 28 28 61 6e 64 20 63 6f 75 6e 73 65 6c 2d 73 77 69 74 63 68 2d 62 75	)).......((and.counsel-switch-bu
3e0a0	66 66 65 72 2d 70 72 65 76 69 65 77 2d 76 69 72 74 75 61 6c 2d 62 75 66 66 65 72 73 20 76 69 72	ffer-preview-virtual-buffers.vir
3e0c0	74 75 61 6c 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 28 63 64 72 20 76 69 72 74 75 61 6c	tual.(file-exists-p.(cdr.virtual
3e0e0	29 29 29 0a 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 62 75 66 20 28 69 67 6e 6f 72 65 2d 65 72	)))........(let.((buf.(ignore-er
3e100	72 6f 72 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6d 61 79 20	rors.....................;;.may.
3e120	6e 6f 74 20 6f 70 65 6e 20 64 75 65 20 74 6f 20 60 6c 61 72 67 65 2d 66 69 6c 65 2d 77 61 72 6e	not.open.due.to.`large-file-warn
3e140	69 6e 67 2d 74 68 72 65 73 68 6f 6c 64 27 20 65 74 63 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20	ing-threshold'.etc..............
3e160	20 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 28 63 64 72	........(find-file-noselect.(cdr
3e180	20 76 69 72 74 75 61 6c 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 69 66 20 62 75 66 0a 20	.virtual)))))..........(if.buf..
3e1a0	20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	............(progn..............
3e1c0	20 20 28 70 75 73 68 20 62 75 66 20 63 6f 75 6e 73 65 6c 2d 2d 73 77 69 74 63 68 2d 62 75 66 66	..(push.buf.counsel--switch-buff
3e1e0	65 72 2d 74 65 6d 70 6f 72 61 72 79 2d 62 75 66 66 65 72 73 29 0a 20 20 20 20 20 20 20 20 20 20	er-temporary-buffers)...........
3e200	20 20 20 20 20 28 69 76 79 2d 63 61 6c 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 63	.....(ivy-call))............;;.c
3e220	6c 65 61 6e 20 75 70 20 74 68 65 20 6d 69 6e 69 62 75 66 66 65 72 20 73 6f 20 74 68 61 74 20 74	lean.up.the.minibuffer.so.that.t
3e240	68 65 72 65 27 73 20 6e 6f 20 64 65 6c 61 79 20 62 65 66 6f 72 65 0a 20 20 20 20 20 20 20 20 20	here's.no.delay.before..........
3e260	20 20 3b 3b 20 74 68 65 20 49 76 79 20 63 61 6e 64 69 64 61 74 65 73 20 61 72 65 20 64 69 73 70	..;;.the.Ivy.candidates.are.disp
3e280	6c 61 79 65 64 20 6f 6e 63 65 20 61 67 61 69 6e 0a 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73	layed.once.again............(mes
3e2a0	73 61 67 65 20 22 22 29 29 29 29 0a 20 20 20 20 20 20 28 74 0a 20 20 20 20 20 20 20 28 77 69 74	sage."")))).......(t........(wit
3e2c0	68 2d 69 76 79 2d 77 69 6e 64 6f 77 0a 20 20 20 20 20 20 20 20 20 28 73 77 69 74 63 68 2d 74 6f	h-ivy-window..........(switch-to
3e2e0	2d 62 75 66 66 65 72 20 28 69 76 79 2d 73 74 61 74 65 2d 62 75 66 66 65 72 20 69 76 79 2d 6c 61	-buffer.(ivy-state-buffer.ivy-la
3e300	73 74 29 29 29 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e	st)))))))..;;;###autoload.(defun
3e320	20 63 6f 75 6e 73 65 6c 2d 73 77 69 74 63 68 2d 62 75 66 66 65 72 20 28 29 0a 20 20 22 53 77 69	.counsel-switch-buffer.()..."Swi
3e340	74 63 68 20 74 6f 20 61 6e 6f 74 68 65 72 20 62 75 66 66 65 72 2e 0a 44 69 73 70 6c 61 79 20 61	tch.to.another.buffer..Display.a
3e360	20 70 72 65 76 69 65 77 20 6f 66 20 74 68 65 20 73 65 6c 65 63 74 65 64 20 69 76 79 20 63 6f 6d	.preview.of.the.selected.ivy.com
3e380	70 6c 65 74 69 6f 6e 20 63 61 6e 64 69 64 61 74 65 20 62 75 66 66 65 72 0a 69 6e 20 74 68 65 20	pletion.candidate.buffer.in.the.
3e3a0	63 75 72 72 65 6e 74 20 77 69 6e 64 6f 77 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29	current.window."...(interactive)
3e3c0	0a 20 20 28 6c 65 74 20 28 28 69 76 79 2d 75 70 64 61 74 65 2d 66 6e 73 2d 61 6c 69 73 74 0a 20	...(let.((ivy-update-fns-alist..
3e3e0	20 20 20 20 20 20 20 20 27 28 28 69 76 79 2d 73 77 69 74 63 68 2d 62 75 66 66 65 72 20 2e 20 63	........'((ivy-switch-buffer...c
3e400	6f 75 6e 73 65 6c 2d 2d 73 77 69 74 63 68 2d 62 75 66 66 65 72 2d 75 70 64 61 74 65 2d 66 6e 29	ounsel--switch-buffer-update-fn)
3e420	29 29 0a 20 20 20 20 20 20 20 20 28 69 76 79 2d 75 6e 77 69 6e 64 2d 66 6e 73 2d 61 6c 69 73 74	)).........(ivy-unwind-fns-alist
3e440	0a 20 20 20 20 20 20 20 20 20 27 28 28 69 76 79 2d 73 77 69 74 63 68 2d 62 75 66 66 65 72 20 2e	..........'((ivy-switch-buffer..
3e460	20 63 6f 75 6e 73 65 6c 2d 2d 73 77 69 74 63 68 2d 62 75 66 66 65 72 2d 75 6e 77 69 6e 64 29 29	.counsel--switch-buffer-unwind))
3e480	29 29 0a 20 20 20 20 28 69 76 79 2d 73 77 69 74 63 68 2d 62 75 66 66 65 72 29 29 29 0a 0a 3b 3b	)).....(ivy-switch-buffer)))..;;
3e4a0	3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 73 77 69 74	;###autoload.(defun.counsel-swit
3e4c0	63 68 2d 62 75 66 66 65 72 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 20 28 29 0a 20 20 22 53 77 69	ch-buffer-other-window.()..."Swi
3e4e0	74 63 68 20 74 6f 20 61 6e 6f 74 68 65 72 20 62 75 66 66 65 72 20 69 6e 20 61 6e 6f 74 68 65 72	tch.to.another.buffer.in.another
3e500	20 77 69 6e 64 6f 77 2e 0a 44 69 73 70 6c 61 79 20 61 20 70 72 65 76 69 65 77 20 6f 66 20 74 68	.window..Display.a.preview.of.th
3e520	65 20 73 65 6c 65 63 74 65 64 20 69 76 79 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 63 61 6e 64 69 64	e.selected.ivy.completion.candid
3e540	61 74 65 20 62 75 66 66 65 72 0a 69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 77 69 6e 64 6f 77	ate.buffer.in.the.current.window
3e560	2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 20 28 28 69 76 79 2d	."...(interactive)...(let.((ivy-
3e580	75 70 64 61 74 65 2d 66 6e 73 2d 61 6c 69 73 74 0a 20 20 20 20 20 20 20 20 20 27 28 28 69 76 79	update-fns-alist..........'((ivy
3e5a0	2d 73 77 69 74 63 68 2d 62 75 66 66 65 72 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 20 2e 20 63 6f	-switch-buffer-other-window...co
3e5c0	75 6e 73 65 6c 2d 2d 73 77 69 74 63 68 2d 62 75 66 66 65 72 2d 75 70 64 61 74 65 2d 66 6e 29 29	unsel--switch-buffer-update-fn))
3e5e0	29 0a 20 20 20 20 20 20 20 20 28 69 76 79 2d 75 6e 77 69 6e 64 2d 66 6e 73 2d 61 6c 69 73 74 0a	).........(ivy-unwind-fns-alist.
3e600	20 20 20 20 20 20 20 20 20 27 28 28 69 76 79 2d 73 77 69 74 63 68 2d 62 75 66 66 65 72 2d 6f 74	.........'((ivy-switch-buffer-ot
3e620	68 65 72 2d 77 69 6e 64 6f 77 20 2e 20 63 6f 75 6e 73 65 6c 2d 2d 73 77 69 74 63 68 2d 62 75 66	her-window...counsel--switch-buf
3e640	66 65 72 2d 75 6e 77 69 6e 64 29 29 29 29 0a 20 20 20 20 28 69 76 79 2d 73 77 69 74 63 68 2d 62	fer-unwind)))).....(ivy-switch-b
3e660	75 66 66 65 72 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f	uffer-other-window)))..(defun.co
3e680	75 6e 73 65 6c 2d 6f 70 65 6e 2d 62 75 66 66 65 72 2d 66 69 6c 65 2d 65 78 74 65 72 6e 61 6c 6c	unsel-open-buffer-file-externall
3e6a0	79 20 28 62 75 66 66 65 72 29 0a 20 20 22 4f 70 65 6e 20 74 68 65 20 66 69 6c 65 20 61 73 73 6f	y.(buffer)..."Open.the.file.asso
3e6c0	63 69 61 74 65 64 20 77 69 74 68 20 42 55 46 46 45 52 20 77 69 74 68 20 61 6e 20 65 78 74 65 72	ciated.with.BUFFER.with.an.exter
3e6e0	6e 61 6c 20 70 72 6f 67 72 61 6d 2e 22 0a 20 20 28 77 68 65 6e 20 28 7a 65 72 6f 70 20 28 6c 65	nal.program."...(when.(zerop.(le
3e700	6e 67 74 68 20 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 43	ngth.buffer)).....(user-error."C
3e720	61 6e 27 74 20 6f 70 65 6e 20 74 68 61 74 22 29 29 0a 20 20 28 6c 65 74 2a 20 28 28 76 69 72 74	an't.open.that"))...(let*.((virt
3e740	75 61 6c 20 28 61 73 73 6f 63 20 62 75 66 66 65 72 20 69 76 79 2d 2d 76 69 72 74 75 61 6c 2d 62	ual.(assoc.buffer.ivy--virtual-b
3e760	75 66 66 65 72 73 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 6e 61 6d 65 20 28 69 66 20	uffers))..........(filename.(if.
3e780	76 69 72 74 75 61 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 28	virtual........................(
3e7a0	63 64 72 20 76 69 72 74 75 61 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	cdr.virtual)....................
3e7c0	20 20 28 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 28 67 65 74 2d 62 75 66 66 65 72 20	..(buffer-file-name.(get-buffer.
3e7e0	62 75 66 66 65 72 29 29 29 29 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 66 69 6c 65 6e 61 6d 65	buffer))))).....(unless.filename
3e800	0a 20 20 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 43 61 6e 27 74 20 6f 70 65 6e 20 60	.......(user-error."Can't.open.`
3e820	25 73 27 20 65 78 74 65 72 6e 61 6c 6c 79 22 20 62 75 66 66 65 72 29 29 0a 20 20 20 20 28 63 6f	%s'.externally".buffer)).....(co
3e840	75 6e 73 65 6c 2d 6c 6f 63 61 74 65 2d 61 63 74 69 6f 6e 2d 65 78 74 65 72 6e 20 28 65 78 70 61	unsel-locate-action-extern.(expa
3e860	6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 66 69 6c 65 6e 61 6d 65 29 29 29 29 0a 0a 28 69 76 79 2d	nd-file-name.filename))))..(ivy-
3e880	61 64 64 2d 61 63 74 69 6f 6e 73 0a 20 27 69 76 79 2d 73 77 69 74 63 68 2d 62 75 66 66 65 72 0a	add-actions..'ivy-switch-buffer.
3e8a0	20 27 28 28 22 78 22 20 63 6f 75 6e 73 65 6c 2d 6f 70 65 6e 2d 62 75 66 66 65 72 2d 66 69 6c 65	.'(("x".counsel-open-buffer-file
3e8c0	2d 65 78 74 65 72 6e 61 6c 6c 79 20 22 6f 70 65 6e 20 65 78 74 65 72 6e 61 6c 6c 79 22 29 29 29	-externally."open.externally")))
3e8e0	0a 0a 28 69 76 79 2d 73 65 74 2d 61 63 74 69 6f 6e 73 0a 20 27 63 6f 75 6e 73 65 6c 2d 73 77 69	..(ivy-set-actions..'counsel-swi
3e900	74 63 68 2d 62 75 66 66 65 72 0a 20 27 28 28 22 78 22 20 63 6f 75 6e 73 65 6c 2d 6f 70 65 6e 2d	tch-buffer..'(("x".counsel-open-
3e920	62 75 66 66 65 72 2d 66 69 6c 65 2d 65 78 74 65 72 6e 61 6c 6c 79 20 22 6f 70 65 6e 20 65 78 74	buffer-file-externally."open.ext
3e940	65 72 6e 61 6c 6c 79 22 29 0a 20 20 20 28 22 6a 22 20 69 76 79 2d 2d 73 77 69 74 63 68 2d 62 75	ernally")....("j".ivy--switch-bu
3e960	66 66 65 72 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 2d 61 63 74 69 6f 6e 20 22 6f 74 68 65 72 20	ffer-other-window-action."other.
3e980	77 69 6e 64 6f 77 22 29 29 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c	window")))..;;;;.`counsel-compil
3e9a0	65 27 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 68 69 73 74	e'..(defvar.counsel-compile-hist
3e9c0	6f 72 79 20 6e 69 6c 0a 20 20 22 48 69 73 74 6f 72 79 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d	ory.nil..."History.for.`counsel-
3e9e0	63 6f 6d 70 69 6c 65 27 2e 0a 0a 54 68 69 73 20 69 73 20 61 20 6c 69 73 74 20 6f 66 20 73 74 72	compile'...This.is.a.list.of.str
3ea00	69 6e 67 73 20 77 69 74 68 20 61 64 64 69 74 69 6f 6e 61 6c 20 70 72 6f 70 65 72 74 69 65 73 20	ings.with.additional.properties.
3ea20	77 68 69 63 68 20 61 6c 6c 6f 77 0a 74 68 65 20 68 69 73 74 6f 72 79 20 74 6f 20 62 65 20 66 69	which.allow.the.history.to.be.fi
3ea40	6c 74 65 72 65 64 20 64 65 70 65 6e 64 69 6e 67 20 6f 6e 20 74 68 65 20 63 6f 6e 74 65 78 74 20	ltered.depending.on.the.context.
3ea60	6f 66 20 74 68 65 20 63 61 6c 6c 2e 0a 54 68 65 20 70 72 6f 70 65 72 74 69 65 73 20 69 6e 63 6c	of.the.call..The.properties.incl
3ea80	75 64 65 3a 0a 0a 60 73 72 63 64 69 72 27 0a 20 20 20 20 74 68 65 20 72 6f 6f 74 20 64 69 72 65	ude:..`srcdir'.....the.root.dire
3eaa0	63 74 6f 72 79 20 6f 66 20 74 68 65 20 73 6f 75 72 63 65 20 63 6f 64 65 0a 60 62 6c 64 64 69 72	ctory.of.the.source.code.`blddir
3eac0	27 0a 20 20 20 20 74 68 65 20 72 6f 6f 74 20 64 69 72 65 63 74 6f 72 79 20 6f 66 20 74 68 65 20	'.....the.root.directory.of.the.
3eae0	62 75 69 6c 64 20 28 69 6e 20 6f 72 20 6f 75 74 73 69 64 65 20 74 68 65 20 60 73 72 63 64 69 72	build.(in.or.outside.the.`srcdir
3eb00	27 29 0a 60 62 6c 64 65 6e 76 27 0a 20 20 20 20 74 68 65 20 62 75 69 6c 64 20 65 6e 76 69 72 6f	').`bldenv'.....the.build.enviro
3eb20	6e 6d 65 6e 74 20 61 73 20 70 61 73 73 65 64 20 74 6f 20 60 63 6f 6d 70 69 6c 61 74 69 6f 6e 2d	nment.as.passed.to.`compilation-
3eb40	65 6e 76 69 72 6f 6e 6d 65 6e 74 27 0a 60 72 65 63 75 72 73 69 76 65 27 0a 20 20 20 20 74 68 65	environment'.`recursive'.....the
3eb60	20 63 6f 6d 70 6c 65 74 69 6f 6e 20 73 68 6f 75 6c 64 20 62 65 20 72 75 6e 20 61 67 61 69 6e 20	.completion.should.be.run.again.
3eb80	69 6e 20 60 62 6c 64 64 69 72 27 20 6f 66 20 74 68 69 73 20 72 65 73 75 6c 74 0a 60 63 6d 64 27	in.`blddir'.of.this.result.`cmd'
3eba0	0a 20 20 20 20 69 66 20 73 65 74 2c 20 70 61 73 73 20 6f 6e 6c 79 20 74 68 65 20 73 75 62 73 74	.....if.set,.pass.only.the.subst
3ebc0	72 69 6e 67 20 77 69 74 68 20 74 68 69 73 20 70 72 6f 70 65 72 74 79 20 74 6f 20 60 63 6f 6d 70	ring.with.this.property.to.`comp
3ebe0	69 6c 65 27 0a 0a 54 68 69 73 20 76 61 72 69 61 62 6c 65 20 69 73 20 73 75 69 74 61 62 6c 65 20	ile'..This.variable.is.suitable.
3ec00	66 6f 72 20 61 64 64 69 74 69 6f 6e 20 74 6f 0a 60 73 61 76 65 68 69 73 74 2d 61 64 64 69 74 69	for.addition.to.`savehist-additi
3ec20	6f 6e 61 6c 2d 76 61 72 69 61 62 6c 65 73 27 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e	onal-variables'.")..(defvar.coun
3ec40	73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 72 6f 6f 74 2d 66 75 6e 63 74 69 6f 6e 73 0a 20 20 27 28 63	sel-compile-root-functions...'(c
3ec60	6f 75 6e 73 65 6c 2d 2d 70 72 6f 6a 65 63 74 69 6c 65 2d 72 6f 6f 74 0a 20 20 20 20 63 6f 75 6e	ounsel--projectile-root.....coun
3ec80	73 65 6c 2d 2d 70 72 6f 6a 65 63 74 2d 63 75 72 72 65 6e 74 0a 20 20 20 20 63 6f 75 6e 73 65 6c	sel--project-current.....counsel
3eca0	2d 2d 63 6f 6e 66 69 67 75 72 65 2d 72 6f 6f 74 0a 20 20 20 20 63 6f 75 6e 73 65 6c 2d 2d 67 69	--configure-root.....counsel--gi
3ecc0	74 2d 72 6f 6f 74 0a 20 20 20 20 63 6f 75 6e 73 65 6c 2d 2d 64 69 72 2d 6c 6f 63 61 6c 73 2d 72	t-root.....counsel--dir-locals-r
3ece0	6f 6f 74 29 0a 20 20 22 53 70 65 63 69 61 6c 20 68 6f 6f 6b 20 74 6f 20 66 69 6e 64 20 74 68 65	oot)..."Special.hook.to.find.the
3ed00	20 70 72 6f 6a 65 63 74 20 72 6f 6f 74 20 66 6f 72 20 63 6f 6d 70 69 6c 65 20 63 6f 6d 6d 61 6e	.project.root.for.compile.comman
3ed20	64 73 2e 0a 45 61 63 68 20 66 75 6e 63 74 69 6f 6e 20 6f 6e 20 74 68 69 73 20 68 6f 6f 6b 20 69	ds..Each.function.on.this.hook.i
3ed40	73 20 63 61 6c 6c 65 64 20 69 6e 20 74 75 72 6e 20 77 69 74 68 20 6e 6f 20 61 72 67 75 6d 65 6e	s.called.in.turn.with.no.argumen
3ed60	74 73 0a 61 6e 64 20 73 68 6f 75 6c 64 20 72 65 74 75 72 6e 20 65 69 74 68 65 72 20 61 20 64 69	ts.and.should.return.either.a.di
3ed80	72 65 63 74 6f 72 79 2c 20 6f 72 20 6e 69 6c 20 69 66 20 6e 6f 20 72 6f 6f 74 20 77 61 73 0a 66	rectory,.or.nil.if.no.root.was.f
3eda0	6f 75 6e 64 2e 22 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 63 6f 6d 70 69 6c 65	ound.")..(defun.counsel--compile
3edc0	2d 72 6f 6f 74 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 72 6f 6f 74 20 6f 66 20 63 75 72 72 65	-root.()..."Return.root.of.curre
3ede0	6e 74 20 70 72 6f 6a 65 63 74 20 6f 72 20 73 69 67 6e 61 6c 20 61 6e 20 65 72 72 6f 72 20 6f 6e	nt.project.or.signal.an.error.on
3ee00	20 66 61 69 6c 75 72 65 2e 0a 54 68 65 20 72 6f 6f 74 20 69 73 20 64 65 74 65 72 6d 69 6e 65 64	.failure..The.root.is.determined
3ee20	20 62 79 20 60 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 72 6f 6f 74 2d 66 75 6e 63 74 69	.by.`counsel-compile-root-functi
3ee40	6f 6e 73 27 2e 22 0a 20 20 28 6f 72 20 28 72 75 6e 2d 68 6f 6f 6b 2d 77 69 74 68 2d 61 72 67 73	ons'."...(or.(run-hook-with-args
3ee60	2d 75 6e 74 69 6c 2d 73 75 63 63 65 73 73 20 27 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d	-until-success.'counsel-compile-
3ee80	72 6f 6f 74 2d 66 75 6e 63 74 69 6f 6e 73 29 0a 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 43 6f	root-functions).......(error."Co
3eea0	75 6c 64 6e 27 74 20 66 69 6e 64 20 70 72 6f 6a 65 63 74 20 72 6f 6f 74 22 29 29 29 0a 0a 28 64	uldn't.find.project.root")))..(d
3eec0	65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 70 72 6f 6a 65 63 74 69 6c 65 2d 72 6f 6f 74 20 28 29	efun.counsel--projectile-root.()
3eee0	0a 20 20 22 52 65 74 75 72 6e 20 72 6f 6f 74 20 6f 66 20 63 75 72 72 65 6e 74 20 70 72 6f 6a 65	..."Return.root.of.current.proje
3ef00	63 74 69 6c 65 20 70 72 6f 6a 65 63 74 20 6f 72 20 6e 69 6c 20 6f 6e 20 66 61 69 6c 75 72 65 2e	ctile.project.or.nil.on.failure.
3ef20	0a 55 73 65 20 60 70 72 6f 6a 65 63 74 69 6c 65 2d 70 72 6f 6a 65 63 74 2d 72 6f 6f 74 27 20 74	.Use.`projectile-project-root'.t
3ef40	6f 20 64 65 74 65 72 6d 69 6e 65 20 74 68 65 20 72 6f 6f 74 2e 22 0a 20 20 28 61 6e 64 20 28 66	o.determine.the.root."...(and.(f
3ef60	62 6f 75 6e 64 70 20 27 70 72 6f 6a 65 63 74 69 6c 65 2d 70 72 6f 6a 65 63 74 2d 72 6f 6f 74 29	boundp.'projectile-project-root)
3ef80	0a 20 20 20 20 20 20 20 28 70 72 6f 6a 65 63 74 69 6c 65 2d 70 72 6f 6a 65 63 74 2d 72 6f 6f 74	........(projectile-project-root
3efa0	29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 70 72 6f 6a 65 63 74 2d 63 75 72	)))..(defun.counsel--project-cur
3efc0	72 65 6e 74 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 72 6f 6f 74 20 6f 66 20 63 75 72 72 65 6e	rent.()..."Return.root.of.curren
3efe0	74 20 70 72 6f 6a 65 63 74 20 6f 72 20 6e 69 6c 20 6f 6e 20 66 61 69 6c 75 72 65 2e 0a 55 73 65	t.project.or.nil.on.failure..Use
3f000	20 60 70 72 6f 6a 65 63 74 2d 63 75 72 72 65 6e 74 27 20 74 6f 20 64 65 74 65 72 6d 69 6e 65 20	.`project-current'.to.determine.
3f020	74 68 65 20 72 6f 6f 74 2e 22 0a 20 20 28 6c 65 74 20 28 28 70 72 6f 6a 20 28 61 6e 64 20 28 66	the.root."...(let.((proj.(and.(f
3f040	62 6f 75 6e 64 70 20 27 70 72 6f 6a 65 63 74 2d 63 75 72 72 65 6e 74 29 0a 20 20 20 20 20 20 20	boundp.'project-current)........
3f060	20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 6a 65 63 74 2d 63 75 72 72 65 6e 74 29 29 29 29	............(project-current))))
3f080	0a 20 20 20 20 28 63 6f 6e 64 20 28 28 6e 6f 74 20 70 72 6f 6a 29 20 6e 69 6c 29 0a 20 20 20 20	.....(cond.((not.proj).nil).....
3f0a0	20 20 20 20 20 20 28 28 66 62 6f 75 6e 64 70 20 27 70 72 6f 6a 65 63 74 2d 72 6f 6f 74 29 0a 20	......((fboundp.'project-root)..
3f0c0	20 20 20 20 20 20 20 20 20 20 28 70 72 6f 6a 65 63 74 2d 72 6f 6f 74 20 70 72 6f 6a 29 29 0a 20	..........(project-root.proj))..
3f0e0	20 20 20 20 20 20 20 20 20 28 28 66 62 6f 75 6e 64 70 20 27 70 72 6f 6a 65 63 74 2d 72 6f 6f 74	.........((fboundp.'project-root
3f100	73 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 61 72 20 28 70 72 6f 6a 65 63 74 2d 72 6f 6f 74	s)............(car.(project-root
3f120	73 20 70 72 6f 6a 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 63 6f	s.proj))))))..(defun.counsel--co
3f140	6e 66 69 67 75 72 65 2d 72 6f 6f 74 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 72 6f 6f 74 20 6f	nfigure-root.()..."Return.root.o
3f160	66 20 63 75 72 72 65 6e 74 20 70 72 6f 6a 65 63 74 20 6f 72 20 6e 69 6c 20 6f 6e 20 66 61 69 6c	f.current.project.or.nil.on.fail
3f180	75 72 65 2e 0a 55 73 65 20 74 68 65 20 70 72 65 73 65 6e 63 65 20 6f 66 20 61 20 5c 22 63 6f 6e	ure..Use.the.presence.of.a.\"con
3f1a0	66 69 67 75 72 65 5c 22 20 66 69 6c 65 20 74 6f 20 64 65 74 65 72 6d 69 6e 65 20 74 68 65 20 72	figure\".file.to.determine.the.r
3f1c0	6f 6f 74 2e 22 0a 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 64 6f 6d 69 6e 61 74 69 6e 67 2d 66 69 6c	oot."...(counsel--dominating-fil
3f1e0	65 20 22 63 6f 6e 66 69 67 75 72 65 22 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d	e."configure"))..(defun.counsel-
3f200	2d 67 69 74 2d 72 6f 6f 74 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 72 6f 6f 74 20 6f 66 20 63	-git-root.()..."Return.root.of.c
3f220	75 72 72 65 6e 74 20 70 72 6f 6a 65 63 74 20 6f 72 20 6e 69 6c 20 6f 6e 20 66 61 69 6c 75 72 65	urrent.project.or.nil.on.failure
3f240	2e 0a 55 73 65 20 74 68 65 20 70 72 65 73 65 6e 63 65 20 6f 66 20 61 20 5c 22 2e 67 69 74 5c 22	..Use.the.presence.of.a.\".git\"
3f260	20 66 69 6c 65 20 74 6f 20 64 65 74 65 72 6d 69 6e 65 20 74 68 65 20 72 6f 6f 74 2e 22 0a 20 20	.file.to.determine.the.root."...
3f280	28 63 6f 75 6e 73 65 6c 2d 2d 64 6f 6d 69 6e 61 74 69 6e 67 2d 66 69 6c 65 20 22 2e 67 69 74 22	(counsel--dominating-file.".git"
3f2a0	29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 64 69 72 2d 6c 6f 63 61 6c 73 2d 72	))..(defun.counsel--dir-locals-r
3f2c0	6f 6f 74 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 72 6f 6f 74 20 6f 66 20 63 75 72 72 65 6e 74	oot.()..."Return.root.of.current
3f2e0	20 70 72 6f 6a 65 63 74 20 6f 72 20 6e 69 6c 20 6f 6e 20 66 61 69 6c 75 72 65 2e 0a 55 73 65 20	.project.or.nil.on.failure..Use.
3f300	74 68 65 20 70 72 65 73 65 6e 63 65 20 6f 66 20 61 20 60 64 69 72 2d 6c 6f 63 61 6c 73 2d 66 69	the.presence.of.a.`dir-locals-fi
3f320	6c 65 27 20 74 6f 20 64 65 74 65 72 6d 69 6e 65 20 74 68 65 20 72 6f 6f 74 2e 22 0a 20 20 28 63	le'.to.determine.the.root."...(c
3f340	6f 75 6e 73 65 6c 2d 2d 64 6f 6d 69 6e 61 74 69 6e 67 2d 66 69 6c 65 20 64 69 72 2d 6c 6f 63 61	ounsel--dominating-file.dir-loca
3f360	6c 73 2d 66 69 6c 65 29 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69	ls-file))..(defvar.counsel-compi
3f380	6c 65 2d 6c 6f 63 61 6c 2d 62 75 69 6c 64 73 0a 20 20 27 28 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70	le-local-builds...'(counsel-comp
3f3a0	69 6c 65 2d 67 65 74 2d 66 69 6c 74 65 72 65 64 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 63 6f 75	ile-get-filtered-history.....cou
3f3c0	6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 67 65 74 2d 62 75 69 6c 64 2d 64 69 72 65 63 74 6f 72 69	nsel-compile-get-build-directori
3f3e0	65 73 0a 20 20 20 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 67 65 74 2d 6d 61 6b 65 2d	es.....counsel-compile-get-make-
3f400	69 6e 76 6f 63 61 74 69 6f 6e 0a 20 20 20 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 67	invocation.....counsel-compile-g
3f420	65 74 2d 6d 61 6b 65 2d 68 65 6c 70 2d 69 6e 76 6f 63 61 74 69 6f 6e 73 29 0a 20 20 22 41 64 64	et-make-help-invocations)..."Add
3f440	69 74 69 6f 6e 61 6c 20 63 6f 6d 70 69 6c 65 20 69 6e 76 6f 63 61 74 69 6f 6e 73 20 74 6f 20 66	itional.compile.invocations.to.f
3f460	65 65 64 20 69 6e 74 6f 20 60 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 27 2e 0a 0a 54 68 69	eed.into.`counsel-compile'...Thi
3f480	73 20 63 61 6e 20 65 69 74 68 65 72 20 62 65 20 61 20 6c 69 73 74 20 6f 66 20 63 6f 6d 70 69 6c	s.can.either.be.a.list.of.compil
3f4a0	65 20 69 6e 76 6f 63 61 74 69 6f 6e 20 73 74 72 69 6e 67 73 20 6f 72 0a 66 75 6e 63 74 69 6f 6e	e.invocation.strings.or.function
3f4c0	73 20 74 68 61 74 20 77 69 6c 6c 20 70 72 6f 76 69 64 65 20 73 75 63 68 20 61 20 6c 69 73 74 2e	s.that.will.provide.such.a.list.
3f4e0	20 20 59 6f 75 20 73 68 6f 75 6c 64 20 63 75 73 74 6f 6d 69 7a 65 0a 74 68 69 73 20 69 66 20 79	..You.should.customize.this.if.y
3f500	6f 75 20 77 61 6e 74 20 74 6f 20 70 72 6f 76 69 64 65 20 73 70 65 63 69 66 69 63 20 6e 6f 6e 2d	ou.want.to.provide.specific.non-
3f520	73 74 61 6e 64 61 72 64 20 62 75 69 6c 64 20 74 79 70 65 73 20 74 6f 0a 60 63 6f 75 6e 73 65 6c	standard.build.types.to.`counsel
3f540	2d 63 6f 6d 70 69 6c 65 27 2e 20 20 54 68 65 20 64 65 66 61 75 6c 74 20 68 65 6c 70 65 72 73 20	-compile'...The.default.helpers.
3f560	61 72 65 20 73 65 74 20 75 70 20 74 6f 20 68 61 6e 64 6c 65 0a 63 6f 6d 6d 6f 6e 20 62 75 69 6c	are.set.up.to.handle.common.buil
3f580	64 20 65 6e 76 69 72 6f 6e 6d 65 6e 74 73 2e 22 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 6f	d.environments.")..(defcustom.co
3f5a0	75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 6d 61 6b 65 2d 61 72 67 73 20 22 2d 6b 22 0a 20 20 22	unsel-compile-make-args."-k"..."
3f5c0	41 64 64 69 74 69 6f 6e 61 6c 20 61 72 67 75 6d 65 6e 74 73 20 66 6f 72 20 6d 61 6b 65 2e 0a 59	Additional.arguments.for.make..Y
3f5e0	6f 75 20 6d 61 79 2c 20 66 6f 72 20 65 78 61 6d 70 6c 65 2c 20 77 61 6e 74 20 74 6f 20 61 64 64	ou.may,.for.example,.want.to.add
3f600	20 5c 22 2d 6a 4e 5c 22 20 66 6f 72 20 74 68 65 20 6e 75 6d 62 65 72 20 6f 66 20 63 6f 72 65 73	.\"-jN\".for.the.number.of.cores
3f620	0a 4e 20 69 6e 20 79 6f 75 72 20 73 79 73 74 65 6d 2e 22 0a 20 20 3a 74 79 70 65 20 27 73 74 72	.N.in.your.system."...:type.'str
3f640	69 6e 67 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65	ing)..(defcustom.counsel-compile
3f660	2d 65 6e 76 20 6e 69 6c 0a 20 20 22 4c 69 73 74 20 6f 66 20 65 6e 76 69 72 6f 6e 6d 65 6e 74 20	-env.nil..."List.of.environment.
3f680	76 61 72 69 61 62 6c 65 73 20 66 6f 72 20 63 6f 6d 70 69 6c 61 74 69 6f 6e 20 74 6f 20 69 6e 68	variables.for.compilation.to.inh
3f6a0	65 72 69 74 2e 0a 45 61 63 68 20 65 6c 65 6d 65 6e 74 20 73 68 6f 75 6c 64 20 62 65 20 61 20 73	erit..Each.element.should.be.a.s
3f6c0	74 72 69 6e 67 20 6f 66 20 74 68 65 20 66 6f 72 6d 20 45 4e 56 56 41 52 4e 41 4d 45 3d 56 41 4c	tring.of.the.form.ENVVARNAME=VAL
3f6e0	55 45 2e 20 20 54 68 69 73 0a 6c 69 73 74 20 69 73 20 70 61 73 73 65 64 20 74 6f 20 60 63 6f 6d	UE...This.list.is.passed.to.`com
3f700	70 69 6c 61 74 69 6f 6e 2d 65 6e 76 69 72 6f 6e 6d 65 6e 74 27 2e 22 0a 20 20 3a 74 79 70 65 20	pilation-environment'."...:type.
3f720	27 28 72 65 70 65 61 74 20 28 73 74 72 69 6e 67 20 3a 74 61 67 20 22 45 4e 56 56 41 52 4e 41 4d	'(repeat.(string.:tag."ENVVARNAM
3f740	45 3d 56 41 4c 55 45 22 29 29 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d	E=VALUE")))..(defvar.counsel-com
3f760	70 69 6c 65 2d 65 6e 76 2d 68 69 73 74 6f 72 79 20 6e 69 6c 0a 20 20 22 48 69 73 74 6f 72 79 20	pile-env-history.nil..."History.
3f780	66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 65 6e 76 27 2e 22 29 0a 0a 28 64	for.`counsel-compile-env'.")..(d
3f7a0	65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 65 6e 76 2d 70 61 74 74 65 72	efvar.counsel-compile-env-patter
3f7c0	6e 0a 20 20 22 5b 5f 5b 3a 64 69 67 69 74 3a 5d 5b 3a 75 70 70 65 72 3a 5d 5d 2b 3d 5b 2f 5b 3a	n..."[_[:digit:][:upper:]]+=[/[:
3f7e0	61 6c 6e 75 6d 3a 5d 5d 2a 22 0a 20 20 22 50 61 74 74 65 72 6e 20 74 6f 20 6d 61 74 63 68 20 76	alnum:]]*"..."Pattern.to.match.v
3f800	61 6c 69 64 20 65 6e 76 69 72 6f 6e 6d 65 6e 74 20 76 61 72 69 61 62 6c 65 73 2e 22 29 0a 0a 28	alid.environment.variables.")..(
3f820	64 65 66 63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 6d 61 6b 65 2d 70	defcustom.counsel-compile-make-p
3f840	61 74 74 65 72 6e 20 22 5c 5c 60 5c 5c 28 3f 3a 47 4e 55 6d 5c 5c 7c 5b 4d 6d 5d 5c 5c 29 61 6b	attern."\\`\\(?:GNUm\\|[Mm]\\)ak
3f860	65 66 69 6c 65 5c 5c 27 22 0a 20 20 22 52 65 67 65 78 70 20 66 6f 72 20 6d 61 74 63 68 69 6e 67	efile\\'"..."Regexp.for.matching
3f880	20 74 68 65 20 6e 61 6d 65 73 20 6f 66 20 4d 61 6b 65 66 69 6c 65 73 2e 22 0a 20 20 3a 74 79 70	.the.names.of.Makefiles."...:typ
3f8a0	65 20 27 72 65 67 65 78 70 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 63	e.'regexp)..(defcustom.counsel-c
3f8c0	6f 6d 70 69 6c 65 2d 62 75 69 6c 64 2d 64 69 72 65 63 74 6f 72 69 65 73 0a 20 20 27 28 22 62 75	ompile-build-directories...'("bu
3f8e0	69 6c 64 22 20 22 62 75 69 6c 64 73 22 20 22 62 6c 64 22 20 22 2e 62 75 69 6c 64 22 29 0a 20 20	ild"."builds"."bld".".build")...
3f900	22 4c 69 73 74 20 6f 66 20 70 6f 74 65 6e 74 69 61 6c 20 62 75 69 6c 64 20 73 75 62 64 69 72 65	"List.of.potential.build.subdire
3f920	63 74 6f 72 79 20 6e 61 6d 65 73 20 74 6f 20 63 68 65 63 6b 20 66 6f 72 2e 22 0a 20 20 3a 74 79	ctory.names.to.check.for."...:ty
3f940	70 65 20 27 28 72 65 70 65 61 74 20 64 69 72 65 63 74 6f 72 79 29 29 0a 0a 28 64 65 66 76 61 72	pe.'(repeat.directory))..(defvar
3f960	20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 70 68 6f 6e 79 2d 70 61 74 74 65 72 6e 20 22	.counsel-compile-phony-pattern."
3f980	5e 5c 5c 2e 50 48 4f 4e 59 3a 5b 5c 74 20 5d 2b 5c 5c 28 2e 2b 5c 5c 29 24 22 0a 20 20 22 52 65	^\\.PHONY:[\t.]+\\(.+\\)$"..."Re
3f9a0	67 65 78 70 20 66 6f 72 20 65 78 74 72 61 63 74 69 6e 67 20 70 68 6f 6e 79 20 74 61 72 67 65 74	gexp.for.extracting.phony.target
3f9c0	73 20 66 72 6f 6d 20 4d 61 6b 65 66 69 6c 65 73 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75	s.from.Makefiles.")..(defvar.cou
3f9e0	6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 68 65 6c 70 2d 70 61 74 74 65 72 6e 0a 20 20 22 5c 5c 28	nsel-compile-help-pattern..."\\(
3fa00	3f 3a 5e 5c 5c 28 5c 5c 2a 5c 5c 29 3f 5b 5b 3a 73 70 61 63 65 3a 5d 5d 2b 5c 5c 28 5b 5e 5b 3a	?:^\\(\\*\\)?[[:space:]]+\\([^[:
3fa20	73 70 61 63 65 3a 5d 5d 2b 5c 5c 29 5b 5b 3a 73 70 61 63 65 3a 5d 5d 2b 2d 5c 5c 29 22 0a 20 20	space:]]+\\)[[:space:]]+-\\)"...
3fa40	22 52 65 67 65 78 70 20 66 6f 72 20 65 78 74 72 61 63 74 69 6e 67 20 68 65 6c 70 20 74 61 72 67	"Regexp.for.extracting.help.targ
3fa60	65 74 73 20 66 72 6f 6d 20 61 20 6d 61 6b 65 20 68 65 6c 70 20 63 61 6c 6c 2e 22 29 0a 0a 3b 3b	ets.from.a.make.help.call.")..;;
3fa80	20 54 68 69 73 20 69 73 20 6c 6f 6f 73 65 6c 79 20 62 61 73 65 64 20 6f 6e 20 74 68 65 20 42 61	.This.is.loosely.based.on.the.Ba
3faa0	73 68 20 4d 61 6b 65 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 63 6f 64 65 20 77 68 69 63 68 0a 3b 3b	sh.Make.completion.code.which.;;
3fac0	20 72 65 6c 69 65 73 20 6f 6e 20 47 4e 55 4d 61 6b 65 20 68 61 76 69 6e 67 20 74 68 65 20 66 6f	.relies.on.GNUMake.having.the.fo
3fae0	6c 6c 6f 77 69 6e 67 20 72 65 74 75 72 6e 20 63 6f 64 65 73 3a 0a 3b 3b 20 20 20 30 20 3d 20 6e	llowing.return.codes:.;;...0.=.n
3fb00	6f 2d 72 65 62 75 69 6c 64 2c 20 2d 71 20 26 20 31 20 6e 65 65 64 73 20 72 65 62 75 69 6c 64 2c	o-rebuild,.-q.&.1.needs.rebuild,
3fb20	20 32 20 65 72 72 6f 72 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d	.2.error.(defun.counsel-compile-
3fb40	2d 70 72 6f 62 65 2d 6d 61 6b 65 2d 74 61 72 67 65 74 73 20 28 64 69 72 29 0a 20 20 22 52 65 74	-probe-make-targets.(dir)..."Ret
3fb60	75 72 6e 20 61 20 6c 69 73 74 20 6f 66 20 4d 61 6b 65 20 74 61 72 67 65 74 73 20 66 6f 72 20 44	urn.a.list.of.Make.targets.for.D
3fb80	49 52 2e 0a 0a 52 65 74 75 72 6e 20 61 20 73 69 6e 67 6c 65 20 62 6c 61 6e 6b 20 74 61 72 67 65	IR...Return.a.single.blank.targe
3fba0	74 20 28 73 6f 20 77 65 20 69 6e 76 6f 6b 65 20 74 68 65 20 64 65 66 61 75 6c 74 20 74 61 72 67	t.(so.we.invoke.the.default.targ
3fbc0	65 74 29 0a 69 66 20 4d 61 6b 65 20 65 78 69 74 73 20 77 69 74 68 20 61 6e 20 65 72 72 6f 72 2e	et).if.Make.exits.with.an.error.
3fbe0	20 20 54 68 69 73 20 6d 69 67 68 74 20 68 61 70 70 65 6e 20 62 65 63 61 75 73 65 20 73 6f 6d 65	..This.might.happen.because.some
3fc00	20 73 6f 72 74 0a 6f 66 20 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e 20 6e 65 65 64 73 20 74 6f 20	.sort.of.configuration.needs.to.
3fc20	62 65 20 64 6f 6e 65 20 66 69 72 73 74 20 6f 72 20 74 68 65 20 73 6f 75 72 63 65 20 74 72 65 65	be.done.first.or.the.source.tree
3fc40	20 69 73 0a 70 72 69 73 74 69 6e 65 20 61 6e 64 20 62 65 69 6e 67 20 75 73 65 64 20 66 6f 72 20	.is.pristine.and.being.used.for.
3fc60	6d 75 6c 74 69 70 6c 65 20 62 75 69 6c 64 20 74 72 65 65 73 2e 22 0a 20 20 28 77 69 74 68 2d 74	multiple.build.trees."...(with-t
3fc80	65 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 20 28 6c 65 74 2a 20 28 28 64 65 66 61 75 6c 74 2d 64	emp-buffer.....(let*.((default-d
3fca0	69 72 65 63 74 6f 72 79 20 64 69 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 72 65 73 20 28 63	irectory.dir)............(res.(c
3fcc0	61 6c 6c 2d 70 72 6f 63 65 73 73 20 22 6d 61 6b 65 22 20 6e 69 6c 20 74 20 6e 69 6c 20 22 2d 6e	all-process."make".nil.t.nil."-n
3fce0	71 70 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 74 61 72 67 65 74 73 29 0a 20 20 20 20 20 20	qp"))............targets).......
3fd00	28 69 66 20 28 6f 72 20 28 6e 6f 74 20 28 6e 75 6d 62 65 72 70 20 72 65 73 29 29 20 28 3e 20 72	(if.(or.(not.(numberp.res)).(>.r
3fd20	65 73 20 31 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 22 22 29 0a 20 20 20 20 20	es.1))...........(list."")......
3fd40	20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20 20	...(goto-char.(point-min))......
3fd60	20 20 20 28 77 68 69 6c 65 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 63 6f 75	...(while.(re-search-forward.cou
3fd80	6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 70 68 6f 6e 79 2d 70 61 74 74 65 72 6e 20 6e 69 6c 20 74	nsel-compile-phony-pattern.nil.t
3fda0	29 0a 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20	)...........(push.(split-string.
3fdc0	28 6d 61 74 63 68 2d 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 31 29 29 20	(match-string-no-properties.1)).
3fde0	74 61 72 67 65 74 73 29 29 0a 20 20 20 20 20 20 20 20 28 73 6f 72 74 20 28 61 70 70 6c 79 20 23	targets)).........(sort.(apply.#
3fe00	27 6e 63 6f 6e 63 20 74 61 72 67 65 74 73 29 20 23 27 73 74 72 69 6e 67 2d 6c 65 73 73 70 29 29	'nconc.targets).#'string-lessp))
3fe20	29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 2d 70 72 65	)))..(defun.counsel-compile--pre
3fe40	74 74 79 2d 70 72 6f 70 65 72 74 69 7a 65 20 28 6c 65 61 64 65 72 20 74 65 78 74 20 66 61 63 65	tty-propertize.(leader.text.face
3fe60	29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 70 72 65 74 74 79 20 73 74 72 69 6e 67 20 6f 66 20 74	)..."Return.a.pretty.string.of.t
3fe80	68 65 20 66 6f 72 6d 20 5c 22 20 4c 45 41 44 45 52 20 54 45 58 54 5c 22 2e 0a 4c 45 41 44 45 52	he.form.\".LEADER.TEXT\"..LEADER
3fea0	20 69 73 20 70 72 6f 70 65 72 74 69 7a 65 64 20 77 69 74 68 20 61 20 77 61 72 6e 69 6e 67 20 66	.is.propertized.with.a.warning.f
3fec0	61 63 65 20 61 6e 64 20 74 68 65 20 72 65 6d 61 69 6e 69 6e 67 0a 74 65 78 74 20 77 69 74 68 20	ace.and.the.remaining.text.with.
3fee0	46 41 43 45 2e 22 0a 20 20 28 63 6f 6e 63 61 74 20 28 70 72 6f 70 65 72 74 69 7a 65 20 28 63 6f	FACE."...(concat.(propertize.(co
3ff00	6e 63 61 74 20 22 20 22 20 6c 65 61 64 65 72 20 22 20 22 29 0a 20 20 20 20 20 20 20 20 20 20 20	ncat.".".leader.".")............
3ff20	20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	...........'face................
3ff40	20 20 20 20 20 20 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 77 61 72 6e 69 6e 67 2d 66 61 63 65 29 0a	.......'font-lock-warning-face).
3ff60	20 20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 74 65 78 74 20 27 66 61 63 65	..........(propertize.text.'face
3ff80	20 66 61 63 65 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 63 6f 6d 70 69 6c	.face)))..(defun.counsel--compil
3ffa0	65 2d 67 65 74 2d 6d 61 6b 65 2d 74 61 72 67 65 74 73 20 28 70 72 6f 62 65 2d 66 6e 20 73 72 63	e-get-make-targets.(probe-fn.src
3ffc0	64 69 72 20 26 6f 70 74 69 6f 6e 61 6c 20 62 6c 64 64 69 72 29 0a 20 20 22 52 65 74 75 72 6e 20	dir.&optional.blddir)..."Return.
3ffe0	70 72 6f 70 65 72 74 69 7a 65 64 20 6d 61 6b 65 20 74 61 72 67 65 74 73 20 72 65 74 75 72 6e 65	propertized.make.targets.returne
40000	64 20 62 79 20 50 52 4f 42 45 2d 46 4e 20 69 6e 20 53 52 43 44 49 52 2e 0a 0a 54 68 65 20 6f 70	d.by.PROBE-FN.in.SRCDIR...The.op
40020	74 69 6f 6e 61 6c 20 42 4c 44 44 49 52 20 61 6c 6c 6f 77 73 20 66 6f 72 20 68 61 6e 64 6c 69 6e	tional.BLDDIR.allows.for.handlin
40040	67 20 62 75 69 6c 64 20 64 69 72 65 63 74 6f 72 69 65 73 2e 20 20 57 65 0a 73 65 61 72 63 68 20	g.build.directories...We.search.
40060	74 68 65 20 4d 61 6b 65 66 69 6c 65 20 66 6f 72 20 61 20 6c 69 73 74 20 6f 66 20 70 68 6f 6e 79	the.Makefile.for.a.list.of.phony
40080	20 74 61 72 67 65 74 73 20 77 68 69 63 68 20 61 72 65 0a 67 65 6e 65 72 61 6c 6c 79 20 74 68 65	.targets.which.are.generally.the
400a0	20 74 6f 70 20 6c 65 76 65 6c 20 74 61 72 67 65 74 73 20 61 20 4d 61 6b 65 20 73 79 73 74 65 6d	.top.level.targets.a.Make.system
400c0	20 70 72 6f 76 69 64 65 73 2e 20 20 54 68 65 0a 72 65 73 75 6c 74 69 6e 67 20 73 74 72 69 6e 67	.provides...The.resulting.string
400e0	73 20 61 72 65 20 74 61 67 67 65 64 20 77 69 74 68 20 70 72 6f 70 65 72 74 69 65 73 20 74 68 61	s.are.tagged.with.properties.tha
40100	74 0a 60 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 68 69 73 74 6f 72 79 27 20 63 61 6e 20	t.`counsel-compile-history'.can.
40120	75 73 65 20 66 6f 72 20 66 69 6c 74 65 72 69 6e 67 20 72 65 73 75 6c 74 73 2e 22 0a 20 20 28 6c	use.for.filtering.results."...(l
40140	65 74 20 28 28 66 6d 74 20 28 66 6f 72 6d 61 74 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 6d 61	et.((fmt.(format.(propertize."ma
40160	6b 65 20 25 73 20 25 25 73 22 20 27 63 6d 64 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	ke.%s.%%s".'cmd.t)..............
40180	20 20 20 20 20 20 20 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 6d 61 6b 65 2d 61 72 67	........counsel-compile-make-arg
401a0	73 29 29 0a 20 20 20 20 20 20 20 20 28 73 75 66 66 69 78 20 28 61 6e 64 20 62 6c 64 64 69 72 0a	s)).........(suffix.(and.blddir.
401c0	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 73 65 6c 2d 63 6f	.....................(counsel-co
401e0	6d 70 69 6c 65 2d 2d 70 72 65 74 74 79 2d 70 72 6f 70 65 72 74 69 7a 65 20 22 69 6e 22 20 62 6c	mpile--pretty-propertize."in".bl
40200	64 64 69 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	ddir............................
40220	20 20 20 20 20 20 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	..............................'d
40240	69 72 65 64 2d 64 69 72 65 63 74 6f 72 79 29 29 29 0a 20 20 20 20 20 20 20 20 28 62 75 69 6c 64	ired-directory))).........(build
40260	2d 65 6e 76 20 28 61 6e 64 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 65 6e 76 0a 20 20	-env.(and.counsel-compile-env...
40280	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 73 65 6c 2d 63	......................(counsel-c
402a0	6f 6d 70 69 6c 65 2d 2d 70 72 65 74 74 79 2d 70 72 6f 70 65 72 74 69 7a 65 0a 20 20 20 20 20 20	ompile--pretty-propertize.......
402c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 77 69 74 68 22 0a 20 20 20 20 20 20	..................."with".......
402e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 6f 6e 63 61 74 20 23 27	...................(mapconcat.#'
40300	69 64 65 6e 74 69 74 79 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 65 6e 76 20 22 20 22	identity.counsel-compile-env."."
40320	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 27 66 6f 6e 74	)..........................'font
40340	2d 6c 6f 63 6b 2d 76 61 72 69 61 62 6c 65 2d 6e 61 6d 65 2d 66 61 63 65 29 29 29 0a 20 20 20 20	-lock-variable-name-face))).....
40360	20 20 20 20 28 70 72 6f 70 73 20 60 28 73 72 63 64 69 72 20 2c 73 72 63 64 69 72 20 62 6c 64 64	....(props.`(srcdir.,srcdir.bldd
40380	69 72 20 2c 62 6c 64 64 69 72 20 62 6c 64 65 6e 76 20 2c 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69	ir.,blddir.bldenv.,counsel-compi
403a0	6c 65 2d 65 6e 76 29 29 29 0a 20 20 20 20 28 6d 61 70 63 61 72 20 28 6c 61 6d 62 64 61 20 28 74	le-env))).....(mapcar.(lambda.(t
403c0	61 72 67 65 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 74 61 72 67 65	arget)...............(setq.targe
403e0	74 20 28 63 6f 6e 63 61 74 20 28 66 6f 72 6d 61 74 20 66 6d 74 20 74 61 72 67 65 74 29 20 73 75	t.(concat.(format.fmt.target).su
40400	66 66 69 78 20 62 75 69 6c 64 2d 65 6e 76 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	ffix.build-env))...............(
40420	61 64 64 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 69 65 73 20 30 20 28 6c 65 6e 67 74 68 20 74 61	add-text-properties.0.(length.ta
40440	72 67 65 74 29 20 70 72 6f 70 73 20 74 61 72 67 65 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	rget).props.target).............
40460	20 20 74 61 72 67 65 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 70	..target).............(funcall.p
40480	72 6f 62 65 2d 66 6e 20 28 6f 72 20 62 6c 64 64 69 72 20 73 72 63 64 69 72 29 29 29 29 29 0a 0a	robe-fn.(or.blddir.srcdir)))))..
404a0	28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 67 65 74 2d 6d 61 6b 65 2d	(defun.counsel-compile-get-make-
404c0	69 6e 76 6f 63 61 74 69 6f 6e 20 28 26 6f 70 74 69 6f 6e 61 6c 20 62 6c 64 64 69 72 29 0a 20 20	invocation.(&optional.blddir)...
404e0	22 48 61 76 65 20 61 20 6c 6f 6f 6b 20 69 6e 20 74 68 65 20 72 6f 6f 74 20 64 69 72 65 63 74 6f	"Have.a.look.in.the.root.directo
40500	72 79 20 66 6f 72 20 61 6e 79 20 62 75 69 6c 64 20 63 6f 6e 74 72 6f 6c 20 66 69 6c 65 73 2e 0a	ry.for.any.build.control.files..
40520	0a 54 68 65 20 6f 70 74 69 6f 6e 61 6c 20 42 4c 44 44 49 52 20 69 73 20 75 73 65 66 75 6c 20 66	.The.optional.BLDDIR.is.useful.f
40540	6f 72 20 6f 74 68 65 72 20 68 65 6c 70 65 72 73 20 74 68 61 74 20 68 61 76 65 20 66 6f 75 6e 64	or.other.helpers.that.have.found
40560	0a 73 75 62 2d 64 69 72 65 63 74 6f 72 69 65 73 20 74 68 61 74 20 62 75 69 6c 64 73 20 6d 61 79	.sub-directories.that.builds.may
40580	20 62 65 20 69 6e 76 6f 6b 65 64 20 69 6e 2e 22 0a 20 20 28 6c 65 74 20 28 28 73 72 63 64 69 72	.be.invoked.in."...(let.((srcdir
405a0	20 28 63 6f 75 6e 73 65 6c 2d 2d 63 6f 6d 70 69 6c 65 2d 72 6f 6f 74 29 29 29 0a 20 20 20 20 28	.(counsel--compile-root))).....(
405c0	77 68 65 6e 20 28 64 69 72 65 63 74 6f 72 79 2d 66 69 6c 65 73 20 28 6f 72 20 62 6c 64 64 69 72	when.(directory-files.(or.blddir
405e0	20 73 72 63 64 69 72 29 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.srcdir).nil....................
40600	20 20 20 20 20 20 20 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 6d 61 6b 65 2d 70 61 74	........counsel-compile-make-pat
40620	74 65 72 6e 20 74 29 0a 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 63 6f 6d 70 69 6c 65 2d	tern.t).......(counsel--compile-
40640	67 65 74 2d 6d 61 6b 65 2d 74 61 72 67 65 74 73 0a 20 20 20 20 20 20 20 23 27 63 6f 75 6e 73 65	get-make-targets........#'counse
40660	6c 2d 63 6f 6d 70 69 6c 65 2d 2d 70 72 6f 62 65 2d 6d 61 6b 65 2d 74 61 72 67 65 74 73 20 73 72	l-compile--probe-make-targets.sr
40680	63 64 69 72 20 62 6c 64 64 69 72 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d	cdir.blddir))))..(defun.counsel-
406a0	63 6f 6d 70 69 6c 65 2d 2d 70 72 6f 62 65 2d 6d 61 6b 65 2d 68 65 6c 70 20 28 64 69 72 29 0a 20	compile--probe-make-help.(dir)..
406c0	20 22 52 65 74 75 72 6e 20 61 20 6c 69 73 74 20 6f 66 20 4d 61 6b 65 20 74 61 72 67 65 74 73 20	."Return.a.list.of.Make.targets.
406e0	62 61 73 65 64 20 6f 6e 20 68 65 6c 70 20 66 6f 72 20 44 49 52 2e 0a 0a 49 74 20 69 73 20 71 75	based.on.help.for.DIR...It.is.qu
40700	69 74 65 20 63 6f 6d 6d 6f 6e 20 66 6f 72 20 61 20 5c 22 6d 61 6b 65 20 68 65 6c 70 5c 22 20 69	ite.common.for.a.\"make.help\".i
40720	6e 76 6f 63 61 74 69 6f 6e 20 74 6f 20 72 65 74 75 72 6e 20 61 0a 68 75 6d 61 6e 20 72 65 61 64	nvocation.to.return.a.human.read
40740	61 62 6c 65 20 6c 69 73 74 20 6f 66 20 74 61 72 67 65 74 73 2e 20 20 4f 66 74 65 6e 20 63 6f 6d	able.list.of.targets...Often.com
40760	6d 6f 6e 20 74 61 72 67 65 74 73 20 61 72 65 20 6d 61 72 6b 65 64 0a 77 69 74 68 20 61 20 6c 65	mon.targets.are.marked.with.a.le
40780	61 64 69 6e 67 20 61 73 74 65 72 69 73 6b 2e 20 20 54 68 65 20 65 78 61 63 74 20 73 65 61 72 63	ading.asterisk...The.exact.searc
407a0	68 20 70 61 74 74 65 72 6e 20 69 73 20 63 6f 6e 74 72 6f 6c 6c 65 64 0a 62 79 20 60 63 6f 75 6e	h.pattern.is.controlled.by.`coun
407c0	73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 68 65 6c 70 2d 70 61 74 74 65 72 6e 27 2e 22 0a 20 20 28 6c	sel-compile-help-pattern'."...(l
407e0	65 74 20 28 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 64 69 72 29 0a 20 20 20 20	et.((default-directory.dir).....
40800	20 20 20 20 70 72 69 6d 61 72 79 2d 74 61 72 67 65 74 73 20 74 61 72 67 65 74 73 29 0a 20 20 20	....primary-targets.targets)....
40820	20 3b 3b 20 4f 6e 6c 79 20 70 72 6f 63 65 65 64 20 69 66 20 74 68 65 20 68 65 6c 70 20 74 61 72	.;;.Only.proceed.if.the.help.tar
40840	67 65 74 20 65 78 69 73 74 73 2e 0a 20 20 20 20 28 77 68 65 6e 20 28 65 71 6c 20 31 20 28 61 70	get.exists......(when.(eql.1.(ap
40860	70 6c 79 20 23 27 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 22 6d 61 6b 65 22 20 6e 69 6c 20 6e 69	ply.#'call-process."make".nil.ni
40880	6c 20 6e 69 6c 20 22 2d 71 22 20 22 68 65 6c 70 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	l.nil."-q"."help"...............
408a0	20 20 20 20 20 20 20 20 20 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 65 6e 76 29 29 0a	..........counsel-compile-env)).
408c0	20 20 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 20 20	......(with-temp-buffer.........
408e0	28 77 68 65 6e 20 28 65 71 6c 20 30 20 28 61 70 70 6c 79 20 23 27 63 61 6c 6c 2d 70 72 6f 63 65	(when.(eql.0.(apply.#'call-proce
40900	73 73 20 22 6d 61 6b 65 22 20 6e 69 6c 20 74 20 6e 69 6c 20 22 68 65 6c 70 22 0a 20 20 20 20 20	ss."make".nil.t.nil."help"......
40920	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 75 6e 73 65 6c 2d 63	.......................counsel-c
40940	6f 6d 70 69 6c 65 2d 65 6e 76 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61	ompile-env))...........(goto-cha
40960	72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20	r.(point-min))...........(while.
40980	28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69	(re-search-forward.counsel-compi
409a0	6c 65 2d 68 65 6c 70 2d 70 61 74 74 65 72 6e 20 6e 69 6c 20 74 29 0a 20 20 20 20 20 20 20 20 20	le-help-pattern.nil.t)..........
409c0	20 20 20 28 70 75 73 68 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 32 29 0a 20 20 20 20 20 20	...(push.(match-string.2).......
409e0	20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67	............(if.(match-beginning
40a00	20 31 29 20 70 72 69 6d 61 72 79 2d 74 61 72 67 65 74 73 20 74 61 72 67 65 74 73 29 29 29 0a 20	.1).primary-targets.targets)))..
40a20	20 20 20 20 20 20 20 20 20 28 6e 63 6f 6e 63 20 28 73 6f 72 74 20 70 72 69 6d 61 72 79 2d 74 61	.........(nconc.(sort.primary-ta
40a40	72 67 65 74 73 20 23 27 73 74 72 69 6e 67 2d 6c 65 73 73 70 29 0a 20 20 20 20 20 20 20 20 20 20	rgets.#'string-lessp)...........
40a60	20 20 20 20 20 20 20 28 73 6f 72 74 20 74 61 72 67 65 74 73 20 23 27 73 74 72 69 6e 67 2d 6c 65	.......(sort.targets.#'string-le
40a80	73 73 70 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69	ssp)))))))..(defun.counsel-compi
40aa0	6c 65 2d 67 65 74 2d 6d 61 6b 65 2d 68 65 6c 70 2d 69 6e 76 6f 63 61 74 69 6f 6e 73 20 28 26 6f	le-get-make-help-invocations.(&o
40ac0	70 74 69 6f 6e 61 6c 20 62 6c 64 64 69 72 29 0a 20 20 22 51 75 65 72 79 20 74 68 65 20 72 6f 6f	ptional.blddir)..."Query.the.roo
40ae0	74 20 64 69 72 65 63 74 6f 72 79 20 66 6f 72 20 6d 61 6b 65 66 69 6c 65 73 20 77 69 74 68 20 68	t.directory.for.makefiles.with.h
40b00	65 6c 70 20 6f 75 74 70 75 74 2e 0a 0a 54 68 65 20 6f 70 74 69 6f 6e 61 6c 20 42 4c 44 44 49 52	elp.output...The.optional.BLDDIR
40b20	20 69 73 20 75 73 65 66 75 6c 20 66 6f 72 20 6f 74 68 65 72 20 68 65 6c 70 65 72 73 20 74 68 61	.is.useful.for.other.helpers.tha
40b40	74 20 68 61 76 65 20 66 6f 75 6e 64 0a 73 75 62 2d 64 69 72 65 63 74 6f 72 69 65 73 20 74 68 61	t.have.found.sub-directories.tha
40b60	74 20 62 75 69 6c 64 73 20 6d 61 79 20 62 65 20 69 6e 76 6f 6b 65 64 20 69 6e 2e 22 0a 20 20 28	t.builds.may.be.invoked.in."...(
40b80	6c 65 74 20 28 28 73 72 63 64 69 72 20 28 63 6f 75 6e 73 65 6c 2d 2d 63 6f 6d 70 69 6c 65 2d 72	let.((srcdir.(counsel--compile-r
40ba0	6f 6f 74 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 64 69 72 65 63 74 6f 72 79 2d 66 69 6c 65	oot))).....(when.(directory-file
40bc0	73 20 28 6f 72 20 62 6c 64 64 69 72 20 73 72 63 64 69 72 29 20 6e 69 6c 0a 20 20 20 20 20 20 20	s.(or.blddir.srcdir).nil........
40be0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70	....................counsel-comp
40c00	69 6c 65 2d 6d 61 6b 65 2d 70 61 74 74 65 72 6e 20 74 29 0a 20 20 20 20 20 20 28 63 6f 75 6e 73	ile-make-pattern.t).......(couns
40c20	65 6c 2d 2d 63 6f 6d 70 69 6c 65 2d 67 65 74 2d 6d 61 6b 65 2d 74 61 72 67 65 74 73 0a 20 20 20	el--compile-get-make-targets....
40c40	20 20 20 20 23 27 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 2d 70 72 6f 62 65 2d 6d 61 6b	....#'counsel-compile--probe-mak
40c60	65 2d 68 65 6c 70 20 73 72 63 64 69 72 20 62 6c 64 64 69 72 29 29 29 29 0a 0a 28 64 65 66 75 6e	e-help.srcdir.blddir))))..(defun
40c80	20 63 6f 75 6e 73 65 6c 2d 2d 66 69 6e 64 2d 62 75 69 6c 64 2d 73 75 62 64 69 72 20 28 73 72 63	.counsel--find-build-subdir.(src
40ca0	64 69 72 29 0a 20 20 22 52 65 74 75 72 6e 20 62 75 69 6c 64 73 20 73 75 62 64 69 72 65 63 74 6f	dir)..."Return.builds.subdirecto
40cc0	72 79 20 6f 66 20 53 52 43 44 49 52 2c 20 69 66 20 6f 6e 65 20 65 78 69 73 74 73 2e 22 0a 20 20	ry.of.SRCDIR,.if.one.exists."...
40ce0	28 63 6c 2d 73 6f 6d 65 20 28 6c 61 6d 62 64 61 20 28 64 69 72 29 0a 20 20 20 20 20 20 20 20 20	(cl-some.(lambda.(dir)..........
40d00	20 20 20 20 28 73 65 74 71 20 64 69 72 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20	....(setq.dir.(expand-file-name.
40d20	64 69 72 20 73 72 63 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28	dir.srcdir))..............(and.(
40d40	66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 64 69 72 29 20 64 69 72 29 29 0a 20 20 20 20	file-directory-p.dir).dir)).....
40d60	20 20 20 20 20 20 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 62 75 69 6c 64 2d 64 69 72	.......counsel-compile-build-dir
40d80	65 63 74 6f 72 69 65 73 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 67 65 74 2d	ectories))..(defun.counsel--get-
40da0	62 75 69 6c 64 2d 73 75 62 64 69 72 73 20 28 62 6c 64 64 69 72 29 0a 20 20 22 52 65 74 75 72 6e	build-subdirs.(blddir)..."Return
40dc0	20 61 6c 6c 20 73 75 62 64 69 72 73 20 75 6e 64 65 72 20 42 4c 44 44 49 52 20 73 6f 72 74 65 64	.all.subdirs.under.BLDDIR.sorted
40de0	20 62 79 20 6d 6f 64 69 66 69 63 61 74 69 6f 6e 20 74 69 6d 65 2e 0a 49 66 20 74 68 65 72 65 20	.by.modification.time..If.there.
40e00	61 72 65 20 6e 6f 6e 2d 64 69 72 65 63 74 6f 72 79 20 66 69 6c 65 73 20 69 6e 20 42 4c 44 44 49	are.non-directory.files.in.BLDDI
40e20	52 2c 20 69 6e 63 6c 75 64 65 20 42 4c 44 44 49 52 20 69 6e 20 74 68 65 0a 6c 69 73 74 20 61 73	R,.include.BLDDIR.in.the.list.as
40e40	20 69 74 20 6d 61 79 20 61 6c 73 6f 20 62 65 20 61 20 62 75 69 6c 64 20 64 69 72 65 63 74 6f 72	.it.may.also.be.a.build.director
40e60	79 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 66 69 6c 65 73 20 28 64 69 72 65 63 74 6f 72 79 2d 66	y."...(let*.((files.(directory-f
40e80	69 6c 65 73 2d 61 6e 64 2d 61 74 74 72 69 62 75 74 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20	iles-and-attributes.............
40ea0	20 20 20 20 20 62 6c 64 64 69 72 20 74 20 64 69 72 65 63 74 6f 72 79 2d 66 69 6c 65 73 2d 6e 6f	.....blddir.t.directory-files-no
40ec0	2d 64 6f 74 2d 66 69 6c 65 73 2d 72 65 67 65 78 70 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 28	-dot-files-regexp.t))..........(
40ee0	74 6f 74 61 6c 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 28	total.(length.files))..........(
40f00	64 69 72 73 20 28 63 6c 2d 64 65 6c 65 74 65 2d 69 66 2d 6e 6f 74 0a 20 20 20 20 20 20 20 20 20	dirs.(cl-delete-if-not..........
40f20	20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 65 6e 74 72 79 29 0a 20 20 20 20 20 20 20 20 20	.......(lambda.(entry)..........
40f40	20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 64 69 72 20 28 6e 74 68 20 31 20 65 6e 74 72 79	.........(let.((dir.(nth.1.entry
40f60	29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 64 69 72	))).....................(and.dir
40f80	20 28 6f 72 20 28 65 71 20 64 69 72 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.(or.(eq.dir.t).................
40fa0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 53 79 6d 6c 69 6e 6b 2e 0a 20 20 20	.................;;.Symlink.....
40fc0	20 20 20 20 20 20 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
40fe0	69 6c 65 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 28 6e 74 68 20 30 20 65 6e 74 72 79 29 29 29 29	ile-directory-p.(nth.0.entry))))
41000	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 69 6c 65 73 29 29 29 0a 20 20 20 20	)).................files))).....
41020	3b 3b 20 41 6e 79 20 6e 6f 6e 2d 64 69 72 20 66 69 6c 65 73 3f 0a 20 20 20 20 28 77 68 65 6e 20	;;.Any.non-dir.files?.....(when.
41040	28 3c 20 28 6c 65 6e 67 74 68 20 64 69 72 73 29 20 74 6f 74 61 6c 29 0a 20 20 20 20 20 20 28 70	(<.(length.dirs).total).......(p
41060	75 73 68 20 28 63 6f 6e 73 20 62 6c 64 64 69 72 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65	ush.(cons.blddir.(file-attribute
41080	73 20 62 6c 64 64 69 72 29 29 20 64 69 72 73 29 29 0a 20 20 20 20 28 6d 61 70 63 61 72 20 23 27	s.blddir)).dirs)).....(mapcar.#'
410a0	63 61 72 20 28 73 6f 72 74 20 64 69 72 73 20 28 6c 61 6d 62 64 61 20 28 78 20 79 29 0a 20 20 20	car.(sort.dirs.(lambda.(x.y)....
410c0	20 20 20 20 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 74 69 6d	............................(tim
410e0	65 2d 6c 65 73 73 2d 70 20 28 6e 74 68 20 36 20 79 29 20 28 6e 74 68 20 36 20 78 29 29 29 29 29	e-less-p.(nth.6.y).(nth.6.x)))))
41100	29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 67 65 74 2d 62	))..(defun.counsel-compile-get-b
41120	75 69 6c 64 2d 64 69 72 65 63 74 6f 72 69 65 73 20 28 26 6f 70 74 69 6f 6e 61 6c 20 64 69 72 29	uild-directories.(&optional.dir)
41140	0a 20 20 22 52 65 74 75 72 6e 20 61 20 6c 69 73 74 20 6f 66 20 70 6f 74 65 6e 74 69 61 6c 20 62	..."Return.a.list.of.potential.b
41160	75 69 6c 64 20 64 69 72 65 63 74 6f 72 69 65 73 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 73 72 63	uild.directories."...(let*.((src
41180	64 69 72 20 28 6f 72 20 64 69 72 20 28 63 6f 75 6e 73 65 6c 2d 2d 63 6f 6d 70 69 6c 65 2d 72 6f	dir.(or.dir.(counsel--compile-ro
411a0	6f 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 62 6c 64 64 69 72 20 28 63 6f 75 6e 73 65 6c 2d	ot)))..........(blddir.(counsel-
411c0	2d 66 69 6e 64 2d 62 75 69 6c 64 2d 73 75 62 64 69 72 20 73 72 63 64 69 72 29 29 0a 20 20 20 20	-find-build-subdir.srcdir)).....
411e0	20 20 20 20 20 28 70 72 6f 70 73 20 60 28 73 72 63 64 69 72 20 2c 73 72 63 64 69 72 20 72 65 63	.....(props.`(srcdir.,srcdir.rec
41200	75 72 73 69 76 65 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 6d 74 20 28 63 6f 6e 63 61 74	ursive.t))..........(fmt.(concat
41220	20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 53 65 6c 65 63 74 20 62 75 69 6c 64 20 69 6e 20 22 0a	.(propertize."Select.build.in.".
41240	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
41260	20 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 77 61 72 6e 69 6e 67 2d 66 61 63 65 29	..'face.'font-lock-warning-face)
41280	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
412a0	7a 65 20 22 25 73 22 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	ze."%s".'face.'dired-directory))
412c0	29 29 0a 20 20 20 20 28 6d 61 70 63 61 72 20 28 6c 61 6d 62 64 61 20 28 73 75 62 64 69 72 29 0a	)).....(mapcar.(lambda.(subdir).
412e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 73 20 28 66 6f 72 6d 61 74 20 66	..............(let.((s.(format.f
41300	6d 74 20 73 75 62 64 69 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 64	mt.subdir))).................(ad
41320	64 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 69 65 73 20 30 20 28 6c 65 6e 67 74 68 20 73 29 20 60	d-text-properties.0.(length.s).`
41340	28 62 6c 64 64 69 72 20 2c 73 75 62 64 69 72 20 2c 40 70 72 6f 70 73 29 20 73 29 0a 20 20 20 20	(blddir.,subdir.,@props).s).....
41360	20 20 20 20 20 20 20 20 20 20 20 20 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64	............s)).............(and
41380	20 62 6c 64 64 69 72 20 28 63 6f 75 6e 73 65 6c 2d 2d 67 65 74 2d 62 75 69 6c 64 2d 73 75 62 64	.blddir.(counsel--get-build-subd
413a0	69 72 73 20 62 6c 64 64 69 72 29 29 29 29 29 0a 0a 3b 3b 20 54 68 69 73 20 69 73 20 61 20 77 6f	irs.blddir)))))..;;.This.is.a.wo
413c0	72 6b 61 72 6f 75 6e 64 20 66 6f 72 20 74 68 65 20 66 61 63 74 20 74 68 65 72 65 20 69 73 20 6e	rkaround.for.the.fact.there.is.n
413e0	6f 20 63 6f 6e 63 65 70 74 20 6f 66 20 22 70 72 6f 6a 65 63 74 22 0a 3b 3b 20 6c 6f 63 61 6c 20	o.concept.of."project".;;.local.
41400	76 61 72 69 61 62 6c 65 73 20 28 61 73 20 6f 70 70 6f 73 65 64 20 74 6f 20 66 6f 72 20 65 78 61	variables.(as.opposed.to.for.exa
41420	6d 70 6c 65 20 62 75 66 66 65 72 2d 6c 6f 63 61 6c 29 2e 20 20 53 6f 20 77 65 0a 3b 3b 20 73 74	mple.buffer-local)...So.we.;;.st
41440	6f 72 65 20 61 6c 6c 20 6f 75 72 20 68 69 73 74 6f 72 79 20 69 6e 20 61 20 67 6c 6f 62 61 6c 20	ore.all.our.history.in.a.global.
41460	6c 69 73 74 20 66 69 6c 74 65 72 20 6f 75 74 20 74 68 65 20 72 65 73 75 6c 74 73 20 77 65 0a 3b	list.filter.out.the.results.we.;
41480	3b 20 64 6f 6e 27 74 20 77 61 6e 74 2e 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d	;.don't.want..(defun.counsel-com
414a0	70 69 6c 65 2d 67 65 74 2d 66 69 6c 74 65 72 65 64 2d 68 69 73 74 6f 72 79 20 28 26 6f 70 74 69	pile-get-filtered-history.(&opti
414c0	6f 6e 61 6c 20 64 69 72 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 63 6f 6d 70 69 6c 65 20 68 69	onal.dir)..."Return.a.compile.hi
414e0	73 74 6f 72 79 20 72 65 6c 65 76 61 6e 74 20 74 6f 20 63 75 72 72 65 6e 74 20 70 72 6f 6a 65 63	story.relevant.to.current.projec
41500	74 2e 22 0a 20 20 28 6c 65 74 20 28 28 72 6f 6f 74 20 28 6f 72 20 64 69 72 20 28 63 6f 75 6e 73	t."...(let.((root.(or.dir.(couns
41520	65 6c 2d 2d 63 6f 6d 70 69 6c 65 2d 72 6f 6f 74 29 29 29 0a 20 20 20 20 20 20 20 20 68 69 73 74	el--compile-root))).........hist
41540	6f 72 79 29 0a 20 20 20 20 28 64 6f 6c 69 73 74 20 28 69 74 65 6d 20 63 6f 75 6e 73 65 6c 2d 63	ory).....(dolist.(item.counsel-c
41560	6f 6d 70 69 6c 65 2d 68 69 73 74 6f 72 79 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 73 72 63	ompile-history).......(let.((src
41580	64 69 72 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 27 73 72 63 64 69 72	dir.(get-text-property.0.'srcdir
415a0	20 69 74 65 6d 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 62 6c 64 64 69 72 20 28 67 65 74	.item)).............(blddir.(get
415c0	2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 27 62 6c 64 64 69 72 20 69 74 65 6d 29 29 29	-text-property.0.'blddir.item)))
415e0	0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 6f 72 20 28 61 6e 64 20 73 72 63 64 69 72 20 28	.........(when.(or.(and.srcdir.(
41600	66 69 6c 65 2d 69 6e 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 73 72 63 64 69 72 20 72 6f 6f 74 29	file-in-directory-p.srcdir.root)
41620	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 62 6c 64 64 69 72 20	)...................(and.blddir.
41640	28 66 69 6c 65 2d 69 6e 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 62 6c 64 64 69 72 20 72 6f 6f 74	(file-in-directory-p.blddir.root
41660	29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 69 74 65 6d 20 68 69 73 74 6f 72 79	)))...........(push.item.history
41680	29 29 29 29 0a 20 20 20 20 28 6e 72 65 76 65 72 73 65 20 68 69 73 74 6f 72 79 29 29 29 0a 0a 28	)))).....(nreverse.history)))..(
416a0	64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 67 65 74 2d 63 6f 6d 70 69 6c 65 2d 63 61 6e 64 69	defun.counsel--get-compile-candi
416c0	64 61 74 65 73 20 28 26 6f 70 74 69 6f 6e 61 6c 20 64 69 72 29 0a 20 20 22 52 65 74 75 72 6e 20	dates.(&optional.dir)..."Return.
416e0	74 68 65 20 6c 69 73 74 20 6f 66 20 63 6f 6d 70 69 6c 65 20 63 6f 6d 6d 61 6e 64 73 2e 0a 54 68	the.list.of.compile.commands..Th
41700	69 73 20 69 73 20 64 65 74 65 72 6d 69 6e 65 64 20 62 79 20 60 63 6f 75 6e 73 65 6c 2d 63 6f 6d	is.is.determined.by.`counsel-com
41720	70 69 6c 65 2d 6c 6f 63 61 6c 2d 62 75 69 6c 64 73 27 2c 20 77 68 69 63 68 20 73 65 65 2e 22 0a	pile-local-builds',.which.see.".
41740	20 20 28 6c 65 74 20 28 63 61 6e 64 73 29 0a 20 20 20 20 28 64 6f 6c 69 73 74 20 28 63 6d 64 73	..(let.(cands).....(dolist.(cmds
41760	20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 6c 6f 63 61 6c 2d 62 75 69 6c 64 73 29 0a 20	.counsel-compile-local-builds)..
41780	20 20 20 20 20 28 77 68 65 6e 20 28 66 75 6e 63 74 69 6f 6e 70 20 63 6d 64 73 29 0a 20 20 20 20	.....(when.(functionp.cmds).....
417a0	20 20 20 20 28 73 65 74 71 20 63 6d 64 73 20 28 66 75 6e 63 61 6c 6c 20 63 6d 64 73 20 64 69 72	....(setq.cmds.(funcall.cmds.dir
417c0	29 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 63 6d 64 73 0a 20 20 20 20 20 20 20 20 28 70 75	))).......(when.cmds.........(pu
417e0	73 68 20 28 69 66 20 28 6c 69 73 74 70 20 63 6d 64 73 29 20 63 6d 64 73 20 28 6c 69 73 74 20 63	sh.(if.(listp.cmds).cmds.(list.c
41800	6d 64 73 29 29 20 63 61 6e 64 73 29 29 29 0a 20 20 20 20 28 61 70 70 6c 79 20 23 27 61 70 70 65	mds)).cands))).....(apply.#'appe
41820	6e 64 20 28 6e 72 65 76 65 72 73 65 20 63 61 6e 64 73 29 29 29 29 0a 0a 3b 3b 20 54 68 69 73 20	nd.(nreverse.cands))))..;;.This.
41840	69 73 20 61 20 77 6f 72 6b 61 72 6f 75 6e 64 20 74 6f 20 65 6e 73 75 72 65 20 77 65 20 74 61 67	is.a.workaround.to.ensure.we.tag
41860	20 61 6c 6c 20 74 68 65 20 72 65 6c 65 76 61 6e 74 20 6d 65 74 61 64 61 74 61 20 69 6e 0a 3b 3b	.all.the.relevant.metadata.in.;;
41880	20 6f 75 72 20 63 6f 6d 70 69 6c 65 20 68 69 73 74 6f 72 79 2e 20 20 54 68 69 73 20 61 6c 73 6f	.our.compile.history...This.also
418a0	20 61 6c 6c 6f 77 73 20 4d 2d 78 20 63 6f 6d 70 69 6c 65 20 74 6f 20 64 6f 20 66 61 6e 63 79 0a	.allows.M-x.compile.to.do.fancy.
418c0	3b 3b 20 74 68 69 6e 67 73 20 6c 69 6b 65 20 69 6e 66 65 72 20 60 64 65 66 61 75 6c 74 2d 64 69	;;.things.like.infer.`default-di
418e0	72 65 63 74 6f 72 79 27 20 66 72 6f 6d 20 27 63 64 27 73 20 69 6e 20 74 68 65 20 73 74 72 69 6e	rectory'.from.'cd's.in.the.strin
41900	67 2e 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 2d 75 70 64 61 74	g..(defun.counsel-compile--updat
41920	65 2d 68 69 73 74 6f 72 79 20 28 5f 70 72 6f 63 29 0a 20 20 22 55 70 64 61 74 65 20 60 63 6f 75	e-history.(_proc)..."Update.`cou
41940	6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 68 69 73 74 6f 72 79 27 20 66 72 6f 6d 20 74 68 65 20 63	nsel-compile-history'.from.the.c
41960	6f 6d 70 69 6c 61 74 69 6f 6e 20 73 74 61 74 65 2e 22 0a 20 20 28 64 65 66 76 61 72 20 63 6f 6d	ompilation.state."...(defvar.com
41980	70 69 6c 61 74 69 6f 6e 2d 61 72 67 75 6d 65 6e 74 73 29 0a 20 20 28 64 65 66 76 61 72 20 63 6f	pilation-arguments)...(defvar.co
419a0	6d 70 69 6c 61 74 69 6f 6e 2d 65 6e 76 69 72 6f 6e 6d 65 6e 74 29 0a 20 20 28 6c 65 74 2a 20 28	mpilation-environment)...(let*.(
419c0	28 73 72 63 64 69 72 20 28 63 6f 75 6e 73 65 6c 2d 2d 63 6f 6d 70 69 6c 65 2d 72 6f 6f 74 29 29	(srcdir.(counsel--compile-root))
419e0	0a 20 20 20 20 20 20 20 20 20 28 62 6c 64 64 69 72 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74	..........(blddir.default-direct
41a00	6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 28 62 6c 64 65 6e 76 20 63 6f 6d 70 69 6c 61 74 69 6f	ory)..........(bldenv.compilatio
41a20	6e 2d 65 6e 76 69 72 6f 6e 6d 65 6e 74 29 0a 20 20 20 20 20 20 20 20 20 28 63 6d 64 20 28 63 6f	n-environment)..........(cmd.(co
41a40	6e 63 61 74 0a 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	ncat................(propertize.
41a60	28 63 61 72 20 63 6f 6d 70 69 6c 61 74 69 6f 6e 2d 61 72 67 75 6d 65 6e 74 73 29 20 27 63 6d 64	(car.compilation-arguments).'cmd
41a80	20 74 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 66 69 6c 65	.t)................(unless.(file
41aa0	2d 65 71 75 61 6c 2d 70 20 62 6c 64 64 69 72 20 73 72 63 64 69 72 29 0a 20 20 20 20 20 20 20 20	-equal-p.blddir.srcdir).........
41ac0	20 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 2d 70 72 65 74 74	.........(counsel-compile--prett
41ae0	79 2d 70 72 6f 70 65 72 74 69 7a 65 20 22 69 6e 22 20 62 6c 64 64 69 72 0a 20 20 20 20 20 20 20	y-propertize."in".blddir........
41b00	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
41b20	20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 64 69 72 65 64 2d 64 69 72 65 63 74 6f 72 79 29 29	..............'dired-directory))
41b40	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 62 6c 64 65 6e 76 0a 20 20 20	................(when.bldenv....
41b60	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 2d	..............(counsel-compile--
41b80	70 72 65 74 74 79 2d 70 72 6f 70 65 72 74 69 7a 65 20 22 77 69 74 68 22 0a 20 20 20 20 20 20 20	pretty-propertize."with"........
41ba0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
41bc0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 6f 6e 63 61 74 20 23 27 69 64 65 6e 74	..............(mapconcat.#'ident
41be0	69 74 79 20 62 6c 64 65 6e 76 20 22 20 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ity.bldenv.".").................
41c00	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
41c20	20 20 20 20 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 76 61 72 69 61 62 6c 65 2d 6e 61 6d 65 2d 66 61	.....'font-lock-variable-name-fa
41c40	63 65 29 29 29 29 29 0a 20 20 20 20 28 61 64 64 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 69 65 73	ce))))).....(add-text-properties
41c60	20 30 20 28 6c 65 6e 67 74 68 20 63 6d 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.0.(length.cmd).................
41c80	20 20 20 20 20 20 20 20 20 60 28 73 72 63 64 69 72 20 2c 73 72 63 64 69 72 20 62 6c 64 64 69 72	.........`(srcdir.,srcdir.blddir
41ca0	20 2c 62 6c 64 64 69 72 20 62 6c 64 65 6e 76 20 2c 62 6c 64 65 6e 76 29 20 63 6d 64 29 0a 20 20	.,blddir.bldenv.,bldenv).cmd)...
41cc0	20 20 28 61 64 64 2d 74 6f 2d 68 69 73 74 6f 72 79 20 27 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69	..(add-to-history.'counsel-compi
41ce0	6c 65 2d 68 69 73 74 6f 72 79 20 63 6d 64 29 29 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73	le-history.cmd)))..(defvar.couns
41d00	65 6c 2d 63 6f 6d 70 69 6c 65 2d 2d 63 75 72 72 65 6e 74 2d 62 75 69 6c 64 2d 64 69 72 20 6e 69	el-compile--current-build-dir.ni
41d20	6c 0a 20 20 22 54 72 61 63 6b 73 20 74 68 65 20 6c 61 73 74 20 64 69 72 65 63 74 6f 72 79 20 60	l..."Tracks.the.last.directory.`
41d40	63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 27 20 77 61 73 20 63 61 6c 6c 65 64 20 77 69 74 68	counsel-compile'.was.called.with
41d60	2e 0a 0a 54 68 69 73 20 73 74 61 74 65 20 61 6c 6c 6f 77 73 20 75 73 20 74 6f 20 73 65 74 20 69	...This.state.allows.us.to.set.i
41d80	74 20 63 6f 72 72 65 63 74 6c 79 20 69 66 20 74 68 65 20 75 73 65 72 20 68 61 73 20 6d 61 6e 75	t.correctly.if.the.user.has.manu
41da0	61 6c 6c 79 0a 65 64 69 74 65 64 20 74 68 65 20 63 6f 6d 6d 61 6e 64 2c 20 74 68 75 73 20 6c 6f	ally.edited.the.command,.thus.lo
41dc0	73 69 6e 67 20 6f 75 72 20 65 6d 62 65 64 64 65 64 20 73 74 61 74 65 2e 22 29 0a 0a 28 64 65 66	sing.our.embedded.state.")..(def
41de0	75 6e 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 2d 61 63 74 69 6f 6e 20 28 63 6d 64 29	un.counsel-compile--action.(cmd)
41e00	0a 20 20 22 50 72 6f 63 65 73 73 20 43 4d 44 20 74 6f 20 63 61 6c 6c 20 60 63 6f 6d 70 69 6c 65	..."Process.CMD.to.call.`compile
41e20	27 2e 0a 0a 49 66 20 43 4d 44 20 68 61 73 20 74 68 65 20 60 72 65 63 75 72 73 69 76 65 27 20 70	'...If.CMD.has.the.`recursive'.p
41e40	72 6f 70 65 72 74 79 20 73 65 74 20 77 65 20 63 61 6c 6c 20 60 63 6f 75 6e 73 65 6c 2d 63 6f 6d	roperty.set.we.call.`counsel-com
41e60	70 69 6c 65 27 0a 61 67 61 69 6e 20 74 6f 20 66 75 72 74 68 65 72 20 72 65 66 69 6e 65 20 74 68	pile'.again.to.further.refine.th
41e80	65 20 63 6f 6d 70 69 6c 65 20 6f 70 74 69 6f 6e 73 20 69 6e 20 74 68 65 20 64 69 72 65 63 74 6f	e.compile.options.in.the.directo
41ea0	72 79 0a 73 70 65 63 69 66 69 65 64 20 62 79 20 74 68 65 20 60 62 6c 64 64 69 72 27 20 70 72 6f	ry.specified.by.the.`blddir'.pro
41ec0	70 65 72 74 79 2e 22 0a 20 20 28 64 65 66 76 61 72 20 63 6f 6d 70 69 6c 61 74 69 6f 6e 2d 65 6e	perty."...(defvar.compilation-en
41ee0	76 69 72 6f 6e 6d 65 6e 74 29 0a 20 20 28 6c 65 74 20 28 28 62 6c 64 64 69 72 20 28 67 65 74 2d	vironment)...(let.((blddir.(get-
41f00	74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 27 62 6c 64 64 69 72 20 63 6d 64 29 29 0a 20 20	text-property.0.'blddir.cmd))...
41f20	20 20 20 20 20 20 28 62 6c 64 65 6e 76 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79	......(bldenv.(get-text-property
41f40	20 30 20 27 62 6c 64 65 6e 76 20 63 6d 64 29 29 29 0a 20 20 20 20 28 69 66 20 28 67 65 74 2d 74	.0.'bldenv.cmd))).....(if.(get-t
41f60	65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 27 72 65 63 75 72 73 69 76 65 20 63 6d 64 29 0a 20	ext-property.0.'recursive.cmd)..
41f80	20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 20 62 6c 64 64 69 72 29 0a	.......(counsel-compile.blddir).
41fa0	20 20 20 20 20 20 28 77 68 65 6e 20 28 67 65 74 2d 63 68 61 72 2d 70 72 6f 70 65 72 74 79 20 30	......(when.(get-char-property.0
41fc0	20 27 63 6d 64 20 63 6d 64 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 6d 64 20 28 73 75	.'cmd.cmd).........(setq.cmd.(su
41fe0	62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 0a 20 20 20 20 20 20 20 20 20 20	bstring-no-properties...........
42000	20 20 20 20 20 20 20 20 20 63 6d 64 20 30 20 28 6e 65 78 74 2d 73 69 6e 67 6c 65 2d 70 72 6f 70	.........cmd.0.(next-single-prop
42020	65 72 74 79 2d 63 68 61 6e 67 65 20 30 20 27 63 6d 64 20 63 6d 64 29 29 29 29 0a 20 20 20 20 20	erty-change.0.'cmd.cmd))))......
42040	20 28 6c 65 74 20 28 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 28 6f 72 20 62 6c	.(let.((default-directory.(or.bl
42060	64 64 69 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	ddir............................
42080	20 20 20 20 20 20 20 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 2d 63 75 72 72 65 6e 74	........counsel-compile--current
420a0	2d 62 75 69 6c 64 2d 64 69 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	-build-dir......................
420c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29	..............default-directory)
420e0	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6d 70 69 6c 61 74 69 6f 6e 2d 65 6e 76 69 72	).............(compilation-envir
42100	6f 6e 6d 65 6e 74 20 62 6c 64 65 6e 76 29 29 0a 20 20 20 20 20 20 20 20 3b 3b 20 4e 6f 20 6e 65	onment.bldenv)).........;;.No.ne
42120	65 64 20 74 6f 20 73 70 65 63 69 66 79 20 60 3a 68 69 73 74 6f 72 79 27 20 62 65 63 61 75 73 65	ed.to.specify.`:history'.because
42140	20 6f 66 20 74 68 69 73 20 68 6f 6f 6b 2e 0a 20 20 20 20 20 20 20 20 28 61 64 64 2d 68 6f 6f 6b	.of.this.hook..........(add-hook
42160	20 27 63 6f 6d 70 69 6c 61 74 69 6f 6e 2d 73 74 61 72 74 2d 68 6f 6f 6b 20 23 27 63 6f 75 6e 73	.'compilation-start-hook.#'couns
42180	65 6c 2d 63 6f 6d 70 69 6c 65 2d 2d 75 70 64 61 74 65 2d 68 69 73 74 6f 72 79 29 0a 20 20 20 20	el-compile--update-history).....
421a0	20 20 20 20 28 75 6e 77 69 6e 64 2d 70 72 6f 74 65 63 74 0a 20 20 20 20 20 20 20 20 20 20 20 20	....(unwind-protect.............
421c0	20 28 63 6f 6d 70 69 6c 65 20 63 6d 64 29 0a 20 20 20 20 20 20 20 20 20 20 28 72 65 6d 6f 76 65	.(compile.cmd)...........(remove
421e0	2d 68 6f 6f 6b 20 27 63 6f 6d 70 69 6c 61 74 69 6f 6e 2d 73 74 61 72 74 2d 68 6f 6f 6b 20 23 27	-hook.'compilation-start-hook.#'
42200	63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 2d 75 70 64 61 74 65 2d 68 69 73 74 6f 72 79 29	counsel-compile--update-history)
42220	29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 65 64	)))))..(defun.counsel-compile-ed
42240	69 74 2d 63 6f 6d 6d 61 6e 64 20 28 29 0a 20 20 22 49 6e 73 65 72 74 20 63 75 72 72 65 6e 74 20	it-command.()..."Insert.current.
42260	63 6f 6d 70 69 6c 65 20 63 6f 6d 6d 61 6e 64 20 69 6e 74 6f 20 74 68 65 20 6d 69 6e 69 62 75 66	compile.command.into.the.minibuf
42280	66 65 72 20 66 6f 72 20 65 64 69 74 69 6e 67 2e 0a 0a 54 68 69 73 20 6d 69 72 72 6f 72 73 20 74	fer.for.editing...This.mirrors.t
422a0	68 65 20 62 65 68 61 76 69 6f 72 20 6f 66 20 60 69 76 79 2d 69 6e 73 65 72 74 2d 63 75 72 72 65	he.behavior.of.`ivy-insert-curre
422c0	6e 74 27 20 62 75 74 20 77 69 74 68 20 73 70 65 63 69 66 69 63 0a 68 61 6e 64 6c 69 6e 67 20 66	nt'.but.with.specific.handling.f
422e0	6f 72 20 74 68 65 20 60 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 27 20 6d 65 74 61 64 61 74	or.the.`counsel-compile'.metadat
42300	61 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 64 65 6c 65 74 65 2d 6d 69	a."...(interactive)...(delete-mi
42320	6e 69 62 75 66 66 65 72 2d 63 6f 6e 74 65 6e 74 73 29 0a 20 20 28 6c 65 74 2a 20 28 28 63 6d 64	nibuffer-contents)...(let*.((cmd
42340	20 28 69 76 79 2d 73 74 61 74 65 2d 63 75 72 72 65 6e 74 20 69 76 79 2d 6c 61 73 74 29 29 0a 20	.(ivy-state-current.ivy-last))..
42360	20 20 20 20 20 20 20 20 28 62 6c 64 64 69 72 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72	........(blddir.(get-text-proper
42380	74 79 20 30 20 27 62 6c 64 64 69 72 20 63 6d 64 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 62 6c	ty.0.'blddir.cmd))).....(when.bl
423a0	64 64 69 72 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65	ddir.......(setq.counsel-compile
423c0	2d 2d 63 75 72 72 65 6e 74 2d 62 75 69 6c 64 2d 64 69 72 20 62 6c 64 64 69 72 29 29 0a 20 20 20	--current-build-dir.blddir))....
423e0	20 28 69 6e 73 65 72 74 20 28 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65	.(insert.(substring-no-propertie
42400	73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6d 64 20 30 20 28 61 6e 64 20 28 67 65 74 2d 74	s..............cmd.0.(and.(get-t
42420	65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 27 63 6d 64 20 63 6d 64 29 0a 20 20 20 20 20 20 20	ext-property.0.'cmd.cmd)........
42440	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 65 78 74 2d 73 69 6e 67 6c 65 2d 70 72	.................(next-single-pr
42460	6f 70 65 72 74 79 2d 63 68 61 6e 67 65 20 30 20 27 63 6d 64 20 63 6d 64 29 29 29 29 29 29 0a 0a	operty-change.0.'cmd.cmd))))))..
42480	3b 3b 20 43 75 72 72 65 6e 74 6c 79 20 74 68 65 20 6f 6e 6c 79 20 74 68 69 6e 67 20 77 65 20 64	;;.Currently.the.only.thing.we.d
424a0	6f 20 69 73 20 6f 76 65 72 72 69 64 65 20 69 76 79 27 73 20 64 65 66 61 75 6c 74 20 69 6e 73 65	o.is.override.ivy's.default.inse
424c0	72 74 0a 3b 3b 20 6f 70 65 72 61 74 69 6f 6e 20 77 68 69 63 68 20 64 6f 65 73 6e 27 74 20 69 6e	rt.;;.operation.which.doesn't.in
424e0	63 6c 75 64 65 20 74 68 65 20 6d 65 74 61 64 61 74 61 20 77 65 20 77 61 6e 74 2e 0a 28 64 65 66	clude.the.metadata.we.want..(def
42500	76 61 72 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 6d 61 70 0a 20 20 28 6c 65 74 20 28	var.counsel-compile-map...(let.(
42520	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 20 20	(map.(make-sparse-keymap))).....
42540	28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 60 5b 72 65 6d 61 70 20 2c 23 27 69 76 79 2d 69	(define-key.map.`[remap.,#'ivy-i
42560	6e 73 65 72 74 2d 63 75 72 72 65 6e 74 5d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23	nsert-current].................#
42580	27 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 65 64 69 74 2d 63 6f 6d 6d 61 6e 64 29 0a 20	'counsel-compile-edit-command)..
425a0	20 20 20 6d 61 70 29 0a 20 20 22 41 64 64 69 74 69 6f 6e 61 6c 20 69 76 79 20 6b 65 79 62 69 6e	...map)..."Additional.ivy.keybin
425c0	64 69 6e 67 73 20 64 75 72 69 6e 67 20 63 6f 6d 6d 61 6e 64 20 73 65 6c 65 63 74 69 6f 6e 2e 22	dings.during.command.selection."
425e0	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 63 6f 75 6e 73 65 6c	)..;;;###autoload.(defun.counsel
42600	2d 63 6f 6d 70 69 6c 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20 64 69 72 29 0a 20 20 22 43 61 6c 6c	-compile.(&optional.dir)..."Call
42620	20 60 63 6f 6d 70 69 6c 65 27 20 63 6f 6d 70 6c 65 74 69 6e 67 20 77 69 74 68 20 73 6d 61 72 74	.`compile'.completing.with.smart
42640	20 73 75 67 67 65 73 74 69 6f 6e 73 2c 20 6f 70 74 69 6f 6e 61 6c 6c 79 20 66 6f 72 20 44 49 52	.suggestions,.optionally.for.DIR
42660	2e 0a 0a 41 64 64 69 74 69 6f 6e 61 6c 20 61 63 74 69 6f 6e 73 3a 0a 0a 5c 5c 7b 63 6f 75 6e 73	...Additional.actions:..\\{couns
42680	65 6c 2d 63 6f 6d 70 69 6c 65 2d 6d 61 70 7d 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29	el-compile-map}"...(interactive)
426a0	0a 20 20 28 72 65 71 75 69 72 65 20 27 63 6f 6d 70 69 6c 65 29 0a 20 20 28 72 65 71 75 69 72 65	...(require.'compile)...(require
426c0	20 27 64 69 72 65 64 29 20 3b 3b 20 46 6f 72 20 66 61 63 65 20 60 64 69 72 65 64 2d 64 69 72 65	.'dired).;;.For.face.`dired-dire
426e0	63 74 6f 72 79 27 2e 0a 20 20 28 73 65 74 71 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d	ctory'....(setq.counsel-compile-
42700	2d 63 75 72 72 65 6e 74 2d 62 75 69 6c 64 2d 64 69 72 20 28 6f 72 20 64 69 72 0a 20 20 20 20 20	-current-build-dir.(or.dir......
42720	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
42740	20 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 63 6f 6d 70 69 6c 65 2d 72 6f 6f 74	..........(counsel--compile-root
42760	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	)...............................
42780	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f	.................default-directo
427a0	72 79 29 29 0a 20 20 28 69 76 79 2d 72 65 61 64 20 22 43 6f 6d 70 69 6c 65 20 63 6f 6d 6d 61 6e	ry))...(ivy-read."Compile.comman
427c0	64 3a 20 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 64 75 70 73 20 28 63	d:.".............(delete-dups.(c
427e0	6f 75 6e 73 65 6c 2d 2d 67 65 74 2d 63 6f 6d 70 69 6c 65 2d 63 61 6e 64 69 64 61 74 65 73 20 64	ounsel--get-compile-candidates.d
42800	69 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 23 27 63 6f 75 6e 73	ir)).............:action.#'couns
42820	65 6c 2d 63 6f 6d 70 69 6c 65 2d 2d 61 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a	el-compile--action.............:
42840	6b 65 79 6d 61 70 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 6d 61 70 0a 20 20 20 20 20	keymap.counsel-compile-map......
42860	20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 29	.......:caller.'counsel-compile)
42880	29 0a 0a 28 69 76 79 2d 61 64 64 2d 61 63 74 69 6f 6e 73 0a 20 27 63 6f 75 6e 73 65 6c 2d 63 6f	)..(ivy-add-actions..'counsel-co
428a0	6d 70 69 6c 65 0a 20 27 28 28 22 64 22 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 66 6f	mpile..'(("d".counsel-compile-fo
428c0	72 67 65 74 2d 63 6f 6d 6d 61 6e 64 20 22 64 65 6c 65 74 65 22 29 29 29 0a 0a 28 64 65 66 75 6e	rget-command."delete")))..(defun
428e0	20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 66 6f 72 67 65 74 2d 63 6f 6d 6d 61 6e 64 20	.counsel-compile-forget-command.
42900	28 63 6d 64 29 0a 20 20 22 44 65 6c 65 74 65 20 43 4d 44 20 66 72 6f 6d 20 60 63 6f 75 6e 73 65	(cmd)..."Delete.CMD.from.`counse
42920	6c 2d 63 6f 6d 70 69 6c 65 2d 68 69 73 74 6f 72 79 27 2e 22 0a 20 20 28 73 65 74 71 20 63 6f 75	l-compile-history'."...(setq.cou
42940	6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 28 64 65	nsel-compile-history.........(de
42960	6c 65 74 65 20 63 6d 64 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 68 69 73 74 6f 72 79	lete.cmd.counsel-compile-history
42980	29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 65 6e 76 2d	)))..(defun.counsel-compile-env-
429a0	2d 66 6f 72 6d 61 74 2d 68 69 6e 74 20 28 63 61 6e 64 73 29 0a 20 20 22 52 65 74 75 72 6e 20 61	-format-hint.(cands)..."Return.a
429c0	20 66 6f 72 6d 61 74 74 65 72 20 66 6f 72 20 63 6f 6d 70 69 6c 65 2d 65 6e 76 20 43 41 4e 44 53	.formatter.for.compile-env.CANDS
429e0	2e 22 0a 20 20 28 6c 65 74 20 28 28 72 6d 73 74 72 0a 20 20 20 20 20 20 20 20 20 28 70 72 6f 70	."...(let.((rmstr..........(prop
42a00	65 72 74 69 7a 65 20 22 72 65 6d 6f 76 65 22 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b	ertize."remove".'face.'font-lock
42a20	2d 77 61 72 6e 69 6e 67 2d 66 61 63 65 29 29 0a 20 20 20 20 20 20 20 20 28 61 64 64 73 74 72 0a	-warning-face)).........(addstr.
42a40	20 20 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 61 64 64 22 20 27 66 61 63 65	.........(propertize."add".'face
42a60	20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 76 61 72 69 61 62 6c 65 2d 6e 61 6d 65 2d 66 61 63 65 29 29	.'font-lock-variable-name-face))
42a80	29 0a 20 20 20 20 28 69 76 79 2d 2d 66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 2d 67 65 6e 65	).....(ivy--format-function-gene
42aa0	72 69 63 0a 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 73 65 6c 65 63 74 65 64 29 0a 20 20 20 20	ric......(lambda.(selected).....
42ac0	20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 20 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	...(format."%s.%s"..............
42ae0	20 20 28 69 66 20 28 6d 65 6d 62 65 72 20 73 65 6c 65 63 74 65 64 20 63 6f 75 6e 73 65 6c 2d 63	..(if.(member.selected.counsel-c
42b00	6f 6d 70 69 6c 65 2d 65 6e 76 29 20 72 6d 73 74 72 20 61 64 64 73 74 72 29 0a 20 20 20 20 20 20	ompile-env).rmstr.addstr).......
42b20	20 20 20 20 20 20 20 20 20 73 65 6c 65 63 74 65 64 29 29 0a 20 20 20 20 20 23 27 69 64 65 6e 74	.........selected))......#'ident
42b40	69 74 79 0a 20 20 20 20 20 63 61 6e 64 73 0a 20 20 20 20 20 22 5c 6e 22 29 29 29 0a 0a 28 64 65	ity......cands......"\n")))..(de
42b60	66 75 6e 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 65 6e 76 2d 2d 75 70 64 61 74 65 20	fun.counsel-compile-env--update.
42b80	28 76 61 72 29 0a 20 20 22 55 70 64 61 74 65 20 60 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65	(var)..."Update.`counsel-compile
42ba0	2d 65 6e 76 27 20 65 69 74 68 65 72 20 61 64 64 69 6e 67 20 6f 72 20 72 65 6d 6f 76 69 6e 67 20	-env'.either.adding.or.removing.
42bc0	56 41 52 2e 22 0a 20 20 28 63 6f 6e 64 20 28 28 6d 65 6d 62 65 72 20 76 61 72 20 63 6f 75 6e 73	VAR."...(cond.((member.var.couns
42be0	65 6c 2d 63 6f 6d 70 69 6c 65 2d 65 6e 76 29 0a 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63	el-compile-env)..........(setq.c
42c00	6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 65 6e 76 20 28 64 65 6c 65 74 65 20 76 61 72 20 63	ounsel-compile-env.(delete.var.c
42c20	6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 65 6e 76 29 29 29 0a 20 20 20 20 20 20 20 20 28 28	ounsel-compile-env))).........((
42c40	73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 65	string-match-p.counsel-compile-e
42c60	6e 76 2d 70 61 74 74 65 72 6e 20 76 61 72 29 0a 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 76	nv-pattern.var)..........(push.v
42c80	61 72 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 65 6e 76 29 29 0a 20 20 20 20 20 20 20	ar.counsel-compile-env))........
42ca0	20 28 74 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 49 67 6e 6f 72 69 6e 67 20 6d 61 6c 66 6f 72	.(t.(user-error."Ignoring.malfor
42cc0	6d 65 64 20 76 61 72 69 61 62 6c 65 3a 20 27 25 73 27 22 20 76 61 72 29 29 29 29 0a 0a 3b 3b 3b	med.variable:.'%s'".var))))..;;;
42ce0	23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69	###autoload.(defun.counsel-compi
42d00	6c 65 2d 65 6e 76 20 28 29 0a 20 20 22 55 70 64 61 74 65 20 60 63 6f 75 6e 73 65 6c 2d 63 6f 6d	le-env.()..."Update.`counsel-com
42d20	70 69 6c 65 2d 65 6e 76 27 20 69 6e 74 65 72 61 63 74 69 76 65 6c 79 2e 22 0a 20 20 28 69 6e 74	pile-env'.interactively."...(int
42d40	65 72 61 63 74 69 76 65 29 0a 20 20 28 69 76 79 2d 72 65 61 64 20 22 43 6f 6d 70 69 6c 65 20 65	eractive)...(ivy-read."Compile.e
42d60	6e 76 69 72 6f 6e 6d 65 6e 74 20 76 61 72 69 61 62 6c 65 3a 20 22 0a 20 20 20 20 20 20 20 20 20	nvironment.variable:."..........
42d80	20 20 20 28 64 65 6c 65 74 65 2d 64 75 70 73 20 28 61 70 70 65 6e 64 0a 20 20 20 20 20 20 20 20	...(delete-dups.(append.........
42da0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c	..................counsel-compil
42dc0	65 2d 65 6e 76 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 65 6e 76 2d 68 69 73 74 6f 72	e-env.counsel-compile-env-histor
42de0	79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 23 27 63 6f 75 6e 73 65	y)).............:action.#'counse
42e00	6c 2d 63 6f 6d 70 69 6c 65 2d 65 6e 76 2d 2d 75 70 64 61 74 65 0a 20 20 20 20 20 20 20 20 20 20	l-compile-env--update...........
42e20	20 20 3a 70 72 65 64 69 63 61 74 65 20 28 6c 61 6d 62 64 61 20 28 63 61 6e 64 29 0a 20 20 20 20	..:predicate.(lambda.(cand).....
42e40	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 6d 61 74	.....................(string-mat
42e60	63 68 2d 70 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 65 6e 76 2d 70 61 74 74 65 72 6e	ch-p.counsel-compile-env-pattern
42e80	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	................................
42ea0	20 20 20 20 20 20 20 20 20 20 63 61 6e 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 69	..........cand)).............:hi
42ec0	73 74 6f 72 79 20 27 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 65 6e 76 2d 68 69 73 74 6f	story.'counsel-compile-env-histo
42ee0	72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d	ry.............:caller.'counsel-
42f00	63 6f 6d 70 69 6c 65 2d 65 6e 76 29 29 0a 0a 28 69 76 79 2d 63 6f 6e 66 69 67 75 72 65 20 27 63	compile-env))..(ivy-configure.'c
42f20	6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 65 6e 76 0a 20 20 3a 66 6f 72 6d 61 74 2d 66 6e 20	ounsel-compile-env...:format-fn.
42f40	23 27 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 65 2d 65 6e 76 2d 2d 66 6f 72 6d 61 74 2d 68 69	#'counsel-compile-env--format-hi
42f60	6e 74 29 0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 73 65 61 72 63 68 27 0a 0a 28 64 65 66	nt)..;;;;.`counsel-search'..(def
42f80	63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 73 65 61 72 63 68 2d 65 6e 67 69 6e 65 20 27 64 64	custom.counsel-search-engine.'dd
42fa0	67 0a 20 20 22 54 68 65 20 73 65 61 72 63 68 20 65 6e 67 69 6e 65 20 63 68 6f 69 63 65 20 69 6e	g..."The.search.engine.choice.in
42fc0	20 60 63 6f 75 6e 73 65 6c 2d 73 65 61 72 63 68 2d 65 6e 67 69 6e 65 73 2d 61 6c 69 73 74 27 2e	.`counsel-search-engines-alist'.
42fe0	22 0a 20 20 3a 74 79 70 65 20 27 28 63 68 6f 69 63 65 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f	"...:type.'(choice...........(co
43000	6e 73 74 20 3a 74 61 67 20 22 44 75 63 6b 44 75 63 6b 47 6f 22 20 64 64 67 29 0a 20 20 20 20 20	nst.:tag."DuckDuckGo".ddg)......
43020	20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 47 6f 6f 67 6c 65 22 20 67 6f 6f 67 6c 65	.....(const.:tag."Google".google
43040	29 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 73 65 61 72 63 68 2d 65	)))..(defcustom.counsel-search-e
43060	6e 67 69 6e 65 73 2d 61 6c 69 73 74 0a 20 20 27 28 28 64 64 67 0a 20 20 20 20 20 22 68 74 74 70	ngines-alist...'((ddg......"http
43080	73 3a 2f 2f 64 75 63 6b 64 75 63 6b 67 6f 2e 63 6f 6d 2f 61 63 2f 22 0a 20 20 20 20 20 22 68 74	s://duckduckgo.com/ac/"......"ht
430a0	74 70 73 3a 2f 2f 64 75 63 6b 64 75 63 6b 67 6f 2e 63 6f 6d 2f 68 74 6d 6c 2f 3f 71 3d 22 0a 20	tps://duckduckgo.com/html/?q="..
430c0	20 20 20 20 63 6f 75 6e 73 65 6c 2d 2d 73 65 61 72 63 68 2d 72 65 71 75 65 73 74 2d 64 61 74 61	....counsel--search-request-data
430e0	2d 64 64 67 29 0a 20 20 20 20 28 67 6f 6f 67 6c 65 0a 20 20 20 20 20 22 68 74 74 70 73 3a 2f 2f	-ddg).....(google......"https://
43100	73 75 67 67 65 73 74 71 75 65 72 69 65 73 2e 67 6f 6f 67 6c 65 2e 63 6f 6d 2f 63 6f 6d 70 6c 65	suggestqueries.google.com/comple
43120	74 65 2f 73 65 61 72 63 68 22 0a 20 20 20 20 20 22 68 74 74 70 73 3a 2f 2f 77 77 77 2e 67 6f 6f	te/search"......"https://www.goo
43140	67 6c 65 2e 63 6f 6d 2f 73 65 61 72 63 68 3f 71 3d 22 0a 20 20 20 20 20 63 6f 75 6e 73 65 6c 2d	gle.com/search?q="......counsel-
43160	2d 73 65 61 72 63 68 2d 72 65 71 75 65 73 74 2d 64 61 74 61 2d 67 6f 6f 67 6c 65 29 29 0a 20 20	-search-request-data-google))...
43180	22 4c 69 73 74 20 6f 66 20 73 65 61 72 63 68 20 65 6e 67 69 6e 65 20 70 61 72 61 6d 65 74 65 72	"List.of.search.engine.parameter
431a0	73 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 73 65 61 72 63 68 27 2e 0a 45 61 63 68 20 65 6c 65	s.for.`counsel-search'..Each.ele
431c0	6d 65 6e 74 20 69 73 20 6f 66 20 74 68 65 20 66 6f 72 6d 20 28 53 59 4d 42 4f 4c 20 53 55 47 47	ment.is.of.the.form.(SYMBOL.SUGG
431e0	45 53 54 20 42 52 4f 57 53 45 20 45 58 54 52 41 43 54 29 2c 20 77 68 65 72 65 3a 0a 53 59 4d 42	EST.BROWSE.EXTRACT),.where:.SYMB
43200	4f 4c 20 69 64 65 6e 74 69 66 69 65 73 20 74 68 65 20 73 65 61 72 63 68 20 65 6e 67 69 6e 65 2c	OL.identifies.the.search.engine,
43220	20 61 73 20 70 65 72 20 60 63 6f 75 6e 73 65 6c 2d 73 65 61 72 63 68 2d 65 6e 67 69 6e 65 27 2e	.as.per.`counsel-search-engine'.
43240	0a 53 55 47 47 45 53 54 20 69 73 20 74 68 65 20 55 52 4c 20 74 6f 20 71 75 65 72 79 20 66 6f 72	.SUGGEST.is.the.URL.to.query.for
43260	20 73 75 67 67 65 73 74 69 6f 6e 73 2e 0a 42 52 4f 57 53 45 20 69 73 20 74 68 65 20 55 52 4c 20	.suggestions..BROWSE.is.the.URL.
43280	70 72 65 66 69 78 20 66 6f 72 20 76 69 73 69 74 69 6e 67 20 74 68 65 20 73 65 6c 65 63 74 65 64	prefix.for.visiting.the.selected
432a0	20 72 65 73 75 6c 74 2e 0a 45 58 54 52 41 43 54 20 69 73 20 61 20 66 75 6e 63 74 69 6f 6e 20 74	.result..EXTRACT.is.a.function.t
432c0	68 61 74 20 74 61 6b 65 73 20 74 68 65 20 6f 62 6a 65 63 74 20 70 61 72 73 65 64 20 66 72 6f 6d	hat.takes.the.object.parsed.from
432e0	20 74 68 65 20 53 55 47 47 45 53 54 0a 20 65 6e 64 70 6f 69 6e 74 20 61 6e 64 20 74 72 61 6e 73	.the.SUGGEST..endpoint.and.trans
43300	66 6f 72 6d 73 20 69 74 20 69 6e 74 6f 20 61 20 73 65 74 20 6f 66 20 49 76 79 20 63 61 6e 64 69	forms.it.into.a.set.of.Ivy.candi
43320	64 61 74 65 73 2e 22 0a 20 20 3a 70 61 63 6b 61 67 65 2d 76 65 72 73 69 6f 6e 20 27 28 63 6f 75	dates."...:package-version.'(cou
43340	6e 73 65 6c 20 2e 20 22 30 2e 31 35 2e 31 22 29 0a 20 20 3a 74 79 70 65 20 27 28 61 6c 69 73 74	nsel..."0.15.1")...:type.'(alist
43360	20 3a 6b 65 79 2d 74 79 70 65 20 73 79 6d 62 6f 6c 20 3a 76 61 6c 75 65 2d 74 79 70 65 20 28 6c	.:key-type.symbol.:value-type.(l
43380	69 73 74 20 73 74 72 69 6e 67 20 73 74 72 69 6e 67 20 66 75 6e 63 74 69 6f 6e 29 29 29 0a 0a 28	ist.string.string.function)))..(
433a0	64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 73 65 61 72 63 68 2d 72 65 71 75 65 73 74 2d 64 61	defun.counsel--search-request-da
433c0	74 61 2d 67 6f 6f 67 6c 65 20 28 64 61 74 61 29 0a 20 20 22 45 78 74 72 61 63 74 20 47 6f 6f 67	ta-google.(data)..."Extract.Goog
433e0	6c 65 20 73 75 67 67 65 73 74 69 6f 6e 73 20 66 72 6f 6d 20 70 61 72 73 65 64 20 4a 53 4f 4e 20	le.suggestions.from.parsed.JSON.
43400	44 41 54 41 2e 0a 45 78 70 65 63 74 73 20 69 6e 70 75 74 20 6f 66 20 74 68 65 20 66 6f 72 6d 20	DATA..Expects.input.of.the.form.
43420	5b 5c 22 61 5c 22 20 5b 5c 22 61 62 5c 22 20 5c 22 61 63 5c 22 5d 20 2e 2e 2e 5d 2e 22 0a 20 20	[\"a\".[\"ab\".\"ac\"]....]."...
43440	28 61 70 70 65 6e 64 20 28 61 72 65 66 20 64 61 74 61 20 31 29 20 28 29 29 29 0a 0a 28 64 65 66	(append.(aref.data.1).()))..(def
43460	75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 73 65 61 72 63 68 2d 72 65 71 75 65 73 74 2d 64 61 74 61 2d	un.counsel--search-request-data-
43480	64 64 67 20 28 64 61 74 61 29 0a 20 20 22 45 78 74 72 61 63 74 20 44 75 63 6b 44 75 63 6b 47 6f	ddg.(data)..."Extract.DuckDuckGo
434a0	20 73 75 67 67 65 73 74 69 6f 6e 73 20 66 72 6f 6d 20 70 61 72 73 65 64 20 4a 53 4f 4e 20 44 41	.suggestions.from.parsed.JSON.DA
434c0	54 41 2e 0a 45 78 70 65 63 74 73 20 69 6e 70 75 74 20 6f 66 20 74 68 65 20 66 6f 72 6d 20 5b 28	TA..Expects.input.of.the.form.[(
434e0	28 70 68 72 61 73 65 20 2e 20 5c 22 61 62 5c 22 29 29 20 2e 2e 2e 5d 2e 22 0a 20 20 28 6d 61 70	(phrase...\"ab\"))....]."...(map
43500	63 61 72 20 23 27 63 64 61 72 20 64 61 74 61 29 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73	car.#'cdar.data))..(defvar.couns
43520	65 6c 2d 2d 6e 61 74 69 76 65 2d 6a 73 6f 6e 29 0a 28 70 75 74 20 27 63 6f 75 6e 73 65 6c 2d 2d	el--native-json).(put.'counsel--
43540	6e 61 74 69 76 65 2d 6a 73 6f 6e 20 27 76 61 72 69 61 62 6c 65 2d 64 6f 63 75 6d 65 6e 74 61 74	native-json.'variable-documentat
43560	69 6f 6e 0a 20 20 20 20 20 22 4e 6f 6e 2d 6e 69 6c 20 69 66 20 45 6d 61 63 73 20 73 75 70 70 6f	ion......"Non-nil.if.Emacs.suppo
43580	72 74 73 20 4a 53 4f 4e 20 6e 61 74 69 76 65 6c 79 2c 20 6f 72 20 76 6f 69 64 2e 22 29 0a 0a 28	rts.JSON.natively,.or.void.")..(
435a0	64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 73 65 61 72 63 68 2d 75 70 64 61 74 65 20 28 65 78	defun.counsel--search-update.(ex
435c0	74 72 61 63 74 20 73 74 72 20 74 79 70 65 29 0a 20 20 22 43 61 6c 6c 20 45 58 54 52 41 43 54 20	tract.str.type)..."Call.EXTRACT.
435e0	6f 6e 20 4a 53 4f 4e 20 53 54 52 20 6f 66 20 43 6f 6e 74 65 6e 74 2d 54 59 50 45 2e 22 0a 20 20	on.JSON.STR.of.Content-TYPE."...
43600	28 75 6e 6c 65 73 73 20 28 66 62 6f 75 6e 64 70 20 27 6d 61 69 6c 2d 68 65 61 64 65 72 2d 70 61	(unless.(fboundp.'mail-header-pa
43620	72 73 65 2d 63 6f 6e 74 65 6e 74 2d 74 79 70 65 29 0a 20 20 20 20 28 72 65 71 75 69 72 65 20 27	rse-content-type).....(require.'
43640	6d 61 69 6c 2d 70 61 72 73 65 29 29 0a 20 20 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e	mail-parse))...(declare-function
43660	20 6a 73 6f 6e 2d 70 61 72 73 65 2d 73 74 72 69 6e 67 20 22 6a 73 6f 6e 2e 63 22 29 0a 20 20 28	.json-parse-string."json.c")...(
43680	64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 6a 73 6f 6e 2d 72 65 61 64 2d 66 72 6f 6d 2d	declare-function.json-read-from-
436a0	73 74 72 69 6e 67 20 22 6a 73 6f 6e 22 29 0a 20 20 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69	string."json")...(declare-functi
436c0	6f 6e 20 6d 61 69 6c 2d 63 6f 6e 74 65 6e 74 2d 74 79 70 65 2d 67 65 74 20 22 6d 61 69 6c 2d 70	on.mail-content-type-get."mail-p
436e0	61 72 73 65 22 29 0a 20 20 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 6d 61 69 6c 2d	arse")...(declare-function.mail-
43700	68 65 61 64 65 72 2d 70 61 72 73 65 2d 63 6f 6e 74 65 6e 74 2d 74 79 70 65 20 22 6d 61 69 6c 2d	header-parse-content-type."mail-
43720	70 61 72 73 65 22 29 0a 20 20 28 6c 65 74 2a 20 28 28 63 74 20 28 61 6e 64 20 74 79 70 65 20 28	parse")...(let*.((ct.(and.type.(
43740	6d 61 69 6c 2d 68 65 61 64 65 72 2d 70 61 72 73 65 2d 63 6f 6e 74 65 6e 74 2d 74 79 70 65 20 74	mail-header-parse-content-type.t
43760	79 70 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 63 6f 64 69 6e 67 20 28 63 6f 64 69 6e 67 2d	ype)))..........(coding.(coding-
43780	73 79 73 74 65 6d 2d 66 72 6f 6d 2d 6e 61 6d 65 20 28 6d 61 69 6c 2d 63 6f 6e 74 65 6e 74 2d 74	system-from-name.(mail-content-t
437a0	79 70 65 2d 67 65 74 20 63 74 20 27 63 68 61 72 73 65 74 29 29 29 29 0a 20 20 20 20 28 77 68 65	ype-get.ct.'charset)))).....(whe
437c0	6e 20 63 6f 64 69 6e 67 0a 20 20 20 20 20 20 28 73 65 74 71 20 73 74 72 20 28 64 65 63 6f 64 65	n.coding.......(setq.str.(decode
437e0	2d 63 6f 64 69 6e 67 2d 73 74 72 69 6e 67 20 73 74 72 20 63 6f 64 69 6e 67 20 74 29 29 29 29 0a	-coding-string.str.coding.t)))).
43800	20 20 28 6c 65 74 20 28 28 6f 62 6a 20 28 69 66 20 63 6f 75 6e 73 65 6c 2d 2d 6e 61 74 69 76 65	..(let.((obj.(if.counsel--native
43820	2d 6a 73 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6a 73 6f 6e 2d 70 61 72	-json..................(json-par
43840	73 65 2d 73 74 72 69 6e 67 20 73 74 72 20 3a 6f 62 6a 65 63 74 2d 74 79 70 65 20 27 61 6c 69 73	se-string.str.:object-type.'alis
43860	74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 66 76 61 72 20 6a 73 6f 6e 2d 61	t)................(defvar.json-a
43880	72 72 61 79 2d 74 79 70 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 66 76 61	rray-type)................(defva
438a0	72 20 6a 73 6f 6e 2d 6f 62 6a 65 63 74 2d 74 79 70 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	r.json-object-type).............
438c0	20 20 20 28 6c 65 74 20 28 28 6a 73 6f 6e 2d 61 72 72 61 79 2d 74 79 70 65 20 27 76 65 63 74 6f	...(let.((json-array-type.'vecto
438e0	72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6a 73 6f 6e 2d 6f 62	r)......................(json-ob
43900	6a 65 63 74 2d 74 79 70 65 20 27 61 6c 69 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	ject-type.'alist))..............
43920	20 20 20 20 28 6a 73 6f 6e 2d 72 65 61 64 2d 66 72 6f 6d 2d 73 74 72 69 6e 67 20 73 74 72 29 29	....(json-read-from-string.str))
43940	29 29 29 0a 20 20 20 20 28 69 76 79 2d 75 70 64 61 74 65 2d 63 61 6e 64 69 64 61 74 65 73 20 28	))).....(ivy-update-candidates.(
43960	66 75 6e 63 61 6c 6c 20 65 78 74 72 61 63 74 20 6f 62 6a 29 29 29 29 0a 0a 28 64 65 66 75 6e 20	funcall.extract.obj))))..(defun.
43980	63 6f 75 6e 73 65 6c 2d 2d 73 65 61 72 63 68 2d 70 6c 7a 20 28 75 72 6c 20 65 78 74 72 61 63 74	counsel--search-plz.(url.extract
439a0	29 0a 20 20 22 46 65 74 63 68 20 55 52 4c 20 77 69 74 68 20 60 70 6c 7a 27 20 61 6e 64 20 45 58	)..."Fetch.URL.with.`plz'.and.EX
439c0	54 52 41 43 54 20 69 74 73 20 4a 53 4f 4e 20 70 61 79 6c 6f 61 64 2e 22 0a 20 20 28 64 65 63 6c	TRACT.its.JSON.payload."...(decl
439e0	61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 70 6c 7a 20 22 65 78 74 3a 70 6c 7a 22 29 0a 20 20 28 64	are-function.plz."ext:plz")...(d
43a00	65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 70 6c 7a 2d 72 65 73 70 6f 6e 73 65 2d 62 6f 64	eclare-function.plz-response-bod
43a20	79 20 22 65 78 74 3a 70 6c 7a 22 29 0a 20 20 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e	y."ext:plz")...(declare-function
43a40	20 70 6c 7a 2d 72 65 73 70 6f 6e 73 65 2d 68 65 61 64 65 72 73 20 22 65 78 74 3a 70 6c 7a 22 29	.plz-response-headers."ext:plz")
43a60	0a 20 20 3b 3b 20 44 6f 65 73 6e 27 74 20 68 61 6e 64 6c 65 20 43 6f 6e 74 65 6e 74 2d 54 79 70	...;;.Doesn't.handle.Content-Typ
43a80	65 2c 20 73 6f 20 64 65 66 65 72 20 64 65 63 6f 64 69 6e 67 2b 70 61 72 73 69 6e 67 20 75 6e 74	e,.so.defer.decoding+parsing.unt
43aa0	69 6c 20 3a 74 68 65 6e 2e 0a 20 20 3b 3b 20 28 53 65 65 20 55 52 4c 20 60 68 74 74 70 73 3a 2f	il.:then....;;.(See.URL.`https:/
43ac0	2f 67 69 74 68 75 62 2e 63 6f 6d 2f 61 6c 70 68 61 70 61 70 61 2f 70 6c 7a 2e 65 6c 2f 70 75 6c	/github.com/alphapapa/plz.el/pul
43ae0	6c 2f 36 36 27 2e 29 0a 20 20 3b 3b 20 41 73 6b 20 66 6f 72 20 61 20 60 70 6c 7a 2d 72 65 73 70	l/66'.)...;;.Ask.for.a.`plz-resp
43b00	6f 6e 73 65 27 20 6f 62 6a 65 63 74 20 62 65 63 61 75 73 65 20 69 74 20 61 6c 72 65 61 64 79 20	onse'.object.because.it.already.
43b20	63 6f 6e 74 61 69 6e 73 20 74 68 65 20 70 61 72 73 65 64 0a 20 20 3b 3b 20 68 65 61 64 65 72 73	contains.the.parsed...;;.headers
43b40	20 28 74 68 6f 75 67 68 20 6a 75 73 74 20 77 69 64 65 6e 69 6e 67 20 74 68 65 20 72 65 73 70 6f	.(though.just.widening.the.respo
43b60	6e 73 65 20 62 75 66 66 65 72 20 63 6f 75 6c 64 20 62 65 20 71 75 69 63 6b 65 72 29 2e 0a 20 20	nse.buffer.could.be.quicker)....
43b80	28 70 6c 7a 20 27 67 65 74 20 75 72 6c 20 3a 61 73 20 27 72 65 73 70 6f 6e 73 65 20 3a 64 65 63	(plz.'get.url.:as.'response.:dec
43ba0	6f 64 65 20 6e 69 6c 20 3a 6e 6f 71 75 65 72 79 20 74 0a 20 20 20 20 3a 74 68 65 6e 20 28 6c 61	ode.nil.:noquery.t.....:then.(la
43bc0	6d 62 64 61 20 28 72 65 73 70 6f 6e 73 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74	mbda.(response).............(let
43be0	2a 20 28 28 68 65 61 64 73 20 28 70 6c 7a 2d 72 65 73 70 6f 6e 73 65 2d 68 65 61 64 65 72 73 20	*.((heads.(plz-response-headers.
43c00	72 65 73 70 6f 6e 73 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62	response))....................(b
43c20	6f 64 79 20 28 70 6c 7a 2d 72 65 73 70 6f 6e 73 65 2d 62 6f 64 79 20 72 65 73 70 6f 6e 73 65 29	ody.(plz-response-body.response)
43c40	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 74 20 28 63 64 72 20 28 61	)....................(ct.(cdr.(a
43c60	73 73 71 20 27 63 6f 6e 74 65 6e 74 2d 74 79 70 65 20 68 65 61 64 73 29 29 29 29 0a 20 20 20 20	ssq.'content-type.heads)))).....
43c80	20 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 73 65 61 72 63 68 2d 75 70 64 61 74	..........(counsel--search-updat
43ca0	65 20 65 78 74 72 61 63 74 20 62 6f 64 79 20 63 74 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63	e.extract.body.ct)))))..(defun.c
43cc0	6f 75 6e 73 65 6c 2d 2d 73 65 61 72 63 68 2d 72 65 71 75 65 73 74 20 28 75 72 6c 20 65 78 74 72	ounsel--search-request.(url.extr
43ce0	61 63 74 29 0a 20 20 22 46 65 74 63 68 20 55 52 4c 20 77 69 74 68 20 60 72 65 71 75 65 73 74 27	act)..."Fetch.URL.with.`request'
43d00	20 61 6e 64 20 45 58 54 52 41 43 54 20 69 74 73 20 4a 53 4f 4e 20 70 61 79 6c 6f 61 64 2e 22 0a	.and.EXTRACT.its.JSON.payload.".
43d20	20 20 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 72 65 71 75 65 73 74 20 22 65 78 74	..(declare-function.request."ext
43d40	3a 72 65 71 75 65 73 74 22 29 0a 20 20 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 72	:request")...(declare-function.r
43d60	65 71 75 65 73 74 2d 72 65 73 70 6f 6e 73 65 2d 68 65 61 64 65 72 20 22 65 78 74 3a 72 65 71 75	equest-response-header."ext:requ
43d80	65 73 74 22 29 0a 20 20 3b 3b 20 44 6f 65 73 6e 27 74 20 68 61 6e 64 6c 65 20 43 6f 6e 74 65 6e	est")...;;.Doesn't.handle.Conten
43da0	74 2d 54 79 70 65 20 28 65 78 70 65 63 74 73 20 63 6f 64 69 6e 67 20 73 79 73 74 65 6d 20 61 20	t-Type.(expects.coding.system.a.
43dc0	70 72 69 6f 72 69 29 2c 0a 20 20 3b 3b 20 73 6f 20 64 65 66 65 72 20 64 65 63 6f 64 69 6e 67 2b	priori),...;;.so.defer.decoding+
43de0	70 61 72 73 69 6e 67 20 75 6e 74 69 6c 20 3a 73 75 63 63 65 73 73 2e 0a 20 20 28 72 65 71 75 65	parsing.until.:success....(reque
43e00	73 74 20 75 72 6c 20 3a 74 79 70 65 20 22 47 45 54 22 0a 20 20 20 20 3a 73 75 63 63 65 73 73 20	st.url.:type."GET".....:success.
43e20	28 63 6c 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62	(cl-function...............(lamb
43e40	64 61 20 28 26 6b 65 79 20 64 61 74 61 20 72 65 73 70 6f 6e 73 65 20 26 61 6c 6c 6f 77 2d 6f 74	da.(&key.data.response.&allow-ot
43e60	68 65 72 2d 6b 65 79 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28	her-keys).................(let.(
43e80	28 63 74 20 28 72 65 71 75 65 73 74 2d 72 65 73 70 6f 6e 73 65 2d 68 65 61 64 65 72 20 72 65 73	(ct.(request-response-header.res
43ea0	70 6f 6e 73 65 20 22 63 6f 6e 74 65 6e 74 2d 74 79 70 65 22 29 29 29 0a 20 20 20 20 20 20 20 20	ponse."content-type"))).........
43ec0	20 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e 73 65 6c 2d 2d 73 65 61 72 63 68 2d 75 70 64 61 74	..........(counsel--search-updat
43ee0	65 20 65 78 74 72 61 63 74 20 64 61 74 61 20 63 74 29 29 29 29 29 29 0a 0a 28 64 65 66 76 61 72	e.extract.data.ct))))))..(defvar
43f00	20 63 6f 75 6e 73 65 6c 2d 2d 73 65 61 72 63 68 2d 62 61 63 6b 65 6e 64 29 0a 28 70 75 74 20 27	.counsel--search-backend).(put.'
43f20	63 6f 75 6e 73 65 6c 2d 2d 73 65 61 72 63 68 2d 62 61 63 6b 65 6e 64 20 27 76 61 72 69 61 62 6c	counsel--search-backend.'variabl
43f40	65 2d 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 0a 20 20 20 20 20 22 46 65 61 74 75 72 65 20 73 79	e-documentation......"Feature.sy
43f60	6d 62 6f 6c 20 69 6e 64 69 63 61 74 69 6e 67 20 61 76 61 69 6c 61 62 6c 65 20 48 54 54 50 20 6c	mbol.indicating.available.HTTP.l
43f80	69 62 72 61 72 79 2c 20 6f 72 20 76 6f 69 64 2e 0a 56 61 6c 69 64 20 76 61 6c 75 65 73 20 61 72	ibrary,.or.void..Valid.values.ar
43fa0	65 20 74 68 65 20 6b 65 79 73 20 6f 66 20 60 63 6f 75 6e 73 65 6c 2d 2d 73 65 61 72 63 68 2d 62	e.the.keys.of.`counsel--search-b
43fc0	61 63 6b 65 6e 64 73 27 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 2d 73 65	ackends'.")..(defvar.counsel--se
43fe0	61 72 63 68 2d 62 61 63 6b 65 6e 64 73 0a 20 20 60 28 28 70 6c 7a 20 2c 23 27 63 6f 75 6e 73 65	arch-backends...`((plz.,#'counse
44000	6c 2d 2d 73 65 61 72 63 68 2d 70 6c 7a 29 0a 20 20 20 20 28 72 65 71 75 65 73 74 20 2c 23 27 63	l--search-plz).....(request.,#'c
44020	6f 75 6e 73 65 6c 2d 2d 73 65 61 72 63 68 2d 72 65 71 75 65 73 74 29 29 0a 20 20 22 4c 69 73 74	ounsel--search-request))..."List
44040	20 6f 66 20 28 42 41 43 4b 45 4e 44 20 47 45 54 54 45 52 29 20 66 6f 72 20 60 63 6f 75 6e 73 65	.of.(BACKEND.GETTER).for.`counse
44060	6c 2d 73 65 61 72 63 68 27 2e 0a 42 41 43 4b 45 4e 44 20 69 73 20 61 20 66 65 61 74 75 72 65 20	l-search'..BACKEND.is.a.feature.
44080	73 79 6d 62 6f 6c 20 6c 69 6b 65 20 60 63 6f 75 6e 73 65 6c 2d 2d 73 65 61 72 63 68 2d 62 61 63	symbol.like.`counsel--search-bac
440a0	6b 65 6e 64 27 2e 0a 47 45 54 54 45 52 20 69 73 20 61 20 66 75 6e 63 74 69 6f 6e 20 74 61 6b 69	kend'..GETTER.is.a.function.taki
440c0	6e 67 20 61 20 55 52 4c 20 61 6e 64 20 61 6e 20 45 58 54 52 41 43 54 20 66 75 6e 63 74 69 6f 6e	ng.a.URL.and.an.EXTRACT.function
440e0	20 61 73 20 69 6e 0a 20 60 63 6f 75 6e 73 65 6c 2d 73 65 61 72 63 68 2d 65 6e 67 69 6e 65 73 2d	.as.in..`counsel-search-engines-
44100	61 6c 69 73 74 27 2e 22 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 73 65 61 72 63 68	alist'.")..(defun.counsel-search
44120	2d 66 75 6e 63 74 69 6f 6e 20 28 69 6e 70 75 74 29 0a 20 20 22 43 72 65 61 74 65 20 61 20 72 65	-function.(input)..."Create.a.re
44140	71 75 65 73 74 20 74 6f 20 61 20 73 65 61 72 63 68 20 65 6e 67 69 6e 65 20 77 69 74 68 20 49 4e	quest.to.a.search.engine.with.IN
44160	50 55 54 2e 0a 52 65 74 75 72 6e 20 30 20 74 65 6c 6c 73 20 60 69 76 79 2d 2d 65 78 68 69 62 69	PUT..Return.0.tells.`ivy--exhibi
44180	74 27 20 6e 6f 74 20 74 6f 20 75 70 64 61 74 65 20 74 68 65 20 6d 69 6e 69 62 75 66 66 65 72 2e	t'.not.to.update.the.minibuffer.
441a0	0a 57 65 20 75 70 64 61 74 65 20 69 74 20 69 6e 20 74 68 65 20 63 61 6c 6c 62 61 63 6b 20 77 69	.We.update.it.in.the.callback.wi
441c0	74 68 20 60 69 76 79 2d 75 70 64 61 74 65 2d 63 61 6e 64 69 64 61 74 65 73 27 2e 22 0a 20 20 28	th.`ivy-update-candidates'."...(
441e0	6f 72 0a 20 20 20 28 69 76 79 2d 6d 6f 72 65 2d 63 68 61 72 73 29 0a 20 20 20 28 6c 65 74 2a 20	or....(ivy-more-chars)....(let*.
44200	28 28 62 61 63 6b 65 6e 64 20 28 61 73 73 71 20 63 6f 75 6e 73 65 6c 2d 2d 73 65 61 72 63 68 2d	((backend.(assq.counsel--search-
44220	62 61 63 6b 65 6e 64 20 63 6f 75 6e 73 65 6c 2d 2d 73 65 61 72 63 68 2d 62 61 63 6b 65 6e 64 73	backend.counsel--search-backends
44240	29 29 0a 20 20 20 20 20 20 20 20 20 20 28 65 6e 67 69 6e 65 20 28 61 73 73 71 20 63 6f 75 6e 73	))...........(engine.(assq.couns
44260	65 6c 2d 73 65 61 72 63 68 2d 65 6e 67 69 6e 65 20 63 6f 75 6e 73 65 6c 2d 73 65 61 72 63 68 2d	el-search-engine.counsel-search-
44280	65 6e 67 69 6e 65 73 2d 61 6c 69 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 75 67 67 65	engines-alist))...........(sugge
442a0	73 74 20 28 6e 74 68 20 31 20 65 6e 67 69 6e 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 65 78	st.(nth.1.engine))...........(ex
442c0	74 72 61 63 74 20 28 6e 74 68 20 33 20 65 6e 67 69 6e 65 29 29 0a 20 20 20 20 20 20 20 20 20 20	tract.(nth.3.engine))...........
442e0	28 75 72 6c 20 28 63 6f 6e 63 61 74 20 73 75 67 67 65 73 74 20 28 69 66 20 28 69 76 79 2d 2d 73	(url.(concat.suggest.(if.(ivy--s
44300	74 72 69 6e 67 2d 73 65 61 72 63 68 20 22 3f 22 20 73 75 67 67 65 73 74 29 20 22 26 22 20 22 3f	tring-search."?".suggest)."&"."?
44320	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 3b 3b 20 46 49 58	")........................;;.FIX
44340	4d 45 3a 20 60 63 6c 69 65 6e 74 27 20 6e 65 65 64 65 64 20 6f 6e 6c 79 20 66 6f 72 20 60 67 6f	ME:.`client'.needed.only.for.`go
44360	6f 67 6c 65 27 3f 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 75	ogle'?........................(u
44380	72 6c 2d 62 75 69 6c 64 2d 71 75 65 72 79 2d 73 74 72 69 6e 67 20 60 28 28 22 63 6c 69 65 6e 74	rl-build-query-string.`(("client
443a0	22 20 22 66 69 72 65 66 6f 78 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	"."firefox")....................
443c0	20 20 20 20 20 20 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 22	..............................("
443e0	71 22 20 2c 69 6e 70 75 74 29 29 29 29 29 29 0a 20 20 20 20 20 3b 3b 20 44 6f 20 77 65 20 6e 65	q".,input))))))......;;.Do.we.ne
44400	65 64 20 74 6f 20 63 61 6e 63 65 6c 20 72 65 71 75 65 73 74 73 20 61 6c 72 65 61 64 79 20 69 6e	ed.to.cancel.requests.already.in
44420	20 66 6c 69 67 68 74 3f 0a 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 28 6e 74 68 20 31 20 62 61	.flight?......(funcall.(nth.1.ba
44440	63 6b 65 6e 64 29 20 75 72 6c 20 65 78 74 72 61 63 74 29 0a 20 20 20 20 20 30 29 29 29 0a 0a 28	ckend).url.extract)......0)))..(
44460	64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 73 65 61 72 63 68 2d 61 63 74 69 6f 6e 20 28 63 61 6e	defun.counsel-search-action.(can
44480	64 69 64 61 74 65 29 0a 20 20 22 42 72 6f 77 73 65 20 74 68 65 20 73 65 61 72 63 68 20 72 65 73	didate)..."Browse.the.search.res
444a0	75 6c 74 73 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 73 65 61 72 63 68 27 20 43 41 4e 44 49 44	ults.for.`counsel-search'.CANDID
444c0	41 54 45 2e 22 0a 20 20 28 6c 65 74 20 28 28 65 6e 67 69 6e 65 20 28 61 73 73 71 20 63 6f 75 6e	ATE."...(let.((engine.(assq.coun
444e0	73 65 6c 2d 73 65 61 72 63 68 2d 65 6e 67 69 6e 65 20 63 6f 75 6e 73 65 6c 2d 73 65 61 72 63 68	sel-search-engine.counsel-search
44500	2d 65 6e 67 69 6e 65 73 2d 61 6c 69 73 74 29 29 29 0a 20 20 20 20 28 62 72 6f 77 73 65 2d 75 72	-engines-alist))).....(browse-ur
44520	6c 20 28 63 6f 6e 63 61 74 20 28 6e 74 68 20 32 20 65 6e 67 69 6e 65 29 20 28 75 72 6c 2d 68 65	l.(concat.(nth.2.engine).(url-he
44540	78 69 66 79 2d 73 74 72 69 6e 67 20 63 61 6e 64 69 64 61 74 65 29 29 29 29 29 0a 0a 28 64 65 66	xify-string.candidate)))))..(def
44560	75 6e 20 63 6f 75 6e 73 65 6c 2d 73 65 61 72 63 68 20 28 29 0a 20 20 22 49 76 79 20 69 6e 74 65	un.counsel-search.()..."Ivy.inte
44580	72 66 61 63 65 20 66 6f 72 20 71 75 65 72 79 69 6e 67 20 61 20 73 65 61 72 63 68 20 65 6e 67 69	rface.for.querying.a.search.engi
445a0	6e 65 2e 0a 44 79 6e 61 6d 69 63 61 6c 6c 79 20 64 69 73 70 6c 61 79 73 20 73 65 61 72 63 68 20	ne..Dynamically.displays.search.
445c0	73 75 67 67 65 73 74 69 6f 6e 73 20 66 6f 72 20 74 68 65 20 63 75 72 72 65 6e 74 20 69 6e 70 75	suggestions.for.the.current.inpu
445e0	74 2e 0a 54 68 65 20 75 73 65 72 20 6f 70 74 69 6f 6e 73 20 60 63 6f 75 6e 73 65 6c 2d 73 65 61	t..The.user.options.`counsel-sea
44600	72 63 68 2d 65 6e 67 69 6e 65 27 20 61 6e 64 0a 60 63 6f 75 6e 73 65 6c 2d 73 65 61 72 63 68 2d	rch-engine'.and.`counsel-search-
44620	65 6e 67 69 6e 65 73 2d 61 6c 69 73 74 27 20 64 65 74 65 72 6d 69 6e 65 20 74 68 65 20 65 6e 67	engines-alist'.determine.the.eng
44640	69 6e 65 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 75 6e 6c 65 73 73 20	ine."...(interactive)...(unless.
44660	28 62 6f 75 6e 64 70 20 27 63 6f 75 6e 73 65 6c 2d 2d 73 65 61 72 63 68 2d 62 61 63 6b 65 6e 64	(boundp.'counsel--search-backend
44680	29 0a 20 20 20 20 28 73 65 74 71 20 63 6f 75 6e 73 65 6c 2d 2d 73 65 61 72 63 68 2d 62 61 63 6b	).....(setq.counsel--search-back
446a0	65 6e 64 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 60 70 6c 7a 27 20 69 73 20 6f 6e 20 47 4e 55	end...........;;.`plz'.is.on.GNU
446c0	20 45 4c 50 41 3b 20 60 72 65 71 75 65 73 74 27 20 6f 6e 20 4e 6f 6e 47 4e 55 20 45 4c 50 41 2e	.ELPA;.`request'.on.NonGNU.ELPA.
446e0	0a 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 72 65 71 75 69 72 65 20 27 70 6c 7a 20 6e 69 6c	...........(or.(require.'plz.nil
44700	20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 71 75 69 72 65 20 27 72 65 71 75	.t)...............(require.'requ
44720	65 73 74 20 6e 69 6c 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 73 65 72 2d 65	est.nil.t)...............(user-e
44740	72 72 6f 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 52 65 71 75 69 72 65 64 20 70 61	rror................"Required.pa
44760	63 6b 61 67 65 20 60 70 6c 7a 27 20 28 6f 72 20 60 72 65 71 75 65 73 74 27 29 20 6e 6f 74 20 69	ckage.`plz'.(or.`request').not.i
44780	6e 73 74 61 6c 6c 65 64 22 29 29 29 29 0a 20 20 3b 3b 20 2d 20 45 6d 61 63 73 20 32 37 3a 20 6f	nstalled"))))...;;.-.Emacs.27:.o
447a0	70 74 69 6f 6e 61 6c 20 6e 61 74 69 76 65 20 4a 53 4f 4e 20 73 75 70 70 6f 72 74 2e 0a 20 20 3b	ptional.native.JSON.support....;
447c0	3b 20 2d 20 45 6d 61 63 73 20 32 38 3a 20 60 6a 73 6f 6e 2d 61 76 61 69 6c 61 62 6c 65 2d 70 27	;.-.Emacs.28:.`json-available-p'
447e0	2e 0a 20 20 3b 3b 20 2d 20 45 6d 61 63 73 20 33 30 3a 20 75 6e 63 6f 6e 64 69 74 69 6f 6e 61 6c	....;;.-.Emacs.30:.unconditional
44800	20 6e 61 74 69 76 65 20 4a 53 4f 4e 20 73 75 70 70 6f 72 74 2e 0a 20 20 3b 3b 20 54 68 61 74 20	.native.JSON.support....;;.That.
44820	6d 65 61 6e 73 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 73 65 74 73 20 60 63 6f 75 6e 73 65	means.the.following.sets.`counse
44840	6c 2d 2d 6e 61 74 69 76 65 2d 6a 73 6f 6e 27 20 74 6f 20 6e 69 6c 20 65 76 65 6e 20 66 6f 72 0a	l--native-json'.to.nil.even.for.
44860	20 20 3b 3b 20 45 6d 61 63 73 20 32 37 20 77 69 74 68 20 6e 61 74 69 76 65 20 4a 53 4f 4e 20 73	..;;.Emacs.27.with.native.JSON.s
44880	75 70 70 6f 72 74 2c 20 69 6e 20 74 68 65 20 69 6e 74 65 72 65 73 74 20 6f 66 20 73 69 6d 70 6c	upport,.in.the.interest.of.simpl
448a0	69 63 69 74 79 2e 0a 20 20 28 6f 72 20 28 62 6f 75 6e 64 70 20 27 63 6f 75 6e 73 65 6c 2d 2d 6e	icity....(or.(boundp.'counsel--n
448c0	61 74 69 76 65 2d 6a 73 6f 6e 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 6f 75 6e 73 65 6c 2d	ative-json).......(setq.counsel-
448e0	2d 6e 61 74 69 76 65 2d 6a 73 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 66	-native-json.............(and.(f
44900	62 6f 75 6e 64 70 20 27 6a 73 6f 6e 2d 61 76 61 69 6c 61 62 6c 65 2d 70 29 0a 20 20 20 20 20 20	boundp.'json-available-p).......
44920	20 20 20 20 20 20 20 20 20 20 20 28 6a 73 6f 6e 2d 61 76 61 69 6c 61 62 6c 65 2d 70 29 29 29 0a	...........(json-available-p))).
44940	20 20 20 20 20 20 28 72 65 71 75 69 72 65 20 27 6a 73 6f 6e 29 29 0a 20 20 28 69 76 79 2d 72 65	......(require.'json))...(ivy-re
44960	61 64 20 22 73 65 61 72 63 68 3a 20 22 20 23 27 63 6f 75 6e 73 65 6c 2d 73 65 61 72 63 68 2d 66	ad."search:.".#'counsel-search-f
44980	75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 23 27 63 6f	unction.............:action.#'co
449a0	75 6e 73 65 6c 2d 73 65 61 72 63 68 2d 61 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20	unsel-search-action.............
449c0	3a 64 79 6e 61 6d 69 63 2d 63 6f 6c 6c 65 63 74 69 6f 6e 20 74 0a 20 20 20 20 20 20 20 20 20 20	:dynamic-collection.t...........
449e0	20 20 3a 63 61 6c 6c 65 72 20 27 63 6f 75 6e 73 65 6c 2d 73 65 61 72 63 68 29 29 0a 0a 28 64 65	..:caller.'counsel-search))..(de
44a00	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 63 6f	fine-obsolete-function-alias.'co
44a20	75 6e 73 65 6c 2d 67 6f 6f 67 6c 65 0a 20 20 20 20 23 27 63 6f 75 6e 73 65 6c 2d 73 65 61 72 63	unsel-google.....#'counsel-searc
44a40	68 20 22 30 2e 31 33 2e 32 20 28 32 30 31 39 2d 31 30 2d 31 37 29 22 29 0a 0a 3b 3b 3b 3b 20 60	h."0.13.2.(2019-10-17)")..;;;;.`
44a60	63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 61 74 69 6f 6e 2d 65 72 72 6f 72 73 27 0a 0a 28 64 65	counsel-compilation-errors'..(de
44a80	63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 6f 6d 70 69 6c 61 74 69 6f 6e 2d 2d 6d 65 73 73	clare-function.compilation--mess
44aa0	61 67 65 2d 3e 6c 6f 63 20 22 63 6f 6d 70 69 6c 65 22 20 74 20 74 29 0a 28 64 65 63 6c 61 72 65	age->loc."compile".t.t).(declare
44ac0	2d 66 75 6e 63 74 69 6f 6e 20 63 6f 6d 70 69 6c 61 74 69 6f 6e 2d 62 75 66 66 65 72 2d 70 20 22	-function.compilation-buffer-p."
44ae0	63 6f 6d 70 69 6c 65 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 63 6f 6d 70	compile").(declare-function.comp
44b00	69 6c 61 74 69 6f 6e 2d 6e 65 78 74 2d 73 69 6e 67 6c 65 2d 70 72 6f 70 65 72 74 79 2d 63 68 61	ilation-next-single-property-cha
44b20	6e 67 65 20 22 63 6f 6d 70 69 6c 65 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e	nge."compile").(declare-function
44b40	20 63 6f 6d 70 69 6c 65 2d 67 6f 74 6f 2d 65 72 72 6f 72 20 22 63 6f 6d 70 69 6c 65 22 29 0a 0a	.compile-goto-error."compile")..
44b60	28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 2d 63 6f 6d 70 69 6c 61 74 69 6f 6e 2d 65 72 72 6f	(defun.counsel--compilation-erro
44b80	72 73 2d 62 75 66 66 65 72 20 28 62 75 66 29 0a 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d	rs-buffer.(buf)...(with-current-
44ba0	62 75 66 66 65 72 20 62 75 66 0a 20 20 20 20 28 6c 65 74 20 28 28 72 65 73 20 6e 69 6c 29 0a 20	buffer.buf.....(let.((res.nil)..
44bc0	20 20 20 20 20 20 20 20 20 28 70 74 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 29 0a 20 20 20 20 20	.........(pt.(point-min)))......
44be0	20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20	.(save-excursion.........(while.
44c00	28 73 65 74 71 20 70 74 20 28 63 6f 6d 70 69 6c 61 74 69 6f 6e 2d 6e 65 78 74 2d 73 69 6e 67 6c	(setq.pt.(compilation-next-singl
44c20	65 2d 70 72 6f 70 65 72 74 79 2d 63 68 61 6e 67 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	e-property-change...............
44c40	20 20 20 20 20 20 20 20 20 20 20 70 74 20 27 63 6f 6d 70 69 6c 61 74 69 6f 6e 2d 6d 65 73 73 61	...........pt.'compilation-messa
44c60	67 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 6c 6f 63 20 28 67 65 74 2d 74	ge))...........(let.((loc.(get-t
44c80	65 78 74 2d 70 72 6f 70 65 72 74 79 20 70 74 20 27 63 6f 6d 70 69 6c 61 74 69 6f 6e 2d 6d 65 73	ext-property.pt.'compilation-mes
44ca0	73 61 67 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 6c	sage))).............(when.(and.l
44cc0	6f 63 20 28 73 65 74 71 20 6c 6f 63 20 28 63 6f 6d 70 69 6c 61 74 69 6f 6e 2d 2d 6d 65 73 73 61	oc.(setq.loc.(compilation--messa
44ce0	67 65 2d 3e 6c 6f 63 20 6c 6f 63 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f	ge->loc.loc)))...............(go
44d00	74 6f 2d 63 68 61 72 20 70 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 0a	to-char.pt)...............(push.
44d20	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......
44d40	20 20 20 20 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	...........(buffer-substring-no-
44d60	70 72 6f 70 65 72 74 69 65 73 20 70 74 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e	properties.pt.(line-end-position
44d80	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 70 74 20 70 74 0a 20 20 20 20 20 20	)).................'pt.pt.......
44da0	20 20 20 20 20 20 20 20 20 20 27 62 75 66 66 65 72 20 62 75 66 29 0a 20 20 20 20 20 20 20 20 20	..........'buffer.buf)..........
44dc0	20 20 20 20 20 20 72 65 73 29 29 29 29 29 0a 20 20 20 20 20 20 28 6e 72 65 76 65 72 73 65 20 72	......res))))).......(nreverse.r
44de0	65 73 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 61 74 69	es))))..(defun.counsel-compilati
44e00	6f 6e 2d 65 72 72 6f 72 73 2d 63 61 6e 64 73 20 28 29 0a 20 20 28 63 6c 2d 6c 6f 6f 70 0a 20 20	on-errors-cands.()...(cl-loop...
44e20	20 20 20 66 6f 72 20 62 75 66 20 69 6e 20 28 62 75 66 66 65 72 2d 6c 69 73 74 29 0a 20 20 20 20	...for.buf.in.(buffer-list).....
44e40	20 77 68 65 6e 20 28 63 6f 6d 70 69 6c 61 74 69 6f 6e 2d 62 75 66 66 65 72 2d 70 20 62 75 66 29	.when.(compilation-buffer-p.buf)
44e60	0a 20 20 20 20 20 6e 63 6f 6e 63 20 28 63 6f 75 6e 73 65 6c 2d 2d 63 6f 6d 70 69 6c 61 74 69 6f	......nconc.(counsel--compilatio
44e80	6e 2d 65 72 72 6f 72 73 2d 62 75 66 66 65 72 20 62 75 66 29 29 29 0a 0a 28 64 65 66 75 6e 20 63	n-errors-buffer.buf)))..(defun.c
44ea0	6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 61 74 69 6f 6e 2d 65 72 72 6f 72 73 2d 61 63 74 69 6f 6e	ounsel-compilation-errors-action
44ec0	20 28 78 29 0a 20 20 28 70 6f 70 2d 74 6f 2d 62 75 66 66 65 72 20 28 67 65 74 2d 74 65 78 74 2d	.(x)...(pop-to-buffer.(get-text-
44ee0	70 72 6f 70 65 72 74 79 20 30 20 27 62 75 66 66 65 72 20 78 29 29 0a 20 20 28 67 6f 74 6f 2d 63	property.0.'buffer.x))...(goto-c
44f00	68 61 72 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 27 70 74 20 78 29 29	har.(get-text-property.0.'pt.x))
44f20	0a 20 20 28 63 6f 6d 70 69 6c 65 2d 67 6f 74 6f 2d 65 72 72 6f 72 29 29 0a 0a 3b 3b 3b 23 23 23	...(compile-goto-error))..;;;###
44f40	61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 61 74	autoload.(defun.counsel-compilat
44f60	69 6f 6e 2d 65 72 72 6f 72 73 20 28 29 0a 20 20 22 43 6f 6d 70 69 6c 61 74 69 6f 6e 20 65 72 72	ion-errors.()..."Compilation.err
44f80	6f 72 73 2e 22 0a 20 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	ors."...(interactive)...(require
44fa0	20 27 63 6f 6d 70 69 6c 65 29 0a 20 20 28 69 76 79 2d 72 65 61 64 20 22 63 6f 6d 70 69 6c 61 74	.'compile)...(ivy-read."compilat
44fc0	69 6f 6e 20 65 72 72 6f 72 73 3a 20 22 20 28 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 61 74 69	ion.errors:.".(counsel-compilati
44fe0	6f 6e 2d 65 72 72 6f 72 73 2d 63 61 6e 64 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65	on-errors-cands).............:re
45000	71 75 69 72 65 2d 6d 61 74 63 68 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f	quire-match.t.............:actio
45020	6e 20 23 27 63 6f 75 6e 73 65 6c 2d 63 6f 6d 70 69 6c 61 74 69 6f 6e 2d 65 72 72 6f 72 73 2d 61	n.#'counsel-compilation-errors-a
45040	63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 69 73 74 6f 72 79 20 27 63 6f 75 6e	ction.............:history.'coun
45060	73 65 6c 2d 63 6f 6d 70 69 6c 61 74 69 6f 6e 2d 65 72 72 6f 72 73 2d 68 69 73 74 6f 72 79 29 29	sel-compilation-errors-history))
45080	0a 0a 3b 3b 3b 3b 20 60 63 6f 75 6e 73 65 6c 2d 66 6c 79 63 68 65 63 6b 27 0a 0a 28 64 65 66 76	..;;;;.`counsel-flycheck'..(defv
450a0	61 72 20 66 6c 79 63 68 65 63 6b 2d 63 75 72 72 65 6e 74 2d 65 72 72 6f 72 73 29 0a 28 64 65 63	ar.flycheck-current-errors).(dec
450c0	6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 66 6c 79 63 68 65 63 6b 2d 65 72 72 6f 72 2d 66 69 6c	lare-function.flycheck-error-fil
450e0	65 6e 61 6d 65 20 22 65 78 74 3a 66 6c 79 63 68 65 63 6b 22 29 0a 28 64 65 63 6c 61 72 65 2d 66	ename."ext:flycheck").(declare-f
45100	75 6e 63 74 69 6f 6e 20 66 6c 79 63 68 65 63 6b 2d 65 72 72 6f 72 2d 6c 69 6e 65 20 22 65 78 74	unction.flycheck-error-line."ext
45120	3a 66 6c 79 63 68 65 63 6b 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 66 6c	:flycheck").(declare-function.fl
45140	79 63 68 65 63 6b 2d 65 72 72 6f 72 2d 6d 65 73 73 61 67 65 20 22 65 78 74 3a 66 6c 79 63 68 65	ycheck-error-message."ext:flyche
45160	63 6b 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 66 6c 79 63 68 65 63 6b 2d	ck").(declare-function.flycheck-
45180	6a 75 6d 70 2d 74 6f 2d 65 72 72 6f 72 20 22 65 78 74 3a 66 6c 79 63 68 65 63 6b 22 29 0a 0a 28	jump-to-error."ext:flycheck")..(
451a0	64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 66 6c 79 63 68 65 63 6b 2d 65 72 72 6f 72 73 2d 63 61	defun.counsel-flycheck-errors-ca
451c0	6e 64 73 20 28 29 0a 20 20 28 6d 61 70 63 61 72 0a 20 20 20 28 6c 61 6d 62 64 61 20 28 65 72 72	nds.()...(mapcar....(lambda.(err
451e0	29 0a 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 0a 20 20 20 20 20 20 28 66 6f 72 6d 61 74	)......(propertize.......(format
45200	20 22 25 73 3a 25 64 3a 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d	."%s:%d:%s"...............(file-
45220	6e 61 6d 65 2d 62 61 73 65 20 28 66 6c 79 63 68 65 63 6b 2d 65 72 72 6f 72 2d 66 69 6c 65 6e 61	name-base.(flycheck-error-filena
45240	6d 65 20 65 72 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6c 79 63 68 65 63 6b	me.err))...............(flycheck
45260	2d 65 72 72 6f 72 2d 6c 69 6e 65 20 65 72 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	-error-line.err)...............(
45280	66 6c 79 63 68 65 63 6b 2d 65 72 72 6f 72 2d 6d 65 73 73 61 67 65 20 65 72 72 29 29 20 27 65 72	flycheck-error-message.err)).'er
452a0	72 6f 72 20 65 72 72 29 29 0a 20 20 20 66 6c 79 63 68 65 63 6b 2d 63 75 72 72 65 6e 74 2d 65 72	ror.err))....flycheck-current-er
452c0	72 6f 72 73 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 6e 73 65 6c 2d 66 6c 79 63 68 65 63 6b 2d	rors))..(defun.counsel-flycheck-
452e0	6f 63 63 75 72 20 28 63 61 6e 64 73 29 0a 20 20 22 47 65 6e 65 72 61 74 65 20 61 20 63 75 73 74	occur.(cands)..."Generate.a.cust
45300	6f 6d 20 6f 63 63 75 72 20 62 75 66 66 65 72 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 66 6c 79	om.occur.buffer.for.`counsel-fly
45320	63 68 65 63 6b 27 2e 22 0a 20 20 28 75 6e 6c 65 73 73 20 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64	check'."...(unless.(eq.major-mod
45340	65 20 27 69 76 79 2d 6f 63 63 75 72 2d 67 72 65 70 2d 6d 6f 64 65 29 0a 20 20 20 20 28 69 76 79	e.'ivy-occur-grep-mode).....(ivy
45360	2d 6f 63 63 75 72 2d 67 72 65 70 2d 6d 6f 64 65 29 0a 20 20 20 20 28 73 65 74 71 20 64 65 66 61	-occur-grep-mode).....(setq.defa
45380	75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 28 69 76 79 2d 73 74 61 74 65 2d 64 69 72 65 63 74 6f	ult-directory.(ivy-state-directo
453a0	72 79 20 69 76 79 2d 6c 61 73 74 29 29 29 0a 20 20 28 73 77 69 70 65 72 2d 2d 6f 63 63 75 72 2d	ry.ivy-last)))...(swiper--occur-
453c0	69 6e 73 65 72 74 2d 6c 69 6e 65 73 0a 20 20 20 28 6d 61 70 63 61 72 0a 20 20 20 20 28 6c 61 6d	insert-lines....(mapcar.....(lam
453e0	62 64 61 20 28 63 61 6e 64 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 65 72 72 20 28 67 65 74	bda.(cand).......(let.((err.(get
45400	2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 27 65 72 72 6f 72 20 63 61 6e 64 29 29 29 0a	-text-property.0.'error.cand))).
45420	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 20 20 20 20 28 66 6f	........(propertize..........(fo
45440	72 6d 61 74 0a 20 20 20 20 20 20 20 20 20 20 22 25 73 3a 25 64 3a 25 73 22 0a 20 20 20 20 20 20	rmat..........."%s:%d:%s".......
45460	20 20 20 20 28 66 6c 79 63 68 65 63 6b 2d 65 72 72 6f 72 2d 66 69 6c 65 6e 61 6d 65 20 65 72 72	....(flycheck-error-filename.err
45480	29 0a 20 20 20 20 20 20 20 20 20 20 28 66 6c 79 63 68 65 63 6b 2d 65 72 72 6f 72 2d 6c 69 6e 65	)...........(flycheck-error-line
454a0	20 65 72 72 29 0a 20 20 20 20 20 20 20 20 20 20 63 61 6e 64 29 0a 20 20 20 20 20 20 20 20 20 27	.err)...........cand)..........'
454c0	65 72 72 6f 72 20 65 72 72 29 29 29 0a 20 20 20 20 63 61 6e 64 73 29 29 29 0a 0a 28 64 65 66 75	error.err))).....cands)))..(defu
454e0	6e 20 63 6f 75 6e 73 65 6c 2d 66 6c 79 63 68 65 63 6b 2d 65 72 72 6f 72 73 2d 61 63 74 69 6f 6e	n.counsel-flycheck-errors-action
45500	20 28 65 72 72 29 0a 20 20 28 66 6c 79 63 68 65 63 6b 2d 6a 75 6d 70 2d 74 6f 2d 65 72 72 6f 72	.(err)...(flycheck-jump-to-error
45520	20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 27 65 72 72 6f 72 20 65 72 72	.(get-text-property.0.'error.err
45540	29 29 29 0a 0a 28 69 76 79 2d 63 6f 6e 66 69 67 75 72 65 20 27 63 6f 75 6e 73 65 6c 2d 66 6c 79	)))..(ivy-configure.'counsel-fly
45560	63 68 65 63 6b 0a 20 20 3a 6f 63 63 75 72 20 23 27 63 6f 75 6e 73 65 6c 2d 66 6c 79 63 68 65 63	check...:occur.#'counsel-flychec
45580	6b 2d 6f 63 63 75 72 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	k-occur)..;;;###autoload.(defun.
455a0	63 6f 75 6e 73 65 6c 2d 66 6c 79 63 68 65 63 6b 20 28 29 0a 20 20 22 46 6c 79 63 68 65 63 6b 20	counsel-flycheck.()..."Flycheck.
455c0	65 72 72 6f 72 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 72 65 71 75	errors."...(interactive)...(requ
455e0	69 72 65 20 27 66 6c 79 63 68 65 63 6b 29 0a 20 20 28 69 76 79 2d 72 65 61 64 20 22 66 6c 79 63	ire.'flycheck)...(ivy-read."flyc
45600	68 65 63 6b 20 65 72 72 6f 72 73 3a 20 22 20 28 63 6f 75 6e 73 65 6c 2d 66 6c 79 63 68 65 63 6b	heck.errors:.".(counsel-flycheck
45620	2d 65 72 72 6f 72 73 2d 63 61 6e 64 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 71 75	-errors-cands).............:requ
45640	69 72 65 2d 6d 61 74 63 68 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20	ire-match.t.............:action.
45660	23 27 63 6f 75 6e 73 65 6c 2d 66 6c 79 63 68 65 63 6b 2d 65 72 72 6f 72 73 2d 61 63 74 69 6f 6e	#'counsel-flycheck-errors-action
45680	0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 69 73 74 6f 72 79 20 27 63 6f 75 6e 73 65 6c 2d 66	.............:history.'counsel-f
456a0	6c 79 63 68 65 63 6b 2d 65 72 72 6f 72 73 2d 68 69 73 74 6f 72 79 29 29 0a 0c 0a 3b 3b 3b 20 60	lycheck-errors-history))...;;;.`
456c0	63 6f 75 6e 73 65 6c 2d 6d 6f 64 65 27 0a 0a 28 64 65 66 76 61 72 20 63 6f 75 6e 73 65 6c 2d 6d	counsel-mode'..(defvar.counsel-m
456e0	6f 64 65 2d 6d 61 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	ode-map...(let.((map.(make-spars
45700	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 20 6d 61 70 20	e-keymap))).....(define-key.map.
45720	60 5b 72 65 6d 61 70 20 2c 23 27 65 78 65 63 75 74 65 2d 65 78 74 65 6e 64 65 64 2d 63 6f 6d 6d	`[remap.,#'execute-extended-comm
45740	61 6e 64 5d 20 23 27 63 6f 75 6e 73 65 6c 2d 4d 2d 78 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d	and].#'counsel-M-x).....(define-
45760	6b 65 79 20 6d 61 70 20 60 5b 72 65 6d 61 70 20 2c 23 27 64 65 73 63 72 69 62 65 2d 62 69 6e 64	key.map.`[remap.,#'describe-bind
45780	69 6e 67 73 5d 20 23 27 63 6f 75 6e 73 65 6c 2d 64 65 73 63 62 69 6e 64 73 29 0a 20 20 20 20 28	ings].#'counsel-descbinds).....(
457a0	64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 60 5b 72 65 6d 61 70 20 2c 23 27 64 65 73 63 72 69	define-key.map.`[remap.,#'descri
457c0	62 65 2d 66 75 6e 63 74 69 6f 6e 5d 20 23 27 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d	be-function].#'counsel-describe-
457e0	66 75 6e 63 74 69 6f 6e 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 60 5b	function).....(define-key.map.`[
45800	72 65 6d 61 70 20 2c 23 27 64 65 73 63 72 69 62 65 2d 76 61 72 69 61 62 6c 65 5d 20 23 27 63 6f	remap.,#'describe-variable].#'co
45820	75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 76 61 72 69 61 62 6c 65 29 0a 20 20 20 20 28 64 65	unsel-describe-variable).....(de
45840	66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 5b 72 65 6d 61 70 20 64 65 73 63 72 69 62 65 2d 73 79 6d	fine-key.map.[remap.describe-sym
45860	62 6f 6c 5d 20 23 27 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72 69 62 65 2d 73 79 6d 62 6f 6c 29 0a	bol].#'counsel-describe-symbol).
45880	20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 60 5b 72 65 6d 61 70 20 2c 23 27 61	....(define-key.map.`[remap.,#'a
458a0	70 72 6f 70 6f 73 2d 63 6f 6d 6d 61 6e 64 5d 20 23 27 63 6f 75 6e 73 65 6c 2d 61 70 72 6f 70 6f	propos-command].#'counsel-apropo
458c0	73 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 60 5b 72 65 6d 61 70 20 2c	s).....(define-key.map.`[remap.,
458e0	23 27 64 65 73 63 72 69 62 65 2d 66 61 63 65 5d 20 23 27 63 6f 75 6e 73 65 6c 2d 64 65 73 63 72	#'describe-face].#'counsel-descr
45900	69 62 65 2d 66 61 63 65 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 60 5b	ibe-face).....(define-key.map.`[
45920	72 65 6d 61 70 20 2c 23 27 6c 69 73 74 2d 66 61 63 65 73 2d 64 69 73 70 6c 61 79 5d 20 23 27 63	remap.,#'list-faces-display].#'c
45940	6f 75 6e 73 65 6c 2d 66 61 63 65 73 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61	ounsel-faces).....(define-key.ma
45960	70 20 60 5b 72 65 6d 61 70 20 2c 23 27 66 69 6e 64 2d 66 69 6c 65 5d 20 23 27 63 6f 75 6e 73 65	p.`[remap.,#'find-file].#'counse
45980	6c 2d 66 69 6e 64 2d 66 69 6c 65 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70	l-find-file).....(define-key.map
459a0	20 60 5b 72 65 6d 61 70 20 2c 23 27 66 69 6e 64 2d 6c 69 62 72 61 72 79 5d 20 23 27 63 6f 75 6e	.`[remap.,#'find-library].#'coun
459c0	73 65 6c 2d 66 69 6e 64 2d 6c 69 62 72 61 72 79 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65	sel-find-library).....(define-ke
459e0	79 20 6d 61 70 20 60 5b 72 65 6d 61 70 20 2c 23 27 69 6d 65 6e 75 5d 20 23 27 63 6f 75 6e 73 65	y.map.`[remap.,#'imenu].#'counse
45a00	6c 2d 69 6d 65 6e 75 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 60 5b 72	l-imenu).....(define-key.map.`[r
45a20	65 6d 61 70 20 2c 23 27 6c 6f 61 64 2d 6c 69 62 72 61 72 79 5d 20 23 27 63 6f 75 6e 73 65 6c 2d	emap.,#'load-library].#'counsel-
45a40	6c 6f 61 64 2d 6c 69 62 72 61 72 79 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61	load-library).....(define-key.ma
45a60	70 20 60 5b 72 65 6d 61 70 20 2c 23 27 6c 6f 61 64 2d 74 68 65 6d 65 5d 20 23 27 63 6f 75 6e 73	p.`[remap.,#'load-theme].#'couns
45a80	65 6c 2d 6c 6f 61 64 2d 74 68 65 6d 65 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d	el-load-theme).....(define-key.m
45aa0	61 70 20 60 5b 72 65 6d 61 70 20 2c 23 27 79 61 6e 6b 2d 70 6f 70 5d 20 23 27 63 6f 75 6e 73 65	ap.`[remap.,#'yank-pop].#'counse
45ac0	6c 2d 79 61 6e 6b 2d 70 6f 70 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20	l-yank-pop).....(define-key.map.
45ae0	60 5b 72 65 6d 61 70 20 2c 23 27 69 6e 66 6f 2d 6c 6f 6f 6b 75 70 2d 73 79 6d 62 6f 6c 5d 20 23	`[remap.,#'info-lookup-symbol].#
45b00	27 63 6f 75 6e 73 65 6c 2d 69 6e 66 6f 2d 6c 6f 6f 6b 75 70 2d 73 79 6d 62 6f 6c 29 0a 20 20 20	'counsel-info-lookup-symbol)....
45b20	20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 60 5b 72 65 6d 61 70 20 2c 23 27 70 6f 70 2d	.(define-key.map.`[remap.,#'pop-
45b40	74 6f 2d 6d 61 72 6b 2d 63 6f 6d 6d 61 6e 64 5d 20 23 27 63 6f 75 6e 73 65 6c 2d 6d 61 72 6b 2d	to-mark-command].#'counsel-mark-
45b60	72 69 6e 67 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 5b 72 65 6d 61 70	ring).....(define-key.map.[remap
45b80	20 67 65 69 73 65 72 2d 64 6f 63 2d 6c 6f 6f 6b 2d 75 70 2d 6d 61 6e 75 61 6c 5d 0a 20 20 20 20	.geiser-doc-look-up-manual].....
45ba0	20 20 20 20 20 20 20 20 20 20 20 20 23 27 63 6f 75 6e 73 65 6c 2d 67 65 69 73 65 72 2d 64 6f 63	............#'counsel-geiser-doc
45bc0	2d 6c 6f 6f 6b 2d 75 70 2d 6d 61 6e 75 61 6c 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79	-look-up-manual).....(define-key
45be0	20 6d 61 70 20 60 5b 72 65 6d 61 70 20 2c 23 27 62 6f 6f 6b 6d 61 72 6b 2d 6a 75 6d 70 5d 20 23	.map.`[remap.,#'bookmark-jump].#
45c00	27 63 6f 75 6e 73 65 6c 2d 62 6f 6f 6b 6d 61 72 6b 29 0a 20 20 20 20 6d 61 70 29 0a 20 20 22 4b	'counsel-bookmark).....map)..."K
45c20	65 79 6d 61 70 20 66 6f 72 20 60 63 6f 75 6e 73 65 6c 2d 6d 6f 64 65 27 2e 0a 52 65 6d 61 70 73	eymap.for.`counsel-mode'..Remaps
45c40	20 62 75 69 6c 74 2d 69 6e 20 61 6e 64 20 65 78 74 65 72 6e 61 6c 20 66 75 6e 63 74 69 6f 6e 73	.built-in.and.external.functions
45c60	20 74 6f 20 43 6f 75 6e 73 65 6c 20 72 65 70 6c 61 63 65 6d 65 6e 74 73 2e 22 29 0a 0a 28 64 65	.to.Counsel.replacements.")..(de
45c80	66 63 75 73 74 6f 6d 20 63 6f 75 6e 73 65 6c 2d 6d 6f 64 65 2d 6f 76 65 72 72 69 64 65 2d 64 65	fcustom.counsel-mode-override-de
45ca0	73 63 72 69 62 65 2d 62 69 6e 64 69 6e 67 73 20 6e 69 6c 0a 20 20 22 57 68 65 74 68 65 72 20 74	scribe-bindings.nil..."Whether.t
45cc0	6f 20 6f 76 65 72 72 69 64 65 20 60 64 65 73 63 72 69 62 65 2d 62 69 6e 64 69 6e 67 73 27 20 77	o.override.`describe-bindings'.w
45ce0	68 65 6e 20 60 63 6f 75 6e 73 65 6c 2d 6d 6f 64 65 27 20 69 73 20 61 63 74 69 76 65 2e 22 0a 20	hen.`counsel-mode'.is.active."..
45d00	20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64	.:type.'boolean)..;;;###autoload
45d20	0a 28 64 65 66 69 6e 65 2d 6d 69 6e 6f 72 2d 6d 6f 64 65 20 63 6f 75 6e 73 65 6c 2d 6d 6f 64 65	.(define-minor-mode.counsel-mode
45d40	0a 20 20 22 54 6f 67 67 6c 65 20 43 6f 75 6e 73 65 6c 20 6d 6f 64 65 20 6f 6e 20 6f 72 20 6f 66	..."Toggle.Counsel.mode.on.or.of
45d60	66 2e 0a 54 75 72 6e 20 43 6f 75 6e 73 65 6c 20 6d 6f 64 65 20 6f 6e 20 69 66 20 41 52 47 20 69	f..Turn.Counsel.mode.on.if.ARG.i
45d80	73 20 70 6f 73 69 74 69 76 65 2c 20 6f 66 66 20 6f 74 68 65 72 77 69 73 65 2e 20 43 6f 75 6e 73	s.positive,.off.otherwise..Couns
45da0	65 6c 0a 6d 6f 64 65 20 72 65 6d 61 70 73 20 62 75 69 6c 74 2d 69 6e 20 65 6d 61 63 73 20 66 75	el.mode.remaps.built-in.emacs.fu
45dc0	6e 63 74 69 6f 6e 73 20 74 68 61 74 20 68 61 76 65 20 63 6f 75 6e 73 65 6c 0a 72 65 70 6c 61 63	nctions.that.have.counsel.replac
45de0	65 6d 65 6e 74 73 2e 0a 0a 4c 6f 63 61 6c 20 62 69 6e 64 69 6e 67 73 20 28 60 63 6f 75 6e 73 65	ements...Local.bindings.(`counse
45e00	6c 2d 6d 6f 64 65 2d 6d 61 70 27 29 3a 0a 5c 5c 7b 63 6f 75 6e 73 65 6c 2d 6d 6f 64 65 2d 6d 61	l-mode-map'):.\\{counsel-mode-ma
45e20	70 7d 22 0a 20 20 3a 67 6c 6f 62 61 6c 20 74 0a 20 20 3a 6b 65 79 6d 61 70 20 63 6f 75 6e 73 65	p}"...:global.t...:keymap.counse
45e40	6c 2d 6d 6f 64 65 2d 6d 61 70 0a 20 20 3a 6c 69 67 68 74 65 72 20 22 20 63 6f 75 6e 73 65 6c 22	l-mode-map...:lighter.".counsel"
45e60	0a 20 20 28 69 66 20 63 6f 75 6e 73 65 6c 2d 6d 6f 64 65 0a 20 20 20 20 20 20 28 70 72 6f 67 6e	...(if.counsel-mode.......(progn
45e80	0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 63 6f 75 6e 73 65 6c 2d 6d 6f 64 65 2d 6f 76 65 72	.........(when.counsel-mode-over
45ea0	72 69 64 65 2d 64 65 73 63 72 69 62 65 2d 62 69 6e 64 69 6e 67 73 0a 20 20 20 20 20 20 20 20 20	ride-describe-bindings..........
45ec0	20 28 61 64 76 69 63 65 2d 61 64 64 20 23 27 64 65 73 63 72 69 62 65 2d 62 69 6e 64 69 6e 67 73	.(advice-add.#'describe-bindings
45ee0	20 3a 6f 76 65 72 72 69 64 65 20 23 27 63 6f 75 6e 73 65 6c 2d 64 65 73 63 62 69 6e 64 73 29 29	.:override.#'counsel-descbinds))
45f00	0a 20 20 20 20 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 69 6e 69 62 75 66 66 65 72 2d	.........(define-key.minibuffer-
45f20	6c 6f 63 61 6c 2d 6d 61 70 20 28 6b 62 64 20 22 43 2d 72 22 29 0a 20 20 20 20 20 20 20 20 20 20	local-map.(kbd."C-r")...........
45f40	23 27 63 6f 75 6e 73 65 6c 2d 6d 69 6e 69 62 75 66 66 65 72 2d 68 69 73 74 6f 72 79 29 29 0a 20	#'counsel-minibuffer-history))..
45f60	20 20 20 28 61 64 76 69 63 65 2d 72 65 6d 6f 76 65 20 23 27 64 65 73 63 72 69 62 65 2d 62 69 6e	...(advice-remove.#'describe-bin
45f80	64 69 6e 67 73 20 23 27 63 6f 75 6e 73 65 6c 2d 64 65 73 63 62 69 6e 64 73 29 29 29 0a 0a 28 70	dings.#'counsel-descbinds)))..(p
45fa0	72 6f 76 69 64 65 20 27 63 6f 75 6e 73 65 6c 29 0a 0a 3b 3b 3b 20 63 6f 75 6e 73 65 6c 2e 65 6c	rovide.'counsel)..;;;.counsel.el
45fc0	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 00 00 00 00 00 00	.ends.here......................
45fe0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
46000	63 6f 75 6e 73 65 6c 2d 30 2e 31 35 2e 31 2f 2e 6d 61 69 6c 6d 61 70 00 00 00 00 00 00 00 00 00	counsel-0.15.1/.mailmap.........
46020	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
46040	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
46060	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
46080	30 30 30 32 37 34 30 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 33 33 33 31 00 20 30 00 00 00	0002740.00000000000.013331..0...
460a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
460c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
460e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
46100	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...................
46120	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...................
46140	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
46160	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
46180	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
461a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
461c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
461e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
46200	23 20 4b 65 65 70 20 63 6f 6e 74 65 6e 74 73 20 73 6f 72 74 65 64 20 75 73 69 6e 67 20 27 4d 2d	#.Keep.contents.sorted.using.'M-
46220	78 20 73 6f 72 74 2d 6c 69 6e 65 73 27 2e 0a 23 20 53 65 65 20 27 6d 61 6e 20 35 20 67 69 74 6d	x.sort-lines'..#.See.'man.5.gitm
46240	61 69 6c 6d 61 70 27 20 66 6f 72 20 74 68 65 20 66 69 6c 65 20 66 6f 72 6d 61 74 2e 0a 0a 3c 62	ailmap'.for.the.file.format...<b
46260	61 73 69 6c 40 63 6f 6e 74 6f 76 6f 75 2e 6e 65 74 3e 20 3c 63 6f 6e 74 6f 76 6f 62 40 74 63 64	asil@contovou.net>.<contovob@tcd
46280	2e 69 65 3e 0a 3c 64 69 65 67 6f 61 6d 75 6e 64 6f 40 67 6d 61 69 6c 2e 63 6f 6d 3e 20 3c 74 68	.ie>.<diegoamundo@gmail.com>.<th
462a0	65 72 6f 63 6b 6d 61 6e 64 6f 6c 69 6e 69 73 74 40 75 73 65 72 73 2e 6e 6f 72 65 70 6c 79 2e 67	erockmandolinist@users.noreply.g
462c0	69 74 68 75 62 2e 63 6f 6d 3e 0a 3c 64 75 6e 6e 69 40 67 6e 75 2e 6f 72 67 3e 20 3c 73 63 68 6f	ithub.com>.<dunni@gnu.org>.<scho
462e0	6c 61 72 34 32 40 67 6d 61 69 6c 2e 63 6f 6d 3e 0a 3c 65 76 67 65 6e 79 73 77 40 67 6d 61 69 6c	lar42@gmail.com>.<evgenysw@gmail
46300	2e 63 6f 6d 3e 20 3c 65 76 67 65 6e 69 2e 6b 6f 6c 65 76 40 75 62 65 72 2e 63 6f 6d 3e 0a 3c 67	.com>.<evgeni.kolev@uber.com>.<g
46320	6f 6e 63 61 6c 6f 73 73 61 6e 74 6f 73 39 38 40 67 6d 61 69 6c 2e 63 6f 6d 3e 20 3c 6e 6f 78 40	oncalossantos98@gmail.com>.<nox@
46340	68 61 72 74 6c 65 79 2e 6c 6f 63 61 6c 64 6f 6d 61 69 6e 3e 0a 3c 69 6e 67 6f 2e 6c 6f 68 6d 61	hartley.localdomain>.<ingo.lohma
46360	72 40 70 6f 73 74 65 6f 2e 6e 65 74 3e 20 3c 69 2e 6c 6f 68 6d 61 72 40 67 6d 61 69 6c 2e 63 6f	r@posteo.net>.<i.lohmar@gmail.co
46380	6d 3e 0a 3c 6a 65 61 6e 70 68 69 6c 69 70 70 65 2e 62 65 72 6e 61 72 64 79 40 67 6d 61 69 6c 2e	m>.<jeanphilippe.bernardy@gmail.
463a0	63 6f 6d 3e 20 3c 6a 65 61 6e 2d 70 68 69 6c 69 70 70 65 2e 62 65 72 6e 61 72 64 79 40 74 77 65	com>.<jean-philippe.bernardy@twe
463c0	61 67 2e 69 6f 3e 0a 3c 6c 65 75 6e 67 62 6b 40 70 6f 73 74 65 6f 2e 6e 65 74 3e 20 3c 62 6b 6c	ag.io>.<leungbk@posteo.net>.<bkl
463e0	65 75 6e 67 38 39 40 67 6d 61 69 6c 2e 63 6f 6d 3e 0a 3c 6c 65 75 6e 67 62 6b 40 70 6f 73 74 65	eung89@gmail.com>.<leungbk@poste
46400	6f 2e 6e 65 74 3e 20 3c 6c 65 75 6e 67 62 6b 40 6d 61 69 6c 66 65 6e 63 65 2e 63 6f 6d 3e 0a 3c	o.net>.<leungbk@mailfence.com>.<
46420	6d 65 40 62 63 63 33 32 2e 63 6f 6d 3e 20 3c 61 7a 65 6e 67 40 6a 61 6e 65 73 74 72 65 65 74 2e	me@bcc32.com>.<azeng@janestreet.
46440	63 6f 6d 3e 0a 3c 6d 65 40 72 67 72 69 6e 62 65 72 67 2e 63 6f 6d 3e 20 3c 72 75 64 69 2e 67 72	com>.<me@rgrinberg.com>.<rudi.gr
46460	69 6e 62 65 72 67 40 67 6d 61 69 6c 2e 63 6f 6d 3e 0a 3c 6d 65 40 77 69 6c 66 72 65 64 2e 6d 65	inberg@gmail.com>.<me@wilfred.me
46480	2e 75 6b 3e 20 3c 77 68 75 67 68 65 73 40 61 68 6c 2e 63 6f 6d 3e 0a 3c 6d 75 69 72 40 6d 6e 64	.uk>.<whughes@ahl.com>.<muir@mnd
464a0	2e 72 73 3e 20 3c 6d 75 69 72 2e 6d 61 6e 64 65 72 73 40 67 6d 61 69 6c 2e 63 6f 6d 3e 0a 3c 6d	.rs>.<muir.manders@gmail.com>.<m
464c0	75 69 72 40 6d 6e 64 2e 72 73 3e 20 3c 6d 75 69 72 40 72 65 74 61 69 6c 6e 65 78 74 2e 6e 65 74	uir@mnd.rs>.<muir@retailnext.net
464e0	3e 0a 3c 72 69 63 6f 75 69 6c 6c 65 74 61 66 66 40 67 6d 61 69 6c 2e 63 6f 6d 3e 20 3c 61 64 6d	>.<ricouilletaff@gmail.com>.<adm
46500	69 6e 40 65 72 69 63 64 61 6e 61 6e 2e 6e 65 74 3e 0a 3c 72 69 63 6f 75 69 6c 6c 65 74 61 66 66	in@ericdanan.net>.<ricouilletaff
46520	40 67 6d 61 69 6c 2e 63 6f 6d 3e 20 3c 65 72 69 63 2e 64 61 6e 61 6e 40 75 2d 63 65 72 67 79 2e	@gmail.com>.<eric.danan@u-cergy.
46540	66 72 3e 0a 3c 73 79 6f 68 65 78 40 67 6d 61 69 6c 2e 63 6f 6d 3e 20 3c 73 68 6f 68 65 69 2e 79	fr>.<syohex@gmail.com>.<shohei.y
46560	6f 73 68 69 64 61 40 64 65 6e 61 2e 63 6f 6d 3e 0a 3c 79 77 77 72 79 36 36 40 67 6d 61 69 6c 2e	oshida@dena.com>.<ywwry66@gmail.
46580	63 6f 6d 3e 20 3c 35 38 30 36 36 39 32 35 2b 79 77 77 72 79 36 36 40 75 73 65 72 73 2e 6e 6f 72	com>.<58066925+ywwry66@users.nor
465a0	65 70 6c 79 2e 67 69 74 68 75 62 2e 63 6f 6d 3e 0a 43 68 72 69 73 74 6f 70 68 65 72 20 46 6c 6f	eply.github.com>.Christopher.Flo
465c0	65 73 73 20 3c 63 68 72 69 73 2e 66 6c 6f 65 73 73 40 6d 61 69 6c 62 6f 78 2e 6f 72 67 3e 0a 44	ess.<chris.floess@mailbox.org>.D
465e0	61 61 6e 74 75 72 6f 20 3c 64 61 61 6e 74 75 72 6f 40 67 6d 61 69 6c 2e 63 6f 6d 3e 20 3c 64 61	aanturo.<daanturo@gmail.com>.<da
46600	6e 74 6c 65 2e 76 30 31 40 67 6d 61 69 6c 2e 63 6f 6d 3e 0a 44 69 65 67 6f 20 41 2e 20 4d 75 6e	ntle.v01@gmail.com>.Diego.A..Mun
46620	64 6f 20 3c 64 69 65 67 6f 61 6d 75 6e 64 6f 40 67 6d 61 69 6c 2e 63 6f 6d 3e 0a 45 61 72 6c 20	do.<diegoamundo@gmail.com>.Earl.
46640	48 79 61 74 74 20 3c 6f 6b 61 6d 73 6e 40 70 72 6f 74 6f 6e 6d 61 69 6c 2e 63 6f 6d 3e 20 3c 65	Hyatt.<okamsn@protonmail.com>.<e
46660	6a 33 32 75 40 70 72 6f 74 6f 6e 6d 61 69 6c 2e 63 6f 6d 3e 0a 4a 6f 6e 61 74 68 61 6e 20 48 61	j32u@protonmail.com>.Jonathan.Ha
46680	79 61 73 65 20 3c 50 79 74 68 6f 6e 4e 75 74 40 75 73 65 72 73 2e 6e 6f 72 65 70 6c 79 2e 67 69	yase.<PythonNut@users.noreply.gi
466a0	74 68 75 62 2e 63 6f 6d 3e 0a 4a 75 73 74 69 6e 20 42 75 72 6b 65 74 74 20 3c 6a 75 73 74 69 6e	thub.com>.Justin.Burkett.<justin
466c0	40 62 75 72 6b 65 74 74 2e 63 63 3e 0a 4a c3 a9 72 c3 b4 6d 65 20 4d 2e 20 42 65 72 67 65 72 20	@burkett.cc>.J..r..me.M..Berger.
466e0	3c 6a 65 62 65 72 67 65 72 40 66 72 65 65 2e 66 72 3e 0a 4d 61 6e 75 65 6c 20 55 62 65 72 74 69	<jeberger@free.fr>.Manuel.Uberti
46700	20 3c 6d 61 6e 75 65 6c 2e 75 62 65 72 74 69 40 69 6e 76 65 6e 74 61 74 69 2e 6f 72 67 3e 20 3c	.<manuel.uberti@inventati.org>.<
46720	6d 61 6e 75 65 6c 40 62 6f 63 63 61 70 65 72 74 61 2e 63 6f 6d 3e 0a 4d 6f 68 73 69 6e 20 4b 61	manuel@boccaperta.com>.Mohsin.Ka
46740	6c 65 65 6d 20 3c 6d 6f 68 6b 61 6c 65 40 6b 69 73 61 72 61 2e 6d 6f 65 3e 20 3c 6d 6f 68 6b 61	leem.<mohkale@kisara.moe>.<mohka
46760	6c 73 69 6e 40 67 6d 61 69 6c 2e 63 6f 6d 3e 0a 4e 61 74 68 61 6e 20 4d 6f 72 65 61 75 20 3c 6e	lsin@gmail.com>.Nathan.Moreau.<n
46780	61 74 68 61 6e 2e 6d 6f 72 65 61 75 40 6d 34 78 2e 6f 72 67 3e 0a 54 72 6f 79 20 48 69 6e 63 6b	athan.moreau@m4x.org>.Troy.Hinck
467a0	6c 65 79 20 3c 74 2e 6d 61 63 6d 61 6e 40 67 6d 61 69 6c 2e 63 6f 6d 3e 0a 59 65 76 67 6e 65 6e	ley.<t.macman@gmail.com>.Yevgnen
467c0	20 4b 6f 68 20 3c 77 68 65 72 65 6a 6f 79 73 74 61 72 74 73 40 67 6d 61 69 6c 2e 63 6f 6d 3e 0a	.Koh.<wherejoystarts@gmail.com>.
467e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
46800	63 6f 75 6e 73 65 6c 2d 30 2e 31 35 2e 31 2f 2e 64 69 72 2d 6c 6f 63 61 6c 73 2e 65 6c 00 00 00	counsel-0.15.1/.dir-locals.el...
46820	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
46840	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
46860	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
46880	30 30 30 30 37 34 33 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 33 34 32 00 20 30 00 00 00	0000743.00000000000.014342..0...
468a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
468c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
468e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
46900	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...................
46920	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...................
46940	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
46960	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
46980	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
469a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
469c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
469e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
46a00	3b 3b 3b 20 44 69 72 65 63 74 6f 72 79 20 4c 6f 63 61 6c 20 56 61 72 69 61 62 6c 65 73 0a 3b 3b	;;;.Directory.Local.Variables.;;
46a20	3b 20 46 6f 72 20 6d 6f 72 65 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 73 65 65 20 28 69 6e 66 6f	;.For.more.information.see.(info
46a40	20 22 28 65 6d 61 63 73 29 20 44 69 72 65 63 74 6f 72 79 20 56 61 72 69 61 62 6c 65 73 22 29 0a	."(emacs).Directory.Variables").
46a60	0a 28 28 6e 69 6c 0a 20 20 28 63 6f 70 79 72 69 67 68 74 2d 6e 61 6d 65 73 2d 72 65 67 65 78 70	.((nil...(copyright-names-regexp
46a80	20 2e 20 22 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 49 6e	..."Free.Software.Foundation,.In
46aa0	63 5c 5c 2e 22 29 0a 20 20 28 73 65 6e 74 65 6e 63 65 2d 65 6e 64 2d 64 6f 75 62 6c 65 2d 73 70	c\\.")...(sentence-end-double-sp
46ac0	61 63 65 20 2e 20 74 29 29 0a 20 28 65 6d 61 63 73 2d 6c 69 73 70 2d 6d 6f 64 65 0a 20 20 28 69	ace...t))..(emacs-lisp-mode...(i
46ae0	6e 64 65 6e 74 2d 74 61 62 73 2d 6d 6f 64 65 20 2e 20 6e 69 6c 29 0a 20 20 3b 3b 20 65 78 74 72	ndent-tabs-mode...nil)...;;.extr
46b00	61 20 63 6f 6e 66 69 67 20 68 65 72 65 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f	a.config.here:.https://github.co
46b20	6d 2f 61 62 6f 2d 61 62 6f 2f 6f 72 65 6d 61 63 73 2f 62 6c 6f 62 2f 67 69 74 68 75 62 2f 6d 6f	m/abo-abo/oremacs/blob/github/mo
46b40	64 65 73 2f 6f 72 61 2d 65 6c 69 73 70 2d 73 74 79 6c 65 2d 67 75 69 64 65 2e 65 6c 0a 20 20 3b	des/ora-elisp-style-guide.el...;
46b60	3b 20 28 6c 69 73 70 2d 69 6e 64 65 6e 74 2d 66 75 6e 63 74 69 6f 6e 20 2e 20 63 6f 6d 6d 6f 6e	;.(lisp-indent-function...common
46b80	2d 6c 69 73 70 2d 69 6e 64 65 6e 74 2d 66 75 6e 63 74 69 6f 6e 29 0a 20 20 29 0a 20 28 6d 61 72	-lisp-indent-function)...)..(mar
46ba0	6b 64 6f 77 6e 2d 6d 6f 64 65 0a 20 20 28 66 69 6c 6c 2d 63 6f 6c 75 6d 6e 20 2e 20 37 30 29 29	kdown-mode...(fill-column...70))
46bc0	0a 20 28 6f 72 67 2d 6d 6f 64 65 0a 20 20 28 66 69 6c 6c 2d 63 6f 6c 75 6d 6e 20 2e 20 37 30 29	..(org-mode...(fill-column...70)
46be0	29 29 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	))..............................
46c00	63 6f 75 6e 73 65 6c 2d 30 2e 31 35 2e 31 2f 63 6f 75 6e 73 65 6c 2d 70 6b 67 2e 65 6c 00 00 00	counsel-0.15.1/counsel-pkg.el...
46c20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
46c40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
46c60	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
46c80	30 30 30 30 37 31 33 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 34 35 37 00 20 30 00 00 00	0000713.00000000000.014457..0...
46ca0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
46cc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
46ce0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
46d00	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...................
46d20	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...................
46d40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
46d60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
46d80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
46da0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
46dc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
46de0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
46e00	3b 3b 20 47 65 6e 65 72 61 74 65 64 20 70 61 63 6b 61 67 65 20 64 65 73 63 72 69 70 74 69 6f 6e	;;.Generated.package.description
46e20	20 66 72 6f 6d 20 2e 65 6c 20 20 2d 2a 2d 20 63 6f 75 6e 73 65 6c 6e 6f 2d 62 79 74 65 2d 63 6f	.from..el..-*-.counselno-byte-co
46e40	6d 70 69 6c 65 3a 20 74 20 2d 2a 2d 0a 28 64 65 66 69 6e 65 2d 70 61 63 6b 61 67 65 20 22 63 6f	mpile:.t.-*-.(define-package."co
46e60	75 6e 73 65 6c 22 20 22 30 2e 31 35 2e 31 22 20 22 56 61 72 69 6f 75 73 20 63 6f 6d 70 6c 65 74	unsel"."0.15.1"."Various.complet
46e80	69 6f 6e 20 66 75 6e 63 74 69 6f 6e 73 20 75 73 69 6e 67 20 49 76 79 22 20 27 28 28 65 6d 61 63	ion.functions.using.Ivy".'((emac
46ea0	73 20 22 32 34 2e 35 22 29 20 28 69 76 79 20 22 30 2e 31 35 2e 31 22 29 20 28 73 77 69 70 65 72	s."24.5").(ivy."0.15.1").(swiper
46ec0	20 22 30 2e 31 35 2e 31 22 29 29 20 3a 63 6f 6d 6d 69 74 20 22 37 32 66 34 37 64 34 64 31 65 36	."0.15.1")).:commit."72f47d4d1e6
46ee0	64 63 66 38 39 64 35 39 66 35 61 66 36 35 66 33 36 35 64 64 37 30 34 65 66 65 39 65 35 22 20 3a	dcf89d59f5af65f365dd704efe9e5".:
46f00	61 75 74 68 6f 72 73 20 27 28 28 22 4f 6c 65 68 20 4b 72 65 68 65 6c 22 20 2e 20 22 6f 68 77 6f	authors.'(("Oleh.Krehel"..."ohwo
46f20	65 6f 77 68 6f 40 67 6d 61 69 6c 2e 63 6f 6d 22 29 29 20 3a 6d 61 69 6e 74 61 69 6e 65 72 20 27	eowho@gmail.com")).:maintainer.'
46f40	28 22 42 61 73 69 6c 20 4c 2e 20 43 6f 6e 74 6f 76 6f 75 6e 65 73 69 6f 73 22 20 2e 20 22 62 61	("Basil.L..Contovounesios"..."ba
46f60	73 69 6c 40 63 6f 6e 74 6f 76 6f 75 2e 6e 65 74 22 29 20 3a 6b 65 79 77 6f 72 64 73 20 27 28 22	sil@contovou.net").:keywords.'("
46f80	63 6f 6e 76 65 6e 69 65 6e 63 65 22 20 22 6d 61 74 63 68 69 6e 67 22 20 22 74 6f 6f 6c 73 22 29	convenience"."matching"."tools")
46fa0	20 3a 75 72 6c 20 22 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 61 62 6f 2d 61 62	.:url."https://github.com/abo-ab
46fc0	6f 2f 73 77 69 70 65 72 22 29 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	o/swiper")......................
46fe0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47000	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47020	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47040	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47060	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47080	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
470a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
470c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
470e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47100	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47120	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47140	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47160	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47180	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
471a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
471c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
471e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47200	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47220	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47240	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47260	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47280	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
472a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
472c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
472e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47300	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47320	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47340	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47360	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47380	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
473a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
473c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
473e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47400	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47420	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47440	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47460	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47480	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
474a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
474c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
474e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47500	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47520	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47540	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47560	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47580	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
475a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
475c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
475e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47600	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47620	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47640	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47660	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47680	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
476a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
476c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
476e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47700	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47720	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47740	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47760	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47780	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
477a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
477c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
477e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47800	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47820	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47840	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47860	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47880	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
478a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
478c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
478e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47900	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47920	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47940	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47960	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47980	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
479a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
479c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
479e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47a00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47a20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47a40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47a60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47a80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47aa0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47ac0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47ae0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47b00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47b20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47b40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47b60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47b80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47ba0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47bc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47be0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47c00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47c20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47c40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47c60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47c80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47ca0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47cc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47ce0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47d00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47d20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47d40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47d60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47d80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47da0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47dc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47de0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47e00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47e20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47e40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47e60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47e80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47ea0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47ec0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47ee0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47f00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47f20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47f40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47f60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47f80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47fa0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47fc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
47fe0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48000	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48020	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48040	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48060	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48080	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
480a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
480c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
480e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48100	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48120	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48140	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48160	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48180	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
481a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
481c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
481e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48200	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48220	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48240	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48260	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48280	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
482a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
482c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
482e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48300	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48320	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48340	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48360	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48380	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
483a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
483c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
483e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48400	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48420	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48440	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48460	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48480	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
484a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
484c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
484e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48500	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48520	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48540	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48560	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48580	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
485a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
485c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
485e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48600	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48620	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48640	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48660	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48680	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
486a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
486c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
486e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48700	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48720	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48740	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48760	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
48780	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
487a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
487c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
487e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................