package-build-20250708.1908.tar « .localrepo - dotemacs.git

blob: a9917bdb86a16de16d8b8efc10c8939da291beb8 (plain)

ofs	hex dump	ascii
0000	70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 32 30 32 35 30 37 30 38 2e 31 39 30 38 2f 00 00 00 00	package-build-20250708.1908/....
0020	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
0040	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
0060	00 00 00 00 30 30 30 30 37 35 35 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30	....0000755.0000000.0000000.0000
0080	30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 33 35 31 32 00 20 35 00 00 00	0000000.00000000000.013512..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	70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 32 30 32 35 30 37 30 38 2e 31 39 30 38 2f 70 61 63 6b	package-build-20250708.1908/pack
0220	61 67 65 2d 62 75 69 6c 64 2d 62 61 64 67 65 73 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00	age-build-badges.el.............
0240	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
0260	00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30	....0000644.0000000.0000000.0000
0280	30 30 31 33 30 30 30 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 37 37 34 31 00 20 30 00 00 00	0013000.00000000000.017741..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 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 62 61 64 67 65 73 2e 65 6c 20 2d 2d 2d 20	;;;.package-build-badges.el.---.
0420	43 72 65 61 74 65 20 62 61 64 67 65 73 20 66 6f 72 20 70 61 63 6b 61 67 65 73 20 20 2d 2a 2d 20	Create.badges.for.packages..-*-.
0440	6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 74 3b 20 63 6f 64 69 6e 67 3a 75 74 66 2d 38 20	lexical-binding:t;.coding:utf-8.
0460	2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 31 2d 32 30 32 34 20	-*-..;;.Copyright.(C).2011-2024.
0480	44 6f 6e 61 6c 64 20 45 70 68 72 61 69 6d 20 43 75 72 74 69 73 0a 3b 3b 20 43 6f 70 79 72 69 67	Donald.Ephraim.Curtis.;;.Copyrig
04a0	68 74 20 28 43 29 20 32 30 31 32 2d 32 30 32 34 20 53 74 65 76 65 20 50 75 72 63 65 6c 6c 0a 3b	ht.(C).2012-2024.Steve.Purcell.;
04c0	3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 38 2d 32 30 32 35 20 4a 6f 6e 61 73 20	;.Copyright.(C).2018-2025.Jonas.
04e0	42 65 72 6e 6f 75 6c 6c 69 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 32 31 2d	Bernoulli.;;.Copyright.(C).2021-
0500	32 30 32 33 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 2c 20 49	2023.Free.Software.Foundation,.I
0520	6e 63 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 30 39 20 50 68 69 6c 20 48 61	nc.;;.Copyright.(C).2009.Phil.Ha
0540	67 65 6c 62 65 72 67 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 44 6f 6e 61 6c 64 20 45 70 68 72 61	gelberg..;;.Author:.Donald.Ephra
0560	69 6d 20 43 75 72 74 69 73 20 3c 64 63 75 72 74 69 73 40 6d 69 6c 6b 62 6f 78 2e 6e 65 74 3e 0a	im.Curtis.<dcurtis@milkbox.net>.
0580	3b 3b 20 4d 61 69 6e 74 61 69 6e 65 72 3a 20 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c	;;.Maintainer:.Jonas.Bernoulli.<
05a0	65 6d 61 63 73 2e 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 40 6a 6f 6e 61 73 2e 62 65 72 6e 6f 75	emacs.package-build@jonas.bernou
05c0	6c 6c 69 2e 64 65 76 3e 0a 3b 3b 20 48 6f 6d 65 70 61 67 65 3a 20 68 74 74 70 73 3a 2f 2f 67 69	lli.dev>.;;.Homepage:.https://gi
05e0	74 68 75 62 2e 63 6f 6d 2f 6d 65 6c 70 61 2f 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 0a 3b 3b 20	thub.com/melpa/package-build.;;.
0600	4b 65 79 77 6f 72 64 73 3a 20 6d 61 69 6e 74 20 74 6f 6f 6c 73 0a 0a 3b 3b 20 53 50 44 58 2d 4c	Keywords:.maint.tools..;;.SPDX-L
0620	69 63 65 6e 73 65 2d 49 64 65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61	icense-Identifier:.GPL-3.0-or-la
0640	74 65 72 0a 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61	ter..;;.This.file.is.free.softwa
0660	72 65 3a 20 79 6f 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f	re:.you.can.redistribute.it.and/
0680	6f 72 20 6d 6f 64 69 66 79 0a 3b 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20	or.modify.;;.it.under.the.terms.
06a0	6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73	of.the.GNU.General.Public.Licens
06c0	65 20 61 73 20 70 75 62 6c 69 73 68 65 64 0a 3b 3b 20 62 79 20 74 68 65 20 46 72 65 65 20 53 6f	e.as.published.;;.by.the.Free.So
06e0	66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 6f	ftware.Foundation,.either.versio
0700	6e 20 33 20 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 2c 0a 3b 3b 20 6f 72 20 28 61 74 20 79 6f	n.3.of.the.License,.;;.or.(at.yo
0720	75 72 20 6f 70 74 69 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 3b 3b	ur.option).any.later.version..;;
0740	0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20	.;;.This.file.is.distributed.in.
0760	74 68 65 20 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c	the.hope.that.it.will.be.useful,
0780	0a 3b 3b 20 62 75 74 20 57 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69	.;;.but.WITHOUT.ANY.WARRANTY;.wi
07a0	74 68 6f 75 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20	thout.even.the.implied.warranty.
07c0	6f 66 0a 3b 3b 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53	of.;;.MERCHANTABILITY.or.FITNESS
07e0	20 46 4f 52 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20	.FOR.A.PARTICULAR.PURPOSE...See.
0800	74 68 65 0a 3b 3b 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73	the.;;.GNU.General.Public.Licens
0820	65 20 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 3b 3b 0a 3b 3b 20 59 6f 75 20 73 68	e.for.more.details..;;.;;.You.sh
0840	6f 75 6c 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65	ould.have.received.a.copy.of.the
0860	20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61	.GNU.General.Public.License.;;.a
0880	6c 6f 6e 67 20 77 69 74 68 20 74 68 69 73 20 66 69 6c 65 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65	long.with.this.file...If.not,.se
08a0	65 20 3c 68 74 74 70 73 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f	e.<https://www.gnu.org/licenses/
08c0	3e 2e 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 20 43 72 65 61 74 65 20 62	>...;;;.Commentary:..;;.Create.b
08e0	61 64 67 65 73 20 66 6f 72 20 70 61 63 6b 61 67 65 73 2e 0a 3b 3b 20 54 68 65 20 63 6f 64 65 20	adges.for.packages..;;.The.code.
0900	69 6e 20 74 68 69 73 20 66 69 6c 65 20 77 61 73 20 6c 69 66 74 65 64 20 66 72 6f 6d 20 60 65 6c	in.this.file.was.lifted.from.`el
0920	70 61 2d 61 64 6d 69 6e 27 2e 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 64 65 66 76 61 72 20 70	pa-admin'...;;;.Code:..(defvar.p
0940	61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 62 61 64 67 65 2d 64 61 74 61 29 0a 0a 28 64 65 66 75 6e	ackage-build-badge-data)..(defun
0960	20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 77 72 69 74 65 2d 62 61 64 67 65 2d 69 6d 61 67	.package-build--write-badge-imag
0980	65 20 28 20 6e 61 6d 65 20 76 65 72 73 69 6f 6e 20 74 61 72 67 65 74 2d 64 69 72 0a 20 20 20 20	e.(.name.version.target-dir.....
09a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
09c0	20 20 20 20 20 20 26 6f 70 74 69 6f 6e 61 6c 20 61 72 63 68 69 76 65 20 63 6f 6c 6f 72 29 0a 20	......&optional.archive.color)..
09e0	20 22 4d 61 6b 65 20 62 61 64 67 65 20 73 76 67 20 66 69 6c 65 2e 0a 54 68 69 73 20 69 73 20 65	."Make.badge.svg.file..This.is.e
0a00	73 73 65 6e 74 69 61 6c 6c 79 20 61 20 63 6f 70 79 20 6f 66 20 60 65 6c 70 61 61 2d 2d 6d 61 6b	ssentially.a.copy.of.`elpaa--mak
0a20	65 2d 62 61 64 67 65 27 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 66 69 6c 65 20 28 65 78 70 61 6e	e-badge'."...(let*.((file.(expan
0a40	64 2d 66 69 6c 65 2d 6e 61 6d 65 20 28 63 6f 6e 63 61 74 20 6e 61 6d 65 20 22 2d 62 61 64 67 65	d-file-name.(concat.name."-badge
0a60	2e 73 76 67 22 29 20 74 61 72 67 65 74 2d 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 20 28 6c 65	.svg").target-dir))..........(le
0a80	66 74 20 28 6f 72 20 61 72 63 68 69 76 65 20 28 63 61 72 20 70 61 63 6b 61 67 65 2d 62 75 69 6c	ft.(or.archive.(car.package-buil
0aa0	64 2d 62 61 64 67 65 2d 64 61 74 61 29 20 22 6d 79 45 6c 70 61 22 29 29 0a 20 20 20 20 20 20 20	d-badge-data)."myElpa"))........
0ac0	20 20 28 72 69 67 68 74 20 76 65 72 73 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 28 63 6f 6c 6f	..(right.version)..........(colo
0ae0	72 20 28 6f 72 20 63 6f 6c 6f 72 20 28 63 61 64 72 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d	r.(or.color.(cadr.package-build-
0b00	62 61 64 67 65 2d 64 61 74 61 29 20 22 23 66 66 34 39 31 62 22 29 29 0a 20 20 20 20 20 20 20 20	badge-data)."#ff491b")).........
0b20	20 28 6c 77 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 62 61 64 67 65 2d 2d 73 74 72 69 6e	.(lw.(package-build-badge--strin
0b40	67 2d 77 69 64 74 68 20 6c 65 66 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 72 77 20 28 70 61 63	g-width.left))..........(rw.(pac
0b60	6b 61 67 65 2d 62 75 69 6c 64 2d 62 61 64 67 65 2d 2d 73 74 72 69 6e 67 2d 77 69 64 74 68 20 72	kage-build-badge--string-width.r
0b80	69 67 68 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 70 61 64 20 28 70 61 63 6b 61 67 65 2d 62 75	ight))..........(pad.(package-bu
0ba0	69 6c 64 2d 62 61 64 67 65 2d 2d 73 74 72 69 6e 67 2d 77 69 64 74 68 20 22 78 22 29 29 0a 20 20	ild-badge--string-width."x"))...
0bc0	20 20 20 20 20 20 20 28 77 69 64 74 68 20 28 2f 20 28 2b 20 6c 77 20 72 77 20 28 2a 20 34 20 70	.......(width.(/.(+.lw.rw.(*.4.p
0be0	61 64 29 29 20 31 30 29 29 0a 20 20 20 20 20 20 20 20 20 28 6f 66 66 73 65 74 20 2d 31 30 29 20	ad)).10))..........(offset.-10).
0c00	3b 3b 20 53 6d 61 6c 6c 20 61 6c 69 67 6e 6d 65 6e 74 20 63 6f 72 72 65 63 74 69 6f 6e 0a 20 20	;;.Small.alignment.correction...
0c20	20 20 20 20 20 20 20 28 63 74 78 20 60 28 28 6f 66 66 73 65 74 20 2e 20 2c 6f 66 66 73 65 74 29	.......(ctx.`((offset...,offset)
0c40	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 66 74 20 2e 20 2c 6c 65 66 74 29 0a	.................(left...,left).
0c60	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 69 67 68 74 20 2e 20 2c 72 69 67 68 74 29	................(right...,right)
0c80	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 77 20 2e 20 2c 6c 77 29 0a 20 20 20 20	.................(lw...,lw).....
0ca0	20 20 20 20 20 20 20 20 20 20 20 20 28 72 77 20 2e 20 2c 72 77 29 0a 20 20 20 20 20 20 20 20 20	............(rw...,rw)..........
0cc0	20 20 20 20 20 20 20 28 77 69 64 74 68 20 2e 20 2c 77 69 64 74 68 29 0a 20 20 20 20 20 20 20 20	.......(width...,width).........
0ce0	20 20 20 20 20 20 20 20 28 63 6f 6c 6f 72 20 2e 20 2c 63 6f 6c 6f 72 29 0a 20 20 20 20 20 20 20	........(color...,color)........
0d00	20 20 20 20 20 20 20 20 20 28 70 61 64 20 2e 20 2c 70 61 64 29 29 29 29 0a 20 20 20 20 28 77 69	.........(pad...,pad)))).....(wi
0d20	74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 28 69 6e 73 65 72 74 0a 20 20 20	th-temp-buffer.......(insert....
0d40	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 0a 20 20	....(replace-regexp-in-string...
0d60	20 20 20 20 20 20 22 7b 5c 5c 28 5b 5e 7d 5d 2b 5c 5c 29 7d 22 0a 20 20 20 20 20 20 20 20 28 6c	......"{\$[^}]+\$}".........(l
0d80	61 6d 62 64 61 20 28 73 74 72 29 0a 20 20 20 20 20 20 20 20 20 20 28 75 72 6c 2d 69 6e 73 65 72	ambda.(str)...........(url-inser
0da0	74 2d 65 6e 74 69 74 69 65 73 2d 69 6e 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20	t-entities-in-string............
0dc0	28 66 6f 72 6d 61 74 20 22 25 73 22 20 28 65 76 61 6c 20 28 72 65 61 64 20 28 6d 61 74 63 68 2d	(format."%s".(eval.(read.(match-
0de0	73 74 72 69 6e 67 20 31 20 73 74 72 29 29 20 63 74 78 29 29 29 29 0a 20 20 20 20 20 20 20 20 28	string.1.str)).ctx)))).........(
0e00	65 76 61 6c 2d 77 68 65 6e 2d 63 6f 6d 70 69 6c 65 0a 20 20 20 20 20 20 20 20 20 20 28 72 65 70	eval-when-compile...........(rep
0e20	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 20 20 20	lace-regexp-in-string...........
0e40	20 22 5b 20 5c 74 5c 6e 5d 2b 22 20 22 20 22 0a 20 20 20 20 20 20 20 20 20 20 20 28 72 65 70 6c	."[.\t\n]+"."."............(repl
0e60	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 20 20 20 20	ace-regexp-in-string............
0e80	20 22 27 22 20 22 5c 22 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 22 3c 3f 78 6d 6c 20 76 65 72	."'"."\""............."<?xml.ver
0ea0	73 69 6f 6e 3d 27 31 2e 30 27 3f 3e 0a 3c 73 76 67 20 78 6d 6c 6e 73 3d 27 68 74 74 70 3a 2f 2f	sion='1.0'?>.<svg.xmlns='http://
0ec0	77 77 77 2e 77 33 2e 6f 72 67 2f 32 30 30 30 2f 73 76 67 27 0a 20 20 20 20 20 78 6d 6c 6e 73 3a	www.w3.org/2000/svg'......xmlns:
0ee0	78 6c 69 6e 6b 3d 27 68 74 74 70 3a 2f 2f 77 77 77 2e 77 33 2e 6f 72 67 2f 31 39 39 39 2f 78 6c	xlink='http://www.w3.org/1999/xl
0f00	69 6e 6b 27 0a 20 20 20 20 20 77 69 64 74 68 3d 27 7b 77 69 64 74 68 7d 27 0a 20 20 20 20 20 68	ink'......width='{width}'......h
0f20	65 69 67 68 74 3d 27 32 30 27 0a 20 20 20 20 20 72 6f 6c 65 3d 27 69 6d 67 27 0a 20 20 20 20 20	eight='20'......role='img'......
0f40	61 72 69 61 2d 6c 61 62 65 6c 3d 27 7b 6c 65 66 74 7d 3a 20 7b 72 69 67 68 74 7d 27 3e 0a 20 20	aria-label='{left}:.{right}'>...
0f60	3c 74 69 74 6c 65 3e 7b 6c 65 66 74 7d 3a 20 7b 72 69 67 68 74 7d 3c 2f 74 69 74 6c 65 3e 0a 20	<title>{left}:.{right}</title>..
0f80	20 3c 6c 69 6e 65 61 72 47 72 61 64 69 65 6e 74 20 69 64 3d 27 73 27 20 78 32 3d 27 30 27 20 79	.<linearGradient.id='s'.x2='0'.y
0fa0	32 3d 27 31 30 30 25 27 3e 0a 20 20 20 20 3c 73 74 6f 70 20 6f 66 66 73 65 74 3d 27 30 27 20 73	2='100%'>.....<stop.offset='0'.s
0fc0	74 6f 70 2d 63 6f 6c 6f 72 3d 27 23 62 62 62 27 20 73 74 6f 70 2d 6f 70 61 63 69 74 79 3d 27 2e	top-color='#bbb'.stop-opacity='.
0fe0	31 27 2f 3e 0a 20 20 20 20 3c 73 74 6f 70 20 6f 66 66 73 65 74 3d 27 31 27 20 73 74 6f 70 2d 6f	1'/>.....<stop.offset='1'.stop-o
1000	70 61 63 69 74 79 3d 27 2e 31 27 2f 3e 0a 20 20 3c 2f 6c 69 6e 65 61 72 47 72 61 64 69 65 6e 74	pacity='.1'/>...</linearGradient
1020	3e 0a 20 20 3c 63 6c 69 70 50 61 74 68 20 69 64 3d 27 72 27 3e 0a 20 20 20 20 3c 72 65 63 74 20	>...<clipPath.id='r'>.....<rect.
1040	77 69 64 74 68 3d 27 7b 77 69 64 74 68 7d 27 20 68 65 69 67 68 74 3d 27 32 30 27 20 72 78 3d 27	width='{width}'.height='20'.rx='
1060	33 27 20 66 69 6c 6c 3d 27 23 66 66 66 27 2f 3e 0a 20 20 3c 2f 63 6c 69 70 50 61 74 68 3e 0a 20	3'.fill='#fff'/>...</clipPath>..
1080	20 3c 67 20 63 6c 69 70 2d 70 61 74 68 3d 27 75 72 6c 28 23 72 29 27 3e 0a 20 20 20 20 3c 72 65	.<g.clip-path='url(#r)'>.....<re
10a0	63 74 20 77 69 64 74 68 3d 27 7b 28 2f 20 28 2b 20 6c 77 20 28 2a 20 32 20 70 61 64 29 29 20 31	ct.width='{(/.(+.lw.(*.2.pad)).1
10c0	30 29 7d 27 0a 20 20 20 20 20 20 20 20 20 20 68 65 69 67 68 74 3d 27 32 30 27 20 66 69 6c 6c 3d	0)}'...........height='20'.fill=
10e0	27 23 35 35 35 27 2f 3e 0a 20 20 20 20 3c 72 65 63 74 20 78 3d 27 7b 28 31 2d 20 28 2f 20 28 2b	'#555'/>.....<rect.x='{(1-.(/.(+
1100	20 6c 77 20 28 2a 20 32 20 70 61 64 29 29 20 31 30 29 29 7d 27 0a 20 20 20 20 20 20 20 20 20 20	.lw.(*.2.pad)).10))}'...........
1120	77 69 64 74 68 3d 27 7b 77 69 64 74 68 7d 27 20 68 65 69 67 68 74 3d 27 32 30 27 20 66 69 6c 6c	width='{width}'.height='20'.fill
1140	3d 27 7b 63 6f 6c 6f 72 7d 27 2f 3e 0a 20 20 20 20 3c 72 65 63 74 20 77 69 64 74 68 3d 27 7b 77	='{color}'/>.....<rect.width='{w
1160	69 64 74 68 7d 27 20 68 65 69 67 68 74 3d 27 32 30 27 20 66 69 6c 6c 3d 27 75 72 6c 28 23 73 29	idth}'.height='20'.fill='url(#s)
1180	27 2f 3e 0a 20 20 3c 2f 67 3e 0a 20 20 3c 67 20 66 69 6c 6c 3d 27 23 66 66 66 27 0a 20 20 20 20	'/>...</g>...<g.fill='#fff'.....
11a0	20 74 65 78 74 2d 61 6e 63 68 6f 72 3d 27 6d 69 64 64 6c 65 27 0a 20 20 20 20 20 66 6f 6e 74 2d	.text-anchor='middle'......font-
11c0	66 61 6d 69 6c 79 3d 27 56 65 72 64 61 6e 61 2c 47 65 6e 65 76 61 2c 44 65 6a 61 56 75 20 53 61	family='Verdana,Geneva,DejaVu.Sa
11e0	6e 73 2c 73 61 6e 73 2d 73 65 72 69 66 27 0a 20 20 20 20 20 66 6f 6e 74 2d 73 69 7a 65 3d 27 31	ns,sans-serif'......font-size='1
1200	31 30 27 0a 20 20 20 20 20 74 65 78 74 2d 72 65 6e 64 65 72 69 6e 67 3d 27 67 65 6f 6d 65 74 72	10'......text-rendering='geometr
1220	69 63 50 72 65 63 69 73 69 6f 6e 27 3e 0a 20 20 20 20 3c 74 65 78 74 20 61 72 69 61 2d 68 69 64	icPrecision'>.....<text.aria-hid
1240	64 65 6e 3d 27 74 72 75 65 27 0a 20 20 20 20 20 20 20 20 20 20 78 3d 27 7b 28 2b 20 28 2f 20 6c	den='true'...........x='{(+.(/.l
1260	77 20 32 29 20 70 61 64 20 6f 66 66 73 65 74 29 7d 27 0a 20 20 20 20 20 20 20 20 20 20 79 3d 27	w.2).pad.offset)}'...........y='
1280	31 35 30 27 0a 20 20 20 20 20 20 20 20 20 20 66 69 6c 6c 3d 27 23 30 31 30 31 30 31 27 20 66 69	150'...........fill='#010101'.fi
12a0	6c 6c 2d 6f 70 61 63 69 74 79 3d 27 2e 33 27 0a 20 20 20 20 20 20 20 20 20 20 74 72 61 6e 73 66	ll-opacity='.3'...........transf
12c0	6f 72 6d 3d 27 73 63 61 6c 65 28 2e 31 29 27 20 74 65 78 74 4c 65 6e 67 74 68 3d 27 7b 6c 77 7d	orm='scale(.1)'.textLength='{lw}
12e0	27 3e 7b 6c 65 66 74 7d 3c 2f 74 65 78 74 3e 0a 20 20 20 20 3c 74 65 78 74 20 78 3d 27 7b 28 2b	'>{left}</text>.....<text.x='{(+
1300	20 28 2f 20 6c 77 20 32 29 20 70 61 64 20 6f 66 66 73 65 74 29 7d 27 0a 20 20 20 20 20 20 20 20	.(/.lw.2).pad.offset)}'.........
1320	20 20 79 3d 27 31 34 30 27 20 74 72 61 6e 73 66 6f 72 6d 3d 27 73 63 61 6c 65 28 2e 31 29 27 0a	..y='140'.transform='scale(.1)'.
1340	20 20 20 20 20 20 20 20 20 20 66 69 6c 6c 3d 27 23 66 66 66 27 0a 20 20 20 20 20 20 20 20 20 20	..........fill='#fff'...........
1360	74 65 78 74 4c 65 6e 67 74 68 3d 27 7b 6c 77 7d 27 3e 7b 6c 65 66 74 7d 3c 2f 74 65 78 74 3e 0a	textLength='{lw}'>{left}</text>.
1380	20 20 20 20 3c 74 65 78 74 20 61 72 69 61 2d 68 69 64 64 65 6e 3d 27 74 72 75 65 27 0a 20 20 20	....<text.aria-hidden='true'....
13a0	20 20 20 20 20 20 20 78 3d 27 7b 28 2b 20 6c 77 20 28 2f 20 72 77 20 32 29 20 28 2a 20 33 20 70	.......x='{(+.lw.(/.rw.2).(*.3.p
13c0	61 64 29 20 6f 66 66 73 65 74 29 7d 27 0a 20 20 20 20 20 20 20 20 20 20 79 3d 27 31 35 30 27 0a	ad).offset)}'...........y='150'.
13e0	20 20 20 20 20 20 20 20 20 20 66 69 6c 6c 3d 27 23 30 31 30 31 30 31 27 20 20 66 69 6c 6c 2d 6f	..........fill='#010101'..fill-o
1400	70 61 63 69 74 79 3d 27 2e 33 27 0a 20 20 20 20 20 20 20 20 20 20 74 72 61 6e 73 66 6f 72 6d 3d	pacity='.3'...........transform=
1420	27 73 63 61 6c 65 28 2e 31 29 27 20 74 65 78 74 4c 65 6e 67 74 68 3d 27 7b 72 77 7d 27 3e 7b 72	'scale(.1)'.textLength='{rw}'>{r
1440	69 67 68 74 7d 3c 2f 74 65 78 74 3e 0a 20 20 20 20 3c 74 65 78 74 20 78 3d 27 7b 28 2b 20 6c 77	ight}</text>.....<text.x='{(+.lw
1460	20 28 2f 20 72 77 20 32 29 20 28 2a 20 33 20 70 61 64 29 20 6f 66 66 73 65 74 29 7d 27 0a 20 20	.(/.rw.2).(*.3.pad).offset)}'...
1480	20 20 20 20 20 20 20 20 79 3d 27 31 34 30 27 0a 20 20 20 20 20 20 20 20 20 20 74 72 61 6e 73 66	........y='140'...........transf
14a0	6f 72 6d 3d 27 73 63 61 6c 65 28 2e 31 29 27 0a 20 20 20 20 20 20 20 20 20 20 66 69 6c 6c 3d 27	orm='scale(.1)'...........fill='
14c0	23 66 66 66 27 20 74 65 78 74 4c 65 6e 67 74 68 3d 27 7b 72 77 7d 27 3e 7b 72 69 67 68 74 7d 3c	#fff'.textLength='{rw}'>{right}<
14e0	2f 74 65 78 74 3e 0a 20 20 3c 2f 67 3e 0a 3c 2f 73 76 67 3e 22 29 29 29 29 29 0a 20 20 20 20 20	/text>...</g>.</svg>")))))......
1500	20 28 77 72 69 74 65 2d 72 65 67 69 6f 6e 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 20 28 70 6f 69 6e	.(write-region.(point-min).(poin
1520	74 2d 6d 61 78 29 20 66 69 6c 65 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d	t-max).file))))..(defun.package-
1540	62 75 69 6c 64 2d 62 61 64 67 65 2d 2d 73 74 72 69 6e 67 2d 77 69 64 74 68 20 28 73 74 72 29 0a	build-badge--string-width.(str).
1560	20 20 22 44 65 74 65 72 6d 69 6e 65 20 73 74 72 69 6e 67 20 77 69 64 74 68 20 69 6e 20 70 69 78	.."Determine.string.width.in.pix
1580	65 6c 73 20 6f 66 20 53 54 52 2e 22 0a 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72	els.of.STR."...(with-temp-buffer
15a0	0a 20 20 20 20 3b 3b 20 49 6d 61 67 65 4d 61 67 69 63 6b 20 37 2e 31 2e 30 20 6f 72 20 6c 61 74	.....;;.ImageMagick.7.1.0.or.lat
15c0	65 72 20 72 65 71 75 69 72 65 73 20 75 73 69 6e 67 20 74 68 65 20 22 6d 61 67 69 63 6b 22 20 64	er.requires.using.the."magick".d
15e0	72 69 76 65 72 2c 0a 20 20 20 20 3b 3b 20 72 61 74 68 65 72 20 74 68 61 6e 20 22 63 6f 6e 76 65	river,.....;;.rather.than."conve
1600	72 74 22 20 64 69 72 65 63 74 6c 79 2c 20 62 75 74 20 44 65 62 69 61 6e 20 64 6f 65 73 6e 27 74	rt".directly,.but.Debian.doesn't
1620	20 70 72 6f 76 69 64 65 20 69 74 0a 20 20 20 20 3b 3b 20 79 65 74 20 28 32 30 32 31 29 2e 0a 20	.provide.it.....;;.yet.(2021)...
1640	20 20 20 28 6c 65 74 20 28 28 61 72 67 73 20 60 28 2c 40 28 69 66 20 28 65 78 65 63 75 74 61 62	...(let.((args.`(,@(if.(executab
1660	6c 65 2d 66 69 6e 64 20 22 6d 61 67 69 63 6b 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	le-find."magick")...............
1680	20 20 20 20 20 20 20 20 20 20 27 28 22 6d 61 67 69 63 6b 22 20 22 63 6f 6e 76 65 72 74 22 29 0a	..........'("magick"."convert").
16a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 28 22 63 6f 6e 76 65 72 74	......................'("convert
16c0	22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2d 64 65 62 75 67 22 20 22	"))..................."-debug"."
16e0	61 6e 6e 6f 74 61 74 65 22 20 22 78 63 3a 22 20 22 2d 66 6f 6e 74 22 20 22 44 65 6a 61 56 75 2d	annotate"."xc:"."-font"."DejaVu-
1700	53 61 6e 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2d 70 6f 69 6e 74 73	Sans"..................."-points
1720	69 7a 65 22 20 22 31 31 30 22 20 22 2d 61 6e 6e 6f 74 61 74 65 22 20 22 30 22 20 2c 73 74 72 20	ize"."110"."-annotate"."0".,str.
1740	22 6e 75 6c 6c 3a 22 29 29 29 0a 20 20 20 20 20 20 28 61 70 70 6c 79 20 23 27 63 61 6c 6c 2d 70	"null:"))).......(apply.#'call-p
1760	72 6f 63 65 73 73 20 28 63 61 72 20 61 72 67 73 29 20 6e 69 6c 20 74 20 6e 69 6c 20 28 64 65 6c	rocess.(car.args).nil.t.nil.(del
1780	71 20 6e 69 6c 20 28 63 64 72 20 61 72 67 73 29 29 29 0a 20 20 20 20 20 20 28 67 6f 74 6f 2d 63	q.nil.(cdr.args))).......(goto-c
17a0	68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20 20 20 28 69 66 20 28 6e 6f 74 20	har.(point-min)).......(if.(not.
17c0	28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 4d 65 74 72 69 63 73 3a 2e 2a 3f 77	(re-search-forward."Metrics:.*?w
17e0	69 64 74 68 3a 20 5c 5c 28 5b 30 2d 39 5d 2b 5c 5c 29 22 29 29 0a 20 20 20 20 20 20 20 20 20 20	idth:.\$[0-9]+\$"))...........
1800	28 65 72 72 6f 72 20 22 43 6f 75 6c 64 20 6e 6f 74 20 64 65 74 65 72 6d 69 6e 65 20 73 74 72 69	(error."Could.not.determine.stri
1820	6e 67 20 77 69 64 74 68 22 29 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 77 69 64 74 68 20	ng.width").........(let.((width.
1840	28 73 74 72 69 6e 67 2d 74 6f 2d 6e 75 6d 62 65 72 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20	(string-to-number.(match-string.
1860	31 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 54 68 69 73 20 74 65 73 74 20 61 69 6d	1))))...........;;.This.test.aim
1880	73 20 74 6f 20 63 61 74 63 68 20 74 68 65 20 63 61 73 65 20 77 68 65 72 65 20 74 68 65 20 66 6f	s.to.catch.the.case.where.the.fo
18a0	6e 74 20 69 73 20 6d 69 73 73 69 6e 67 2c 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 62 75 74 20	nt.is.missing,...........;;.but.
18c0	69 74 20 73 65 65 6d 73 20 69 74 20 6f 6e 6c 79 20 77 6f 72 6b 73 20 69 6e 20 73 6f 6d 65 20 63	it.seems.it.only.works.in.some.c
18e0	61 73 65 73 20 3a 2d 28 0a 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 61 6e 64 20 28 3e 20 28	ases.:-(...........(if.(and.(>.(
1900	73 74 72 69 6e 67 2d 77 69 64 74 68 20 73 74 72 29 20 30 29 20 28 6e 6f 74 20 28 3e 20 77 69 64	string-width.str).0).(not.(>.wid
1920	74 68 20 30 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 20 28 6d 65	th.0)))...............(progn.(me
1940	73 73 61 67 65 20 22 63 6f 6e 76 65 72 74 3a 5c 6e 25 73 22 20 28 62 75 66 66 65 72 2d 73 74 72	ssage."convert:\n%s".(buffer-str
1960	69 6e 67 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 72 72 6f	ing))......................(erro
1980	72 20 22 43 6f 75 6c 64 20 6e 6f 74 20 64 65 74 65 72 6d 69 6e 65 20 73 74 72 69 6e 67 20 77 69	r."Could.not.determine.string.wi
19a0	64 74 68 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 77 69 64 74 68 29 29 29 29 29 29 0a 0a	dth")).............width))))))..
19c0	28 70 72 6f 76 69 64 65 20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 62 61 64 67 65 73 29 0a	(provide.'package-build-badges).
19e0	3b 3b 3b 20 70 61 63 6b 61 67 65 2d 62 61 64 67 65 73 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a	;;;.package-badges.el.ends.here.
1a00	70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 32 30 32 35 30 37 30 38 2e 31 39 30 38 2f 70 61 63 6b	package-build-20250708.1908/pack
1a20	61 67 65 2d 62 75 69 6c 64 2d 70 6b 67 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	age-build-pkg.el................
1a40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a60	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
1a80	30 30 30 31 32 35 34 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 37 33 30 35 00 20 30 00 00 00	0001254.00000000000.017305..0...
1aa0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1ac0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1ae0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b00	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...................
1b20	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...................
1b40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1ba0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1bc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1be0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1c00	3b 3b 20 2d 2a 2d 20 6e 6f 2d 62 79 74 65 2d 63 6f 6d 70 69 6c 65 3a 20 74 3b 20 6c 65 78 69 63	;;.-*-.no-byte-compile:.t;.lexic
1c20	61 6c 2d 62 69 6e 64 69 6e 67 3a 20 6e 69 6c 20 2d 2a 2d 0a 28 64 65 66 69 6e 65 2d 70 61 63 6b	al-binding:.nil.-*-.(define-pack
1c40	61 67 65 20 22 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 22 20 22 32 30 32 35 30 37 30 38 2e 31 39	age."package-build"."20250708.19
1c60	30 38 22 0a 20 20 22 54 6f 6f 6c 73 20 66 6f 72 20 61 73 73 65 6d 62 6c 69 6e 67 20 61 20 70 61	08"..."Tools.for.assembling.a.pa
1c80	63 6b 61 67 65 20 61 72 63 68 69 76 65 2e 22 0a 20 20 27 28 28 65 6d 61 63 73 20 20 22 32 36 2e	ckage.archive."...'((emacs.."26.
1ca0	31 22 29 0a 20 20 20 20 28 63 6f 6d 70 61 74 20 22 33 30 2e 30 2e 30 2e 30 22 29 29 0a 20 20 3a	1").....(compat."30.0.0.0"))...:
1cc0	75 72 6c 20 22 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 6d 65 6c 70 61 2f 70 61	url."https://github.com/melpa/pa
1ce0	63 6b 61 67 65 2d 62 75 69 6c 64 22 0a 20 20 3a 63 6f 6d 6d 69 74 20 22 37 39 66 62 62 62 39 64	ckage-build"...:commit."79fbbb9d
1d00	66 33 61 34 64 66 61 39 66 62 37 61 33 66 35 34 37 62 36 66 31 39 38 32 66 64 65 35 30 38 62 62	f3a4dfa9fb7a3f547b6f1982fde508bb
1d20	22 0a 20 20 3a 72 65 76 64 65 73 63 20 22 37 39 66 62 62 62 39 64 66 33 61 34 22 0a 20 20 3a 6b	"...:revdesc."79fbbb9df3a4"...:k
1d40	65 79 77 6f 72 64 73 20 27 28 22 6d 61 69 6e 74 22 20 22 74 6f 6f 6c 73 22 29 0a 20 20 3a 61 75	eywords.'("maint"."tools")...:au
1d60	74 68 6f 72 73 20 27 28 28 22 44 6f 6e 61 6c 64 20 45 70 68 72 61 69 6d 20 43 75 72 74 69 73 22	thors.'(("Donald.Ephraim.Curtis"
1d80	20 2e 20 22 64 63 75 72 74 69 73 40 6d 69 6c 6b 62 6f 78 2e 6e 65 74 22 29 0a 20 20 20 20 20 20	..."dcurtis@milkbox.net").......
1da0	20 20 20 20 20 20 20 28 22 53 74 65 76 65 20 50 75 72 63 65 6c 6c 22 20 2e 20 22 73 74 65 76 65	.......("Steve.Purcell"..."steve
1dc0	40 73 61 6e 69 74 79 69 6e 63 2e 63 6f 6d 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 22	@sanityinc.com")..............("
1de0	4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 22 20 2e 20 22 65 6d 61 63 73 2e 70 61 63 6b 61 67	Jonas.Bernoulli"..."emacs.packag
1e00	65 2d 62 75 69 6c 64 40 6a 6f 6e 61 73 2e 62 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 22 29 0a 20 20	e-build@jonas.bernoulli.dev")...
1e20	20 20 20 20 20 20 20 20 20 20 20 28 22 50 68 69 6c 20 48 61 67 65 6c 62 65 72 67 22 20 2e 20 22	...........("Phil.Hagelberg"..."
1e40	74 65 63 68 6e 6f 6d 61 6e 63 79 40 67 6d 61 69 6c 2e 63 6f 6d 22 29 29 0a 20 20 3a 6d 61 69 6e	technomancy@gmail.com"))...:main
1e60	74 61 69 6e 65 72 73 20 27 28 28 22 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 22 20 2e 20 22	tainers.'(("Jonas.Bernoulli"..."
1e80	65 6d 61 63 73 2e 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 40 6a 6f 6e 61 73 2e 62 65 72 6e 6f 75	emacs.package-build@jonas.bernou
1ea0	6c 6c 69 2e 64 65 76 22 29 29 29 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	lli.dev"))).....................
1ec0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1ee0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1f00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1f20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1f40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1f60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1f80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1fa0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1fc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1fe0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
2000	70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 32 30 32 35 30 37 30 38 2e 31 39 30 38 2f 70 61 63 6b	package-build-20250708.1908/pack
2020	61 67 65 2d 62 75 69 6c 64 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	age-build.el....................
2040	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
2060	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
2080	30 32 34 33 36 32 30 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 36 35 33 33 00 20 30 00 00 00	0243620.00000000000.016533..0...
20a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
20c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
20e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
2100	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...................
2120	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...................
2140	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
2160	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
2180	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
21a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
21c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
21e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
2200	3b 3b 3b 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2e 65 6c 20 2d 2d 2d 20 54 6f 6f 6c 73 20 66	;;;.package-build.el.---.Tools.f
2220	6f 72 20 61 73 73 65 6d 62 6c 69 6e 67 20 61 20 70 61 63 6b 61 67 65 20 61 72 63 68 69 76 65 20	or.assembling.a.package.archive.
2240	20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 74 3b 20 63 6f 64 69 6e 67 3a 75	.-*-.lexical-binding:t;.coding:u
2260	74 66 2d 38 20 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 31 2d	tf-8.-*-..;;.Copyright.(C).2011-
2280	32 30 32 34 20 44 6f 6e 61 6c 64 20 45 70 68 72 61 69 6d 20 43 75 72 74 69 73 0a 3b 3b 20 43 6f	2024.Donald.Ephraim.Curtis.;;.Co
22a0	70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 32 2d 32 30 32 34 20 53 74 65 76 65 20 50 75 72 63	pyright.(C).2012-2024.Steve.Purc
22c0	65 6c 6c 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 36 2d 32 30 32 35 20 4a	ell.;;.Copyright.(C).2016-2025.J
22e0	6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20	onas.Bernoulli.;;.Copyright.(C).
2300	32 30 30 39 20 50 68 69 6c 20 48 61 67 65 6c 62 65 72 67 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20	2009.Phil.Hagelberg..;;.Author:.
2320	44 6f 6e 61 6c 64 20 45 70 68 72 61 69 6d 20 43 75 72 74 69 73 20 3c 64 63 75 72 74 69 73 40 6d	Donald.Ephraim.Curtis.<dcurtis@m
2340	69 6c 6b 62 6f 78 2e 6e 65 74 3e 0a 3b 3b 20 20 20 20 20 53 74 65 76 65 20 50 75 72 63 65 6c 6c	ilkbox.net>.;;.....Steve.Purcell
2360	20 3c 73 74 65 76 65 40 73 61 6e 69 74 79 69 6e 63 2e 63 6f 6d 3e 0a 3b 3b 20 20 20 20 20 4a 6f	.<steve@sanityinc.com>.;;.....Jo
2380	6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 70 61 63 6b 61 67 65 2d 62 75 69	nas.Bernoulli.<emacs.package-bui
23a0	6c 64 40 6a 6f 6e 61 73 2e 62 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 3b 3b 20 20 20 20 20 50	ld@jonas.bernoulli.dev>.;;.....P
23c0	68 69 6c 20 48 61 67 65 6c 62 65 72 67 20 3c 74 65 63 68 6e 6f 6d 61 6e 63 79 40 67 6d 61 69 6c	hil.Hagelberg.<technomancy@gmail
23e0	2e 63 6f 6d 3e 0a 3b 3b 20 4d 61 69 6e 74 61 69 6e 65 72 3a 20 4a 6f 6e 61 73 20 42 65 72 6e 6f	.com>.;;.Maintainer:.Jonas.Berno
2400	75 6c 6c 69 20 3c 65 6d 61 63 73 2e 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 40 6a 6f 6e 61 73 2e	ulli.<emacs.package-build@jonas.
2420	62 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 3b 3b 20 48 6f 6d 65 70 61 67 65 3a 20 68 74 74 70	bernoulli.dev>.;;.Homepage:.http
2440	73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 6d 65 6c 70 61 2f 70 61 63 6b 61 67 65 2d 62 75 69	s://github.com/melpa/package-bui
2460	6c 64 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 6d 61 69 6e 74 20 74 6f 6f 6c 73 0a 0a 3b 3b 20	ld.;;.Keywords:.maint.tools..;;.
2480	50 61 63 6b 61 67 65 2d 56 65 72 73 69 6f 6e 3a 20 32 30 32 35 30 37 30 38 2e 31 39 30 38 0a 3b	Package-Version:.20250708.1908.;
24a0	3b 20 50 61 63 6b 61 67 65 2d 52 65 76 69 73 69 6f 6e 3a 20 37 39 66 62 62 62 39 64 66 33 61 34	;.Package-Revision:.79fbbb9df3a4
24c0	0a 3b 3b 20 50 61 63 6b 61 67 65 2d 52 65 71 75 69 72 65 73 3a 20 28 28 65 6d 61 63 73 20 22 32	.;;.Package-Requires:.((emacs."2
24e0	36 2e 31 22 29 20 28 63 6f 6d 70 61 74 20 22 33 30 2e 30 2e 30 2e 30 22 29 29 0a 0a 3b 3b 20 53	6.1").(compat."30.0.0.0"))..;;.S
2500	50 44 58 2d 4c 69 63 65 6e 73 65 2d 49 64 65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d	PDX-License-Identifier:.GPL-3.0-
2520	6f 72 2d 6c 61 74 65 72 0a 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 66 72 65 65 20 73	or-later..;;.This.file.is.free.s
2540	6f 66 74 77 61 72 65 3a 20 79 6f 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74	oftware:.you.can.redistribute.it
2560	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 65 20 74	.and/or.modify.;;.it.under.the.t
2580	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 63 20 4c	erms.of.the.GNU.General.Public.L
25a0	69 63 65 6e 73 65 20 61 73 20 70 75 62 6c 69 73 68 65 64 0a 3b 3b 20 62 79 20 74 68 65 20 46 72	icense.as.published.;;.by.the.Fr
25c0	65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76	ee.Software.Foundation,.either.v
25e0	65 72 73 69 6f 6e 20 33 20 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 2c 0a 3b 3b 20 6f 72 20 28	ersion.3.of.the.License,.;;.or.(
2600	61 74 20 79 6f 75 72 20 6f 70 74 69 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f	at.your.option).any.later.versio
2620	6e 2e 0a 3b 3b 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 64 69 73 74 72 69 62 75 74 65	n..;;.;;.This.file.is.distribute
2640	64 20 69 6e 20 74 68 65 20 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73	d.in.the.hope.that.it.will.be.us
2660	65 66 75 6c 2c 0a 3b 3b 20 62 75 74 20 57 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54	eful,.;;.but.WITHOUT.ANY.WARRANT
2680	59 3b 20 77 69 74 68 6f 75 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72	Y;.without.even.the.implied.warr
26a0	61 6e 74 79 20 6f 66 0a 3b 3b 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49	anty.of.;;.MERCHANTABILITY.or.FI
26c0	54 4e 45 53 53 20 46 4f 52 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20	TNESS.FOR.A.PARTICULAR.PURPOSE..
26e0	20 53 65 65 20 74 68 65 0a 3b 3b 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c	.See.the.;;.GNU.General.Public.L
2700	69 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 3b 3b 0a 3b 3b 20 59	icense.for.more.details..;;.;;.Y
2720	6f 75 20 73 68 6f 75 6c 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f	ou.should.have.received.a.copy.o
2740	66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65	f.the.GNU.General.Public.License
2760	0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 74 68 20 74 68 69 73 20 66 69 6c 65 2e 20 20 49 66 20 6e 6f	.;;.along.with.this.file...If.no
2780	74 2c 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 6c 69 63 65	t,.see.<https://www.gnu.org/lice
27a0	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 20 54 68 69	nses/>...;;;.Commentary:..;;.Thi
27c0	73 20 66 69 6c 65 20 61 6c 6c 6f 77 73 20 61 20 63 75 72 61 74 6f 72 20 74 6f 20 70 75 62 6c 69	s.file.allows.a.curator.to.publi
27e0	73 68 20 61 6e 20 61 72 63 68 69 76 65 20 6f 66 20 45 6d 61 63 73 20 70 61 63 6b 61 67 65 73 2e	sh.an.archive.of.Emacs.packages.
2800	0a 0a 3b 3b 20 54 68 65 20 61 72 63 68 69 76 65 20 69 73 20 67 65 6e 65 72 61 74 65 64 20 66 72	..;;.The.archive.is.generated.fr
2820	6f 6d 20 61 20 73 65 74 20 6f 66 20 72 65 63 69 70 65 73 2c 20 77 68 69 63 68 20 64 65 73 63 72	om.a.set.of.recipes,.which.descr
2840	69 62 65 20 65 6c 69 73 70 0a 3b 3b 20 70 72 6f 6a 65 63 74 73 20 61 6e 64 20 72 65 70 6f 73 69	ibe.elisp.;;.projects.and.reposi
2860	74 6f 72 69 65 73 20 66 72 6f 6d 20 77 68 69 63 68 20 74 6f 20 67 65 74 20 74 68 65 6d 2e 20 20	tories.from.which.to.get.them...
2880	54 68 65 20 74 65 72 6d 20 22 70 61 63 6b 61 67 65 22 0a 3b 3b 20 68 65 72 65 20 69 73 20 75 73	The.term."package".;;.here.is.us
28a0	65 64 20 74 6f 20 6d 65 61 6e 20 61 20 73 70 65 63 69 66 69 63 20 76 65 72 73 69 6f 6e 20 6f 66	ed.to.mean.a.specific.version.of
28c0	20 61 20 70 72 6f 6a 65 63 74 20 74 68 61 74 20 69 73 20 70 72 65 70 61 72 65 64 0a 3b 3b 20 66	.a.project.that.is.prepared.;;.f
28e0	6f 72 20 64 6f 77 6e 6c 6f 61 64 20 61 6e 64 20 69 6e 73 74 61 6c 6c 61 74 69 6f 6e 2e 0a 0a 3b	or.download.and.installation...;
2900	3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 63 6c 2d 6c 69 62 29 0a 28 72 65 71	;;.Code:..(require.'cl-lib).(req
2920	75 69 72 65 20 27 63 6f 6d 70 61 74 20 6e 69 6c 20 74 29 0a 28 72 65 71 75 69 72 65 20 27 66 6f	uire.'compat.nil.t).(require.'fo
2940	72 6d 61 74 2d 73 70 65 63 29 0a 28 72 65 71 75 69 72 65 20 27 70 63 61 73 65 29 0a 28 72 65 71	rmat-spec).(require.'pcase).(req
2960	75 69 72 65 20 27 73 75 62 72 2d 78 29 0a 0a 28 72 65 71 75 69 72 65 20 27 70 61 63 6b 61 67 65	uire.'subr-x)..(require.'package
2980	29 0a 28 72 65 71 75 69 72 65 20 27 6c 69 73 70 2d 6d 6e 74 29 0a 28 72 65 71 75 69 72 65 20 27	).(require.'lisp-mnt).(require.'
29a0	6a 73 6f 6e 29 0a 0a 28 72 65 71 75 69 72 65 20 27 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 29	json)..(require.'package-recipe)
29c0	0a 28 72 65 71 75 69 72 65 20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 62 61 64 67 65 73 29	.(require.'package-build-badges)
29e0	0a 0a 3b 3b 3b 20 4f 70 74 69 6f 6e 73 0a 0a 28 64 65 66 76 61 72 20 70 61 63 6b 61 67 65 2d 62	..;;;.Options..(defvar.package-b
2a00	75 69 6c 64 2d 2d 6d 65 6c 70 61 2d 62 61 73 65 0a 20 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69	uild--melpa-base...(file-name-di
2a20	72 65 63 74 6f 72 79 0a 20 20 20 28 64 69 72 65 63 74 6f 72 79 2d 66 69 6c 65 2d 6e 61 6d 65 0a	rectory....(directory-file-name.
2a40	20 20 20 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 28 6f 72 20 6c 6f 61	....(file-name-directory.(or.loa
2a60	64 2d 66 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 29 29 29	d-file-name.(buffer-file-name)))
2a80	29 29 29 0a 0a 28 64 65 66 67 72 6f 75 70 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 20 6e 69 6c	)))..(defgroup.package-build.nil
2aa0	0a 20 20 22 54 6f 6f 6c 73 20 66 6f 72 20 62 75 69 6c 64 69 6e 67 20 70 61 63 6b 61 67 65 2e 65	..."Tools.for.building.package.e
2ac0	6c 2d 63 6f 6d 70 6c 69 61 6e 74 20 70 61 63 6b 61 67 65 73 20 66 72 6f 6d 20 75 70 73 74 72 65	l-compliant.packages.from.upstre
2ae0	61 6d 20 73 6f 75 72 63 65 20 63 6f 64 65 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 64 65 76 65 6c	am.source.code."...:group.'devel
2b00	6f 70 6d 65 6e 74 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 70 61 63 6b 61 67 65 2d 62 75 69 6c	opment)..(defcustom.package-buil
2b20	64 2d 77 6f 72 6b 69 6e 67 2d 64 69 72 0a 20 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d	d-working-dir...(expand-file-nam
2b40	65 20 22 77 6f 72 6b 69 6e 67 2f 22 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 6d 65 6c 70	e."working/".package-build--melp
2b60	61 2d 62 61 73 65 29 0a 20 20 22 44 69 72 65 63 74 6f 72 79 20 69 6e 20 77 68 69 63 68 20 74 6f	a-base)..."Directory.in.which.to
2b80	20 6b 65 65 70 20 63 68 65 63 6b 6f 75 74 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 70 61 63 6b	.keep.checkouts."...:group.'pack
2ba0	61 67 65 2d 62 75 69 6c 64 0a 20 20 3a 74 79 70 65 20 27 73 74 72 69 6e 67 29 0a 0a 28 64 65 66	age-build...:type.'string)..(def
2bc0	63 75 73 74 6f 6d 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 61 72 63 68 69 76 65 2d 64 69 72	custom.package-build-archive-dir
2be0	0a 20 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 70 61 63 6b 61 67 65 73 2f 22	...(expand-file-name."packages/"
2c00	20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 6d 65 6c 70 61 2d 62 61 73 65 29 0a 20 20 22 44	.package-build--melpa-base)..."D
2c20	69 72 65 63 74 6f 72 79 20 69 6e 20 77 68 69 63 68 20 74 6f 20 6b 65 65 70 20 63 6f 6d 70 69 6c	irectory.in.which.to.keep.compil
2c40	65 64 20 61 72 63 68 69 76 65 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 70 61 63 6b 61 67 65 2d	ed.archives."...:group.'package-
2c60	62 75 69 6c 64 0a 20 20 3a 74 79 70 65 20 27 73 74 72 69 6e 67 29 0a 0a 28 64 65 66 63 75 73 74	build...:type.'string)..(defcust
2c80	6f 6d 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 72 65 63 69 70 65 73 2d 64 69 72 0a 20 20 28	om.package-build-recipes-dir...(
2ca0	65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 72 65 63 69 70 65 73 2f 22 20 70 61 63 6b	expand-file-name."recipes/".pack
2cc0	61 67 65 2d 62 75 69 6c 64 2d 2d 6d 65 6c 70 61 2d 62 61 73 65 29 0a 20 20 22 44 69 72 65 63 74	age-build--melpa-base)..."Direct
2ce0	6f 72 79 20 63 6f 6e 74 61 69 6e 69 6e 67 20 72 65 63 69 70 65 20 66 69 6c 65 73 2e 22 0a 20 20	ory.containing.recipe.files."...
2d00	3a 67 72 6f 75 70 20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 0a 20 20 3a 74 79 70 65 20 27 73	:group.'package-build...:type.'s
2d20	74 72 69 6e 67 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64	tring)..(defcustom.package-build
2d40	2d 76 65 72 62 6f 73 65 20 74 0a 20 20 22 57 68 65 6e 20 6e 6f 6e 2d 6e 69 6c 2c 20 74 68 65 6e	-verbose.t..."When.non-nil,.then
2d60	20 70 72 69 6e 74 20 61 64 64 69 74 69 6f 6e 61 6c 20 70 72 6f 67 72 65 73 73 20 69 6e 66 6f 72	.print.additional.progress.infor
2d80	6d 61 74 69 6f 6e 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64	mation."...:group.'package-build
2da0	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 74 6f 6d 20 70	...:type.'boolean)..(defcustom.p
2dc0	61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 73 74 61 62 6c 65 20 6e 69 6c 0a 20 20 22 57 68 65 74 68	ackage-build-stable.nil..."Wheth
2de0	65 72 20 74 6f 20 62 75 69 6c 64 20 72 65 6c 65 61 73 65 20 6f 72 20 73 6e 61 70 73 68 6f 74 20	er.to.build.release.or.snapshot.
2e00	70 61 63 6b 61 67 65 73 2e 0a 0a 49 66 20 6e 69 6c 2c 20 73 6e 61 70 73 68 6f 74 20 70 61 63 6b	packages...If.nil,.snapshot.pack
2e20	61 67 65 73 20 61 72 65 20 62 75 69 6c 64 2c 20 6f 74 68 65 72 77 69 73 65 20 72 65 6c 65 61 73	ages.are.build,.otherwise.releas
2e40	65 20 70 61 63 6b 61 67 65 73 0a 61 72 65 20 62 75 69 6c 64 2e 20 20 60 70 61 63 6b 61 67 65 2d	e.packages.are.build...`package-
2e60	62 75 69 6c 64 2d 73 6e 61 70 73 68 6f 74 2d 76 65 72 73 69 6f 6e 2d 66 75 6e 63 74 69 6f 6e 73	build-snapshot-version-functions
2e80	27 20 61 6e 64 2f 6f 72 0a 60 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 72 65 6c 65 61 73 65 2d	'.and/or.`package-build-release-
2ea0	76 65 72 73 69 6f 6e 2d 66 75 6e 63 74 69 6f 6e 73 27 20 61 72 65 20 75 73 65 64 20 74 6f 20 64	version-functions'.are.used.to.d
2ec0	65 74 65 72 6d 69 6e 65 0a 74 68 65 20 61 70 70 72 6f 70 72 69 61 74 65 20 76 65 72 73 69 6f 6e	etermine.the.appropriate.version
2ee0	20 66 6f 72 20 65 61 63 68 20 70 61 63 6b 61 67 65 20 61 6e 64 20 68 6f 77 20 74 68 65 20 76 65	.for.each.package.and.how.the.ve
2f00	72 73 69 6f 6e 0a 73 74 72 69 6e 67 20 69 73 20 66 6f 72 6d 61 74 74 65 64 2e 22 0a 20 20 3a 67	rsion.string.is.formatted."...:g
2f20	72 6f 75 70 20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f	roup.'package-build...:type.'boo
2f40	6c 65 61 6e 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d	lean)..(defcustom.package-build-
2f60	61 6c 6c 2d 70 75 62 6c 69 73 68 61 62 6c 65 20 28 6e 6f 74 20 70 61 63 6b 61 67 65 2d 62 75 69	all-publishable.(not.package-bui
2f80	6c 64 2d 73 74 61 62 6c 65 29 0a 20 20 22 57 68 65 74 68 65 72 20 65 76 65 6e 20 70 61 63 6b 61	ld-stable)..."Whether.even.packa
2fa0	67 65 73 20 74 68 61 74 20 6c 61 63 6b 20 61 20 72 65 6c 65 61 73 65 20 63 61 6e 20 62 65 20 70	ges.that.lack.a.release.can.be.p
2fc0	75 62 6c 69 73 68 65 64 2e 0a 0a 54 68 69 73 20 6f 70 74 69 6f 6e 20 69 73 20 75 73 65 64 20 74	ublished...This.option.is.used.t
2fe0	6f 20 64 65 74 65 72 6d 69 6e 65 20 77 68 65 74 68 65 72 20 66 61 69 6c 75 72 65 20 74 6f 20 63	o.determine.whether.failure.to.c
3000	6f 6d 65 20 75 70 20 77 69 74 68 0a 61 20 76 65 72 73 69 6f 6e 20 73 74 72 69 6e 67 20 73 68 6f	ome.up.with.a.version.string.sho
3020	75 6c 64 20 62 65 20 63 6f 6e 73 69 64 65 72 65 64 20 61 6e 20 65 72 72 6f 72 20 6f 72 20 6e 6f	uld.be.considered.an.error.or.no
3040	74 2e 0a 0a 43 75 72 72 65 6e 74 6c 79 20 74 68 69 73 20 64 65 66 61 75 6c 74 73 20 74 6f 20 28	t...Currently.this.defaults.to.(
3060	6e 6f 74 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 73 74 61 62 6c 65 29 2c 20 62 75 74 20 74	not.package-build-stable),.but.t
3080	68 65 0a 64 65 66 61 75 6c 74 20 69 73 20 6c 69 6b 65 6c 79 20 74 6f 20 62 65 20 63 68 61 6e 67	he.default.is.likely.to.be.chang
30a0	65 64 20 74 6f 20 6a 75 73 74 20 74 20 69 6e 20 74 68 65 20 66 75 74 75 72 65 2e 20 20 53 65 65	ed.to.just.t.in.the.future...See
30c0	0a 61 6c 73 6f 20 74 68 65 20 63 6f 6d 6d 69 74 20 74 68 61 74 20 61 64 64 65 64 20 74 68 69 73	.also.the.commit.that.added.this
30e0	20 6f 70 74 69 6f 6e 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c	.option."...:group.'package-buil
3100	64 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 0a 20 20 3a 73 65 74 2d 61 66 74 65 72 20	d...:type.'boolean...:set-after.
3120	27 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 73 74 61 62 6c 65 29 29 0a 0a 28 6d 61 6b 65 2d	'(package-build-stable))..(make-
3140	6f 62 73 6f 6c 65 74 65 2d 76 61 72 69 61 62 6c 65 20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64	obsolete-variable.'package-build
3160	2d 67 65 74 2d 76 65 72 73 69 6f 6e 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20	-get-version-function...........
3180	20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 73 74 61	..............'package-build-sta
31a0	62 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 22 50 61 63	ble........................."Pac
31c0	6b 61 67 65 2d 42 75 69 6c 64 20 35 2e 30 2e 30 22 29 0a 28 64 65 66 76 61 72 20 70 61 63 6b 61	kage-Build.5.0.0").(defvar.packa
31e0	67 65 2d 62 75 69 6c 64 2d 67 65 74 2d 76 65 72 73 69 6f 6e 2d 66 75 6e 63 74 69 6f 6e 20 6e 69	ge-build-get-version-function.ni
3200	6c 0a 20 20 22 54 68 69 73 20 76 61 72 69 61 62 6c 65 20 69 73 20 6f 62 73 6f 6c 65 74 65 20 61	l..."This.variable.is.obsolete.a
3220	6e 64 20 69 74 73 20 76 61 6c 75 65 20 73 68 6f 75 6c 64 20 62 65 20 6e 69 6c 2e 0a 49 66 20 74	nd.its.value.should.be.nil..If.t
3240	68 69 73 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 74 68 65 6e 20 69 74 20 6f 76 65 72 72 69 64 65	his.is.non-nil,.then.it.override
3260	73 0a 60 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 72 65 6c 65 61 73 65 2d 76 65 72 73 69 6f 6e	s.`package-build-release-version
3280	2d 66 75 6e 63 74 69 6f 6e 73 27 20 61 6e 64 0a 60 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 73	-functions'.and.`package-build-s
32a0	6e 61 70 73 68 6f 74 2d 76 65 72 73 69 6f 6e 2d 66 75 6e 63 74 69 6f 6e 73 27 2e 22 29 0a 0a 28	napshot-version-functions'.")..(
32c0	64 65 66 63 75 73 74 6f 6d 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 72 65 6c 65 61 73 65 2d	defcustom.package-build-release-
32e0	76 65 72 73 69 6f 6e 2d 66 75 6e 63 74 69 6f 6e 73 0a 20 20 28 6c 69 73 74 20 23 27 70 61 63 6b	version-functions...(list.#'pack
3300	61 67 65 2d 62 75 69 6c 64 2d 74 61 67 2d 76 65 72 73 69 6f 6e 29 0a 20 20 22 46 75 6e 63 74 69	age-build-tag-version)..."Functi
3320	6f 6e 73 20 75 73 65 64 20 74 6f 20 64 65 74 65 72 6d 69 6e 65 20 74 68 65 20 63 75 72 72 65 6e	ons.used.to.determine.the.curren
3340	74 20 72 65 6c 65 61 73 65 20 6f 66 20 61 20 70 61 63 6b 61 67 65 2e 0a 0a 45 61 63 68 20 66 75	t.release.of.a.package...Each.fu
3360	6e 63 74 69 6f 6e 20 69 73 20 63 61 6c 6c 65 64 20 69 6e 20 6f 72 64 65 72 2c 20 77 69 74 68 20	nction.is.called.in.order,.with.
3380	74 68 65 20 72 65 63 69 70 65 20 6f 62 6a 65 63 74 20 61 73 20 61 72 67 75 6d 65 6e 74 2c 0a 75	the.recipe.object.as.argument,.u
33a0	6e 74 69 6c 20 6f 6e 65 20 72 65 74 75 72 6e 73 20 6e 6f 6e 2d 6e 69 6c 2e 20 20 54 68 65 20 72	ntil.one.returns.non-nil...The.r
33c0	65 74 75 72 6e 65 64 20 76 61 6c 75 65 20 6d 75 73 74 20 68 61 76 65 20 74 68 65 20 66 6f 72 6d	eturned.value.must.have.the.form
33e0	0a 5c 28 43 4f 4d 4d 49 54 20 54 49 4d 45 20 56 45 52 53 49 4f 4e 20 52 45 56 44 45 53 43 20 5b	.\(COMMIT.TIME.VERSION.REVDESC.[
3400	54 41 47 5d 29 2c 20 77 68 65 72 65 20 43 4f 4d 4d 49 54 20 69 73 20 74 68 65 20 68 61 73 68 20	TAG]),.where.COMMIT.is.the.hash.
3420	6f 66 20 74 68 65 0a 63 6f 6d 6d 69 74 20 63 68 6f 73 65 6e 20 62 79 20 74 68 65 20 66 75 6e 63	of.the.commit.chosen.by.the.func
3440	74 69 6f 6e 2c 20 54 49 4d 45 20 69 73 20 69 74 73 20 63 6f 6d 6d 69 74 74 65 72 20 64 61 74 65	tion,.TIME.is.its.committer.date
3460	2c 20 56 45 52 53 49 4f 4e 20 69 73 0a 74 68 65 20 76 65 72 73 69 6f 6e 20 73 74 72 69 6e 67 20	,.VERSION.is.the.version.string.
3480	63 68 6f 73 65 6e 20 66 6f 72 20 43 4f 4d 4d 49 54 2c 20 61 6e 64 20 52 45 56 44 45 53 43 20 69	chosen.for.COMMIT,.and.REVDESC.i
34a0	73 20 61 20 72 65 70 72 65 73 65 6e 74 61 74 69 6f 6e 0a 6f 66 20 43 4f 4d 4d 49 54 2e 20 20 49	s.a.representation.of.COMMIT...I
34c0	66 20 61 20 74 61 67 20 77 61 73 20 69 6e 76 6f 6c 76 65 20 69 6e 20 64 65 74 65 72 6d 69 6e 69	f.a.tag.was.involve.in.determini
34e0	6e 67 20 74 68 65 20 76 65 72 73 69 6f 6e 2c 20 74 68 65 6e 20 54 41 47 0a 69 73 20 74 68 61 74	ng.the.version,.then.TAG.is.that
3500	20 74 61 67 20 61 6e 64 20 52 45 56 44 45 53 43 20 63 6f 6e 74 61 69 6e 73 20 74 68 61 74 20 74	.tag.and.REVDESC.contains.that.t
3520	61 67 20 61 6e 64 20 61 6e 20 61 62 62 72 65 76 69 61 74 65 64 20 63 6f 6d 6d 69 74 0a 68 61 73	ag.and.an.abbreviated.commit.has
3540	68 2e 20 20 49 66 20 54 41 47 20 65 78 61 63 74 6c 79 20 6d 61 74 63 68 65 73 20 43 4f 4d 4d 49	h...If.TAG.exactly.matches.COMMI
3560	54 2c 20 74 68 65 6e 20 52 45 56 44 45 53 43 20 69 73 20 6a 75 73 74 20 74 68 61 74 20 54 41 47	T,.then.REVDESC.is.just.that.TAG
3580	2e 0a 4f 74 68 65 72 77 69 73 65 20 69 66 20 6e 6f 20 74 61 67 20 77 61 73 20 69 6e 76 6f 6c 76	..Otherwise.if.no.tag.was.involv
35a0	65 64 20 74 68 65 6e 20 54 41 47 20 69 73 20 6f 6d 69 74 74 65 64 20 61 6e 64 20 52 45 56 44 45	ed.then.TAG.is.omitted.and.REVDE
35c0	53 43 20 69 73 0a 61 6e 20 61 62 62 72 65 76 69 61 74 69 6f 6e 20 6f 66 20 43 4f 4d 4d 49 54 2e	SC.is.an.abbreviation.of.COMMIT.
35e0	0a 0a 49 66 20 6f 62 73 6f 6c 65 74 65 20 60 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 67 65 74	..If.obsolete.`package-build-get
3600	2d 76 65 72 73 69 6f 6e 2d 66 75 6e 63 74 69 6f 6e 27 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 0a 74	-version-function'.is.non-nil,.t
3620	68 65 6e 20 74 68 61 74 20 6f 76 65 72 72 69 64 65 73 20 74 68 65 20 76 61 6c 75 65 20 73 65 74	hen.that.overrides.the.value.set
3640	20 68 65 72 65 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 0a	.here."...:group.'package-build.
3660	20 20 3a 74 79 70 65 20 27 68 6f 6f 6b 0a 20 20 3a 6f 70 74 69 6f 6e 73 20 28 6c 69 73 74 20 23	..:type.'hook...:options.(list.#
3680	27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 74 61 67 2d 76 65 72 73 69 6f 6e 0a 20 20 20 20 20	'package-build-tag-version......
36a0	20 20 20 20 20 20 20 20 20 20 20 20 23 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 68 65 61 64	............#'package-build-head
36c0	65 72 2d 76 65 72 73 69 6f 6e 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 70 61 63 6b 61 67 65	er-version))..(defcustom.package
36e0	2d 62 75 69 6c 64 2d 73 6e 61 70 73 68 6f 74 2d 76 65 72 73 69 6f 6e 2d 66 75 6e 63 74 69 6f 6e	-build-snapshot-version-function
3700	73 0a 20 20 28 6c 69 73 74 20 23 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 74 69 6d 65 73 74	s...(list.#'package-build-timest
3720	61 6d 70 2d 76 65 72 73 69 6f 6e 29 0a 20 20 22 46 75 6e 63 74 69 6f 6e 20 75 73 65 64 20 74 6f	amp-version)..."Function.used.to
3740	20 64 65 74 65 72 6d 69 6e 65 20 74 68 65 20 63 75 72 72 65 6e 74 20 73 6e 61 70 73 68 6f 74 20	.determine.the.current.snapshot.
3760	6f 66 20 61 20 70 61 63 6b 61 67 65 2e 0a 0a 45 61 63 68 20 66 75 6e 63 74 69 6f 6e 20 69 73 20	of.a.package...Each.function.is.
3780	63 61 6c 6c 65 64 20 69 6e 20 6f 72 64 65 72 2c 20 77 69 74 68 20 74 68 65 20 72 65 63 69 70 65	called.in.order,.with.the.recipe
37a0	20 6f 62 6a 65 63 74 20 61 73 20 61 72 67 75 6d 65 6e 74 2c 0a 75 6e 74 69 6c 20 6f 6e 65 20 72	.object.as.argument,.until.one.r
37c0	65 74 75 72 6e 73 20 6e 6f 6e 2d 6e 69 6c 2e 20 20 54 68 65 20 72 65 74 75 72 6e 65 64 20 76 61	eturns.non-nil...The.returned.va
37e0	6c 75 65 20 6d 75 73 74 20 68 61 76 65 20 74 68 65 20 66 6f 72 6d 0a 5c 28 43 4f 4d 4d 49 54 20	lue.must.have.the.form.\(COMMIT.
3800	54 49 4d 45 20 56 45 52 53 49 4f 4e 20 52 45 56 44 45 53 43 20 5b 54 41 47 5d 29 2c 20 77 68 65	TIME.VERSION.REVDESC.[TAG]),.whe
3820	72 65 20 43 4f 4d 4d 49 54 20 69 73 20 74 68 65 20 68 61 73 68 20 6f 66 20 74 68 65 0a 63 6f 6d	re.COMMIT.is.the.hash.of.the.com
3840	6d 69 74 20 63 68 6f 73 65 6e 20 62 79 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 2c 20 54 49 4d 45	mit.chosen.by.the.function,.TIME
3860	20 69 73 20 69 74 73 20 63 6f 6d 6d 69 74 74 65 72 20 64 61 74 65 2c 20 56 45 52 53 49 4f 4e 20	.is.its.committer.date,.VERSION.
3880	69 73 0a 74 68 65 20 76 65 72 73 69 6f 6e 20 73 74 72 69 6e 67 20 63 68 6f 73 65 6e 20 66 6f 72	is.the.version.string.chosen.for
38a0	20 43 4f 4d 4d 49 54 2c 20 61 6e 64 20 52 45 56 44 45 53 43 20 69 73 20 61 20 72 65 70 72 65 73	.COMMIT,.and.REVDESC.is.a.repres
38c0	65 6e 74 61 74 69 6f 6e 0a 6f 66 20 43 4f 4d 4d 49 54 2e 20 20 49 66 20 61 20 74 61 67 20 77 61	entation.of.COMMIT...If.a.tag.wa
38e0	73 20 69 6e 76 6f 6c 76 65 20 69 6e 20 64 65 74 65 72 6d 69 6e 69 6e 67 20 74 68 65 20 76 65 72	s.involve.in.determining.the.ver
3900	73 69 6f 6e 2c 20 74 68 65 6e 20 54 41 47 0a 69 73 20 74 68 61 74 20 74 61 67 20 61 6e 64 20 52	sion,.then.TAG.is.that.tag.and.R
3920	45 56 44 45 53 43 20 63 6f 6e 74 61 69 6e 73 20 74 68 61 74 20 74 61 67 20 61 6e 64 20 61 6e 20	EVDESC.contains.that.tag.and.an.
3940	61 62 62 72 65 76 69 61 74 65 64 20 63 6f 6d 6d 69 74 0a 68 61 73 68 2e 20 20 49 66 20 54 41 47	abbreviated.commit.hash...If.TAG
3960	20 65 78 61 63 74 6c 79 20 6d 61 74 63 68 65 73 20 43 4f 4d 4d 49 54 2c 20 74 68 65 6e 20 52 45	.exactly.matches.COMMIT,.then.RE
3980	56 44 45 53 43 20 69 73 20 6a 75 73 74 20 74 68 61 74 20 54 41 47 2e 0a 4f 74 68 65 72 77 69 73	VDESC.is.just.that.TAG..Otherwis
39a0	65 20 69 66 20 6e 6f 20 74 61 67 20 77 61 73 20 69 6e 76 6f 6c 76 65 64 20 74 68 65 6e 20 54 41	e.if.no.tag.was.involved.then.TA
39c0	47 20 69 73 20 6f 6d 69 74 74 65 64 20 61 6e 64 20 52 45 56 44 45 53 43 20 69 73 0a 61 6e 20 61	G.is.omitted.and.REVDESC.is.an.a
39e0	62 62 72 65 76 69 61 74 69 6f 6e 20 6f 66 20 43 4f 4d 4d 49 54 2e 0a 0a 53 6f 6d 65 20 6f 66 20	bbreviation.of.COMMIT...Some.of.
3a00	74 68 65 20 66 75 6e 63 74 69 6f 6e 73 20 74 68 61 74 20 72 65 74 75 72 6e 20 73 6e 61 70 73 68	the.functions.that.return.snapsh
3a20	6f 74 20 76 65 72 73 69 6f 6e 73 2c 20 69 6e 74 65 72 6e 61 6c 6c 79 0a 75 73 65 20 60 70 61 63	ot.versions,.internally.use.`pac
3a40	6b 61 67 65 2d 62 75 69 6c 64 2d 72 65 6c 65 61 73 65 2d 76 65 72 73 69 6f 6e 2d 66 75 6e 63 74	kage-build-release-version-funct
3a60	69 6f 6e 73 27 20 74 6f 20 64 65 74 65 72 6d 69 6e 65 20 74 68 65 0a 63 75 72 72 65 6e 74 20 72	ions'.to.determine.the.current.r
3a80	65 6c 65 61 73 65 2c 20 77 68 69 63 68 20 74 68 65 79 20 75 73 65 20 61 73 20 70 61 72 74 20 6f	elease,.which.they.use.as.part.o
3aa0	66 20 74 68 65 20 72 65 74 75 72 6e 65 64 20 56 45 52 53 49 4f 4e 2e 0a 0a 49 66 20 6f 62 73 6f	f.the.returned.VERSION...If.obso
3ac0	6c 65 74 65 20 60 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 67 65 74 2d 76 65 72 73 69 6f 6e 2d	lete.`package-build-get-version-
3ae0	66 75 6e 63 74 69 6f 6e 27 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 0a 74 68 65 6e 20 74 68 61 74 20	function'.is.non-nil,.then.that.
3b00	6f 76 65 72 72 69 64 65 73 20 74 68 65 20 76 61 6c 75 65 20 73 65 74 20 68 65 72 65 2e 22 0a 20	overrides.the.value.set.here."..
3b20	20 3a 67 72 6f 75 70 20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 0a 20 20 3a 74 79 70 65 20 27	.:group.'package-build...:type.'
3b40	68 6f 6f 6b 0a 20 20 3a 6f 70 74 69 6f 6e 73 20 28 6c 69 73 74 20 23 27 70 61 63 6b 61 67 65 2d	hook...:options.(list.#'package-
3b60	62 75 69 6c 64 2d 72 65 6c 65 61 73 65 2b 63 6f 75 6e 74 2d 76 65 72 73 69 6f 6e 0a 20 20 20 20	build-release+count-version.....
3b80	20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 72 65 6c	.............#'package-build-rel
3ba0	65 61 73 65 2b 74 69 6d 65 73 74 61 6d 70 2d 76 65 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20	ease+timestamp-version..........
3bc0	20 20 20 20 20 20 20 20 23 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 74 69 6d 65 73 74 61 6d	........#'package-build-timestam
3be0	70 2d 76 65 72 73 69 6f 6e 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 70 61 63 6b 61 67 65 2d	p-version))..(defcustom.package-
3c00	62 75 69 6c 64 2d 70 72 65 64 69 63 61 74 65 2d 66 75 6e 63 74 69 6f 6e 20 6e 69 6c 0a 20 20 22	build-predicate-function.nil..."
3c20	50 72 65 64 69 63 61 74 65 20 75 73 65 64 20 62 79 20 60 70 61 63 6b 61 67 65 2d 62 75 69 6c 64	Predicate.used.by.`package-build
3c40	2d 61 6c 6c 27 20 74 6f 20 64 65 74 65 72 6d 69 6e 65 20 77 68 69 63 68 20 70 61 63 6b 61 67 65	-all'.to.determine.which.package
3c60	73 20 74 6f 20 62 75 69 6c 64 2e 0a 49 66 20 6e 6f 6e 2d 6e 69 6c 2c 20 74 68 69 73 20 66 75 6e	s.to.build..If.non-nil,.this.fun
3c80	63 74 69 6f 6e 20 69 73 20 63 61 6c 6c 65 64 20 77 69 74 68 20 74 68 65 20 72 65 63 69 70 65 20	ction.is.called.with.the.recipe.
3ca0	6f 62 6a 65 63 74 20 61 73 0a 61 72 67 75 6d 65 6e 74 2c 20 61 6e 64 20 6d 75 73 74 20 72 65 74	object.as.argument,.and.must.ret
3cc0	75 72 6e 20 6e 6f 6e 2d 6e 69 6c 20 69 66 20 74 68 65 20 70 61 63 6b 61 67 65 20 69 73 20 74 6f	urn.non-nil.if.the.package.is.to
3ce0	20 62 65 20 62 75 69 6c 64 2e 0a 49 66 20 6e 69 6c 20 28 74 68 65 20 64 65 66 61 75 6c 74 29 2c	.be.build..If.nil.(the.default),
3d00	20 74 68 65 6e 20 61 6c 6c 20 70 61 63 6b 61 67 65 73 20 61 72 65 20 62 75 69 6c 64 2e 22 0a 20	.then.all.packages.are.build."..
3d20	20 3a 67 72 6f 75 70 20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 0a 20 20 3a 74 79 70 65 20 27	.:group.'package-build...:type.'
3d40	28 63 68 6f 69 63 65 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 62 75 69 6c 64 20 61 6c 6c 22 29	(choice.(const.:tag."build.all")
3d60	20 66 75 6e 63 74 69 6f 6e 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 70 61 63 6b 61 67 65 2d	.function))..(defcustom.package-
3d80	62 75 69 6c 64 2d 62 75 69 6c 64 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 23 27 70 61 63 6b 61 67 65	build-build-function...#'package
3da0	2d 62 75 69 6c 64 2d 2d 62 75 69 6c 64 2d 70 61 63 6b 61 67 65 0a 20 20 22 4c 6f 77 2d 6c 65 76	-build--build-package..."Low-lev
3dc0	65 6c 20 66 75 6e 63 74 69 6f 6e 20 75 73 65 64 20 74 6f 20 62 75 69 6c 64 20 61 20 70 61 63 6b	el.function.used.to.build.a.pack
3de0	61 67 65 2e 0a 0a 54 68 65 20 64 65 66 61 75 6c 74 2c 20 60 70 61 63 6b 61 67 65 2d 62 75 69 6c	age...The.default,.`package-buil
3e00	64 2d 2d 62 75 69 6c 64 2d 70 61 63 6b 61 67 65 27 2c 20 65 78 74 72 61 63 74 73 20 6d 65 74 61	d--build-package',.extracts.meta
3e20	64 61 74 61 20 66 72 6f 6d 0a 74 68 65 20 6c 69 62 72 61 72 79 20 77 68 6f 73 65 20 6e 61 6d 65	data.from.the.library.whose.name
3e40	20 6d 61 74 63 68 65 73 20 74 68 65 20 6e 61 6d 65 20 6f 66 20 74 68 65 20 70 61 63 6b 61 67 65	.matches.the.name.of.the.package
3e60	2c 20 61 6e 64 20 63 72 65 61 74 65 73 0a 61 20 74 61 72 62 61 6c 6c 2c 20 63 6f 6e 74 61 69 6e	,.and.creates.a.tarball,.contain
3e80	69 6e 67 20 61 74 20 6c 65 61 73 74 20 74 68 61 74 20 6c 69 62 72 61 72 79 20 61 6e 64 20 5c 22	ing.at.least.that.library.and.\"
3ea0	4e 41 4d 45 2d 70 6b 67 2e 65 6c 5c 22 2c 20 77 68 69 63 68 0a 69 73 20 67 65 6e 65 72 61 74 65	NAME-pkg.el\",.which.is.generate
3ec0	64 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 0a 20 20 3a 74	d."...:group.'package-build...:t
3ee0	79 70 65 20 27 28 63 68 6f 69 63 65 20 28 63 6f 6e 73 74 20 70 61 63 6b 61 67 65 2d 62 75 69 6c	ype.'(choice.(const.package-buil
3f00	64 2d 2d 62 75 69 6c 64 2d 70 61 63 6b 61 67 65 29 20 66 75 6e 63 74 69 6f 6e 29 29 0a 0a 28 64	d--build-package).function))..(d
3f20	65 66 63 75 73 74 6f 6d 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 72 75 6e 2d 72 65 63 69 70	efcustom.package-build-run-recip
3f40	65 2d 6f 72 67 2d 65 78 70 6f 72 74 73 20 6e 69 6c 0a 20 20 22 57 68 65 74 68 65 72 20 74 6f 20	e-org-exports.nil..."Whether.to.
3f60	65 78 70 6f 72 74 20 74 68 65 20 66 69 6c 65 73 20 6c 69 73 74 65 64 20 69 6e 20 74 68 65 20 60	export.the.files.listed.in.the.`
3f80	3a 6f 72 67 2d 65 78 70 6f 72 74 73 27 20 72 65 63 69 70 65 20 73 6c 6f 74 2e 0a 4e 6f 74 65 20	:org-exports'.recipe.slot..Note.
3fa0	74 68 61 74 20 4d 65 6c 70 61 20 6c 65 61 76 65 73 20 74 68 69 73 20 64 69 73 61 62 6c 65 64 2e	that.Melpa.leaves.this.disabled.
3fc0	22 0a 20 20 3a 67 72 6f 75 70 20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 0a 20 20 3a 74 79 70	"...:group.'package-build...:typ
3fe0	65 20 27 62 6f 6f 6c 65 61 6e 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 70 61 63 6b 61 67 65 2d	e.'boolean)..(defcustom.package-
4000	62 75 69 6c 64 2d 72 75 6e 2d 72 65 63 69 70 65 2d 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e 64 20 6e	build-run-recipe-shell-command.n
4020	69 6c 0a 20 20 22 57 68 65 74 68 65 72 20 74 6f 20 72 75 6e 20 74 68 65 20 73 68 65 6c 6c 20 63	il..."Whether.to.run.the.shell.c
4040	6f 6d 6d 61 6e 64 20 66 72 6f 6d 20 74 68 65 20 60 3a 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e 64 27	ommand.from.the.`:shell-command'
4060	20 72 65 63 69 70 65 20 73 6c 6f 74 2e 0a 4e 6f 74 65 20 74 68 61 74 20 4d 65 6c 70 61 20 6c 65	.recipe.slot..Note.that.Melpa.le
4080	61 76 65 73 20 74 68 69 73 20 64 69 73 61 62 6c 65 64 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 70	aves.this.disabled."...:group.'p
40a0	61 63 6b 61 67 65 2d 62 75 69 6c 64 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 29 0a 0a	ackage-build...:type.'boolean)..
40c0	28 64 65 66 63 75 73 74 6f 6d 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 72 75 6e 2d 72 65 63	(defcustom.package-build-run-rec
40e0	69 70 65 2d 6d 61 6b 65 2d 74 61 72 67 65 74 73 20 6e 69 6c 0a 20 20 22 57 68 65 74 68 65 72 20	ipe-make-targets.nil..."Whether.
4100	74 6f 20 72 75 6e 20 74 68 65 20 6d 61 6b 65 20 74 61 72 67 65 74 73 20 66 72 6f 6d 20 74 68 65	to.run.the.make.targets.from.the
4120	20 60 3a 6d 61 6b 65 2d 74 61 72 67 65 74 73 27 20 72 65 63 69 70 65 20 73 6c 6f 74 2e 0a 4e 6f	.`:make-targets'.recipe.slot..No
4140	74 65 20 74 68 61 74 20 4d 65 6c 70 61 20 6c 65 61 76 65 73 20 74 68 69 73 20 64 69 73 61 62 6c	te.that.Melpa.leaves.this.disabl
4160	65 64 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 0a 20 20 3a	ed."...:group.'package-build...:
4180	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 70 61 63 6b 61	type.'boolean)..(defcustom.packa
41a0	67 65 2d 62 75 69 6c 64 2d 74 69 6d 65 6f 75 74 2d 65 78 65 63 75 74 61 62 6c 65 20 22 74 69 6d	ge-build-timeout-executable."tim
41c0	65 6f 75 74 22 0a 20 20 22 50 61 74 68 20 74 6f 20 61 20 47 4e 55 20 63 6f 72 65 75 74 69 6c 73	eout"..."Path.to.a.GNU.coreutils
41e0	20 5c 22 74 69 6d 65 6f 75 74 5c 22 20 63 6f 6d 6d 61 6e 64 20 69 66 20 61 76 61 69 6c 61 62 6c	.\"timeout\".command.if.availabl
4200	65 2e 0a 54 68 69 73 20 6d 75 73 74 20 62 65 20 61 20 76 65 72 73 69 6f 6e 20 77 68 69 63 68 20	e..This.must.be.a.version.which.
4220	73 75 70 70 6f 72 74 73 20 74 68 65 20 5c 22 2d 6b 5c 22 20 6f 70 74 69 6f 6e 2e 0a 0a 4f 6e 20	supports.the.\"-k\".option...On.
4240	4d 61 63 4f 53 20 69 74 20 69 73 20 70 6f 73 73 69 62 6c 65 20 74 6f 20 69 6e 73 74 61 6c 6c 20	MacOS.it.is.possible.to.install.
4260	63 6f 72 65 75 74 69 6c 73 20 75 73 69 6e 67 20 48 6f 6d 65 62 72 65 77 20 6f 72 0a 73 69 6d 69	coreutils.using.Homebrew.or.simi
4280	6c 61 72 2c 20 77 68 69 63 68 20 77 69 6c 6c 20 70 72 6f 76 69 64 65 20 74 68 65 20 47 4e 55 20	lar,.which.will.provide.the.GNU.
42a0	74 69 6d 65 6f 75 74 20 70 72 6f 67 72 61 6d 20 61 73 0a 5c 22 67 74 69 6d 65 6f 75 74 5c 22 2e	timeout.program.as.\"gtimeout\".
42c0	22 0a 20 20 3a 67 72 6f 75 70 20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 0a 20 20 3a 74 79 70	"...:group.'package-build...:typ
42e0	65 20 27 28 66 69 6c 65 20 3a 6d 75 73 74 2d 6d 61 74 63 68 20 74 29 29 0a 0a 28 64 65 66 63 75	e.'(file.:must-match.t))..(defcu
4300	73 74 6f 6d 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 74 69 6d 65 6f 75 74 2d 73 65 63 73 20	stom.package-build-timeout-secs.
4320	6e 69 6c 0a 20 20 22 57 61 69 74 20 74 68 69 73 20 6d 61 6e 79 20 73 65 63 6f 6e 64 73 20 66 6f	nil..."Wait.this.many.seconds.fo
4340	72 20 65 78 74 65 72 6e 61 6c 20 70 72 6f 63 65 73 73 65 73 20 74 6f 20 63 6f 6d 70 6c 65 74 65	r.external.processes.to.complete
4360	2e 0a 0a 49 66 20 61 6e 20 65 78 74 65 72 6e 61 6c 20 70 72 6f 63 65 73 73 20 74 61 6b 65 73 20	...If.an.external.process.takes.
4380	6c 6f 6e 67 65 72 20 74 68 61 6e 20 73 70 65 63 69 66 69 65 64 20 68 65 72 65 20 74 6f 0a 63 6f	longer.than.specified.here.to.co
43a0	6d 70 6c 65 74 65 2c 20 74 68 65 6e 20 69 74 20 69 73 20 74 65 72 6d 69 6e 61 74 65 64 2e 20 20	mplete,.then.it.is.terminated...
43c0	49 66 20 6e 69 6c 2c 20 74 68 65 6e 20 6e 6f 20 74 69 6d 65 20 6c 69 6d 69 74 20 69 73 0a 61 70	If.nil,.then.no.time.limit.is.ap
43e0	70 6c 69 65 64 2e 20 20 54 68 69 73 20 73 65 74 74 69 6e 67 20 72 65 71 75 69 72 65 73 0a 60 70	plied...This.setting.requires.`p
4400	61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 74 69 6d 65 6f 75 74 2d 65 78 65 63 75 74 61 62 6c 65 27	ackage-build-timeout-executable'
4420	20 74 6f 20 62 65 20 73 65 74 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 70 61 63 6b 61 67 65 2d 62	.to.be.set."...:group.'package-b
4440	75 69 6c 64 0a 20 20 3a 74 79 70 65 20 27 6e 75 6d 62 65 72 29 0a 0a 28 64 65 66 63 75 73 74 6f	uild...:type.'number)..(defcusto
4460	6d 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 74 61 72 2d 65 78 65 63 75 74 61 62 6c 65 20 22	m.package-build-tar-executable."
4480	74 61 72 22 0a 20 20 22 50 61 74 68 20 74 6f 20 61 20 28 70 72 65 66 65 72 61 62 6c 79 20 47 4e	tar"..."Path.to.a.(preferably.GN
44a0	55 29 20 74 61 72 20 63 6f 6d 6d 61 6e 64 2e 0a 43 65 72 74 61 69 6e 20 70 61 63 6b 61 67 65 20	U).tar.command..Certain.package.
44c0	6e 61 6d 65 73 20 28 65 2e 67 2e 2c 20 5c 22 40 5c 22 29 20 6d 61 79 20 6e 6f 74 20 77 6f 72 6b	names.(e.g.,.\"@\").may.not.work
44e0	20 70 72 6f 70 65 72 6c 79 20 77 69 74 68 20 61 20 42 53 44 20 74 61 72 2e 0a 0a 4f 6e 20 4d 61	.properly.with.a.BSD.tar...On.Ma
4500	63 4f 53 20 69 74 20 69 73 20 70 6f 73 73 69 62 6c 65 20 74 6f 20 69 6e 73 74 61 6c 6c 20 67 6e	cOS.it.is.possible.to.install.gn
4520	75 2d 74 61 72 20 75 73 69 6e 67 20 48 6f 6d 65 62 72 65 77 20 6f 72 0a 73 69 6d 69 6c 61 72 2c	u-tar.using.Homebrew.or.similar,
4540	20 77 68 69 63 68 20 77 69 6c 6c 20 70 72 6f 76 69 64 65 20 74 68 65 20 47 4e 55 20 74 61 72 20	.which.will.provide.the.GNU.tar.
4560	70 72 6f 67 72 61 6d 20 61 73 0a 5c 22 67 74 61 72 5c 22 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27	program.as.\"gtar\"."...:group.'
4580	70 61 63 6b 61 67 65 2d 62 75 69 6c 64 0a 20 20 3a 74 79 70 65 20 27 28 66 69 6c 65 20 3a 6d 75	package-build...:type.'(file.:mu
45a0	73 74 2d 6d 61 74 63 68 20 74 29 29 0a 0a 28 64 65 66 76 61 72 20 70 61 63 6b 61 67 65 2d 62 75	st-match.t))..(defvar.package-bu
45c0	69 6c 64 2d 2d 74 61 72 2d 74 79 70 65 20 6e 69 6c 0a 20 20 22 54 79 70 65 20 6f 66 20 60 70 61	ild--tar-type.nil..."Type.of.`pa
45e0	63 6b 61 67 65 2d 62 75 69 6c 64 2d 74 61 72 2d 65 78 65 63 75 74 61 62 6c 65 27 2e 0a 43 61 6e	ckage-build-tar-executable'..Can
4600	20 62 65 20 60 67 6e 75 27 20 6f 72 20 60 62 73 64 27 3b 20 6e 69 6c 20 6d 65 61 6e 73 20 74 68	.be.`gnu'.or.`bsd';.nil.means.th
4620	65 20 74 79 70 65 20 69 73 20 6e 6f 74 20 64 65 63 69 64 65 64 20 79 65 74 2e 22 29 0a 0a 28 64	e.type.is.not.decided.yet.")..(d
4640	65 66 69 6e 65 2d 6f 62 73 6f 6c 65 74 65 2d 76 61 72 69 61 62 6c 65 2d 61 6c 69 61 73 20 27 70	efine-obsolete-variable-alias.'p
4660	61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 77 72 69 74 65 2d 6d 65 6c 70 61 2d 62 61 64 67 65 2d 69	ackage-build-write-melpa-badge-i
4680	6d 61 67 65 73 0a 20 20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 62 61 64 67 65 2d 64 61 74	mages...'package-build-badge-dat
46a0	61 20 22 50 61 63 6b 61 67 65 2d 42 75 69 6c 64 20 35 2e 30 2e 30 22 29 0a 0a 28 64 65 66 63 75	a."Package-Build.5.0.0")..(defcu
46c0	73 74 6f 6d 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 62 61 64 67 65 2d 64 61 74 61 20 6e 69	stom.package-build-badge-data.ni
46e0	6c 0a 20 20 22 54 65 78 74 20 61 6e 64 20 63 6f 6c 6f 72 20 75 73 65 64 20 69 6e 20 62 61 64 67	l..."Text.and.color.used.in.badg
4700	65 20 69 6d 61 67 65 73 2c 20 69 66 20 61 6e 79 2e 0a 0a 49 66 20 6e 69 6c 20 28 74 68 65 20 64	e.images,.if.any...If.nil.(the.d
4720	65 66 61 75 6c 74 29 2c 20 74 68 65 6e 20 6e 6f 20 62 61 64 67 65 20 69 6d 61 67 65 73 20 61 72	efault),.then.no.badge.images.ar
4740	65 20 67 65 6e 65 72 61 74 65 64 2c 0a 6f 74 68 65 72 77 69 73 65 20 74 68 69 73 20 68 61 73 20	e.generated,.otherwise.this.has.
4760	74 68 65 20 66 6f 72 6d 20 28 4e 41 4d 45 20 43 4f 4c 4f 52 29 2e 20 20 4d 45 4c 50 41 20 73 65	the.form.(NAME.COLOR)...MELPA.se
4780	74 73 20 74 68 65 20 76 61 6c 75 65 0a 69 6e 20 69 74 73 20 74 6f 70 2d 6c 65 76 65 6c 20 4d 61	ts.the.value.in.its.top-level.Ma
47a0	6b 65 66 69 6c 65 2c 20 74 6f 20 64 69 66 66 65 72 65 6e 74 20 76 61 6c 75 65 73 2c 20 64 65 70	kefile,.to.different.values,.dep
47c0	65 6e 64 69 6e 67 20 6f 6e 20 74 68 65 0a 63 68 61 6e 6e 65 6c 20 74 68 61 74 20 69 73 20 62 65	ending.on.the.channel.that.is.be
47e0	69 6e 67 20 62 75 69 6c 64 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 70 61 63 6b 61 67 65 2d 62 75	ing.build."...:group.'package-bu
4800	69 6c 64 0a 20 20 3a 74 79 70 65 20 27 28 6c 69 73 74 20 28 73 74 72 69 6e 67 20 3a 74 61 67 20	ild...:type.'(list.(string.:tag.
4820	22 41 72 63 68 69 76 65 20 6e 61 6d 65 22 29 20 63 6f 6c 6f 72 29 29 0a 0a 28 64 65 66 63 75 73	"Archive.name").color))..(defcus
4840	74 6f 6d 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 76 65 72 73 69 6f 6e 2d 72 65 67 65 78 70	tom.package-build-version-regexp
4860	0a 20 20 22 5c 5c 60 5c 5c 28 3f 3a 5c 5c 7c 5b 76 56 72 52 5d 5c 5c 7c 5c 5c 28 3f 3a 72 65 6c	..."\\`\\(?:\\\|[vVrR]\\\|\\(?:rel
4880	65 61 73 65 5c 5c 7c 25 70 5c 5c 29 5b 2d 2f 5d 76 3f 5c 5c 29 3f 5c 0a 5c 5c 28 3f 31 3a 5b 30	ease\\\|%p\\)[-/]v?\\)?\.\\(?1:[0
48a0	2d 39 5d 2b 5c 5c 28 5c 5c 2e 5b 30 2d 39 5d 2b 5c 5c 29 2a 5c 5c 29 5c 5c 27 22 0a 20 20 22 52	-9]+\$\\.[0-9]+\$*\\)\\'"..."R
48c0	65 67 65 78 70 20 75 73 65 64 20 74 6f 20 6d 61 74 63 68 20 76 61 6c 69 64 20 76 65 72 73 69 6f	egexp.used.to.match.valid.versio
48e0	6e 2d 73 74 72 69 6e 67 73 2e 0a 0a 54 68 65 20 66 69 72 73 74 20 63 61 70 74 75 72 65 20 67 72	n-strings...The.first.capture.gr
4900	6f 75 70 20 69 73 20 75 73 65 64 20 74 6f 20 65 78 74 72 61 63 74 20 74 68 65 20 61 63 74 75 61	oup.is.used.to.extract.the.actua
4920	6c 20 76 65 72 73 69 6f 6e 0a 73 74 72 69 6e 67 2e 20 20 53 74 72 69 6e 67 73 20 6d 61 74 63 68	l.version.string...Strings.match
4940	65 64 20 62 79 20 74 68 61 74 20 67 72 6f 75 70 20 6d 75 73 74 20 62 65 20 76 61 6c 69 64 20 61	ed.by.that.group.must.be.valid.a
4960	63 63 6f 72 64 69 6e 67 0a 74 6f 20 60 76 65 72 73 69 6f 6e 2d 74 6f 2d 6c 69 73 74 27 2c 20 62	ccording.to.`version-to-list',.b
4980	75 74 20 74 68 65 20 75 73 65 64 20 72 65 67 65 78 70 20 63 61 6e 20 62 65 20 6d 6f 72 65 20 73	ut.the.used.regexp.can.be.more.s
49a0	74 72 69 63 74 2e 0a 54 68 65 20 64 65 66 61 75 6c 74 20 76 61 6c 75 65 20 73 75 70 70 6f 72 74	trict..The.default.value.support
49c0	73 20 6f 6e 6c 79 20 72 65 6c 65 61 73 65 73 20 62 75 74 20 6e 6f 20 70 72 65 2d 72 65 6c 65 61	s.only.releases.but.no.pre-relea
49e0	73 65 73 2e 0a 49 74 20 61 6c 73 6f 20 69 6e 74 65 6e 74 69 6f 6e 61 6c 6c 79 20 69 67 6e 6f 72	ses..It.also.intentionally.ignor
4a00	65 73 20 63 65 72 74 61 69 6e 20 75 6e 66 6f 72 74 75 6e 61 74 65 20 76 65 72 73 69 6f 6e 20 73	es.certain.unfortunate.version.s
4a20	74 72 69 6e 67 73 0a 73 75 63 68 20 61 73 20 5c 22 31 41 5c 22 20 6f 72 20 5c 22 2e 35 5c 22 2c	trings.such.as.\"1A\".or.\".5\",
4a40	20 61 6e 64 20 6f 6e 6c 79 20 73 75 70 70 6f 72 74 73 20 5c 22 2e 5c 22 20 61 73 20 73 65 70 61	.and.only.supports.\".\".as.sepa
4a60	72 61 74 6f 72 2e 0a 0a 54 68 65 20 70 61 72 74 20 62 65 66 6f 72 65 20 74 68 65 20 66 69 72 73	rator...The.part.before.the.firs
4a80	74 20 63 61 70 74 75 72 65 20 67 72 6f 75 70 20 73 68 6f 75 6c 64 20 6d 61 74 63 68 20 70 72 65	t.capture.group.should.match.pre
4aa0	66 69 78 65 73 0a 63 6f 6d 6d 6f 6e 6c 79 20 75 73 65 64 20 69 6e 20 76 65 72 73 69 6f 6e 20 74	fixes.commonly.used.in.version.t
4ac0	61 67 73 2e 20 20 54 6f 20 73 75 70 70 6f 72 74 20 74 61 67 73 20 74 68 61 74 20 63 6f 6e 74 61	ags...To.support.tags.that.conta
4ae0	69 6e 0a 74 68 65 20 6e 61 6d 65 20 6f 66 20 74 68 65 20 70 61 63 6b 61 67 65 20 28 65 2e 67 2e	in.the.name.of.the.package.(e.g.
4b00	2c 20 5c 22 66 6f 6f 62 61 72 2d 30 2e 31 2e 33 5c 22 29 2c 20 74 68 65 20 6e 61 6d 65 20 6f 66	,.\"foobar-0.1.3\"),.the.name.of
4b20	0a 74 68 65 20 70 61 63 6b 61 67 65 20 69 73 20 73 75 62 73 74 69 74 75 74 65 64 20 66 6f 72 20	.the.package.is.substituted.for.
4b40	5c 22 25 70 5c 22 2e 0a 0a 4e 6f 74 65 20 74 68 61 74 20 74 68 69 73 20 76 61 72 69 61 62 6c 65	\"%p\"...Note.that.this.variable
4b60	20 63 61 6e 20 62 65 20 6f 76 65 72 72 69 64 64 65 6e 20 69 6e 20 61 20 70 61 63 6b 61 67 65 27	.can.be.overridden.in.a.package'
4b80	73 20 72 65 63 69 70 65 2c 0a 75 73 69 6e 67 20 74 68 65 20 60 3a 76 65 72 73 69 6f 6e 2d 72 65	s.recipe,.using.the.`:version-re
4ba0	67 65 78 70 27 20 73 6c 6f 74 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 70 61 63 6b 61 67 65 2d 62	gexp'.slot."...:group.'package-b
4bc0	75 69 6c 64 0a 20 20 3a 74 79 70 65 20 27 73 74 72 69 6e 67 29 0a 0a 28 64 65 66 63 75 73 74 6f	uild...:type.'string)..(defcusto
4be0	6d 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 61 6c 6c 6f 77 65 64 2d 67 69 74 2d 70 72 6f 74	m.package-build-allowed-git-prot
4c00	6f 63 6f 6c 73 20 27 28 22 68 74 74 70 73 22 20 22 66 69 6c 65 22 20 22 73 73 68 22 29 0a 20 20	ocols.'("https"."file"."ssh")...
4c20	22 50 72 6f 74 6f 63 6f 6c 73 20 74 68 61 74 20 63 61 6e 20 62 65 20 75 73 65 64 20 74 6f 20 66	"Protocols.that.can.be.used.to.f
4c40	65 74 63 68 20 66 72 6f 6d 20 75 70 73 74 72 65 61 6d 20 77 69 74 68 20 67 69 74 2e 0a 42 79 20	etch.from.upstream.with.git..By.
4c60	64 65 66 61 75 6c 74 20 69 6e 73 65 63 75 72 65 20 70 72 6f 74 6f 63 6f 6c 73 2c 20 73 75 63 68	default.insecure.protocols,.such
4c80	20 61 73 20 5c 22 68 74 74 70 5c 22 20 6f 72 20 5c 22 67 69 74 5c 22 2c 20 61 72 65 0a 64 69 73	.as.\"http\".or.\"git\",.are.dis
4ca0	61 6c 6c 6f 77 65 64 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c	allowed."...:group.'package-buil
4cc0	64 0a 20 20 3a 74 79 70 65 20 27 28 72 65 70 65 61 74 20 73 74 72 69 6e 67 29 29 0a 0a 28 64 65	d...:type.'(repeat.string))..(de
4ce0	66 76 61 72 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 75 73 65 2d 67 69 74 2d 72 65 6d 6f 74	fvar.package-build-use-git-remot
4d00	65 2d 68 67 20 6e 69 6c 0a 20 20 22 57 68 65 74 68 65 72 20 74 6f 20 75 73 65 20 60 67 69 74 2d	e-hg.nil..."Whether.to.use.`git-
4d20	72 65 6d 6f 74 65 2d 68 67 27 20 72 65 6d 6f 74 65 20 68 65 6c 70 65 72 20 66 6f 72 20 6d 65 72	remote-hg'.remote.helper.for.mer
4d40	63 75 72 69 61 6c 20 72 65 70 6f 73 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 70 61 63 6b 61 67 65	curial.repos.")..(defvar.package
4d60	2d 62 75 69 6c 64 2d 2d 75 73 65 2d 73 61 6e 64 62 6f 78 20 28 65 71 20 73 79 73 74 65 6d 2d 74	-build--use-sandbox.(eq.system-t
4d80	79 70 65 20 27 67 6e 75 2f 6c 69 6e 75 78 29 0a 20 20 22 57 68 65 74 68 65 72 20 74 6f 20 72 75	ype.'gnu/linux)..."Whether.to.ru
4da0	6e 20 75 6e 74 72 75 73 74 65 64 20 63 6f 64 65 20 75 73 69 6e 67 20 74 68 65 20 5c 22 62 75 62	n.untrusted.code.using.the.\"bub
4dc0	62 6c 65 77 72 61 70 5c 22 20 73 61 6e 64 62 6f 78 2e 0a 5c 22 62 75 62 62 6c 65 77 72 61 70 5c	blewrap\".sandbox..\"bubblewrap\
4de0	22 20 69 73 20 6f 6e 6c 79 20 61 76 61 69 6c 61 62 6c 65 20 6f 6e 20 4c 69 6e 75 78 2c 20 77 68	".is.only.available.on.Linux,.wh
4e00	65 72 65 20 74 68 65 20 73 61 6e 64 62 6f 78 20 69 73 0a 65 6e 61 62 6c 65 64 20 62 79 20 64 65	ere.the.sandbox.is.enabled.by.de
4e20	66 61 75 6c 74 2c 20 74 6f 20 61 76 6f 69 64 20 61 63 63 69 64 65 6e 74 61 6c 6c 79 20 6e 6f 74	fault,.to.avoid.accidentally.not
4e40	20 75 73 69 6e 67 20 69 74 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 70 61 63 6b 61 67 65 2d 62 75	.using.it.")..(defvar.package-bu
4e60	69 6c 64 2d 2d 73 61 6e 64 62 6f 78 2d 72 65 61 64 6f 6e 6c 79 2d 62 69 6e 64 73 0a 20 20 27 28	ild--sandbox-readonly-binds...'(
4e80	22 2f 62 69 6e 22 20 22 2f 6c 69 62 22 20 22 2f 6c 69 62 36 34 22 20 22 2f 75 73 72 22 20 20 20	"/bin"."/lib"."/lib64"."/usr"...
4ea0	20 3b 66 68 73 0a 20 20 20 20 22 2f 65 74 63 2f 61 6c 74 65 72 6e 61 74 69 76 65 73 22 20 22 2f	.;fhs....."/etc/alternatives"."/
4ec0	65 74 63 2f 65 6d 61 63 73 22 20 3b 2b 64 65 62 69 61 6e 0a 20 20 20 20 22 2f 67 6e 75 22 29 29	etc/emacs".;+debian....."/gnu"))
4ee0	20 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 2b 67 75 69 78 0a	.........................;+guix.
4f00	0a 28 64 65 66 76 61 72 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 73 61 6e 64 62 6f 78 2d	.(defvar.package-build--sandbox-
4f20	61 72 67 73 0a 20 20 27 28 22 2d 2d 75 6e 73 68 61 72 65 2d 61 6c 6c 22 0a 20 20 20 20 22 2d 2d	args...'("--unshare-all"....."--
4f40	64 65 76 22 20 22 2f 64 65 76 22 0a 20 20 20 20 22 2d 2d 70 72 6f 63 22 20 22 2f 70 72 6f 63 22	dev"."/dev"....."--proc"."/proc"
4f60	0a 20 20 20 20 22 2d 2d 74 6d 70 66 73 22 20 22 2f 74 6d 70 22 29 29 0a 0a 28 64 65 66 76 61 72	....."--tmpfs"."/tmp"))..(defvar
4f80	20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 69 6e 68 69 62 69 74 2d 66 65 74 63 68 20 6e 69	.package-build--inhibit-fetch.ni
4fa0	6c 0a 20 20 22 57 68 65 74 68 65 72 20 74 6f 20 69 6e 68 69 62 69 74 20 66 65 74 63 68 69 6e 67	l..."Whether.to.inhibit.fetching
4fc0	2e 0a 49 66 20 60 73 74 72 69 63 74 27 2c 20 61 6c 73 6f 20 69 6e 68 69 62 69 74 20 74 68 65 20	..If.`strict',.also.inhibit.the.
4fe0	69 6e 69 74 69 61 6c 20 63 6c 6f 6e 65 2c 20 61 6e 64 20 64 65 6c 65 74 69 6e 67 20 61 6e 64 0a	initial.clone,.and.deleting.and.
5000	72 65 2d 63 6c 6f 6e 69 6e 67 20 61 6e 20 65 78 69 73 74 69 6e 67 20 63 6c 6f 6e 65 20 61 66 74	re-cloning.an.existing.clone.aft
5020	65 72 20 74 68 65 20 75 70 73 74 72 65 61 6d 20 68 61 73 20 63 68 61 6e 67 65 64 2e 22 29 0a 0a	er.the.upstream.has.changed.")..
5040	28 64 65 66 76 61 72 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 69 6e 68 69 62 69 74 2d 63	(defvar.package-build--inhibit-c
5060	68 65 63 6b 6f 75 74 20 6e 69 6c 0a 20 20 22 57 68 65 74 68 65 72 20 74 6f 20 69 6e 68 69 62 69	heckout.nil..."Whether.to.inhibi
5080	74 20 63 68 65 63 6b 6f 75 74 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 70 61 63 6b 61 67 65 2d 62	t.checkout.")..(defvar.package-b
50a0	75 69 6c 64 2d 2d 69 6e 68 69 62 69 74 2d 75 70 64 61 74 65 20 6e 69 6c 0a 20 20 22 57 68 65 74	uild--inhibit-update.nil..."Whet
50c0	68 65 72 20 74 6f 20 69 6e 68 69 62 69 74 20 75 70 64 61 74 69 6e 67 20 6d 65 74 61 64 61 74 61	her.to.inhibit.updating.metadata
50e0	20 61 6e 64 20 70 61 63 6b 61 67 65 73 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 70 61 63 6b 61 67	.and.packages.")..(defvar.packag
5100	65 2d 62 75 69 6c 64 2d 2d 69 6e 68 69 62 69 74 2d 62 75 69 6c 64 20 6e 69 6c 0a 20 20 22 57 68	e-build--inhibit-build.nil..."Wh
5120	65 74 68 65 72 20 74 6f 20 69 6e 68 69 62 69 74 20 62 75 69 6c 64 69 6e 67 20 70 61 63 6b 61 67	ether.to.inhibit.building.packag
5140	65 73 20 28 77 68 69 6c 65 20 73 74 69 6c 6c 20 75 70 64 61 74 65 20 6d 65 74 61 64 61 74 61 29	es.(while.still.update.metadata)
5160	2e 22 29 0a 0a 3b 3b 3b 20 47 65 6e 65 72 69 63 20 55 74 69 6c 69 74 69 65 73 0a 0a 28 64 65 66	.")..;;;.Generic.Utilities..(def
5180	75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 6d 65 73 73 61 67 65 20 28 66 6f 72 6d 61	un.package-build--message.(forma
51a0	74 2d 73 74 72 69 6e 67 20 26 72 65 73 74 20 61 72 67 73 29 0a 20 20 22 42 65 68 61 76 65 20 6c	t-string.&rest.args)..."Behave.l
51c0	69 6b 65 20 60 6d 65 73 73 61 67 65 27 20 69 66 20 60 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d	ike.`message'.if.`package-build-
51e0	76 65 72 62 6f 73 65 27 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2e 0a 4f 74 68 65 72 77 69 73 65 20 64	verbose'.is.non-nil..Otherwise.d
5200	6f 20 6e 6f 74 68 69 6e 67 2e 20 20 46 4f 52 4d 41 54 2d 53 54 52 49 4e 47 20 61 6e 64 20 41 52	o.nothing...FORMAT-STRING.and.AR
5220	47 53 20 61 72 65 20 61 73 20 70 65 72 20 74 68 61 74 20 66 75 6e 63 74 69 6f 6e 2e 22 0a 20 20	GS.are.as.per.that.function."...
5240	28 77 68 65 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 76 65 72 62 6f 73 65 0a 20 20 20 20	(when.package-build-verbose.....
5260	28 61 70 70 6c 79 20 23 27 6d 65 73 73 61 67 65 20 66 6f 72 6d 61 74 2d 73 74 72 69 6e 67 20 61	(apply.#'message.format-string.a
5280	72 67 73 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 65 72	rgs)))..(defun.package-build--er
52a0	72 6f 72 20 28 70 61 63 6b 61 67 65 20 66 6f 72 6d 61 74 2d 73 74 72 69 6e 67 20 26 72 65 73 74	ror.(package.format-string.&rest
52c0	20 61 72 67 73 29 0a 20 20 22 42 65 68 61 76 65 20 73 69 6d 69 6c 61 72 20 74 6f 20 60 65 72 72	.args)..."Behave.similar.to.`err
52e0	6f 72 27 20 62 75 74 20 77 69 74 68 20 61 64 64 69 74 69 6f 6e 61 6c 20 6c 6f 67 67 69 6e 67 2e	or'.but.with.additional.logging.
5300	0a 4c 6f 67 20 74 68 65 20 65 72 72 6f 72 20 74 6f 20 5c 22 65 72 72 6f 72 73 2e 6c 6f 67 5c 22	.Log.the.error.to.\"errors.log\"
5320	20 69 6e 20 60 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 61 72 63 68 69 76 65 2d 64 69 72 27 2e	.in.`package-build-archive-dir'.
5340	0a 50 72 65 66 69 78 20 74 68 65 20 65 6e 74 72 79 20 77 69 74 68 20 74 68 65 20 64 61 74 65 20	.Prefix.the.entry.with.the.date.
5360	61 6e 64 20 69 66 20 70 6f 73 73 69 62 6c 65 20 74 68 65 20 6e 61 6d 65 20 6f 66 20 61 0a 70 61	and.if.possible.the.name.of.a.pa
5380	63 6b 61 67 65 2e 20 20 50 41 43 4b 41 47 45 20 69 64 65 6e 74 69 66 69 65 73 20 61 20 70 61 63	ckage...PACKAGE.identifies.a.pac
53a0	6b 61 67 65 2c 20 69 74 20 6d 75 73 74 20 62 65 20 61 20 70 61 63 6b 61 67 65 0a 6e 61 6d 65 2c	kage,.it.must.be.a.package.name,
53c0	20 61 20 60 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 27 20 6f 62 6a 65 63 74 20 6f 72 20 6e 69	.a.`package-recipe'.object.or.ni
53e0	6c 2c 20 69 66 20 74 68 65 20 63 6f 6d 6d 61 6e 64 20 69 73 20 6e 6f 74 0a 62 65 69 6e 67 20 72	l,.if.the.command.is.not.being.r
5400	75 6e 20 66 6f 72 20 61 20 70 61 72 74 69 63 75 6c 61 72 20 70 61 63 6b 61 67 65 2e 22 0a 20 20	un.for.a.particular.package."...
5420	28 64 65 63 6c 61 72 65 20 28 69 6e 64 65 6e 74 20 64 65 66 75 6e 29 29 0a 20 20 28 6c 65 74 20	(declare.(indent.defun))...(let.
5440	28 28 65 72 72 20 28 61 70 70 6c 79 20 23 27 66 6f 72 6d 61 74 2d 6d 65 73 73 61 67 65 20 66 6f	((err.(apply.#'format-message.fo
5460	72 6d 61 74 2d 73 74 72 69 6e 67 20 61 72 67 73 29 29 29 0a 20 20 20 20 3b 3b 20 54 68 61 74 27	rmat-string.args))).....;;.That'
5480	73 20 61 20 62 69 74 20 6f 66 20 61 6e 20 69 6e 63 6f 6e 76 65 6e 69 65 6e 74 20 69 6e 74 65 72	s.a.bit.of.an.inconvenient.inter
54a0	66 61 63 65 2e 2e 2e 0a 20 20 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 20	face........(with-temp-buffer...
54c0	20 20 20 20 28 69 6e 73 65 72 74 20 28 66 6f 72 6d 61 74 20 22 25 73 20 20 25 2d 32 35 73 20 20	....(insert.(format."%s..%-25s..
54e0	25 73 5c 6e 22 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	%s\n".......................(for
5500	6d 61 74 2d 74 69 6d 65 2d 73 74 72 69 6e 67 20 22 25 46 54 25 54 25 7a 22 20 6e 69 6c 20 74 29	mat-time-string."%FT%T%z".nil.t)
5520	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 63 6c 2d 74	.......................(if.(cl-t
5540	79 70 65 70 20 70 61 63 6b 61 67 65 20 27 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 29 0a 20 20	ypep.package.'package-recipe)...
5560	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 65 66 20 70 61	........................(oref.pa
5580	63 6b 61 67 65 20 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	ckage.name).....................
55a0	20 20 20 20 28 6f 72 20 70 61 63 6b 61 67 65 20 22 6e 2f 61 22 29 29 0a 20 20 20 20 20 20 20 20	....(or.package."n/a")).........
55c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 72 72 29 29 0a 20 20 20 20 20 20 28 75 6e 6c 65 73	..............err)).......(unles
55e0	73 20 28 65 71 20 28 63 68 61 72 2d 62 65 66 6f 72 65 29 20 3f 5c 6e 29 0a 20 20 20 20 20 20 20	s.(eq.(char-before).?\n)........
5600	20 28 69 6e 73 65 72 74 20 22 5c 6e 22 29 29 0a 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72	.(insert."\n")).......(goto-char
5620	20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20 20 20 28 61 70 70 65 6e 64 2d 74 6f 2d 66	.(point-min)).......(append-to-f
5640	69 6c 65 0a 20 20 20 20 20 20 20 28 70 6f 69 6e 74 29 0a 20 20 20 20 20 20 20 28 31 2b 20 28 6c	ile........(point)........(1+.(l
5660	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 28 65 78 70 61 6e	ine-end-position))........(expan
5680	64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 65 72 72 6f 72 73 2e 6c 6f 67 22 20 70 61 63 6b 61 67 65	d-file-name."errors.log".package
56a0	2d 62 75 69 6c 64 2d 61 72 63 68 69 76 65 2d 64 69 72 29 29 29 0a 20 20 20 20 28 65 72 72 6f 72	-build-archive-dir))).....(error
56c0	20 22 25 73 22 20 65 72 72 29 29 29 0a 0a 3b 3b 3b 20 56 65 72 73 69 6f 6e 20 48 61 6e 64 6c 69	."%s".err)))..;;;.Version.Handli
56e0	6e 67 0a 3b 3b 3b 3b 20 43 6f 6d 6d 6f 6e 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62	ng.;;;;.Common..(defun.package-b
5700	75 69 6c 64 2d 2d 76 65 72 73 69 6f 6e 2d 72 65 67 65 78 70 20 28 72 63 70 29 0a 20 20 22 52 65	uild--version-regexp.(rcp)..."Re
5720	74 75 72 6e 20 74 68 65 20 76 65 72 73 69 6f 6e 20 72 65 67 65 78 70 20 66 6f 72 20 52 43 50 2e	turn.the.version.regexp.for.RCP.
5740	22 0a 20 20 28 69 66 2d 6c 65 74 2a 20 28 28 72 65 20 28 6f 72 65 66 20 72 63 70 20 76 65 72 73	"...(if-let*.((re.(oref.rcp.vers
5760	69 6f 6e 2d 72 65 67 65 78 70 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 20 28 66 6f	ion-regexp)).............(re.(fo
5780	72 6d 61 74 2d 73 70 65 63 20 72 65 20 27 28 28 3f 76 20 2e 20 22 5c 5c 28 3f 31 3a 5b 30 2d 39	rmat-spec.re.'((?v..."\\(?1:[0-9
57a0	5d 2b 5c 5c 28 5c 5c 2e 5b 30 2d 39 5d 2b 5c 5c 29 2a 5c 5c 29 22 29 29 29 29 29 0a 20 20 20 20	]+\$\\.[0-9]+\$*\\)"))))).....
57c0	20 20 28 70 72 6f 67 6e 20 28 75 6e 6c 65 73 73 20 28 73 74 72 69 6e 67 2d 70 72 65 66 69 78 2d	..(progn.(unless.(string-prefix-
57e0	70 20 22 5c 5c 60 22 20 72 65 29 20 28 73 65 74 71 20 72 65 20 28 63 6f 6e 63 61 74 20 22 5c 5c	p."\\`".re).(setq.re.(concat."\\
5800	60 22 20 72 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 73	`".re)))..............(unless.(s
5820	74 72 69 6e 67 2d 73 75 66 66 69 78 2d 70 20 22 5c 5c 27 22 20 72 65 29 20 28 73 65 74 71 20 72	tring-suffix-p."\\'".re).(setq.r
5840	65 20 28 63 6f 6e 63 61 74 20 72 65 20 22 5c 5c 27 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20	e.(concat.re."\\'")))...........
5860	20 20 20 72 65 29 0a 20 20 20 20 28 66 6f 72 6d 61 74 2d 73 70 65 63 20 70 61 63 6b 61 67 65 2d	...re).....(format-spec.package-
5880	62 75 69 6c 64 2d 76 65 72 73 69 6f 6e 2d 72 65 67 65 78 70 20 60 28 28 3f 70 20 2e 20 2c 28 6f	build-version-regexp.`((?p...,(o
58a0	72 65 66 20 72 63 70 20 6e 61 6d 65 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61	ref.rcp.name))))))..(defun.packa
58c0	67 65 2d 62 75 69 6c 64 2d 2d 73 65 6c 65 63 74 2d 76 65 72 73 69 6f 6e 20 28 72 63 70 29 0a 20	ge-build--select-version.(rcp)..
58e0	20 28 70 63 61 73 65 2d 6c 65 74 2a 0a 20 20 20 20 20 20 28 28 64 65 66 61 75 6c 74 2d 64 69 72	.(pcase-let*.......((default-dir
5900	65 63 74 6f 72 79 20 28 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 2d 77 6f 72 6b 69 6e 67 2d	ectory.(package-recipe--working-
5920	74 72 65 65 20 72 63 70 29 29 0a 20 20 20 20 20 20 20 28 60 28 2c 63 6f 6d 6d 69 74 20 2c 74 69	tree.rcp))........(`(,commit.,ti
5940	6d 65 20 2c 76 65 72 73 69 6f 6e 20 2c 72 65 76 64 65 73 63 29 0a 20 20 20 20 20 20 20 20 28 63	me.,version.,revdesc).........(c
5960	6f 6e 64 0a 20 20 20 20 20 20 20 20 20 28 28 77 69 74 68 2d 6e 6f 2d 77 61 72 6e 69 6e 67 73 20	ond..........((with-no-warnings.
5980	70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 67 65 74 2d 76 65 72 73 69 6f 6e 2d 66 75 6e 63 74 69	package-build-get-version-functi
59a0	6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 28 64 69 73 70 6c 61 79 2d 77 61 72 6e 69 6e 67 20 27	on)...........(display-warning.'
59c0	70 61 63 6b 61 67 65 2d 62 75 69 6c 64 20 22 5c 0a 56 61 72 69 61 62 6c 65 20 60 70 61 63 6b 61	package-build."\.Variable.`packa
59e0	67 65 2d 62 75 69 6c 64 2d 67 65 74 2d 76 65 72 73 69 6f 6e 2d 66 75 6e 63 74 69 6f 6e 27 20 69	ge-build-get-version-function'.i
5a00	73 20 6f 62 73 6f 6c 65 74 65 2e 0a 49 6e 73 74 65 61 64 20 73 65 74 20 60 70 61 63 6b 61 67 65	s.obsolete..Instead.set.`package
5a20	2d 62 75 69 6c 64 2d 72 65 6c 65 61 73 65 2d 76 65 72 73 69 6f 6e 2d 66 75 6e 63 74 69 6f 6e 73	-build-release-version-functions
5a40	27 0a 61 6e 64 2f 6f 72 20 60 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 73 6e 61 70 73 68 6f 74	'.and/or.`package-build-snapshot
5a60	2d 76 65 72 73 69 6f 6e 2d 66 75 6e 63 74 69 6f 6e 73 27 2c 20 61 6e 64 0a 73 65 74 20 60 70 61	-version-functions',.and.set.`pa
5a80	63 6b 61 67 65 2d 62 75 69 6c 64 2d 73 74 61 62 6c 65 27 20 74 6f 20 63 6f 6e 74 72 6f 6c 20 77	ckage-build-stable'.to.control.w
5aa0	68 65 74 68 65 72 20 72 65 6c 65 61 73 65 73 0a 6f 72 20 73 6e 61 70 73 68 6f 74 73 20 61 72 65	hether.releases.or.snapshots.are
5ac0	20 62 75 69 6c 64 2e 22 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 6e 6f 2d 77 61 72	.build.")...........(with-no-war
5ae0	6e 69 6e 67 73 20 28 66 75 6e 63 61 6c 6c 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 67 65 74	nings.(funcall.package-build-get
5b00	2d 76 65 72 73 69 6f 6e 2d 66 75 6e 63 74 69 6f 6e 20 72 63 70 29 29 29 0a 20 20 20 20 20 20 20	-version-function.rcp)))........
5b20	20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 73 74 61 62 6c 65 0a 20 20 20 20 20 20 20 20	..(package-build-stable.........
5b40	20 20 28 72 75 6e 2d 68 6f 6f 6b 2d 77 69 74 68 2d 61 72 67 73 2d 75 6e 74 69 6c 2d 73 75 63 63	..(run-hook-with-args-until-succ
5b60	65 73 73 0a 20 20 20 20 20 20 20 20 20 20 20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 72 65	ess............'package-build-re
5b80	6c 65 61 73 65 2d 76 65 72 73 69 6f 6e 2d 66 75 6e 63 74 69 6f 6e 73 20 72 63 70 29 29 0a 20 20	lease-version-functions.rcp))...
5ba0	20 20 20 20 20 20 20 28 28 72 75 6e 2d 68 6f 6f 6b 2d 77 69 74 68 2d 61 72 67 73 2d 75 6e 74 69	.......((run-hook-with-args-unti
5bc0	6c 2d 73 75 63 63 65 73 73 0a 20 20 20 20 20 20 20 20 20 20 20 27 70 61 63 6b 61 67 65 2d 62 75	l-success............'package-bu
5be0	69 6c 64 2d 73 6e 61 70 73 68 6f 74 2d 76 65 72 73 69 6f 6e 2d 66 75 6e 63 74 69 6f 6e 73 20 72	ild-snapshot-version-functions.r
5c00	63 70 29 29 29 29 29 0a 20 20 20 20 28 69 66 20 28 6e 6f 74 20 76 65 72 73 69 6f 6e 29 0a 20 20	cp))))).....(if.(not.version)...
5c20	20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 28 69 66 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64	......(funcall.(if.package-build
5c40	2d 61 6c 6c 2d 70 75 62 6c 69 73 68 61 62 6c 65 20 23 27 65 72 72 6f 72 20 23 27 6d 65 73 73 61	-all-publishable.#'error.#'messa
5c60	67 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 43 61 6e 6e 6f 74 20 64 65 74	ge).................."Cannot.det
5c80	65 72 6d 69 6e 65 20 76 65 72 73 69 6f 6e 20 66 6f 72 20 25 73 22 20 28 6f 72 65 66 20 72 63 70	ermine.version.for.%s".(oref.rcp
5ca0	20 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 28 6f 73 65 74 20 72 63 70 20 63 6f 6d 6d 69 74 20 63	.name)).......(oset.rcp.commit.c
5cc0	6f 6d 6d 69 74 29 0a 20 20 20 20 20 20 28 6f 73 65 74 20 72 63 70 20 74 69 6d 65 20 74 69 6d 65	ommit).......(oset.rcp.time.time
5ce0	29 0a 20 20 20 20 20 20 28 6f 73 65 74 20 72 63 70 20 76 65 72 73 69 6f 6e 20 76 65 72 73 69 6f	).......(oset.rcp.version.versio
5d00	6e 29 0a 20 20 20 20 20 20 28 6f 73 65 74 20 72 63 70 20 72 65 76 64 65 73 63 20 72 65 76 64 65	n).......(oset.rcp.revdesc.revde
5d20	73 63 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 70 61 63 6b 61 67 65 2d 62 75	sc))))..(cl-defmethod.package-bu
5d40	69 6c 64 2d 2d 73 65 6c 65 63 74 2d 63 6f 6d 6d 69 74 20 28 28 72 63 70 20 70 61 63 6b 61 67 65	ild--select-commit.((rcp.package
5d60	2d 67 69 74 2d 72 65 63 69 70 65 29 20 72 65 76 20 65 78 61 63 74 29 0a 20 20 28 69 66 2d 6c 65	-git-recipe).rev.exact)...(if-le
5d80	74 20 28 28 63 6f 6d 6d 69 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 72 20 28 61 70 70	t.((commit.............(car.(app
5da0	6c 79 20 23 27 70 72 6f 63 65 73 73 2d 6c 69 6e 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	ly.#'process-lines..............
5dc0	20 20 20 20 20 20 20 20 20 20 20 22 67 69 74 22 20 22 6c 6f 67 22 20 22 2d 6e 31 22 20 22 2d 2d	..........."git"."log"."-n1"."--
5de0	66 69 72 73 74 2d 70 61 72 65 6e 74 22 20 22 2d 2d 6e 6f 2d 73 68 6f 77 2d 73 69 67 6e 61 74 75	first-parent"."--no-show-signatu
5e00	72 65 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 22 2d 2d 70	re"........................."--p
5e20	72 65 74 74 79 3d 66 6f 72 6d 61 74 3a 25 48 20 25 63 64 22 20 22 2d 2d 64 61 74 65 3d 75 6e 69	retty=format:%H.%cd"."--date=uni
5e40	78 22 20 72 65 76 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	x".rev.........................(
5e60	61 6e 64 20 28 6e 6f 74 20 65 78 61 63 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	and.(not.exact).................
5e80	20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 22 2d 2d 22 20 28 70 61 63 6b 61 67 65	.............(cons."--".(package
5ea0	2d 62 75 69 6c 64 2d 2d 73 70 65 63 2d 67 6c 6f 62 73 20 72 63 70 29 29 29 29 29 29 29 0a 20 20	-build--spec-globs.rcp)))))))...
5ec0	20 20 20 20 28 70 63 61 73 65 2d 6c 65 74 20 28 28 60 28 2c 68 61 73 68 20 2c 74 69 6d 65 29 20	....(pcase-let.((`(,hash.,time).
5ee0	28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 63 6f 6d 6d 69 74 20 22 20 22 29 29 29 0a 20 20 20 20	(split-string.commit."."))).....
5f00	20 20 20 20 28 6c 69 73 74 20 68 61 73 68 20 28 73 74 72 69 6e 67 2d 74 6f 2d 6e 75 6d 62 65 72	....(list.hash.(string-to-number
5f20	20 74 69 6d 65 29 29 29 0a 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 65 72 72	.time))).....(package-build--err
5f40	6f 72 20 28 6f 72 65 66 20 72 63 70 20 6e 61 6d 65 29 0a 20 20 20 20 20 20 22 4e 6f 20 6d 61 74	or.(oref.rcp.name)......."No.mat
5f60	63 68 69 6e 67 20 66 69 6c 65 28 73 29 20 66 6f 75 6e 64 20 69 6e 20 61 6e 79 20 72 65 61 63 68	ching.file(s).found.in.any.reach
5f80	61 62 6c 65 20 63 6f 6d 6d 69 74 20 75 73 69 6e 67 20 25 53 20 66 69 6c 65 73 20 73 70 65 63 22	able.commit.using.%S.files.spec"
5fa0	0a 20 20 20 20 20 20 28 6f 72 20 28 6f 72 65 66 20 72 63 70 20 66 69 6c 65 73 29 20 27 64 65 66	.......(or.(oref.rcp.files).'def
5fc0	61 75 6c 74 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 70 61 63 6b 61 67 65 2d	ault))))..(cl-defmethod.package-
5fe0	62 75 69 6c 64 2d 2d 73 65 6c 65 63 74 2d 63 6f 6d 6d 69 74 20 28 28 72 63 70 20 70 61 63 6b 61	build--select-commit.((rcp.packa
6000	67 65 2d 68 67 2d 72 65 63 69 70 65 29 20 72 65 76 20 65 78 61 63 74 29 0a 20 20 28 69 66 2d 6c	ge-hg-recipe).rev.exact)...(if-l
6020	65 74 20 28 28 63 6f 6d 6d 69 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 72 20 28 61 70	et.((commit.............(car.(ap
6040	70 6c 79 20 23 27 70 72 6f 63 65 73 73 2d 6c 69 6e 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20	ply.#'process-lines.............
6060	20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 54 68 65 20 22 64 61 74 65 22 20 6b 65 79 77 6f 72	............;;.The."date".keywor
6080	64 20 75 73 65 73 20 55 54 43 2e 20 54 68 65 20 22 68 67 64 61 74 65 22 20 66 69 6c 74 65 72 0a	d.uses.UTC..The."hgdate".filter.
60a0	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 72 65 74 75 72	........................;;.retur
60c0	6e 73 20 74 77 6f 20 69 6e 74 65 67 65 72 73 20 73 65 70 61 72 61 74 65 64 20 62 79 20 61 20 73	ns.two.integers.separated.by.a.s
60e0	70 61 63 65 3b 20 74 68 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	pace;.the.......................
6100	20 20 3b 3b 20 75 6e 69 78 20 74 69 6d 65 73 74 61 6d 70 20 61 6e 64 20 74 68 65 20 74 69 6d 65	..;;.unix.timestamp.and.the.time
6120	7a 6f 6e 65 20 6f 66 66 73 65 74 2e 20 20 57 65 20 75 73 65 0a 20 20 20 20 20 20 20 20 20 20 20	zone.offset...We.use............
6140	20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 22 68 67 64 61 74 65 22 20 62 65 63 61 75 73 65	.............;;."hgdate".because
6160	20 74 68 61 74 20 6d 61 6b 65 73 20 69 74 20 65 61 73 69 65 72 20 74 6f 20 64 69 73 63 61 72 64	.that.makes.it.easier.to.discard
6180	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 3b 3b 20 74 68 65 20	.........................;;.the.
61a0	74 69 6d 65 20 7a 6f 6e 65 20 6f 66 66 73 65 74 2c 20 77 68 69 63 68 20 64 6f 65 73 6e 27 74 20	time.zone.offset,.which.doesn't.
61c0	69 6e 74 65 72 65 73 74 20 75 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	interest.us.....................
61e0	20 20 20 20 20 22 68 67 22 20 22 6c 6f 67 22 20 22 2d 2d 6c 69 6d 69 74 22 20 22 31 22 0a 20 20	....."hg"."log"."--limit"."1"...
6200	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2d 2d 74 65 6d 70 6c 61 74	......................"--templat
6220	65 22 20 22 7b 6e 6f 64 65 7d 20 7b 64 61 74 65 7c 68 67 64 61 74 65 7d 5c 6e 22 20 22 2d 2d 72	e"."{node}.{date\|hgdate}\n"."--r
6240	65 76 22 20 72 65 76 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	ev".rev.........................
6260	28 61 6e 64 20 28 6e 6f 74 20 65 78 61 63 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	(and.(not.exact)................
6280	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 22 2d 2d 22 20 28 70 61 63 6b 61 67	..............(cons."--".(packag
62a0	65 2d 62 75 69 6c 64 2d 2d 73 70 65 63 2d 67 6c 6f 62 73 20 72 63 70 29 29 29 29 29 29 29 0a 20	e-build--spec-globs.rcp)))))))..
62c0	20 20 20 20 20 28 70 63 61 73 65 2d 6c 65 74 20 28 28 60 28 2c 68 61 73 68 20 2c 74 69 6d 65 20	.....(pcase-let.((`(,hash.,time.
62e0	2c 5f 74 69 6d 65 7a 6f 6e 65 29 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 63 6f 6d 6d 69 74	,_timezone).(split-string.commit
6300	20 22 20 22 29 29 29 0a 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 68 61 73 68 20 28 73 74 72 69	."."))).........(list.hash.(stri
6320	6e 67 2d 74 6f 2d 6e 75 6d 62 65 72 20 74 69 6d 65 29 29 29 0a 20 20 20 20 28 70 61 63 6b 61 67	ng-to-number.time))).....(packag
6340	65 2d 62 75 69 6c 64 2d 2d 65 72 72 6f 72 20 28 6f 72 65 66 20 72 63 70 20 6e 61 6d 65 29 0a 20	e-build--error.(oref.rcp.name)..
6360	20 20 20 20 20 22 4e 6f 20 6d 61 74 63 68 69 6e 67 20 66 69 6c 65 28 73 29 20 66 6f 75 6e 64 20	....."No.matching.file(s).found.
6380	69 6e 20 61 6e 79 20 72 65 61 63 68 61 62 6c 65 20 63 6f 6d 6d 69 74 20 75 73 69 6e 67 20 25 53	in.any.reachable.commit.using.%S
63a0	20 66 69 6c 65 73 20 73 70 65 63 22 0a 20 20 20 20 20 20 28 6f 72 20 28 6f 72 65 66 20 72 63 70	.files.spec".......(or.(oref.rcp
63c0	20 66 69 6c 65 73 29 20 27 64 65 66 61 75 6c 74 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74	.files).'default))))..(cl-defmet
63e0	68 6f 64 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 72 65 76 64 65 73 63 20 28 28 5f 72 63	hod.package-build--revdesc.((_rc
6400	70 20 70 61 63 6b 61 67 65 2d 67 69 74 2d 72 65 63 69 70 65 29 20 72 65 76 20 26 6f 70 74 69 6f	p.package-git-recipe).rev.&optio
6420	6e 61 6c 20 74 61 67 29 0a 20 20 28 69 66 20 74 61 67 0a 20 20 20 20 20 20 28 63 61 72 20 28 70	nal.tag)...(if.tag.......(car.(p
6440	72 6f 63 65 73 73 2d 6c 69 6e 65 73 20 22 67 69 74 22 20 22 64 65 73 63 72 69 62 65 22 20 22 2d	rocess-lines."git"."describe"."-
6460	2d 61 6c 77 61 79 73 22 20 22 2d 2d 6c 6f 6e 67 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	-always"."--long"...............
6480	20 20 20 20 20 20 20 20 20 20 20 20 22 2d 2d 61 62 62 72 65 76 3d 31 32 22 20 22 2d 2d 6d 61 74	............"--abbrev=12"."--mat
64a0	63 68 22 20 74 61 67 20 72 65 76 29 29 0a 20 20 20 20 28 63 61 72 20 28 70 72 6f 63 65 73 73 2d	ch".tag.rev)).....(car.(process-
64c0	6c 69 6e 65 73 20 22 67 69 74 22 20 22 72 65 76 2d 70 61 72 73 65 22 20 22 2d 2d 73 68 6f 72 74	lines."git"."rev-parse"."--short
64e0	3d 31 32 22 20 72 65 76 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 70 61 63 6b	=12".rev))))..(cl-defmethod.pack
6500	61 67 65 2d 62 75 69 6c 64 2d 2d 72 65 76 64 65 73 63 20 28 28 5f 72 63 70 20 70 61 63 6b 61 67	age-build--revdesc.((_rcp.packag
6520	65 2d 68 67 2d 72 65 63 69 70 65 29 20 72 65 76 20 26 6f 70 74 69 6f 6e 61 6c 20 74 61 67 29 0a	e-hg-recipe).rev.&optional.tag).
6540	20 20 3b 3b 20 43 61 6e 6e 6f 74 20 75 73 65 20 22 7b 73 68 6f 72 74 65 73 74 28 6e 6f 64 65 2c	..;;.Cannot.use."{shortest(node,
6560	20 6d 69 6e 6c 65 6e 67 74 68 3d 31 32 29 7d 22 20 62 65 63 61 75 73 65 20 74 68 61 74 20 72 65	.minlength=12)}".because.that.re
6580	73 75 6c 74 73 0a 20 20 3b 3b 20 69 6e 20 22 68 67 3a 20 70 61 72 73 65 20 65 72 72 6f 72 3a 20	sults...;;.in."hg:.parse.error:.
65a0	63 61 6e 27 74 20 75 73 65 20 61 20 6b 65 79 2d 76 61 6c 75 65 20 70 61 69 72 20 69 6e 20 74 68	can't.use.a.key-value.pair.in.th
65c0	69 73 20 63 6f 6e 74 65 78 74 22 2e 0a 20 20 28 63 61 72 20 28 70 72 6f 63 65 73 73 2d 6c 69 6e	is.context"....(car.(process-lin
65e0	65 73 0a 20 20 20 20 20 20 20 20 22 68 67 22 20 22 69 64 22 20 22 2d 2d 69 64 22 20 22 2d 2d 72	es........."hg"."id"."--id"."--r
6600	65 76 22 20 72 65 76 20 22 2d 2d 74 65 6d 70 6c 61 74 65 22 0a 20 20 20 20 20 20 20 20 28 69 66	ev".rev."--template".........(if
6620	20 74 61 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 7b 6c 61 74 65 73	.tag.............(format."{lates
6640	74 74 61 67 28 27 25 73 27 29 20 25 25 20 27 7b 74 61 67 7d 2d 7b 64 69 73 74 61 6e 63 65 7d 2d	ttag('%s').%%.'{tag}-{distance}-
6660	6d 7b 73 68 6f 72 74 28 6e 6f 64 65 29 7d 27 7d 5c 6e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20	m{short(node)}'}\n".............
6680	20 20 20 20 20 20 20 20 74 61 67 29 0a 20 20 20 20 20 20 20 20 20 20 22 7b 73 68 6f 72 74 28 6e	........tag)..........."{short(n
66a0	6f 64 65 29 7d 5c 6e 22 29 29 29 29 0a 0a 3b 3b 3b 3b 20 54 61 67 0a 0a 28 64 65 66 75 6e 20 70	ode)}\n"))))..;;;;.Tag..(defun.p
66c0	61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 74 61 67 2d 76 65 72 73 69 6f 6e 20 28 72 63 70 29 0a 20	ackage-build-tag-version.(rcp)..
66e0	20 22 44 65 74 65 72 6d 69 6e 65 20 76 65 72 73 69 6f 6e 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e	."Determine.version.correspondin
6700	67 20 74 6f 20 6c 61 72 67 65 73 74 20 76 65 72 73 69 6f 6e 20 74 61 67 20 66 6f 72 20 52 43 50	g.to.largest.version.tag.for.RCP
6720	2e 0a 52 65 74 75 72 6e 20 28 43 4f 4d 4d 49 54 2d 48 41 53 48 20 43 4f 4d 4d 49 54 54 45 52 2d	..Return.(COMMIT-HASH.COMMITTER-
6740	44 41 54 45 20 56 45 52 53 49 4f 4e 2d 53 54 52 49 4e 47 20 52 45 56 44 45 53 43 20 54 41 47 29	DATE.VERSION-STRING.REVDESC.TAG)
6760	20 6f 72 20 6e 69 6c 2e 22 0a 20 20 28 6c 65 74 20 28 28 72 65 67 65 78 70 20 28 70 61 63 6b 61	.or.nil."...(let.((regexp.(packa
6780	67 65 2d 62 75 69 6c 64 2d 2d 76 65 72 73 69 6f 6e 2d 72 65 67 65 78 70 20 72 63 70 29 29 0a 20	ge-build--version-regexp.rcp))..
67a0	20 20 20 20 20 20 20 28 74 61 67 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 28 76 65 72 73 69 6f	.......(tag.nil).........(versio
67c0	6e 20 27 28 30 29 29 29 0a 20 20 20 20 28 64 6f 6c 69 73 74 20 28 6e 20 28 70 61 63 6b 61 67 65	n.'(0))).....(dolist.(n.(package
67e0	2d 62 75 69 6c 64 2d 2d 6c 69 73 74 2d 74 61 67 73 20 72 63 70 29 29 0a 20 20 20 20 20 20 28 6c	-build--list-tags.rcp)).......(l
6800	65 74 20 28 28 76 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	et.((v.(ignore-errors...........
6820	20 20 20 20 20 20 20 28 76 65 72 73 69 6f 6e 2d 74 6f 2d 6c 69 73 74 20 28 61 6e 64 20 28 73 74	.......(version-to-list.(and.(st
6840	72 69 6e 67 2d 6d 61 74 63 68 20 72 65 67 65 78 70 20 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20	ring-match.regexp.n)............
6860	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 74	............................(mat
6880	63 68 2d 73 74 72 69 6e 67 20 31 20 6e 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 77 68 65	ch-string.1.n)))))).........(whe
68a0	6e 20 28 61 6e 64 20 76 20 28 76 65 72 73 69 6f 6e 2d 6c 69 73 74 2d 3c 3d 20 76 65 72 73 69 6f	n.(and.v.(version-list-<=.versio
68c0	6e 20 76 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 74 61 67 20 6e 29 0a 20 20 20	n.v))...........(setq.tag.n)....
68e0	20 20 20 20 20 20 20 28 73 65 74 71 20 76 65 72 73 69 6f 6e 20 76 29 29 29 29 0a 20 20 20 20 28	.......(setq.version.v)))).....(
6900	61 6e 64 20 74 61 67 0a 20 20 20 20 20 20 20 20 20 28 70 63 61 73 65 2d 6c 65 74 20 28 28 60 28	and.tag..........(pcase-let.((`(
6920	2c 68 61 73 68 20 2c 74 69 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	,hash.,time)....................
6940	20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 73 65 6c 65 63 74 2d 63 6f 6d 6d 69 74	...(package-build--select-commit
6960	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 63 70 20 28 69 66 20	........................rcp.(if.
6980	28 63 6c 2d 74 79 70 65 70 20 72 63 70 20 27 70 61 63 6b 61 67 65 2d 67 69 74 2d 72 65 63 69 70	(cl-typep.rcp.'package-git-recip
69a0	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 20	e)..............................
69c0	20 20 28 63 6f 6e 63 61 74 20 22 72 65 66 73 2f 74 61 67 73 2f 22 20 74 61 67 29 0a 20 20 20 20	..(concat."refs/tags/".tag).....
69e0	20 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 61 67 29 0a 20 20	.........................tag)...
6a00	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))).......
6a20	20 20 20 20 20 28 6c 69 73 74 20 68 61 73 68 20 74 69 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20	.....(list.hash.time............
6a40	20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 76 65 72 73 69 6f 6e 2d 6a 6f 69 6e 20 76 65 72 73	......(package-version-join.vers
6a60	69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62	ion)..................(package-b
6a80	75 69 6c 64 2d 2d 72 65 76 64 65 73 63 20 72 63 70 20 68 61 73 68 20 74 61 67 29 0a 20 20 20 20	uild--revdesc.rcp.hash.tag).....
6aa0	20 20 20 20 20 20 20 20 20 20 20 20 20 74 61 67 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65	.............tag)))))..(cl-defme
6ac0	74 68 6f 64 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 6c 69 73 74 2d 74 61 67 73 20 28 28	thod.package-build--list-tags.((
6ae0	5f 72 63 70 20 70 61 63 6b 61 67 65 2d 67 69 74 2d 72 65 63 69 70 65 29 29 0a 20 20 28 70 72 6f	_rcp.package-git-recipe))...(pro
6b00	63 65 73 73 2d 6c 69 6e 65 73 20 22 67 69 74 22 20 22 74 61 67 22 20 22 2d 2d 6c 69 73 74 22 29	cess-lines."git"."tag"."--list")
6b20	29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d	)..(cl-defmethod.package-build--
6b40	6c 69 73 74 2d 74 61 67 73 20 28 28 5f 72 63 70 20 70 61 63 6b 61 67 65 2d 68 67 2d 72 65 63 69	list-tags.((_rcp.package-hg-reci
6b60	70 65 29 29 0a 20 20 28 64 65 6c 65 74 65 20 22 74 69 70 22 20 28 70 72 6f 63 65 73 73 2d 6c 69	pe))...(delete."tip".(process-li
6b80	6e 65 73 20 22 68 67 22 20 22 74 61 67 73 22 20 22 2d 2d 71 75 69 65 74 22 29 29 29 0a 0a 28 64	nes."hg"."tags"."--quiet")))..(d
6ba0	65 66 69 6e 65 2d 6f 62 73 6f 6c 65 74 65 2d 66 75 6e 63 74 69 6f 6e 2d 61 6c 69 61 73 20 27 70	efine-obsolete-function-alias.'p
6bc0	61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 67 65 74 2d 74 61 67 2d 76 65 72 73 69 6f 6e 0a 20 20 27	ackage-build-get-tag-version...'
6be0	70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 74 61 67 2d 76 65 72 73 69 6f 6e 20 22 50 61 63 6b 61	package-build-tag-version."Packa
6c00	67 65 2d 42 75 69 6c 64 20 35 2e 30 2e 30 22 29 0a 0a 3b 3b 3b 3b 20 48 65 61 64 65 72 0a 0a 28	ge-Build.5.0.0")..;;;;.Header..(
6c20	64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 68 65 61 64 65 72 2d 76 65 72 73 69	defun.package-build-header-versi
6c40	6f 6e 20 28 72 63 70 29 0a 20 20 22 44 65 74 65 72 6d 69 6e 65 20 76 65 72 73 69 6f 6e 20 73 70	on.(rcp)..."Determine.version.sp
6c60	65 63 69 66 69 65 64 20 69 6e 20 74 68 65 20 68 65 61 64 65 72 20 6f 66 20 74 68 65 20 6d 61 69	ecified.in.the.header.of.the.mai
6c80	6e 20 6c 69 62 72 61 72 79 2e 0a 0a 57 61 6c 6b 20 74 68 65 20 68 69 73 74 6f 72 79 20 6f 66 20	n.library...Walk.the.history.of.
6ca0	74 68 65 20 6d 61 69 6e 20 6c 69 62 72 61 72 79 20 75 6e 74 69 6c 20 61 20 63 6f 6d 6d 69 74 20	the.main.library.until.a.commit.
6cc0	69 73 20 66 6f 75 6e 64 0a 77 68 69 63 68 20 63 68 61 6e 67 65 73 20 74 68 65 20 60 50 61 63 6b	is.found.which.changes.the.`Pack
6ce0	61 67 65 2d 56 65 72 73 69 6f 6e 27 20 6f 72 20 60 56 65 72 73 69 6f 6e 27 20 68 65 61 64 65 72	age-Version'.or.`Version'.header
6d00	20 69 6e 20 74 68 65 0a 6d 61 69 6e 20 6c 69 62 72 61 72 79 20 74 6f 20 61 20 76 65 72 73 69 6f	.in.the.main.library.to.a.versio
6d20	6e 20 74 68 61 74 20 71 75 61 6c 69 66 69 65 73 20 61 73 20 61 20 72 65 6c 65 61 73 65 2c 20 69	n.that.qualifies.as.a.release,.i
6d40	67 6e 6f 72 69 6e 67 0a 61 6e 79 20 70 72 65 2d 72 65 6c 65 61 73 65 73 2e 0a 0a 52 65 74 75 72	gnoring.any.pre-releases...Retur
6d60	6e 20 28 43 4f 4d 4d 49 54 2d 48 41 53 48 20 43 4f 4d 4d 49 54 54 45 52 2d 44 41 54 45 20 56 45	n.(COMMIT-HASH.COMMITTER-DATE.VE
6d80	52 53 49 4f 4e 2d 53 54 52 49 4e 47 20 52 45 56 44 45 53 43 29 20 6f 72 20 6e 69 6c 2e 22 0a 20	RSION-STRING.REVDESC).or.nil."..
6da0	20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 6c 69 62 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d	.(and-let*.((lib.(package-build-
6dc0	2d 6d 61 69 6e 2d 6c 69 62 72 61 72 79 20 72 63 70 29 29 29 0a 20 20 20 20 28 77 69 74 68 2d 74	-main-library.rcp))).....(with-t
6de0	65 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 28 6c 65 74 20 28 63 6f 6d 6d 69 74 20 64 61	emp-buffer.......(let.(commit.da
6e00	74 65 20 76 65 72 73 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73	te.version).........(save-excurs
6e20	69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 69 6e	ion...........(package-build--in
6e40	73 65 72 74 2d 76 65 72 73 69 6f 6e 2d 68 65 61 64 65 72 2d 6c 6f 67 0a 20 20 20 20 20 20 20 20	sert-version-header-log.........
6e60	20 20 20 72 63 70 20 28 66 69 6c 65 2d 72 65 6c 61 74 69 76 65 2d 6e 61 6d 65 20 6c 69 62 29 29	...rcp.(file-relative-name.lib))
6e80	29 0a 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 61 6e 64 20 28 6e 6f 74 20 76 65 72 73 69	).........(while.(and.(not.versi
6ea0	6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 2d 73 65 61 72	on).....................(re-sear
6ec0	63 68 2d 66 6f 72 77 61 72 64 20 22 5e 63 6f 6d 6d 69 74 20 5c 5c 28 5b 5e 20 5d 2b 5c 5c 29 20	ch-forward."^commit.\$[^.]+\$.
6ee0	5c 5c 28 2e 2b 5c 5c 29 22 20 6e 69 6c 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74	\$.+\$".nil.t))...........(set
6f00	71 20 63 6f 6d 6d 69 74 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 31 29 29 0a 20 20 20 20 20	q.commit.(match-string.1))......
6f20	20 20 20 20 20 28 73 65 74 71 20 64 61 74 65 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 32 29	.....(setq.date.(match-string.2)
6f40	29 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 65 6e 64 20 28 73 61 76 65 2d 65 78 63	)...........(let.((end.(save-exc
6f60	75 72 73 69 6f 6e 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 5e 24 22 20 6e	ursion.(re-search-forward."^$".n
6f80	69 6c 20 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 72 65 2d 73	il.t)))).............(when.(re-s
6fa0	65 61 72 63 68 2d 66 6f 72 77 61 72 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	earch-forward...................
6fc0	20 22 5e 5c 5c 2b 3b 3b 2a 20 2a 5c 5c 28 50 61 63 6b 61 67 65 2d 5c 5c 29 3f 56 65 72 73 69 6f	."^\\+;;.\$Package-\$?Versio
6fe0	6e 3a 20 2a 5c 5c 28 2e 2b 5c 5c 29 22 20 65 6e 64 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20	n:.*\$.+\$".end.t)............
7000	20 20 20 28 6c 65 74 20 28 28 76 65 72 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 32 29 29 29	...(let.((ver.(match-string.2)))
7020	0a 20 20 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 74	.................(when.(and.(not
7040	20 28 65 71 75 61 6c 20 76 65 72 20 22 30 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.(equal.ver."0"))...............
7060	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 68 0a 20 20 20 20 20	.............(string-match......
7080	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 60 5c 5c 28 5b 30	......................."\\`\\([0
70a0	2d 39 5d 2b 5c 5c 29 5c 5c 28 5c 5c 2e 5b 30 2d 39 5d 2b 5c 5c 29 2a 5c 5c 27 22 20 76 65 72 29	-9]+\\)\$\\.[0-9]+\$*\\'".ver)
70c0	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 76 65 72 73 69 6f	)...................(setq.versio
70e0	6e 20 76 65 72 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 65 6e 64 0a	n.ver)))).............(when.end.
7100	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 65 6e 64 29 29 29 29	..............(goto-char.end))))
7120	0a 20 20 20 20 20 20 20 20 28 61 6e 64 20 76 65 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20	.........(and.version...........
7140	20 20 20 28 6c 69 73 74 20 63 6f 6d 6d 69 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	...(list.commit.................
7160	20 20 20 28 73 74 72 69 6e 67 2d 74 6f 2d 6e 75 6d 62 65 72 20 64 61 74 65 29 0a 20 20 20 20 20	...(string-to-number.date)......
7180	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 76 65 72 73 69 6f 6e 2d 6a	..............(package-version-j
71a0	6f 69 6e 20 28 76 65 72 73 69 6f 6e 2d 74 6f 2d 6c 69 73 74 20 76 65 72 73 69 6f 6e 29 29 0a 20	oin.(version-to-list.version))..
71c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64	..................(package-build
71e0	2d 2d 72 65 76 64 65 73 63 20 72 63 70 20 63 6f 6d 6d 69 74 29 29 29 29 29 29 29 0a 0a 28 64 65	--revdesc.rcp.commit)))))))..(de
7200	66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 6d 61 69 6e 2d 6c 69 62 72 61 72 79 20	fun.package-build--main-library.
7220	28 72 63 70 29 0a 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 6d 61 74 63 68 2d 6c 69	(rcp)...(package-build--match-li
7240	62 72 61 72 79 20 72 63 70 29 29 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c	brary.rcp))..(defun.package-buil
7260	64 2d 2d 6d 61 74 63 68 2d 6c 69 62 72 61 72 79 20 28 72 63 70 20 26 6f 70 74 69 6f 6e 61 6c 20	d--match-library.(rcp.&optional.
7280	66 69 6c 65 6e 61 6d 65 29 0a 20 20 28 6c 65 74 20 28 28 6c 69 62 73 20 28 70 61 63 6b 61 67 65	filename)...(let.((libs.(package
72a0	2d 62 75 69 6c 64 2d 2d 6c 69 73 74 2d 6c 69 62 72 61 72 69 65 73 20 72 63 70 29 29 0a 20 20 20	-build--list-libraries.rcp))....
72c0	20 20 20 20 20 28 66 69 6c 65 6e 61 6d 65 20 28 6f 72 20 66 69 6c 65 6e 61 6d 65 20 28 63 6f 6e	.....(filename.(or.filename.(con
72e0	63 61 74 20 28 6f 72 65 66 20 72 63 70 20 6e 61 6d 65 29 20 22 2e 65 6c 22 29 29 29 29 0a 20 20	cat.(oref.rcp.name).".el"))))...
7300	20 20 28 63 6f 6e 64 0a 20 20 20 20 20 28 28 63 61 72 20 28 6d 65 6d 62 65 72 20 28 63 6f 6e 63	..(cond......((car.(member.(conc
7320	61 74 20 22 6c 69 73 70 2f 22 20 66 69 6c 65 6e 61 6d 65 29 20 6c 69 62 73 29 29 29 0a 20 20 20	at."lisp/".filename).libs)))....
7340	20 20 28 28 63 61 72 20 28 6d 65 6d 62 65 72 20 66 69 6c 65 6e 61 6d 65 20 6c 69 62 73 29 29 29	..((car.(member.filename.libs)))
7360	0a 20 20 20 20 20 28 28 63 6c 2d 66 69 6e 64 20 66 69 6c 65 6e 61 6d 65 20 6c 69 62 73 20 3a 74	......((cl-find.filename.libs.:t
7380	65 73 74 20 23 27 65 71 75 61 6c 20 3a 6b 65 79 20 23 27 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e	est.#'equal.:key.#'file-name-non
73a0	64 69 72 65 63 74 6f 72 79 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 70 61	directory)))))..(cl-defmethod.pa
73c0	63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 6c 69 73 74 2d 6c 69 62 72 61 72 69 65 73 20 28 28 5f 72	ckage-build--list-libraries.((_r
73e0	63 70 20 70 61 63 6b 61 67 65 2d 67 69 74 2d 72 65 63 69 70 65 29 29 0a 20 20 28 70 72 6f 63 65	cp.package-git-recipe))...(proce
7400	73 73 2d 6c 69 6e 65 73 20 22 67 69 74 22 20 22 6c 73 2d 66 69 6c 65 73 22 20 22 2a 2e 65 6c 22	ss-lines."git"."ls-files"."*.el"
7420	29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d	))..(cl-defmethod.package-build-
7440	2d 6c 69 73 74 2d 6c 69 62 72 61 72 69 65 73 20 28 28 5f 72 63 70 20 70 61 63 6b 61 67 65 2d 68	-list-libraries.((_rcp.package-h
7460	67 2d 72 65 63 69 70 65 29 29 0a 20 20 28 70 72 6f 63 65 73 73 2d 6c 69 6e 65 73 20 22 68 67 22	g-recipe))...(process-lines."hg"
7480	20 22 66 69 6c 65 73 22 20 22 2d 2d 69 6e 63 6c 75 64 65 22 20 22 2a 2a 2f 2a 2e 65 6c 22 29 29	."files"."--include"."*/.el"))
74a0	0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 69	..(cl-defmethod.package-build--i
74c0	6e 73 65 72 74 2d 76 65 72 73 69 6f 6e 2d 68 65 61 64 65 72 2d 6c 6f 67 0a 20 20 28 28 5f 72 63	nsert-version-header-log...((_rc
74e0	70 20 70 61 63 6b 61 67 65 2d 67 69 74 2d 72 65 63 69 70 65 29 20 6c 69 62 29 0a 20 20 28 63 61	p.package-git-recipe).lib)...(ca
7500	6c 6c 2d 70 72 6f 63 65 73 73 20 22 67 69 74 22 20 6e 69 6c 20 74 20 6e 69 6c 0a 20 20 20 20 20	ll-process."git".nil.t.nil......
7520	20 20 20 20 20 20 20 20 20 20 20 22 6c 6f 67 22 20 22 2d 2d 66 69 72 73 74 2d 70 61 72 65 6e 74	..........."log"."--first-parent
7540	22 20 22 2d 2d 6e 6f 2d 72 65 6e 61 6d 65 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	"."--no-renames"................
7560	20 22 2d 2d 70 72 65 74 74 79 3d 66 6f 72 6d 61 74 3a 63 6f 6d 6d 69 74 20 25 48 20 25 63 64 22	."--pretty=format:commit.%H.%cd"
7580	20 22 2d 2d 64 61 74 65 3d 75 6e 69 78 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22	."--date=unix"................."
75a0	2d 4c 22 20 28 66 6f 72 6d 61 74 20 22 2f 5e 3b 3b 2a 20 2a 5c 5c 28 50 61 63 6b 61 67 65 2d 5c	-L".(format."/^;;.\\(Package-\
75c0	5c 29 5c 5c 3f 56 65 72 73 69 6f 6e 3a 2f 2c 2b 31 3a 25 73 22 20 6c 69 62 29 29 29 0a 0a 28 63	\)\\?Version:/,+1:%s".lib)))..(c
75e0	6c 2d 64 65 66 6d 65 74 68 6f 64 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 69 6e 73 65 72	l-defmethod.package-build--inser
7600	74 2d 76 65 72 73 69 6f 6e 2d 68 65 61 64 65 72 2d 6c 6f 67 0a 20 20 28 28 5f 72 63 70 20 70 61	t-version-header-log...((_rcp.pa
7620	63 6b 61 67 65 2d 68 67 2d 72 65 63 69 70 65 29 20 5f 6c 69 62 29 0a 20 20 28 63 61 6c 6c 2d 70	ckage-hg-recipe)._lib)...(call-p
7640	72 6f 63 65 73 73 20 22 68 67 22 20 6e 69 6c 20 74 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20	rocess."hg".nil.t.nil...........
7660	20 20 20 20 20 20 22 6c 6f 67 22 20 22 2d 2d 66 69 72 73 74 2d 70 61 72 65 6e 74 22 0a 20 20 20	......"log"."--first-parent"....
7680	20 20 20 20 20 20 20 20 20 20 20 20 20 22 2d 2d 74 65 6d 70 6c 61 74 65 22 20 22 63 6f 6d 6d 69	............."--template"."commi
76a0	74 3a 20 7b 6e 6f 64 65 7d 20 7b 64 61 74 65 7c 68 67 64 61 74 65 7d 5c 6e 22 0a 20 20 20 20 20	t:.{node}.{date\|hgdate}\n"......
76c0	20 20 20 20 20 20 20 20 20 20 20 29 29 20 3b 20 54 4f 44 4f 20 57 68 61 74 20 69 73 20 74 68 65	...........)).;.TODO.What.is.the
76e0	20 65 71 75 69 76 61 6c 65 6e 74 20 6f 66 20 47 69 74 27 73 20 22 2d 4c 22 3f 0a 0a 3b 3b 3b 3b	.equivalent.of.Git's."-L"?..;;;;
7700	20 4e 41 4d 45 2d 70 6b 67 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d	.NAME-pkg..(defun.package-build-
7720	70 6b 67 2d 76 65 72 73 69 6f 6e 20 28 72 63 70 29 0a 20 20 22 44 65 74 65 72 6d 69 6e 65 20 76	pkg-version.(rcp)..."Determine.v
7740	65 72 73 69 6f 6e 20 73 70 65 63 69 66 69 65 64 20 69 6e 20 74 68 65 20 5c 22 4e 41 4d 45 2d 70	ersion.specified.in.the.\"NAME-p
7760	6b 67 2e 65 6c 5c 22 20 66 69 6c 65 2e 0a 52 65 74 75 72 6e 20 28 43 4f 4d 4d 49 54 2d 48 41 53	kg.el\".file..Return.(COMMIT-HAS
7780	48 20 43 4f 4d 4d 49 54 54 45 52 2d 44 41 54 45 20 56 45 52 53 49 4f 4e 2d 53 54 52 49 4e 47 20	H.COMMITTER-DATE.VERSION-STRING.
77a0	52 45 56 44 45 53 43 29 20 6f 72 20 6e 69 6c 2e 22 0a 20 20 28 64 65 63 6c 61 72 65 20 28 6f 62	REVDESC).or.nil."...(declare.(ob
77c0	73 6f 6c 65 74 65 20 22 65 78 74 72 61 63 74 20 76 65 72 73 69 6f 6e 20 66 72 6f 6d 20 74 61 67	solete."extract.version.from.tag
77e0	20 61 6e 64 2f 6f 72 20 6d 61 69 6e 20 6c 69 62 72 61 72 79 20 69 6e 73 74 65 61 64 2e 22 0a 20	.and/or.main.library.instead."..
7800	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 50 61 63 6b 61 67 65 2d 42 75 69	...................."Package-Bui
7820	6c 64 20 35 2e 30 2e 30 22 29 29 0a 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 66 69 6c 65 20 28	ld.5.0.0"))...(and-let*.((file.(
7840	70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 70 6b 67 66 69 6c 65 20 72 63 70 29 29 29 0a 20 20	package-build--pkgfile.rcp)))...
7860	20 20 28 6c 65 74 20 28 28 72 65 67 65 78 70 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d	..(let.((regexp.(package-build--
7880	76 65 72 73 69 6f 6e 2d 72 65 67 65 78 70 20 72 63 70 29 29 0a 20 20 20 20 20 20 20 20 20 20 63	version-regexp.rcp))...........c
78a0	6f 6d 6d 69 74 20 64 61 74 65 20 76 65 72 73 69 6f 6e 29 0a 20 20 20 20 20 20 28 63 61 74 63 68	ommit.date.version).......(catch
78c0	20 27 62 65 66 6f 72 65 2d 6c 61 74 65 73 74 0a 20 20 20 20 20 20 20 20 28 70 63 61 73 65 2d 64	.'before-latest.........(pcase-d
78e0	6f 6c 69 73 74 20 28 60 28 2c 63 20 2c 64 29 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d	olist.(`(,c.,d).(package-build--
7900	70 6b 67 66 69 6c 65 2d 63 6f 6d 6d 69 74 73 20 72 63 70 20 66 69 6c 65 29 29 0a 20 20 20 20 20	pkgfile-commits.rcp.file))......
7920	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 20	.....(with-temp-buffer..........
7940	20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	...(save-excursion..............
7960	20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 69 6e 73 65 72 74 2d 70 6b 67 66 69 6c 65 20	.(package-build--insert-pkgfile.
7980	72 63 70 20 63 20 66 69 6c 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 2d 6c	rcp.c.file)).............(when-l
79a0	65 74 2a 20 28 28 6e 20 28 69 67 6e 6f 72 65 2d 65 72 72 6f 72 73 20 28 6e 74 68 20 32 20 28 72	et*.((n.(ignore-errors.(nth.2.(r
79c0	65 61 64 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 29 29 0a 20 20 20 20 20 20 20	ead.(current-buffer)))))........
79e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 76 20 28 69 67 6e 6f 72 65 2d 65 72 72 6f	.................(v.(ignore-erro
7a00	72 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	rs..............................
7a20	28 76 65 72 73 69 6f 6e 2d 74 6f 2d 6c 69 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	(version-to-list................
7a40	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 67 2d 6d 61 74 63	...............(and.(string-matc
7a60	68 20 72 65 67 65 78 70 20 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	h.regexp.n).....................
7a80	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 55 73 65 20 6d 61 74 63 68 2d 67 72 6f 75	...............;;.Use.match-grou
7aa0	70 20 30 2c 20 6e 6f 74 20 31 2c 20 62 65 63 61 75 73 65 20 69 6e 0a 20 20 20 20 20 20 20 20 20	p.0,.not.1,.because.in..........
7ac0	20 20 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 74 68 69	..........................;;.thi
7ae0	73 20 66 69 6c 65 20 61 20 76 65 72 73 69 6f 6e 20 73 74 72 69 6e 67 20 77 69 74 68 6f 75 74 20	s.file.a.version.string.without.
7b00	61 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	a...............................
7b20	20 20 20 20 20 3b 3b 20 70 72 65 66 69 78 20 69 73 20 65 78 70 65 63 74 65 64 2e 0a 20 20 20 20	.....;;.prefix.is.expected......
7b40	20 20 20 20 20 20 20 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	...............................(
7b60	6d 61 74 63 68 2d 73 74 72 69 6e 67 20 30 20 6e 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20	match-string.0.n))))))..........
7b80	20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 76 65 72 73 69 6f 6e 20 28 6e 6f 74 20 28 65 71	.....(when.(and.version.(not.(eq
7ba0	75 61 6c 20 76 20 76 65 72 73 69 6f 6e 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ual.v.version)))................
7bc0	20 28 74 68 72 6f 77 20 27 62 65 66 6f 72 65 2d 6c 61 74 65 73 74 20 6e 69 6c 29 29 0a 20 20 20	.(throw.'before-latest.nil))....
7be0	20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 6f 6d 6d 69 74 20 63 29 0a 20 20 20 20 20	...........(setq.commit.c)......
7c00	20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 64 61 74 65 20 64 29 0a 20 20 20 20 20 20 20 20 20	.........(setq.date.d)..........
7c20	20 20 20 20 20 28 73 65 74 71 20 76 65 72 73 69 6f 6e 20 76 29 29 29 29 29 0a 20 20 20 20 20 20	.....(setq.version.v))))).......
7c40	28 61 6e 64 20 76 65 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 63 6f	(and.version............(list.co
7c60	6d 6d 69 74 0a 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 74 6f	mmit..................(string-to
7c80	2d 6e 75 6d 62 65 72 20 64 61 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	-number.date)..................(
7ca0	70 61 63 6b 61 67 65 2d 76 65 72 73 69 6f 6e 2d 6a 6f 69 6e 20 76 65 72 73 69 6f 6e 29 0a 20 20	package-version-join.version)...
7cc0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 72	...............(package-build--r
7ce0	65 76 64 65 73 63 20 72 63 70 20 63 6f 6d 6d 69 74 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20	evdesc.rcp.commit))))))..(defun.
7d00	70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 70 6b 67 66 69 6c 65 20 28 72 63 70 29 0a 20 20 28	package-build--pkgfile.(rcp)...(
7d20	70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 6d 61 74 63 68 2d 6c 69 62 72 61 72 79 20 72 63 70	package-build--match-library.rcp
7d40	20 28 63 6f 6e 63 61 74 20 28 6f 72 65 66 20 72 63 70 20 6e 61 6d 65 29 20 22 2d 70 6b 67 2e 65	.(concat.(oref.rcp.name)."-pkg.e
7d60	6c 22 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 70 61 63 6b 61 67 65 2d 62 75 69	l")))..(cl-defmethod.package-bui
7d80	6c 64 2d 2d 70 6b 67 66 69 6c 65 2d 63 6f 6d 6d 69 74 73 0a 20 20 28 28 5f 72 63 70 20 70 61 63	ld--pkgfile-commits...((_rcp.pac
7da0	6b 61 67 65 2d 67 69 74 2d 72 65 63 69 70 65 29 20 66 69 6c 65 29 0a 20 20 28 6d 61 70 63 61 72	kage-git-recipe).file)...(mapcar
7dc0	20 28 6c 61 6d 62 64 61 20 28 6c 69 6e 65 29 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 6c 69	.(lambda.(line).(split-string.li
7de0	6e 65 20 22 20 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 63 65 73 73 2d 6c 69 6e 65	ne."."))...........(process-line
7e00	73 20 22 67 69 74 22 20 22 6c 6f 67 22 20 22 2d 2d 66 69 72 73 74 2d 70 61 72 65 6e 74 22 0a 20	s."git"."log"."--first-parent"..
7e20	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2d 2d 70 72 65 74 74	........................"--prett
7e40	79 3d 66 6f 72 6d 61 74 3a 25 48 20 25 63 64 22 20 22 2d 2d 64 61 74 65 3d 75 6e 69 78 22 0a 20	y=format:%H.%cd"."--date=unix"..
7e60	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2d 2d 22 20 66 69 6c	........................"--".fil
7e80	65 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 70 61 63 6b 61 67 65 2d 62 75 69 6c	e)))..(cl-defmethod.package-buil
7ea0	64 2d 2d 70 6b 67 66 69 6c 65 2d 63 6f 6d 6d 69 74 73 0a 20 20 28 28 5f 72 63 70 20 70 61 63 6b	d--pkgfile-commits...((_rcp.pack
7ec0	61 67 65 2d 68 67 2d 72 65 63 69 70 65 29 20 66 69 6c 65 29 0a 20 20 28 6d 61 70 63 61 72 20 28	age-hg-recipe).file)...(mapcar.(
7ee0	6c 61 6d 62 64 61 20 28 6c 69 6e 65 29 20 28 73 65 71 2d 74 61 6b 65 20 28 73 70 6c 69 74 2d 73	lambda.(line).(seq-take.(split-s
7f00	74 72 69 6e 67 20 6c 69 6e 65 20 22 20 22 29 20 32 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 70	tring.line.".").2))...........(p
7f20	72 6f 63 65 73 73 2d 6c 69 6e 65 73 20 22 68 67 22 20 22 6c 6f 67 22 0a 20 20 20 20 20 20 20 20	rocess-lines."hg"."log".........
7f40	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2d 2d 74 65 6d 70 6c 61 74 65 22 20 22 7b	................."--template"."{
7f60	6e 6f 64 65 7d 20 7b 64 61 74 65 7c 68 67 64 61 74 65 7d 5c 6e 22 0a 20 20 20 20 20 20 20 20 20	node}.{date\|hgdate}\n"..........
7f80	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2d 2d 22 20 66 69 6c 65 29 29 29 0a 0a 28 63	................"--".file)))..(c
7fa0	6c 2d 64 65 66 6d 65 74 68 6f 64 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 69 6e 73 65 72	l-defmethod.package-build--inser
7fc0	74 2d 70 6b 67 66 69 6c 65 0a 20 20 28 28 5f 72 63 70 20 70 61 63 6b 61 67 65 2d 67 69 74 2d 72	t-pkgfile...((_rcp.package-git-r
7fe0	65 63 69 70 65 29 20 63 6f 6d 6d 69 74 20 66 69 6c 65 29 0a 20 20 28 63 61 6c 6c 2d 70 72 6f 63	ecipe).commit.file)...(call-proc
8000	65 73 73 20 22 67 69 74 22 20 6e 69 6c 20 74 20 6e 69 6c 20 22 73 68 6f 77 22 20 28 63 6f 6e 63	ess."git".nil.t.nil."show".(conc
8020	61 74 20 63 6f 6d 6d 69 74 20 22 3a 22 20 66 69 6c 65 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65	at.commit.":".file)))..(cl-defme
8040	74 68 6f 64 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 69 6e 73 65 72 74 2d 70 6b 67 66 69	thod.package-build--insert-pkgfi
8060	6c 65 0a 20 20 28 28 5f 72 63 70 20 70 61 63 6b 61 67 65 2d 68 67 2d 72 65 63 69 70 65 29 20 63	le...((_rcp.package-hg-recipe).c
8080	6f 6d 6d 69 74 20 66 69 6c 65 29 0a 20 20 28 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 22 68 67 22	ommit.file)...(call-process."hg"
80a0	20 6e 69 6c 20 74 20 6e 69 6c 20 22 63 61 74 22 20 22 2d 72 22 20 63 6f 6d 6d 69 74 20 66 69 6c	.nil.t.nil."cat"."-r".commit.fil
80c0	65 29 29 0a 0a 3b 3b 3b 3b 20 54 69 6d 65 73 74 61 6d 70 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b	e))..;;;;.Timestamp..(defun.pack
80e0	61 67 65 2d 62 75 69 6c 64 2d 74 69 6d 65 73 74 61 6d 70 2d 76 65 72 73 69 6f 6e 20 28 72 63 70	age-build-timestamp-version.(rcp
8100	29 0a 20 20 22 44 65 74 65 72 6d 69 6e 65 20 74 69 6d 65 73 74 61 6d 70 20 76 65 72 73 69 6f 6e	)..."Determine.timestamp.version
8120	20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 74 6f 20 6c 61 74 65 73 74 20 72 65 6c 65 76 61 6e	.corresponding.to.latest.relevan
8140	74 20 63 6f 6d 6d 69 74 20 66 6f 72 20 52 43 50 2e 0a 52 65 74 75 72 6e 20 28 43 4f 4d 4d 49 54	t.commit.for.RCP..Return.(COMMIT
8160	2d 48 41 53 48 20 43 4f 4d 4d 49 54 54 45 52 2d 44 41 54 45 20 56 45 52 53 49 4f 4e 2d 53 54 52	-HASH.COMMITTER-DATE.VERSION-STR
8180	49 4e 47 20 52 45 56 44 45 53 43 29 2e 0a 56 45 52 53 49 4f 4e 2d 53 54 52 49 4e 47 20 68 61 73	ING.REVDESC)..VERSION-STRING.has
81a0	20 74 68 65 20 66 6f 72 6d 61 74 20 5c 22 25 59 25 6d 25 64 2e 25 48 25 4d 5c 22 2e 22 0a 20 20	.the.format.\"%Y%m%d.%H%M\"."...
81c0	28 70 63 61 73 65 2d 6c 65 74 20 28 28 60 28 2c 68 61 73 68 20 2c 74 69 6d 65 29 20 28 70 61 63	(pcase-let.((`(,hash.,time).(pac
81e0	6b 61 67 65 2d 62 75 69 6c 64 2d 2d 74 69 6d 65 73 74 61 6d 70 2d 76 65 72 73 69 6f 6e 20 72 63	kage-build--timestamp-version.rc
8200	70 29 29 29 0a 20 20 20 20 28 6c 69 73 74 20 68 61 73 68 20 74 69 6d 65 0a 20 20 20 20 20 20 20	p))).....(list.hash.time........
8220	20 20 20 3b 3b 20 57 65 20 72 65 6d 6f 76 65 20 7a 65 72 6f 2d 70 61 64 64 69 6e 67 20 6f 66 20	...;;.We.remove.zero-padding.of.
8240	74 68 65 20 48 48 20 70 6f 72 74 69 6f 6e 2c 20 61 73 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20	the.HH.portion,.as...........;;.
8260	74 68 61 74 20 69 73 20 6c 6f 73 74 20 77 68 65 6e 20 73 74 6f 72 65 64 20 69 6e 20 61 72 63 68	that.is.lost.when.stored.in.arch
8280	69 76 65 2d 63 6f 6e 74 65 6e 74 73 2e 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20	ive-contents............(concat.
82a0	28 66 6f 72 6d 61 74 2d 74 69 6d 65 2d 73 74 72 69 6e 67 20 22 25 59 25 6d 25 64 2e 22 20 74 69	(format-time-string."%Y%m%d.".ti
82c0	6d 65 20 74 29 0a 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	me.t)...................(format.
82e0	22 25 64 22 20 28 73 74 72 69 6e 67 2d 74 6f 2d 6e 75 6d 62 65 72 0a 20 20 20 20 20 20 20 20 20	"%d".(string-to-number..........
8300	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 2d 74	.......................(format-t
8320	69 6d 65 2d 73 74 72 69 6e 67 20 22 25 48 25 4d 22 20 74 69 6d 65 20 74 29 29 29 29 0a 20 20 20	ime-string."%H%M".time.t))))....
8340	20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 72 65 76 64 65 73 63 20 72	.......(package-build--revdesc.r
8360	63 70 20 68 61 73 68 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 70 61 63 6b 61	cp.hash))))..(cl-defmethod.packa
8380	67 65 2d 62 75 69 6c 64 2d 2d 74 69 6d 65 73 74 61 6d 70 2d 76 65 72 73 69 6f 6e 20 28 28 72 63	ge-build--timestamp-version.((rc
83a0	70 20 70 61 63 6b 61 67 65 2d 67 69 74 2d 72 65 63 69 70 65 29 29 0a 20 20 28 70 63 61 73 65 2d	p.package-git-recipe))...(pcase-
83c0	6c 65 74 2a 0a 20 20 20 20 20 20 28 28 28 65 69 65 69 6f 20 63 6f 6d 6d 69 74 20 62 72 61 6e 63	let*.......(((eieio.commit.branc
83e0	68 29 20 72 63 70 29 0a 20 20 20 20 20 20 20 28 62 72 61 6e 63 68 20 28 61 6e 64 20 62 72 61 6e	h).rcp)........(branch.(and.bran
8400	63 68 20 28 63 6f 6e 63 61 74 20 22 6f 72 69 67 69 6e 2f 22 20 62 72 61 6e 63 68 29 29 29 0a 20	ch.(concat."origin/".branch)))..
8420	20 20 20 20 20 20 28 72 65 76 20 28 6f 72 20 63 6f 6d 6d 69 74 20 62 72 61 6e 63 68 20 22 6f 72	......(rev.(or.commit.branch."or
8440	69 67 69 6e 2f 48 45 41 44 22 29 29 0a 20 20 20 20 20 20 20 28 60 28 2c 72 65 76 2d 68 61 73 68	igin/HEAD"))........(`(,rev-hash
8460	20 2c 72 65 76 2d 74 69 6d 65 29 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 73 65 6c 65	.,rev-time).(package-build--sele
8480	63 74 2d 63 6f 6d 6d 69 74 20 72 63 70 20 72 65 76 20 63 6f 6d 6d 69 74 29 29 0a 20 20 20 20 20	ct-commit.rcp.rev.commit))......
84a0	20 20 28 60 28 2c 74 61 67 2d 68 61 73 68 20 2c 74 61 67 2d 74 69 6d 65 29 20 28 70 61 63 6b 61	..(`(,tag-hash.,tag-time).(packa
84c0	67 65 2d 62 75 69 6c 64 2d 74 61 67 2d 76 65 72 73 69 6f 6e 20 72 63 70 29 29 29 0a 20 20 20 20	ge-build-tag-version.rcp))).....
84e0	3b 3b 20 49 66 20 74 68 65 20 6c 61 74 65 73 74 20 63 6f 6d 6d 69 74 20 74 68 61 74 20 74 6f 75	;;.If.the.latest.commit.that.tou
8500	63 68 65 73 20 61 20 72 65 6c 65 76 61 6e 74 20 66 69 6c 65 20 69 73 20 61 6e 20 61 6e 63 65 73	ches.a.relevant.file.is.an.ances
8520	74 6f 72 20 6f 66 0a 20 20 20 20 3b 3b 20 74 68 65 20 6c 61 74 65 73 74 20 74 61 67 67 65 64 20	tor.of.....;;.the.latest.tagged.
8540	72 65 6c 65 61 73 65 20 61 6e 64 20 74 68 65 20 74 61 67 20 69 73 20 72 65 61 63 68 61 62 6c 65	release.and.the.tag.is.reachable
8560	20 66 72 6f 6d 20 6f 72 69 67 69 6e 2f 48 45 41 44 0a 20 20 20 20 3b 3b 20 28 69 2e 65 2e 2c 20	.from.origin/HEAD.....;;.(i.e.,.
8580	69 74 20 69 73 6e 27 74 20 6f 6e 20 61 20 73 65 70 61 72 61 74 65 20 72 65 6c 65 61 73 65 20 62	it.isn't.on.a.separate.release.b
85a0	72 61 6e 63 68 29 20 74 68 65 6e 20 75 73 65 20 74 68 65 20 74 61 67 67 65 64 0a 20 20 20 20 3b	ranch).then.use.the.tagged.....;
85c0	3b 20 72 65 6c 65 61 73 65 2e 20 20 53 6e 61 70 73 68 6f 74 73 20 73 68 6f 75 6c 64 20 6e 6f 74	;.release...Snapshots.should.not
85e0	20 62 65 20 6f 6c 64 65 72 20 74 68 61 6e 20 74 68 65 20 6c 61 74 65 73 74 20 72 65 6c 65 61 73	.be.older.than.the.latest.releas
8600	65 2e 0a 20 20 20 20 28 69 66 20 28 61 6e 64 20 74 61 67 2d 68 61 73 68 0a 20 20 20 20 20 20 20	e......(if.(and.tag-hash........
8620	20 20 20 20 20 20 28 7a 65 72 6f 70 20 28 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 22 67 69 74 22	......(zerop.(call-process."git"
8640	20 6e 69 6c 20 6e 69 6c 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.nil.nil.nil....................
8660	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 6d 65 72 67 65 2d 62 61 73 65 22 20 22 2d 2d 69	..............."merge-base"."--i
8680	73 2d 61 6e 63 65 73 74 6f 72 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	s-ancestor".....................
86a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 76 2d 68 61 73 68 20 74 61 67 2d 68 61 73 68 29	..............rev-hash.tag-hash)
86c0	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 7a 65 72 6f 70 20 28 63 61 6c 6c 2d 70 72 6f 63	)..............(zerop.(call-proc
86e0	65 73 73 20 22 67 69 74 22 20 6e 69 6c 20 6e 69 6c 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20	ess."git".nil.nil.nil...........
8700	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 6d 65 72 67 65 2d 62	........................"merge-b
8720	61 73 65 22 20 22 2d 2d 69 73 2d 61 6e 63 65 73 74 6f 72 22 0a 20 20 20 20 20 20 20 20 20 20 20	ase"."--is-ancestor"............
8740	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 61 67 2d 68 61 73 68 20	.......................tag-hash.
8760	72 65 76 29 29 29 0a 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 74 61 67 2d 68 61 73 68 20 74 61	rev))).........(list.tag-hash.ta
8780	67 2d 74 69 6d 65 29 0a 20 20 20 20 20 20 28 6c 69 73 74 20 72 65 76 2d 68 61 73 68 20 72 65 76	g-time).......(list.rev-hash.rev
87a0	2d 74 69 6d 65 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 70 61 63 6b 61 67 65	-time))))..(cl-defmethod.package
87c0	2d 62 75 69 6c 64 2d 2d 74 69 6d 65 73 74 61 6d 70 2d 76 65 72 73 69 6f 6e 20 28 28 72 63 70 20	-build--timestamp-version.((rcp.
87e0	70 61 63 6b 61 67 65 2d 68 67 2d 72 65 63 69 70 65 29 29 0a 20 20 28 70 63 61 73 65 2d 6c 65 74	package-hg-recipe))...(pcase-let
8800	2a 20 28 28 28 65 69 65 69 6f 20 63 6f 6d 6d 69 74 20 62 72 61 6e 63 68 29 20 72 63 70 29 0a 20	*.(((eieio.commit.branch).rcp)..
8820	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 76 20 28 66 6f 72 6d 61 74 20 22 73 6f 72 74	..............(rev.(format."sort
8840	28 61 6e 63 65 73 74 6f 72 73 28 25 73 29 2c 20 2d 72 65 76 29 22 0a 20 20 20 20 20 20 20 20 20	(ancestors(%s),.-rev)"..........
8860	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 63 6f 6d 6d 69 74 0a 20 20	...................(or.commit...
8880	20 20 20 20 20 20 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
88a0	6f 72 6d 61 74 20 22 6d 61 78 28 62 72 61 6e 63 68 28 25 73 29 29 22 0a 20 20 20 20 20 20 20 20	ormat."max(branch(%s))".........
88c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
88e0	28 6f 72 20 62 72 61 6e 63 68 20 22 64 65 66 61 75 6c 74 22 29 29 29 29 29 29 0a 20 20 20 20 28	(or.branch."default")))))).....(
8900	70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 73 65 6c 65 63 74 2d 63 6f 6d 6d 69 74 20 72 63 70	package-build--select-commit.rcp
8920	20 72 65 76 20 6e 69 6c 29 29 29 0a 0a 28 64 65 66 69 6e 65 2d 6f 62 73 6f 6c 65 74 65 2d 66 75	.rev.nil)))..(define-obsolete-fu
8940	6e 63 74 69 6f 6e 2d 61 6c 69 61 73 20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 67 65 74 2d	nction-alias.'package-build-get-
8960	73 6e 61 70 73 68 6f 74 2d 76 65 72 73 69 6f 6e 0a 20 20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c	snapshot-version...'package-buil
8980	64 2d 73 6e 61 70 73 68 6f 74 2d 76 65 72 73 69 6f 6e 20 22 50 61 63 6b 61 67 65 2d 42 75 69 6c	d-snapshot-version."Package-Buil
89a0	64 20 35 2e 30 2e 30 22 29 0a 0a 3b 3b 3b 3b 20 52 65 6c 65 61 73 65 2b 54 69 6d 65 73 74 61 6d	d.5.0.0")..;;;;.Release+Timestam
89c0	70 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 72 65 6c 65 61 73 65 2b	p..(defun.package-build-release+
89e0	74 69 6d 65 73 74 61 6d 70 2d 76 65 72 73 69 6f 6e 20 28 72 63 70 29 0a 20 20 22 44 65 74 65 72	timestamp-version.(rcp)..."Deter
8a00	6d 69 6e 65 20 76 65 72 73 69 6f 6e 20 73 74 72 69 6e 67 20 69 6e 20 74 68 65 20 5c 22 52 45 4c	mine.version.string.in.the.\"REL
8a20	45 41 53 45 2e 30 2e 54 49 4d 45 53 54 41 4d 50 5c 22 20 66 6f 72 6d 61 74 20 66 6f 72 20 52 43	EASE.0.TIMESTAMP\".format.for.RC
8a40	50 2e 0a 0a 55 73 65 20 60 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 72 65 6c 65 61 73 65 2d 76	P...Use.`package-build-release-v
8a60	65 72 73 69 6f 6e 2d 66 75 6e 63 74 69 6f 6e 73 27 20 74 6f 20 64 65 74 65 72 6d 69 6e 65 0a 52	ersion-functions'.to.determine.R
8a80	45 4c 45 41 53 45 2e 20 20 54 49 4d 45 53 54 41 4d 50 20 69 73 20 74 68 65 20 43 4f 4d 4d 49 54	ELEASE...TIMESTAMP.is.the.COMMIT
8aa0	54 45 52 2d 44 41 54 45 20 66 6f 72 20 74 68 65 20 69 64 65 6e 74 69 66 69 65 64 0a 6c 61 73 74	TER-DATE.for.the.identified.last
8ac0	20 72 65 6c 65 76 61 6e 74 20 63 6f 6d 6d 69 74 2c 20 75 73 69 6e 67 20 74 68 65 20 66 6f 72 6d	.relevant.commit,.using.the.form
8ae0	61 74 20 5c 22 25 59 25 6d 25 64 2e 25 48 25 4d 5c 22 2e 0a 0a 52 65 74 75 72 6e 20 28 43 4f 4d	at.\"%Y%m%d.%H%M\"...Return.(COM
8b00	4d 49 54 2d 48 41 53 48 20 43 4f 4d 4d 49 54 54 45 52 2d 44 41 54 45 20 56 45 52 53 49 4f 4e 2d	MIT-HASH.COMMITTER-DATE.VERSION-
8b20	53 54 52 49 4e 47 20 52 45 56 44 45 53 43 29 20 6f 72 20 6e 69 6c 2e 22 0a 20 20 28 70 63 61 73	STRING.REVDESC).or.nil."...(pcas
8b40	65 2d 6c 65 74 2a 0a 20 20 20 20 20 20 28 28 60 28 2c 73 63 6f 6d 6d 69 74 20 2c 73 74 69 6d 65	e-let*.......((`(,scommit.,stime
8b60	20 2c 73 76 65 72 73 69 6f 6e 29 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 74 69 6d 65 73	.,sversion).(package-build-times
8b80	74 61 6d 70 2d 76 65 72 73 69 6f 6e 20 72 63 70 29 29 0a 20 20 20 20 20 20 20 28 60 28 2c 72 63	tamp-version.rcp))........(`(,rc
8ba0	6f 6d 6d 69 74 20 2c 72 74 69 6d 65 20 2c 72 76 65 72 73 69 6f 6e 20 2c 72 72 65 76 64 65 73 63	ommit.,rtime.,rversion.,rrevdesc
8bc0	20 2c 74 61 67 29 0a 20 20 20 20 20 20 20 20 28 72 75 6e 2d 68 6f 6f 6b 2d 77 69 74 68 2d 61 72	.,tag).........(run-hook-with-ar
8be0	67 73 2d 75 6e 74 69 6c 2d 73 75 63 63 65 73 73 0a 20 20 20 20 20 20 20 20 20 27 70 61 63 6b 61	gs-until-success..........'packa
8c00	67 65 2d 62 75 69 6c 64 2d 72 65 6c 65 61 73 65 2d 76 65 72 73 69 6f 6e 2d 66 75 6e 63 74 69 6f	ge-build-release-version-functio
8c20	6e 73 20 72 63 70 29 29 0a 20 20 20 20 20 20 20 28 61 68 65 61 64 20 28 70 61 63 6b 61 67 65 2d	ns.rcp))........(ahead.(package-
8c40	62 75 69 6c 64 2d 2d 63 6f 6d 6d 69 74 2d 63 6f 75 6e 74 20 72 63 70 20 73 63 6f 6d 6d 69 74 20	build--commit-count.rcp.scommit.
8c60	72 63 6f 6d 6d 69 74 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 28 28 3e 20 61 68	rcommit))).....(cond......((>.ah
8c80	65 61 64 20 30 29 0a 20 20 20 20 20 20 28 6c 69 73 74 20 73 63 6f 6d 6d 69 74 20 73 74 69 6d 65	ead.0).......(list.scommit.stime
8ca0	0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 76 65 72 73 69 6f 6e 2d 6a 6f	.............(package-version-jo
8cc0	69 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 63 6f 6e 63 20 28 69 66 20 72 76 65 72 73	in..............(nconc.(if.rvers
8ce0	69 6f 6e 20 28 76 65 72 73 69 6f 6e 2d 74 6f 2d 6c 69 73 74 20 72 76 65 72 73 69 6f 6e 29 20 28	ion.(version-to-list.rversion).(
8d00	6c 69 73 74 20 30 20 30 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	list.0.0)).....................(
8d20	6c 69 73 74 20 30 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 76 65 72	list.0).....................(ver
8d40	73 69 6f 6e 2d 74 6f 2d 6c 69 73 74 20 73 76 65 72 73 69 6f 6e 29 29 29 0a 20 20 20 20 20 20 20	sion-to-list.sversion)))........
8d60	20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 72 65 76 64 65 73 63 20 72 63 70	.....(package-build--revdesc.rcp
8d80	20 73 63 6f 6d 6d 69 74 20 74 61 67 29 29 29 0a 20 20 20 20 20 28 74 0a 20 20 20 20 20 20 3b 3b	.scommit.tag)))......(t.......;;
8da0	20 54 68 65 20 6c 61 74 65 73 74 20 63 6f 6d 6d 69 74 2c 20 77 68 69 63 68 20 74 6f 75 63 68 65	.The.latest.commit,.which.touche
8dc0	64 20 61 20 72 65 6c 65 76 61 6e 74 20 66 69 6c 65 2c 20 69 73 20 65 69 74 68 65 72 20 74 68 65	d.a.relevant.file,.is.either.the
8de0	0a 20 20 20 20 20 20 3b 3b 20 6c 61 74 65 73 74 20 72 65 6c 65 61 73 65 20 69 74 73 65 6c 66 2c	.......;;.latest.release.itself,
8e00	20 6f 72 20 61 20 63 6f 6d 6d 69 74 20 62 65 66 6f 72 65 20 74 68 61 74 2e 20 20 44 69 73 74 72	.or.a.commit.before.that...Distr
8e20	69 62 75 74 65 20 74 68 65 0a 20 20 20 20 20 20 3b 3b 20 73 61 6d 65 20 63 6f 6d 6d 69 74 2f 72	ibute.the.......;;.same.commit/r
8e40	65 6c 65 61 73 65 20 61 73 20 6f 6e 20 74 68 65 20 73 74 61 62 6c 65 20 63 68 61 6e 6e 65 6c 3b	elease.as.on.the.stable.channel;
8e60	20 61 73 20 69 74 20 77 6f 75 6c 64 20 6e 6f 74 0a 20 20 20 20 20 20 3b 3b 20 6d 61 6b 65 20 73	.as.it.would.not.......;;.make.s
8e80	65 6e 73 65 20 66 6f 72 20 74 68 65 20 64 65 76 65 6c 6f 70 6d 65 6e 74 20 63 68 61 6e 6e 65 6c	ense.for.the.development.channel
8ea0	20 74 6f 20 6c 61 67 20 62 65 68 69 6e 64 20 74 68 65 20 6c 61 74 65 73 74 0a 20 20 20 20 20 20	.to.lag.behind.the.latest.......
8ec0	3b 3b 20 72 65 6c 65 61 73 65 2e 0a 20 20 20 20 20 20 28 6c 69 73 74 20 72 63 6f 6d 6d 69 74 20	;;.release........(list.rcommit.
8ee0	72 74 69 6d 65 20 28 70 61 63 6b 61 67 65 2d 76 65 72 73 69 6f 6e 2d 6a 6f 69 6e 20 72 76 65 72	rtime.(package-version-join.rver
8f00	73 69 6f 6e 29 20 72 72 65 76 64 65 73 63 20 74 61 67 29 29 29 29 29 0a 0a 3b 3b 3b 3b 20 52 65	sion).rrevdesc.tag)))))..;;;;.Re
8f20	6c 65 61 73 65 2b 43 6f 75 6e 74 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c	lease+Count..(defun.package-buil
8f40	64 2d 72 65 6c 65 61 73 65 2b 63 6f 75 6e 74 2d 76 65 72 73 69 6f 6e 20 28 72 63 70 20 26 6f 70	d-release+count-version.(rcp.&op
8f60	74 69 6f 6e 61 6c 20 73 69 6e 67 6c 65 2d 63 6f 75 6e 74 29 0a 20 20 22 44 65 74 65 72 6d 69 6e	tional.single-count)..."Determin
8f80	65 20 76 65 72 73 69 6f 6e 20 73 74 72 69 6e 67 20 69 6e 20 74 68 65 20 5c 22 52 45 4c 45 41 53	e.version.string.in.the.\"RELEAS
8fa0	45 2e 30 2e 43 4f 55 4e 54 5c 22 20 66 6f 72 6d 61 74 20 66 6f 72 20 52 43 50 2e 0a 0a 55 73 65	E.0.COUNT\".format.for.RCP...Use
8fc0	20 60 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 72 65 6c 65 61 73 65 2d 76 65 72 73 69 6f 6e 2d	.`package-build-release-version-
8fe0	66 75 6e 63 74 69 6f 6e 73 27 20 74 6f 20 64 65 74 65 72 6d 69 6e 65 0a 52 45 4c 45 41 53 45 2e	functions'.to.determine.RELEASE.
9000	20 20 43 4f 55 4e 54 20 69 73 20 74 68 65 20 6e 75 6d 62 65 72 20 6f 66 20 63 6f 6d 6d 69 74 73	..COUNT.is.the.number.of.commits
9020	20 73 69 6e 63 65 20 52 45 4c 45 41 53 45 20 75 6e 74 69 6c 20 74 68 65 0a 6c 61 73 74 20 72 65	.since.RELEASE.until.the.last.re
9040	6c 65 76 61 6e 74 20 63 6f 6d 6d 69 74 2e 20 20 49 66 20 52 45 4c 45 41 53 45 20 69 73 20 74 68	levant.commit...If.RELEASE.is.th
9060	65 20 73 61 6d 65 20 61 73 20 66 6f 72 20 74 68 65 20 6c 61 73 74 0a 73 6e 61 70 73 68 6f 74 20	e.same.as.for.the.last.snapshot.
9080	62 75 74 20 43 4f 55 4e 54 20 69 73 20 6e 6f 74 20 6c 61 72 67 65 72 20 74 68 61 6e 20 66 6f 72	but.COUNT.is.not.larger.than.for
90a0	20 74 68 61 74 20 73 6e 61 70 73 68 6f 74 20 62 65 63 61 75 73 65 0a 68 69 73 74 6f 72 79 20 77	.that.snapshot.because.history.w
90c0	61 73 20 72 65 77 72 69 74 74 65 6e 2c 20 74 68 65 6e 20 75 73 65 20 5c 22 52 45 4c 45 41 53 45	as.rewritten,.then.use.\"RELEASE
90e0	2e 30 2e 4f 4c 44 43 4f 55 4e 54 2e 4e 45 57 43 4f 55 4e 54 5c 22 2e 0a 0a 52 65 74 75 72 6e 20	.0.OLDCOUNT.NEWCOUNT\"...Return.
9100	28 43 4f 4d 4d 49 54 2d 48 41 53 48 20 43 4f 4d 4d 49 54 54 45 52 2d 44 41 54 45 20 56 45 52 53	(COMMIT-HASH.COMMITTER-DATE.VERS
9120	49 4f 4e 2d 53 54 52 49 4e 47 20 52 45 56 44 45 53 43 29 20 6f 72 20 6e 69 6c 2e 0a 5c 6e 28 66	ION-STRING.REVDESC).or.nil..\n(f
9140	6e 20 52 43 50 29 22 0a 20 20 28 70 63 61 73 65 2d 6c 65 74 2a 0a 20 20 20 20 20 20 3b 3b 20 47	n.RCP)"...(pcase-let*.......;;.G
9160	65 74 20 74 68 65 20 63 6f 6d 6d 69 74 20 62 75 74 20 69 67 6e 6f 72 65 20 74 68 65 20 61 73 73	et.the.commit.but.ignore.the.ass
9180	6f 63 69 61 74 65 64 20 74 69 6d 65 73 74 61 6d 70 2e 0a 20 20 20 20 20 20 28 28 60 28 2c 73 63	ociated.timestamp........((`(,sc
91a0	6f 6d 6d 69 74 20 2c 73 74 69 6d 65 20 2c 5f 29 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d	ommit.,stime.,_).(package-build-
91c0	74 69 6d 65 73 74 61 6d 70 2d 76 65 72 73 69 6f 6e 20 72 63 70 29 29 0a 20 20 20 20 20 20 20 28	timestamp-version.rcp))........(
91e0	60 28 2c 72 63 6f 6d 6d 69 74 20 2c 72 74 69 6d 65 20 2c 76 65 72 73 69 6f 6e 20 2c 72 72 65 76	`(,rcommit.,rtime.,version.,rrev
9200	64 65 73 63 20 2c 74 61 67 29 0a 20 20 20 20 20 20 20 20 28 72 75 6e 2d 68 6f 6f 6b 2d 77 69 74	desc.,tag).........(run-hook-wit
9220	68 2d 61 72 67 73 2d 75 6e 74 69 6c 2d 73 75 63 63 65 73 73 0a 20 20 20 20 20 20 20 20 20 27 70	h-args-until-success..........'p
9240	61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 72 65 6c 65 61 73 65 2d 76 65 72 73 69 6f 6e 2d 66 75 6e	ackage-build-release-version-fun
9260	63 74 69 6f 6e 73 20 72 63 70 29 29 0a 20 20 20 20 20 20 20 28 76 65 72 73 69 6f 6e 20 28 61 6e	ctions.rcp))........(version.(an
9280	64 20 72 63 6f 6d 6d 69 74 20 28 76 65 72 73 69 6f 6e 2d 74 6f 2d 6c 69 73 74 20 76 65 72 73 69	d.rcommit.(version-to-list.versi
92a0	6f 6e 29 29 29 0a 20 20 20 20 20 20 20 28 6d 65 72 67 65 2d 62 61 73 65 20 28 61 6e 64 20 72 63	on)))........(merge-base.(and.rc
92c0	6f 6d 6d 69 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 28 70	ommit.........................(p
92e0	61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 6d 65 72 67 65 2d 62 61 73 65 20 72 63 70 20 73 63 6f	ackage-build--merge-base.rcp.sco
9300	6d 6d 69 74 20 72 63 6f 6d 6d 69 74 29 29 29 0a 20 20 20 20 20 20 20 28 61 68 65 61 64 20 28 70	mmit.rcommit)))........(ahead.(p
9320	61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 63 6f 6d 6d 69 74 2d 63 6f 75 6e 74 20 72 63 70 20 73	ackage-build--commit-count.rcp.s
9340	63 6f 6d 6d 69 74 20 72 63 6f 6d 6d 69 74 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20	commit.rcommit))).....(cond.....
9360	20 28 28 6f 72 20 28 77 68 65 6e 20 28 6e 6f 74 20 72 63 6f 6d 6d 69 74 29 0a 20 20 20 20 20 20	.((or.(when.(not.rcommit).......
9380	20 20 20 20 20 20 3b 3b 20 4e 6f 20 61 70 70 72 6f 70 72 69 61 74 65 20 72 65 6c 65 61 73 65 20	......;;.No.appropriate.release.
93a0	64 65 74 65 63 74 65 64 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 76 65 72 73	detected..............(setq.vers
93c0	69 6f 6e 20 28 6c 69 73 74 20 30 20 30 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 74 29 0a 20	ion.(list.0.0)).............t)..
93e0	20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 6e 6f 74 20 6d 65 72 67 65 2d 62 61 73 65 29 0a	.........(when.(not.merge-base).
9400	20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 41 73 20 61 20 72 65 73 75 6c 74 20 6f 66 20 62 75	............;;.As.a.result.of.bu
9420	74 63 68 65 72 65 64 20 68 69 73 74 6f 72 79 20 72 65 77 72 69 74 69 6e 67 2c 20 76 65 72 73 69	tchered.history.rewriting,.versi
9440	6f 6e 20 74 61 67 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 73 68 61 72 65 20 6e 6f 20	on.tags.............;;.share.no.
9460	68 69 73 74 6f 72 79 20 61 74 20 61 6c 6c 20 77 69 74 68 20 77 68 61 74 20 69 73 20 63 75 72 72	history.at.all.with.what.is.curr
9480	65 6e 74 6c 79 20 72 65 61 63 68 61 62 6c 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 66	ently.reachable.............;;.f
94a0	72 6f 6d 20 74 68 65 20 74 69 70 2e 20 20 43 6f 6d 70 6c 65 74 65 6c 79 20 69 67 6e 6f 72 65 20	rom.the.tip...Completely.ignore.
94c0	74 68 65 73 65 20 75 6e 72 65 61 63 68 61 62 6c 65 20 74 61 67 73 20 61 6e 64 0a 20 20 20 20 20	these.unreachable.tags.and......
94e0	20 20 20 20 20 20 20 3b 3b 20 62 65 68 61 76 65 20 61 73 20 69 66 20 6e 6f 20 76 65 72 73 69 6f	.......;;.behave.as.if.no.versio
9500	6e 20 74 61 67 73 20 65 78 69 73 74 65 64 20 61 74 20 61 6c 6c 2e 20 20 55 6e 66 6f 72 74 75 6e	n.tags.existed.at.all...Unfortun
9520	61 74 65 6c 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 74 68 61 74 20 6d 65 61 6e 73 20	ately.............;;.that.means.
9540	74 68 61 74 20 75 73 65 72 73 2c 20 77 68 6f 20 68 61 76 65 20 69 6e 73 74 61 6c 6c 65 64 20 61	that.users,.who.have.installed.a
9560	20 73 6e 61 70 73 68 6f 74 20 62 61 73 65 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6f	.snapshot.based.............;;.o
9580	6e 20 61 20 6e 6f 77 20 61 62 61 6e 64 6f 6e 65 64 20 74 61 67 2c 20 61 72 65 20 73 74 75 63 6b	n.a.now.abandoned.tag,.are.stuck
95a0	20 6f 6e 20 74 68 61 74 20 73 6e 61 70 73 68 6f 74 20 75 6e 74 69 6c 0a 20 20 20 20 20 20 20 20	.on.that.snapshot.until.........
95c0	20 20 20 20 3b 3b 20 75 70 73 74 72 65 61 6d 20 63 72 65 61 74 65 73 20 61 20 6e 65 77 20 76 65	....;;.upstream.creates.a.new.ve
95e0	72 73 69 6f 6e 20 74 61 67 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 76 65 72	rsion.tag..............(setq.ver
9600	73 69 6f 6e 20 28 6c 69 73 74 20 30 20 30 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 74 29 0a	sion.(list.0.0)).............t).
9620	20 20 20 20 20 20 20 20 20 20 3b 3b 20 53 6e 61 70 73 68 6f 74 20 63 6f 6d 6d 69 74 20 69 73 20	..........;;.Snapshot.commit.is.
9640	6e 65 77 65 72 20 74 68 61 6e 20 6c 61 74 65 73 74 20 72 65 6c 65 61 73 65 20 28 6f 72 20 74 68	newer.than.latest.release.(or.th
9660	65 72 65 20 69 73 20 6e 6f 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 72 65 6c 65 61 73 65 29 2e	ere.is.no...........;;.release).
9680	0a 20 20 20 20 20 20 20 20 20 20 28 3e 20 61 68 65 61 64 20 30 29 29 0a 20 20 20 20 20 20 28 6c	...........(>.ahead.0)).......(l
96a0	69 73 74 20 73 63 6f 6d 6d 69 74 20 73 74 69 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70	ist.scommit.stime.............(p
96c0	61 63 6b 61 67 65 2d 76 65 72 73 69 6f 6e 2d 6a 6f 69 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20	ackage-version-join.............
96e0	20 28 61 70 70 65 6e 64 20 76 65 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.(append.version................
9700	20 20 20 20 20 20 28 6c 69 73 74 20 30 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	......(list.0)..................
9720	20 20 20 20 3b 3b 20 28 54 68 69 73 20 61 72 67 75 6d 65 6e 74 20 2a 63 6f 75 6c 64 2a 20 62 65	....;;.(This.argument.could.be
9740	20 75 73 65 64 20 62 79 20 61 20 77 72 61 70 70 65 72 2e 29 0a 20 20 20 20 20 20 20 20 20 20 20	.used.by.a.wrapper.)............
9760	20 20 20 20 20 20 20 20 20 20 28 69 66 20 73 69 6e 67 6c 65 2d 63 6f 75 6e 74 0a 20 20 20 20 20	..........(if.single-count......
9780	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 68 65 61 64 20 3b 20 50 72 65 74	....................ahead.;.Pret
97a0	65 6e 64 20 74 69 6d 65 2d 74 72 61 76 65 6c 20 64 6f 65 73 6e 27 74 20 68 61 70 70 65 6e 2e 0a	end.time-travel.doesn't.happen..
97c0	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 61 63 6b 61 67 65 2d	.......................(package-
97e0	62 75 69 6c 64 2d 2d 61 64 6a 75 73 74 2d 63 6f 6d 6d 69 74 2d 63 6f 75 6e 74 0a 20 20 20 20 20	build--adjust-commit-count......
9800	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 63 70 20 73 63 6f 6d 6d 69 74 20 28	...................rcp.scommit.(
9820	63 6f 70 79 2d 73 65 71 75 65 6e 63 65 20 76 65 72 73 69 6f 6e 29 20 61 68 65 61 64 29 29 29 29	copy-sequence.version).ahead))))
9840	0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 72 65 76	.............(package-build--rev
9860	64 65 73 63 20 72 63 70 20 73 63 6f 6d 6d 69 74 20 74 61 67 29 29 29 0a 20 20 20 20 20 28 74 0a	desc.rcp.scommit.tag)))......(t.
9880	20 20 20 20 20 20 3b 3b 20 54 68 65 20 6c 61 74 65 73 74 20 63 6f 6d 6d 69 74 2c 20 77 68 69 63	......;;.The.latest.commit,.whic
98a0	68 20 74 6f 75 63 68 65 64 20 61 20 72 65 6c 65 76 61 6e 74 20 66 69 6c 65 2c 20 69 73 20 65 69	h.touched.a.relevant.file,.is.ei
98c0	74 68 65 72 20 74 68 65 0a 20 20 20 20 20 20 3b 3b 20 6c 61 74 65 73 74 20 72 65 6c 65 61 73 65	ther.the.......;;.latest.release
98e0	20 69 74 73 65 6c 66 2c 20 6f 72 20 61 20 63 6f 6d 6d 69 74 20 62 65 66 6f 72 65 20 74 68 61 74	.itself,.or.a.commit.before.that
9900	2e 20 20 44 69 73 74 72 69 62 75 74 65 20 74 68 65 0a 20 20 20 20 20 20 3b 3b 20 73 61 6d 65 20	...Distribute.the.......;;.same.
9920	63 6f 6d 6d 69 74 2f 72 65 6c 65 61 73 65 20 61 73 20 6f 6e 20 74 68 65 20 73 74 61 62 6c 65 20	commit/release.as.on.the.stable.
9940	63 68 61 6e 6e 65 6c 3b 20 61 73 20 69 74 20 77 6f 75 6c 64 20 6e 6f 74 0a 20 20 20 20 20 20 3b	channel;.as.it.would.not.......;
9960	3b 20 6d 61 6b 65 20 73 65 6e 73 65 20 66 6f 72 20 74 68 65 20 64 65 76 65 6c 6f 70 6d 65 6e 74	;.make.sense.for.the.development
9980	20 63 68 61 6e 6e 65 6c 20 74 6f 20 6c 61 67 20 62 65 68 69 6e 64 20 74 68 65 20 6c 61 74 65 73	.channel.to.lag.behind.the.lates
99a0	74 0a 20 20 20 20 20 20 3b 3b 20 72 65 6c 65 61 73 65 2e 0a 20 20 20 20 20 20 28 6c 69 73 74 20	t.......;;.release........(list.
99c0	72 63 6f 6d 6d 69 74 20 72 74 69 6d 65 20 28 70 61 63 6b 61 67 65 2d 76 65 72 73 69 6f 6e 2d 6a	rcommit.rtime.(package-version-j
99e0	6f 69 6e 20 76 65 72 73 69 6f 6e 29 20 72 72 65 76 64 65 73 63 20 74 61 67 29 29 29 29 29 0a 0a	oin.version).rrevdesc.tag)))))..
9a00	28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 61 64 6a 75 73 74 2d 63 6f 6d	(defun.package-build--adjust-com
9a20	6d 69 74 2d 63 6f 75 6e 74 20 28 72 63 70 20 63 6f 6d 6d 69 74 20 76 65 72 73 69 6f 6e 20 61 68	mit-count.(rcp.commit.version.ah
9a40	65 61 64 29 0a 20 20 28 69 66 2d 6c 65 74 20 28 28 70 72 65 76 69 6f 75 73 20 28 63 64 72 20 28	ead)...(if-let.((previous.(cdr.(
9a60	61 73 73 71 20 28 69 6e 74 65 72 6e 20 28 6f 72 65 66 20 72 63 70 20 6e 61 6d 65 29 29 0a 20 20	assq.(intern.(oref.rcp.name))...
9a80	20 20 20 20 20 20 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	..............................(p
9aa0	61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 61 72 63 68 69 76 65 2d 61 6c 69 73 74 29 29 29 29 29 0a	ackage-build-archive-alist))))).
9ac0	20 20 20 20 20 20 3b 3b 20 42 65 63 61 75 73 65 20 75 70 73 74 72 65 61 6d 20 6d 61 79 20 68 61	......;;.Because.upstream.may.ha
9ae0	76 65 20 72 65 77 72 69 74 74 65 6e 20 68 69 73 74 6f 72 79 2c 20 77 65 20 63 61 6e 6e 6f 74 20	ve.rewritten.history,.we.cannot.
9b00	62 65 20 63 65 72 74 61 69 6e 0a 20 20 20 20 20 20 3b 3b 20 74 68 61 74 20 61 70 70 65 6e 64 69	be.certain.......;;.that.appendi
9b20	6e 67 20 74 68 65 20 6e 65 77 20 63 6f 75 6e 74 20 6f 66 20 63 6f 6d 6d 69 74 73 20 77 6f 75 6c	ng.the.new.count.of.commits.woul
9b40	64 20 72 65 73 75 6c 74 20 69 6e 20 61 20 76 65 72 73 69 6f 6e 0a 20 20 20 20 20 20 3b 3b 20 73	d.result.in.a.version.......;;.s
9b60	74 72 69 6e 67 20 74 68 61 74 20 69 73 20 67 72 65 61 74 65 72 20 74 68 61 6e 20 74 68 65 20 76	tring.that.is.greater.than.the.v
9b80	65 72 73 69 6f 6e 20 73 74 72 69 6e 67 20 75 73 65 64 20 66 6f 72 20 74 68 65 0a 20 20 20 20 20	ersion.string.used.for.the......
9ba0	20 3b 3b 20 70 72 65 76 69 6f 75 73 20 73 6e 61 70 73 68 6f 74 2e 0a 20 20 20 20 20 20 28 6c 65	.;;.previous.snapshot........(le
9bc0	74 20 28 28 63 6f 75 6e 74 20 28 6c 69 73 74 20 61 68 65 61 64 29 29 0a 20 20 20 20 20 20 20 20	t.((count.(list.ahead)).........
9be0	20 20 20 20 28 70 76 65 72 73 69 6f 6e 20 28 61 72 65 66 20 70 72 65 76 69 6f 75 73 20 30 29 29	....(pversion.(aref.previous.0))
9c00	0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 63 6f 6d 6d 69 74 20 28 61 6c 69 73 74 2d 67 65 74	.............(pcommit.(alist-get
9c20	20 3a 63 6f 6d 6d 69 74 20 28 61 72 65 66 20 70 72 65 76 69 6f 75 73 20 34 29 29 29 0a 20 20 20	.:commit.(aref.previous.4)))....
9c40	20 20 20 20 20 20 20 20 20 28 70 63 6f 75 6e 74 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 28	.........(pcount.nil)).........(
9c60	77 68 65 6e 20 28 61 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 49 66 20 74	when.(and................;;.If.t
9c80	68 65 72 65 20 69 73 20 6e 6f 20 7a 65 72 6f 20 70 61 72 74 2c 20 74 68 65 6e 20 77 65 20 6b 6e	here.is.no.zero.part,.then.we.kn
9ca0	6f 77 20 74 68 61 74 20 74 68 65 20 70 72 65 76 69 6f 75 73 0a 20 20 20 20 20 20 20 20 20 20 20	ow.that.the.previous............
9cc0	20 20 20 20 3b 3b 20 73 6e 61 70 73 68 6f 74 20 65 78 61 63 74 6c 79 20 6d 61 74 63 68 65 64 20	....;;.snapshot.exactly.matched.
9ce0	61 20 74 61 67 67 65 64 20 72 65 6c 65 61 73 65 20 28 69 6e 20 77 68 69 63 68 20 63 61 73 65 0a	a.tagged.release.(in.which.case.
9d00	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 77 65 20 64 6f 20 6e 6f 74 20 61 70 70 65	...............;;.we.do.not.appe
9d20	6e 64 20 7a 65 72 6f 20 61 6e 64 20 74 68 65 20 63 6f 75 6e 74 29 2e 0a 20 20 20 20 20 20 20 20	nd.zero.and.the.count)..........
9d40	20 20 20 20 20 20 20 28 6d 65 6d 71 20 30 20 70 76 65 72 73 69 6f 6e 29 0a 20 20 20 20 20 20 20	.......(memq.0.pversion)........
9d60	20 20 20 20 20 20 20 20 3b 3b 20 4c 69 6b 65 77 69 73 65 20 69 66 20 74 68 65 72 65 20 69 73 20	........;;.Likewise.if.there.is.
9d80	61 20 74 61 67 20 74 68 61 74 20 65 78 61 63 74 6c 79 20 6d 61 74 63 68 65 73 20 74 68 65 0a 20	a.tag.that.exactly.matches.the..
9da0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 70 72 65 76 69 6f 75 73 20 28 6e 6f 6e 2d 29	..............;;.previous.(non-)
9dc0	73 6e 61 70 73 68 6f 74 2c 20 74 68 65 6e 20 74 68 65 72 65 20 69 73 20 6e 6f 20 6f 6c 64 20 63	snapshot,.then.there.is.no.old.c
9de0	6f 75 6e 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 77 68 69 63 68 20 77 65 20	ount................;;.which.we.
9e00	77 6f 75 6c 64 20 68 61 76 65 20 74 6f 20 63 6f 6d 70 61 72 65 20 77 69 74 68 20 74 68 65 20 6e	would.have.to.compare.with.the.n
9e20	65 77 20 63 6f 75 6e 74 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 6d	ew.count.................(not.(m
9e40	65 6d 62 65 72 20 28 6d 61 70 63 6f 6e 63 61 74 20 23 27 6e 75 6d 62 65 72 2d 74 6f 2d 73 74 72	ember.(mapconcat.#'number-to-str
9e60	69 6e 67 20 70 76 65 72 73 69 6f 6e 20 22 2e 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ing.pversion.".")...............
9e80	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 6c 69	..............(package-build--li
9ea0	73 74 2d 74 61 67 73 20 72 63 70 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 54 68 65	st-tags.rcp))))...........;;.The
9ec0	20 70 72 65 76 69 6f 75 73 20 73 6e 61 70 73 68 6f 74 20 64 6f 65 73 20 6e 6f 74 20 65 78 61 63	.previous.snapshot.does.not.exac
9ee0	74 6c 79 20 6d 61 74 63 68 20 61 20 74 61 67 67 65 64 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20	tly.match.a.tagged...........;;.
9f00	76 65 72 73 69 6f 6e 2e 20 20 57 65 20 6d 75 73 74 20 73 70 6c 69 74 20 74 68 65 20 76 65 72 73	version...We.must.split.the.vers
9f20	69 6f 6e 20 73 74 72 69 6e 67 20 69 6e 74 6f 20 69 74 73 20 74 61 67 0a 20 20 20 20 20 20 20 20	ion.string.into.its.tag.........
9f40	20 20 3b 3b 20 61 6e 64 20 63 6f 75 6e 74 20 70 61 72 74 73 2e 20 20 54 68 65 20 6c 61 73 74 20	..;;.and.count.parts...The.last.
9f60	7a 65 72 6f 20 70 61 72 74 20 69 73 20 74 68 65 20 62 6f 75 6e 64 61 72 79 2e 0a 20 20 20 20 20	zero.part.is.the.boundary.......
9f80	20 20 20 20 20 28 6c 65 74 20 28 28 73 70 6c 69 74 20 28 63 6c 2d 70 6f 73 69 74 69 6f 6e 20 30	.....(let.((split.(cl-position.0
9fa0	20 70 76 65 72 73 69 6f 6e 20 3a 66 72 6f 6d 2d 65 6e 64 20 74 29 29 0a 20 20 20 20 20 20 20 20	.pversion.:from-end.t)).........
9fc0	20 20 20 20 20 20 20 20 28 69 20 30 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74	........(i.0).................(t
9fe0	61 67 67 65 64 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28	agged.nil)).............(while.(
a000	3c 20 69 20 73 70 6c 69 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 28	<.i.split)...............(push.(
a020	70 6f 70 20 70 76 65 72 73 69 6f 6e 29 20 74 61 67 67 65 64 29 0a 20 20 20 20 20 20 20 20 20 20	pop.pversion).tagged)...........
a040	20 20 20 20 28 63 6c 2d 69 6e 63 66 20 69 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65	....(cl-incf.i)).............(se
a060	74 71 20 70 63 6f 75 6e 74 20 28 63 64 72 20 70 76 65 72 73 69 6f 6e 29 29 0a 20 20 20 20 20 20	tq.pcount.(cdr.pversion)).......
a080	20 20 20 20 20 20 28 73 65 74 71 20 70 76 65 72 73 69 6f 6e 20 28 6e 72 65 76 65 72 73 65 20 74	......(setq.pversion.(nreverse.t
a0a0	61 67 67 65 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 44 65 74 65 72 6d 69 6e 65 20	agged)))...........;;.Determine.
a0c0	77 68 65 74 68 65 72 20 77 65 20 63 61 6e 20 72 65 73 65 74 20 6f 72 20 69 6e 63 72 65 61 73 65	whether.we.can.reset.or.increase
a0e0	20 74 68 65 20 63 6f 75 6e 74 2c 20 6f 72 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 77 68 65 74	.the.count,.or...........;;.whet
a100	68 65 72 20 77 65 20 68 61 76 65 20 74 6f 20 70 72 65 73 65 72 76 65 20 74 68 65 20 6f 6c 64 20	her.we.have.to.preserve.the.old.
a120	63 6f 75 6e 74 20 64 75 65 20 74 6f 20 72 65 77 72 69 74 74 65 6e 0a 20 20 20 20 20 20 20 20 20	count.due.to.rewritten..........
a140	20 3b 3b 20 68 69 73 74 6f 72 79 20 69 6e 20 6f 72 64 65 72 20 74 6f 20 65 6e 73 75 72 65 20 74	.;;.history.in.order.to.ensure.t
a160	68 61 74 20 74 68 65 20 6e 65 77 20 73 6e 61 70 73 68 6f 74 20 76 65 72 73 69 6f 6e 20 69 73 0a	hat.the.new.snapshot.version.is.
a180	20 20 20 20 20 20 20 20 20 20 3b 3b 20 67 72 65 61 74 65 72 20 74 68 61 6e 20 74 68 65 20 70 72	..........;;.greater.than.the.pr
a1a0	65 76 69 6f 75 73 20 73 6e 61 70 73 68 6f 74 2e 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 0a 20 20	evious.snapshot............;;...
a1c0	20 20 20 20 20 20 20 20 3b 3b 20 49 66 20 74 68 65 20 70 72 65 76 69 6f 75 73 20 61 6e 64 20 63	........;;.If.the.previous.and.c
a1e0	75 72 72 65 6e 74 20 73 6e 61 70 73 68 6f 74 20 63 6f 6d 6d 69 74 73 20 64 6f 20 6e 6f 74 20 66	urrent.snapshot.commits.do.not.f
a200	6f 6c 6c 6f 77 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 74 68 65 20 73 61 6d 65 20 74 61 67 2c	ollow...........;;.the.same.tag,
a220	20 74 68 65 6e 20 74 68 65 69 72 20 72 65 73 70 65 63 74 69 76 65 20 63 6f 75 6e 74 73 20 6f 66	.then.their.respective.counts.of
a240	20 63 6f 6d 6d 69 74 73 20 73 69 6e 63 65 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 74 68 65 69	.commits.since...........;;.thei
a260	72 20 72 65 73 70 65 63 74 69 76 65 20 74 61 67 20 68 61 76 65 20 6e 6f 20 72 65 6c 61 74 69 6f	r.respective.tag.have.no.relatio
a280	6e 20 74 6f 20 65 61 63 68 20 6f 74 68 65 72 20 61 6e 64 20 77 65 0a 20 20 20 20 20 20 20 20 20	n.to.each.other.and.we..........
a2a0	20 3b 3b 20 63 61 6e 20 73 69 6d 70 6c 79 20 72 65 73 65 74 20 74 68 65 20 63 6f 75 6e 74 2c 20	.;;.can.simply.reset.the.count,.
a2c0	64 65 74 65 72 6d 69 6e 65 64 20 61 62 6f 76 65 2e 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65	determined.above............(whe
a2e0	6e 20 28 65 71 75 61 6c 20 76 65 72 73 69 6f 6e 20 70 76 65 72 73 69 6f 6e 29 0a 20 20 20 20 20	n.(equal.version.pversion)......
a300	20 20 20 20 20 20 20 28 69 66 20 28 65 71 75 61 6c 20 63 6f 6d 6d 69 74 20 70 63 6f 6d 6d 69 74	.......(if.(equal.commit.pcommit
a320	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 49 66 20 77 65 20 61 72 65 20 62	).................;;.If.we.are.b
a340	75 69 6c 64 69 6e 67 20 74 68 65 20 73 61 6d 65 20 63 6f 6d 6d 69 74 20 61 73 20 6c 61 73 74 20	uilding.the.same.commit.as.last.
a360	74 69 6d 65 20 28 61 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6e 6f 20	time.(and.................;;.no.
a380	6e 65 77 20 74 61 67 20 61 70 70 65 61 72 65 64 29 2c 20 74 68 65 6e 20 77 65 20 75 73 65 20 74	new.tag.appeared),.then.we.use.t
a3a0	68 65 20 73 61 6d 65 20 63 6f 75 6e 74 20 61 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	he.same.count.as................
a3c0	20 3b 3b 20 6c 61 73 74 20 74 69 6d 65 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	.;;.last.time..................(
a3e0	73 65 74 71 20 63 6f 75 6e 74 20 70 63 6f 75 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	setq.count.pcount)..............
a400	20 3b 3b 20 49 66 20 74 68 65 20 6e 65 77 20 63 6f 75 6e 74 20 69 73 20 6e 6f 74 20 6c 61 72 67	.;;.If.the.new.count.is.not.larg
a420	65 72 20 74 68 61 6e 20 74 68 65 20 6f 6c 64 2c 20 74 68 65 6e 20 77 65 0a 20 20 20 20 20 20 20	er.than.the.old,.then.we........
a440	20 20 20 20 20 20 20 3b 3b 20 6b 65 65 70 20 74 68 65 20 6f 6c 64 20 63 6f 75 6e 74 20 61 6e 64	.......;;.keep.the.old.count.and
a460	20 61 70 70 65 6e 64 20 74 68 65 20 6e 65 77 20 63 6f 75 6e 74 2e 0a 20 20 20 20 20 20 20 20 20	.append.the.new.count...........
a480	20 20 20 20 20 3b 3b 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 57 65 20 6d 61 79 20	.....;;...............;;.We.may.
a4a0	68 61 76 65 20 68 61 64 20 74 6f 20 64 6f 20 74 68 61 74 20 66 6f 72 20 70 72 65 76 69 6f 75 73	have.had.to.do.that.for.previous
a4c0	20 73 6e 61 70 73 68 6f 74 73 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 70 6f 73	.snapshots,...............;;.pos
a4e0	73 69 62 6c 79 20 65 76 65 6e 20 66 6f 72 20 6d 75 6c 74 69 70 6c 65 20 63 6f 6e 73 65 63 75 74	sibly.even.for.multiple.consecut
a500	69 76 65 20 73 6e 61 70 73 68 6f 74 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20	ive.snapshots................;;.
a520	42 65 67 69 6e 6e 69 6e 67 20 61 74 20 74 68 65 20 65 6e 64 2c 20 73 63 72 61 70 65 20 6f 66 66	Beginning.at.the.end,.scrape.off
a540	20 61 6c 6c 20 63 6f 75 6e 74 73 20 74 68 61 74 20 61 72 65 0a 20 20 20 20 20 20 20 20 20 20 20	.all.counts.that.are............
a560	20 20 20 3b 3b 20 73 6d 61 6c 6c 65 72 20 74 68 61 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 63	...;;.smaller.than.the.current.c
a580	6f 75 6e 74 2c 20 62 75 74 20 6c 65 61 76 65 20 74 68 65 20 6f 74 68 65 72 73 0a 20 20 20 20 20	ount,.but.leave.the.others......
a5a0	20 20 20 20 20 20 20 20 20 3b 3b 20 69 6e 74 61 63 74 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20	.........;;.intact..............
a5c0	20 20 28 73 65 74 71 20 70 63 6f 75 6e 74 20 28 6e 72 65 76 65 72 73 65 20 70 63 6f 75 6e 74 29	..(setq.pcount.(nreverse.pcount)
a5e0	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 61 6e 64 20 70 63 6f 75	)...............(while.(and.pcou
a600	6e 74 20 28 3e 20 61 68 65 61 64 20 28 63 61 72 20 70 63 6f 75 6e 74 29 29 29 0a 20 20 20 20 20	nt.(>.ahead.(car.pcount)))......
a620	20 20 20 20 20 20 20 20 20 20 20 28 70 6f 70 20 70 63 6f 75 6e 74 29 29 0a 20 20 20 20 20 20 20	...........(pop.pcount))........
a640	20 20 20 20 20 20 20 28 77 68 65 6e 20 70 63 6f 75 6e 74 0a 20 20 20 20 20 20 20 20 20 20 20 20	.......(when.pcount.............
a660	20 20 20 20 3b 3b 20 54 68 69 73 20 73 6e 61 70 73 68 6f 74 20 69 73 20 62 61 73 65 64 20 6f 6e	....;;.This.snapshot.is.based.on
a680	20 74 68 65 20 73 61 6d 65 20 74 61 67 20 61 73 20 74 68 65 20 70 72 65 76 69 6f 75 73 0a 20 20	.the.same.tag.as.the.previous...
a6a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 73 6e 61 70 73 68 6f 74 20 61 6e 64 2c 20 64	..............;;.snapshot.and,.d
a6c0	75 65 20 74 6f 20 68 69 73 74 6f 72 79 20 72 65 77 72 69 74 69 6e 67 2c 20 74 68 65 20 63 6f 75	ue.to.history.rewriting,.the.cou
a6e0	6e 74 20 64 69 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6e 6f 74 20 69 6e	nt.did.................;;.not.in
a700	63 72 65 61 73 65 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 6f	crease..................(setq.co
a720	75 6e 74 20 28 6e 72 65 76 65 72 73 65 20 28 63 6f 6e 73 20 28 63 61 72 20 63 6f 75 6e 74 29 20	unt.(nreverse.(cons.(car.count).
a740	70 63 6f 75 6e 74 29 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 63 6f 75 6e 74 29 0a 20 20 20	pcount))))))).........count)....
a760	20 28 6c 69 73 74 20 61 68 65 61 64 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 70	.(list.ahead)))..(cl-defmethod.p
a780	61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 6d 65 72 67 65 2d 62 61 73 65 20 28 28 5f 72 63 70 20	ackage-build--merge-base.((_rcp.
a7a0	70 61 63 6b 61 67 65 2d 67 69 74 2d 72 65 63 69 70 65 29 20 61 20 62 29 0a 20 20 28 69 67 6e 6f	package-git-recipe).a.b)...(igno
a7c0	72 65 2d 65 72 72 6f 72 73 20 28 63 61 72 20 28 70 72 6f 63 65 73 73 2d 6c 69 6e 65 73 20 22 67	re-errors.(car.(process-lines."g
a7e0	69 74 22 20 22 6d 65 72 67 65 2d 62 61 73 65 22 20 61 20 62 29 29 29 29 0a 0a 28 63 6c 2d 64 65	it"."merge-base".a.b))))..(cl-de
a800	66 6d 65 74 68 6f 64 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 6d 65 72 67 65 2d 62 61 73	fmethod.package-build--merge-bas
a820	65 20 28 28 5f 72 63 70 20 70 61 63 6b 61 67 65 2d 68 67 2d 72 65 63 69 70 65 29 20 61 20 62 29	e.((_rcp.package-hg-recipe).a.b)
a840	0a 20 20 28 63 61 72 20 28 70 72 6f 63 65 73 73 2d 6c 69 6e 65 73 20 22 68 67 22 20 22 6c 6f 67	...(car.(process-lines."hg"."log
a860	22 20 22 2d 2d 74 65 6d 70 6c 61 74 65 22 20 22 7b 6e 6f 64 65 7d 5c 5c 6e 22 20 22 2d 2d 72 65	"."--template"."{node}\\n"."--re
a880	76 22 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 6d 61 74	v".......................(format
a8a0	20 22 61 6e 63 65 73 74 6f 72 28 25 73 2c 20 25 73 29 22 20 61 20 62 29 29 29 29 0a 0a 28 63 6c	."ancestor(%s,.%s)".a.b))))..(cl
a8c0	2d 64 65 66 6d 65 74 68 6f 64 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 63 6f 6d 6d 69 74	-defmethod.package-build--commit
a8e0	2d 63 6f 75 6e 74 20 28 28 5f 72 63 70 20 70 61 63 6b 61 67 65 2d 67 69 74 2d 72 65 63 69 70 65	-count.((_rcp.package-git-recipe
a900	29 20 72 65 76 20 73 69 6e 63 65 29 0a 20 20 28 73 74 72 69 6e 67 2d 74 6f 2d 6e 75 6d 62 65 72	).rev.since)...(string-to-number
a920	0a 20 20 20 28 63 61 72 20 28 69 66 20 73 69 6e 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 28	....(car.(if.since.............(
a940	70 72 6f 63 65 73 73 2d 6c 69 6e 65 73 20 22 67 69 74 22 20 22 72 65 76 2d 6c 69 73 74 22 20 22	process-lines."git"."rev-list"."
a960	2d 2d 63 6f 75 6e 74 22 20 72 65 76 20 28 63 6f 6e 63 61 74 20 22 5e 22 20 73 69 6e 63 65 29 29	--count".rev.(concat."^".since))
a980	0a 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 63 65 73 73 2d 6c 69 6e 65 73 20 22 67 69 74 22 20	...........(process-lines."git".
a9a0	22 72 65 76 2d 6c 69 73 74 22 20 22 2d 2d 63 6f 75 6e 74 22 20 72 65 76 29 29 29 29 29 0a 0a 28	"rev-list"."--count".rev)))))..(
a9c0	63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 63 6f 6d 6d	cl-defmethod.package-build--comm
a9e0	69 74 2d 63 6f 75 6e 74 20 28 28 5f 72 63 70 20 70 61 63 6b 61 67 65 2d 68 67 2d 72 65 63 69 70	it-count.((_rcp.package-hg-recip
aa00	65 29 20 72 65 76 20 73 69 6e 63 65 29 0a 20 20 28 6c 65 6e 67 74 68 20 28 70 72 6f 63 65 73 73	e).rev.since)...(length.(process
aa20	2d 6c 69 6e 65 73 20 22 68 67 22 20 22 6c 6f 67 22 20 22 2d 2d 74 65 6d 70 6c 61 74 65 22 20 22	-lines."hg"."log"."--template"."
aa40	7b 72 65 76 7d 5c 5c 6e 22 20 22 2d 2d 72 65 76 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	{rev}\\n"."--rev"...............
aa60	20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 73 69 6e 63 65 0a 20 20 20 20 20 20 20 20 20 20 20	...........(if.since............
aa80	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 6f 6e 6c 79 28	..................(format."only(
aaa0	25 73 2c 20 25 73 29 22 20 72 65 76 20 73 69 6e 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	%s,.%s)".rev.since).............
aac0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 61 6e 63 65 73 74 6f 72	...............(format."ancestor
aae0	73 28 25 73 29 22 20 72 65 76 29 29 29 29 29 0a 0a 3b 3b 3b 3b 20 46 61 6c 6c 62 61 63 6b 2d 43	s(%s)".rev)))))..;;;;.Fallback-C
ab00	6f 75 6e 74 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 66 61 6c 6c 62	ount..(defun.package-build-fallb
ab20	61 63 6b 2d 63 6f 75 6e 74 2d 76 65 72 73 69 6f 6e 20 28 72 63 70 29 0a 20 20 22 44 65 74 65 72	ack-count-version.(rcp)..."Deter
ab40	6d 69 6e 65 20 76 65 72 73 69 6f 6e 20 73 74 72 69 6e 67 20 69 6e 20 74 68 65 20 5c 22 30 2e 30	mine.version.string.in.the.\"0.0
ab60	2e 30 2e 43 4f 55 4e 54 5c 22 20 66 6f 72 6d 61 74 20 66 6f 72 20 52 43 50 2e 0a 0a 54 68 69 73	.0.COUNT\".format.for.RCP...This
ab80	20 66 75 6e 63 74 69 6f 6e 20 69 6d 70 6c 65 6d 65 6e 74 73 20 61 20 66 61 6c 6c 62 61 63 6b 20	.function.implements.a.fallback.
aba0	74 68 61 74 20 63 61 6e 20 62 65 20 75 73 65 64 20 6f 6e 20 74 68 65 0a 72 65 6c 65 61 73 65 20	that.can.be.used.on.the.release.
abc0	63 68 61 6e 6e 65 6c 2c 20 66 6f 72 20 70 61 63 6b 61 67 65 73 20 74 68 61 74 20 64 6f 6e 27 74	channel,.for.packages.that.don't
abe0	20 64 6f 20 72 65 6c 65 61 73 65 73 2e 20 20 49 74 20 73 68 6f 75 6c 64 0a 62 65 20 74 68 65 20	.do.releases...It.should.be.the.
ac00	6c 61 73 74 20 65 6c 65 6d 65 6e 74 20 6f 66 20 60 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 72	last.element.of.`package-build-r
ac20	65 6c 65 61 73 65 2d 76 65 72 73 69 6f 6e 2d 66 75 6e 63 74 69 6f 6e 73 27 2c 0a 61 6e 64 20 61	elease-version-functions',.and.a
ac40	74 20 74 68 65 20 73 61 6d 65 20 74 69 6d 65 20 60 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 73	t.the.same.time.`package-build-s
ac60	6e 61 70 73 68 6f 74 2d 76 65 72 73 69 6f 6e 2d 66 75 6e 63 74 69 6f 6e 73 27 0a 73 68 6f 75 6c	napshot-version-functions'.shoul
ac80	64 20 63 6f 6e 74 61 69 6e 20 6f 6e 6c 79 20 60 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 72 65	d.contain.only.`package-build-re
aca0	6c 65 61 73 65 2b 63 6f 75 6e 74 2d 76 65 72 73 69 6f 6e 27 2e 0a 0a 54 68 65 20 72 65 73 75 6c	lease+count-version'...The.resul
acc0	74 20 6f 66 20 73 75 63 68 20 61 20 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e 20 69 73 20 74 68 61	t.of.such.a.configuration.is.tha
ace0	74 2c 20 66 6f 72 20 70 61 63 6b 61 67 65 73 20 74 68 61 74 0a 64 6f 6e 27 74 20 64 6f 20 72 65	t,.for.packages.that.don't.do.re
ad00	6c 65 61 73 65 73 2c 20 74 68 65 20 72 65 6c 65 61 73 65 20 61 6e 64 20 73 6e 61 70 73 68 6f 74	leases,.the.release.and.snapshot
ad20	20 63 68 61 6e 6e 65 6c 73 20 70 72 6f 76 69 64 65 0a 74 68 65 20 73 61 6d 65 20 5c 22 30 2e 30	.channels.provide.the.same.\"0.0
ad40	2e 30 2e 43 4f 55 4e 54 5c 22 20 73 6e 61 70 73 68 6f 74 2e 20 20 54 68 61 74 20 77 61 79 2c 20	.0.COUNT\".snapshot...That.way,.
ad60	61 6c 6c 20 70 61 63 6b 61 67 65 73 20 61 72 65 0a 61 76 61 69 6c 61 62 6c 65 20 6f 6e 20 74 68	all.packages.are.available.on.th
ad80	65 20 72 65 6c 65 61 73 65 20 63 68 61 6e 6e 65 6c 2c 20 77 68 69 63 68 20 6d 61 6b 65 73 20 74	e.release.channel,.which.makes.t
ada0	68 61 74 20 63 68 61 6e 6e 65 6c 20 6d 6f 72 65 0a 61 74 74 72 61 63 74 69 76 65 20 74 6f 20 75	hat.channel.more.attractive.to.u
adc0	73 65 72 73 2c 20 77 68 69 63 68 20 6d 69 67 68 74 20 65 6e 63 6f 75 72 61 67 65 20 73 6f 6d 65	sers,.which.might.encourage.some
ade0	20 6d 61 69 6e 74 61 69 6e 65 72 73 20 74 6f 0a 72 65 6c 65 61 73 65 20 6d 6f 72 65 20 6f 66 74	.maintainers.to.release.more.oft
ae00	65 6e 2c 20 6f 72 20 69 66 20 74 68 65 79 20 68 61 76 65 20 6e 65 76 65 72 20 64 6f 6e 65 20 61	en,.or.if.they.have.never.done.a
ae20	20 72 65 6c 65 61 73 65 20 62 65 66 6f 72 65 2c 0a 74 6f 20 66 69 6e 61 6c 6c 79 20 67 65 74 20	.release.before,.to.finally.get.
ae40	61 72 6f 75 6e 64 20 74 6f 20 74 68 61 74 20 69 6e 69 74 69 61 6c 20 72 65 6c 65 61 73 65 2e 20	around.to.that.initial.release..
ae60	20 49 6e 20 6f 74 68 65 72 20 77 6f 72 64 73 2c 0a 74 68 69 73 20 6d 69 67 68 74 20 68 65 6c 70	.In.other.words,.this.might.help
ae80	20 6f 76 65 72 63 6f 6d 65 20 74 68 65 20 72 65 6c 65 61 73 65 20 63 68 61 6e 6e 65 6c 27 73 20	.overcome.the.release.channel's.
aea0	63 68 69 63 6b 65 6e 20 61 6e 64 20 65 67 67 0a 70 72 6f 62 6c 65 6d 2e 0a 0a 52 65 74 75 72 6e	chicken.and.egg.problem...Return
aec0	20 28 43 4f 4d 4d 49 54 2d 48 41 53 48 20 43 4f 4d 4d 49 54 54 45 52 2d 44 41 54 45 20 56 45 52	.(COMMIT-HASH.COMMITTER-DATE.VER
aee0	53 49 4f 4e 2d 53 54 52 49 4e 47 20 52 45 56 44 45 53 43 29 2e 22 0a 20 20 28 6c 65 74 20 28 28	SION-STRING.REVDESC)."...(let.((
af00	70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 72 65 6c 65 61 73 65 2d 76 65 72 73 69 6f 6e 2d 66 75	package-build-release-version-fu
af20	6e 63 74 69 6f 6e 73 20 6e 69 6c 29 29 0a 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64	nctions.nil)).....(package-build
af40	2d 72 65 6c 65 61 73 65 2b 63 6f 75 6e 74 2d 76 65 72 73 69 6f 6e 20 72 63 70 29 29 29 0a 0a 3b	-release+count-version.rcp)))..;
af60	3b 3b 20 43 61 6c 6c 20 50 72 6f 63 65 73 73 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d	;;.Call.Process..(defun.package-
af80	62 75 69 6c 64 2d 2d 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 28 70 61 63 6b 61 67 65 20 63 6f 6d	build--call-process.(package.com
afa0	6d 61 6e 64 20 26 72 65 73 74 20 61 72 67 73 29 0a 20 20 22 46 6f 72 20 50 41 43 4b 41 47 45 2c	mand.&rest.args)..."For.PACKAGE,
afc0	20 72 75 6e 20 43 4f 4d 4d 41 4e 44 20 77 69 74 68 20 41 52 47 53 20 69 6e 20 60 64 65 66 61 75	.run.COMMAND.with.ARGS.in.`defau
afe0	6c 74 2d 64 69 72 65 63 74 6f 72 79 27 2e 0a 57 65 20 75 73 65 20 74 68 69 73 20 74 6f 20 77 72	lt-directory'..We.use.this.to.wr
b000	61 70 20 63 6f 6d 6d 61 6e 64 73 20 69 73 20 70 72 6f 70 65 72 20 65 6e 76 69 72 6f 6e 6d 65 6e	ap.commands.is.proper.environmen
b020	74 20 73 65 74 74 69 6e 67 73 20 61 6e 64 0a 77 69 74 68 20 61 20 74 69 6d 65 6f 75 74 20 73 6f	t.settings.and.with.a.timeout.so
b040	20 74 68 61 74 20 6e 6f 20 63 6f 6d 6d 61 6e 64 20 63 61 6e 20 62 6c 6f 63 6b 20 74 68 65 20 62	.that.no.command.can.block.the.b
b060	75 69 6c 64 20 70 72 6f 63 65 73 73 2c 0a 61 6e 64 20 73 6f 20 77 65 20 63 61 6e 20 70 72 6f 70	uild.process,.and.so.we.can.prop
b080	65 72 6c 79 20 6c 6f 67 20 65 72 72 6f 72 73 2e 20 20 50 41 43 4b 41 47 45 20 6d 75 73 74 20 62	erly.log.errors...PACKAGE.must.b
b0a0	65 20 74 68 65 20 6e 61 6d 65 20 6f 66 0a 61 20 70 61 63 6b 61 67 65 2c 20 61 20 60 70 61 63 6b	e.the.name.of.a.package,.a.`pack
b0c0	61 67 65 2d 72 65 63 69 70 65 27 20 6f 62 6a 65 63 74 20 6f 72 20 6e 69 6c 2c 20 61 6e 64 20 69	age-recipe'.object.or.nil,.and.i
b0e0	73 20 6f 6e 6c 79 20 75 73 65 64 0a 66 6f 72 20 6c 6f 67 67 69 6e 67 20 70 75 72 70 6f 73 65 73	s.only.used.for.logging.purposes
b100	2e 22 0a 20 20 28 75 6e 6c 65 73 73 20 28 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 64	."...(unless.(file-directory-p.d
b120	65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 0a 20 20 20 20 28 65 72 72 6f 72 20 22 43 61	efault-directory).....(error."Ca
b140	6e 6e 6f 74 20 72 75 6e 20 70 72 6f 63 65 73 73 20 69 6e 20 6e 6f 6e 2d 65 78 69 73 74 65 6e 74	nnot.run.process.in.non-existent
b160	20 64 69 72 65 63 74 6f 72 79 3a 20 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 64 65 66 61 75	.directory:.%s"............defau
b180	6c 74 2d 64 69 72 65 63 74 6f 72 79 29 29 0a 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66	lt-directory))...(with-temp-buff
b1a0	65 72 0a 20 20 20 20 28 70 63 61 73 65 2d 6c 65 74 2a 20 28 28 61 72 67 73 2d 6f 72 69 67 20 28	er.....(pcase-let*.((args-orig.(
b1c0	63 6f 6e 73 20 63 6f 6d 6d 61 6e 64 20 61 72 67 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	cons.command.args)).............
b1e0	20 20 20 20 20 28 60 28 2c 63 6f 6d 6d 61 6e 64 20 2e 20 2c 61 72 67 73 29 0a 20 20 20 20 20 20	.....(`(,command...,args).......
b200	20 20 20 20 20 20 20 20 20 20 20 20 28 6e 63 6f 6e 63 20 28 61 6e 64 20 28 6e 6f 74 20 28 65 71	............(nconc.(and.(not.(eq
b220	20 73 79 73 74 65 6d 2d 74 79 70 65 20 27 77 69 6e 64 6f 77 73 2d 6e 74 29 29 0a 20 20 20 20 20	.system-type.'windows-nt))......
b240	20 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 20 22	.........................(list."
b260	65 6e 76 22 20 22 4c 43 5f 41 4c 4c 3d 43 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	env"."LC_ALL=C"))...............
b280	20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 61 6e 64 20 70 61 63 6b 61 67 65 2d 62 75 69 6c	...........(if.(and.package-buil
b2a0	64 2d 74 69 6d 65 6f 75 74 2d 73 65 63 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	d-timeout-secs..................
b2c0	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 62 75 69 6c 64 2d 74	.................package-build-t
b2e0	69 6d 65 6f 75 74 2d 65 78 65 63 75 74 61 62 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	imeout-executable)..............
b300	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 63 6f 6e 63 20 28 6c 69 73 74 20 70 61 63	................(nconc.(list.pac
b320	6b 61 67 65 2d 62 75 69 6c 64 2d 74 69 6d 65 6f 75 74 2d 65 78 65 63 75 74 61 62 6c 65 0a 20 20	kage-build-timeout-executable...
b340	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
b360	20 20 20 20 20 20 20 20 22 2d 6b 22 20 22 36 30 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	........"-k"."60"...............
b380	20 20 20 20 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 75 6d	............................(num
b3a0	62 65 72 2d 74 6f 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ber-to-string...................
b3c0	20 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 61 63 6b 61 67 65	.........................package
b3e0	2d 62 75 69 6c 64 2d 74 69 6d 65 6f 75 74 2d 73 65 63 73 29 0a 20 20 20 20 20 20 20 20 20 20 20	-build-timeout-secs)............
b400	20 20 20 20 20 20 20 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	...............................c
b420	6f 6d 6d 61 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ommand).........................
b440	20 20 20 20 20 20 20 20 20 20 20 20 61 72 67 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	............args)...............
b460	20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 63 6f 6d 6d 61 6e 64 20 61 72 67 73 29	.............(cons.command.args)
b480	29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 78 69 74 2d 63 6f 64 65 0a	)))..................(exit-code.
b4a0	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 63 61 6c 6c 2d	..................(apply.#'call-
b4c0	70 72 6f 63 65 73 73 20 63 6f 6d 6d 61 6e 64 20 6e 69 6c 20 28 63 75 72 72 65 6e 74 2d 62 75 66	process.command.nil.(current-buf
b4e0	66 65 72 29 20 6e 69 6c 20 61 72 67 73 29 29 29 0a 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28	fer).nil.args))).......(unless.(
b500	65 71 75 61 6c 20 65 78 69 74 2d 63 6f 64 65 20 30 29 20 3b 20 6d 61 79 20 61 6c 73 6f 20 62 65	equal.exit-code.0).;.may.also.be
b520	20 61 20 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 73 75 6d 6d 61 72 79	.a.string.........(let.((summary
b540	20 28 66 6f 72 6d 61 74 2d 6d 65 73 73 61 67 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.(format-message................
b560	20 20 20 20 20 20 20 20 20 22 43 6f 6d 6d 61 6e 64 20 60 25 73 27 20 65 78 69 74 65 64 20 77 69	........."Command.`%s'.exited.wi
b580	74 68 20 6e 6f 6e 2d 7a 65 72 6f 20 65 78 69 74 2d 63 6f 64 65 3a 20 25 73 22 0a 20 20 20 20 20	th.non-zero.exit-code:.%s"......
b5a0	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.#'
b5c0	73 68 65 6c 6c 2d 71 75 6f 74 65 2d 61 72 67 75 6d 65 6e 74 20 61 72 67 73 2d 6f 72 69 67 20 22	shell-quote-argument.args-orig."
b5e0	20 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 65 78 69 74	.").........................exit
b600	2d 63 6f 64 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 44 75 70 6c 69 63 61 74 69 6e	-code)))...........;;.Duplicatin
b620	67 20 74 68 65 20 73 75 6d 6d 61 72 79 20 6c 69 6b 65 20 74 68 69 73 20 69 73 20 61 20 62 69 74	g.the.summary.like.this.is.a.bit
b640	20 75 6e 66 6f 72 74 75 6e 61 74 65 2c 20 62 75 74 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 73	.unfortunate,.but...........;;.s
b660	74 69 6c 6c 20 74 68 65 20 62 65 73 74 20 6f 70 74 69 6f 6e 20 62 65 63 61 75 73 65 20 77 65 20	till.the.best.option.because.we.
b680	77 61 6e 74 20 74 6f 20 73 68 6f 77 20 69 74 20 62 65 66 6f 72 65 20 74 68 65 0a 20 20 20 20 20	want.to.show.it.before.the......
b6a0	20 20 20 20 20 3b 3b 20 6f 75 74 70 75 74 2c 20 62 75 74 20 61 6c 73 6f 20 77 61 6e 74 20 69 74	.....;;.output,.but.also.want.it
b6c0	20 74 6f 20 61 70 70 65 61 72 20 61 73 20 61 6e 20 65 72 72 6f 72 20 6d 65 73 73 61 67 65 2c 0a	.to.appear.as.an.error.message,.
b6e0	20 20 20 20 20 20 20 20 20 20 3b 3b 20 77 69 74 68 6f 75 74 20 6d 61 6b 69 6e 67 20 74 68 65 2c	..........;;.without.making.the,
b700	20 70 6f 74 65 6e 74 69 61 6c 6c 79 20 6d 75 6c 74 69 2d 6c 69 6e 65 2c 20 6f 75 74 70 75 74 20	.potentially.multi-line,.output.
b720	70 61 72 74 20 6f 66 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 74 68 65 20 65 72 72 6f 72 20 6d	part.of...........;;.the.error.m
b740	65 73 73 61 67 65 2e 0a 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 25 73 22 20	essage............(message."%s".
b760	73 75 6d 6d 61 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 25 73 22	summary)...........(message."%s"
b780	20 28 62 75 66 66 65 72 2d 73 74 72 69 6e 67 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 61 63	.(buffer-string))...........(pac
b7a0	6b 61 67 65 2d 62 75 69 6c 64 2d 2d 65 72 72 6f 72 20 70 61 63 6b 61 67 65 20 22 25 73 22 20 73	kage-build--error.package."%s".s
b7c0	75 6d 6d 61 72 79 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69	ummary))))))..(defun.package-bui
b7e0	6c 64 2d 2d 63 61 6c 6c 2d 73 61 6e 64 62 6f 78 65 64 20 28 70 61 63 6b 61 67 65 20 63 6f 6d 6d	ld--call-sandboxed.(package.comm
b800	61 6e 64 20 26 72 65 73 74 20 61 72 67 73 29 0a 20 20 22 4c 69 6b 65 20 60 70 61 63 6b 61 67 65	and.&rest.args)..."Like.`package
b820	2d 62 75 69 6c 64 2d 2d 63 61 6c 6c 2d 70 72 6f 63 65 73 73 27 20 62 75 74 20 6d 61 79 62 65 20	-build--call-process'.but.maybe.
b840	75 73 65 20 61 20 73 61 6e 64 62 6f 78 2e 0a 55 73 65 20 61 20 73 61 6e 64 62 6f 78 20 69 66 20	use.a.sandbox..Use.a.sandbox.if.
b860	60 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 75 73 65 2d 73 61 6e 64 62 6f 78 27 20 69 73 20	`package-build--use-sandbox'.is.
b880	6e 6f 6e 2d 6e 69 6c 2e 22 0a 20 20 28 63 6f 6e 64 0a 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75	non-nil."...(cond....(package-bu
b8a0	69 6c 64 2d 2d 75 73 65 2d 73 61 6e 64 62 6f 78 0a 20 20 20 20 28 6c 65 74 2a 20 28 28 72 63 70	ild--use-sandbox.....(let*.((rcp
b8c0	20 28 69 66 20 28 63 6c 2d 74 79 70 65 70 20 70 61 63 6b 61 67 65 20 27 70 61 63 6b 61 67 65 2d	.(if.(cl-typep.package.'package-
b8e0	72 65 63 69 70 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 61 63 6b	recipe).....................pack
b900	61 67 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 72	age...................(package-r
b920	65 63 69 70 65 2d 6c 6f 6f 6b 75 70 20 70 61 63 6b 61 67 65 29 29 29 0a 20 20 20 20 20 20 20 20	ecipe-lookup.package))).........
b940	20 20 20 28 64 69 72 20 28 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 2d 77 6f 72 6b 69 6e 67	...(dir.(package-recipe--working
b960	2d 74 72 65 65 20 72 63 70 29 29 29 0a 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 66 69 6c 65	-tree.rcp))).......(unless.(file
b980	2d 69 6e 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72	-in-directory-p.default-director
b9a0	79 20 64 69 72 29 0a 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 65	y.dir).........(package-build--e
b9c0	72 72 6f 72 20 72 63 70 20 22 41 74 74 65 6d 70 74 20 74 6f 20 75 73 65 20 73 61 6e 64 62 6f 78	rror.rcp."Attempt.to.use.sandbox
b9e0	20 6f 75 74 73 69 64 65 20 6f 66 20 25 73 22 20 64 69 72 29 29 29 0a 20 20 20 20 28 61 70 70 6c	.outside.of.%s".dir))).....(appl
ba00	79 20 23 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20	y.#'package-build--call-process.
ba20	70 61 63 6b 61 67 65 20 22 62 77 72 61 70 22 0a 20 20 20 20 20 20 20 20 20 20 20 60 28 2c 40 70	package."bwrap"............`(,@p
ba40	61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 73 61 6e 64 62 6f 78 2d 61 72 67 73 0a 20 20 20 20 20	ackage-build--sandbox-args......
ba60	20 20 20 20 20 20 20 20 2c 40 28 6c 69 73 74 20 22 2d 2d 62 69 6e 64 22 20 64 65 66 61 75 6c 74	........,@(list."--bind".default
ba80	2d 64 69 72 65 63 74 6f 72 79 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 0a 20 20	-directory.default-directory)...
baa0	20 20 20 20 20 20 20 20 20 20 20 2c 40 28 6d 61 70 63 61 6e 20 28 6c 61 6d 62 64 61 20 28 64 69	...........,@(mapcan.(lambda.(di
bac0	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 28 73 65 74	r)..........................(set
bae0	71 20 64 69 72 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 64 69 72 29 29 0a 20 20	q.dir.(expand-file-name.dir))...
bb00	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 66 69 6c	.......................(and.(fil
bb20	65 2d 65 78 69 73 74 73 2d 70 20 64 69 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	e-exists-p.dir).................
bb40	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 22 2d 2d 72 6f 2d 62 69 6e 64 22 20	..............(list."--ro-bind".
bb60	64 69 72 20 64 69 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	dir.dir)))......................
bb80	20 20 28 61 70 70 65 6e 64 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 73 61 6e 64 62 6f 78	..(append.package-build--sandbox
bba0	2d 72 65 61 64 6f 6e 6c 79 2d 62 69 6e 64 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	-readonly-binds.................
bbc0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 22 2e 67 69 74 22 20 22 2e 68 67	...............(list.".git".".hg
bbe0	22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 63 6f 6d 6d 61 6e 64 20 2c 40 61 72 67	")))..............,command.,@arg
bc00	73 29 29 29 0a 20 20 20 28 28 61 70 70 6c 79 20 23 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d	s)))....((apply.#'package-build-
bc20	2d 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 70 61 63 6b 61 67 65 20 63 6f 6d 6d 61 6e 64 20 61 72	-call-process.package.command.ar
bc40	67 73 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 72 75	gs))))..(defun.package-build--ru
bc60	6e 2d 70 72 6f 63 65 73 73 20 28 63 6f 6d 6d 61 6e 64 20 26 72 65 73 74 20 61 72 67 73 29 0a 20	n-process.(command.&rest.args)..
bc80	20 22 4c 69 6b 65 20 60 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 63 61 6c 6c 2d 70 72 6f 63	."Like.`package-build--call-proc
bca0	65 73 73 27 2c 20 62 75 74 20 6c 61 63 6b 73 20 74 68 65 20 50 41 43 4b 41 47 45 20 61 72 67 75	ess',.but.lacks.the.PACKAGE.argu
bcc0	6d 65 6e 74 2e 22 0a 20 20 28 61 70 70 6c 79 20 23 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d	ment."...(apply.#'package-build-
bce0	2d 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 6e 69 6c 20 63 6f 6d 6d 61 6e 64 20 61 72 67 73 29 29	-call-process.nil.command.args))
bd00	0a 28 6d 61 6b 65 2d 6f 62 73 6f 6c 65 74 65 20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d	.(make-obsolete.'package-build--
bd20	72 75 6e 2d 70 72 6f 63 65 73 73 20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 63 61 6c 6c	run-process.'package-build--call
bd40	2d 70 72 6f 63 65 73 73 20 22 35 2e 30 2e 30 22 29 0a 0a 3b 3b 3b 20 46 65 74 63 68 0a 0a 28 63	-process."5.0.0")..;;;.Fetch..(c
bd60	6c 2d 64 65 66 6d 65 74 68 6f 64 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 66 65 74 63 68	l-defmethod.package-build--fetch
bd80	20 28 28 72 63 70 20 70 61 63 6b 61 67 65 2d 67 69 74 2d 72 65 63 69 70 65 29 29 0a 20 20 28 6c	.((rcp.package-git-recipe))...(l
bda0	65 74 20 28 28 64 69 72 20 28 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 2d 77 6f 72 6b 69 6e	et.((dir.(package-recipe--workin
bdc0	67 2d 74 72 65 65 20 72 63 70 29 29 0a 20 20 20 20 20 20 20 20 28 75 72 6c 20 28 6f 72 65 66 20	g-tree.rcp)).........(url.(oref.
bde0	72 63 70 20 75 72 6c 29 29 0a 20 20 20 20 20 20 20 20 28 70 72 6f 74 6f 63 6f 6c 20 28 70 61 63	rcp.url)).........(protocol.(pac
be00	6b 61 67 65 2d 72 65 63 69 70 65 2d 2d 75 70 73 74 72 65 61 6d 2d 70 72 6f 74 6f 63 6f 6c 20 72	kage-recipe--upstream-protocol.r
be20	63 70 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 28 28 65 71 20 70 61 63 6b 61 67	cp))).....(cond......((eq.packag
be40	65 2d 62 75 69 6c 64 2d 2d 69 6e 68 69 62 69 74 2d 66 65 74 63 68 20 27 73 74 72 69 63 74 29 29	e-build--inhibit-fetch.'strict))
be60	0a 20 20 20 20 20 28 28 6e 6f 74 20 28 6d 65 6d 62 65 72 20 70 72 6f 74 6f 63 6f 6c 20 70 61 63	......((not.(member.protocol.pac
be80	6b 61 67 65 2d 62 75 69 6c 64 2d 61 6c 6c 6f 77 65 64 2d 67 69 74 2d 70 72 6f 74 6f 63 6f 6c 73	kage-build-allowed-git-protocols
bea0	29 29 0a 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 65 72 72 6f 72 20 72	)).......(package-build--error.r
bec0	63 70 0a 20 20 20 20 20 20 20 20 22 46 65 74 63 68 69 6e 67 20 75 73 69 6e 67 20 74 68 65 20 25	cp........."Fetching.using.the.%
bee0	73 20 70 72 6f 74 6f 63 6f 6c 20 69 73 20 6e 6f 74 20 61 6c 6c 6f 77 65 64 22 20 70 72 6f 74 6f	s.protocol.is.not.allowed".proto
bf00	63 6f 6c 29 29 0a 20 20 20 20 20 28 28 61 6e 64 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20	col))......((and.(file-exists-p.
bf20	28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 2e 67 69 74 22 20 64 69 72 29 29 0a 20	(expand-file-name.".git".dir))..
bf40	20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f	..........(let.((default-directo
bf60	72 79 20 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 3d 20 28	ry.dir))..............(string=.(
bf80	63 61 72 20 28 70 72 6f 63 65 73 73 2d 6c 69 6e 65 73 20 22 67 69 74 22 20 22 63 6f 6e 66 69 67	car.(process-lines."git"."config
bfa0	22 20 22 72 65 6d 6f 74 65 2e 6f 72 69 67 69 6e 2e 75 72 6c 22 29 29 0a 20 20 20 20 20 20 20 20	"."remote.origin.url")).........
bfc0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 75 72 6c 29 29 29 0a 20 20 20 20 20 20 28 75 6e 6c 65	..............url))).......(unle
bfe0	73 73 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 69 6e 68 69 62 69 74 2d 66 65 74 63 68 0a	ss.package-build--inhibit-fetch.
c000	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 79	........(let.((default-directory
c020	20 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d	.dir))...........(package-build-
c040	2d 6d 65 73 73 61 67 65 20 22 55 70 64 61 74 69 6e 67 20 25 73 22 20 64 69 72 29 0a 20 20 20 20	-message."Updating.%s".dir).....
c060	20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 63 61 6c 6c 2d 70 72 6f 63 65	......(package-build--call-proce
c080	73 73 20 72 63 70 20 22 67 69 74 22 20 22 66 65 74 63 68 22 20 22 2d 66 22 20 22 2d 2d 74 61 67	ss.rcp."git"."fetch"."-f"."--tag
c0a0	73 22 20 22 6f 72 69 67 69 6e 22 29 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 57 65 20 6d 69 67	s"."origin")...........;;.We.mig
c0c0	68 74 20 6c 61 74 65 72 20 63 68 65 63 6b 6f 75 74 20 22 6f 72 69 67 69 6e 2f 48 45 41 44 22 2e	ht.later.checkout."origin/HEAD".
c0e0	20 53 61 64 6c 79 20 22 67 69 74 20 66 65 74 63 68 22 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20	.Sadly."git.fetch"...........;;.
c100	63 61 6e 6e 6f 74 20 62 65 20 74 6f 6c 64 20 74 6f 20 6b 65 65 70 20 69 74 20 75 70 2d 74 6f 2d	cannot.be.told.to.keep.it.up-to-
c120	64 61 74 65 2c 20 73 6f 20 77 65 20 68 61 76 65 20 74 6f 20 6d 61 6b 65 0a 20 20 20 20 20 20 20	date,.so.we.have.to.make........
c140	20 20 20 3b 3b 20 61 20 73 65 63 6f 6e 64 20 72 65 71 75 65 73 74 2e 0a 20 20 20 20 20 20 20 20	...;;.a.second.request..........
c160	20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 63 61 6c 6c 2d 70 72 6f 63 65 73 73 0a 20	..(package-build--call-process..
c180	20 20 20 20 20 20 20 20 20 20 72 63 70 20 22 67 69 74 22 20 22 72 65 6d 6f 74 65 22 20 22 73 65	..........rcp."git"."remote"."se
c1a0	74 2d 68 65 61 64 22 20 22 6f 72 69 67 69 6e 22 20 22 2d 2d 61 75 74 6f 22 29 29 29 29 0a 20 20	t-head"."origin"."--auto"))))...
c1c0	20 20 20 28 74 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	...(t.......(when.(file-exists-p
c1e0	20 64 69 72 29 0a 20 20 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 64 69 72 65 63 74 6f 72 79 20	.dir).........(delete-directory.
c200	64 69 72 20 74 29 29 0a 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 6d 65	dir.t)).......(package-build--me
c220	73 73 61 67 65 20 22 43 6c 6f 6e 69 6e 67 20 25 73 20 74 6f 20 25 73 22 20 75 72 6c 20 64 69 72	ssage."Cloning.%s.to.%s".url.dir
c240	29 0a 20 20 20 20 20 20 28 6d 61 6b 65 2d 64 69 72 65 63 74 6f 72 79 20 70 61 63 6b 61 67 65 2d	).......(make-directory.package-
c260	62 75 69 6c 64 2d 77 6f 72 6b 69 6e 67 2d 64 69 72 20 74 29 0a 20 20 20 20 20 20 28 6c 65 74 20	build-working-dir.t).......(let.
c280	28 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 70 61 63 6b 61 67 65 2d 62 75 69 6c	((default-directory.package-buil
c2a0	64 2d 77 6f 72 6b 69 6e 67 2d 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65	d-working-dir)).........(package
c2c0	2d 62 75 69 6c 64 2d 2d 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 72 63 70 20 22 67 69 74 22 20 22	-build--call-process.rcp."git"."
c2e0	63 6c 6f 6e 65 22 20 75 72 6c 20 64 69 72 29 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74	clone".url.dir))))))..(cl-defmet
c300	68 6f 64 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 66 65 74 63 68 20 28 28 72 63 70 20 70	hod.package-build--fetch.((rcp.p
c320	61 63 6b 61 67 65 2d 68 67 2d 72 65 63 69 70 65 29 29 0a 20 20 28 6c 65 74 20 28 28 64 69 72 20	ackage-hg-recipe))...(let.((dir.
c340	28 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 2d 77 6f 72 6b 69 6e 67 2d 74 72 65 65 20 72 63	(package-recipe--working-tree.rc
c360	70 29 29 0a 20 20 20 20 20 20 20 20 28 75 72 6c 20 28 6f 72 65 66 20 72 63 70 20 75 72 6c 29 29	p)).........(url.(oref.rcp.url))
c380	29 0a 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 28 28 65 71 20 70 61 63 6b 61 67 65 2d 62 75	).....(cond......((eq.package-bu
c3a0	69 6c 64 2d 2d 69 6e 68 69 62 69 74 2d 66 65 74 63 68 20 27 73 74 72 69 63 74 29 29 0a 20 20 20	ild--inhibit-fetch.'strict))....
c3c0	20 20 28 28 61 6e 64 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 28 65 78 70 61 6e 64 2d 66	..((and.(file-exists-p.(expand-f
c3e0	69 6c 65 2d 6e 61 6d 65 20 22 2e 68 67 22 20 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20	ile-name.".hg".dir))............
c400	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 64 69 72 29 29 0a 20	(let.((default-directory.dir))..
c420	20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 3d 20 28 63 61 72 20 28 70 72 6f 63 65	............(string=.(car.(proce
c440	73 73 2d 6c 69 6e 65 73 20 22 68 67 22 20 22 70 61 74 68 73 22 20 22 64 65 66 61 75 6c 74 22 29	ss-lines."hg"."paths"."default")
c460	29 20 75 72 6c 29 29 29 0a 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 70 61 63 6b 61 67 65 2d 62	).url))).......(unless.package-b
c480	75 69 6c 64 2d 2d 69 6e 68 69 62 69 74 2d 66 65 74 63 68 0a 20 20 20 20 20 20 20 20 28 6c 65 74	uild--inhibit-fetch.........(let
c4a0	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 20 20	.((default-directory.dir))......
c4c0	20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 6d 65 73 73 61 67 65 20 22 55 70	.....(package-build--message."Up
c4e0	64 61 74 69 6e 67 20 25 73 22 20 64 69 72 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61	dating.%s".dir)...........(packa
c500	67 65 2d 62 75 69 6c 64 2d 2d 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 72 63 70 20 22 68 67 22 20	ge-build--call-process.rcp."hg".
c520	22 70 75 6c 6c 22 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64	"pull")...........(package-build
c540	2d 2d 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 72 63 70 20 22 68 67 22 20 22 75 70 64 61 74 65 22	--call-process.rcp."hg"."update"
c560	29 29 29 29 0a 20 20 20 20 20 28 74 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 66 69 6c 65 2d 65	))))......(t.......(when.(file-e
c580	78 69 73 74 73 2d 70 20 64 69 72 29 0a 20 20 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 64 69 72	xists-p.dir).........(delete-dir
c5a0	65 63 74 6f 72 79 20 64 69 72 20 74 29 29 0a 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75	ectory.dir.t)).......(package-bu
c5c0	69 6c 64 2d 2d 6d 65 73 73 61 67 65 20 22 43 6c 6f 6e 69 6e 67 20 25 73 20 74 6f 20 25 73 22 20	ild--message."Cloning.%s.to.%s".
c5e0	75 72 6c 20 64 69 72 29 0a 20 20 20 20 20 20 28 6d 61 6b 65 2d 64 69 72 65 63 74 6f 72 79 20 70	url.dir).......(make-directory.p
c600	61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 77 6f 72 6b 69 6e 67 2d 64 69 72 20 74 29 0a 20 20 20 20	ackage-build-working-dir.t).....
c620	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 70 61 63 6b 61	..(let.((default-directory.packa
c640	67 65 2d 62 75 69 6c 64 2d 77 6f 72 6b 69 6e 67 2d 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 28	ge-build-working-dir)).........(
c660	70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 72 63 70 20	package-build--call-process.rcp.
c680	22 68 67 22 20 22 63 6c 6f 6e 65 22 20 75 72 6c 20 64 69 72 29 29 29 29 29 29 0a 0a 3b 3b 3b 20	"hg"."clone".url.dir))))))..;;;.
c6a0	43 68 65 63 6b 6f 75 74 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 70 61 63 6b 61 67 65 2d	Checkout..(cl-defmethod.package-
c6c0	62 75 69 6c 64 2d 2d 63 68 65 63 6b 6f 75 74 20 28 28 72 63 70 20 70 61 63 6b 61 67 65 2d 67 69	build--checkout.((rcp.package-gi
c6e0	74 2d 72 65 63 69 70 65 29 29 0a 20 20 28 75 6e 6c 65 73 73 20 70 61 63 6b 61 67 65 2d 62 75 69	t-recipe))...(unless.package-bui
c700	6c 64 2d 2d 69 6e 68 69 62 69 74 2d 63 68 65 63 6b 6f 75 74 0a 20 20 20 20 28 6c 65 74 20 28 28	ld--inhibit-checkout.....(let.((
c720	72 65 76 20 28 6f 72 65 66 20 72 63 70 20 63 6f 6d 6d 69 74 29 29 29 0a 20 20 20 20 20 20 28 70	rev.(oref.rcp.commit))).......(p
c740	61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 6d 65 73 73 61 67 65 20 22 43 68 65 63 6b 69 6e 67 20	ackage-build--message."Checking.
c760	6f 75 74 20 25 73 22 20 72 65 76 29 0a 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c	out.%s".rev).......(package-buil
c780	64 2d 2d 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 72 63 70 20 22 67 69 74 22 20 22 72 65 73 65 74	d--call-process.rcp."git"."reset
c7a0	22 20 22 2d 2d 68 61 72 64 22 20 72 65 76 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f	"."--hard".rev))))..(cl-defmetho
c7c0	64 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 63 68 65 63 6b 6f 75 74 20 28 28 72 63 70 20	d.package-build--checkout.((rcp.
c7e0	70 61 63 6b 61 67 65 2d 68 67 2d 72 65 63 69 70 65 29 29 0a 20 20 28 75 6e 6c 65 73 73 20 70 61	package-hg-recipe))...(unless.pa
c800	63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 69 6e 68 69 62 69 74 2d 63 68 65 63 6b 6f 75 74 0a 20 20	ckage-build--inhibit-checkout...
c820	20 20 28 6c 65 74 20 28 28 72 65 76 20 28 6f 72 65 66 20 72 63 70 20 63 6f 6d 6d 69 74 29 29 29	..(let.((rev.(oref.rcp.commit)))
c840	0a 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 6d 65 73 73 61 67 65 20 22	.......(package-build--message."
c860	43 68 65 63 6b 69 6e 67 20 6f 75 74 20 25 73 22 20 72 65 76 29 0a 20 20 20 20 20 20 28 70 61 63	Checking.out.%s".rev).......(pac
c880	6b 61 67 65 2d 62 75 69 6c 64 2d 2d 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 72 63 70 20 22 68 67	kage-build--call-process.rcp."hg
c8a0	22 20 22 75 70 64 61 74 65 22 20 72 65 76 29 29 29 29 0a 0a 3b 3b 3b 20 47 65 6e 65 72 61 74 65	"."update".rev))))..;;;.Generate
c8c0	20 46 69 6c 65 73 0a 0a 28 64 65 66 76 61 72 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 65	.Files..(defvar.package-build--e
c8e0	78 74 72 61 73 0a 20 20 27 28 28 3a 75 72 6c 20 77 65 62 70 61 67 65 29 0a 20 20 20 20 28 3a 63	xtras...'((:url.webpage).....(:c
c900	6f 6d 6d 69 74 20 63 6f 6d 6d 69 74 29 0a 20 20 20 20 28 3a 72 65 76 64 65 73 63 20 72 65 76 64	ommit.commit).....(:revdesc.revd
c920	65 73 63 29 0a 20 20 20 20 28 3a 6b 65 79 77 6f 72 64 73 20 6b 65 79 77 6f 72 64 73 29 0a 20 20	esc).....(:keywords.keywords)...
c940	20 20 28 3a 61 75 74 68 6f 72 73 20 61 75 74 68 6f 72 73 29 0a 20 20 20 20 28 3a 6d 61 69 6e 74	..(:authors.authors).....(:maint
c960	61 69 6e 65 72 73 20 6d 61 69 6e 74 61 69 6e 65 72 73 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 61	ainers.maintainers)))..(defun.pa
c980	63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 77 72 69 74 65 2d 61 72 63 68 69 76 65 2d 65 6e 74 72 79	ckage-build--write-archive-entry
c9a0	20 28 72 63 70 29 0a 20 20 28 77 69 74 68 2d 73 6c 6f 74 73 20 28 6e 61 6d 65 20 76 65 72 73 69	.(rcp)...(with-slots.(name.versi
c9c0	6f 6e 20 64 65 70 65 6e 64 65 6e 63 69 65 73 20 73 75 6d 6d 61 72 79 29 20 72 63 70 0a 20 20 20	on.dependencies.summary).rcp....
c9e0	20 28 77 69 74 68 2d 74 65 6d 70 2d 66 69 6c 65 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61	.(with-temp-file.(expand-file-na
ca00	6d 65 20 28 66 6f 72 6d 61 74 20 22 25 73 2d 25 73 2e 65 6e 74 72 79 22 20 6e 61 6d 65 20 76 65	me.(format."%s-%s.entry".name.ve
ca20	72 73 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	rsion)..........................
ca40	20 20 20 20 20 20 20 20 20 20 20 20 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 61 72 63 68 69	.............package-build-archi
ca60	76 65 2d 64 69 72 29 0a 20 20 20 20 20 20 28 73 65 74 2d 62 75 66 66 65 72 2d 66 69 6c 65 2d 63	ve-dir).......(set-buffer-file-c
ca80	6f 64 69 6e 67 2d 73 79 73 74 65 6d 20 27 75 74 66 2d 38 29 0a 20 20 20 20 20 20 28 70 70 20 28	oding-system.'utf-8).......(pp.(
caa0	63 6f 6e 73 20 28 69 6e 74 65 72 6e 20 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	cons.(intern.name)..............
cac0	20 20 20 28 76 65 63 74 6f 72 20 28 76 65 72 73 69 6f 6e 2d 74 6f 2d 6c 69 73 74 20 76 65 72 73	...(vector.(version-to-list.vers
cae0	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 28 6d 61	ion).........................(ma
cb00	70 63 61 72 20 28 70 63 61 73 65 2d 6c 61 6d 62 64 61 20 28 60 28 2c 73 79 6d 20 2c 76 61 6c 29	pcar.(pcase-lambda.(`(,sym.,val)
cb20	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	)...............................
cb40	20 20 20 20 28 6c 69 73 74 20 73 79 6d 20 28 76 65 72 73 69 6f 6e 2d 74 6f 2d 6c 69 73 74 20 76	....(list.sym.(version-to-list.v
cb60	61 6c 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	al)))...........................
cb80	20 20 20 20 20 20 64 65 70 65 6e 64 65 6e 63 69 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	......dependencies).............
cba0	20 20 20 20 20 20 20 20 20 20 20 20 73 75 6d 6d 61 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20	............summary.............
cbc0	20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 6f 72 65 66 20 72 63 70 20 74 61 72 62 61 6c	............(if.(oref.rcp.tarbal
cbe0	6c 70 29 20 27 74 61 72 20 27 73 69 6e 67 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	lp).'tar.'single)...............
cc00	20 20 20 20 20 20 20 20 20 20 28 6e 63 6f 6e 63 20 28 6d 61 70 63 61 6e 20 28 70 63 61 73 65 2d	..........(nconc.(mapcan.(pcase-
cc20	6c 61 6d 62 64 61 20 28 60 28 2c 6b 65 79 20 2c 73 6c 6f 74 29 29 0a 20 20 20 20 20 20 20 20 20	lambda.(`(,key.,slot))..........
cc40	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
cc60	28 61 6e 64 2d 6c 65 74 2a 20 28 28 76 61 6c 20 28 65 69 65 69 6f 2d 6f 72 65 66 20 72 63 70 20	(and-let*.((val.(eieio-oref.rcp.
cc80	73 6c 6f 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	slot))).........................
cca0	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 63 6f 6e 73 20 6b	...................(list.(cons.k
ccc0	65 79 20 76 61 6c 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	ey.val))))......................
cce0	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 62 75 69 6c 64 2d	..................package-build-
cd00	2d 65 78 74 72 61 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	-extras)........................
cd20	20 20 20 20 20 20 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 76 20 28 6f 72 65 66 20 72 63 70 20	........(and-let*.((v.(oref.rcp.
cd40	6d 61 69 6e 74 61 69 6e 65 72 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	maintainers)))..................
cd60	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 28 63 6f 6e 73 20 3a 6d 61 69	................(list.(cons.:mai
cd80	6e 74 61 69 6e 65 72 20 28 63 61 72 20 76 29 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20	ntainer.(car.v)))))))...........
cda0	28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 61 63	(current-buffer)))))..(defun.pac
cdc0	6b 61 67 65 2d 62 75 69 6c 64 2d 2d 77 72 69 74 65 2d 70 6b 67 2d 66 69 6c 65 20 28 72 63 70 20	kage-build--write-pkg-file.(rcp.
cde0	64 69 72 29 0a 20 20 28 70 63 61 73 65 2d 6c 65 74 20 28 28 28 65 69 65 69 6f 20 6e 61 6d 65 20	dir)...(pcase-let.(((eieio.name.
ce00	76 65 72 73 69 6f 6e 20 73 75 6d 6d 61 72 79 20 64 65 70 65 6e 64 65 6e 63 69 65 73 29 20 72 63	version.summary.dependencies).rc
ce20	70 29 29 0a 20 20 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 66 69 6c 65 20 28 65 78 70 61 6e 64 2d	p)).....(with-temp-file.(expand-
ce40	66 69 6c 65 2d 6e 61 6d 65 20 28 66 6f 72 6d 61 74 20 22 25 73 2d 70 6b 67 2e 65 6c 22 20 6e 61	file-name.(format."%s-pkg.el".na
ce60	6d 65 29 20 64 69 72 29 0a 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 3b 3b 20 2d 2a 2d 20 6e	me).dir).......(insert.";;.-*-.n
ce80	6f 2d 62 79 74 65 2d 63 6f 6d 70 69 6c 65 3a 20 74 3b 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69	o-byte-compile:.t;.lexical-bindi
cea0	6e 67 3a 20 6e 69 6c 20 2d 2a 2d 5c 6e 22 29 0a 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 66	ng:.nil.-*-\n").......(insert.(f
cec0	6f 72 6d 61 74 20 22 28 64 65 66 69 6e 65 2d 70 61 63 6b 61 67 65 20 5c 22 25 73 5c 22 20 5c 22	ormat."(define-package.\"%s\".\"
cee0	25 73 5c 22 5c 6e 22 20 6e 61 6d 65 20 76 65 72 73 69 6f 6e 29 29 0a 20 20 20 20 20 20 28 69 6e	%s\"\n".name.version)).......(in
cf00	73 65 72 74 20 28 66 6f 72 6d 61 74 20 22 20 20 25 73 5c 6e 22 20 28 70 72 69 6e 31 2d 74 6f 2d	sert.(format."..%s\n".(prin1-to-
cf20	73 74 72 69 6e 67 20 28 63 6f 6e 63 61 74 20 73 75 6d 6d 61 72 79 20 22 2e 22 29 29 29 29 0a 20	string.(concat.summary."."))))..
cf40	20 20 20 20 20 28 69 66 20 64 65 70 65 6e 64 65 6e 63 69 65 73 0a 20 20 20 20 20 20 20 20 20 20	.....(if.dependencies...........
cf60	28 6c 65 74 20 28 28 66 6f 72 6d 61 74 20 28 66 6f 72 6d 61 74 20 22 28 25 25 2d 25 64 73 20 5c	(let.((format.(format."(%%-%ds.\
cf80	22 25 25 73 5c 22 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	"%%s\")"........................
cfa0	20 20 20 20 20 20 20 20 20 28 61 70 70 6c 79 20 23 27 6d 61 78 20 30 0a 20 20 20 20 20 20 20 20	.........(apply.#'max.0.........
cfc0	20 20 20 20 20 20 20 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	...............................(
cfe0	6d 61 70 63 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 20 20	mapcar..........................
d000	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 64 29 20 28 6c 65 6e 67	...............(lambda.(d).(leng
d020	74 68 20 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 28 63 61 72 20 64 29 29 29 29 0a 20 20 20 20 20	th.(symbol-name.(car.d))))......
d040	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
d060	20 20 20 64 65 70 65 6e 64 65 6e 63 69 65 73 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20	...dependencies)))))............
d080	20 28 69 6e 73 65 72 74 20 22 20 20 27 28 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.(insert."..'(".................
d0a0	20 20 20 20 28 6d 61 70 63 6f 6e 63 61 74 20 28 70 63 61 73 65 2d 6c 61 6d 62 64 61 20 28 60 28	....(mapconcat.(pcase-lambda.(`(
d0c0	2c 70 6b 67 20 2c 76 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	,pkg.,ver)).....................
d0e0	20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 66 6f 72 6d 61 74 20 70 6b 67 20	.............(format.format.pkg.
d100	76 65 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 20 20	ver))...........................
d120	20 20 20 20 20 64 65 70 65 6e 64 65 6e 63 69 65 73 20 22 5c 6e 20 20 20 20 22 29 0a 20 20 20 20	.....dependencies."\n....").....
d140	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 29 5c 6e 22 29 29 0a 20 20 20 20 20 20 20 20	................")\n")).........
d160	28 69 6e 73 65 72 74 20 22 20 20 28 29 5c 6e 22 29 29 0a 20 20 20 20 20 20 28 70 63 61 73 65 2d	(insert."..()\n")).......(pcase-
d180	64 6f 6c 69 73 74 20 28 60 28 2c 6b 65 79 20 2c 73 6c 6f 74 29 20 70 61 63 6b 61 67 65 2d 62 75	dolist.(`(,key.,slot).package-bu
d1a0	69 6c 64 2d 2d 65 78 74 72 61 73 29 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 76 61 6c 20	ild--extras).........(let.((val.
d1c0	28 65 69 65 69 6f 2d 6f 72 65 66 20 72 63 70 20 73 6c 6f 74 29 29 29 0a 20 20 20 20 20 20 20 20	(eieio-oref.rcp.slot))).........
d1e0	20 20 28 63 6f 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 28 28 6e 6f 74 20 76 61 6c 29 29 0a 20	..(cond............((not.val))..
d200	20 20 20 20 20 20 20 20 20 20 28 28 6d 65 6d 71 20 6b 65 79 20 27 28 3a 61 75 74 68 6f 72 73 20	..........((memq.key.'(:authors.
d220	3a 6d 61 69 6e 74 61 69 6e 65 72 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20	:maintainers)).............(let.
d240	28 28 73 65 70 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	((sep.(concat...................
d260	20 20 20 20 20 20 22 5c 6e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	......"\n"......................
d280	20 20 20 28 6d 61 6b 65 2d 73 74 72 69 6e 67 20 28 2b 20 35 20 28 6c 65 6e 67 74 68 20 28 73 79	...(make-string.(+.5.(length.(sy
d2a0	6d 62 6f 6c 2d 6e 61 6d 65 20 6b 65 79 29 29 29 20 3f 5c 73 29 29 29 29 0a 20 20 20 20 20 20 20	mbol-name.key))).?\s))))........
d2c0	20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 66 6f 72 6d 61 74 20 22 20 20 25 73 20 27 28 22	.......(insert.(format."..%s.'("
d2e0	20 6b 65 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70	.key).......................(map
d300	63 6f 6e 63 61 74 20 23 27 70 72 69 6e 31 2d 74 6f 2d 73 74 72 69 6e 67 20 76 61 6c 20 73 65 70	concat.#'prin1-to-string.val.sep
d320	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 29 5c 6e 22 29 29 29	).......................")\n")))
d340	0a 20 20 20 20 20 20 20 20 20 20 20 28 28 69 6e 73 65 72 74 20 28 66 6f 72 6d 61 74 20 22 20 20	............((insert.(format."..
d360	25 73 20 25 73 5c 6e 22 20 6b 65 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	%s.%s\n".key....................
d380	20 20 20 20 20 20 20 20 20 28 70 72 69 6e 31 2d 74 6f 2d 73 74 72 69 6e 67 20 28 6d 61 63 72 6f	.........(prin1-to-string.(macro
d3a0	65 78 70 2d 71 75 6f 74 65 20 76 61 6c 29 29 29 29 29 29 29 29 0a 20 20 20 20 20 20 28 64 65 6c	exp-quote.val)))))))).......(del
d3c0	65 74 65 2d 63 68 61 72 20 2d 31 29 0a 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 29 5c 6e 22	ete-char.-1).......(insert.")\n"
d3e0	29 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 74 61 72 2d	))))..(defun.package-build--tar-
d400	74 79 70 65 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 60 62 73 64 27 20 6f 72 20 60 67 6e 75 27	type.()..."Return.`bsd'.or.`gnu'
d420	20 64 65 70 65 6e 64 69 6e 67 20 6f 6e 20 74 79 70 65 20 6f 66 20 54 61 72 20 65 78 65 63 75 74	.depending.on.type.of.Tar.execut
d440	61 62 6c 65 2e 0a 54 65 73 74 73 20 61 6e 64 20 73 65 74 73 20 76 61 72 69 61 62 6c 65 20 60 70	able..Tests.and.sets.variable.`p
d460	61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 74 61 72 2d 74 79 70 65 27 20 69 66 20 6e 6f 74 20 61	ackage-build--tar-type'.if.not.a
d480	6c 72 65 61 64 79 20 73 65 74 2e 22 0a 20 20 28 6f 72 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64	lready.set."...(or.package-build
d4a0	2d 2d 74 61 72 2d 74 79 70 65 0a 20 20 20 20 20 20 28 61 6e 64 20 70 61 63 6b 61 67 65 2d 62 75	--tar-type.......(and.package-bu
d4c0	69 6c 64 2d 74 61 72 2d 65 78 65 63 75 74 61 62 6c 65 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c	ild-tar-executable............(l
d4e0	65 74 20 28 28 76 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	et.((v.(shell-command-to-string.
d500	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73	.....................(format."%s
d520	20 2d 2d 76 65 72 73 69 6f 6e 22 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 74 61 72 2d 65 78	.--version".package-build-tar-ex
d540	65 63 75 74 61 62 6c 65 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20	ecutable))))..............(setq.
d560	70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 74 61 72 2d 74 79 70 65 0a 20 20 20 20 20 20 20 20	package-build--tar-type.........
d580	20 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 68 2d	...........(cond.((string-match-
d5a0	70 20 22 62 73 64 74 61 72 22 20 76 29 20 27 62 73 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	p."bsdtar".v).'bsd).............
d5c0	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 68 2d 70 20 22 47	.............((string-match-p."G
d5e0	4e 55 20 74 61 72 22 20 76 29 20 27 67 6e 75 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	NU.tar".v).'gnu)................
d600	20 20 20 20 20 20 20 20 20 20 28 74 20 27 67 6e 75 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e	..........(t.'gnu)))))))..(defun
d620	20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 63 72 65 61 74 65 2d 74 61 72 20 28 72 63 70 20	.package-build--create-tar.(rcp.
d640	64 69 72 65 63 74 6f 72 79 29 0a 20 20 22 43 72 65 61 74 65 20 61 20 74 61 72 20 66 69 6c 65 20	directory)..."Create.a.tar.file.
d660	63 6f 6e 74 61 69 6e 69 6e 67 20 74 68 65 20 70 61 63 6b 61 67 65 20 76 65 72 73 69 6f 6e 20 73	containing.the.package.version.s
d680	70 65 63 69 66 69 65 64 20 62 79 20 52 43 50 2e 0a 44 49 52 45 43 54 4f 52 59 20 69 73 20 61 20	pecified.by.RCP..DIRECTORY.is.a.
d6a0	74 65 6d 70 6f 72 61 72 79 20 64 69 72 65 63 74 6f 72 79 20 74 68 61 74 20 63 6f 6e 74 61 69 6e	temporary.directory.that.contain
d6c0	73 20 74 68 65 20 64 69 72 65 63 74 6f 72 79 0a 74 68 61 74 20 69 73 20 70 75 74 20 69 6e 20 74	s.the.directory.that.is.put.in.t
d6e0	68 65 20 74 61 72 62 61 6c 6c 2e 22 0a 20 20 28 70 63 61 73 65 2d 6c 65 74 2a 20 28 28 28 65 69	he.tarball."...(pcase-let*.(((ei
d700	65 69 6f 20 6e 61 6d 65 20 76 65 72 73 69 6f 6e 20 74 69 6d 65 29 20 72 63 70 29 0a 20 20 20 20	eio.name.version.time).rcp).....
d720	20 20 20 20 20 20 20 20 20 20 20 28 74 61 72 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d	...........(tar.(expand-file-nam
d740	65 20 28 63 6f 6e 63 61 74 20 6e 61 6d 65 20 22 2d 22 20 76 65 72 73 69 6f 6e 20 22 2e 74 61 72	e.(concat.name."-".version.".tar
d760	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	")..............................
d780	20 20 20 20 20 20 20 20 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 61 72 63 68 69 76 65 2d 64	.........package-build-archive-d
d7a0	69 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 20 28 63 6f 6e 63 61 74	ir))................(dir.(concat
d7c0	20 6e 61 6d 65 20 22 2d 22 20 76 65 72 73 69 6f 6e 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28	.name."-".version))).....(when.(
d7e0	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 74 29	and.(eq.system-type.'windows-nt)
d800	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 20 28 70 61 63 6b 61 67 65 2d 62 75 69	................(eq.(package-bui
d820	6c 64 2d 2d 74 61 72 2d 74 79 70 65 29 20 27 67 6e 75 29 29 0a 20 20 20 20 20 20 28 73 65 74 71	ld--tar-type).'gnu)).......(setq
d840	20 74 61 72 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 20 22	.tar.(replace-regexp-in-string."
d860	5e 5c 5c 28 5b 61 2d 7a 5d 5c 5c 29 3a 22 20 22 2f 5c 5c 31 22 20 74 61 72 29 29 29 0a 20 20 20	^\$[a-z]\$:"."/\\1".tar)))....
d880	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 64 69 72 65 63 74	.(let.((default-directory.direct
d8a0	6f 72 79 29 29 0a 20 20 20 20 20 20 28 70 72 6f 63 65 73 73 2d 66 69 6c 65 0a 20 20 20 20 20 20	ory)).......(process-file.......
d8c0	20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 74 61 72 2d 65 78 65 63 75 74 61 62 6c 65 20 6e 69	.package-build-tar-executable.ni
d8e0	6c 0a 20 20 20 20 20 20 20 28 67 65 74 2d 62 75 66 66 65 72 2d 63 72 65 61 74 65 20 22 2a 70 61	l........(get-buffer-create."*pa
d900	63 6b 61 67 65 2d 62 75 69 6c 64 2d 63 68 65 63 6b 6f 75 74 2a 22 29 20 6e 69 6c 0a 20 20 20 20	ckage-build-checkout*").nil.....
d920	20 20 20 22 2d 63 66 22 20 74 61 72 20 64 69 72 0a 20 20 20 20 20 20 20 3b 3b 20 41 72 67 75 6d	..."-cf".tar.dir........;;.Argum
d940	65 6e 74 73 20 74 68 61 74 20 61 72 65 20 6e 65 65 64 65 64 20 74 6f 20 73 74 72 69 70 20 6d 65	ents.that.are.needed.to.strip.me
d960	74 61 64 61 74 61 20 74 68 61 74 0a 20 20 20 20 20 20 20 3b 3b 20 70 72 65 76 65 6e 74 20 61 20	tadata.that........;;.prevent.a.
d980	72 65 70 72 6f 64 75 63 69 62 6c 65 20 74 61 72 62 61 6c 6c 20 61 73 20 64 65 73 63 72 69 62 65	reproducible.tarball.as.describe
d9a0	64 20 61 74 0a 20 20 20 20 20 20 20 3b 3b 20 68 74 74 70 73 3a 2f 2f 72 65 70 72 6f 64 75 63 69	d.at........;;.https://reproduci
d9c0	62 6c 65 2d 62 75 69 6c 64 73 2e 6f 72 67 2f 64 6f 63 73 2f 61 72 63 68 69 76 65 73 2e 0a 20 20	ble-builds.org/docs/archives....
d9e0	20 20 20 20 20 22 2d 2d 73 6f 72 74 3d 6e 61 6d 65 22 0a 20 20 20 20 20 20 20 28 66 6f 72 6d 61	....."--sort=name"........(forma
da00	74 20 22 2d 2d 6d 74 69 6d 65 3d 40 25 64 22 20 74 69 6d 65 29 0a 20 20 20 20 20 20 20 22 2d 2d	t."--mtime=@%d".time)........"--
da20	6f 77 6e 65 72 3d 30 22 20 22 2d 2d 67 72 6f 75 70 3d 30 22 20 22 2d 2d 6e 75 6d 65 72 69 63 2d	owner=0"."--group=0"."--numeric-
da40	6f 77 6e 65 72 22 0a 20 20 20 20 20 20 20 22 2d 2d 70 61 78 2d 6f 70 74 69 6f 6e 3d 65 78 74 68	owner"........"--pax-option=exth
da60	64 72 2e 6e 61 6d 65 3d 25 64 2f 50 61 78 48 65 61 64 65 72 73 2f 25 66 2c 64 65 6c 65 74 65 3d	dr.name=%d/PaxHeaders/%f,delete=
da80	61 74 69 6d 65 2c 64 65 6c 65 74 65 3d 63 74 69 6d 65 22 29 29 0a 20 20 20 20 28 77 68 65 6e 20	atime,delete=ctime")).....(when.
daa0	28 61 6e 64 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 76 65 72 62 6f 73 65 20 6e 6f 6e 69 6e	(and.package-build-verbose.nonin
dac0	74 65 72 61 63 74 69 76 65 29 0a 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 43 72 65 61 74	teractive).......(message."Creat
dae0	65 64 20 25 73 20 63 6f 6e 74 61 69 6e 69 6e 67 3a 22 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f	ed.%s.containing:".(file-name-no
db00	6e 64 69 72 65 63 74 6f 72 79 20 74 61 72 29 29 0a 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28	ndirectory.tar)).......(dolist.(
db20	6c 69 6e 65 20 28 73 6f 72 74 20 28 70 72 6f 63 65 73 73 2d 6c 69 6e 65 73 20 70 61 63 6b 61 67	line.(sort.(process-lines.packag
db40	65 2d 62 75 69 6c 64 2d 74 61 72 2d 65 78 65 63 75 74 61 62 6c 65 0a 20 20 20 20 20 20 20 20 20	e-build-tar-executable..........
db60	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
db80	22 2d 2d 6c 69 73 74 22 20 22 2d 2d 66 69 6c 65 22 20 74 61 72 29 0a 20 20 20 20 20 20 20 20 20	"--list"."--file".tar)..........
dba0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 73 74 72 69 6e 67 3c 29 29 0a 20 20 20	.................#'string<))....
dbc0	20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 20 20 25 73 22 20 6c 69 6e 65 29 29 29 29 29 0a 0a	.....(message."..%s".line)))))..
dbe0	28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 77 72 69 74 65 2d 70 6b 67 2d	(defun.package-build--write-pkg-
dc00	72 65 61 64 6d 65 20 28 70 6b 67 20 66 69 6c 65 73 29 0a 20 20 28 77 68 65 6e 2d 6c 65 74 2a 20	readme.(pkg.files)...(when-let*.
dc20	28 28 6e 61 6d 65 20 28 6f 72 65 66 20 70 6b 67 20 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20	((name.(oref.pkg.name)).........
dc40	20 20 20 20 20 20 28 63 6f 6d 6d 65 6e 74 61 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	......(commentary...............
dc60	20 28 6c 65 74 2a 20 28 28 66 69 6c 65 20 28 63 6f 6e 63 61 74 20 6e 61 6d 65 20 22 2e 65 6c 22	.(let*.((file.(concat.name.".el"
dc80	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 66 69 6c 65 20 28	)).......................(file.(
dca0	6f 72 20 28 63 61 72 20 28 72 61 73 73 6f 63 20 66 69 6c 65 20 66 69 6c 65 73 29 29 20 66 69 6c	or.(car.(rassoc.file.files)).fil
dcc0	65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 20	e)).......................(file.
dce0	28 61 6e 64 20 66 69 6c 65 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 66 69 6c 65	(and.file.(expand-file-name.file
dd00	29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 66 69 6c 65	))))..................(and.(file
dd20	2d 65 78 69 73 74 73 2d 70 20 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	-exists-p.file).................
dd40	20 20 20 20 20 20 28 6c 6d 2d 63 6f 6d 6d 65 6e 74 61 72 79 20 66 69 6c 65 29 29 29 29 29 0a 20	......(lm-commentary.file)))))..
dd60	20 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 28 69 66 20 28	...(with-temp-buffer.......(if.(
dd80	3e 3d 20 65 6d 61 63 73 2d 6d 61 6a 6f 72 2d 76 65 72 73 69 6f 6e 20 32 38 29 0a 20 20 20 20 20	>=.emacs-major-version.28)......
dda0	20 20 20 20 20 28 69 6e 73 65 72 74 20 63 6f 6d 6d 65 6e 74 61 72 79 29 0a 20 20 20 20 20 20 20	.....(insert.commentary)........
ddc0	20 3b 3b 20 54 61 6b 65 6e 20 66 72 6f 6d 20 32 38 2e 30 27 73 20 60 6c 6d 2d 63 6f 6d 6d 65 6e	.;;.Taken.from.28.0's.`lm-commen
dde0	74 61 72 79 27 2e 0a 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 0a 20 20 20 20 20 20 20 20 20	tary'..........(insert..........
de00	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 20 20 20 20 20 20 20	(replace-regexp-in-string.......
de20	3b 20 47 65 74 20 72 69 64 20 6f 66 2e 2e 2e 0a 20 20 20 20 20 20 20 20 20 20 22 5b 5b 3a 62 6c	;.Get.rid.of.............."[[:bl
de40	61 6e 6b 3a 5d 5d 2a 24 22 20 22 22 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 74 72 61 69 6c	ank:]]*$"."".............;.trail
de60	69 6e 67 20 77 68 69 74 65 2d 73 70 61 63 65 0a 20 20 20 20 20 20 20 20 20 20 28 72 65 70 6c 61	ing.white-space...........(repla
de80	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 20 20 20 20 28	ce-regexp-in-string............(
dea0	66 6f 72 6d 61 74 20 22 25 73 5c 5c 7c 25 73 5c 5c 7c 25 73 22 0a 20 20 20 20 20 20 20 20 20 20	format."%s\\\|%s\\\|%s"...........
dec0	20 20 20 20 20 20 20 20 20 3b 3b 20 63 6f 6d 6d 65 6e 74 61 72 79 20 68 65 61 64 65 72 0a 20 20	.........;;.commentary.header...
dee0	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 5e 3b 3b 3b 5b 5b	.................(concat."^;;;[[
df00	3a 62 6c 61 6e 6b 3a 5d 5d 2a 5c 5c 28 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	:blank:]]*\\("..................
df20	20 20 20 20 20 20 20 20 20 20 6c 6d 2d 63 6f 6d 6d 65 6e 74 61 72 79 2d 68 65 61 64 65 72 0a 20	..........lm-commentary-header..
df40	20 20 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 3a 5b	.........................."\\):[
df60	5b 3a 62 6c 61 6e 6b 3a 5d 5c 6e 5d 2a 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	[:blank:]\n]*").................
df80	20 20 20 22 5e 3b 3b 5b 5b 3a 62 6c 61 6e 6b 3a 5d 5d 3f 22 20 20 20 20 20 3b 20 64 6f 75 62 6c	..."^;;[[:blank:]]?".....;.doubl
dfa0	65 20 73 65 6d 69 63 6f 6c 6f 6e 20 70 72 65 66 69 78 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	e.semicolon.prefix..............
dfc0	20 20 20 20 20 20 22 5b 5b 3a 62 6c 61 6e 6b 3a 5d 5c 6e 5d 2a 5c 5c 27 22 29 20 20 3b 20 74 72	......"[[:blank:]\n]*\\'")..;.tr
dfe0	61 69 6c 69 6e 67 20 6e 65 77 2d 6c 69 6e 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 22 22 20 63	ailing.new-lines............"".c
e000	6f 6d 6d 65 6e 74 61 72 79 29 29 29 29 0a 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 6f 72 20	ommentary)))).......(unless.(or.
e020	28 62 6f 62 70 29 20 28 3d 20 28 63 68 61 72 2d 62 65 66 6f 72 65 29 20 3f 5c 6e 29 29 0a 20 20	(bobp).(=.(char-before).?\n))...
e040	20 20 20 20 20 20 28 69 6e 73 65 72 74 20 3f 5c 6e 29 29 0a 20 20 20 20 20 20 3b 3b 20 57 65 20	......(insert.?\n)).......;;.We.
e060	77 72 69 74 65 20 74 68 65 20 66 69 6c 65 20 65 76 65 6e 20 69 66 20 69 74 20 69 73 20 65 6d 70	write.the.file.even.if.it.is.emp
e080	74 79 2c 20 77 68 69 63 68 20 69 73 20 70 65 72 68 61 70 73 0a 20 20 20 20 20 20 3b 3b 20 61 20	ty,.which.is.perhaps.......;;.a.
e0a0	71 75 65 73 74 69 6f 6e 61 62 6c 65 20 63 68 6f 69 63 65 2c 20 62 75 74 20 61 74 20 6c 65 61 73	questionable.choice,.but.at.leas
e0c0	74 20 69 74 27 73 20 63 6f 6e 73 69 73 74 65 6e 74 2e 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28	t.it's.consistent........(let.((
e0e0	63 6f 64 69 6e 67 2d 73 79 73 74 65 6d 2d 66 6f 72 2d 77 72 69 74 65 20 62 75 66 66 65 72 2d 66	coding-system-for-write.buffer-f
e100	69 6c 65 2d 63 6f 64 69 6e 67 2d 73 79 73 74 65 6d 29 29 0a 20 20 20 20 20 20 20 20 28 77 72 69	ile-coding-system)).........(wri
e120	74 65 2d 72 65 67 69 6f 6e 20 6e 69 6c 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	te-region.nil.nil...............
e140	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 28 63 6f 6e 63 61	........(expand-file-name.(conca
e160	74 20 6e 61 6d 65 20 22 2d 72 65 61 64 6d 65 2e 74 78 74 22 29 0a 20 20 20 20 20 20 20 20 20 20	t.name."-readme.txt")...........
e180	20 20 20 20 20 20 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 61	..............................pa
e1a0	63 6b 61 67 65 2d 62 75 69 6c 64 2d 61 72 63 68 69 76 65 2d 64 69 72 29 29 29 29 29 29 0a 0a 28	ckage-build-archive-dir))))))..(
e1c0	64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 67 65 6e 65 72 61 74 65 2d 69 6e	defun.package-build--generate-in
e1e0	66 6f 2d 66 69 6c 65 73 20 28 72 63 70 20 66 69 6c 65 73 20 74 61 72 67 65 74 2d 64 69 72 29 0a	fo-files.(rcp.files.target-dir).
e200	20 20 22 43 72 65 61 74 65 20 61 6e 20 69 6e 66 6f 20 66 69 6c 65 20 66 6f 72 20 65 61 63 68 20	.."Create.an.info.file.for.each.
e220	74 65 78 69 6e 66 6f 20 66 69 6c 65 20 6c 69 73 74 65 64 20 69 6e 20 46 49 4c 45 53 2e 0a 0a 41	texinfo.file.listed.in.FILES...A
e240	6c 73 6f 20 63 72 65 61 74 65 20 74 68 65 20 69 6e 66 6f 20 64 69 72 20 66 69 6c 65 2e 20 20 52	lso.create.the.info.dir.file...R
e260	65 6d 6f 76 65 20 65 61 63 68 20 6f 72 69 67 69 6e 61 6c 20 74 65 78 69 6e 66 6f 0a 66 69 6c 65	emove.each.original.texinfo.file
e280	2e 20 20 54 68 65 20 73 6f 75 72 63 65 20 61 6e 64 20 64 65 73 74 69 6e 61 74 69 6f 6e 20 66 69	...The.source.and.destination.fi
e2a0	6c 65 20 70 61 74 68 73 20 61 72 65 20 65 78 70 61 6e 64 65 64 20 69 6e 0a 60 64 65 66 61 75 6c	le.paths.are.expanded.in.`defaul
e2c0	74 2d 64 69 72 65 63 74 6f 72 79 27 20 61 6e 64 20 54 41 52 47 45 54 2d 44 49 52 20 72 65 73 70	t-directory'.and.TARGET-DIR.resp
e2e0	65 63 74 69 76 65 6c 79 2e 0a 0a 49 66 20 61 6e 20 6f 72 67 20 66 69 6c 65 20 61 70 70 65 61 72	ectively...If.an.org.file.appear
e300	73 20 69 6e 20 46 49 4c 45 53 20 61 6e 64 20 69 6e 20 52 43 50 27 73 20 60 6f 72 67 2d 65 78 70	s.in.FILES.and.in.RCP's.`org-exp
e320	6f 72 74 73 27 20 73 6c 6f 74 0a 61 73 20 77 65 6c 6c 2c 20 74 68 65 6e 20 65 78 70 6f 72 74 20	orts'.slot.as.well,.then.export.
e340	69 74 20 74 6f 20 74 65 78 69 6e 66 6f 20 61 6e 64 20 74 68 65 6e 20 74 68 65 20 72 65 73 75 6c	it.to.texinfo.and.then.the.resul
e360	74 20 74 6f 20 69 6e 66 6f 2e 0a 49 66 20 74 68 65 20 6f 72 67 20 66 69 6c 65 20 73 65 74 73 20	t.to.info..If.the.org.file.sets.
e380	60 65 78 70 6f 72 74 5f 66 69 6c 65 5f 6e 61 6d 65 27 2c 20 74 68 65 6e 20 74 68 65 20 63 6f 72	`export_file_name',.then.the.cor
e3a0	72 65 73 70 6f 6e 64 69 6e 67 0a 65 6e 74 72 79 20 69 6e 20 60 6f 72 67 2d 65 78 70 6f 72 74 73	responding.entry.in.`org-exports
e3c0	27 20 6d 75 73 74 20 68 61 76 65 20 74 68 65 20 66 6f 72 6d 20 28 4f 52 47 20 54 45 58 49 29 2c	'.must.have.the.form.(ORG.TEXI),
e3e0	20 77 68 65 72 65 20 54 45 58 49 0a 69 73 20 74 68 65 20 73 61 6d 65 20 61 73 20 74 68 65 20 76	.where.TEXI.is.the.same.as.the.v
e400	61 6c 75 65 20 6f 66 20 60 65 78 70 6f 72 74 5f 66 69 6c 65 5f 6e 61 6d 65 27 2e 22 0a 20 20 28	alue.of.`export_file_name'."...(
e420	70 63 61 73 65 2d 64 6f 6c 69 73 74 20 28 60 28 2c 73 72 63 20 2e 20 2c 5f 29 20 66 69 6c 65 73	pcase-dolist.(`(,src...,_).files
e440	29 0a 20 20 20 20 28 6c 65 74 2a 20 28 28 65 78 74 20 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 65 78	).....(let*.((ext..(file-name-ex
e460	74 65 6e 73 69 6f 6e 20 73 72 63 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 67 73 20 28	tension.src))............(orgs.(
e480	6f 72 65 66 20 72 63 70 20 6f 72 67 2d 65 78 70 6f 72 74 73 29 29 0a 20 20 20 20 20 20 20 20 20	oref.rcp.org-exports))..........
e4a0	20 20 28 6f 72 67 20 20 28 61 6e 64 20 28 65 71 75 61 6c 20 65 78 74 20 22 6f 72 67 22 29 0a 20	..(org..(and.(equal.ext."org")..
e4c0	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 62 75 69	.....................package-bui
e4e0	6c 64 2d 72 75 6e 2d 72 65 63 69 70 65 2d 6f 72 67 2d 65 78 70 6f 72 74 73 0a 20 20 20 20 20 20	ld-run-recipe-org-exports.......
e500	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 6d 65 6d 62 65 72 20 73 72 63 20	................(or.(member.src.
e520	6f 72 67 73 29 20 28 61 73 73 6f 63 20 73 72 63 20 6f 72 67 73 29 29 0a 20 20 20 20 20 20 20 20	orgs).(assoc.src.orgs)).........
e540	20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 72 63 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28	..............src))............(
e560	74 65 78 69 20 28 61 6e 64 20 28 6d 65 6d 62 65 72 20 65 78 74 20 27 28 22 74 65 78 69 22 20 22	texi.(and.(member.ext.'("texi"."
e580	74 65 78 69 6e 66 6f 22 29 29 20 73 72 63 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 66	texinfo")).src))............(inf
e5a0	6f 20 28 61 6e 64 20 28 65 71 75 61 6c 20 65 78 74 20 22 69 6e 66 6f 22 29 0a 20 20 20 20 20 20	o.(and.(equal.ext."info").......
e5c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69	................(file-name-nondi
e5e0	72 65 63 74 6f 72 79 20 73 72 63 29 29 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 6f 72 67 0a	rectory.src)))).......(when.org.
e600	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 79	........(let.((default-directory
e620	20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 28 65 78 70 61 6e 64 2d 66 69	.(file-name-directory.(expand-fi
e640	6c 65 2d 6e 61 6d 65 20 6f 72 67 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 65	le-name.org)))...............(ne
e660	78 74 20 28 6f 72 20 28 63 61 64 72 20 28 61 73 73 6f 63 20 73 72 63 20 6f 72 67 73 29 29 0a 20	xt.(or.(cadr.(assoc.src.orgs))..
e680	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 6e 61 6d	.......................(file-nam
e6a0	65 2d 77 69 74 68 2d 65 78 74 65 6e 73 69 6f 6e 20 6f 72 67 20 22 2e 74 65 78 69 22 29 29 29 0a	e-with-extension.org.".texi"))).
e6c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 67 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f	..............(org.(file-name-no
e6e0	6e 64 69 72 65 63 74 6f 72 79 20 6f 72 67 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 64 65 6c	ndirectory.org)))...........(del
e700	65 74 65 2d 66 69 6c 65 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 6f 72 67 20 74	ete-file.(expand-file-name.org.t
e720	61 72 67 65 74 2d 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62	arget-dir))...........(package-b
e740	75 69 6c 64 2d 2d 6d 65 73 73 61 67 65 20 22 47 65 6e 65 72 61 74 69 6e 67 20 25 73 22 20 28 66	uild--message."Generating.%s".(f
e760	69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 72 65 63 74 6f 72 79 20 6e 65 78 74 29 29 0a 20 20 20	ile-name-nondirectory.next))....
e780	20 20 20 20 20 20 20 28 77 69 74 68 2d 64 65 6d 6f 74 65 64 2d 65 72 72 6f 72 73 20 22 45 72 72	.......(with-demoted-errors."Err
e7a0	6f 72 3a 20 25 53 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69	or:.%S".............(package-bui
e7c0	6c 64 2d 2d 63 61 6c 6c 2d 73 61 6e 64 62 6f 78 65 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	ld--call-sandboxed..............
e7e0	72 63 70 20 22 65 6d 61 63 73 22 20 22 2d 51 22 20 22 2d 2d 62 61 74 63 68 22 20 22 2d 6c 22 20	rcp."emacs"."-Q"."--batch"."-l".
e800	22 6f 78 2d 74 65 78 69 6e 66 6f 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 6f 72 67 20 22 2d	"ox-texinfo"..............org."-
e820	2d 66 75 6e 63 61 6c 6c 22 20 22 6f 72 67 2d 74 65 78 69 6e 66 6f 2d 65 78 70 6f 72 74 2d 74 6f	-funcall"."org-texinfo-export-to
e840	2d 74 65 78 69 6e 66 6f 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 74 65 78	-texinfo").............(setq.tex
e860	69 20 6e 65 78 74 29 29 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 74 65 78 69 0a 20 20 20 20	i.next)))).......(when.texi.....
e880	20 20 20 20 28 6c 65 74 2a 20 28 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 28 66	....(let*.((default-directory.(f
e8a0	69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d	ile-name-directory.(expand-file-
e8c0	6e 61 6d 65 20 74 65 78 69 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 65 78	name.texi)))................(tex
e8e0	69 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 74 65 78 69 29 29	i.(file-name-nondirectory.texi))
e900	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 65 78 74 20 28 66 69 6c 65 2d 6e 61 6d 65	................(next.(file-name
e920	2d 77 69 74 68 2d 65 78 74 65 6e 73 69 6f 6e 20 74 65 78 69 20 22 2e 69 6e 66 6f 22 29 29 29 0a	-with-extension.texi.".info"))).
e940	20 20 20 20 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 66 69 6c 65 20 28 65 78 70 61 6e 64 2d 66	..........(delete-file.(expand-f
e960	69 6c 65 2d 6e 61 6d 65 20 74 65 78 69 20 74 61 72 67 65 74 2d 64 69 72 29 29 0a 20 20 20 20 20	ile-name.texi.target-dir))......
e980	20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 6d 65 73 73 61 67 65 20 22 47 65	.....(package-build--message."Ge
e9a0	6e 65 72 61 74 69 6e 67 20 25 73 22 20 6e 65 78 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65	nerating.%s".next)...........(se
e9c0	74 71 20 6e 65 78 74 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 6e 65 78 74 20 74	tq.next.(expand-file-name.next.t
e9e0	61 72 67 65 74 2d 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 64 65 6d 6f	arget-dir))...........(with-demo
ea00	74 65 64 2d 65 72 72 6f 72 73 20 22 45 72 72 6f 72 3a 20 25 53 22 0a 20 20 20 20 20 20 20 20 20	ted-errors."Error:.%S"..........
ea20	20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 63 61 6c 6c 2d 70 72 6f 63 65 73 73 0a	...(package-build--call-process.
ea40	20 20 20 20 20 20 20 20 20 20 20 20 20 72 63 70 20 22 6d 61 6b 65 69 6e 66 6f 22 20 22 2d 2d 6e	.............rcp."makeinfo"."--n
ea60	6f 2d 73 70 6c 69 74 22 20 74 65 78 69 20 22 2d 6f 22 20 6e 65 78 74 29 0a 20 20 20 20 20 20 20	o-split".texi."-o".next)........
ea80	20 20 20 20 20 28 73 65 74 71 20 69 6e 66 6f 20 6e 65 78 74 29 29 29 29 0a 20 20 20 20 20 20 28	.....(setq.info.next)))).......(
eaa0	77 68 65 6e 20 69 6e 66 6f 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 64 65 66 61 75 6c 74	when.info.........(let.((default
eac0	2d 64 69 72 65 63 74 6f 72 79 20 74 61 72 67 65 74 2d 64 69 72 29 29 0a 20 20 20 20 20 20 20 20	-directory.target-dir)).........
eae0	20 20 28 77 69 74 68 2d 64 65 6d 6f 74 65 64 2d 65 72 72 6f 72 73 20 22 45 72 72 6f 72 3a 20 25	..(with-demoted-errors."Error:.%
eb00	53 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 63	S".............(package-build--c
eb20	61 6c 6c 2d 70 72 6f 63 65 73 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 72 63 70 20 22 69 6e	all-process..............rcp."in
eb40	73 74 61 6c 6c 2d 69 6e 66 6f 22 20 22 2d 2d 64 69 72 3d 64 69 72 22 20 69 6e 66 6f 29 29 29 29	stall-info"."--dir=dir".info))))
eb60	29 29 29 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 73 65 74 2d 76	)))..(defun.package-build--set-v
eb80	65 72 73 69 6f 6e 2d 68 65 61 64 65 72 73 20 28 72 63 70 20 66 69 6c 65 2d 6f 72 2d 64 69 72 29	ersion-headers.(rcp.file-or-dir)
eba0	0a 20 20 28 70 63 61 73 65 2d 6c 65 74 20 28 28 28 65 69 65 69 6f 20 6e 61 6d 65 20 76 65 72 73	...(pcase-let.(((eieio.name.vers
ebc0	69 6f 6e 20 72 65 76 64 65 73 63 29 20 72 63 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ion.revdesc).rcp)...............
ebe0	28 73 69 6e 67 6c 65 20 28 66 69 6c 65 2d 72 65 67 75 6c 61 72 2d 70 20 66 69 6c 65 2d 6f 72 2d	(single.(file-regular-p.file-or-
ec00	64 69 72 29 29 29 0a 20 20 20 20 28 64 6f 6c 69 73 74 20 28 66 69 6c 65 20 28 69 66 20 73 69 6e	dir))).....(dolist.(file.(if.sin
ec20	67 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 28 6c 69 73 74 20	gle.......................(list.
ec40	66 69 6c 65 2d 6f 72 2d 64 69 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	file-or-dir)....................
ec60	20 28 64 69 72 65 63 74 6f 72 79 2d 66 69 6c 65 73 20 66 69 6c 65 2d 6f 72 2d 64 69 72 20 74 20	.(directory-files.file-or-dir.t.
ec80	22 5c 5c 2e 65 6c 5c 5c 27 22 29 29 29 0a 20 20 20 20 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62	"\\.el\\'"))).......(with-temp-b
eca0	75 66 66 65 72 0a 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 2d 66 69 6c 65 2d 63 6f 6e 74 65	uffer.........(insert-file-conte
ecc0	6e 74 73 20 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 65 6e 64 20 28 6c 6d	nts.file).........(let.((end.(lm
ece0	2d 63 6f 64 65 2d 73 74 61 72 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6f 73	-code-start))...............(pos
ed00	20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 68 65 61 64 65 72	.nil))...........(dolist.(header
ed20	20 27 28 22 50 61 63 6b 61 67 65 2d 56 65 72 73 69 6f 6e 22 20 22 56 65 72 73 69 6f 6e 22 20 22	.'("Package-Version"."Version"."
ed40	50 61 63 6b 61 67 65 2d 52 65 76 69 73 69 6f 6e 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	Package-Revision")).............
ed60	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 20 20 20	(goto-char.(point-min)).........
ed80	20 20 20 20 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 66 6f	....(when.(re-search-forward.(fo
eda0	72 6d 61 74 20 22 5e 3b 3b 2b 20 2b 25 73 3a 2e 2b 22 20 68 65 61 64 65 72 29 20 65 6e 64 20 74	rmat."^;;+.+%s:.+".header).end.t
edc0	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 70 6f 73 0a 20 20 20 20	)...............(unless.pos.....
ede0	20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 70 6f 73 20 28 63 6f 70 79 2d 6d 61 72 6b	............(setq.pos.(copy-mark
ee00	65 72 20 28 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	er.(match-beginning.0)))).......
ee20	20 20 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 72 65 67 69 6f 6e 20 28 6d 61 74 63 68 2d 62 65	........(delete-region.(match-be
ee40	67 69 6e 6e 69 6e 67 20 30 29 20 28 31 2b 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f	ginning.0).(1+.(line-end-positio
ee60	6e 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 6f 72 20 73 69 6e 67 6c	n)))))...........(when.(or.singl
ee80	65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 75 61 6c 20 28 66 69	e.....................(equal.(fi
eea0	6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 72 65 63 74 6f 72 79 20 66 69 6c 65 29 20 28 63 6f 6e 63	le-name-nondirectory.file).(conc
eec0	61 74 20 6e 61 6d 65 20 22 2e 65 6c 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e	at.name.".el"))).............(un
eee0	6c 65 73 73 20 70 6f 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 64 6f 6c 69 73	less.pos...............(cl-dolis
ef00	74 20 28 68 65 61 64 65 72 20 27 28 22 50 61 63 6b 61 67 65 2d 52 65 71 75 69 72 65 73 22 20 22	t.(header.'("Package-Requires"."
ef20	53 50 44 58 2d 4c 69 63 65 6e 73 65 2d 49 64 65 6e 74 69 66 69 65 72 22 0a 20 20 20 20 20 20 20	SPDX-License-Identifier"........
ef40	20 20 20 20 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 4c 69 63	............................"Lic
ef60	65 6e 73 65 22 20 22 55 52 4c 22 20 22 48 6f 6d 65 70 61 67 65 22 20 22 4b 65 79 77 6f 72 64 73	ense"."URL"."Homepage"."Keywords
ef80	22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28	")).................(goto-char.(
efa0	70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65	point-min)).................(whe
efc0	6e 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 28 66 6f 72 6d 61 74 20 22 5e 3b	n.(re-search-forward.(format."^;
efe0	3b 2b 20 2b 25 73 3a 2e 2b 22 20 68 65 61 64 65 72 29 20 65 6e 64 20 74 29 0a 20 20 20 20 20 20	;+.+%s:.+".header).end.t).......
f000	20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 70 6f 73 20 28 63 6f 70 79 2d 6d 61 72 6b	............(setq.pos.(copy-mark
f020	65 72 20 28 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 30 29 29 29 0a 20 20 20 20 20 20 20	er.(match-beginning.0)))........
f040	20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 72 65 74 75 72 6e 2d 66 72 6f 6d 20 6e 69 6c 29 29	...........(cl-return-from.nil))
f060	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 70 6f 73 0a 20 20 20 20 20	)).............(unless.pos......
f080	20 20 20 20 20 20 20 20 20 28 63 6c 2d 64 6f 6c 69 73 74 20 28 68 65 61 64 65 72 20 27 28 22 43	.........(cl-dolist.(header.'("C
f0a0	6f 6d 6d 65 6e 74 61 72 79 22 20 22 43 6f 64 65 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	ommentary"."Code")).............
f0c0	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)).....
f0e0	20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72	............(when.(re-search-for
f100	77 61 72 64 20 28 66 6f 72 6d 61 74 20 22 5e 3b 3b 3b 20 25 73 3a 24 22 20 68 65 61 64 65 72 29	ward.(format."^;;;.%s:$".header)
f120	20 65 6e 64 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d	.end.t)...................(goto-
f140	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 20 20 20 20 20	char.(match-beginning.0)).......
f160	20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 5c 6e 22 29 0a 20 20 20 20 20 20	............(insert."\n").......
f180	20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 70 6f 73 20 28 63 6f 70 79 2d 6d 61 72 6b	............(setq.pos.(copy-mark
f1a0	65 72 20 28 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 30 29 29 29 0a 20 20 20 20 20 20 20	er.(match-beginning.0)))........
f1c0	20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 72 65 74 75 72 6e 2d 66 72 6f 6d 20 6e 69 6c 29 29	...........(cl-return-from.nil))
f1e0	29 29 0a 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 20	)).............(when.pos........
f200	20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 70 6f 73 29 0a 20 20 20 20 20 20 20 20 20	.......(goto-char.pos)..........
f220	20 20 20 20 20 28 69 6e 73 65 72 74 20 28 66 6f 72 6d 61 74 20 22 3b 3b 20 50 61 63 6b 61 67 65	.....(insert.(format.";;.Package
f240	2d 56 65 72 73 69 6f 6e 3a 20 25 73 5c 6e 22 20 76 65 72 73 69 6f 6e 29 29 0a 20 20 20 20 20 20	-Version:.%s\n".version)).......
f260	20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 66 6f 72 6d 61 74 20 22 3b 3b 20 50 61 63 6b	........(insert.(format.";;.Pack
f280	61 67 65 2d 52 65 76 69 73 69 6f 6e 3a 20 25 73 5c 6e 22 20 72 65 76 64 65 73 63 29 29 29 29 0a	age-Revision:.%s\n".revdesc)))).
f2a0	20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 73 69 6e 67 6c 65 0a 20 20 20 20	..........(when.(and.single.....
f2c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 73 65 61 72 63 68 2d 66 6f	.................(not.(search-fo
f2e0	72 77 61 72 64 20 28 66 6f 72 6d 61 74 20 22 3b 3b 3b 20 25 73 2e 65 6c 20 65 6e 64 73 20 68 65	rward.(format.";;;.%s.el.ends.he
f300	72 65 22 20 6e 61 6d 65 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63	re".name)))).............(goto-c
f320	68 61 72 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e	har.(point-max)).............(in
f340	73 65 72 74 20 28 66 6f 72 6d 61 74 20 22 5c 6e 3b 3b 3b 20 25 73 2e 65 6c 20 65 6e 64 73 20 68	sert.(format."\n;;;.%s.el.ends.h
f360	65 72 65 5c 6e 22 20 6e 61 6d 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 72 69 74 65 2d	ere\n".name)))...........(write-
f380	72 65 67 69 6f 6e 20 6e 69 6c 20 6e 69 6c 20 66 69 6c 65 29 29 29 29 29 29 0a 0a 3b 3b 3b 20 45	region.nil.nil.file))))))..;;;.E
f3a0	78 74 72 61 63 74 20 4d 65 74 61 64 61 74 61 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d	xtract.Metadata..(defun.package-
f3c0	62 75 69 6c 64 2d 2d 65 78 74 72 61 63 74 2d 66 72 6f 6d 2d 6c 69 62 72 61 72 79 20 28 72 63 70	build--extract-from-library.(rcp
f3e0	20 66 69 6c 65 73 29 0a 20 20 22 53 74 6f 72 65 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 66 72 6f	.files)..."Store.information.fro
f400	6d 20 74 68 65 20 6d 61 69 6e 2d 6c 69 62 72 61 72 79 20 66 72 6f 6d 20 46 49 4c 45 53 20 69 6e	m.the.main-library.from.FILES.in
f420	20 52 43 50 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 6e 61 6d 65 20 28 6f 72 65 66 20 72 63 70 20	.RCP."...(let*.((name.(oref.rcp.
f440	6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 20 28 63 6f 6e 63 61 74 20 6e 61	name))..........(file.(concat.na
f460	6d 65 20 22 2e 65 6c 22 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 20 28 6f 72 20 28 63	me.".el"))..........(file.(or.(c
f480	61 72 20 28 72 61 73 73 6f 63 20 66 69 6c 65 20 66 69 6c 65 73 29 29 20 66 69 6c 65 29 29 29 0a	ar.(rassoc.file.files)).file))).
f4a0	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 66 69 6c 65 29 0a 20	....(when.(file-exists-p.file)..
f4c0	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 28	.....(with-temp-buffer.........(
f4e0	69 6e 73 65 72 74 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 20	insert-file-contents.file)......
f500	20 20 20 28 6f 73 65 74 20 72 63 70 20 73 75 6d 6d 61 72 79 0a 20 20 20 20 20 20 20 20 20 20 20	...(oset.rcp.summary............
f520	20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 6e 6f 72 6d 61 6c 69 7a 65 2d 73 75 6d	...(package-build--normalize-sum
f540	6d 61 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73	mary................(save-excurs
f560	69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20	ion..................(goto-char.
f580	28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61	(point-min))..................(a
f5a0	6e 64 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 5c 0a 5e 3b 3b 3b 20 5b 5e	nd.(re-search-forward."\.^;;;.[^
f5c0	20 5d 2a 5c 5c 2e 65 6c 20 2d 2d 2d 5b 20 5c 74 5d 2a 5c 5c 28 2e 2a 3f 5c 5c 29 5b 20 5c 74 5d	.]\\.el.---[.\t]\$.*?\$[.\t]
f5e0	2a 5c 5c 28 2d 5c 5c 2a 2d 2e 2a 2d 5c 5c 2a 2d 5b 20 5c 74 5d 2a 5c 5c 29 3f 24 22 20 6e 69 6c	\$-\\-.-\\-[.\t]*\$?$".nil
f600	20 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 28 6d 61 74 63 68	.t).......................(match
f620	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 29 29 29 0a 20 20 20	-string-no-properties.1)))))....
f640	20 20 20 20 20 28 6f 73 65 74 20 72 63 70 20 64 65 70 65 6e 64 65 6e 63 69 65 73 0a 20 20 20 20	.....(oset.rcp.dependencies.....
f660	20 20 20 20 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 28	..........(cond................(
f680	28 66 62 6f 75 6e 64 70 20 27 6c 6d 2d 70 61 63 6b 61 67 65 2d 72 65 71 75 69 72 65 73 29 0a 20	(fboundp.'lm-package-requires)..
f6a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 6d 2d 70 61 63 6b 61 67 65 2d 72 65 71 75 69	...............(lm-package-requi
f6c0	72 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 66 62 6f 75 6e 64 70 20 27	res))................((fboundp.'
f6e0	70 61 63 6b 61 67 65 2d 2d 70 72 65 70 61 72 65 2d 64 65 70 65 6e 64 65 6e 63 69 65 73 29 0a 20	package--prepare-dependencies)..
f700	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 72 65 71 75 69	...............(and-let*.((requi
f720	72 65 2d 6c 69 6e 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	re-lines........................
f740	20 20 20 20 20 28 6c 6d 2d 68 65 61 64 65 72 2d 6d 75 6c 74 69 6c 69 6e 65 20 22 70 61 63 6b 61	.....(lm-header-multiline."packa
f760	67 65 2d 72 65 71 75 69 72 65 73 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ge-requires"))).................
f780	20 20 28 70 61 63 6b 61 67 65 2d 2d 70 72 65 70 61 72 65 2d 64 65 70 65 6e 64 65 6e 63 69 65 73	..(package--prepare-dependencies
f7a0	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 72 65 61	....................(package-rea
f7c0	64 2d 66 72 6f 6d 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	d-from-string...................
f7e0	20 20 28 73 74 72 69 6e 67 2d 6a 6f 69 6e 20 72 65 71 75 69 72 65 2d 6c 69 6e 65 73 20 22 20 22	..(string-join.require-lines."."
f800	29 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 72 63 70 20 77 65 62 70 61 67	))))))).........(oset.rcp.webpag
f820	65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 69 66 20 28 66 62 6f 75 6e 64 70	e...............(or.(if.(fboundp
f840	20 27 6c 6d 2d 77 65 62 73 69 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.'lm-website)...................
f860	20 20 20 20 28 6c 6d 2d 77 65 62 73 69 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	....(lm-website)................
f880	20 20 20 20 20 28 77 69 74 68 2d 6e 6f 2d 77 61 72 6e 69 6e 67 73 0a 20 20 20 20 20 20 20 20 20	.....(with-no-warnings..........
f8a0	20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 6d 2d 68 6f 6d 65 70 61 67 65 29 29 29 0a 20 20 20	.............(lm-homepage)))....
f8c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 66 6f 72 6d 61	...............(and-let*.((forma
f8e0	74 20 28 6f 72 65 66 20 72 63 70 20 72 65 70 6f 70 61 67 65 2d 66 6f 72 6d 61 74 29 29 29 0a 20	t.(oref.rcp.repopage-format)))..
f900	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 66 6f 72 6d 61	...................(format.forma
f920	74 20 28 6f 72 65 66 20 72 63 70 20 72 65 70 6f 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 6f	t.(oref.rcp.repo))))).........(o
f940	73 65 74 20 72 63 70 20 6b 65 79 77 6f 72 64 73 20 28 6c 6d 2d 6b 65 79 77 6f 72 64 73 2d 6c 69	set.rcp.keywords.(lm-keywords-li
f960	73 74 29 29 0a 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 72 63 70 20 6d 61 69 6e 74 61 69 6e 65	st)).........(oset.rcp.maintaine
f980	72 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 6c	rs...............(if.(fboundp.'l
f9a0	6d 2d 6d 61 69 6e 74 61 69 6e 65 72 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	m-maintainers)..................
f9c0	20 28 6c 6d 2d 6d 61 69 6e 74 61 69 6e 65 72 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.(lm-maintainers)...............
f9e0	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 20 20 20 20 20 20 20	..(with-no-warnings.............
fa00	20 20 20 20 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 6d 61 69 6e 74 61 69 6e 65 72 20 28 6c 6d	......(and-let*.((maintainer.(lm
fa20	2d 6d 61 69 6e 74 61 69 6e 65 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	-maintainer)))..................
fa40	20 20 20 28 6c 69 73 74 20 6d 61 69 6e 74 61 69 6e 65 72 29 29 29 29 29 0a 20 20 20 20 20 20 20	...(list.maintainer)))))........
fa60	20 28 6f 73 65 74 20 72 63 70 20 61 75 74 68 6f 72 73 20 28 6c 6d 2d 61 75 74 68 6f 72 73 29 29	.(oset.rcp.authors.(lm-authors))
fa80	29 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 65 78 74 72	))))..(defun.package-build--extr
faa0	61 63 74 2d 66 72 6f 6d 2d 70 61 63 6b 61 67 65 20 28 72 63 70 20 66 69 6c 65 73 29 0a 20 20 22	act-from-package.(rcp.files)..."
fac0	53 74 6f 72 65 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 66 72 6f 6d 20 74 68 65 20 5c 22 2a 2d 70	Store.information.from.the.\"*-p
fae0	6b 67 2e 65 6c 5c 22 20 66 69 6c 65 20 66 72 6f 6d 20 46 49 4c 45 53 20 69 6e 20 52 43 50 2e 22	kg.el\".file.from.FILES.in.RCP."
fb00	0a 20 20 28 64 65 63 6c 61 72 65 20 28 6f 62 73 6f 6c 65 74 65 20 22 65 78 63 6c 75 73 69 76 65	...(declare.(obsolete."exclusive
fb20	6c 79 20 65 78 74 72 61 63 74 20 6d 65 74 61 64 61 74 61 20 66 72 6f 6d 20 6d 61 69 6e 20 6c 69	ly.extract.metadata.from.main.li
fb40	62 72 61 72 79 20 69 6e 73 74 65 61 64 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	brary.instead.".................
fb60	20 20 20 20 20 22 50 61 63 6b 61 67 65 2d 42 75 69 6c 64 20 35 2e 30 2e 30 22 29 29 0a 20 20 28	....."Package-Build.5.0.0"))...(
fb80	6c 65 74 2a 20 28 28 6e 61 6d 65 20 28 6f 72 65 66 20 72 63 70 20 6e 61 6d 65 29 29 0a 20 20 20	let*.((name.(oref.rcp.name))....
fba0	20 20 20 20 20 20 28 66 69 6c 65 20 28 63 6f 6e 63 61 74 20 6e 61 6d 65 20 22 2d 70 6b 67 2e 65	......(file.(concat.name."-pkg.e
fbc0	6c 22 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 20 28 6f 72 20 28 63 61 72 20 28 72 61	l"))..........(file.(or.(car.(ra
fbe0	73 73 6f 63 20 66 69 6c 65 20 66 69 6c 65 73 29 29 20 66 69 6c 65 29 29 29 0a 20 20 20 20 28 77	ssoc.file.files)).file))).....(w
fc00	68 65 6e 20 28 6f 72 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 66 69 6c 65 29 0a 20 20 20	hen.(or.(file-exists-p.file)....
fc20	20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 28 73 65 74 71 20	...........(file-exists-p.(setq.
fc40	66 69 6c 65 20 28 63 6f 6e 63 61 74 20 66 69 6c 65 20 22 2e 69 6e 22 29 29 29 29 0a 20 20 20 20	file.(concat.file.".in")))).....
fc60	20 20 28 6c 65 74 20 28 28 66 6f 72 6d 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a	..(let.((form.(with-temp-buffer.
fc80	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 2d 66 69 6c 65	....................(insert-file
fca0	2d 63 6f 6e 74 65 6e 74 73 20 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	-contents.file).................
fcc0	20 20 20 20 28 72 65 61 64 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 29 29 0a 20	....(read.(current-buffer)))))..
fce0	20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 65 71 20 28 63 61 72 2d 73 61 66 65 20 66 6f 72	.......(unless.(eq.(car-safe.for
fd00	6d 29 20 27 64 65 66 69 6e 65 2d 70 61 63 6b 61 67 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 70	m).'define-package)...........(p
fd20	61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 65 72 72 6f 72 20 6e 61 6d 65 20 22 4e 6f 20 64 65 66	ackage-build--error.name."No.def
fd40	69 6e 65 2d 70 61 63 6b 61 67 65 20 66 6f 75 6e 64 20 69 6e 20 25 73 22 20 66 69 6c 65 29 29 0a	ine-package.found.in.%s".file)).
fd60	20 20 20 20 20 20 20 20 28 70 63 61 73 65 2d 6c 65 74 2a 20 28 28 60 28 2c 5f 20 2c 5f 20 2c 5f	........(pcase-let*.((`(,_.,_.,_
fd80	20 2c 73 75 6d 6d 61 72 79 20 2c 64 65 70 73 20 2e 20 2c 70 6c 69 73 74 29 20 66 6f 72 6d 29 29	.,summary.,deps...,plist).form))
fda0	0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 73 75 6d 6d 61 72 79 0a 20 20 20 20 20 20 20	...........(when.summary........
fdc0	20 20 20 20 20 28 6f 73 65 74 20 72 63 70 20 73 75 6d 6d 61 72 79 20 28 70 61 63 6b 61 67 65 2d	.....(oset.rcp.summary.(package-
fde0	62 75 69 6c 64 2d 2d 6e 6f 72 6d 61 6c 69 7a 65 2d 73 75 6d 6d 61 72 79 20 73 75 6d 6d 61 72 79	build--normalize-summary.summary
fe00	29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 72 63 70 20 64 65 70 65 6e 64 65 6e	)))...........(oset.rcp.dependen
fe20	63 69 65 73 0a 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 70 63	cies.................(mapcar.(pc
fe40	61 73 65 2d 6c 61 6d 62 64 61 20 28 60 28 2c 70 6b 67 20 2c 76 65 72 29 29 0a 20 20 20 20 20 20	ase-lambda.(`(,pkg.,ver)).......
fe60	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 73 79 6d	....................(unless.(sym
fe80	62 6f 6c 70 20 70 6b 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	bolp.pkg).......................
fea0	20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 65 72 72 6f 72 20 6e 61 6d 65	......(package-build--error.name
fec0	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 22	..............................."
fee0	49 6e 76 61 6c 69 64 20 70 61 63 6b 61 67 65 20 6e 61 6d 65 20 69 6e 20 64 65 70 65 6e 64 65 6e	Invalid.package.name.in.dependen
ff00	63 79 3a 20 25 53 22 20 70 6b 67 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	cy:.%S".pkg))...................
ff20	20 20 20 20 20 20 20 20 28 6c 69 73 74 20 70 6b 67 20 76 65 72 29 29 0a 20 20 20 20 20 20 20 20	........(list.pkg.ver)).........
ff40	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 76 61 6c 20 64 65 70 73 29 29 29 0a 20 20	................(eval.deps)))...
ff60	20 20 20 20 20 20 20 20 28 77 68 65 6e 2d 6c 65 74 20 28 28 76 20 28 6f 72 20 28 61 6c 69 73 74	........(when-let.((v.(or.(alist
ff80	2d 67 65 74 20 3a 75 72 6c 20 70 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	-get.:url.plist)................
ffa0	20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6c 69 73 74 2d 67 65 74 20 3a 68 6f 6d 65 70 61 67	.............(alist-get.:homepag
ffc0	65 20 70 6c 69 73 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 72 63	e.plist)))).............(oset.rc
ffe0	70 20 77 65 62 70 61 67 65 20 76 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 2d 6c 65	p.webpage.v))...........(when-le
10000	74 20 28 28 76 20 28 61 6c 69 73 74 2d 67 65 74 20 3a 6b 65 79 77 6f 72 64 73 20 70 6c 69 73 74	t.((v.(alist-get.:keywords.plist
10020	29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 72 63 70 20 6b 65 79 77 6f 72	))).............(oset.rcp.keywor
10040	64 73 20 76 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 2d 6c 65 74 20 28 28 76 20 28	ds.v))...........(when-let.((v.(
10060	61 6c 69 73 74 2d 67 65 74 20 3a 6d 61 69 6e 74 61 69 6e 65 72 73 20 70 6c 69 73 74 29 29 29 0a	alist-get.:maintainers.plist))).
10080	20 20 20 20 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 72 63 70 20 6d 61 69 6e 74 61 69 6e 65 72	............(oset.rcp.maintainer
100a0	73 20 76 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 2d 6c 65 74 20 28 28 76 20 28 61	s.v))...........(when-let.((v.(a
100c0	6c 69 73 74 2d 67 65 74 20 3a 61 75 74 68 6f 72 73 20 70 6c 69 73 74 29 29 29 0a 20 20 20 20 20	list-get.:authors.plist)))......
100e0	20 20 20 20 20 20 20 28 6f 73 65 74 20 72 63 70 20 61 75 74 68 6f 72 73 20 76 29 29 29 29 29 29	.......(oset.rcp.authors.v))))))
10100	29 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 6e 6f 72 6d 61 6c 69	)..(defun.package-build--normali
10120	7a 65 2d 73 75 6d 6d 61 72 79 20 28 73 75 6d 6d 61 72 79 29 0a 20 20 28 69 66 20 28 6f 72 20 28	ze-summary.(summary)...(if.(or.(
10140	6e 6f 74 20 73 75 6d 6d 61 72 79 29 20 28 73 74 72 69 6e 67 2d 65 6d 70 74 79 2d 70 20 73 75 6d	not.summary).(string-empty-p.sum
10160	6d 61 72 79 29 29 0a 20 20 20 20 20 20 22 5b 4e 6f 20 64 65 73 63 72 69 70 74 69 6f 6e 20 61 76	mary))......."[No.description.av
10180	61 69 6c 61 62 6c 65 5d 22 0a 20 20 20 20 28 73 65 74 71 20 73 75 6d 6d 61 72 79 20 28 63 61 72	ailable]".....(setq.summary.(car
101a0	20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 73 75 6d 6d 61 72 79 20 22 5b 5c 6e 5c 72 5d 2b 22	.(split-string.summary."[\n\r]+"
101c0	20 74 20 22 5b 5c 73 5c 74 5d 2b 22 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 73 74 72 69 6e	.t."[\s\t]+"))).....(when.(strin
101e0	67 2d 73 75 66 66 69 78 2d 70 20 22 2e 22 20 73 75 6d 6d 61 72 79 29 0a 20 20 20 20 20 20 28 73	g-suffix-p.".".summary).......(s
10200	65 74 71 20 73 75 6d 6d 61 72 79 20 28 73 75 62 73 74 72 69 6e 67 20 73 75 6d 6d 61 72 79 20 30	etq.summary.(substring.summary.0
10220	20 2d 31 29 29 29 0a 20 20 20 20 28 63 6f 6e 63 61 74 20 28 63 61 70 69 74 61 6c 69 7a 65 20 28	.-1))).....(concat.(capitalize.(
10240	73 75 62 73 74 72 69 6e 67 20 73 75 6d 6d 61 72 79 20 30 20 31 29 29 0a 20 20 20 20 20 20 20 20	substring.summary.0.1)).........
10260	20 20 20 20 28 73 75 62 73 74 72 69 6e 67 20 73 75 6d 6d 61 72 79 20 31 29 29 29 29 0a 0a 3b 3b	....(substring.summary.1))))..;;
10280	3b 20 46 69 6c 65 73 20 53 70 65 63 0a 0a 28 64 65 66 63 6f 6e 73 74 20 70 61 63 6b 61 67 65 2d	;.Files.Spec..(defconst.package-
102a0	62 75 69 6c 64 2d 64 65 66 61 75 6c 74 2d 66 69 6c 65 73 2d 73 70 65 63 0a 20 20 27 28 22 2a 2e	build-default-files-spec...'("*.
102c0	65 6c 22 20 22 6c 69 73 70 2f 2a 2e 65 6c 22 0a 20 20 20 20 22 64 69 72 22 20 22 2a 2e 69 6e 66	el"."lisp/.el"....."dir".".inf
102e0	6f 22 20 22 2a 2e 74 65 78 69 22 20 22 2a 2e 74 65 78 69 6e 66 6f 22 0a 20 20 20 20 22 64 6f 63	o".".texi".".texinfo"....."doc
10300	2f 64 69 72 22 20 22 64 6f 63 2f 2a 2e 69 6e 66 6f 22 20 22 64 6f 63 2f 2a 2e 74 65 78 69 22 20	/dir"."doc/.info"."doc/.texi".
10320	22 64 6f 63 2f 2a 2e 74 65 78 69 6e 66 6f 22 0a 20 20 20 20 22 64 6f 63 73 2f 64 69 72 22 20 22	"doc/*.texinfo"....."docs/dir"."
10340	64 6f 63 73 2f 2a 2e 69 6e 66 6f 22 20 22 64 6f 63 73 2f 2a 2e 74 65 78 69 22 20 22 64 6f 63 73	docs/.info"."docs/.texi"."docs
10360	2f 2a 2e 74 65 78 69 6e 66 6f 22 0a 20 20 20 20 28 3a 65 78 63 6c 75 64 65 0a 20 20 20 20 20 22	/*.texinfo".....(:exclude......"
10380	2e 64 69 72 2d 6c 6f 63 61 6c 73 2e 65 6c 22 20 22 6c 69 73 70 2f 2e 64 69 72 2d 6c 6f 63 61 6c	.dir-locals.el"."lisp/.dir-local
103a0	73 2e 65 6c 22 0a 20 20 20 20 20 22 74 65 73 74 2e 65 6c 22 20 22 74 65 73 74 73 2e 65 6c 22 20	s.el"......"test.el"."tests.el".
103c0	22 2a 2d 74 65 73 74 2e 65 6c 22 20 22 2a 2d 74 65 73 74 73 2e 65 6c 22 0a 20 20 20 20 20 22 6c	"-test.el"."-tests.el"......"l
103e0	69 73 70 2f 74 65 73 74 2e 65 6c 22 20 22 6c 69 73 70 2f 74 65 73 74 73 2e 65 6c 22 20 22 6c 69	isp/test.el"."lisp/tests.el"."li
10400	73 70 2f 2a 2d 74 65 73 74 2e 65 6c 22 20 22 6c 69 73 70 2f 2a 2d 74 65 73 74 73 2e 65 6c 22 29	sp/-test.el"."lisp/-tests.el")
10420	29 0a 20 20 22 44 65 66 61 75 6c 74 20 76 61 6c 75 65 20 66 6f 72 20 60 3a 66 69 6c 65 73 27 20	)..."Default.value.for.`:files'.
10440	61 74 74 72 69 62 75 74 65 20 69 6e 20 72 65 63 69 70 65 73 2e 22 29 0a 0a 28 64 65 66 75 6e 20	attribute.in.recipes.")..(defun.
10460	70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 65 78 70 61 6e 64 2d 66 69 6c 65 73 2d 73 70 65 63 20	package-build-expand-files-spec.
10480	28 72 63 70 20 26 6f 70 74 69 6f 6e 61 6c 20 61 73 73 65 72 74 20 72 65 70 6f 20 73 70 65 63 29	(rcp.&optional.assert.repo.spec)
104a0	0a 20 20 22 52 65 74 75 72 6e 20 61 6e 20 61 6c 69 73 74 20 6f 66 20 66 69 6c 65 73 20 6f 66 20	..."Return.an.alist.of.files.of.
104c0	70 61 63 6b 61 67 65 20 52 43 50 20 74 6f 20 62 65 20 69 6e 63 6c 75 64 65 64 20 69 6e 20 74 61	package.RCP.to.be.included.in.ta
104e0	72 62 61 6c 6c 2e 0a 0a 45 61 63 68 20 65 6c 65 6d 65 6e 74 20 68 61 73 20 74 68 65 20 66 6f 72	rball...Each.element.has.the.for
10500	6d 20 28 53 4f 55 52 43 45 20 2e 20 44 45 53 54 49 4e 41 54 49 4f 4e 29 2c 20 77 68 65 72 65 20	m.(SOURCE...DESTINATION),.where.
10520	53 4f 55 52 43 45 0a 69 73 20 61 20 66 69 6c 65 20 69 6e 20 74 68 65 20 70 61 63 6b 61 67 65 27	SOURCE.is.a.file.in.the.package'
10540	73 20 72 65 70 6f 73 69 74 6f 72 79 20 61 6e 64 20 44 45 53 54 49 4e 41 54 49 4f 4e 20 69 73 20	s.repository.and.DESTINATION.is.
10560	77 68 65 72 65 0a 74 68 61 74 20 66 69 6c 65 20 69 73 20 70 6c 61 63 65 64 20 69 6e 20 74 68 65	where.that.file.is.placed.in.the
10580	20 70 61 63 6b 61 67 65 27 73 20 74 61 72 62 61 6c 6c 2e 0a 0a 52 43 50 20 69 73 20 74 68 65 20	.package's.tarball...RCP.is.the.
105a0	70 61 63 6b 61 67 65 20 72 65 63 69 70 65 20 61 73 20 61 6e 20 6f 62 6a 65 63 74 2e 20 20 49 66	package.recipe.as.an.object...If
105c0	20 74 68 65 20 60 66 69 6c 65 73 27 20 73 6c 6f 74 20 6f 66 0a 52 43 50 20 69 73 20 6e 6f 6e 2d	.the.`files'.slot.of.RCP.is.non-
105e0	6e 69 6c 2c 20 74 68 65 6e 20 74 68 61 74 20 69 73 20 75 73 65 64 20 61 73 20 74 68 65 20 66 69	nil,.then.that.is.used.as.the.fi
10600	6c 65 20 73 70 65 63 69 66 69 63 61 74 69 6f 6e 2e 0a 4f 74 68 65 72 77 69 73 65 20 60 70 61 63	le.specification..Otherwise.`pac
10620	6b 61 67 65 2d 62 75 69 6c 64 2d 64 65 66 61 75 6c 74 2d 66 69 6c 65 73 2d 73 70 65 63 27 20 69	kage-build-default-files-spec'.i
10640	73 20 75 73 65 64 2e 0a 0a 49 66 20 6f 70 74 69 6f 6e 61 6c 20 41 53 53 45 52 54 20 69 73 20 6e	s.used...If.optional.ASSERT.is.n
10660	6f 6e 2d 6e 69 6c 2c 20 74 68 65 6e 20 72 61 69 73 65 20 61 6e 20 65 72 72 6f 72 20 69 66 20 6e	on-nil,.then.raise.an.error.if.n
10680	69 6c 20 77 6f 75 6c 64 0a 62 65 20 72 65 74 75 72 6e 65 64 2e 20 20 49 66 20 41 53 53 45 52 54	il.would.be.returned...If.ASSERT
106a0	20 61 6e 64 20 60 66 69 6c 65 73 27 20 61 72 65 20 62 6f 74 68 20 6e 6f 6e 2d 6e 69 6c 20 61 6e	.and.`files'.are.both.non-nil.an
106c0	64 20 75 73 69 6e 67 0a 60 66 69 6c 65 73 27 20 72 65 73 75 6c 74 73 20 69 6e 20 74 68 65 20 73	d.using.`files'.results.in.the.s
106e0	61 6d 65 20 73 65 74 20 6f 66 20 66 69 6c 65 73 20 61 73 20 74 68 65 20 64 65 66 61 75 6c 74 20	ame.set.of.files.as.the.default.
10700	73 70 65 63 2c 0a 74 68 65 6e 20 73 68 6f 77 20 61 20 77 61 72 6e 69 6e 67 2e 0a 0a 41 20 66 69	spec,.then.show.a.warning...A.fi
10720	6c 65 73 20 73 70 65 63 69 66 69 63 61 74 69 6f 6e 20 69 73 20 61 20 6c 69 73 74 2e 20 20 49 74	les.specification.is.a.list...It
10740	73 20 65 6c 65 6d 65 6e 74 73 20 61 72 65 20 70 72 6f 63 65 73 73 65 64 20 69 6e 0a 6f 72 64 65	s.elements.are.processed.in.orde
10760	72 20 61 6e 64 20 63 61 6e 20 68 61 76 65 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 66 6f 72	r.and.can.have.the.following.for
10780	6d 3a 0a 0a 2d 20 3a 64 65 66 61 75 6c 74 73 0a 0a 20 20 49 66 20 74 68 65 20 66 69 72 73 74 20	m:..-.:defaults....If.the.first.
107a0	65 6c 65 6d 65 6e 74 20 69 73 20 60 3a 64 65 66 61 75 6c 74 73 27 2c 20 74 68 65 6e 20 74 68 61	element.is.`:defaults',.then.tha
107c0	74 20 6d 65 61 6e 73 20 74 6f 20 70 72 65 70 65 6e 64 0a 20 20 74 68 65 20 64 65 66 61 75 6c 74	t.means.to.prepend...the.default
107e0	20 66 69 6c 65 73 20 73 70 65 63 20 28 60 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 64 65 66 61	.files.spec.(`package-build-defa
10800	75 6c 74 2d 66 69 6c 65 73 2d 73 70 65 63 27 29 20 74 6f 0a 20 20 74 68 65 20 53 50 45 43 20 73	ult-files-spec').to...the.SPEC.s
10820	70 65 63 69 66 69 65 64 20 62 79 20 74 68 65 20 72 65 6d 61 69 6e 69 6e 67 20 65 6c 65 6d 65 6e	pecified.by.the.remaining.elemen
10840	74 73 2e 0a 0a 2d 20 47 4c 4f 42 0a 0a 20 20 41 20 73 74 72 69 6e 67 20 69 73 20 67 6c 6f 62 2d	ts...-.GLOB....A.string.is.glob-
10860	65 78 70 61 6e 64 65 64 20 74 6f 20 6d 61 74 63 68 20 7a 65 72 6f 20 6f 72 20 6d 6f 72 65 20 66	expanded.to.match.zero.or.more.f
10880	69 6c 65 73 2e 20 20 4d 61 74 63 68 65 64 0a 20 20 66 69 6c 65 73 20 61 72 65 20 63 6f 70 69 65	iles...Matched...files.are.copie
108a0	64 20 74 6f 20 74 68 65 20 74 6f 70 2d 6c 65 76 65 6c 20 64 69 72 65 63 74 6f 72 79 2e 0a 0a 2d	d.to.the.top-level.directory...-
108c0	20 28 53 55 42 44 49 52 45 43 54 4f 52 59 20 47 4c 4f 42 2e 2e 2e 29 0a 0a 20 20 41 20 6c 69 73	.(SUBDIRECTORY.GLOB...)....A.lis
108e0	74 20 74 68 61 74 20 62 65 67 69 6e 73 20 77 69 74 68 20 61 20 73 74 72 69 6e 67 20 63 61 75 73	t.that.begins.with.a.string.caus
10900	65 73 20 74 68 65 20 66 69 6c 65 73 20 6d 61 74 63 68 65 64 20 62 79 0a 20 20 74 68 65 20 73 65	es.the.files.matched.by...the.se
10920	63 6f 6e 64 20 61 6e 64 20 73 75 62 73 65 71 75 65 6e 74 20 65 6c 65 6d 65 6e 74 73 20 74 6f 20	cond.and.subsequent.elements.to.
10940	62 65 20 63 6f 70 69 65 64 20 69 6e 74 6f 20 74 68 65 20 73 75 62 2d 0a 20 20 64 69 72 65 63 74	be.copied.into.the.sub-...direct
10960	6f 72 79 20 73 70 65 63 69 66 69 65 64 20 62 79 20 74 68 65 20 66 69 72 73 74 20 65 6c 65 6d 65	ory.specified.by.the.first.eleme
10980	6e 74 2e 0a 0a 2d 20 28 3a 65 78 63 6c 75 64 65 20 47 4c 4f 42 2e 2e 2e 29 0a 0a 20 20 41 20 6c	nt...-.(:exclude.GLOB...)....A.l
109a0	69 73 74 20 74 68 61 74 20 62 65 67 69 6e 73 20 77 69 74 68 20 60 3a 65 78 63 6c 75 64 65 27 20	ist.that.begins.with.`:exclude'.
109c0	63 61 75 73 65 73 20 66 69 6c 65 73 20 74 68 61 74 20 61 72 65 20 61 6c 73 6f 0a 20 20 6d 61 74	causes.files.that.are.also...mat
109e0	63 68 65 64 20 62 79 20 74 68 65 20 73 65 63 6f 6e 64 20 61 6e 64 20 73 75 62 73 65 71 75 65 6e	ched.by.the.second.and.subsequen
10a00	74 20 65 6c 65 6d 65 6e 74 73 20 6f 66 20 74 68 69 73 20 6c 69 73 74 20 74 6f 0a 20 20 62 65 20	t.elements.of.this.list.to...be.
10a20	72 65 6d 6f 76 65 64 20 66 72 6f 6d 20 74 68 65 20 72 65 74 75 72 6e 65 64 20 61 6c 69 73 74 2e	removed.from.the.returned.alist.
10a40	0a 0a 20 20 4e 6f 74 65 20 74 68 61 74 20 60 3a 64 65 66 61 75 6c 74 73 27 20 69 6e 63 6c 75 64	....Note.that.`:defaults'.includ
10a60	65 73 20 61 20 60 3a 65 78 63 6c 75 64 65 27 20 61 6e 64 20 74 68 61 74 20 69 74 20 69 73 20 6e	es.a.`:exclude'.and.that.it.is.n
10a80	6f 74 0a 20 20 70 6f 73 73 69 62 6c 65 20 74 6f 20 6f 76 65 72 72 69 64 65 20 69 74 73 20 65 6e	ot...possible.to.override.its.en
10aa0	74 72 69 65 73 20 74 6f 20 69 6e 63 6c 75 64 65 20 66 69 6c 65 73 20 74 68 61 74 20 61 72 65 0a	tries.to.include.files.that.are.
10ac0	20 20 65 78 63 6c 75 64 65 64 20 62 79 20 64 65 66 61 75 6c 74 2e 20 20 49 66 20 61 20 66 69 6c	..excluded.by.default...If.a.fil
10ae0	65 20 6e 65 65 64 73 20 74 6f 20 62 65 20 69 6e 63 6c 75 64 65 64 20 74 68 61 74 20 77 6f 75 6c	e.needs.to.be.included.that.woul
10b00	64 0a 20 20 62 65 20 65 78 63 6c 75 64 65 64 20 62 79 20 64 65 66 61 75 6c 74 2c 20 74 68 65 6e	d...be.excluded.by.default,.then
10b20	20 60 3a 64 65 66 61 75 6c 74 73 27 20 63 61 6e 6e 6f 74 20 62 65 20 75 73 65 64 2e 0a 0a 2d 20	.`:defaults'.cannot.be.used...-.
10b40	28 3a 69 6e 70 75 74 73 20 47 4c 4f 42 2e 2e 2e 29 0a 0a 20 20 41 20 6c 69 73 74 20 74 68 61 74	(:inputs.GLOB...)....A.list.that
10b60	20 62 65 67 69 6e 73 20 77 69 74 68 20 60 3a 69 6e 70 75 74 73 27 20 73 70 65 63 69 66 69 65 73	.begins.with.`:inputs'.specifies
10b80	20 66 69 6c 65 73 2c 20 77 68 69 63 68 20 61 72 65 20 6e 6f 74 0a 20 20 74 6f 20 62 65 20 69 6e	.files,.which.are.not...to.be.in
10ba0	63 6c 75 64 65 64 20 69 6e 20 74 68 65 20 70 61 63 6b 61 67 65 2c 20 62 75 74 20 77 68 65 6e 20	cluded.in.the.package,.but.when.
10bc0	6d 6f 64 69 66 69 65 64 20 73 74 69 6c 6c 20 74 72 69 67 67 65 72 20 61 0a 20 20 6e 65 77 20 70	modified.still.trigger.a...new.p
10be0	61 63 6b 61 67 65 20 76 65 72 73 69 6f 6e 2e 20 20 49 2e 65 2e 2c 20 74 68 69 73 20 66 75 6e 63	ackage.version...I.e.,.this.func
10c00	74 69 6f 6e 20 69 67 6e 6f 72 65 73 20 74 68 69 73 20 65 6c 65 6d 65 6e 74 2c 0a 20 20 62 75 74	tion.ignores.this.element,...but
10c20	20 60 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 73 70 65 63 2d 67 6c 6f 62 73 27 20 64 6f 65	.`package-build--spec-globs'.doe
10c40	73 20 6e 6f 74 2e 0a 0a 2d 20 28 3a 72 65 6e 61 6d 65 20 53 52 43 20 44 45 53 54 29 0a 0a 20 20	s.not...-.(:rename.SRC.DEST)....
10c60	41 20 6c 69 73 74 20 74 68 61 74 20 62 65 67 69 6e 73 20 77 69 74 68 20 60 3a 72 65 6e 61 6d 65	A.list.that.begins.with.`:rename
10c80	27 20 63 61 75 73 65 73 20 74 68 65 20 66 69 6c 65 20 53 52 43 20 74 6f 20 62 65 0a 20 20 72 65	'.causes.the.file.SRC.to.be...re
10ca0	6e 61 6d 65 64 20 61 6e 64 2f 6f 72 20 6d 6f 76 65 64 20 74 6f 20 44 45 53 54 2e 20 20 53 52 43	named.and/or.moved.to.DEST...SRC
10cc0	20 61 6e 64 20 44 45 53 54 20 61 72 65 20 72 65 6c 61 74 69 76 65 20 66 69 6c 65 0a 20 20 6e 61	.and.DEST.are.relative.file...na
10ce0	6d 65 73 20 28 61 73 20 6f 70 70 6f 73 65 64 20 74 6f 20 67 6c 6f 62 73 29 20 61 6e 64 20 62 6f	mes.(as.opposed.to.globs).and.bo
10d00	74 68 20 6d 61 79 20 63 6f 6e 74 61 69 6e 20 64 69 72 65 63 74 6f 72 79 0a 20 20 70 61 72 74 73	th.may.contain.directory...parts
10d20	2e 20 20 53 52 43 20 6d 75 73 74 20 65 78 69 73 74 2e 20 20 41 76 6f 69 64 20 75 73 69 6e 67 20	...SRC.must.exist...Avoid.using.
10d40	74 68 69 73 2c 20 69 66 20 61 74 20 61 6c 6c 20 70 6f 73 73 69 62 6c 65 2e 22 0a 20 20 28 6c 65	this,.if.at.all.possible."...(le
10d60	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 72 65 70 6f 20 28	t.((default-directory.(or.repo.(
10d80	70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 2d 77 6f 72 6b 69 6e 67 2d 74 72 65 65 20 72 63 70	package-recipe--working-tree.rcp
10da0	29 29 29 0a 20 20 20 20 20 20 20 20 28 73 70 65 63 20 28 6f 72 20 73 70 65 63 20 28 6f 72 65 66	))).........(spec.(or.spec.(oref
10dc0	20 72 63 70 20 66 69 6c 65 73 29 29 29 0a 20 20 20 20 20 20 20 20 28 6e 61 6d 65 20 28 6f 72 65	.rcp.files))).........(name.(ore
10de0	66 20 72 63 70 20 6e 61 6d 65 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 65 71 20 28 63 61 72	f.rcp.name))).....(when.(eq.(car
10e00	20 73 70 65 63 29 20 3a 64 65 66 61 75 6c 74 73 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 73 70	.spec).:defaults).......(setq.sp
10e20	65 63 20 28 61 70 70 65 6e 64 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 64 65 66 61 75 6c 74	ec.(append.package-build-default
10e40	2d 66 69 6c 65 73 2d 73 70 65 63 20 28 63 64 72 20 73 70 65 63 29 29 29 29 0a 20 20 20 20 28 6c	-files-spec.(cdr.spec)))).....(l
10e60	65 74 20 28 28 66 69 6c 65 73 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 65 78 70 61 6e	et.((files.(package-build--expan
10e80	64 2d 66 69 6c 65 73 2d 73 70 65 63 2d 31 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	d-files-spec-1..................
10ea0	20 28 6f 72 20 73 70 65 63 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 64 65 66 61 75 6c 74 2d	.(or.spec.package-build-default-
10ec0	66 69 6c 65 73 2d 73 70 65 63 29 29 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 61 73 73 65 72	files-spec)))).......(when.asser
10ee0	74 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 72 63 70 20 73 70 65 63 0a 20 20	t.........(when.(and.rcp.spec...
10f00	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 75 61 6c 20 66 69 6c 65 73 20 28 70	.................(equal.files.(p
10f20	61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 65 78 70 61 6e 64 2d 66 69 6c 65 73 2d 73 70 65 63 2d	ackage-build--expand-files-spec-
10f40	31 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	1...............................
10f60	20 20 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 64 65 66 61 75 6c 74 2d 66 69 6c 65 73 2d 73	...package-build-default-files-s
10f80	70 65 63 29 29 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	pec)))...........(message."Warni
10fa0	6e 67 3a 20 25 73 20 3a 66 69 6c 65 73 20 73 70 65 63 20 69 73 20 65 71 75 69 76 61 6c 65 6e 74	ng:.%s.:files.spec.is.equivalent
10fc0	20 74 6f 20 74 68 65 20 64 65 66 61 75 6c 74 22 20 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20	.to.the.default".name)).........
10fe0	28 75 6e 6c 65 73 73 20 66 69 6c 65 73 0a 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65	(unless.files...........(package
11000	2d 62 75 69 6c 64 2d 2d 65 72 72 6f 72 20 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 22	-build--error.name............."
11020	4e 6f 20 6d 61 74 63 68 69 6e 67 20 66 69 6c 65 28 73 29 20 66 6f 75 6e 64 20 69 6e 20 25 73 20	No.matching.file(s).found.in.%s.
11040	75 73 69 6e 67 20 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 64 65 66 61 75 6c 74 2d 64 69	using.%s".............default-di
11060	72 65 63 74 6f 72 79 20 28 6f 72 20 73 70 65 63 20 22 64 65 66 61 75 6c 74 20 73 70 65 63 22 29	rectory.(or.spec."default.spec")
11080	29 29 29 0a 20 20 20 20 20 20 66 69 6c 65 73 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61	))).......files)))..(defun.packa
110a0	67 65 2d 62 75 69 6c 64 2d 2d 65 78 70 61 6e 64 2d 66 69 6c 65 73 2d 73 70 65 63 2d 31 20 28 73	ge-build--expand-files-spec-1.(s
110c0	70 65 63 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 6c 69 73 74 20 6f 66 20 61 6c 6c 20 66 69 6c	pec)..."Return.a.list.of.all.fil
110e0	65 73 20 6d 61 74 63 68 69 6e 67 20 53 50 45 43 20 69 6e 20 60 64 65 66 61 75 6c 74 2d 64 69 72	es.matching.SPEC.in.`default-dir
11100	65 63 74 6f 72 79 27 2e 0a 53 50 45 43 20 69 73 20 61 20 66 75 6c 6c 20 66 69 6c 65 73 20 73 70	ectory'..SPEC.is.a.full.files.sp
11120	65 63 20 61 73 20 73 74 6f 72 65 64 20 69 6e 20 61 20 72 65 63 69 70 65 20 6f 62 6a 65 63 74 2e	ec.as.stored.in.a.recipe.object.
11140	22 0a 20 20 28 6c 65 74 20 28 69 6e 63 6c 75 64 65 20 65 78 63 6c 75 64 65 29 0a 20 20 20 20 28	"...(let.(include.exclude).....(
11160	64 6f 6c 69 73 74 20 28 65 6e 74 72 79 20 73 70 65 63 29 0a 20 20 20 20 20 20 28 70 63 61 73 65	dolist.(entry.spec).......(pcase
11180	20 28 63 61 72 2d 73 61 66 65 20 65 6e 74 72 79 29 0a 20 20 20 20 20 20 20 20 28 3a 69 6e 70 75	.(car-safe.entry).........(:inpu
111a0	74 73 29 0a 20 20 20 20 20 20 20 20 28 3a 65 78 63 6c 75 64 65 0a 20 20 20 20 20 20 20 20 20 28	ts).........(:exclude..........(
111c0	64 6f 6c 69 73 74 20 28 65 6e 74 72 79 20 28 63 64 72 20 65 6e 74 72 79 29 29 0a 20 20 20 20 20	dolist.(entry.(cdr.entry))......
111e0	20 20 20 20 20 20 28 70 75 73 68 20 65 6e 74 72 79 20 65 78 63 6c 75 64 65 29 29 29 0a 20 20 20	......(push.entry.exclude)))....
11200	20 20 20 20 20 28 3a 72 65 6e 61 6d 65 20 28 70 75 73 68 20 65 6e 74 72 79 20 69 6e 63 6c 75 64	.....(:rename.(push.entry.includ
11220	65 29 29 0a 20 20 20 20 20 20 20 20 28 5f 20 28 70 75 73 68 20 65 6e 74 72 79 20 69 6e 63 6c 75	e)).........(_.(push.entry.inclu
11240	64 65 29 29 29 29 0a 20 20 20 20 28 63 6c 2d 73 65 74 2d 64 69 66 66 65 72 65 6e 63 65 0a 20 20	de)))).....(cl-set-difference...
11260	20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 65 78 70 61 6e 64 2d 66 69 6c 65 73 2d	...(package-build--expand-files-
11280	73 70 65 63 2d 32 20 28 6e 72 65 76 65 72 73 65 20 69 6e 63 6c 75 64 65 29 29 0a 20 20 20 20 20	spec-2.(nreverse.include))......
112a0	28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 65 78 70 61 6e 64 2d 66 69 6c 65 73 2d 73 70 65	(package-build--expand-files-spe
112c0	63 2d 32 20 28 6e 72 65 76 65 72 73 65 20 65 78 63 6c 75 64 65 29 29 0a 20 20 20 20 20 3a 74 65	c-2.(nreverse.exclude))......:te
112e0	73 74 20 23 27 65 71 75 61 6c 20 3a 6b 65 79 20 23 27 63 61 72 29 29 29 0a 0a 28 64 65 66 75 6e	st.#'equal.:key.#'car)))..(defun
11300	20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 65 78 70 61 6e 64 2d 66 69 6c 65 73 2d 73 70 65	.package-build--expand-files-spe
11320	63 2d 32 20 28 73 70 65 63 20 26 6f 70 74 69 6f 6e 61 6c 20 73 75 62 64 69 72 29 0a 20 20 22 52	c-2.(spec.&optional.subdir)..."R
11340	65 74 75 72 6e 20 61 20 6c 69 73 74 20 6f 66 20 61 6c 6c 20 66 69 6c 65 73 20 6d 61 74 63 68 69	eturn.a.list.of.all.files.matchi
11360	6e 67 20 53 50 45 43 20 69 6e 20 53 55 42 44 49 52 2e 0a 49 66 20 53 55 42 44 49 52 20 69 73 20	ng.SPEC.in.SUBDIR..If.SUBDIR.is.
11380	6e 69 6c 2c 20 75 73 65 20 60 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 27 2e 20 20 53	nil,.use.`default-directory'...S
113a0	50 45 43 20 69 73 20 65 78 70 65 63 74 65 64 20 74 6f 0a 62 65 20 61 20 70 61 72 74 69 61 6c 20	PEC.is.expected.to.be.a.partial.
113c0	66 69 6c 65 73 20 73 70 65 63 2c 20 63 6f 6e 73 69 73 74 69 6e 67 20 6f 66 20 65 69 74 68 65 72	files.spec,.consisting.of.either
113e0	20 61 6c 6c 20 69 6e 63 6c 75 64 65 20 72 75 6c 65 73 0a 6f 72 20 61 6c 6c 20 65 78 63 6c 75 64	.all.include.rules.or.all.exclud
11400	65 20 72 75 6c 65 73 20 28 77 69 74 68 20 74 68 65 20 60 3a 65 78 63 6c 75 64 65 27 20 6b 65 79	e.rules.(with.the.`:exclude'.key
11420	77 6f 72 64 20 72 65 6d 6f 76 65 64 29 2e 22 0a 20 20 28 6d 61 70 63 61 6e 20 28 6c 61 6d 62 64	word.removed)."...(mapcan.(lambd
11440	61 20 28 65 6e 74 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20	a.(entry).............(cond.....
11460	20 20 20 20 20 20 20 20 20 28 28 73 74 72 69 6e 67 70 20 65 6e 74 72 79 29 0a 20 20 20 20 20 20	.........((stringp.entry).......
11480	20 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 20 28 6c 61 6d 62 64 61 20 28 66 29 0a 20 20 20 20	........(mapcar.(lambda.(f).....
114a0	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 66 20 28 63 6f 6e	....................(cons.f.(con
114c0	63 61 74 20 73 75 62 64 69 72 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 72 65 63 74 6f	cat.subdir.(file-name-nondirecto
114e0	72 79 20 66 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	ry.f)))).......................(
11500	66 69 6c 65 2d 65 78 70 61 6e 64 2d 77 69 6c 64 63 61 72 64 73 20 65 6e 74 72 79 29 29 29 0a 20	file-expand-wildcards.entry)))..
11520	20 20 20 20 20 20 20 20 20 20 20 20 28 28 65 71 20 28 63 61 72 2d 73 61 66 65 20 65 6e 74 72 79	............((eq.(car-safe.entry
11540	29 20 3a 72 65 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 28	).:rename)...............(list.(
11560	63 6f 6e 73 20 28 6e 74 68 20 31 20 65 6e 74 72 79 29 20 28 6e 74 68 20 32 20 65 6e 74 72 79 29	cons.(nth.1.entry).(nth.2.entry)
11580	29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64	)))..............((package-build
115a0	2d 2d 65 78 70 61 6e 64 2d 66 69 6c 65 73 2d 73 70 65 63 2d 32 0a 20 20 20 20 20 20 20 20 20 20	--expand-files-spec-2...........
115c0	20 20 20 20 20 28 63 64 72 20 65 6e 74 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.....(cdr.entry)................
115e0	28 63 6f 6e 63 61 74 20 73 75 62 64 69 72 20 28 63 61 72 20 65 6e 74 72 79 29 20 22 2f 22 29 29	(concat.subdir.(car.entry)."/"))
11600	29 29 29 0a 20 20 20 20 20 20 20 20 20 20 73 70 65 63 29 29 0a 0a 28 64 65 66 75 6e 20 70 61 63	)))...........spec))..(defun.pac
11620	6b 61 67 65 2d 62 75 69 6c 64 2d 2d 63 6f 70 79 2d 70 61 63 6b 61 67 65 2d 66 69 6c 65 73 20 28	kage-build--copy-package-files.(
11640	66 69 6c 65 73 20 74 61 72 67 65 74 2d 64 69 72 29 0a 20 20 22 43 6f 70 79 20 46 49 4c 45 53 20	files.target-dir)..."Copy.FILES.
11660	66 72 6f 6d 20 60 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 27 20 74 6f 20 54 41 52 47	from.`default-directory'.to.TARG
11680	45 54 2d 44 49 52 2e 0a 46 49 4c 45 53 20 69 73 20 61 20 6c 69 73 74 20 6f 66 20 28 53 4f 55 52	ET-DIR..FILES.is.a.list.of.(SOUR
116a0	43 45 20 2e 20 44 45 53 54 29 20 72 65 6c 61 74 69 76 65 20 66 69 6c 65 70 61 74 68 20 70 61 69	CE...DEST).relative.filepath.pai
116c0	72 73 2e 22 0a 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 6d 65 73 73 61 67 65 0a 20	rs."...(package-build--message..
116e0	20 20 22 43 6f 70 79 69 6e 67 20 66 69 6c 65 73 20 28 2d 3e 29 20 61 6e 64 20 64 69 72 65 63 74	.."Copying.files.(->).and.direct
11700	6f 72 69 65 73 20 28 3d 3e 29 5c 6e 20 20 66 72 6f 6d 20 25 73 5c 6e 20 20 74 6f 20 25 73 22 0a	ories.(=>)\n..from.%s\n..to.%s".
11720	20 20 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 74 61 72 67 65 74 2d 64 69 72 29	...default-directory.target-dir)
11740	0a 20 20 28 70 63 61 73 65 2d 64 6f 6c 69 73 74 20 28 60 28 2c 73 72 63 20 2e 20 2c 64 73 74 29	...(pcase-dolist.(`(,src...,dst)
11760	20 66 69 6c 65 73 29 0a 20 20 20 20 28 6c 65 74 20 28 28 73 72 63 2a 20 28 65 78 70 61 6e 64 2d	.files).....(let.((src*.(expand-
11780	66 69 6c 65 2d 6e 61 6d 65 20 73 72 63 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 64 73 74 2a 20	file-name.src))...........(dst*.
117a0	28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 64 73 74 20 74 61 72 67 65 74 2d 64 69 72	(expand-file-name.dst.target-dir
117c0	29 29 29 0a 20 20 20 20 20 20 28 6d 61 6b 65 2d 64 69 72 65 63 74 6f 72 79 20 28 66 69 6c 65 2d	))).......(make-directory.(file-
117e0	6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 64 73 74 2a 29 20 74 29 0a 20 20 20 20 20 20 28 63	name-directory.dst*).t).......(c
11800	6f 6e 64 20 28 28 66 69 6c 65 2d 72 65 67 75 6c 61 72 2d 70 20 73 72 63 2a 29 0a 20 20 20 20 20	ond.((file-regular-p.src*)......
11820	20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 6d 65 73 73 61 67 65 0a	........(package-build--message.
11840	20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 20 20 25 73 20 25 73 20 2d 3e 20 25 73 22 20 28 69	.............."..%s.%s.->.%s".(i
11860	66 20 28 65 71 75 61 6c 20 73 72 63 20 64 73 74 29 20 22 20 22 20 22 21 22 29 20 73 72 63 20 64	f.(equal.src.dst)."."."!").src.d
11880	73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 70 79 2d 66 69 6c 65 20 73 72 63 2a	st)..............(copy-file.src*
118a0	20 64 73 74 2a 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 28 66 69 6c 65 2d 64 69 72 65 63	.dst*)).............((file-direc
118c0	74 6f 72 79 2d 70 20 73 72 63 2a 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61	tory-p.src*)..............(packa
118e0	67 65 2d 62 75 69 6c 64 2d 2d 6d 65 73 73 61 67 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ge-build--message...............
11900	22 20 20 25 73 20 25 73 20 3d 3e 20 25 73 22 20 28 69 66 20 28 65 71 75 61 6c 20 73 72 63 20 64	"..%s.%s.=>.%s".(if.(equal.src.d
11920	73 74 29 20 22 20 22 20 22 21 22 29 20 73 72 63 20 64 73 74 29 0a 20 20 20 20 20 20 20 20 20 20	st)."."."!").src.dst)...........
11940	20 20 20 28 63 6f 70 79 2d 64 69 72 65 63 74 6f 72 79 20 73 72 63 2a 20 64 73 74 2a 29 29 29 29	...(copy-directory.src.dst))))
11960	29 29 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 73 70 65 63 2d 67	))..(defun.package-build--spec-g
11980	6c 6f 62 73 20 28 72 63 70 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 6c 69 73 74 20 6f 66 20 76	lobs.(rcp)..."Return.a.list.of.v
119a0	63 73 20 61 72 67 75 6d 65 6e 74 73 20 74 6f 20 6d 61 74 63 68 20 74 68 65 20 66 69 6c 65 73 20	cs.arguments.to.match.the.files.
119c0	73 70 65 63 69 66 69 65 64 20 69 6e 20 52 43 50 2e 22 0a 20 20 3b 3b 20 53 65 65 20 67 6c 6f 62	specified.in.RCP."...;;.See.glob
119e0	28 37 29 2c 20 67 69 74 67 6c 6f 73 73 61 72 79 28 37 29 20 61 6e 64 20 22 68 67 20 68 65 6c 70	(7),.gitglossary(7).and."hg.help
11a00	20 70 61 74 74 65 72 6e 73 22 2e 0a 20 20 28 63 6c 2d 66 6c 65 74 20 28 28 74 6f 61 72 67 73 20	.patterns"....(cl-flet.((toargs.
11a20	28 67 6c 6f 62 20 26 6f 70 74 69 6f 6e 61 6c 20 65 78 63 6c 75 64 65 29 0a 20 20 20 20 20 20 20	(glob.&optional.exclude)........
11a40	20 20 20 20 20 20 20 3b 3b 20 47 69 76 65 6e 20 61 6e 20 65 6c 65 6d 65 6e 74 20 6c 69 6b 65 20	.......;;.Given.an.element.like.
11a60	28 22 64 69 72 22 20 22 64 69 72 2f 2a 22 29 2c 20 77 65 20 77 61 6e 74 20 74 6f 20 6d 6f 76 65	("dir"."dir/*"),.we.want.to.move
11a80	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 61 6c 6c 20 63 68 69 6c 64 72 65 6e 20 6f	...............;;.all.children.o
11aa0	66 20 22 64 69 72 22 20 74 6f 20 74 68 65 20 74 6f 70 2d 6c 65 76 65 6c 2e 20 20 47 6c 6f 62 20	f."dir".to.the.top-level...Glob.
11ac0	68 61 6e 64 6c 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6f 66 20 67 69 74	handling...............;;.of.git
11ae0	2d 6c 6f 67 2f 68 67 2d 6c 6f 67 20 6f 6e 6c 79 20 63 61 72 65 73 20 61 62 6f 75 74 20 72 65 67	-log/hg-log.only.cares.about.reg
11b00	75 6c 61 72 20 66 69 6c 65 2c 20 73 6f 20 69 66 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b	ular.file,.so.if...............;
11b20	3b 20 22 64 69 72 2f 73 75 62 64 69 72 2f 66 69 6c 65 22 20 69 73 20 6d 6f 64 69 66 69 65 64 2c	;."dir/subdir/file".is.modified,
11b40	20 74 68 65 6e 20 22 64 69 72 2f 2a 22 20 64 6f 65 73 20 6e 6f 74 0a 20 20 20 20 20 20 20 20 20	.then."dir/*".does.not..........
11b60	20 20 20 20 20 3b 3b 20 6d 61 74 63 68 20 74 68 61 74 20 63 68 61 6e 67 65 2e 20 20 55 73 65 20	.....;;.match.that.change...Use.
11b80	22 64 69 72 2f 2a 2a 22 20 69 6e 73 74 65 61 64 2c 20 74 6f 20 6d 61 6b 65 20 74 68 65 6d 0a 20	"dir/**".instead,.to.make.them..
11ba0	20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6c 6f 6f 6b 20 66 6f 72 20 63 68 61 6e 67 65 73	.............;;.look.for.changes
11bc0	20 74 6f 20 66 69 6c 65 73 20 69 6e 20 22 64 69 72 22 20 61 6e 64 20 61 6c 6c 20 73 75 62 64 69	.to.files.in."dir".and.all.subdi
11be0	72 73 2e 0a 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 2d	rs................(when.(string-
11c00	73 75 66 66 69 78 2d 70 20 22 2f 2a 22 20 67 6c 6f 62 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	suffix-p."/*".glob).............
11c20	20 20 20 20 28 73 65 74 71 20 67 6c 6f 62 20 28 63 6f 6e 63 61 74 20 67 6c 6f 62 20 22 2a 22 29	....(setq.glob.(concat.glob."*")
11c40	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 65 74 79 70 65 63 61 73 65 20 72	))...............(cl-etypecase.r
11c60	63 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 67 69 74 2d	cp.................(package-git-
11c80	72 65 63 69 70 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 28 66	recipe..................(list.(f
11ca0	6f 72 6d 61 74 20 22 3a 28 67 6c 6f 62 25 73 29 25 73 22 20 28 69 66 20 65 78 63 6c 75 64 65 20	ormat.":(glob%s)%s".(if.exclude.
11cc0	22 2c 65 78 63 6c 75 64 65 22 20 22 22 29 20 67 6c 6f 62 29 29 29 0a 20 20 20 20 20 20 20 20 20	",exclude"."").glob)))..........
11ce0	20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 68 67 2d 72 65 63 69 70 65 0a 20 20 20 20 20 20	.......(package-hg-recipe.......
11d00	20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 28 69 66 20 65 78 63 6c 75 64 65 20 22 2d 2d	...........(list.(if.exclude."--
11d20	65 78 63 6c 75 64 65 22 20 22 2d 2d 69 6e 63 6c 75 64 65 22 29 0a 20 20 20 20 20 20 20 20 20 20	exclude"."--include")...........
11d40	20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 22 67 6c 6f 62 3a 22 20 67 6c 6f	.............(concat."glob:".glo
11d60	62 29 29 29 29 29 29 0a 20 20 20 20 28 6d 61 70 63 61 6e 20 28 6c 61 6d 62 64 61 20 28 65 6e 74	b)))))).....(mapcan.(lambda.(ent
11d80	72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 63 61 73 65 2d 65 78 68 61 75 73 74	ry)...............(pcase-exhaust
11da0	69 76 65 20 65 6e 74 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 61 6e 64 20	ive.entry.................((and.
11dc0	67 6c 6f 62 20 28 70 72 65 64 20 73 74 72 69 6e 67 70 29 29 0a 20 20 20 20 20 20 20 20 20 20 20	glob.(pred.stringp))............
11de0	20 20 20 20 20 20 28 74 6f 61 72 67 73 20 67 6c 6f 62 29 29 0a 20 20 20 20 20 20 20 20 20 20 20	......(toargs.glob))............
11e00	20 20 20 20 20 28 28 61 6e 64 20 60 28 3a 65 78 63 6c 75 64 65 20 2e 20 2c 67 6c 6f 62 73 29 0a	.....((and.`(:exclude...,globs).
11e20	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 75 61 72 64 20 28 63 6c	......................(guard.(cl
11e40	2d 65 76 65 72 79 20 23 27 73 74 72 69 6e 67 70 20 67 6c 6f 62 73 29 29 29 0a 20 20 20 20 20 20	-every.#'stringp.globs))).......
11e60	20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 6e 20 28 6c 61 6d 62 64 61 20 28 67 29 20 28	...........(mapcan.(lambda.(g).(
11e80	74 6f 61 72 67 73 20 67 20 74 29 29 20 67 6c 6f 62 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20	toargs.g.t)).globs))............
11ea0	20 20 20 20 20 28 28 61 6e 64 20 60 28 3a 69 6e 70 75 74 73 20 2e 20 2c 67 6c 6f 62 73 29 0a 20	.....((and.`(:inputs...,globs)..
11ec0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 75 61 72 64 20 28 63 6c 2d	.....................(guard.(cl-
11ee0	65 76 65 72 79 20 23 27 73 74 72 69 6e 67 70 20 67 6c 6f 62 73 29 29 29 0a 20 20 20 20 20 20 20	every.#'stringp.globs)))........
11f00	20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 6e 20 23 27 74 6f 61 72 67 73 20 67 6c 6f 62 73	..........(mapcan.#'toargs.globs
11f20	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 61 6e 64 20 60 28 3a 72 65 6e 61	)).................((and.`(:rena
11f40	6d 65 20 2c 73 72 63 20 2c 64 65 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	me.,src.,dest)..................
11f60	20 20 20 20 20 28 67 75 61 72 64 20 28 61 6e 64 20 28 73 74 72 69 6e 67 70 20 73 72 63 29 20 28	.....(guard.(and.(stringp.src).(
11f80	73 74 72 69 6e 67 70 20 64 65 73 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	stringp.dest))))................
11fa0	20 20 64 65 73 74 20 3b 20 53 69 6c 65 6e 63 65 20 62 79 74 65 2d 63 6f 6d 70 69 6c 65 72 20 6f	..dest.;.Silence.byte-compiler.o
11fc0	66 20 45 6d 61 63 73 20 3c 20 32 38 2e 31 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	f.Emacs.<.28.1..................
11fe0	20 28 74 6f 61 72 67 73 20 73 72 63 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	.(toargs.src)).................(
12000	28 61 6e 64 20 60 28 2c 64 69 72 20 2e 20 2c 67 6c 6f 62 73 29 0a 20 20 20 20 20 20 20 20 20 20	(and.`(,dir...,globs)...........
12020	20 20 20 20 20 20 20 20 20 20 20 20 28 67 75 61 72 64 20 28 73 74 72 69 6e 67 70 20 64 69 72 29	............(guard.(stringp.dir)
12040	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 75 61 72 64 20 28	).......................(guard.(
12060	63 6c 2d 65 76 65 72 79 20 23 27 73 74 72 69 6e 67 70 20 67 6c 6f 62 73 29 29 29 0a 20 20 20 20	cl-every.#'stringp.globs))).....
12080	20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 72 20 3b 20 53 69 6c 65 6e 63 65 20 62 79 74 65 2d	.............dir.;.Silence.byte-
120a0	63 6f 6d 70 69 6c 65 72 20 6f 66 20 45 6d 61 63 73 20 3c 20 32 38 2e 31 2e 0a 20 20 20 20 20 20	compiler.of.Emacs.<.28.1........
120c0	20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 6e 20 23 27 74 6f 61 72 67 73 20 67 6c 6f 62	...........(mapcan.#'toargs.glob
120e0	73 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 73 70 65 63 20 28 6f	s)))).............(let.((spec.(o
12100	72 20 28 6f 72 65 66 20 72 63 70 20 66 69 6c 65 73 29 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64	r.(oref.rcp.files).package-build
12120	2d 64 65 66 61 75 6c 74 2d 66 69 6c 65 73 2d 73 70 65 63 29 29 29 0a 20 20 20 20 20 20 20 20 20	-default-files-spec)))..........
12140	20 20 20 20 20 28 69 66 20 28 65 71 20 28 63 61 72 20 73 70 65 63 29 20 3a 64 65 66 61 75 6c 74	.....(if.(eq.(car.spec).:default
12160	73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 70 70 65 6e 64 20 70 61 63	s)...................(append.pac
12180	6b 61 67 65 2d 62 75 69 6c 64 2d 64 65 66 61 75 6c 74 2d 66 69 6c 65 73 2d 73 70 65 63 20 28 63	kage-build-default-files-spec.(c
121a0	64 72 20 73 70 65 63 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 70 65 63 29 29	dr.spec)).................spec))
121c0	29 29 29 0a 0a 3b 3b 3b 20 43 6f 6d 6d 61 6e 64 73 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61	)))..;;;.Commands..;;;###autoloa
121e0	64 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 61 72 63 68 69 76 65 20 28	d.(defun.package-build-archive.(
12200	6e 61 6d 65 20 26 6f 70 74 69 6f 6e 61 6c 20 64 75 6d 70 2d 61 72 63 68 69 76 65 2d 63 6f 6e 74	name.&optional.dump-archive-cont
12220	65 6e 74 73 29 0a 20 20 22 42 75 69 6c 64 20 61 20 70 61 63 6b 61 67 65 20 61 72 63 68 69 76 65	ents)..."Build.a.package.archive
12240	20 66 6f 72 20 74 68 65 20 70 61 63 6b 61 67 65 20 6e 61 6d 65 64 20 4e 41 4d 45 2e 0a 49 66 20	.for.the.package.named.NAME..If.
12260	44 55 4d 50 2d 41 52 43 48 49 56 45 2d 43 4f 4e 54 45 4e 54 53 20 69 73 20 6e 6f 6e 2d 6e 69 6c	DUMP-ARCHIVE-CONTENTS.is.non-nil
12280	2c 20 74 68 65 20 75 70 64 61 74 65 64 20 61 72 63 68 69 76 65 20 63 6f 6e 74 65 6e 74 73 0a 61	,.the.updated.archive.contents.a
122a0	72 65 20 73 75 62 73 65 71 75 65 6e 74 6c 79 20 64 75 6d 70 65 64 2e 22 0a 20 20 28 69 6e 74 65	re.subsequently.dumped."...(inte
122c0	72 61 63 74 69 76 65 20 28 6c 69 73 74 20 28 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 72 65	ractive.(list.(package-recipe-re
122e0	61 64 2d 6e 61 6d 65 29 20 74 29 29 0a 20 20 28 75 6e 6c 65 73 73 20 28 66 69 6c 65 2d 65 78 69	ad-name).t))...(unless.(file-exi
12300	73 74 73 2d 70 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 61 72 63 68 69 76 65 2d 64 69 72 29	sts-p.package-build-archive-dir)
12320	0a 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 6d 65 73 73 61 67 65 20 22 43 72	.....(package-build--message."Cr
12340	65 61 74 69 6e 67 20 64 69 72 65 63 74 6f 72 79 20 25 73 22 20 70 61 63 6b 61 67 65 2d 62 75 69	eating.directory.%s".package-bui
12360	6c 64 2d 61 72 63 68 69 76 65 2d 64 69 72 29 0a 20 20 20 20 28 6d 61 6b 65 2d 64 69 72 65 63 74	ld-archive-dir).....(make-direct
12380	6f 72 79 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 61 72 63 68 69 76 65 2d 64 69 72 29 29 0a	ory.package-build-archive-dir)).
123a0	20 20 28 6c 65 74 2a 20 28 28 73 74 61 72 74 2d 74 69 6d 65 20 28 63 75 72 72 65 6e 74 2d 74 69	..(let*.((start-time.(current-ti
123c0	6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 72 63 70 20 28 70 61 63 6b 61 67 65 2d 72 65 63 69	me))..........(rcp.(package-reci
123e0	70 65 2d 6c 6f 6f 6b 75 70 20 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 75 72 6c 20 28	pe-lookup.name))..........(url.(
12400	6f 72 65 66 20 72 63 70 20 75 72 6c 29 29 0a 20 20 20 20 20 20 20 20 20 28 72 65 70 6f 20 28 6f	oref.rcp.url))..........(repo.(o
12420	72 65 66 20 72 63 70 20 72 65 70 6f 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 65 74 63 68 65 72	ref.rcp.repo))..........(fetcher
12440	20 28 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 2d 66 65 74 63 68 65 72 20 72 63 70 29 29 0a	.(package-recipe--fetcher.rcp)).
12460	20 20 20 20 20 20 20 20 20 28 76 65 72 73 69 6f 6e 20 6e 69 6c 29 29 0a 20 20 20 20 28 63 6f 6e	.........(version.nil)).....(con
12480	64 20 28 28 6e 6f 74 20 6e 6f 6e 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 20 20 20 20 20 20	d.((not.noninteractive).........
124a0	20 20 20 28 6d 65 73 73 61 67 65 20 22 20 e2 80 a2 20 25 73 20 70 61 63 6b 61 67 65 20 25 73 20	...(message.".....%s.package.%s.
124c0	28 66 72 6f 6d 20 25 73 29 2e 2e 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	(from.%s)..."...................
124e0	20 20 28 69 66 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 69 6e 68 69 62 69 74 2d 75 70 64	..(if.package-build--inhibit-upd
12500	61 74 65 20 22 46 65 74 63 68 69 6e 67 22 20 22 42 75 69 6c 64 69 6e 67 22 29 0a 20 20 20 20 20	ate."Fetching"."Building")......
12520	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20	...............name.............
12540	20 20 20 20 20 20 20 20 28 69 66 20 72 65 70 6f 20 28 66 6f 72 6d 61 74 20 22 25 73 3a 25 73 22	........(if.repo.(format."%s:%s"
12560	20 66 65 74 63 68 65 72 20 72 65 70 6f 29 20 75 72 6c 29 29 29 0a 20 20 20 20 20 20 20 20 20 20	.fetcher.repo).url)))...........
12580	28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 76 65 72 62 6f 73 65 0a 20 20 20 20 20 20 20 20 20	(package-build-verbose..........
125a0	20 20 28 6d 65 73 73 61 67 65 20 22 50 61 63 6b 61 67 65 3a 20 25 73 22 20 6e 61 6d 65 29 0a 20	..(message."Package:.%s".name)..
125c0	20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 46 65 74 63 68 65 72 3a 20 25 73 22	..........(message."Fetcher:.%s"
125e0	20 66 65 74 63 68 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 53	.fetcher)............(message."S
12600	6f 75 72 63 65 3a 20 20 25 73 5c 6e 22 20 75 72 6c 29 29 29 0a 20 20 20 20 28 70 61 63 6b 61 67	ource:..%s\n".url))).....(packag
12620	65 2d 62 75 69 6c 64 2d 2d 66 65 74 63 68 20 72 63 70 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20	e-build--fetch.rcp).....(unless.
12640	70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 69 6e 68 69 62 69 74 2d 75 70 64 61 74 65 0a 20 20	package-build--inhibit-update...
12660	20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 73 65 6c 65 63 74 2d 76 65 72 73 69	....(package-build--select-versi
12680	6f 6e 20 72 63 70 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 76 65 72 73 69 6f 6e 20 28 6f 72 65	on.rcp).......(setq.version.(ore
126a0	66 20 72 63 70 20 76 65 72 73 69 6f 6e 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 76 65 72 73	f.rcp.version)).......(when.vers
126c0	69 6f 6e 0a 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 70 61 63 6b	ion.........(package-build--pack
126e0	61 67 65 20 72 63 70 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 64 75 6d 70 2d 61 72 63 68	age.rcp).........(when.dump-arch
12700	69 76 65 2d 63 6f 6e 74 65 6e 74 73 0a 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d	ive-contents...........(package-
12720	62 75 69 6c 64 2d 64 75 6d 70 2d 61 72 63 68 69 76 65 2d 63 6f 6e 74 65 6e 74 73 29 29 29 0a 20	build-dump-archive-contents)))..
12740	20 20 20 20 20 28 69 66 20 28 6e 6f 74 20 76 65 72 73 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20	.....(if.(not.version)..........
12760	20 28 6d 65 73 73 61 67 65 20 22 20 e2 9c 97 20 43 61 6e 6e 6f 74 20 64 65 74 65 72 6d 69 6e 65	.(message.".....Cannot.determine
12780	20 76 65 72 73 69 6f 6e 21 22 29 0a 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 20 e2	.version!").........(message."..
127a0	9c 93 20 53 75 63 63 65 73 73 3a 22 29 0a 20 20 20 20 20 20 20 20 28 70 63 61 73 65 2d 64 6f 6c	...Success:").........(pcase-dol
127c0	69 73 74 20 28 60 28 2c 66 69 6c 65 20 2e 20 2c 61 74 74 72 73 29 0a 20 20 20 20 20 20 20 20 20	ist.(`(,file...,attrs)..........
127e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 63 74 6f 72 79 2d 66 69 6c 65 73 2d 61	..............(directory-files-a
12800	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 20 20 20 20 20 20	nd-attributes...................
12820	20 20 20 20 20 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 61 72 63 68 69 76 65 2d 64 69 72 20	......package-build-archive-dir.
12840	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 28 66 6f 72	nil.........................(for
12860	6d 61 74 20 22 5c 5c 60 25 73 2d 5b 30 2d 39 5d 2b 22 20 6e 61 6d 65 29 29 29 0a 20 20 20 20 20	mat."\\`%s-[0-9]+".name)))......
12880	20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 20 20 25 73 20 20 25 73 22 0a 20 20 20 20 20 20 20	.....(message."..%s..%s"........
128a0	20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 2d 74 69 6d 65 2d 73 74 72 69 6e 67 0a	............(format-time-string.
128c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 25 46 54 25 54 25 7a 22 20 28 66	...................."%FT%T%z".(f
128e0	69 6c 65 2d 61 74 74 72 69 62 75 74 65 2d 6d 6f 64 69 66 69 63 61 74 69 6f 6e 2d 74 69 6d 65 20	ile-attribute-modification-time.
12900	61 74 74 72 73 29 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 69 6c	attrs).t)....................fil
12920	65 29 29 29 29 0a 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 25 73 20 25 73 20 69 6e 20 25 2e 33	e)))).....(message."%s.%s.in.%.3
12940	66 73 2c 20 66 69 6e 69 73 68 65 64 20 61 74 20 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20	fs,.finished.at.%s".............
12960	20 28 69 66 20 76 65 72 73 69 6f 6e 20 22 42 75 69 6c 74 22 20 22 46 65 74 63 68 65 64 22 29 0a	.(if.version."Built"."Fetched").
12980	20 20 20 20 20 20 20 20 20 20 20 20 20 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28	.............name..............(
129a0	66 6c 6f 61 74 2d 74 69 6d 65 20 28 74 69 6d 65 2d 73 69 6e 63 65 20 73 74 61 72 74 2d 74 69 6d	float-time.(time-since.start-tim
129c0	65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 2d 74 69 6d 65 2d 73 74	e))..............(format-time-st
129e0	72 69 6e 67 20 22 25 46 54 25 54 25 7a 22 20 6e 69 6c 20 74 29 29 29 29 0a 0a 3b 3b 3b 23 23 23	ring."%FT%T%z".nil.t))))..;;;###
12a00	61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 70	autoload.(defun.package-build--p
12a20	61 63 6b 61 67 65 20 28 72 63 70 29 0a 20 20 22 42 75 69 6c 64 20 74 68 65 20 70 61 63 6b 61 67	ackage.(rcp)..."Build.the.packag
12a40	65 20 76 65 72 73 69 6f 6e 20 73 70 65 63 69 66 69 65 64 20 62 79 20 52 43 50 2e 0a 52 65 74 75	e.version.specified.by.RCP..Retu
12a60	72 6e 20 74 68 65 20 61 72 63 68 69 76 65 20 65 6e 74 72 79 20 66 6f 72 20 74 68 65 20 70 61 63	rn.the.archive.entry.for.the.pac
12a80	6b 61 67 65 20 61 6e 64 20 73 74 6f 72 65 20 74 68 65 20 70 61 63 6b 61 67 65 0a 69 6e 20 60 70	kage.and.store.the.package.in.`p
12aa0	61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 61 72 63 68 69 76 65 2d 64 69 72 27 2e 22 0a 20 20 28 6c	ackage-build-archive-dir'."...(l
12ac0	65 74 20 28 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 28 70 61 63 6b 61 67 65 2d	et.((default-directory.(package-
12ae0	72 65 63 69 70 65 2d 2d 77 6f 72 6b 69 6e 67 2d 74 72 65 65 20 72 63 70 29 29 29 0a 20 20 20 20	recipe--working-tree.rcp))).....
12b00	28 75 6e 77 69 6e 64 2d 70 72 6f 74 65 63 74 0a 20 20 20 20 20 20 20 20 28 70 63 61 73 65 2d 6c	(unwind-protect.........(pcase-l
12b20	65 74 20 28 28 28 65 69 65 69 6f 20 6e 61 6d 65 20 76 65 72 73 69 6f 6e 20 63 6f 6d 6d 69 74 20	et.(((eieio.name.version.commit.
12b40	72 65 76 64 65 73 63 29 20 72 63 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	revdesc).rcp)...................
12b60	20 20 28 70 72 6f 63 65 73 73 2d 65 6e 76 69 72 6f 6e 6d 65 6e 74 20 28 63 6f 70 79 2d 73 65 71	..(process-environment.(copy-seq
12b80	75 65 6e 63 65 20 70 72 6f 63 65 73 73 2d 65 6e 76 69 72 6f 6e 6d 65 6e 74 29 29 29 0a 20 20 20	uence.process-environment)))....
12ba0	20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 63 68 65 63 6b 6f 75 74 20	.......(package-build--checkout.
12bc0	72 63 70 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 65 6e 76 20 22 50 41 43 4b 41 47 45 5f	rcp)...........(setenv."PACKAGE_
12be0	56 45 52 53 49 4f 4e 22 20 76 65 72 73 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74	VERSION".version)...........(set
12c00	65 6e 76 20 22 50 41 43 4b 41 47 45 5f 52 45 56 49 53 49 4f 4e 22 20 63 6f 6d 6d 69 74 29 0a 20	env."PACKAGE_REVISION".commit)..
12c20	20 20 20 20 20 20 20 20 20 28 73 65 74 65 6e 76 20 22 50 41 43 4b 41 47 45 5f 52 45 56 44 45 53	.........(setenv."PACKAGE_REVDES
12c40	43 22 20 72 65 76 64 65 73 63 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 2d 6c 65 74 2a	C".revdesc)...........(when-let*
12c60	20 28 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 72 75 6e 2d 72 65 63 69 70 65 2d 73 68 65 6c	.((package-build-run-recipe-shel
12c80	6c 2d 63 6f 6d 6d 61 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	l-command)......................
12ca0	20 28 63 6f 6d 6d 61 6e 64 20 28 6f 72 65 66 20 72 63 70 20 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e	.(command.(oref.rcp.shell-comman
12cc0	64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d	d))).............(package-build-
12ce0	2d 6d 65 73 73 61 67 65 20 22 52 75 6e 6e 69 6e 67 20 25 73 22 20 63 6f 6d 6d 61 6e 64 29 0a 20	-message."Running.%s".command)..
12d00	20 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 63 61 6c 6c 2d	...........(package-build--call-
12d20	73 61 6e 64 62 6f 78 65 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 72 63 70 20 73 68 65 6c 6c	sandboxed..............rcp.shell
12d40	2d 66 69 6c 65 2d 6e 61 6d 65 20 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e 64 2d 73 77 69 74 63 68 20	-file-name.shell-command-switch.
12d60	63 6f 6d 6d 61 6e 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 2d 6c 65 74 20 28 28	command))...........(when-let.((
12d80	70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 72 75 6e 2d 72 65 63 69 70 65 2d 6d 61 6b 65 2d 74 61	package-build-run-recipe-make-ta
12da0	72 67 65 74 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 61 72	rgets)......................(tar
12dc0	67 65 74 73 20 28 6f 72 65 66 20 72 63 70 20 6d 61 6b 65 2d 74 61 72 67 65 74 73 29 29 29 0a 20	gets.(oref.rcp.make-targets)))..
12de0	20 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 6d 65 73 73 61	...........(package-build--messa
12e00	67 65 20 22 52 75 6e 6e 69 6e 67 20 6d 61 6b 65 20 25 73 22 20 28 73 74 72 69 6e 67 2d 6a 6f 69	ge."Running.make.%s".(string-joi
12e20	6e 20 74 61 72 67 65 74 73 20 22 20 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 61 70 70	n.targets.".")).............(app
12e40	6c 79 20 23 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 63 61 6c 6c 2d 73 61 6e 64 62 6f 78	ly.#'package-build--call-sandbox
12e60	65 64 20 72 63 70 20 22 6d 61 6b 65 22 20 74 61 72 67 65 74 73 29 29 0a 20 20 20 20 20 20 20 20	ed.rcp."make".targets)).........
12e80	20 20 28 69 66 2d 6c 65 74 20 28 28 66 69 6c 65 73 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64	..(if-let.((files.(package-build
12ea0	2d 65 78 70 61 6e 64 2d 66 69 6c 65 73 2d 73 70 65 63 20 72 63 70 20 74 29 29 29 0a 20 20 20 20	-expand-files-spec.rcp.t))).....
12ec0	20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 28 6f 72 20 70 61 63 6b 61 67 65 2d 62	..........(funcall.(or.package-b
12ee0	75 69 6c 64 2d 62 75 69 6c 64 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20	uild-build-function.............
12f00	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 6c	...............'package-build--l
12f20	65 67 61 63 79 2d 62 75 69 6c 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	egacy-build)....................
12f40	20 20 20 20 72 63 70 20 66 69 6c 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b	....rcp.files).............(pack
12f60	61 67 65 2d 62 75 69 6c 64 2d 2d 65 72 72 6f 72 20 72 63 70 0a 20 20 20 20 20 20 20 20 20 20 20	age-build--error.rcp............
12f80	20 20 20 22 55 6e 61 62 6c 65 20 74 6f 20 66 69 6e 64 20 66 69 6c 65 73 20 6d 61 74 63 68 69 6e	..."Unable.to.find.files.matchin
12fa0	67 20 72 65 63 69 70 65 20 70 61 74 74 65 72 6e 73 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 28	g.recipe.patterns"))...........(
12fc0	77 68 65 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 62 61 64 67 65 2d 64 61 74 61 0a 20 20	when.package-build-badge-data...
12fe0	20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 77 72 69 74 65 2d	..........(package-build--write-
13000	62 61 64 67 65 2d 69 6d 61 67 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 61 6d 65 20 76 65	badge-image..............name.ve
13020	72 73 69 6f 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 61 72 63 68 69 76 65 2d 64 69 72 29	rsion.package-build-archive-dir)
13040	29 29 0a 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 63 6c 65 61 6e 75 70	)).......(package-build--cleanup
13060	20 72 63 70 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d	.rcp))))..(defun.package-build--
13080	62 75 69 6c 64 2d 70 61 63 6b 61 67 65 20 28 72 63 70 20 66 69 6c 65 73 29 0a 20 20 28 70 63 61	build-package.(rcp.files)...(pca
130a0	73 65 2d 6c 65 74 2a 20 28 28 28 65 69 65 69 6f 20 6e 61 6d 65 20 76 65 72 73 69 6f 6e 29 20 72	se-let*.(((eieio.name.version).r
130c0	63 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 6d 70 64 69 72 20 28 66 69 6c 65	cp)................(tmpdir.(file
130e0	2d 6e 61 6d 65 2d 61 73 2d 64 69 72 65 63 74 6f 72 79 20 28 6d 61 6b 65 2d 74 65 6d 70 2d 66 69	-name-as-directory.(make-temp-fi
13100	6c 65 20 6e 61 6d 65 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 61 72	le.name.t)))................(tar
13120	67 65 74 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 28 63 6f 6e 63 61 74 20 6e 61	get.(expand-file-name.(concat.na
13140	6d 65 20 22 2d 22 20 76 65 72 73 69 6f 6e 29 20 74 6d 70 64 69 72 29 29 29 0a 20 20 20 20 28 75	me."-".version).tmpdir))).....(u
13160	6e 6c 65 73 73 20 28 72 61 73 73 6f 63 20 28 63 6f 6e 63 61 74 20 6e 61 6d 65 20 22 2e 65 6c 22	nless.(rassoc.(concat.name.".el"
13180	29 20 66 69 6c 65 73 29 0a 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 65	).files).......(package-build--e
131a0	72 72 6f 72 20 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 22 4d 69 73 73 69 6e 67 20 6c 69 62 72 61	rror.name........."Missing.libra
131c0	72 79 20 5c 22 25 73 2e 65 6c 5c 22 20 6d 61 74 63 68 69 6e 67 20 70 61 63 6b 61 67 65 20 6e 61	ry.\"%s.el\".matching.package.na
131e0	6d 65 20 60 25 73 27 22 20 6e 61 6d 65 20 6e 61 6d 65 29 29 0a 20 20 20 20 28 70 61 63 6b 61 67	me.`%s'".name.name)).....(packag
13200	65 2d 62 75 69 6c 64 2d 2d 65 78 74 72 61 63 74 2d 66 72 6f 6d 2d 6c 69 62 72 61 72 79 20 72 63	e-build--extract-from-library.rc
13220	70 20 66 69 6c 65 73 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 70 61 63 6b 61 67 65 2d 62 75 69	p.files).....(unless.package-bui
13240	6c 64 2d 2d 69 6e 68 69 62 69 74 2d 62 75 69 6c 64 0a 20 20 20 20 20 20 28 75 6e 77 69 6e 64 2d	ld--inhibit-build.......(unwind-
13260	70 72 6f 74 65 63 74 0a 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20	protect...........(progn........
13280	20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 63 6f 70 79 2d 70 61 63 6b 61 67	.....(package-build--copy-packag
132a0	65 2d 66 69 6c 65 73 20 66 69 6c 65 73 20 74 61 72 67 65 74 29 0a 20 20 20 20 20 20 20 20 20 20	e-files.files.target)...........
132c0	20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 73 65 74 2d 76 65 72 73 69 6f 6e 2d 68 65	..(package-build--set-version-he
132e0	61 64 65 72 73 20 72 63 70 20 74 61 72 67 65 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70	aders.rcp.target).............(p
13300	61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 77 72 69 74 65 2d 70 6b 67 2d 66 69 6c 65 20 72 63 70	ackage-build--write-pkg-file.rcp
13320	20 74 61 72 67 65 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75	.target).............(package-bu
13340	69 6c 64 2d 2d 67 65 6e 65 72 61 74 65 2d 69 6e 66 6f 2d 66 69 6c 65 73 20 72 63 70 20 66 69 6c	ild--generate-info-files.rcp.fil
13360	65 73 20 74 61 72 67 65 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d	es.target).............(package-
13380	62 75 69 6c 64 2d 2d 63 72 65 61 74 65 2d 74 61 72 20 72 63 70 20 74 6d 70 64 69 72 29 0a 20 20	build--create-tar.rcp.tmpdir)...
133a0	20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 77 72 69 74 65 2d	..........(package-build--write-
133c0	70 6b 67 2d 72 65 61 64 6d 65 20 72 63 70 20 66 69 6c 65 73 29 29 0a 20 20 20 20 20 20 20 20 28	pkg-readme.rcp.files)).........(
133e0	64 65 6c 65 74 65 2d 64 69 72 65 63 74 6f 72 79 20 74 6d 70 64 69 72 20 74 20 6e 69 6c 29 29 29	delete-directory.tmpdir.t.nil)))
13400	0a 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 77 72 69 74 65 2d 61 72 63 68 69	.....(package-build--write-archi
13420	76 65 2d 65 6e 74 72 79 20 72 63 70 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d	ve-entry.rcp)))..(defun.package-
13440	62 75 69 6c 64 2d 2d 6c 65 67 61 63 79 2d 62 75 69 6c 64 20 28 72 63 70 20 66 69 6c 65 73 29 0a	build--legacy-build.(rcp.files).
13460	20 20 28 64 65 63 6c 61 72 65 20 28 6f 62 73 6f 6c 65 74 65 20 70 61 63 6b 61 67 65 2d 62 75 69	..(declare.(obsolete.package-bui
13480	6c 64 2d 2d 62 75 69 6c 64 2d 70 61 63 6b 61 67 65 20 22 50 61 63 6b 61 67 65 2d 42 75 69 6c 64	ld--build-package."Package-Build
134a0	20 35 2e 30 2e 30 22 29 29 0a 20 20 28 77 69 74 68 2d 73 75 70 70 72 65 73 73 65 64 2d 77 61 72	.5.0.0"))...(with-suppressed-war
134c0	6e 69 6e 67 73 20 28 28 6f 62 73 6f 6c 65 74 65 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d	nings.((obsolete.package-build--
134e0	62 75 69 6c 64 2d 73 69 6e 67 6c 65 2d 66 69 6c 65 2d 70 61 63 6b 61 67 65 0a 20 20 20 20 20 20	build-single-file-package.......
13500	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
13520	20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 62 75 69 6c 64 2d 6d 75 6c 74 69 2d 66 69 6c 65	.package-build--build-multi-file
13540	2d 70 61 63 6b 61 67 65 29 29 0a 20 20 20 20 28 69 66 20 28 3d 20 28 6c 65 6e 67 74 68 20 66 69	-package)).....(if.(=.(length.fi
13560	6c 65 73 29 20 31 29 0a 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d	les).1).........(package-build--
13580	62 75 69 6c 64 2d 73 69 6e 67 6c 65 2d 66 69 6c 65 2d 70 61 63 6b 61 67 65 20 72 63 70 20 66 69	build-single-file-package.rcp.fi
135a0	6c 65 73 29 0a 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 62 75 69 6c 64	les).......(package-build--build
135c0	2d 6d 75 6c 74 69 2d 66 69 6c 65 2d 70 61 63 6b 61 67 65 20 72 63 70 20 66 69 6c 65 73 29 29 29	-multi-file-package.rcp.files)))
135e0	29 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 62 75 69 6c 64 2d 73	)..(defun.package-build--build-s
13600	69 6e 67 6c 65 2d 66 69 6c 65 2d 70 61 63 6b 61 67 65 20 28 72 63 70 20 66 69 6c 65 73 29 0a 20	ingle-file-package.(rcp.files)..
13620	20 28 64 65 63 6c 61 72 65 20 28 6f 62 73 6f 6c 65 74 65 20 70 61 63 6b 61 67 65 2d 62 75 69 6c	.(declare.(obsolete.package-buil
13640	64 2d 2d 62 75 69 6c 64 2d 70 61 63 6b 61 67 65 20 22 50 61 63 6b 61 67 65 2d 42 75 69 6c 64 20	d--build-package."Package-Build.
13660	35 2e 30 2e 30 22 29 29 0a 20 20 28 6f 73 65 74 20 72 63 70 20 74 61 72 62 61 6c 6c 70 20 6e 69	5.0.0"))...(oset.rcp.tarballp.ni
13680	6c 29 0a 20 20 28 70 63 61 73 65 2d 6c 65 74 2a 20 28 28 28 65 69 65 69 6f 20 6e 61 6d 65 20 76	l)...(pcase-let*.(((eieio.name.v
136a0	65 72 73 69 6f 6e 29 20 72 63 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c	ersion).rcp)................(fil
136c0	65 20 28 63 61 61 72 20 66 69 6c 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	e.(caar.files))................(
136e0	73 6f 75 72 63 65 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 66 69 6c 65 29 29 0a	source.(expand-file-name.file)).
13700	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 61 72 67 65 74 20 28 65 78 70 61 6e 64 2d 66	...............(target.(expand-f
13720	69 6c 65 2d 6e 61 6d 65 20 28 63 6f 6e 63 61 74 20 6e 61 6d 65 20 22 2d 22 20 76 65 72 73 69 6f	ile-name.(concat.name."-".versio
13740	6e 20 22 2e 65 6c 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	n.".el")........................
13760	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 62 75 69 6c 64 2d	..................package-build-
13780	61 72 63 68 69 76 65 2d 64 69 72 29 29 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 28 65 71 75 61	archive-dir))).....(unless.(equa
137a0	6c 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 73 61 6e 73 2d 65 78 74 65 6e 73 69 6f 6e 20 28 66 69 6c	l.(file-name-sans-extension.(fil
137c0	65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 72 65 63 74 6f 72 79 20 66 69 6c 65 29 29 0a 20 20 20 20 20	e-name-nondirectory.file))......
137e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 61 6d 65 29 0a 20 20 20 20 20 20 28 70 61 63 6b 61	..............name).......(packa
13800	67 65 2d 62 75 69 6c 64 2d 2d 65 72 72 6f 72 20 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 22 53 69	ge-build--error.name........."Si
13820	6e 67 6c 65 20 66 69 6c 65 20 25 73 20 64 6f 65 73 20 6e 6f 74 20 6d 61 74 63 68 20 70 61 63 6b	ngle.file.%s.does.not.match.pack
13840	61 67 65 20 6e 61 6d 65 20 25 73 22 20 66 69 6c 65 20 6e 61 6d 65 29 29 0a 20 20 20 20 28 70 61	age.name.%s".file.name)).....(pa
13860	63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 65 78 74 72 61 63 74 2d 66 72 6f 6d 2d 6c 69 62 72 61 72	ckage-build--extract-from-librar
13880	79 20 72 63 70 20 74 61 72 67 65 74 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 70 61 63 6b 61 67	y.rcp.target).....(unless.packag
138a0	65 2d 62 75 69 6c 64 2d 2d 69 6e 68 69 62 69 74 2d 62 75 69 6c 64 0a 20 20 20 20 20 20 28 63 6f	e-build--inhibit-build.......(co
138c0	70 79 2d 66 69 6c 65 20 73 6f 75 72 63 65 20 74 61 72 67 65 74 20 74 29 0a 20 20 20 20 20 20 28	py-file.source.target.t).......(
138e0	70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 73 65 74 2d 76 65 72 73 69 6f 6e 2d 68 65 61 64 65	package-build--set-version-heade
13900	72 73 20 72 63 70 20 74 61 72 67 65 74 29 0a 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75	rs.rcp.target).......(package-bu
13920	69 6c 64 2d 2d 77 72 69 74 65 2d 70 6b 67 2d 72 65 61 64 6d 65 20 72 63 70 20 66 69 6c 65 73 29	ild--write-pkg-readme.rcp.files)
13940	29 0a 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 77 72 69 74 65 2d 61 72 63 68	).....(package-build--write-arch
13960	69 76 65 2d 65 6e 74 72 79 20 72 63 70 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65	ive-entry.rcp)))..(defun.package
13980	2d 62 75 69 6c 64 2d 2d 62 75 69 6c 64 2d 6d 75 6c 74 69 2d 66 69 6c 65 2d 70 61 63 6b 61 67 65	-build--build-multi-file-package
139a0	20 28 72 63 70 20 66 69 6c 65 73 29 0a 20 20 28 64 65 63 6c 61 72 65 20 28 6f 62 73 6f 6c 65 74	.(rcp.files)...(declare.(obsolet
139c0	65 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 62 75 69 6c 64 2d 70 61 63 6b 61 67 65 20 22	e.package-build--build-package."
139e0	50 61 63 6b 61 67 65 2d 42 75 69 6c 64 20 35 2e 30 2e 30 22 29 29 0a 20 20 28 70 63 61 73 65 2d	Package-Build.5.0.0"))...(pcase-
13a00	6c 65 74 2a 20 28 28 28 65 69 65 69 6f 20 6e 61 6d 65 20 76 65 72 73 69 6f 6e 29 20 72 63 70 29	let*.(((eieio.name.version).rcp)
13a20	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 6d 70 64 69 72 20 28 66 69 6c 65 2d 6e 61	................(tmpdir.(file-na
13a40	6d 65 2d 61 73 2d 64 69 72 65 63 74 6f 72 79 20 28 6d 61 6b 65 2d 74 65 6d 70 2d 66 69 6c 65 20	me-as-directory.(make-temp-file.
13a60	6e 61 6d 65 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 61 72 67 65 74	name.t)))................(target
13a80	20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 28 63 6f 6e 63 61 74 20 6e 61 6d 65 20	.(expand-file-name.(concat.name.
13aa0	22 2d 22 20 76 65 72 73 69 6f 6e 29 20 74 6d 70 64 69 72 29 29 29 0a 20 20 20 20 28 75 6e 6c 65	"-".version).tmpdir))).....(unle
13ac0	73 73 20 28 6f 72 20 28 72 61 73 73 6f 63 20 28 63 6f 6e 63 61 74 20 6e 61 6d 65 20 22 2e 65 6c	ss.(or.(rassoc.(concat.name.".el
13ae0	22 29 20 66 69 6c 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 61 73 73 6f	").files).................(rasso
13b00	63 20 28 63 6f 6e 63 61 74 20 6e 61 6d 65 20 22 2d 70 6b 67 2e 65 6c 22 29 20 66 69 6c 65 73 29	c.(concat.name."-pkg.el").files)
13b20	29 0a 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 65 72 72 6f 72 20 6e 61	).......(package-build--error.na
13b40	6d 65 0a 20 20 20 20 20 20 20 20 22 25 73 5b 2d 70 6b 67 5d 2e 65 6c 20 6d 61 74 63 68 69 6e 67	me........."%s[-pkg].el.matching
13b60	20 70 61 63 6b 61 67 65 20 6e 61 6d 65 20 69 73 20 6d 69 73 73 69 6e 67 22 20 6e 61 6d 65 29 29	.package.name.is.missing".name))
13b80	0a 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 65 78 74 72 61 63 74 2d 66 72 6f	.....(package-build--extract-fro
13ba0	6d 2d 6c 69 62 72 61 72 79 20 72 63 70 20 66 69 6c 65 73 29 0a 20 20 20 20 28 77 69 74 68 2d 73	m-library.rcp.files).....(with-s
13bc0	75 70 70 72 65 73 73 65 64 2d 77 61 72 6e 69 6e 67 73 20 28 28 6f 62 73 6f 6c 65 74 65 20 70 61	uppressed-warnings.((obsolete.pa
13be0	63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 65 78 74 72 61 63 74 2d 66 72 6f 6d 2d 70 61 63 6b 61 67	ckage-build--extract-from-packag
13c00	65 29 29 0a 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 65 78 74 72 61 63	e)).......(package-build--extrac
13c20	74 2d 66 72 6f 6d 2d 70 61 63 6b 61 67 65 20 72 63 70 20 66 69 6c 65 73 29 29 0a 20 20 20 20 28	t-from-package.rcp.files)).....(
13c40	75 6e 6c 65 73 73 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 69 6e 68 69 62 69 74 2d 62 75	unless.package-build--inhibit-bu
13c60	69 6c 64 0a 20 20 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	ild.......(unwind-protect.......
13c80	20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d	....(progn.............(package-
13ca0	62 75 69 6c 64 2d 2d 63 6f 70 79 2d 70 61 63 6b 61 67 65 2d 66 69 6c 65 73 20 66 69 6c 65 73 20	build--copy-package-files.files.
13cc0	74 61 72 67 65 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69	target).............(package-bui
13ce0	6c 64 2d 2d 73 65 74 2d 76 65 72 73 69 6f 6e 2d 68 65 61 64 65 72 73 20 72 63 70 20 74 61 72 67	ld--set-version-headers.rcp.targ
13d00	65 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d	et).............(package-build--
13d20	77 72 69 74 65 2d 70 6b 67 2d 66 69 6c 65 20 72 63 70 20 74 61 72 67 65 74 29 0a 20 20 20 20 20	write-pkg-file.rcp.target)......
13d40	20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 67 65 6e 65 72 61 74 65 2d	.......(package-build--generate-
13d60	69 6e 66 6f 2d 66 69 6c 65 73 20 72 63 70 20 66 69 6c 65 73 20 74 61 72 67 65 74 29 0a 20 20 20	info-files.rcp.files.target)....
13d80	20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 63 72 65 61 74 65 2d	.........(package-build--create-
13da0	74 61 72 20 72 63 70 20 74 6d 70 64 69 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63	tar.rcp.tmpdir).............(pac
13dc0	6b 61 67 65 2d 62 75 69 6c 64 2d 2d 77 72 69 74 65 2d 70 6b 67 2d 72 65 61 64 6d 65 20 72 63 70	kage-build--write-pkg-readme.rcp
13de0	20 66 69 6c 65 73 29 29 0a 20 20 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 64 69 72 65 63 74 6f	.files)).........(delete-directo
13e00	72 79 20 74 6d 70 64 69 72 20 74 20 6e 69 6c 29 29 29 0a 20 20 20 20 28 70 61 63 6b 61 67 65 2d	ry.tmpdir.t.nil))).....(package-
13e20	62 75 69 6c 64 2d 2d 77 72 69 74 65 2d 61 72 63 68 69 76 65 2d 65 6e 74 72 79 20 72 63 70 29 29	build--write-archive-entry.rcp))
13e40	29 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 63 6c 65 61 6e 75 70	)..(defun.package-build--cleanup
13e60	20 28 72 63 70 29 0a 20 20 28 63 6f 6e 64 20 28 28 63 6c 2d 74 79 70 65 70 20 72 63 70 20 27 70	.(rcp)...(cond.((cl-typep.rcp.'p
13e80	61 63 6b 61 67 65 2d 67 69 74 2d 72 65 63 69 70 65 29 0a 20 20 20 20 20 20 20 20 20 28 70 61 63	ackage-git-recipe)..........(pac
13ea0	6b 61 67 65 2d 62 75 69 6c 64 2d 2d 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 72 63 70 20 22 67 69	kage-build--call-process.rcp."gi
13ec0	74 22 20 22 63 6c 65 61 6e 22 20 22 2d 66 22 20 22 2d 64 22 20 22 2d 78 22 29 29 0a 20 20 20 20	t"."clean"."-f"."-d"."-x")).....
13ee0	20 20 20 20 28 28 63 6c 2d 74 79 70 65 70 20 72 63 70 20 27 70 61 63 6b 61 67 65 2d 68 67 2d 72	....((cl-typep.rcp.'package-hg-r
13f00	65 63 69 70 65 29 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 4d 65 72 63 75 72 69 61 6c 27 73 20 69	ecipe)..........;;.Mercurial's.i
13f20	6e 74 65 72 66 61 63 65 20 69 73 20 73 6f 20 6d 75 63 68 20 62 65 74 74 65 72 20 74 68 61 6e 20	nterface.is.so.much.better.than.
13f40	47 69 74 27 73 2c 20 74 68 65 79 20 73 61 69 64 2e 0a 20 20 20 20 20 20 20 20 20 28 77 69 74 68	Git's,.they.said...........(with
13f60	2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 63 65 73 73	-temp-buffer............(process
13f80	2d 66 69 6c 65 20 22 68 67 22 20 6e 69 6c 20 74 20 6e 69 6c 20 22 73 74 61 74 75 73 22 20 22 2d	-file."hg".nil.t.nil."status"."-
13fa0	2d 6e 6f 2d 73 74 61 74 75 73 22 20 22 2d 2d 75 6e 6b 6e 6f 77 6e 22 20 22 2d 30 22 29 0a 20 20	-no-status"."--unknown"."-0")...
13fc0	20 20 20 20 20 20 20 20 20 28 6d 61 70 63 20 23 27 64 65 6c 65 74 65 2d 66 69 6c 65 20 28 73 70	.........(mapc.#'delete-file.(sp
13fe0	6c 69 74 2d 73 74 72 69 6e 67 20 28 62 75 66 66 65 72 2d 73 74 72 69 6e 67 29 20 22 5c 30 22 20	lit-string.(buffer-string)."\0".
14000	74 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a	t)))..........(with-temp-buffer.
14020	20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 63 65 73 73 2d 66 69 6c 65 20 22 68 67 22 20 6e 69	...........(process-file."hg".ni
14040	6c 20 74 20 6e 69 6c 20 22 73 74 61 74 75 73 22 20 22 2d 2d 6e 6f 2d 73 74 61 74 75 73 22 20 22	l.t.nil."status"."--no-status"."
14060	2d 2d 69 67 6e 6f 72 65 64 22 20 22 2d 30 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70	--ignored"."-0")............(map
14080	63 20 23 27 64 65 6c 65 74 65 2d 66 69 6c 65 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 28 62	c.#'delete-file.(split-string.(b
140a0	75 66 66 65 72 2d 73 74 72 69 6e 67 29 20 22 5c 30 22 20 74 29 29 29 0a 20 20 20 20 20 20 20 20	uffer-string)."\0".t))).........
140c0	20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 72 63	.(package-build--call-process.rc
140e0	70 20 22 68 67 22 20 22 70 75 72 67 65 22 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f	p."hg"."purge"))))..;;;###autolo
14100	61 64 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 61 6c 6c 20 28 29 0a 20	ad.(defun.package-build-all.()..
14120	20 22 42 75 69 6c 64 20 61 20 70 61 63 6b 61 67 65 20 66 6f 72 20 65 61 63 68 20 6f 66 20 74 68	."Build.a.package.for.each.of.th
14140	65 20 61 76 61 69 6c 61 62 6c 65 20 72 65 63 69 70 65 73 2e 0a 49 66 20 60 70 61 63 6b 61 67 65	e.available.recipes..If.`package
14160	2d 62 75 69 6c 64 2d 70 72 65 64 69 63 61 74 65 2d 66 75 6e 63 74 69 6f 6e 27 20 69 73 20 6e 6f	-build-predicate-function'.is.no
14180	6e 2d 6e 69 6c 2c 20 74 68 65 6e 20 6f 6e 6c 79 0a 70 61 63 6b 61 67 65 73 20 66 6f 72 20 77 68	n-nil,.then.only.packages.for.wh
141a0	69 63 68 20 74 68 61 74 20 72 65 74 75 72 6e 73 20 6e 6f 6e 2d 6e 69 6c 20 61 72 65 20 62 75 69	ich.that.returns.non-nil.are.bui
141c0	6c 64 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 2a 20 28 28 73	ld."...(interactive)...(let*.((s
141e0	74 61 72 74 20 28 63 75 72 72 65 6e 74 2d 74 69 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 72	tart.(current-time))..........(r
14200	65 63 69 70 65 73 20 28 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 72 65 63 69 70 65 73 29 29	ecipes.(package-recipe-recipes))
14220	0a 20 20 20 20 20 20 20 20 20 28 74 6f 74 61 6c 20 28 6c 65 6e 67 74 68 20 72 65 63 69 70 65 73	..........(total.(length.recipes
14240	29 29 0a 20 20 20 20 20 20 20 20 20 28 73 75 63 63 65 73 73 20 30 29 0a 20 20 20 20 20 20 20 20	))..........(success.0).........
14260	20 73 6b 69 70 70 65 64 20 69 6e 76 61 6c 69 64 20 66 61 69 6c 65 64 29 0a 20 20 20 20 28 64 6f	.skipped.invalid.failed).....(do
14280	6c 69 73 74 20 28 6e 61 6d 65 20 72 65 63 69 70 65 73 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28	list.(name.recipes).......(let.(
142a0	28 72 63 70 20 28 77 69 74 68 2d 64 65 6d 6f 74 65 64 2d 65 72 72 6f 72 73 20 22 52 65 63 69 70	(rcp.(with-demoted-errors."Recip
142c0	65 20 65 72 72 6f 72 3a 20 25 53 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	e.error:.%S"....................
142e0	28 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 6c 6f 6f 6b 75 70 20 6e 61 6d 65 29 29 29 29 0a	(package-recipe-lookup.name)))).
14300	20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 6e 6f 74 20 72 63 70 29 0a 20 20 20 20 20 20 20	........(cond.((not.rcp)........
14320	20 20 20 20 20 20 20 20 28 70 75 73 68 20 6e 61 6d 65 20 69 6e 76 61 6c 69 64 29 29 0a 20 20 20	........(push.name.invalid))....
14340	20 20 20 20 20 20 20 20 20 20 20 28 28 61 6e 64 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 70	...........((and.package-build-p
14360	72 65 64 69 63 61 74 65 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	redicate-function...............
14380	20 20 20 20 20 20 28 6e 6f 74 20 28 66 75 6e 63 61 6c 6c 20 70 61 63 6b 61 67 65 2d 62 75 69 6c	......(not.(funcall.package-buil
143a0	64 2d 70 72 65 64 69 63 61 74 65 2d 66 75 6e 63 74 69 6f 6e 20 72 63 70 29 29 29 0a 20 20 20 20	d-predicate-function.rcp))).....
143c0	20 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 6e 61 6d 65 20 73 6b 69 70 70 65 64 29 29 0a	...........(push.name.skipped)).
143e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 77 69 74 68 2d 64 65 6d 6f 74 65 64 2d 65 72 72	..............((with-demoted-err
14400	6f 72 73 20 22 42 75 69 6c 64 20 65 72 72 6f 72 3a 20 25 53 22 0a 20 20 20 20 20 20 20 20 20 20	ors."Build.error:.%S"...........
14420	20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 61 72 63 68 69 76 65 20 6e 61	.......(package-build-archive.na
14440	6d 65 29 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 69 6e 63 66 20 73	me).t)................(cl-incf.s
14460	75 63 63 65 73 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 70 75 73 68 20 6e 61	uccess))...............((push.na
14480	6d 65 20 66 61 69 6c 65 64 29 29 29 29 29 0a 20 20 20 20 28 6c 65 74 20 28 28 64 75 72 61 74 69	me.failed))))).....(let.((durati
144a0	6f 6e 20 28 2f 20 28 66 6c 6f 61 74 2d 74 69 6d 65 20 28 74 69 6d 65 2d 73 75 62 74 72 61 63 74	on.(/.(float-time.(time-subtract
144c0	20 28 63 75 72 72 65 6e 74 2d 74 69 6d 65 29 20 73 74 61 72 74 29 29 20 36 30 29 29 29 0a 20 20	.(current-time).start)).60)))...
144e0	20 20 20 20 28 69 66 20 28 6e 6f 74 20 28 6f 72 20 73 6b 69 70 70 65 64 20 69 6e 76 61 6c 69 64	....(if.(not.(or.skipped.invalid
14500	20 66 61 69 6c 65 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 53 75	.failed))...........(message."Su
14520	63 63 65 73 73 66 75 6c 6c 79 20 62 75 69 6c 74 20 61 6c 6c 20 25 73 20 70 61 63 6b 61 67 65 73	ccessfully.built.all.%s.packages
14540	20 28 25 2e 30 66 6d 29 22 20 74 6f 74 61 6c 20 64 75 72 61 74 69 6f 6e 29 0a 20 20 20 20 20 20	.(%.0fm)".total.duration).......
14560	20 20 28 6d 65 73 73 61 67 65 20 22 53 75 63 63 65 73 73 66 75 6c 6c 79 20 62 75 69 6c 74 20 25	..(message."Successfully.built.%
14580	69 20 6f 66 20 25 73 20 70 61 63 6b 61 67 65 73 20 28 25 2e 30 66 6d 29 22 0a 20 20 20 20 20 20	i.of.%s.packages.(%.0fm)".......
145a0	20 20 20 20 20 20 20 20 20 20 20 73 75 63 63 65 73 73 20 74 6f 74 61 6c 20 64 75 72 61 74 69 6f	...........success.total.duratio
145c0	6e 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 73 6b 69 70 70 65 64 0a 20 20 20 20 20 20 20	n).........(when.skipped........
145e0	20 20 20 28 6d 65 73 73 61 67 65 20 22 53 6b 69 70 70 65 64 20 25 69 20 70 61 63 6b 61 67 65 73	...(message."Skipped.%i.packages
14600	3a 5c 6e 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 6e 67 74	:\n%s"....................(lengt
14620	68 20 73 6b 69 70 70 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d	h.skipped)....................(m
14640	61 70 63 6f 6e 63 61 74 20 28 6c 61 6d 62 64 61 20 28 6e 29 20 28 63 6f 6e 63 61 74 20 22 20 20	apconcat.(lambda.(n).(concat."..
14660	22 20 6e 29 29 20 28 6e 72 65 76 65 72 73 65 20 73 6b 69 70 70 65 64 29 20 22 5c 6e 22 29 29 29	".n)).(nreverse.skipped)."\n")))
14680	0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 69 6e 76 61 6c 69 64 0a 20 20 20 20 20 20 20 20 20	.........(when.invalid..........
146a0	20 28 6d 65 73 73 61 67 65 20 22 44 69 64 20 6e 6f 74 20 62 75 69 6c 74 20 70 61 63 6b 61 67 65	.(message."Did.not.built.package
146c0	73 20 66 6f 72 20 25 69 20 69 6e 76 61 6c 69 64 20 72 65 63 69 70 65 73 3a 5c 6e 25 73 22 0a 20	s.for.%i.invalid.recipes:\n%s"..
146e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 6e 67 74 68 20 69 6e 76 61 6c 69	..................(length.invali
14700	64 29 0a 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	d)....................(mapconcat
14720	20 28 6c 61 6d 62 64 61 20 28 6e 29 20 28 63 6f 6e 63 61 74 20 22 20 20 22 20 6e 29 29 20 28 6e	.(lambda.(n).(concat."..".n)).(n
14740	72 65 76 65 72 73 65 20 69 6e 76 61 6c 69 64 29 20 22 5c 6e 22 29 29 29 0a 20 20 20 20 20 20 20	reverse.invalid)."\n")))........
14760	20 28 77 68 65 6e 20 66 61 69 6c 65 64 0a 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65	.(when.failed...........(message
14780	20 22 42 75 69 6c 64 69 6e 67 20 25 69 20 70 61 63 6b 61 67 65 73 20 66 61 69 6c 65 64 3a 5c 6e	."Building.%i.packages.failed:\n
147a0	25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 6e 67 74 68 20 66	%s"....................(length.f
147c0	61 69 6c 65 64 29 0a 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	ailed)....................(mapco
147e0	6e 63 61 74 20 28 6c 61 6d 62 64 61 20 28 6e 29 20 28 63 6f 6e 63 61 74 20 22 20 20 22 20 6e 29	ncat.(lambda.(n).(concat."..".n)
14800	29 20 28 6e 72 65 76 65 72 73 65 20 66 61 69 6c 65 64 29 20 22 5c 6e 22 29 29 29 29 29 29 0a 20	).(nreverse.failed)."\n"))))))..
14820	20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 64 75 6d 70 2d 61 72 63 68 69 76 65 2d 63 6f 6e	.(package-build-dump-archive-con
14840	74 65 6e 74 73 29 29 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 63 6c	tents))..(defun.package-build-cl
14860	65 61 6e 75 70 20 28 29 0a 20 20 22 52 65 6d 6f 76 65 20 70 72 65 76 69 6f 75 73 6c 79 20 62 75	eanup.()..."Remove.previously.bu
14880	69 6c 74 20 70 61 63 6b 61 67 65 73 20 74 68 61 74 20 6e 6f 20 6c 6f 6e 67 65 72 20 68 61 76 65	ilt.packages.that.no.longer.have
148a0	20 72 65 63 69 70 65 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 70 61	.recipes."...(interactive)...(pa
148c0	63 6b 61 67 65 2d 62 75 69 6c 64 2d 64 75 6d 70 2d 61 72 63 68 69 76 65 2d 63 6f 6e 74 65 6e 74	ckage-build-dump-archive-content
148e0	73 29 29 0a 0a 3b 3b 3b 20 41 72 63 68 69 76 65 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65	s))..;;;.Archive..(defun.package
14900	2d 62 75 69 6c 64 2d 61 72 63 68 69 76 65 2d 61 6c 69 73 74 20 28 29 0a 20 20 22 52 65 74 75 72	-build-archive-alist.()..."Retur
14920	6e 20 74 68 65 20 61 72 63 68 69 76 65 20 63 6f 6e 74 65 6e 74 73 2c 20 77 69 74 68 6f 75 74 20	n.the.archive.contents,.without.
14940	75 70 64 61 74 69 6e 67 20 69 74 20 66 69 72 73 74 2e 22 0a 20 20 28 6c 65 74 20 28 28 66 69 6c	updating.it.first."...(let.((fil
14960	65 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 61 72 63 68 69 76 65 2d 63 6f 6e	e.(expand-file-name."archive-con
14980	74 65 6e 74 73 22 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 61 72 63 68 69 76 65 2d 64 69 72	tents".package-build-archive-dir
149a0	29 29 29 0a 20 20 20 20 28 61 6e 64 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 66 69 6c 65	))).....(and.(file-exists-p.file
149c0	29 0a 20 20 20 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	)..........(with-temp-buffer....
149e0	20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 2d 66 69 6c 65 2d 63 6f 6e 74 65 6e 74 73 20 66 69	........(insert-file-contents.fi
14a00	6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 64 72 20 28 72 65 61 64 20 28 63 75 72 72 65	le)............(cdr.(read.(curre
14a20	6e 74 2d 62 75 66 66 65 72 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65	nt-buffer)))))))..(defun.package
14a40	2d 62 75 69 6c 64 2d 64 75 6d 70 2d 61 72 63 68 69 76 65 2d 63 6f 6e 74 65 6e 74 73 20 28 26 6f	-build-dump-archive-contents.(&o
14a60	70 74 69 6f 6e 61 6c 20 66 69 6c 65 20 70 72 65 74 74 79 2d 70 72 69 6e 74 29 0a 20 20 22 55 70	ptional.file.pretty-print)..."Up
14a80	64 61 74 65 20 61 6e 64 20 72 65 74 75 72 6e 20 74 68 65 20 61 72 63 68 69 76 65 20 63 6f 6e 74	date.and.return.the.archive.cont
14aa0	65 6e 74 73 2e 0a 0a 55 70 64 61 74 65 20 66 69 6c 65 73 20 5c 22 61 72 63 68 69 76 65 2d 63 6f	ents...Update.files.\"archive-co
14ac0	6e 74 65 6e 74 73 5c 22 20 61 6e 64 20 5c 22 65 6c 70 61 2d 70 61 63 6b 61 67 65 73 2e 65 6c 64	ntents\".and.\"elpa-packages.eld
14ae0	5c 22 20 69 6e 0a 60 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 61 72 63 68 69 76 65 2d 64 69 72	\".in.`package-build-archive-dir
14b00	27 2e 20 20 49 66 20 6f 70 74 69 6f 6e 61 6c 20 46 49 4c 45 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c	'...If.optional.FILE.is.non-nil,
14b20	0a 75 73 65 20 74 68 61 74 20 74 6f 20 73 74 6f 72 65 20 74 68 65 20 61 72 63 68 69 76 65 20 63	.use.that.to.store.the.archive.c
14b40	6f 6e 74 65 6e 74 73 20 61 6e 64 20 70 6c 61 63 65 20 74 68 65 20 73 65 63 6f 6e 64 0a 66 69 6c	ontents.and.place.the.second.fil
14b60	65 20 6e 65 78 74 20 74 6f 20 69 74 2e 0a 0a 49 66 20 6f 70 74 69 6f 6e 61 6c 20 50 52 45 54 54	e.next.to.it...If.optional.PRETT
14b80	59 2d 50 52 49 4e 54 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 74 68 65 6e 20 70 72 65 74 74 79 2d	Y-PRINT.is.non-nil,.then.pretty-
14ba0	70 72 69 6e 74 0a 5c 22 61 72 63 68 69 76 65 2d 63 6f 6e 74 65 6e 74 73 5c 22 20 69 6e 73 74 65	print.\"archive-contents\".inste
14bc0	61 64 20 6f 66 20 75 73 69 6e 67 20 6f 6e 65 20 6c 69 6e 65 20 70 65 72 20 65 6e 74 72 79 2e 0a	ad.of.using.one.line.per.entry..
14be0	5c 22 65 6c 70 61 2d 70 61 63 6b 61 67 65 73 2e 65 6c 64 5c 22 20 61 6c 77 61 79 73 20 75 73 65	\"elpa-packages.eld\".always.use
14c00	73 20 6f 6e 65 20 6c 69 6e 65 20 70 65 72 20 65 6e 74 72 79 2e 22 0a 20 20 28 6c 65 74 20 28 28	s.one.line.per.entry."...(let.((
14c20	64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d	default-directory.package-build-
14c40	61 72 63 68 69 76 65 2d 64 69 72 29 0a 20 20 20 20 20 20 20 20 28 65 6e 74 72 69 65 73 20 6e 69	archive-dir).........(entries.ni
14c60	6c 29 0a 20 20 20 20 20 20 20 20 28 76 63 2d 70 6b 67 73 20 6e 69 6c 29 29 0a 20 20 20 20 28 64	l).........(vc-pkgs.nil)).....(d
14c80	6f 6c 69 73 74 20 28 66 69 6c 65 20 28 73 6f 72 74 20 28 64 69 72 65 63 74 6f 72 79 2d 66 69 6c	olist.(file.(sort.(directory-fil
14ca0	65 73 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 74 20 22 2e 2a 5c 5c 2e 65 6e 74	es.default-directory.t.".*\\.ent
14cc0	72 79 5c 5c 27 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	ry\\'").........................
14ce0	3b 3b 20 53 6f 72 74 20 6d 6f 72 65 20 72 65 63 65 6e 74 6c 79 20 62 75 69 6c 64 20 70 61 63 6b	;;.Sort.more.recently.build.pack
14d00	61 67 65 73 20 66 69 72 73 74 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ages.first......................
14d20	20 20 20 20 23 27 66 69 6c 65 2d 6e 65 77 65 72 2d 74 68 61 6e 2d 66 69 6c 65 2d 70 29 29 0a 20	....#'file-newer-than-file-p))..
14d40	20 20 20 20 20 28 6c 65 74 2a 20 28 28 65 6e 74 72 79 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75	.....(let*.((entry.(with-temp-bu
14d60	66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65	ffer.......................(inse
14d80	72 74 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 20 20 20 20 20	rt-file-contents.file)..........
14da0	20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 61 64 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66	.............(read.(current-buff
14dc0	65 72 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 79 6d 62 6f 6c 20 28 63 61 72	er))))..............(symbol.(car
14de0	20 65 6e 74 72 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 61 6d 65 20 28 73 79 6d	.entry))..............(name.(sym
14e00	62 6f 6c 2d 6e 61 6d 65 20 73 79 6d 62 6f 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28	bol-name.symbol))..............(
14e20	6f 75 74 64 61 74 65 64 20 28 61 73 73 71 20 73 79 6d 62 6f 6c 20 65 6e 74 72 69 65 73 29 29 29	outdated.(assq.symbol.entries)))
14e40	0a 20 20 20 20 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 20 20 20 20 28 28 6e 6f 74 20 28 66	.........(cond..........((not.(f
14e60	69 6c 65 2d 65 78 69 73 74 73 2d 70 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 6e	ile-exists-p.(expand-file-name.n
14e80	61 6d 65 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 72 65 63 69 70 65 73 2d 64 69 72 29 29 29	ame.package-build-recipes-dir)))
14ea0	0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 52 65 63 69 70 65 20 63 6f 72 72 65 73 70 6f 6e 64 69	...........;;.Recipe.correspondi
14ec0	6e 67 20 74 6f 20 74 68 69 73 20 65 6e 74 72 79 20 6e 6f 20 6c 6f 6e 67 65 72 20 65 78 69 73 74	ng.to.this.entry.no.longer.exist
14ee0	73 2e 0a 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 72 65 6d	s............(package-build--rem
14f00	6f 76 65 2d 61 72 63 68 69 76 65 2d 66 69 6c 65 73 20 65 6e 74 72 79 29 29 0a 20 20 20 20 20 20	ove-archive-files.entry)).......
14f20	20 20 20 28 6f 75 74 64 61 74 65 64 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 50 72 65 66 65 72	...(outdated...........;;.Prefer
14f40	20 74 68 65 20 6d 6f 72 65 20 72 65 63 65 6e 74 6c 79 20 62 75 69 6c 74 20 70 61 63 6b 61 67 65	.the.more.recently.built.package
14f60	2c 20 77 68 69 63 68 20 6d 61 79 20 6e 6f 74 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6e 65 63	,.which.may.not...........;;.nec
14f80	65 73 73 61 72 69 6c 79 20 68 61 76 65 20 74 68 65 20 68 69 67 68 65 73 74 20 76 65 72 73 69 6f	essarily.have.the.highest.versio
14fa0	6e 20 6e 75 6d 62 65 72 2c 20 65 2e 67 2e 2c 20 69 66 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20	n.number,.e.g.,.if...........;;.
14fc0	63 6f 6d 6d 69 74 20 68 69 73 74 6f 72 69 65 73 20 77 65 72 65 20 63 68 61 6e 67 65 64 2e 0a 20	commit.histories.were.changed...
14fe0	20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 72 65 6d 6f 76 65 2d	.........(package-build--remove-
15000	61 72 63 68 69 76 65 2d 66 69 6c 65 73 20 65 6e 74 72 79 29 29 0a 20 20 20 20 20 20 20 20 20 28	archive-files.entry))..........(
15020	74 0a 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 65 6e 74 72 79 20 65 6e 74 72 69 65 73 29	t...........(push.entry.entries)
15040	0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 5b 4e 6f 6e 5d 47 4e 55 20 45 4c 50 41 20 72 65 63 69	...........;;.[Non]GNU.ELPA.reci
15060	70 65 73 20 61 72 65 20 6e 6f 74 20 63 6f 6d 70 61 74 69 62 6c 65 20 77 69 74 68 20 4d 65 6c 70	pes.are.not.compatible.with.Melp
15080	61 20 72 65 63 69 70 65 73 2e 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 53 65 65 20 61 72 6f 75	a.recipes............;;.See.arou
150a0	6e 64 20 6f 63 63 75 72 72 65 6e 63 65 73 20 6f 66 20 22 70 6b 67 2d 73 70 65 63 22 20 69 6e 20	nd.occurrences.of."pkg-spec".in.
150c0	22 70 61 63 6b 61 67 65 2d 76 63 2e 65 6c 22 3b 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 73 65	"package-vc.el";...........;;.se
150e0	63 74 69 6f 6e 20 22 53 70 65 63 69 66 69 63 61 74 69 6f 6e 73 20 28 65 6c 70 61 2d 70 61 63 6b	ction."Specifications.(elpa-pack
15100	61 67 65 73 29 22 20 69 6e 20 22 52 45 41 44 4d 45 22 20 6f 66 20 74 68 65 0a 20 20 20 20 20 20	ages)".in."README".of.the.......
15120	20 20 20 20 3b 3b 20 22 65 6c 70 61 2d 61 64 6d 69 6e 22 20 62 72 61 6e 63 68 20 69 6e 20 22 65	....;;."elpa-admin".branch.in."e
15140	6d 61 63 73 2f 65 6c 70 61 2e 67 69 74 22 20 72 65 70 6f 73 69 74 6f 72 79 3b 20 61 6e 64 20 61	macs/elpa.git".repository;.and.a
15160	6c 73 6f 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 60 65 6c 70 61 61 2d 2d 73 75 70 70 6f 72 74	lso...........;;.`elpaa--support
15180	65 64 2d 6b 65 79 77 6f 72 64 73 27 20 61 6e 64 20 60 65 6c 70 61 61 2d 2d 70 75 62 6c 69 73 68	ed-keywords'.and.`elpaa--publish
151a0	2d 70 61 63 6b 61 67 65 2d 73 70 65 63 27 2e 0a 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 2d 6c	-package-spec'............(and-l
151c0	65 74 2a 20 28 28 72 65 63 69 70 65 20 28 77 69 74 68 2d 64 65 6d 6f 74 65 64 2d 65 72 72 6f 72	et*.((recipe.(with-demoted-error
151e0	73 20 22 52 65 63 69 70 65 20 65 72 72 6f 72 3a 20 25 53 22 0a 20 20 20 20 20 20 20 20 20 20 20	s."Recipe.error:.%S"............
15200	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 72 65 63	....................(package-rec
15220	69 70 65 2d 6c 6f 6f 6b 75 70 20 6e 61 6d 65 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	ipe-lookup.name)))).............
15240	28 70 75 73 68 20 60 28 2c 73 79 6d 62 6f 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	(push.`(,symbol.................
15260	20 20 20 20 3a 75 72 6c 20 2c 28 6f 72 65 66 20 72 65 63 69 70 65 20 75 72 6c 29 0a 20 20 20 20	....:url.,(oref.recipe.url).....
15280	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 40 28 61 6e 64 20 28 63 6c 2d 74 79 70 65 70	................,@(and.(cl-typep
152a0	20 72 65 63 69 70 65 20 27 70 61 63 6b 61 67 65 2d 68 67 2d 72 65 63 69 70 65 29 0a 20 20 20 20	.recipe.'package-hg-recipe).....
152c0	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 20 3a 76 63	.......................(list.:vc
152e0	2d 62 61 63 6b 65 6e 64 20 27 48 67 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	-backend.'Hg))..................
15300	20 20 20 2c 40 28 61 6e 64 2d 6c 65 74 2a 20 28 28 62 72 61 6e 63 68 20 28 6f 72 65 66 20 72 65	...,@(and-let*.((branch.(oref.re
15320	63 69 70 65 20 62 72 61 6e 63 68 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	cipe.branch)))..................
15340	20 20 20 20 20 20 20 28 6c 69 73 74 20 3a 62 72 61 6e 63 68 20 62 72 61 6e 63 68 29 29 29 0a 20	.......(list.:branch.branch)))..
15360	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 76 63 2d 70 6b 67 73 29 29 29 29 29 29 0a 20	.................vc-pkgs))))))..
15380	20 20 20 28 73 65 74 71 20 65 6e 74 72 69 65 73 20 28 63 6c 2d 73 6f 72 74 20 65 6e 74 72 69 65	...(setq.entries.(cl-sort.entrie
153a0	73 20 23 27 73 74 72 69 6e 67 3c 20 3a 6b 65 79 20 23 27 63 61 72 29 29 0a 20 20 20 20 28 77 69	s.#'string<.:key.#'car)).....(wi
153c0	74 68 2d 74 65 6d 70 2d 66 69 6c 65 20 28 6f 72 20 66 69 6c 65 20 28 65 78 70 61 6e 64 2d 66 69	th-temp-file.(or.file.(expand-fi
153e0	6c 65 2d 6e 61 6d 65 20 22 61 72 63 68 69 76 65 2d 63 6f 6e 74 65 6e 74 73 22 29 29 0a 20 20 20	le-name."archive-contents"))....
15400	20 20 20 28 6c 65 74 20 28 28 70 72 69 6e 74 2d 6c 65 76 65 6c 20 6e 69 6c 29 0a 20 20 20 20 20	...(let.((print-level.nil)......
15420	20 20 20 20 20 20 20 28 70 72 69 6e 74 2d 6c 65 6e 67 74 68 20 6e 69 6c 29 29 0a 20 20 20 20 20	.......(print-length.nil))......
15440	20 20 20 28 69 66 20 70 72 65 74 74 79 2d 70 72 69 6e 74 0a 20 20 20 20 20 20 20 20 20 20 20 20	...(if.pretty-print.............
15460	28 70 70 20 28 63 6f 6e 73 20 31 20 65 6e 74 72 69 65 73 29 20 28 63 75 72 72 65 6e 74 2d 62 75	(pp.(cons.1.entries).(current-bu
15480	66 66 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 28 31 22 29 0a 20	ffer))...........(insert."(1")..
154a0	20 20 20 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 65 6e 74 72 79 20 65 6e 74 72 69 65 73 29	.........(dolist.(entry.entries)
154c0	0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 65 77 6c 69 6e 65 29 0a 20 20 20 20 20 20 20 20 20	.............(newline)..........
154e0	20 20 20 28 69 6e 73 65 72 74 20 22 20 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 69	...(insert.".").............(pri
15500	6e 31 20 65 6e 74 72 79 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20 20	n1.entry.(current-buffer))).....
15520	20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 29 5c 6e 22 29 29 29 29 0a 20 20 20 20 28 73 65 74	......(insert.")\n")))).....(set
15540	71 20 76 63 2d 70 6b 67 73 20 28 63 6c 2d 73 6f 72 74 20 76 63 2d 70 6b 67 73 20 23 27 73 74 72	q.vc-pkgs.(cl-sort.vc-pkgs.#'str
15560	69 6e 67 3c 20 3a 6b 65 79 20 23 27 63 61 72 29 29 0a 20 20 20 20 28 77 69 74 68 2d 74 65 6d 70	ing<.:key.#'car)).....(with-temp
15580	2d 66 69 6c 65 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 65 6c 70 61 2d 70 61	-file.(expand-file-name."elpa-pa
155a0	63 6b 61 67 65 73 2e 65 6c 64 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ckages.eld".....................
155c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 66 69 6c 65 20 28 66 69 6c	..................(and.file.(fil
155e0	65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 72 65 63 74 6f 72 79 20 66 69 6c 65 29 29 29 0a 20 20 20 20	e-name-nondirectory.file))).....
15600	20 20 28 6c 65 74 20 28 28 70 72 69 6e 74 2d 6c 65 76 65 6c 20 6e 69 6c 29 0a 20 20 20 20 20 20	..(let.((print-level.nil).......
15620	20 20 20 20 20 20 28 70 72 69 6e 74 2d 6c 65 6e 67 74 68 20 6e 69 6c 29 29 0a 20 20 20 20 20 20	......(print-length.nil)).......
15640	20 20 28 69 6e 73 65 72 74 20 22 28 28 22 29 0a 20 20 20 20 20 20 20 20 28 70 72 69 6e 31 20 28	..(insert."((").........(prin1.(
15660	63 61 72 20 76 63 2d 70 6b 67 73 29 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 0a 20	car.vc-pkgs).(current-buffer))..
15680	20 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 65 6e 74 72 79 20 28 63 64 72 20 76 63 2d 70 6b	.......(dolist.(entry.(cdr.vc-pk
156a0	67 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6e 65 77 6c 69 6e 65 29 0a 20 20 20 20 20 20 20	gs))...........(newline)........
156c0	20 20 20 28 69 6e 73 65 72 74 20 22 20 20 22 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 72 69 6e	...(insert."..")...........(prin
156e0	31 20 65 6e 74 72 79 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	1.entry.(current-buffer)))......
15700	20 20 20 28 69 6e 73 65 72 74 20 22 29 5c 6e 20 3a 76 65 72 73 69 6f 6e 20 31 20 3a 64 65 66 61	...(insert.")\n.:version.1.:defa
15720	75 6c 74 2d 76 63 20 47 69 74 29 5c 6e 22 29 29 29 0a 20 20 20 20 65 6e 74 72 69 65 73 29 29 0a	ult-vc.Git)\n"))).....entries)).
15740	0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 72 65 6d 6f 76 65 2d 61 72	.(defun.package-build--remove-ar
15760	63 68 69 76 65 2d 66 69 6c 65 73 20 28 61 72 63 68 69 76 65 2d 65 6e 74 72 79 29 0a 20 20 22 52	chive-files.(archive-entry)..."R
15780	65 6d 6f 76 65 20 74 68 65 20 65 6e 74 72 79 20 61 6e 64 20 61 72 63 68 69 76 65 20 66 69 6c 65	emove.the.entry.and.archive.file
157a0	20 66 6f 72 20 41 52 43 48 49 56 45 2d 45 4e 54 52 59 2e 22 0a 20 20 28 70 61 63 6b 61 67 65 2d	.for.ARCHIVE-ENTRY."...(package-
157c0	62 75 69 6c 64 2d 2d 6d 65 73 73 61 67 65 20 22 52 65 6d 6f 76 69 6e 67 20 61 72 63 68 69 76 65	build--message."Removing.archive
157e0	3a 20 25 73 2d 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	:.%s-%s"........................
15800	20 20 20 28 63 61 72 20 61 72 63 68 69 76 65 2d 65 6e 74 72 79 29 0a 20 20 20 20 20 20 20 20 20	...(car.archive-entry)..........
15820	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 76 65 72 73 69 6f	.................(package-versio
15840	6e 2d 6a 6f 69 6e 20 28 61 72 65 66 20 28 63 64 72 20 61 72 63 68 69 76 65 2d 65 6e 74 72 79 29	n-join.(aref.(cdr.archive-entry)
15860	20 30 29 29 29 0a 20 20 28 6c 65 74 20 28 28 66 69 6c 65 20 28 70 61 63 6b 61 67 65 2d 62 75 69	.0)))...(let.((file.(package-bui
15880	6c 64 2d 2d 61 72 74 69 66 61 63 74 2d 66 69 6c 65 20 61 72 63 68 69 76 65 2d 65 6e 74 72 79 29	ld--artifact-file.archive-entry)
158a0	29 29 0a 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 66 69 6c 65	)).....(when.(file-exists-p.file
158c0	29 0a 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 66 69 6c 65 20 66 69 6c 65 29 29 29 0a 20 20 28	).......(delete-file.file)))...(
158e0	6c 65 74 20 28 28 66 69 6c 65 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 61 72 63 68 69	let.((file.(package-build--archi
15900	76 65 2d 65 6e 74 72 79 2d 66 69 6c 65 20 61 72 63 68 69 76 65 2d 65 6e 74 72 79 29 29 29 0a 20	ve-entry-file.archive-entry)))..
15920	20 20 20 28 77 68 65 6e 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 66 69 6c 65 29 0a 20 20	...(when.(file-exists-p.file)...
15940	20 20 20 20 28 64 65 6c 65 74 65 2d 66 69 6c 65 20 66 69 6c 65 29 29 29 29 0a 0a 28 64 65 66 75	....(delete-file.file))))..(defu
15960	6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 61 72 74 69 66 61 63 74 2d 66 69 6c 65 20 28	n.package-build--artifact-file.(
15980	61 72 63 68 69 76 65 2d 65 6e 74 72 79 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 61 72 74	archive-entry)..."Return.the.art
159a0	69 66 61 63 74 20 66 69 6c 65 20 66 6f 72 20 74 68 65 20 70 61 63 6b 61 67 65 20 73 70 65 63 69	ifact.file.for.the.package.speci
159c0	66 69 65 64 20 62 79 20 41 52 43 48 49 56 45 2d 45 4e 54 52 59 2e 0a 54 68 69 73 20 69 73 20 65	fied.by.ARCHIVE-ENTRY..This.is.e
159e0	69 74 68 65 72 20 61 20 74 61 72 62 61 6c 6c 20 6f 72 20 61 6e 20 45 6c 69 73 70 20 66 69 6c 65	ither.a.tarball.or.an.Elisp.file
15a00	2e 22 0a 20 20 28 70 63 61 73 65 2d 6c 65 74 2a 20 28 28 60 28 2c 6e 61 6d 65 20 2e 20 2c 64 65	."...(pcase-let*.((`(,name...,de
15a20	73 63 29 20 61 72 63 68 69 76 65 2d 65 6e 74 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	sc).archive-entry)..............
15a40	20 20 28 76 65 72 73 69 6f 6e 20 28 70 61 63 6b 61 67 65 2d 76 65 72 73 69 6f 6e 2d 6a 6f 69 6e	..(version.(package-version-join
15a60	20 28 61 72 65 66 20 64 65 73 63 20 30 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.(aref.desc.0)))................
15a80	28 66 6c 61 76 6f 75 72 20 28 61 72 65 66 20 64 65 73 63 20 33 29 29 29 0a 20 20 20 20 28 65 78	(flavour.(aref.desc.3))).....(ex
15aa0	70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 0a 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 2d	pand-file-name......(format."%s-
15ac0	25 73 2e 25 73 22 20 6e 61 6d 65 20 76 65 72 73 69 6f 6e 20 28 69 66 20 28 65 71 20 66 6c 61 76	%s.%s".name.version.(if.(eq.flav
15ae0	6f 75 72 20 27 73 69 6e 67 6c 65 29 20 22 65 6c 22 20 22 74 61 72 22 29 29 0a 20 20 20 20 20 70	our.'single)."el"."tar"))......p
15b00	61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 61 72 63 68 69 76 65 2d 64 69 72 29 29 29 0a 0a 28 64 65	ackage-build-archive-dir)))..(de
15b20	66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 61 72 63 68 69 76 65 2d 65 6e 74 72 79	fun.package-build--archive-entry
15b40	2d 66 69 6c 65 20 28 61 72 63 68 69 76 65 2d 65 6e 74 72 79 29 0a 20 20 22 52 65 74 75 72 6e 20	-file.(archive-entry)..."Return.
15b60	74 68 65 20 66 69 6c 65 20 69 6e 20 77 68 69 63 68 20 41 52 43 48 49 56 45 2d 45 4e 54 52 59 20	the.file.in.which.ARCHIVE-ENTRY.
15b80	73 68 6f 75 6c 64 20 62 65 20 73 74 6f 72 65 64 2e 0a 41 52 43 48 49 56 45 2d 45 4e 54 52 59 20	should.be.stored..ARCHIVE-ENTRY.
15ba0	63 6f 6e 74 61 69 6e 73 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 61 62 6f 75 74 20 61 20 73 70 65	contains.information.about.a.spe
15bc0	63 69 66 69 63 20 76 65 72 73 69 6f 6e 20 6f 66 0a 61 20 70 61 63 6b 61 67 65 2e 22 0a 20 20 28	cific.version.of.a.package."...(
15be0	70 63 61 73 65 2d 6c 65 74 2a 20 28 28 60 28 2c 6e 61 6d 65 20 2e 20 2c 64 65 73 63 29 20 61 72	pcase-let*.((`(,name...,desc).ar
15c00	63 68 69 76 65 2d 65 6e 74 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 76 65 72	chive-entry)................(ver
15c20	73 69 6f 6e 20 28 70 61 63 6b 61 67 65 2d 76 65 72 73 69 6f 6e 2d 6a 6f 69 6e 20 28 61 72 65 66	sion.(package-version-join.(aref
15c40	20 64 65 73 63 20 30 29 29 29 29 0a 20 20 20 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d	.desc.0)))).....(expand-file-nam
15c60	65 0a 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 2d 25 73 2e 65 6e 74 72 79 22 20 6e 61 6d	e......(format."%s-%s.entry".nam
15c80	65 20 76 65 72 73 69 6f 6e 29 0a 20 20 20 20 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 61 72	e.version)......package-build-ar
15ca0	63 68 69 76 65 2d 64 69 72 29 29 29 0a 0a 3b 3b 3b 20 4a 73 6f 6e 20 45 78 70 6f 72 74 73 0a 0a	chive-dir)))..;;;.Json.Exports..
15cc0	28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 72 65 63 69 70 65 2d 61 6c 69 73	(defun.package-build-recipe-alis
15ce0	74 2d 61 73 2d 6a 73 6f 6e 20 28 66 69 6c 65 29 0a 20 20 22 44 75 6d 70 20 74 68 65 20 72 65 63	t-as-json.(file)..."Dump.the.rec
15d00	69 70 65 20 6c 69 73 74 20 74 6f 20 46 49 4c 45 20 61 73 20 6a 73 6f 6e 2e 22 0a 20 20 28 69 6e	ipe.list.to.FILE.as.json."...(in
15d20	74 65 72 61 63 74 69 76 65 20 22 46 44 75 6d 70 20 6a 73 6f 6e 20 74 6f 20 66 69 6c 65 3a 20 22	teractive."FDump.json.to.file:."
15d40	29 0a 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 66 69 6c 65 20 66 69 6c 65 0a 20 20 20 20 28 69 6e	)...(with-temp-file.file.....(in
15d60	73 65 72 74 0a 20 20 20 20 20 28 6a 73 6f 6e 2d 65 6e 63 6f 64 65 0a 20 20 20 20 20 20 28 6d 61	sert......(json-encode.......(ma
15d80	70 63 61 6e 0a 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	pcan........(lambda.(name)......
15da0	20 20 20 20 28 77 69 74 68 2d 64 65 6d 6f 74 65 64 2d 65 72 72 6f 72 73 20 22 52 65 63 69 70 65	....(with-demoted-errors."Recipe
15dc0	20 65 72 72 6f 72 3a 20 25 53 22 0a 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 70 61 63	.error:.%S"............(and.(pac
15de0	6b 61 67 65 2d 72 65 63 69 70 65 2d 6c 6f 6f 6b 75 70 20 6e 61 6d 65 29 0a 20 20 20 20 20 20 20	kage-recipe-lookup.name)........
15e00	20 20 20 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	.........(with-temp-buffer......
15e20	20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 2d 66 69 6c 65 2d 63 6f 6e 74 65 6e	.............(insert-file-conten
15e40	74 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 78 70 61 6e 64 2d 66 69	ts....................(expand-fi
15e60	6c 65 2d 6e 61 6d 65 20 6e 61 6d 65 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 72 65 63 69 70	le-name.name.package-build-recip
15e80	65 73 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 6c 65 74 20	es-dir))...................(let.
15ea0	28 28 65 78 70 20 28 72 65 61 64 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 29 0a	((exp.(read.(current-buffer)))).
15ec0	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 28 70 6c 69 73 74	....................(when.(plist
15ee0	2d 6d 65 6d 62 65 72 20 28 63 64 72 20 65 78 70 29 20 3a 66 69 6c 65 73 29 0a 20 20 20 20 20 20	-member.(cdr.exp).:files).......
15f00	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 28 63 64 72 20	................(plist-put.(cdr.
15f20	65 78 70 29 20 3a 66 69 6c 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	exp).:files.....................
15f40	20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 53 22 20 28 70 6c 69 73 74	.............(format."%S".(plist
15f60	2d 67 65 74 20 28 63 64 72 20 65 78 70 29 20 3a 66 69 6c 65 73 29 29 29 29 0a 20 20 20 20 20 20	-get.(cdr.exp).:files)))).......
15f80	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 65 78 70 29 29 29 29 29 29 0a 20 20	..............(list.exp))))))...
15fa0	20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 72 65 63 69 70 65 73 29 29 29 29	.....(package-recipe-recipes))))
15fc0	29 29 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 70 6b 67 2d 69 6e	))..(defun.package-build--pkg-in
15fe0	66 6f 2d 66 6f 72 2d 6a 73 6f 6e 20 28 69 6e 66 6f 29 0a 20 20 22 43 6f 6e 76 65 72 74 20 49 4e	fo-for-json.(info)..."Convert.IN
16000	46 4f 20 73 6f 20 74 68 61 74 20 69 74 20 63 61 6e 20 62 65 20 73 65 72 69 61 6c 69 7a 65 20 74	FO.so.that.it.can.be.serialize.t
16020	6f 20 4a 53 4f 4e 20 69 6e 20 74 68 65 20 64 65 73 69 72 65 64 20 73 68 61 70 65 2e 22 0a 20 20	o.JSON.in.the.desired.shape."...
16040	28 70 63 61 73 65 2d 6c 65 74 20 28 28 60 28 2c 76 65 72 20 2c 64 65 70 73 20 2c 64 65 73 63 20	(pcase-let.((`(,ver.,deps.,desc.
16060	2c 74 79 70 65 20 2e 20 28 2c 70 72 6f 70 73 29 29 20 28 61 70 70 65 6e 64 20 69 6e 66 6f 20 6e	,type...(,props)).(append.info.n
16080	69 6c 29 29 29 0a 20 20 20 20 28 6c 69 73 74 20 3a 76 65 72 20 76 65 72 0a 20 20 20 20 20 20 20	il))).....(list.:ver.ver........
160a0	20 20 20 3a 64 65 70 73 20 28 6d 61 70 63 61 6e 20 28 6c 61 6d 62 64 61 20 28 64 65 70 29 0a 20	...:deps.(mapcan.(lambda.(dep)..
160c0	20 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 20 28	.........................(list.(
160e0	69 6e 74 65 72 6e 20 28 66 6f 72 6d 61 74 20 22 3a 25 73 22 20 28 63 61 72 20 64 65 70 29 29 29	intern.(format.":%s".(car.dep)))
16100	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	................................
16120	20 28 63 61 64 72 20 64 65 70 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.(cadr.dep)))...................
16140	20 20 20 20 20 20 64 65 70 73 29 0a 20 20 20 20 20 20 20 20 20 20 3a 64 65 73 63 20 64 65 73 63	......deps)...........:desc.desc
16160	0a 20 20 20 20 20 20 20 20 20 20 3a 74 79 70 65 20 74 79 70 65 0a 20 20 20 20 20 20 20 20 20 20	...........:type.type...........
16180	3a 70 72 6f 70 73 20 70 72 6f 70 73 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d	:props.props)))..(defun.package-
161a0	62 75 69 6c 64 2d 2d 61 72 63 68 69 76 65 2d 61 6c 69 73 74 2d 66 6f 72 2d 6a 73 6f 6e 20 28 29	build--archive-alist-for-json.()
161c0	0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 61 72 63 68 69 76 65 20 61 6c 69 73 74 20 69 6e 20	..."Return.the.archive.alist.in.
161e0	61 20 66 6f 72 6d 20 73 75 69 74 61 62 6c 65 20 66 6f 72 20 4a 53 4f 4e 20 65 6e 63 6f 64 69 6e	a.form.suitable.for.JSON.encodin
16200	67 2e 22 0a 20 20 28 63 6c 2d 66 6c 65 74 20 28 28 66 6f 72 6d 61 74 2d 70 65 72 73 6f 6e 20 28	g."...(cl-flet.((format-person.(
16220	70 65 72 73 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 6e 61 6d	person)...............(let.((nam
16240	65 20 28 63 61 72 20 70 65 72 73 6f 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	e.(car.person)).................
16260	20 20 20 20 28 6d 61 69 6c 20 28 63 64 72 20 70 65 72 73 6f 6e 29 29 29 0a 20 20 20 20 20 20 20	....(mail.(cdr.person)))........
16280	20 20 20 20 20 20 20 20 20 28 69 66 20 28 61 6e 64 20 6e 61 6d 65 20 6d 61 69 6c 29 0a 20 20 20	.........(if.(and.name.mail)....
162a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 20 3c 25 73	.................(format."%s.<%s
162c0	3e 22 20 6e 61 6d 65 20 6d 61 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	>".name.mail)...................
162e0	28 6f 72 20 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	(or.name.......................(
16300	66 6f 72 6d 61 74 20 22 3c 25 73 3e 22 20 6d 61 69 6c 29 29 29 29 29 29 0a 20 20 20 20 28 6d 61	format."<%s>".mail)))))).....(ma
16320	70 63 61 6e 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 20 20	pcan.(lambda.(entry)............
16340	20 20 20 28 6c 69 73 74 20 28 69 6e 74 65 72 6e 20 28 66 6f 72 6d 61 74 20 22 3a 25 73 22 20 28	...(list.(intern.(format.":%s".(
16360	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 20 20	car.entry)))....................
16380	20 28 6c 65 74 2a 20 28 28 69 6e 66 6f 20 28 63 64 72 20 65 6e 74 72 79 29 29 0a 20 20 20 20 20	.(let*.((info.(cdr.entry))......
163a0	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 74 72 61 20 28 61 72	......................(extra.(ar
163c0	65 66 20 69 6e 66 6f 20 34 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ef.info.4)).....................
163e0	20 20 20 20 20 20 20 28 6d 61 69 6e 74 61 69 6e 65 72 20 28 61 73 73 71 20 3a 6d 61 69 6e 74 61	.......(maintainer.(assq.:mainta
16400	69 6e 65 72 20 65 78 74 72 61 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	iner.extra))....................
16420	20 20 20 20 20 20 20 20 28 6d 61 69 6e 74 61 69 6e 65 72 73 20 28 61 73 73 71 20 3a 6d 61 69 6e	........(maintainers.(assq.:main
16440	74 61 69 6e 65 72 73 20 65 78 74 72 61 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	tainers.extra)).................
16460	20 20 20 20 20 20 20 20 20 20 20 28 61 75 74 68 6f 72 73 20 28 61 73 73 71 20 3a 61 75 74 68 6f	...........(authors.(assq.:autho
16480	72 73 20 65 78 74 72 61 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	rs.extra))).....................
164a0	20 20 28 77 68 65 6e 20 6d 61 69 6e 74 61 69 6e 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	..(when.maintainer..............
164c0	20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 63 64 72 20 6d 61 69 6e 74 61 69 6e 65 72 0a 20 20	...........(setcdr.maintainer...
164e0	20 20 20 20 20 20 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
16500	6f 72 6d 61 74 2d 70 65 72 73 6f 6e 20 28 63 64 72 20 6d 61 69 6e 74 61 69 6e 65 72 29 29 29 29	ormat-person.(cdr.maintainer))))
16520	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 68 65 6e 20 6d 61 69	.......................(when.mai
16540	6e 74 61 69 6e 65 72 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	ntainers........................
16560	20 28 69 66 20 28 63 6c 2d 65 76 65 72 79 20 23 27 6c 69 73 74 70 20 28 63 64 72 20 6d 61 69 6e	.(if.(cl-every.#'listp.(cdr.main
16580	74 61 69 6e 65 72 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	tainers)).......................
165a0	20 20 20 20 20 20 28 73 65 74 63 64 72 20 6d 61 69 6e 74 61 69 6e 65 72 73 0a 20 20 20 20 20 20	......(setcdr.maintainers.......
165c0	20 20 20 20 20 20 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	..............................(m
165e0	61 70 63 61 72 20 23 27 66 6f 72 6d 61 74 2d 70 65 72 73 6f 6e 0a 20 20 20 20 20 20 20 20 20 20	apcar.#'format-person...........
16600	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
16620	20 20 28 63 64 72 20 6d 61 69 6e 74 61 69 6e 65 72 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20	..(cdr.maintainers)))...........
16640	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 6d 61 69 6e 74 61 69 6e 65 72	................(setq.maintainer
16660	73 20 3b 20 73 69 6c 65 6e 63 65 20 3e 3d 20 33 30 20 63 6f 6d 70 69 6c 65 72 0a 20 20 20 20 20	s.;.silence.>=.30.compiler......
16680	20 20 20 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 73 73 71	...........................(assq
166a0	2d 64 65 6c 65 74 65 2d 61 6c 6c 20 3a 6d 61 69 6e 74 61 69 6e 65 72 73 20 65 78 74 72 61 29 29	-delete-all.:maintainers.extra))
166c0	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 77 68 65 6e 20 61	)).......................(when.a
166e0	75 74 68 6f 72 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 28	uthors.........................(
16700	69 66 20 28 63 6c 2d 65 76 65 72 79 20 23 27 6c 69 73 74 70 20 28 63 64 72 20 61 75 74 68 6f 72	if.(cl-every.#'listp.(cdr.author
16720	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 20 20 20 20	s)).............................
16740	28 73 65 74 63 64 72 20 61 75 74 68 6f 72 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	(setcdr.authors.................
16760	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 20 23 27 66 6f	....................(mapcar.#'fo
16780	72 6d 61 74 2d 70 65 72 73 6f 6e 20 28 63 64 72 20 61 75 74 68 6f 72 73 29 29 29 0a 20 20 20 20	rmat-person.(cdr.authors))).....
167a0	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 61 75 74 68	......................(setq.auth
167c0	6f 72 73 20 3b 20 73 69 6c 65 6e 63 65 20 3e 3d 20 33 30 20 63 6f 6d 70 69 6c 65 72 0a 20 20 20	ors.;.silence.>=.30.compiler....
167e0	20 20 20 20 20 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 73	.............................(as
16800	73 71 2d 64 65 6c 65 74 65 2d 61 6c 6c 20 3a 61 75 74 68 6f 72 73 20 65 78 74 72 61 29 29 29 29	sq-delete-all.:authors.extra))))
16820	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 61 63 6b 61 67 65 2d	.......................(package-
16840	62 75 69 6c 64 2d 2d 70 6b 67 2d 69 6e 66 6f 2d 66 6f 72 2d 6a 73 6f 6e 20 69 6e 66 6f 29 29 29	build--pkg-info-for-json.info)))
16860	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 61 72 63	).............(package-build-arc
16880	68 69 76 65 2d 61 6c 69 73 74 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62	hive-alist))))..(defun.package-b
168a0	75 69 6c 64 2d 61 72 63 68 69 76 65 2d 61 6c 69 73 74 2d 61 73 2d 6a 73 6f 6e 20 28 66 69 6c 65	uild-archive-alist-as-json.(file
168c0	29 0a 20 20 22 44 75 6d 70 20 74 68 65 20 62 75 69 6c 64 20 70 61 63 6b 61 67 65 73 20 6c 69 73	)..."Dump.the.build.packages.lis
168e0	74 20 74 6f 20 46 49 4c 45 20 61 73 20 6a 73 6f 6e 2e 22 0a 20 20 28 77 69 74 68 2d 74 65 6d 70	t.to.FILE.as.json."...(with-temp
16900	2d 66 69 6c 65 20 66 69 6c 65 0a 20 20 20 20 28 69 6e 73 65 72 74 20 28 6a 73 6f 6e 2d 65 6e 63	-file.file.....(insert.(json-enc
16920	6f 64 65 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 61 72 63 68 69 76 65 2d 61 6c 69 73	ode.(package-build--archive-alis
16940	74 2d 66 6f 72 2d 6a 73 6f 6e 29 29 29 29 29 0a 0a 3b 3b 3b 20 5f 0a 0a 28 70 72 6f 76 69 64 65	t-for-json)))))..;;;._..(provide
16960	20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 29 0a 3b 3b 3b 20 70 61 63 6b 61 67 65 2d 62 75 69	.'package-build).;;;.package-bui
16980	6c 64 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	ld.el.ends.here.................
169a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
169c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
169e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
16a00	70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 32 30 32 35 30 37 30 38 2e 31 39 30 38 2f 70 61 63 6b	package-build-20250708.1908/pack
16a20	61 67 65 2d 72 65 63 69 70 65 2d 6d 6f 64 65 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00	age-recipe-mode.el..............
16a40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
16a60	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
16a80	30 30 31 31 34 35 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 37 36 32 31 00 20 30 00 00 00	0011452.00000000000.017621..0...
16aa0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
16ac0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
16ae0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
16b00	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...................
16b20	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...................
16b40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
16b60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
16b80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
16ba0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
16bc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
16be0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
16c00	3b 3b 3b 20 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 6d 6f 64 65 2e 65 6c 20 2d 2d 2d 20 4d	;;;.package-recipe-mode.el.---.M
16c20	61 6a 6f 72 2d 6d 6f 64 65 20 66 6f 72 20 65 64 69 74 69 6e 67 20 70 61 63 6b 61 67 65 20 72 65	ajor-mode.for.editing.package.re
16c40	63 69 70 65 73 20 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 74 3b 20 63 6f	cipes..-*-.lexical-binding:t;.co
16c60	64 69 6e 67 3a 75 74 66 2d 38 20 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29	ding:utf-8.-*-..;;.Copyright.(C)
16c80	20 32 30 31 31 2d 32 30 32 34 20 44 6f 6e 61 6c 64 20 45 70 68 72 61 69 6d 20 43 75 72 74 69 73	.2011-2024.Donald.Ephraim.Curtis
16ca0	0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 32 2d 32 30 32 34 20 53 74 65 76	.;;.Copyright.(C).2012-2024.Stev
16cc0	65 20 50 75 72 63 65 6c 6c 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 36 2d	e.Purcell.;;.Copyright.(C).2016-
16ce0	32 30 32 35 20 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 0a 3b 3b 20 43 6f 70 79 72 69 67 68	2025.Jonas.Bernoulli.;;.Copyrigh
16d00	74 20 28 43 29 20 32 30 30 39 20 50 68 69 6c 20 48 61 67 65 6c 62 65 72 67 0a 0a 3b 3b 20 41 75	t.(C).2009.Phil.Hagelberg..;;.Au
16d20	74 68 6f 72 3a 20 44 6f 6e 61 6c 64 20 45 70 68 72 61 69 6d 20 43 75 72 74 69 73 20 3c 64 63 75	thor:.Donald.Ephraim.Curtis.<dcu
16d40	72 74 69 73 40 6d 69 6c 6b 62 6f 78 2e 6e 65 74 3e 0a 3b 3b 20 4d 61 69 6e 74 61 69 6e 65 72 3a	rtis@milkbox.net>.;;.Maintainer:
16d60	20 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 70 61 63 6b 61 67 65 2d	.Jonas.Bernoulli.<emacs.package-
16d80	62 75 69 6c 64 40 6a 6f 6e 61 73 2e 62 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 3b 3b 20 48 6f	build@jonas.bernoulli.dev>.;;.Ho
16da0	6d 65 70 61 67 65 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 6d 65 6c 70 61	mepage:.https://github.com/melpa
16dc0	2f 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 6d 61 69 6e	/package-build.;;.Keywords:.main
16de0	74 20 74 6f 6f 6c 73 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d 49 64 65 6e 74 69 66	t.tools..;;.SPDX-License-Identif
16e00	69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 65 72 0a 0a 3b 3b 20 54 68 69 73 20 66	ier:.GPL-3.0-or-later..;;.This.f
16e20	69 6c 65 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3a 20 79 6f 75 20 63 61 6e 20 72 65	ile.is.free.software:.you.can.re
16e40	64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 66 79 0a 3b 3b 20 69	distribute.it.and/or.modify.;;.i
16e60	74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e	t.under.the.terms.of.the.GNU.Gen
16e80	65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 62 6c 69 73 68 65 64	eral.Public.License.as.published
16ea0	0a 3b 3b 20 62 79 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74	.;;.by.the.Free.Software.Foundat
16ec0	69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 6f 66 20 74 68 65 20 4c 69 63	ion,.either.version.3.of.the.Lic
16ee0	65 6e 73 65 2c 0a 3b 3b 20 6f 72 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f 6e 29 20 61 6e 79	ense,.;;.or.(at.your.option).any
16f00	20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 3b 3b 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 20	.later.version..;;.;;.This.file.
16f20	69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 6f 70 65 20 74 68 61 74 20	is.distributed.in.the.hope.that.
16f40	69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b 3b 20 62 75 74 20 57 49 54 48 4f 55	it.will.be.useful,.;;.but.WITHOU
16f60	54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 76 65 6e 20 74 68 65	T.ANY.WARRANTY;.without.even.the
16f80	20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d 45 52 43 48 41 4e 54	.implied.warranty.of.;;.MERCHANT
16fa0	41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 50 41 52 54 49 43 55	ABILITY.or.FITNESS.FOR.A.PARTICU
16fc0	4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 0a 3b 3b 20 47 4e 55 20 47 65 6e	LAR.PURPOSE...See.the.;;.GNU.Gen
16fe0	65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 74	eral.Public.License.for.more.det
17000	61 69 6c 73 2e 0a 3b 3b 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 76 65 20 72 65 63 65	ails..;;.;;.You.should.have.rece
17020	69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50	ived.a.copy.of.the.GNU.General.P
17040	75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 74 68 20 74 68 69 73	ublic.License.;;.along.with.this
17060	20 66 69 6c 65 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 70 73 3a 2f 2f 77 77 77	.file...If.not,.see.<https://www
17080	2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e	.gnu.org/licenses/>...;;;.Commen
170a0	74 61 72 79 3a 0a 0a 3b 3b 20 54 68 69 73 20 6c 69 62 72 61 72 79 20 64 65 66 69 6e 65 73 20 74	tary:..;;.This.library.defines.t
170c0	68 65 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 60 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 6d 6f	he.major-mode.`package-recipe-mo
170e0	64 65 27 2c 20 77 68 69 63 68 20 69 73 0a 3b 3b 20 75 73 65 64 20 66 6f 72 20 4d 65 6c 70 61 20	de',.which.is.;;.used.for.Melpa.
17100	70 61 63 6b 61 67 65 20 72 65 63 69 70 65 20 66 69 6c 65 73 2e 0a 0a 3b 3b 3b 20 43 6f 64 65 3a	package.recipe.files...;;;.Code:
17120	0a 0a 28 72 65 71 75 69 72 65 20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 29 0a 0a 28 64 65 66	..(require.'package-build)..(def
17140	76 61 72 20 66 6c 79 63 68 65 63 6b 2d 63 68 65 63 6b 65 72 73 29 0a 0a 3b 3b 3b 23 23 23 61 75	var.flycheck-checkers)..;;;###au
17160	74 6f 6c 6f 61 64 0a 28 64 65 66 76 61 72 20 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 6d 6f	toload.(defvar.package-recipe-mo
17180	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 65	de-map...(let.((map.(make-sparse
171a0	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.(
171c0	6b 62 64 20 22 43 2d 63 20 43 2d 63 22 29 20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 63 75	kbd."C-c.C-c").'package-build-cu
171e0	72 72 65 6e 74 2d 72 65 63 69 70 65 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61	rrent-recipe).....(define-key.ma
17200	70 20 28 6b 62 64 20 22 43 2d 63 20 43 2d 6e 22 29 20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64	p.(kbd."C-c.C-n").'package-build
17220	2d 63 72 65 61 74 65 2d 72 65 63 69 70 65 29 0a 20 20 20 20 6d 61 70 29 0a 20 20 22 4b 65 79 6d	-create-recipe).....map)..."Keym
17240	61 70 20 66 6f 72 20 60 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 6d 6f 64 65 27 2e 22 29 0a	ap.for.`package-recipe-mode'.").
17260	0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 6c 69	.;;;###autoload.(if.(fboundp.'li
17280	73 70 2d 64 61 74 61 2d 6d 6f 64 65 29 20 3b 20 53 69 6e 63 65 20 45 6d 61 63 73 20 32 38 2e 31	sp-data-mode).;.Since.Emacs.28.1
172a0	2e 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 64 65 72 69 76 65 64 2d 6d 6f 64 65 20 70 61 63 6b 61	......(define-derived-mode.packa
172c0	67 65 2d 72 65 63 69 70 65 2d 6d 6f 64 65 20 6c 69 73 70 2d 64 61 74 61 2d 6d 6f 64 65 20 22 4d	ge-recipe-mode.lisp-data-mode."M
172e0	65 6c 70 61 2d 52 65 63 69 70 65 22 0a 20 20 20 20 20 20 22 4d 61 6a 6f 72 20 6d 6f 64 65 20 66	elpa-Recipe"......."Major.mode.f
17300	6f 72 20 62 75 66 66 65 72 73 20 68 6f 6c 64 69 6e 67 20 4d 65 6c 70 61 20 70 61 63 6b 61 67 65	or.buffers.holding.Melpa.package
17320	20 72 65 63 69 70 65 73 2e 22 0a 20 20 20 20 20 20 3a 67 72 6f 75 70 20 27 70 61 63 6b 61 67 65	.recipes.".......:group.'package
17340	2d 62 75 69 6c 64 0a 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 6d 6f 64	-build.......(package-recipe-mod
17360	65 2d 2d 65 6e 61 62 6c 65 29 29 0a 20 20 28 64 65 66 69 6e 65 2d 64 65 72 69 76 65 64 2d 6d 6f	e--enable))...(define-derived-mo
17380	64 65 20 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 6d 6f 64 65 20 65 6d 61 63 73 2d 6c 69 73	de.package-recipe-mode.emacs-lis
173a0	70 2d 6d 6f 64 65 20 22 4d 65 6c 70 61 2d 52 65 63 69 70 65 22 0a 20 20 20 20 22 4d 61 6a 6f 72	p-mode."Melpa-Recipe"....."Major
173c0	20 6d 6f 64 65 20 66 6f 72 20 62 75 66 66 65 72 73 20 68 6f 6c 64 69 6e 67 20 4d 65 6c 70 61 20	.mode.for.buffers.holding.Melpa.
173e0	70 61 63 6b 61 67 65 20 72 65 63 69 70 65 73 2e 22 0a 20 20 20 20 3a 67 72 6f 75 70 20 27 70 61	package.recipes.".....:group.'pa
17400	63 6b 61 67 65 2d 62 75 69 6c 64 0a 20 20 20 20 28 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d	ckage-build.....(package-recipe-
17420	6d 6f 64 65 2d 2d 65 6e 61 62 6c 65 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d	mode--enable)))..(defun.package-
17440	72 65 63 69 70 65 2d 6d 6f 64 65 2d 2d 65 6e 61 62 6c 65 20 28 29 0a 20 20 28 73 65 74 71 2d 6c	recipe-mode--enable.()...(setq-l
17460	6f 63 61 6c 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 72 65 63 69 70 65 73 2d 64 69 72 20 64	ocal.package-build-recipes-dir.d
17480	65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 0a 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20	efault-directory)...(setq-local.
174a0	70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 77 6f 72 6b 69 6e 67 2d 64 69 72 20 28 65 78 70 61 6e	package-build-working-dir.(expan
174c0	64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 2e 2e 2f 77 6f 72 6b 69 6e 67 2f 22 29 29 0a 20 20 28 73	d-file-name."../working/"))...(s
174e0	65 74 71 2d 6c 6f 63 61 6c 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 61 72 63 68 69 76 65 2d	etq-local.package-build-archive-
17500	64 69 72 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 2e 2e 2f 70 61 63 6b 61 67	dir.(expand-file-name."../packag
17520	65 73 2f 22 29 29 0a 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 66 6c 79 63 68 65 63 6b 2d 63 68	es/"))...(setq-local.flycheck-ch
17540	65 63 6b 65 72 73 20 6e 69 6c 29 0a 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 69 6e 64 65 6e 74	eckers.nil)...(setq-local.indent
17560	2d 74 61 62 73 2d 6d 6f 64 65 20 6e 69 6c 29 0a 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 72 65	-tabs-mode.nil)...(setq-local.re
17580	71 75 69 72 65 2d 66 69 6e 61 6c 2d 6e 65 77 6c 69 6e 65 20 74 29 0a 20 20 28 61 64 64 2d 68 6f	quire-final-newline.t)...(add-ho
175a0	6f 6b 20 27 62 65 66 6f 72 65 2d 73 61 76 65 2d 68 6f 6f 6b 20 23 27 77 68 69 74 65 73 70 61 63	ok.'before-save-hook.#'whitespac
175c0	65 2d 63 6c 65 61 6e 75 70 20 6e 69 6c 20 74 29 0a 20 20 28 6d 65 73 73 61 67 65 20 22 25 73 22	e-cleanup.nil.t)...(message."%s"
175e0	20 28 73 75 62 73 74 69 74 75 74 65 2d 63 6f 6d 6d 61 6e 64 2d 6b 65 79 73 20 22 5c 0a 55 73 65	.(substitute-command-keys."\.Use
17600	20 5c 5c 5b 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 63 75 72 72 65 6e 74 2d 72 65 63 69 70 65	.\\[package-build-current-recipe
17620	5d 20 74 6f 20 62 75 69 6c 64 20 74 68 69 73 20 72 65 63 69 70 65 2c 20 5c 0a 5c 5c 5b 70 61 63	].to.build.this.recipe,.\.\\[pac
17640	6b 61 67 65 2d 62 75 69 6c 64 2d 63 72 65 61 74 65 2d 72 65 63 69 70 65 5d 20 74 6f 20 63 72 65	kage-build-create-recipe].to.cre
17660	61 74 65 20 61 20 6e 65 77 20 72 65 63 69 70 65 22 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f	ate.a.new.recipe")))..;;;###auto
17680	6c 6f 61 64 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 63 72 65 61 74 65	load.(defun.package-build-create
176a0	2d 72 65 63 69 70 65 20 28 6e 61 6d 65 20 66 65 74 63 68 65 72 29 0a 20 20 22 43 72 65 61 74 65	-recipe.(name.fetcher)..."Create
176c0	20 61 20 6e 65 77 20 72 65 63 69 70 65 20 66 6f 72 20 74 68 65 20 70 61 63 6b 61 67 65 20 6e 61	.a.new.recipe.for.the.package.na
176e0	6d 65 64 20 4e 41 4d 45 20 75 73 69 6e 67 20 46 45 54 43 48 45 52 2e 22 0a 20 20 28 69 6e 74 65	med.NAME.using.FETCHER."...(inte
17700	72 61 63 74 69 76 65 0a 20 20 20 28 6c 69 73 74 20 28 72 65 61 64 2d 73 74 72 69 6e 67 20 22 50	ractive....(list.(read-string."P
17720	61 63 6b 61 67 65 20 6e 61 6d 65 3a 20 22 29 0a 20 20 20 20 20 20 20 20 20 28 69 6e 74 65 72 6e	ackage.name:.")..........(intern
17740	20 28 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 20 22 46 65 74 63 68 65 72 3a 20 22 20 70 61	.(completing-read."Fetcher:.".pa
17760	63 6b 61 67 65 2d 72 65 63 69 70 65 2d 2d 66 65 74 63 68 65 72 73 0a 20 20 20 20 20 20 20 20 20	ckage-recipe--fetchers..........
17780	20 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 20 74 20 6e	.........................nil.t.n
177a0	69 6c 20 6e 69 6c 20 22 67 69 74 68 75 62 22 29 29 29 29 0a 20 20 28 6c 65 74 20 28 28 72 65 63	il.nil."github"))))...(let.((rec
177c0	69 70 65 2d 66 69 6c 65 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 6e 61 6d 65 20	ipe-file.(expand-file-name.name.
177e0	70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 72 65 63 69 70 65 73 2d 64 69 72 29 29 29 0a 20 20 20	package-build-recipes-dir)))....
17800	20 28 77 68 65 6e 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 72 65 63 69 70 65 2d 66 69 6c	.(when.(file-exists-p.recipe-fil
17820	65 29 0a 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 52 65 63 69 70 65 20 61 6c 72 65 61 64 79 20	e).......(error."Recipe.already.
17840	65 78 69 73 74 73 22 29 29 0a 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66	exists")).....(with-current-buff
17860	65 72 20 28 66 69 6e 64 2d 66 69 6c 65 20 72 65 63 69 70 65 2d 66 69 6c 65 29 0a 20 20 20 20 20	er.(find-file.recipe-file)......
17880	20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74	.(save-excursion.........(insert
178a0	20 28 66 6f 72 6d 61 74 20 22 28 25 73 5c 6e 22 20 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20	.(format."(%s\n".name)..........
178c0	20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 20 3a 66 65 74 63 68 65 72 20 25 73 5c 6e 22 20	.......(format.".:fetcher.%s\n".
178e0	66 65 74 63 68 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 6d 65	fetcher).................(if.(me
17900	6d 71 20 66 65 74 63 68 65 72 20 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 2d 66 6f 72 67 65	mq.fetcher.package-recipe--forge
17920	2d 66 65 74 63 68 65 72 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22	-fetchers)....................."
17940	20 3a 72 65 70 6f 20 5c 22 55 53 45 52 2f 52 45 50 4f 5c 22 29 5c 6e 22 0a 20 20 20 20 20 20 20	.:repo.\"USER/REPO\")\n"........
17960	20 20 20 20 20 20 20 20 20 20 20 22 20 3a 75 72 6c 20 5c 22 68 74 74 70 73 3a 2f 2f 54 4f 44 4f	...........".:url.\"https://TODO
17980	5c 22 29 5c 6e 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 64 65	\")\n"))))))..;;;###autoload.(de
179a0	66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 63 75 72 72 65 6e 74 2d 72 65 63 69 70 65	fun.package-build-current-recipe
179c0	20 28 29 0a 20 20 22 42 75 69 6c 64 20 61 72 63 68 69 76 65 20 66 6f 72 20 74 68 65 20 72 65 63	.()..."Build.archive.for.the.rec
179e0	69 70 65 20 64 65 66 69 6e 65 64 20 69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65	ipe.defined.in.the.current.buffe
17a00	72 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 28 61	r."...(interactive)...(unless.(a
17a20	6e 64 20 28 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20	nd.(buffer-file-name)...........
17a40	20 20 20 20 20 28 66 69 6c 65 2d 65 71 75 61 6c 2d 70 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69	.....(file-equal-p.(file-name-di
17a60	72 65 63 74 6f 72 79 20 28 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 29 29 0a 20 20 20 20	rectory.(buffer-file-name)).....
17a80	20 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 61 63 6b 61 67 65	.........................package
17aa0	2d 62 75 69 6c 64 2d 72 65 63 69 70 65 73 2d 64 69 72 29 29 0a 20 20 20 20 28 65 72 72 6f 72 20	-build-recipes-dir)).....(error.
17ac0	22 42 75 66 66 65 72 20 69 73 20 6e 6f 74 20 76 69 73 69 74 69 6e 67 20 61 20 72 65 63 69 70 65	"Buffer.is.not.visiting.a.recipe
17ae0	22 29 29 0a 20 20 28 77 68 65 6e 20 28 62 75 66 66 65 72 2d 6d 6f 64 69 66 69 65 64 2d 70 29 0a	"))...(when.(buffer-modified-p).
17b00	20 20 20 20 28 69 66 20 28 79 2d 6f 72 2d 6e 2d 70 20 28 66 6f 72 6d 61 74 20 22 53 61 76 65 20	....(if.(y-or-n-p.(format."Save.
17b20	66 69 6c 65 20 25 73 3f 20 22 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 29 29 0a 20 20	file.%s?.".buffer-file-name))...
17b40	20 20 20 20 20 20 28 73 61 76 65 2d 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 28 65 72 72 6f 72	......(save-buffer).......(error
17b60	20 22 41 62 6f 72 74 69 6e 67 22 29 29 29 0a 20 20 28 63 68 65 63 6b 2d 70 61 72 65 6e 73 29 0a	."Aborting")))...(check-parens).
17b80	20 20 28 6c 65 74 20 28 28 6e 61 6d 65 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 72 65	..(let.((name.(file-name-nondire
17ba0	63 74 6f 72 79 20 28 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 29 29 29 29 0a 20 20 20 20	ctory.(buffer-file-name)))).....
17bc0	28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 61 72 63 68 69 76 65 20 6e 61 6d 65 20 74 29 0a 20	(package-build-archive.name.t)..
17be0	20 20 20 28 6c 65 74 20 28 28 65 6e 74 72 79 20 28 61 73 73 71 20 28 69 6e 74 65 72 6e 20 6e 61	...(let.((entry.(assq.(intern.na
17c00	6d 65 29 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 61 72 63 68 69 76 65 2d 61 6c 69 73 74	me).(package-build-archive-alist
17c20	29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6f 75 74 70 75 74 2d 62 75 66 66 65 72 2d 6e 61 6d	)))...........(output-buffer-nam
17c40	65 20 22 2a 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 61 72 63 68 69 76 65 2d 65 6e 74 72 79 2a	e."package-build-archive-entry
17c60	22 29 29 0a 20 20 20 20 20 20 28 77 69 74 68 2d 6f 75 74 70 75 74 2d 74 6f 2d 74 65 6d 70 2d 62	")).......(with-output-to-temp-b
17c80	75 66 66 65 72 20 6f 75 74 70 75 74 2d 62 75 66 66 65 72 2d 6e 61 6d 65 0a 20 20 20 20 20 20 20	uffer.output-buffer-name........
17ca0	20 28 70 72 69 6e 63 20 22 3b 3b 20 50 6c 65 61 73 65 20 63 68 65 63 6b 20 74 68 65 20 66 6f 6c	.(princ.";;.Please.check.the.fol
17cc0	6c 6f 77 69 6e 67 20 70 61 63 6b 61 67 65 20 64 65 73 63 72 69 70 74 6f 72 2e 5c 6e 22 29 0a 20	lowing.package.descriptor.\n")..
17ce0	20 20 20 20 20 20 20 28 70 72 69 6e 63 20 22 3b 3b 20 49 66 20 74 68 65 20 63 6f 72 72 65 63 74	.......(princ.";;.If.the.correct
17d00	20 70 61 63 6b 61 67 65 20 64 65 73 63 72 69 70 74 69 6f 6e 20 6f 72 20 64 65 70 65 6e 64 65 6e	.package.description.or.dependen
17d20	63 69 65 73 20 61 72 65 20 6d 69 73 73 69 6e 67 2c 5c 6e 22 29 0a 20 20 20 20 20 20 20 20 28 70	cies.are.missing,\n").........(p
17d40	72 69 6e 63 20 22 3b 3b 20 74 68 65 6e 20 74 68 65 20 73 6f 75 72 63 65 20 2e 65 6c 20 66 69 6c	rinc.";;.then.the.source..el.fil
17d60	65 20 69 73 20 6c 69 6b 65 6c 79 20 6d 61 6c 66 6f 72 6d 65 64 2c 20 61 6e 64 20 73 68 6f 75 6c	e.is.likely.malformed,.and.shoul
17d80	64 20 62 65 20 66 69 78 65 64 2e 5c 6e 22 29 0a 20 20 20 20 20 20 20 20 28 70 70 20 65 6e 74 72	d.be.fixed.\n").........(pp.entr
17da0	79 29 29 0a 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 6f	y)).......(with-current-buffer.o
17dc0	75 74 70 75 74 2d 62 75 66 66 65 72 2d 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 66	utput-buffer-name.........(if.(f
17de0	62 6f 75 6e 64 70 20 27 6c 69 73 70 2d 64 61 74 61 2d 6d 6f 64 65 29 20 28 6c 69 73 70 2d 64 61	boundp.'lisp-data-mode).(lisp-da
17e00	74 61 2d 6d 6f 64 65 29 20 28 65 6d 61 63 73 2d 6c 69 73 70 2d 6d 6f 64 65 29 29 0a 20 20 20 20	ta-mode).(emacs-lisp-mode)).....
17e20	20 20 20 20 28 76 69 65 77 2d 6d 6f 64 65 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 79 2d	....(view-mode)).......(when.(y-
17e40	6f 72 2d 6e 2d 70 20 22 49 6e 73 74 61 6c 6c 20 6e 65 77 20 70 61 63 6b 61 67 65 3f 20 22 29 0a	or-n-p."Install.new.package?.").
17e60	20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 69 6e 73 74 61 6c 6c 2d 66 69 6c 65 20 28 70	........(package-install-file.(p
17e80	61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 61 72 74 69 66 61 63 74 2d 66 69 6c 65 20 65 6e 74 72	ackage-build--artifact-file.entr
17ea0	79 29 29 0a 20 20 20 20 20 20 20 20 28 70 6f 70 2d 74 6f 2d 62 75 66 66 65 72 20 28 67 65 74 2d	y)).........(pop-to-buffer.(get-
17ec0	62 75 66 66 65 72 20 62 79 74 65 2d 63 6f 6d 70 69 6c 65 2d 6c 6f 67 2d 62 75 66 66 65 72 29 29	buffer.byte-compile-log-buffer))
17ee0	29 29 29 29 0a 0a 28 70 72 6f 76 69 64 65 20 27 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 6d	))))..(provide.'package-recipe-m
17f00	6f 64 65 29 0a 3b 3b 3b 20 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 6d 6f 64 65 2e 65 6c 20	ode).;;;.package-recipe-mode.el.
17f20	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 00	ends.here.......................
17f40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
17f60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
17f80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
17fa0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
17fc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
17fe0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18000	70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 32 30 32 35 30 37 30 38 2e 31 39 30 38 2f 70 61 63 6b	package-build-20250708.1908/pack
18020	61 67 65 2d 72 65 63 69 70 65 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	age-recipe.el...................
18040	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18060	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
18080	30 30 32 32 36 31 33 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 36 37 30 30 00 20 30 00 00 00	0022613.00000000000.016700..0...
180a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
180c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
180e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18100	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...................
18120	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...................
18140	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18160	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18180	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
181a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
181c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
181e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18200	3b 3b 3b 20 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2e 65 6c 20 2d 2d 2d 20 50 61 63 6b 61 67	;;;.package-recipe.el.---.Packag
18220	65 20 72 65 63 69 70 65 73 20 61 73 20 45 49 45 49 4f 20 6f 62 6a 65 63 74 73 20 20 2d 2a 2d 20	e.recipes.as.EIEIO.objects..-*-.
18240	6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 74 3b 20 63 6f 64 69 6e 67 3a 75 74 66 2d 38 20	lexical-binding:t;.coding:utf-8.
18260	2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 38 2d 32 30 32 35 20	-*-..;;.Copyright.(C).2018-2025.
18280	4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 4a 6f 6e 61	Jonas.Bernoulli..;;.Author:.Jona
182a0	73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 70 61 63 6b 61 67 65 2d 62 75 69 6c 64	s.Bernoulli.<emacs.package-build
182c0	40 6a 6f 6e 61 73 2e 62 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 3b 3b 20 4d 61 69 6e 74 61 69	@jonas.bernoulli.dev>.;;.Maintai
182e0	6e 65 72 3a 20 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 65 6d 61 63 73 2e 70 61 63 6b	ner:.Jonas.Bernoulli.<emacs.pack
18300	61 67 65 2d 62 75 69 6c 64 40 6a 6f 6e 61 73 2e 62 65 72 6e 6f 75 6c 6c 69 2e 64 65 76 3e 0a 3b	age-build@jonas.bernoulli.dev>.;
18320	3b 20 48 6f 6d 65 70 61 67 65 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 6d	;.Homepage:.https://github.com/m
18340	65 6c 70 61 2f 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20	elpa/package-build.;;.Keywords:.
18360	6d 61 69 6e 74 20 74 6f 6f 6c 73 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d 49 64 65	maint.tools..;;.SPDX-License-Ide
18380	6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 65 72 0a 0a 3b 3b 20 54 68	ntifier:.GPL-3.0-or-later..;;.Th
183a0	69 73 20 66 69 6c 65 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3a 20 79 6f 75 20 63 61	is.file.is.free.software:.you.ca
183c0	6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 66 79 0a	n.redistribute.it.and/or.modify.
183e0	3b 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 47 4e 55	;;.it.under.the.terms.of.the.GNU
18400	20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 62 6c 69	.General.Public.License.as.publi
18420	73 68 65 64 0a 3b 3b 20 62 79 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75	shed.;;.by.the.Free.Software.Fou
18440	6e 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 6f 66 20 74 68 65	ndation,.either.version.3.of.the
18460	20 4c 69 63 65 6e 73 65 2c 0a 3b 3b 20 6f 72 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f 6e 29	.License,.;;.or.(at.your.option)
18480	20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 3b 3b 0a 3b 3b 20 54 68 69 73 20 66	.any.later.version..;;.;;.This.f
184a0	69 6c 65 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 6f 70 65 20 74	ile.is.distributed.in.the.hope.t
184c0	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 74 20 57 49	hat.it.will.be.useful,.;;.but.WI
184e0	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 65 76 65 6e	THOUT.ANY.WARRANTY;.without.even
18500	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 4d 45 52 43	.the.implied.warranty.of.;;.MERC
18520	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 20 50 41 52	HANTABILITY.or.FITNESS.FOR.A.PAR
18540	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 20 47 4e 55	TICULAR.PURPOSE...See.the.;;.GNU
18560	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 6d 6f 72 65	.General.Public.License.for.more
18580	20 64 65 74 61 69 6c 73 2e 0a 3b 3b 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 76 65 20	.details..;;.;;.You.should.have.
185a0	72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72	received.a.copy.of.the.GNU.Gener
185c0	61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 74 68 20	al.Public.License.;;.along.with.
185e0	74 68 69 73 20 66 69 6c 65 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 70 73 3a 2f	this.file...If.not,.see.<https:/
18600	2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0a 3b 3b 3b 20 43 6f	/www.gnu.org/licenses/>...;;;.Co
18620	6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 20 50 61 63 6b 61 67 65 20 72 65 63 69 70 65 73 20 61 73	mmentary:..;;.Package.recipes.as
18640	20 45 49 45 49 4f 20 6f 62 6a 65 63 74 73 2e 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71	.EIEIO.objects...;;;.Code:..(req
18660	75 69 72 65 20 27 63 6f 6d 70 61 74 20 6e 69 6c 20 74 29 0a 28 72 65 71 75 69 72 65 20 27 65 69	uire.'compat.nil.t).(require.'ei
18680	65 69 6f 29 0a 28 72 65 71 75 69 72 65 20 27 73 75 62 72 2d 78 29 0a 28 72 65 71 75 69 72 65 20	eio).(require.'subr-x).(require.
186a0	27 75 72 6c 2d 70 61 72 73 65 29 0a 0a 28 64 65 66 76 61 72 20 70 61 63 6b 61 67 65 2d 62 75 69	'url-parse)..(defvar.package-bui
186c0	6c 64 2d 75 73 65 2d 67 69 74 2d 72 65 6d 6f 74 65 2d 68 67 29 0a 28 64 65 66 76 61 72 20 70 61	ld-use-git-remote-hg).(defvar.pa
186e0	63 6b 61 67 65 2d 62 75 69 6c 64 2d 72 65 63 69 70 65 73 2d 64 69 72 29 0a 28 64 65 66 76 61 72	ckage-build-recipes-dir).(defvar
18700	20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 77 6f 72 6b 69 6e 67 2d 64 69 72 29 0a 0a 3b 3b 3b	.package-build-working-dir)..;;;
18720	20 43 6c 61 73 73 65 73 0a 0a 28 64 65 66 63 6c 61 73 73 20 70 61 63 6b 61 67 65 2d 72 65 63 69	.Classes..(defclass.package-reci
18740	70 65 20 28 29 0a 20 20 28 28 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 3a 61 6c 6c 6f 63	pe.()...((url-format......:alloc
18760	61 74 69 6f 6e 20 3a 63 6c 61 73 73 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c	ation.:class.......:initform.nil
18780	29 0a 20 20 20 28 72 65 70 6f 70 61 67 65 2d 66 6f 72 6d 61 74 20 3a 61 6c 6c 6f 63 61 74 69 6f	)....(repopage-format.:allocatio
187a0	6e 20 3a 63 6c 61 73 73 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20	n.:class.......:initform.nil)...
187c0	20 28 6e 61 6d 65 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 6e 61 6d 65	.(name............:initarg.:name
187e0	20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 75 72	...........:initform.nil)....(ur
18800	6c 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 75 72 6c 20 20 20 20 20	l.............:initarg.:url.....
18820	20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 72 65 70 6f 20 20	.......:initform.nil)....(repo..
18840	20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 72 65 70 6f 20 20 20 20 20 20 20 20	..........:initarg.:repo........
18860	20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 72 65 70 6f 70 61 67 65 20 20	...:initform.nil)....(repopage..
18880	20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 72 65 70 6f 70 61 67 65 20 20 20 20 20 20 20 3a	......:initarg.:repopage.......:
188a0	69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 66 69 6c 65 73 20 20 20 20 20 20 20 20 20	initform.nil)....(files.........
188c0	20 20 3a 69 6e 69 74 61 72 67 20 3a 66 69 6c 65 73 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74	..:initarg.:files..........:init
188e0	66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 62 72 61 6e 63 68 20 20 20 20 20 20 20 20 20 20 3a 69	form.nil)....(branch..........:i
18900	6e 69 74 61 72 67 20 3a 62 72 61 6e 63 68 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d	nitarg.:branch.........:initform
18920	20 6e 69 6c 29 0a 20 20 20 28 63 6f 6d 6d 69 74 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 61	.nil)....(commit..........:inita
18940	72 67 20 3a 63 6f 6d 6d 69 74 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c	rg.:commit.........:initform.nil
18960	29 0a 20 20 20 28 76 65 72 73 69 6f 6e 2d 72 65 67 65 78 70 20 20 3a 69 6e 69 74 61 72 67 20 3a	)....(version-regexp..:initarg.:
18980	76 65 72 73 69 6f 6e 2d 72 65 67 65 78 70 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20	version-regexp.:initform.nil)...
189a0	20 28 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e 64 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 73 68 65 6c	.(shell-command...:initarg.:shel
189c0	6c 2d 63 6f 6d 6d 61 6e 64 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 6d 61	l-command..:initform.nil)....(ma
189e0	6b 65 2d 74 61 72 67 65 74 73 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 6d 61 6b 65 2d 74 61 72	ke-targets....:initarg.:make-tar
18a00	67 65 74 73 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 6f 72 67 2d 65 78	gets...:initform.nil)....(org-ex
18a20	70 6f 72 74 73 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 6f 72 67 2d 65 78 70 6f 72 74 73 20	ports.....:initarg.:org-exports.
18a40	20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 6f 6c 64 2d 6e 61 6d 65 73 20	...:initform.nil)....(old-names.
18a60	20 20 20 20 20 20 3a 69 6e 69 74 61 72 67 20 3a 6f 6c 64 2d 6e 61 6d 65 73 20 20 20 20 20 20 3a	......:initarg.:old-names......:
18a80	69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 76 65 72 73 69 6f 6e 20 20 20 20 20 20 20	initform.nil)....(version.......
18aa0	20 20 20 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 69 6e 69 74	...........................:init
18ac0	66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 72 65 76 64 65 73 63 20 20 20 20 20 20 20 20 20 20 20	form.nil)....(revdesc...........
18ae0	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 66 6f 72 6d	.......................:initform
18b00	20 6e 69 6c 29 0a 20 20 20 28 74 69 6d 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.nil)....(time..................
18b20	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c	...................:initform.nil
18b40	29 0a 20 20 20 28 73 75 6d 6d 61 72 79 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	)....(summary...................
18b60	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20	...............:initform.nil)...
18b80	20 28 64 65 70 65 6e 64 65 6e 63 69 65 73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.(dependencies..................
18ba0	20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 77 65	...........:initform.nil)....(we
18bc0	62 70 61 67 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	bpage...........................
18be0	20 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 6b 65 79 77 6f 72	.......:initform.nil)....(keywor
18c00	64 73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ds..............................
18c20	20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 61 75 74 68 6f 72 73 20 20 20	...:initform.nil)....(authors...
18c40	20 20 20 20 20 20 20 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	...............................:
18c60	69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 6d 61 69 6e 74 61 69 6e 65 72 73 20 20 20	initform.nil)....(maintainers...
18c80	20 20 20 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 69 6e 69 74	...........................:init
18ca0	66 6f 72 6d 20 6e 69 6c 29 0a 20 20 20 28 74 61 72 62 61 6c 6c 70 20 20 20 20 20 20 20 20 20 20	form.nil)....(tarballp..........
18cc0	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 66 6f 72 6d	.......................:initform
18ce0	20 74 29 29 0a 20 20 3a 61 62 73 74 72 61 63 74 20 74 29 0a 0a 3b 3b 3b 3b 20 47 69 74 0a 0a 28	.t))...:abstract.t)..;;;;.Git..(
18d00	64 65 66 63 6c 61 73 73 20 70 61 63 6b 61 67 65 2d 67 69 74 2d 72 65 63 69 70 65 20 28 70 61 63	defclass.package-git-recipe.(pac
18d20	6b 61 67 65 2d 72 65 63 69 70 65 29 20 28 29 29 0a 0a 28 64 65 66 63 6c 61 73 73 20 70 61 63 6b	kage-recipe).())..(defclass.pack
18d40	61 67 65 2d 67 69 74 68 75 62 2d 72 65 63 69 70 65 20 28 70 61 63 6b 61 67 65 2d 67 69 74 2d 72	age-github-recipe.(package-git-r
18d60	65 63 69 70 65 29 0a 20 20 28 28 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 3a 69 6e 69 74	ecipe)...((url-format......:init
18d80	66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 25 73 22 29 0a 20 20	form."https://github.com/%s")...
18da0	20 28 72 65 70 6f 70 61 67 65 2d 66 6f 72 6d 61 74 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74	.(repopage-format.:initform."htt
18dc0	70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 25 73 22 29 29 29 0a 0a 28 64 65 66 63 6c 61 73	ps://github.com/%s")))..(defclas
18de0	73 20 70 61 63 6b 61 67 65 2d 67 69 74 6c 61 62 2d 72 65 63 69 70 65 20 28 70 61 63 6b 61 67 65	s.package-gitlab-recipe.(package
18e00	2d 67 69 74 2d 72 65 63 69 70 65 29 0a 20 20 28 28 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20	-git-recipe)...((url-format.....
18e20	20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 67 69 74 6c 61 62 2e 63 6f 6d 2f 25	.:initform."https://gitlab.com/%
18e40	73 22 29 0a 20 20 20 28 72 65 70 6f 70 61 67 65 2d 66 6f 72 6d 61 74 20 3a 69 6e 69 74 66 6f 72	s")....(repopage-format.:initfor
18e60	6d 20 22 68 74 74 70 73 3a 2f 2f 67 69 74 6c 61 62 2e 63 6f 6d 2f 25 73 22 29 29 29 0a 0a 28 64	m."https://gitlab.com/%s")))..(d
18e80	65 66 63 6c 61 73 73 20 70 61 63 6b 61 67 65 2d 63 6f 64 65 62 65 72 67 2d 72 65 63 69 70 65 20	efclass.package-codeberg-recipe.
18ea0	28 70 61 63 6b 61 67 65 2d 67 69 74 2d 72 65 63 69 70 65 29 0a 20 20 28 28 75 72 6c 2d 66 6f 72	(package-git-recipe)...((url-for
18ec0	6d 61 74 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 63 6f 64 65	mat......:initform."https://code
18ee0	62 65 72 67 2e 6f 72 67 2f 25 73 22 29 0a 20 20 20 28 72 65 70 6f 70 61 67 65 2d 66 6f 72 6d 61	berg.org/%s")....(repopage-forma
18f00	74 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 63 6f 64 65 62 65 72 67 2e 6f 72	t.:initform."https://codeberg.or
18f20	67 2f 25 73 22 29 29 29 0a 0a 28 64 65 66 63 6c 61 73 73 20 70 61 63 6b 61 67 65 2d 73 6f 75 72	g/%s")))..(defclass.package-sour
18f40	63 65 68 75 74 2d 72 65 63 69 70 65 20 28 70 61 63 6b 61 67 65 2d 67 69 74 2d 72 65 63 69 70 65	cehut-recipe.(package-git-recipe
18f60	29 0a 20 20 28 28 75 72 6c 2d 66 6f 72 6d 61 74 20 20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20	)...((url-format......:initform.
18f80	22 68 74 74 70 73 3a 2f 2f 67 69 74 2e 73 72 2e 68 74 2f 7e 25 73 22 29 0a 20 20 20 28 72 65 70	"https://git.sr.ht/~%s")....(rep
18fa0	6f 70 61 67 65 2d 66 6f 72 6d 61 74 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f	opage-format.:initform."https://
18fc0	67 69 74 2e 73 72 2e 68 74 2f 7e 25 73 22 29 29 29 0a 0a 3b 3b 3b 3b 20 4d 65 72 63 75 72 69 61	git.sr.ht/~%s")))..;;;;.Mercuria
18fe0	6c 0a 0a 28 64 65 66 63 6c 61 73 73 20 70 61 63 6b 61 67 65 2d 68 67 2d 72 65 63 69 70 65 20 28	l..(defclass.package-hg-recipe.(
19000	70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 29 20 28 29 29 0a 0a 28 64 65 66 63 6c 61 73 73 20 70	package-recipe).())..(defclass.p
19020	61 63 6b 61 67 65 2d 67 69 74 2d 72 65 6d 6f 74 65 2d 68 67 2d 72 65 63 69 70 65 20 28 70 61 63	ackage-git-remote-hg-recipe.(pac
19040	6b 61 67 65 2d 67 69 74 2d 72 65 63 69 70 65 29 20 28 29 29 0a 0a 3b 3b 3b 20 4d 65 74 68 6f 64	kage-git-recipe).())..;;;.Method
19060	73 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d	s..(cl-defmethod.package-recipe-
19080	2d 77 6f 72 6b 69 6e 67 2d 74 72 65 65 20 28 28 72 63 70 20 70 61 63 6b 61 67 65 2d 72 65 63 69	-working-tree.((rcp.package-reci
190a0	70 65 29 29 0a 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 0a 20	pe))...(file-name-as-directory..
190c0	20 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 28 6f 72 65 66 20 72 63 70 20 6e 61	..(expand-file-name.(oref.rcp.na
190e0	6d 65 29 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 77 6f 72 6b 69 6e 67 2d 64 69 72 29 29 29	me).package-build-working-dir)))
19100	0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 2d	..(cl-defmethod.package-recipe--
19120	75 70 73 74 72 65 61 6d 2d 70 72 6f 74 6f 63 6f 6c 20 28 28 72 63 70 20 70 61 63 6b 61 67 65 2d	upstream-protocol.((rcp.package-
19140	72 65 63 69 70 65 29 29 0a 20 20 28 6c 65 74 20 28 28 75 72 6c 20 28 6f 72 65 66 20 72 63 70 20	recipe))...(let.((url.(oref.rcp.
19160	75 72 6c 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 20 28 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20	url))).....(cond.((string-match.
19180	22 5c 5c 60 5c 5c 28 5b 61 2d 7a 5d 2b 5c 5c 29 3a 2f 2f 22 20 75 72 6c 29 0a 20 20 20 20 20 20	"\\`\$[a-z]+\$://".url).......
191a0	20 20 20 20 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 31 20 75 72 6c 29 29 0a 20 20 20 20 20	.....(match-string.1.url))......
191c0	20 20 20 20 20 28 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 5c 5c 60 5b 5e 3a 2f 20 5d 2b 3a	.....((string-match."\\`[^:/.]+:
191e0	22 20 75 72 6c 29 20 22 73 73 68 22 29 0a 20 20 20 20 20 20 20 20 20 20 28 74 20 22 66 69 6c 65	".url)."ssh")...........(t."file
19200	22 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 70 61 63 6b 61 67 65 2d 72 65 63	"))))..(cl-defmethod.package-rec
19220	69 70 65 2d 2d 66 65 74 63 68 65 72 20 28 28 72 63 70 20 70 61 63 6b 61 67 65 2d 72 65 63 69 70	ipe--fetcher.((rcp.package-recip
19240	65 29 29 0a 20 20 28 73 75 62 73 74 72 69 6e 67 20 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 28 65	e))...(substring.(symbol-name.(e
19260	69 65 69 6f 2d 6f 62 6a 65 63 74 2d 63 6c 61 73 73 20 72 63 70 29 29 20 38 20 2d 37 29 29 0a 0a	ieio-object-class.rcp)).8.-7))..
19280	3b 3b 3b 20 43 6f 6e 73 74 61 6e 74 73 0a 0a 28 64 65 66 63 6f 6e 73 74 20 70 61 63 6b 61 67 65	;;;.Constants..(defconst.package
192a0	2d 72 65 63 69 70 65 2d 2d 66 6f 72 67 65 2d 66 65 74 63 68 65 72 73 0a 20 20 27 28 67 69 74 68	-recipe--forge-fetchers...'(gith
192c0	75 62 20 67 69 74 6c 61 62 20 63 6f 64 65 62 65 72 67 20 73 6f 75 72 63 65 68 75 74 29 29 0a 0a	ub.gitlab.codeberg.sourcehut))..
192e0	28 64 65 66 63 6f 6e 73 74 20 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 2d 66 65 74 63 68 65	(defconst.package-recipe--fetche
19300	72 73 0a 20 20 28 61 70 70 65 6e 64 20 27 28 67 69 74 20 68 67 29 20 70 61 63 6b 61 67 65 2d 72	rs...(append.'(git.hg).package-r
19320	65 63 69 70 65 2d 2d 66 6f 72 67 65 2d 66 65 74 63 68 65 72 73 29 29 0a 0a 3b 3b 3b 20 49 6e 74	ecipe--forge-fetchers))..;;;.Int
19340	65 72 66 61 63 65 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 72 65	erface..(defun.package-recipe-re
19360	63 69 70 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 20 74 68 65	cipes.()..."Return.a.list.of.the
19380	20 6e 61 6d 65 73 20 6f 66 20 70 61 63 6b 61 67 65 73 20 77 69 74 68 20 61 76 61 69 6c 61 62 6c	.names.of.packages.with.availabl
193a0	65 20 72 65 63 69 70 65 73 2e 22 0a 20 20 28 64 69 72 65 63 74 6f 72 79 2d 66 69 6c 65 73 20 70	e.recipes."...(directory-files.p
193c0	61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 72 65 63 69 70 65 73 2d 64 69 72 20 6e 69 6c 20 22 5e 5b	ackage-build-recipes-dir.nil."^[
193e0	5e 2e 5d 22 29 29 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 72 65	^.]"))..(defun.package-recipe-re
19400	61 64 2d 6e 61 6d 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20 70 72 6f 6d 70 74 29 0a 20 20 22 52 65	ad-name.(&optional.prompt)..."Re
19420	61 64 20 74 68 65 20 6e 61 6d 65 20 6f 66 20 61 20 70 61 63 6b 61 67 65 20 66 6f 72 20 77 68 69	ad.the.name.of.a.package.for.whi
19440	63 68 20 61 20 72 65 63 69 70 65 20 69 73 20 61 76 61 69 6c 61 62 6c 65 2e 22 0a 20 20 28 63 6f	ch.a.recipe.is.available."...(co
19460	6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 20 28 6f 72 20 70 72 6f 6d 70 74 20 22 50 61 63 6b 61 67	mpleting-read.(or.prompt."Packag
19480	65 3a 20 22 29 20 28 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 72 65 63 69 70 65 73 29 29 29	e:.").(package-recipe-recipes)))
194a0	0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 6c 6f 6f 6b 75 70 20 28	..(defun.package-recipe-lookup.(
194c0	6e 61 6d 65 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 72 65 63 69 70 65 20 6f 62 6a 65 63 74 20	name)..."Return.a.recipe.object.
194e0	66 6f 72 20 74 68 65 20 70 61 63 6b 61 67 65 20 6e 61 6d 65 64 20 4e 41 4d 45 2e 0a 49 66 20 6e	for.the.package.named.NAME..If.n
19500	6f 20 73 75 63 68 20 72 65 63 69 70 65 20 66 69 6c 65 20 65 78 69 73 74 73 20 6f 72 20 69 66 20	o.such.recipe.file.exists.or.if.
19520	74 68 65 20 63 6f 6e 74 65 6e 74 73 20 6f 66 20 74 68 65 20 72 65 63 69 70 65 0a 66 69 6c 65 20	the.contents.of.the.recipe.file.
19540	69 73 20 69 6e 76 61 6c 69 64 2c 20 74 68 65 6e 20 72 61 69 73 65 20 61 6e 20 65 72 72 6f 72 2e	is.invalid,.then.raise.an.error.
19560	22 0a 20 20 28 6c 65 74 20 28 28 66 69 6c 65 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d	"...(let.((file.(expand-file-nam
19580	65 20 6e 61 6d 65 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 72 65 63 69 70 65 73 2d 64 69 72	e.name.package-build-recipes-dir
195a0	29 29 29 0a 20 20 20 20 28 69 66 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 66 69 6c 65 29	))).....(if.(file-exists-p.file)
195c0	0a 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 72 65 63 69 70 65 20 28 77 69 74 68 2d 74 65	.........(let*.((recipe.(with-te
195e0	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 20 20 20 20 20 20 20	mp-buffer.......................
19600	20 20 20 28 69 6e 73 65 72 74 2d 66 69 6c 65 2d 63 6f 6e 74 65 6e 74 73 20 66 69 6c 65 29 0a 20	...(insert-file-contents.file)..
19620	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 61 64 20 28 63	........................(read.(c
19640	75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	urrent-buffer))))...............
19660	20 28 70 6c 69 73 74 20 28 63 64 72 20 72 65 63 69 70 65 29 29 0a 20 20 20 20 20 20 20 20 20 20	.(plist.(cdr.recipe))...........
19680	20 20 20 20 20 28 66 65 74 63 68 65 72 20 28 70 6c 69 73 74 2d 67 65 74 20 70 6c 69 73 74 20 3a	.....(fetcher.(plist-get.plist.:
196a0	66 65 74 63 68 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6b 65 79 20 76 61 6c	fetcher))................key.val
196c0	20 61 72 67 73 20 72 63 70 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 72 65	.args.rcp)...........(package-re
196e0	63 69 70 65 2d 2d 76 61 6c 69 64 61 74 65 20 72 65 63 69 70 65 20 6e 61 6d 65 29 0a 20 20 20 20	cipe--validate.recipe.name).....
19700	20 20 20 20 20 20 28 77 68 69 6c 65 20 28 73 65 74 71 20 6b 65 79 20 28 70 6f 70 20 70 6c 69 73	......(while.(setq.key.(pop.plis
19720	74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 76 61 6c 20 28 70 6f 70 20 70	t)).............(setq.val.(pop.p
19740	6c 69 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 65 71 20 6b	list)).............(unless.(eq.k
19760	65 79 20 3a 66 65 74 63 68 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68	ey.:fetcher)...............(push
19780	20 76 61 6c 20 61 72 67 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 6b	.val.args)...............(push.k
197a0	65 79 20 61 72 67 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20	ey.args)))...........(when.(and.
197c0	70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 75 73 65 2d 67 69 74 2d 72 65 6d 6f 74 65 2d 68 67 20	package-build-use-git-remote-hg.
197e0	28 65 71 20 66 65 74 63 68 65 72 20 27 68 67 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73	(eq.fetcher.'hg)).............(s
19800	65 74 71 20 66 65 74 63 68 65 72 20 27 67 69 74 2d 72 65 6d 6f 74 65 2d 68 67 29 0a 20 20 20 20	etq.fetcher.'git-remote-hg).....
19820	20 20 20 20 20 20 20 20 28 73 65 74 71 20 61 72 67 73 20 28 70 6c 69 73 74 2d 70 75 74 20 61 72	........(setq.args.(plist-put.ar
19840	67 73 20 3a 75 72 6c 20 28 63 6f 6e 63 61 74 20 22 68 67 3a 3a 22 20 28 6f 72 65 66 20 72 63 70	gs.:url.(concat."hg::".(oref.rcp
19860	20 75 72 6c 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 72 63 70 20 28 61	.url)))))...........(setq.rcp.(a
19880	70 70 6c 79 20 28 69 6e 74 65 72 6e 20 28 66 6f 72 6d 61 74 20 22 70 61 63 6b 61 67 65 2d 25 73	pply.(intern.(format."package-%s
198a0	2d 72 65 63 69 70 65 22 20 66 65 74 63 68 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	-recipe".fetcher))..............
198c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6e 61 6d 65 20 6e 61 6d 65 20 61 72 67 73 29 29 0a	..............:name.name.args)).
198e0	20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 6f 72 65 66 20 72 63 70 20 75 72 6c 29	..........(unless.(oref.rcp.url)
19900	0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 73 65 74 20 72 63 70 20 75 72 6c 20 28 66 6f 72 6d	.............(oset.rcp.url.(form
19920	61 74 20 28 6f 72 65 66 20 72 63 70 20 75 72 6c 2d 66 6f 72 6d 61 74 29 20 28 6f 72 65 66 20 72	at.(oref.rcp.url-format).(oref.r
19940	63 70 20 72 65 70 6f 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 72 63 70 29 0a 20 20 20 20 20	cp.repo))))...........rcp)......
19960	20 28 65 72 72 6f 72 20 22 4e 6f 20 73 75 63 68 20 72 65 63 69 70 65 3a 20 25 73 22 20 6e 61 6d	.(error."No.such.recipe:.%s".nam
19980	65 29 29 29 29 0a 0a 3b 3b 3b 20 56 61 6c 69 64 61 74 69 6f 6e 0a 0a 3b 3b 3b 23 23 23 61 75 74	e))))..;;;.Validation..;;;###aut
199a0	6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 76 61 6c 69	oload.(defun.package-recipe-vali
199c0	64 61 74 65 2d 61 6c 6c 20 28 29 0a 20 20 22 56 61 6c 69 64 61 74 65 20 61 6c 6c 20 70 61 63 6b	date-all.()..."Validate.all.pack
199e0	61 67 65 20 72 65 63 69 70 65 73 2e 0a 52 65 74 75 72 6e 20 61 20 62 6f 6f 6c 65 61 6e 20 69 6e	age.recipes..Return.a.boolean.in
19a00	64 69 63 61 74 69 6e 67 20 77 68 65 74 68 65 72 20 61 6c 6c 20 72 65 63 69 70 65 73 20 61 72 65	dicating.whether.all.recipes.are
19a20	20 76 61 6c 69 64 20 61 6e 64 20 73 68 6f 77 0a 61 20 6d 65 73 73 61 67 65 20 66 6f 72 20 65 61	.valid.and.show.a.message.for.ea
19a40	63 68 20 69 6e 76 61 6c 69 64 20 72 65 63 69 70 65 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69	ch.invalid.recipe."...(interacti
19a60	76 65 29 0a 20 20 28 6c 65 74 20 28 28 61 6c 6c 2d 76 61 6c 69 64 20 74 29 29 0a 20 20 20 20 28	ve)...(let.((all-valid.t)).....(
19a80	64 6f 6c 69 73 74 2d 77 69 74 68 2d 70 72 6f 67 72 65 73 73 2d 72 65 70 6f 72 74 65 72 20 28 6e	dolist-with-progress-reporter.(n
19aa0	61 6d 65 20 28 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 72 65 63 69 70 65 73 29 29 0a 20 20	ame.(package-recipe-recipes))...
19ac0	20 20 20 20 20 20 22 56 61 6c 69 64 61 74 69 6e 67 20 72 65 63 69 70 65 73 2e 2e 2e 22 0a 20 20	......"Validating.recipes..."...
19ae0	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 20	....(condition-case.err.........
19b00	20 20 28 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 6c 6f 6f 6b 75 70 20 6e 61 6d 65 29 0a 20	..(package-recipe-lookup.name)..
19b20	20 20 20 20 20 20 20 28 65 72 72 6f 72 20 28 6d 65 73 73 61 67 65 20 22 49 6e 76 61 6c 69 64 20	.......(error.(message."Invalid.
19b40	72 65 63 69 70 65 20 66 6f 72 20 25 73 3a 20 25 53 22 20 6e 61 6d 65 20 28 63 64 72 20 65 72 72	recipe.for.%s:.%S".name.(cdr.err
19b60	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 61 6c 6c 2d 76 61 6c 69	))................(setq.all-vali
19b80	64 20 6e 69 6c 29 29 29 29 0a 20 20 20 20 61 6c 6c 2d 76 61 6c 69 64 29 29 0a 0a 28 64 65 66 75	d.nil)))).....all-valid))..(defu
19ba0	6e 20 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 2d 76 61 6c 69 64 61 74 65 20 28 72 65 63 69	n.package-recipe--validate.(reci
19bc0	70 65 20 6e 61 6d 65 29 0a 20 20 22 50 65 72 66 6f 72 6d 20 73 6f 6d 65 20 62 61 73 69 63 20 63	pe.name)..."Perform.some.basic.c
19be0	68 65 63 6b 73 20 6f 6e 20 74 68 65 20 72 61 77 20 52 45 43 49 50 45 20 66 6f 72 20 74 68 65 20	hecks.on.the.raw.RECIPE.for.the.
19c00	70 61 63 6b 61 67 65 20 6e 61 6d 65 64 20 4e 41 4d 45 2e 22 0a 20 20 28 70 63 61 73 65 2d 6c 65	package.named.NAME."...(pcase-le
19c20	74 20 28 28 60 28 2c 69 64 65 6e 74 20 2e 20 2c 70 6c 69 73 74 29 20 72 65 63 69 70 65 29 29 0a	t.((`(,ident...,plist).recipe)).
19c40	20 20 20 20 28 63 6c 2d 61 73 73 65 72 74 20 69 64 65 6e 74 29 0a 20 20 20 20 28 63 6c 2d 61 73	....(cl-assert.ident).....(cl-as
19c60	73 65 72 74 20 28 73 79 6d 62 6f 6c 70 20 69 64 65 6e 74 29 29 0a 20 20 20 20 28 63 6c 2d 61 73	sert.(symbolp.ident)).....(cl-as
19c80	73 65 72 74 20 28 73 74 72 69 6e 67 3d 20 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 69 64 65 6e 74	sert.(string=.(symbol-name.ident
19ca0	29 20 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 20 22 52 65 63 69	).name)................nil."Reci
19cc0	70 65 20 27 25 73 27 20 63 6f 6e 74 61 69 6e 73 20 6d 69 73 6d 61 74 63 68 65 64 20 70 61 63 6b	pe.'%s'.contains.mismatched.pack
19ce0	61 67 65 20 6e 61 6d 65 20 27 25 73 27 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 61	age.name.'%s'"................na
19d00	6d 65 20 69 64 65 6e 74 29 0a 20 20 20 20 28 63 6c 2d 61 73 73 65 72 74 20 70 6c 69 73 74 29 0a	me.ident).....(cl-assert.plist).
19d20	20 20 20 20 28 6c 65 74 2a 20 28 28 73 79 6d 62 6f 6c 2d 6b 65 79 73 20 27 28 3a 66 65 74 63 68	....(let*.((symbol-keys.'(:fetch
19d40	65 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 2d 6b 65 79 73 20 27 28 20	er))............(string-keys.'(.
19d60	3a 75 72 6c 20 3a 72 65 70 6f 20 3a 63 6f 6d 6d 69 74 20 3a 62 72 61 6e 63 68 0a 20 20 20 20 20	:url.:repo.:commit.:branch......
19d80	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 76 65 72 73 69 6f 6e 2d 72	......................:version-r
19da0	65 67 65 78 70 20 3a 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e 64 29 29 0a 20 20 20 20 20 20 20 20 20	egexp.:shell-command))..........
19dc0	20 20 28 6c 69 73 74 2d 6b 65 79 73 20 27 28 3a 66 69 6c 65 73 20 3a 6d 61 6b 65 2d 74 61 72 67	..(list-keys.'(:files.:make-targ
19de0	65 74 73 20 3a 6f 72 67 2d 65 78 70 6f 72 74 73 20 3a 6f 6c 64 2d 6e 61 6d 65 73 29 29 0a 20 20	ets.:org-exports.:old-names))...
19e00	20 20 20 20 20 20 20 20 20 28 61 6c 6c 2d 6b 65 79 73 20 28 61 70 70 65 6e 64 20 73 79 6d 62 6f	.........(all-keys.(append.symbo
19e20	6c 2d 6b 65 79 73 20 73 74 72 69 6e 67 2d 6b 65 79 73 20 6c 69 73 74 2d 6b 65 79 73 29 29 29 0a	l-keys.string-keys.list-keys))).
19e40	20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 74 68 69 6e 67 20 70 6c 69 73 74 29 0a 20 20 20 20	......(dolist.(thing.plist).....
19e60	20 20 20 20 28 77 68 65 6e 20 28 6b 65 79 77 6f 72 64 70 20 74 68 69 6e 67 29 0a 20 20 20 20 20	....(when.(keywordp.thing)......
19e80	20 20 20 20 20 28 63 6c 2d 61 73 73 65 72 74 20 28 6d 65 6d 71 20 74 68 69 6e 67 20 61 6c 6c 2d	.....(cl-assert.(memq.thing.all-
19ea0	6b 65 79 73 29 20 6e 69 6c 20 22 55 6e 6b 6e 6f 77 6e 20 6b 65 79 77 6f 72 64 20 25 53 22 20 74	keys).nil."Unknown.keyword.%S".t
19ec0	68 69 6e 67 29 29 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 66 65 74 63 68 65 72 20 28 70 6c	hing))).......(let.((fetcher.(pl
19ee0	69 73 74 2d 67 65 74 20 70 6c 69 73 74 20 3a 66 65 74 63 68 65 72 29 29 29 0a 20 20 20 20 20 20	ist-get.plist.:fetcher))).......
19f00	20 20 28 63 6c 2d 61 73 73 65 72 74 20 66 65 74 63 68 65 72 20 6e 69 6c 20 22 3a 66 65 74 63 68	..(cl-assert.fetcher.nil.":fetch
19f20	65 72 20 69 73 20 6d 69 73 73 69 6e 67 22 29 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 6d 65 6d	er.is.missing").........(if.(mem
19f40	71 20 66 65 74 63 68 65 72 20 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 2d 66 6f 72 67 65 2d	q.fetcher.package-recipe--forge-
19f60	66 65 74 63 68 65 72 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20	fetchers).............(progn....
19f80	20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 61 73 73 65 72 74 20 28 70 6c 69 73 74 2d 67 65 74	...........(cl-assert.(plist-get
19fa0	20 70 6c 69 73 74 20 3a 72 65 70 6f 29 20 22 3a 72 65 70 6f 20 69 73 20 6d 69 73 73 69 6e 67 22	.plist.:repo).":repo.is.missing"
19fc0	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 61 73 73 65 72 74 20 28 6e 6f 74 20	)...............(cl-assert.(not.
19fe0	28 70 6c 69 73 74 2d 67 65 74 20 70 6c 69 73 74 20 3a 75 72 6c 29 29 20 22 3a 75 72 6c 20 69 73	(plist-get.plist.:url)).":url.is
1a000	20 72 65 64 75 6e 64 61 6e 74 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 61 73 73 65	.redundant"))...........(cl-asse
1a020	72 74 20 28 70 6c 69 73 74 2d 67 65 74 20 70 6c 69 73 74 20 3a 75 72 6c 29 20 22 3a 75 72 6c 20	rt.(plist-get.plist.:url).":url.
1a040	69 73 20 6d 69 73 73 69 6e 67 22 29 29 29 0a 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 6b 65	is.missing"))).......(dolist.(ke
1a060	79 20 73 79 6d 62 6f 6c 2d 6b 65 79 73 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 2d 6c 65 74	y.symbol-keys).........(when-let
1a080	20 28 28 76 61 6c 20 28 70 6c 69 73 74 2d 67 65 74 20 70 6c 69 73 74 20 6b 65 79 29 29 29 0a 20	.((val.(plist-get.plist.key)))..
1a0a0	20 20 20 20 20 20 20 20 20 28 63 6c 2d 61 73 73 65 72 74 20 28 73 79 6d 62 6f 6c 70 20 76 61 6c	.........(cl-assert.(symbolp.val
1a0c0	29 20 6e 69 6c 20 22 25 73 20 6d 75 73 74 20 62 65 20 61 20 73 79 6d 62 6f 6c 20 62 75 74 20 69	).nil."%s.must.be.a.symbol.but.i
1a0e0	73 20 25 53 22 20 6b 65 79 20 76 61 6c 29 29 29 0a 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28	s.%S".key.val))).......(dolist.(
1a100	6b 65 79 20 6c 69 73 74 2d 6b 65 79 73 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 2d 6c 65 74	key.list-keys).........(when-let
1a120	20 28 28 76 61 6c 20 28 70 6c 69 73 74 2d 67 65 74 20 70 6c 69 73 74 20 6b 65 79 29 29 29 0a 20	.((val.(plist-get.plist.key)))..
1a140	20 20 20 20 20 20 20 20 20 28 63 6c 2d 61 73 73 65 72 74 20 28 6c 69 73 74 70 20 76 61 6c 29 20	.........(cl-assert.(listp.val).
1a160	6e 69 6c 20 22 25 73 20 6d 75 73 74 20 62 65 20 61 20 6c 69 73 74 20 62 75 74 20 69 73 20 25 53	nil."%s.must.be.a.list.but.is.%S
1a180	22 20 6b 65 79 20 76 61 6c 29 29 29 0a 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 6b 65 79 20	".key.val))).......(dolist.(key.
1a1a0	73 74 72 69 6e 67 2d 6b 65 79 73 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 2d 6c 65 74 20 28	string-keys).........(when-let.(
1a1c0	28 76 61 6c 20 28 70 6c 69 73 74 2d 67 65 74 20 70 6c 69 73 74 20 6b 65 79 29 29 29 0a 20 20 20	(val.(plist-get.plist.key)))....
1a1e0	20 20 20 20 20 20 20 28 63 6c 2d 61 73 73 65 72 74 20 28 73 74 72 69 6e 67 70 20 76 61 6c 29 20	.......(cl-assert.(stringp.val).
1a200	6e 69 6c 20 22 25 73 20 6d 75 73 74 20 62 65 20 61 20 73 74 72 69 6e 67 20 62 75 74 20 69 73 20	nil."%s.must.be.a.string.but.is.
1a220	25 53 22 20 6b 65 79 20 76 61 6c 29 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 2d 6c 65 74 20 28	%S".key.val))).......(when-let.(
1a240	28 73 70 65 63 20 28 70 6c 69 73 74 2d 67 65 74 20 70 6c 69 73 74 20 3a 66 69 6c 65 73 29 29 29	(spec.(plist-get.plist.:files)))
1a260	0a 20 20 20 20 20 20 20 20 3b 3b 20 60 3a 64 65 66 61 75 6c 74 73 27 20 69 73 20 6f 6e 6c 79 20	.........;;.`:defaults'.is.only.
1a280	61 6c 6c 6f 77 65 64 20 61 73 20 74 68 65 20 66 69 72 73 74 20 65 6c 65 6d 65 6e 74 2e 0a 20 20	allowed.as.the.first.element....
1a2a0	20 20 20 20 20 20 3b 3b 20 49 66 20 77 65 20 66 69 6e 64 20 69 74 20 69 6e 20 74 68 61 74 20 70	......;;.If.we.find.it.in.that.p
1a2c0	6f 73 69 74 69 6f 6e 2c 20 73 6b 69 70 20 6f 76 65 72 20 69 74 2e 0a 20 20 20 20 20 20 20 20 28	osition,.skip.over.it..........(
1a2e0	77 68 65 6e 20 28 65 71 20 28 63 61 72 20 73 70 65 63 29 20 3a 64 65 66 61 75 6c 74 73 29 0a 20	when.(eq.(car.spec).:defaults)..
1a300	20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 73 70 65 63 20 28 63 64 72 20 73 70 65 63 29 29 29	.........(setq.spec.(cdr.spec)))
1a320	0a 20 20 20 20 20 20 20 20 3b 3b 20 41 6c 6c 20 6f 74 68 65 72 20 65 6c 65 6d 65 6e 74 73 20 68	.........;;.All.other.elements.h
1a340	61 76 65 20 74 6f 20 62 65 20 73 74 72 69 6e 67 73 20 6f 72 20 6c 69 73 74 73 20 6f 66 20 73 74	ave.to.be.strings.or.lists.of.st
1a360	72 69 6e 67 73 2e 0a 20 20 20 20 20 20 20 20 3b 3b 20 4c 69 73 74 73 20 77 68 6f 73 65 20 66 69	rings..........;;.Lists.whose.fi
1a380	72 73 74 20 65 6c 65 6d 65 6e 74 20 69 73 20 60 3a 65 78 63 6c 75 64 65 27 2c 20 60 3a 69 6e 70	rst.element.is.`:exclude',.`:inp
1a3a0	75 74 73 27 20 6f 72 0a 20 20 20 20 20 20 20 20 3b 3b 20 60 3a 72 65 6e 61 6d 65 27 20 61 72 65	uts'.or.........;;.`:rename'.are
1a3c0	20 61 6c 73 6f 20 76 61 6c 69 64 2e 0a 20 20 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 65 6e	.also.valid..........(dolist.(en
1a3e0	74 72 79 20 73 70 65 63 29 0a 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 63 6f 6e	try.spec)...........(unless.(con
1a400	64 20 28 28 73 74 72 69 6e 67 70 20 65 6e 74 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	d.((stringp.entry)..............
1a420	20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 65 71 75 61 6c 20 65 6e 74 72 79 20 22 2a	............(not.(equal.entry."*
1a440	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 20 20 20 20 28 28 6c	"))).........................((l
1a460	69 73 74 70 20 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	istp.entry).....................
1a480	20 20 20 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 67 6c 6f 62 73 20 28 63 64 72 20 65 6e 74 72	.....(and-let*.((globs.(cdr.entr
1a4a0	79 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	y)))............................
1a4c0	28 61 6e 64 20 28 6f 72 20 28 6d 65 6d 71 20 28 63 61 72 20 65 6e 74 72 79 29 0a 20 20 20 20 20	(and.(or.(memq.(car.entry)......
1a4e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
1a500	20 20 20 20 20 27 28 3a 65 78 63 6c 75 64 65 20 3a 69 6e 70 75 74 73 20 3a 72 65 6e 61 6d 65 29	.....'(:exclude.:inputs.:rename)
1a520	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	)...............................
1a540	20 20 20 20 20 20 28 73 74 72 69 6e 67 70 20 28 63 61 72 20 65 6e 74 72 79 29 29 29 0a 20 20 20	......(stringp.(car.entry)))....
1a560	20 20 20 20 20 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 65	.............................(se
1a580	71 2d 65 76 65 72 79 2d 70 20 28 6c 61 6d 62 64 61 20 28 67 6c 6f 62 29 0a 20 20 20 20 20 20 20	q-every-p.(lambda.(glob)........
1a5a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
1a5c0	20 20 20 20 20 20 20 20 28 61 6e 64 20 28 73 74 72 69 6e 67 70 20 67 6c 6f 62 29 0a 20 20 20 20	........(and.(stringp.glob).....
1a5e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
1a600	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 65 71 75 61 6c 20 67 6c 6f 62	................(not.(equal.glob
1a620	20 22 2a 22 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	."*"))))........................
1a640	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 67 6c 6f 62 73 29 29 29 29 29	......................globs)))))
1a660	0a 20 20 20 20 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 49 6e 76 61 6c 69 64 20 66 69 6c	.............(error."Invalid.fil
1a680	65 73 20 73 70 65 63 20 65 6e 74 72 79 20 25 53 22 20 65 6e 74 72 79 29 29 29 29 0a 20 20 20 20	es.spec.entry.%S".entry)))).....
1a6a0	20 20 3b 3b 20 53 69 6c 65 6e 63 65 20 62 79 74 65 20 63 6f 6d 70 69 6c 65 72 20 6f 66 20 45 6d	..;;.Silence.byte.compiler.of.Em
1a6c0	61 63 73 20 32 38 2e 20 20 49 74 20 61 70 70 65 61 72 73 20 74 68 61 74 20 75 73 65 73 0a 20 20	acs.28...It.appears.that.uses...
1a6e0	20 20 20 20 3b 3b 20 69 6e 73 69 64 65 20 63 6c 2d 61 73 73 65 72 74 20 73 6f 6d 65 74 69 6d 65	....;;.inside.cl-assert.sometime
1a700	73 2c 20 62 75 74 20 6e 6f 74 20 61 6c 77 61 79 73 2c 20 64 6f 20 6e 6f 74 20 63 6f 75 6e 74 2e	s,.but.not.always,.do.not.count.
1a720	0a 20 20 20 20 20 20 28 6c 69 73 74 20 6e 61 6d 65 20 69 64 65 6e 74 20 61 6c 6c 2d 6b 65 79 73	.......(list.name.ident.all-keys
1a740	29 29 0a 20 20 20 20 72 65 63 69 70 65 29 29 0a 0a 28 70 72 6f 76 69 64 65 20 27 70 61 63 6b 61	)).....recipe))..(provide.'packa
1a760	67 65 2d 72 65 63 69 70 65 29 0a 3b 3b 3b 20 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2e 65 6c	ge-recipe).;;;.package-recipe.el
1a780	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......................
1a7a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a7c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a7e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a800	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a820	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a840	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a860	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a880	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a8a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a8c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a8e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a900	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a920	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a940	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a960	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a980	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a9a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a9c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a9e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1aa00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1aa20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1aa40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1aa60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1aa80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1aaa0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1aac0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1aae0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1ab00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1ab20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1ab40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1ab60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1ab80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1aba0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1abc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1abe0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1ac00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1ac20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1ac40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1ac60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1ac80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1aca0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1acc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1ace0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1ad00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1ad20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1ad40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1ad60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1ad80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1ada0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1adc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1ade0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1ae00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1ae20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1ae40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1ae60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1ae80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1aea0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1aec0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1aee0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1af00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1af20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1af40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1af60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1af80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1afa0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1afc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1afe0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b000	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b020	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b040	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b060	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b080	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b0a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b0c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b0e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b100	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b120	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b140	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b160	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b180	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b1a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b1c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b1e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b200	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b220	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b240	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b260	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b280	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b2a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b2c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b2e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b300	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b320	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b340	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b360	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b380	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b3a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b3c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b3e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b400	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b420	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b440	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b460	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b480	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b4a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b4c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b4e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b500	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b520	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b540	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b560	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b580	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b5a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b5c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b5e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b600	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b620	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b640	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b660	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b680	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b6a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b6c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b6e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b700	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b720	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b740	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b760	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b780	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b7a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b7c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1b7e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................