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

blob: 2d5df205437523c3b2a13c6f63757ed530866d07 (plain)

ofs	hex dump	ascii
0000	70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 32 30 32 34 30 33 30 36 2e 32 32 33 34 2f 00 00 00 00	package-build-20240306.2234/....
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 34 37 34 00 20 35 00 00 00	0000000.00000000000.013474..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 34 30 33 30 36 2e 32 32 33 34 2f 70 61 63 6b	package-build-20240306.2234/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 32 36 36 37 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 37 37 34 35 00 20 30 00 00 00	0012667.00000000000.017745..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 34 20 4a 6f 6e 61 73 20	;.Copyright.(C).2018-2024.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 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	;;.Homepage:.https://github.com/
05a0	6d 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	melpa/package-build.;;.Keywords:
05c0	20 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	.maint.tools..;;.SPDX-License-Id
05e0	65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 65 72 0a 0a 3b 3b 20 54	entifier:.GPL-3.0-or-later..;;.T
0600	68 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	his.file.is.free.software:.you.c
0620	61 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	an.redistribute.it.and/or.modify
0640	0a 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	.;;.it.under.the.terms.of.the.GN
0660	55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 62 6c	U.General.Public.License.as.publ
0680	69 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	ished.;;.by.the.Free.Software.Fo
06a0	75 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	undation,.either.version.3.of.th
06c0	65 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	e.License,.;;.or.(at.your.option
06e0	29 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	).any.later.version..;;.;;.This.
0700	66 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	file.is.distributed.in.the.hope.
0720	74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b 3b 20 62 75 74 20 57	that.it.will.be.useful,.;;.but.W
0740	49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 76 65	ITHOUT.ANY.WARRANTY;.without.eve
0760	6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d 45 52	n.the.implied.warranty.of.;;.MER
0780	43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 50 41	CHANTABILITY.or.FITNESS.FOR.A.PA
07a0	52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 0a 3b 3b 20 47 4e	RTICULAR.PURPOSE...See.the.;;.GN
07c0	55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72	U.General.Public.License.for.mor
07e0	65 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	e.details..;;.;;.You.should.have
0800	20 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	.received.a.copy.of.the.GNU.Gene
0820	72 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	ral.Public.License.;;.along.with
0840	20 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	.this.file...If.not,.see.<https:
0860	2f 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	//www.gnu.org/licenses/>...;;;.C
0880	6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 20 43 72 65 61 74 65 20 62 61 64 67 65 73 20 66 6f 72	ommentary:..;;.Create.badges.for
08a0	20 70 61 63 6b 61 67 65 73 2e 0a 3b 3b 20 54 68 65 20 63 6f 64 65 20 69 6e 20 74 68 69 73 20 66	.packages..;;.The.code.in.this.f
08c0	69 6c 65 20 77 61 73 20 6c 69 66 74 65 64 20 66 72 6f 6d 20 60 65 6c 70 61 2d 61 64 6d 69 6e 27	ile.was.lifted.from.`elpa-admin'
08e0	2e 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 64 65 66 76 61 72 20 70 61 63 6b 61 67 65 2d 62 75	...;;;.Code:..(defvar.package-bu
0900	69 6c 64 2d 62 61 64 67 65 2d 64 61 74 61 29 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d	ild-badge-data)..(defun.package-
0920	62 75 69 6c 64 2d 2d 77 72 69 74 65 2d 62 61 64 67 65 2d 69 6d 61 67 65 20 28 20 6e 61 6d 65 20	build--write-badge-image.(.name.
0940	76 65 72 73 69 6f 6e 20 74 61 72 67 65 74 2d 64 69 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	version.target-dir..............
0960	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 26 6f 70	.............................&op
0980	74 69 6f 6e 61 6c 20 61 72 63 68 69 76 65 20 63 6f 6c 6f 72 29 0a 20 20 22 4d 61 6b 65 20 62 61	tional.archive.color)..."Make.ba
09a0	64 67 65 20 73 76 67 20 66 69 6c 65 2e 0a 54 68 69 73 20 69 73 20 65 73 73 65 6e 74 69 61 6c 6c	dge.svg.file..This.is.essentiall
09c0	79 20 61 20 63 6f 70 79 20 6f 66 20 60 65 6c 70 61 61 2d 2d 6d 61 6b 65 2d 62 61 64 67 65 27 2e	y.a.copy.of.`elpaa--make-badge'.
09e0	22 0a 20 20 28 6c 65 74 2a 20 28 28 66 69 6c 65 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61	"...(let*.((file.(expand-file-na
0a00	6d 65 20 28 63 6f 6e 63 61 74 20 6e 61 6d 65 20 22 2d 62 61 64 67 65 2e 73 76 67 22 29 20 74 61	me.(concat.name."-badge.svg").ta
0a20	72 67 65 74 2d 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 20 28 6c 65 66 74 20 28 6f 72 20 61 72	rget-dir))..........(left.(or.ar
0a40	63 68 69 76 65 20 28 63 61 72 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 62 61 64 67 65 2d 64	chive.(car.package-build-badge-d
0a60	61 74 61 29 20 22 6d 79 45 6c 70 61 22 29 29 0a 20 20 20 20 20 20 20 20 20 28 72 69 67 68 74 20	ata)."myElpa"))..........(right.
0a80	76 65 72 73 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 28 63 6f 6c 6f 72 20 28 6f 72 20 63 6f 6c	version)..........(color.(or.col
0aa0	6f 72 20 28 63 61 64 72 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 62 61 64 67 65 2d 64 61 74	or.(cadr.package-build-badge-dat
0ac0	61 29 20 22 23 66 66 34 39 31 62 22 29 29 0a 20 20 20 20 20 20 20 20 20 28 6c 77 20 28 70 61 63	a)."#ff491b"))..........(lw.(pac
0ae0	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 6c	kage-build-badge--string-width.l
0b00	65 66 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 72 77 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c	eft))..........(rw.(package-buil
0b20	64 2d 62 61 64 67 65 2d 2d 73 74 72 69 6e 67 2d 77 69 64 74 68 20 72 69 67 68 74 29 29 0a 20 20	d-badge--string-width.right))...
0b40	20 20 20 20 20 20 20 28 70 61 64 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 62 61 64 67 65	.......(pad.(package-build-badge
0b60	2d 2d 73 74 72 69 6e 67 2d 77 69 64 74 68 20 22 78 22 29 29 0a 20 20 20 20 20 20 20 20 20 28 77	--string-width."x"))..........(w
0b80	69 64 74 68 20 28 2f 20 28 2b 20 6c 77 20 72 77 20 28 2a 20 34 20 70 61 64 29 29 20 31 30 29 29	idth.(/.(+.lw.rw.(*.4.pad)).10))
0ba0	0a 20 20 20 20 20 20 20 20 20 28 6f 66 66 73 65 74 20 2d 31 30 29 20 3b 3b 20 53 6d 61 6c 6c 20	..........(offset.-10).;;.Small.
0bc0	61 6c 69 67 6e 6d 65 6e 74 20 63 6f 72 72 65 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 28 63	alignment.correction..........(c
0be0	74 78 20 60 28 28 6f 66 66 73 65 74 20 2e 20 2c 6f 66 66 73 65 74 29 0a 20 20 20 20 20 20 20 20	tx.`((offset...,offset).........
0c00	20 20 20 20 20 20 20 20 28 6c 65 66 74 20 2e 20 2c 6c 65 66 74 29 0a 20 20 20 20 20 20 20 20 20	........(left...,left)..........
0c20	20 20 20 20 20 20 20 28 72 69 67 68 74 20 2e 20 2c 72 69 67 68 74 29 0a 20 20 20 20 20 20 20 20	.......(right...,right).........
0c40	20 20 20 20 20 20 20 20 28 6c 77 20 2e 20 2c 6c 77 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	........(lw...,lw)..............
0c60	20 20 20 28 72 77 20 2e 20 2c 72 77 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77	...(rw...,rw).................(w
0c80	69 64 74 68 20 2e 20 2c 77 69 64 74 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	idth...,width).................(
0ca0	63 6f 6c 6f 72 20 2e 20 2c 63 6f 6c 6f 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	color...,color).................
0cc0	28 70 61 64 20 2e 20 2c 70 61 64 29 29 29 29 0a 20 20 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62	(pad...,pad)))).....(with-temp-b
0ce0	75 66 66 65 72 0a 20 20 20 20 20 20 28 69 6e 73 65 72 74 0a 20 20 20 20 20 20 20 28 72 65 70 6c	uffer.......(insert........(repl
0d00	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 22 7b 5c	ace-regexp-in-string........."{\
0d20	5c 28 5b 5e 7d 5d 2b 5c 5c 29 7d 22 0a 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 73 74	$[^}]+\$}".........(lambda.(st
0d40	72 29 0a 20 20 20 20 20 20 20 20 20 20 28 75 72 6c 2d 69 6e 73 65 72 74 2d 65 6e 74 69 74 69 65	r)...........(url-insert-entitie
0d60	73 2d 69 6e 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22	s-in-string............(format."
0d80	25 73 22 20 28 65 76 61 6c 20 28 72 65 61 64 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 31 20	%s".(eval.(read.(match-string.1.
0da0	73 74 72 29 29 20 63 74 78 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 65 76 61 6c 2d 77 68 65 6e	str)).ctx)))).........(eval-when
0dc0	2d 63 6f 6d 70 69 6c 65 0a 20 20 20 20 20 20 20 20 20 20 28 72 65 70 6c 61 63 65 2d 72 65 67 65	-compile...........(replace-rege
0de0	78 70 2d 69 6e 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 22 5b 20 5c 74 5c 6e 5d	xp-in-string............"[.\t\n]
0e00	2b 22 20 22 20 22 0a 20 20 20 20 20 20 20 20 20 20 20 28 72 65 70 6c 61 63 65 2d 72 65 67 65 78	+"."."............(replace-regex
0e20	70 2d 69 6e 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 22 27 22 20 22 5c 22 22	p-in-string............."'"."\""
0e40	0a 20 20 20 20 20 20 20 20 20 20 20 20 22 3c 3f 78 6d 6c 20 76 65 72 73 69 6f 6e 3d 27 31 2e 30	............."<?xml.version='1.0
0e60	27 3f 3e 0a 3c 73 76 67 20 78 6d 6c 6e 73 3d 27 68 74 74 70 3a 2f 2f 77 77 77 2e 77 33 2e 6f 72	'?>.<svg.xmlns='http://www.w3.or
0e80	67 2f 32 30 30 30 2f 73 76 67 27 0a 20 20 20 20 20 78 6d 6c 6e 73 3a 78 6c 69 6e 6b 3d 27 68 74	g/2000/svg'......xmlns:xlink='ht
0ea0	74 70 3a 2f 2f 77 77 77 2e 77 33 2e 6f 72 67 2f 31 39 39 39 2f 78 6c 69 6e 6b 27 0a 20 20 20 20	tp://www.w3.org/1999/xlink'.....
0ec0	20 77 69 64 74 68 3d 27 7b 77 69 64 74 68 7d 27 0a 20 20 20 20 20 68 65 69 67 68 74 3d 27 32 30	.width='{width}'......height='20
0ee0	27 0a 20 20 20 20 20 72 6f 6c 65 3d 27 69 6d 67 27 0a 20 20 20 20 20 61 72 69 61 2d 6c 61 62 65	'......role='img'......aria-labe
0f00	6c 3d 27 7b 6c 65 66 74 7d 3a 20 7b 72 69 67 68 74 7d 27 3e 0a 20 20 3c 74 69 74 6c 65 3e 7b 6c	l='{left}:.{right}'>...<title>{l
0f20	65 66 74 7d 3a 20 7b 72 69 67 68 74 7d 3c 2f 74 69 74 6c 65 3e 0a 20 20 3c 6c 69 6e 65 61 72 47	eft}:.{right}</title>...<linearG
0f40	72 61 64 69 65 6e 74 20 69 64 3d 27 73 27 20 78 32 3d 27 30 27 20 79 32 3d 27 31 30 30 25 27 3e	radient.id='s'.x2='0'.y2='100%'>
0f60	0a 20 20 20 20 3c 73 74 6f 70 20 6f 66 66 73 65 74 3d 27 30 27 20 73 74 6f 70 2d 63 6f 6c 6f 72	.....<stop.offset='0'.stop-color
0f80	3d 27 23 62 62 62 27 20 73 74 6f 70 2d 6f 70 61 63 69 74 79 3d 27 2e 31 27 2f 3e 0a 20 20 20 20	='#bbb'.stop-opacity='.1'/>.....
0fa0	3c 73 74 6f 70 20 6f 66 66 73 65 74 3d 27 31 27 20 73 74 6f 70 2d 6f 70 61 63 69 74 79 3d 27 2e	<stop.offset='1'.stop-opacity='.
0fc0	31 27 2f 3e 0a 20 20 3c 2f 6c 69 6e 65 61 72 47 72 61 64 69 65 6e 74 3e 0a 20 20 3c 63 6c 69 70	1'/>...</linearGradient>...<clip
0fe0	50 61 74 68 20 69 64 3d 27 72 27 3e 0a 20 20 20 20 3c 72 65 63 74 20 77 69 64 74 68 3d 27 7b 77	Path.id='r'>.....<rect.width='{w
1000	69 64 74 68 7d 27 20 68 65 69 67 68 74 3d 27 32 30 27 20 72 78 3d 27 33 27 20 66 69 6c 6c 3d 27	idth}'.height='20'.rx='3'.fill='
1020	23 66 66 66 27 2f 3e 0a 20 20 3c 2f 63 6c 69 70 50 61 74 68 3e 0a 20 20 3c 67 20 63 6c 69 70 2d	#fff'/>...</clipPath>...<g.clip-
1040	70 61 74 68 3d 27 75 72 6c 28 23 72 29 27 3e 0a 20 20 20 20 3c 72 65 63 74 20 77 69 64 74 68 3d	path='url(#r)'>.....<rect.width=
1060	27 7b 28 2f 20 28 2b 20 6c 77 20 28 2a 20 32 20 70 61 64 29 29 20 31 30 29 7d 27 0a 20 20 20 20	'{(/.(+.lw.(*.2.pad)).10)}'.....
1080	20 20 20 20 20 20 68 65 69 67 68 74 3d 27 32 30 27 20 66 69 6c 6c 3d 27 23 35 35 35 27 2f 3e 0a	......height='20'.fill='#555'/>.
10a0	20 20 20 20 3c 72 65 63 74 20 78 3d 27 7b 28 31 2d 20 28 2f 20 28 2b 20 6c 77 20 28 2a 20 32 20	....<rect.x='{(1-.(/.(+.lw.(*.2.
10c0	70 61 64 29 29 20 31 30 29 29 7d 27 0a 20 20 20 20 20 20 20 20 20 20 77 69 64 74 68 3d 27 7b 77	pad)).10))}'...........width='{w
10e0	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 7b 63 6f 6c 6f 72 7d	idth}'.height='20'.fill='{color}
1100	27 2f 3e 0a 20 20 20 20 3c 72 65 63 74 20 77 69 64 74 68 3d 27 7b 77 69 64 74 68 7d 27 20 68 65	'/>.....<rect.width='{width}'.he
1120	69 67 68 74 3d 27 32 30 27 20 66 69 6c 6c 3d 27 75 72 6c 28 23 73 29 27 2f 3e 0a 20 20 3c 2f 67	ight='20'.fill='url(#s)'/>...</g
1140	3e 0a 20 20 3c 67 20 66 69 6c 6c 3d 27 23 66 66 66 27 0a 20 20 20 20 20 74 65 78 74 2d 61 6e 63	>...<g.fill='#fff'......text-anc
1160	68 6f 72 3d 27 6d 69 64 64 6c 65 27 0a 20 20 20 20 20 66 6f 6e 74 2d 66 61 6d 69 6c 79 3d 27 56	hor='middle'......font-family='V
1180	65 72 64 61 6e 61 2c 47 65 6e 65 76 61 2c 44 65 6a 61 56 75 20 53 61 6e 73 2c 73 61 6e 73 2d 73	erdana,Geneva,DejaVu.Sans,sans-s
11a0	65 72 69 66 27 0a 20 20 20 20 20 66 6f 6e 74 2d 73 69 7a 65 3d 27 31 31 30 27 0a 20 20 20 20 20	erif'......font-size='110'......
11c0	74 65 78 74 2d 72 65 6e 64 65 72 69 6e 67 3d 27 67 65 6f 6d 65 74 72 69 63 50 72 65 63 69 73 69	text-rendering='geometricPrecisi
11e0	6f 6e 27 3e 0a 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	on'>.....<text.aria-hidden='true
1200	27 0a 20 20 20 20 20 20 20 20 20 20 78 3d 27 7b 28 2b 20 28 2f 20 6c 77 20 32 29 20 70 61 64 20	'...........x='{(+.(/.lw.2).pad.
1220	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 20 20 20 20	offset)}'...........y='150'.....
1240	20 20 20 20 20 20 66 69 6c 6c 3d 27 23 30 31 30 31 30 31 27 20 66 69 6c 6c 2d 6f 70 61 63 69 74	......fill='#010101'.fill-opacit
1260	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 27 73 63 61 6c	y='.3'...........transform='scal
1280	65 28 2e 31 29 27 20 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	e(.1)'.textLength='{lw}'>{left}<
12a0	2f 74 65 78 74 3e 0a 20 20 20 20 3c 74 65 78 74 20 78 3d 27 7b 28 2b 20 28 2f 20 6c 77 20 32 29	/text>.....<text.x='{(+.(/.lw.2)
12c0	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 31 34 30 27	.pad.offset)}'...........y='140'
12e0	20 74 72 61 6e 73 66 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	.transform='scale(.1)'..........
1300	20 66 69 6c 6c 3d 27 23 66 66 66 27 0a 20 20 20 20 20 20 20 20 20 20 74 65 78 74 4c 65 6e 67 74	.fill='#fff'...........textLengt
1320	68 3d 27 7b 6c 77 7d 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	h='{lw}'>{left}</text>.....<text
1340	20 61 72 69 61 2d 68 69 64 64 65 6e 3d 27 74 72 75 65 27 0a 20 20 20 20 20 20 20 20 20 20 78 3d	.aria-hidden='true'...........x=
1360	27 7b 28 2b 20 6c 77 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	'{(+.lw.(/.rw.2).(*.3.pad).offse
1380	74 29 7d 27 0a 20 20 20 20 20 20 20 20 20 20 79 3d 27 31 35 30 27 0a 20 20 20 20 20 20 20 20 20	t)}'...........y='150'..........
13a0	20 66 69 6c 6c 3d 27 23 30 31 30 31 30 31 27 20 20 66 69 6c 6c 2d 6f 70 61 63 69 74 79 3d 27 2e	.fill='#010101'..fill-opacity='.
13c0	33 27 0a 20 20 20 20 20 20 20 20 20 20 74 72 61 6e 73 66 6f 72 6d 3d 27 73 63 61 6c 65 28 2e 31	3'...........transform='scale(.1
13e0	29 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 2f 74 65	)'.textLength='{rw}'>{right}</te
1400	78 74 3e 0a 20 20 20 20 3c 74 65 78 74 20 78 3d 27 7b 28 2b 20 6c 77 20 28 2f 20 72 77 20 32 29	xt>.....<text.x='{(+.lw.(/.rw.2)
1420	20 28 2a 20 33 20 70 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	.(*.3.pad).offset)}'...........y
1440	3d 27 31 34 30 27 0a 20 20 20 20 20 20 20 20 20 20 74 72 61 6e 73 66 6f 72 6d 3d 27 73 63 61 6c	='140'...........transform='scal
1460	65 28 2e 31 29 27 0a 20 20 20 20 20 20 20 20 20 20 66 69 6c 6c 3d 27 23 66 66 66 27 20 74 65 78	e(.1)'...........fill='#fff'.tex
1480	74 4c 65 6e 67 74 68 3d 27 7b 72 77 7d 27 3e 7b 72 69 67 68 74 7d 3c 2f 74 65 78 74 3e 0a 20 20	tLength='{rw}'>{right}</text>...
14a0	3c 2f 67 3e 0a 3c 2f 73 76 67 3e 22 29 29 29 29 29 0a 20 20 20 20 20 20 28 77 72 69 74 65 2d 72	</g>.</svg>"))))).......(write-r
14c0	65 67 69 6f 6e 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 20 66 69	egion.(point-min).(point-max).fi
14e0	6c 65 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 62 61 64	le))))..(defun.package-build-bad
1500	67 65 2d 2d 73 74 72 69 6e 67 2d 77 69 64 74 68 20 28 73 74 72 29 0a 20 20 22 44 65 74 65 72 6d	ge--string-width.(str)..."Determ
1520	69 6e 65 20 73 74 72 69 6e 67 20 77 69 64 74 68 20 69 6e 20 70 69 78 65 6c 73 20 6f 66 20 53 54	ine.string.width.in.pixels.of.ST
1540	52 2e 22 0a 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 20 3b 3b 20 49	R."...(with-temp-buffer.....;;.I
1560	6d 61 67 65 4d 61 67 69 63 6b 20 37 2e 31 2e 30 20 6f 72 20 6c 61 74 65 72 20 72 65 71 75 69 72	mageMagick.7.1.0.or.later.requir
1580	65 73 20 75 73 69 6e 67 20 74 68 65 20 22 6d 61 67 69 63 6b 22 20 64 72 69 76 65 72 2c 0a 20 20	es.using.the."magick".driver,...
15a0	20 20 3b 3b 20 72 61 74 68 65 72 20 74 68 61 6e 20 22 63 6f 6e 76 65 72 74 22 20 64 69 72 65 63	..;;.rather.than."convert".direc
15c0	74 6c 79 2c 20 62 75 74 20 44 65 62 69 61 6e 20 64 6f 65 73 6e 27 74 20 70 72 6f 76 69 64 65 20	tly,.but.Debian.doesn't.provide.
15e0	69 74 0a 20 20 20 20 3b 3b 20 79 65 74 20 28 32 30 32 31 29 2e 0a 20 20 20 20 28 6c 65 74 20 28	it.....;;.yet.(2021)......(let.(
1600	28 61 72 67 73 20 60 28 2c 40 28 69 66 20 28 65 78 65 63 75 74 61 62 6c 65 2d 66 69 6e 64 20 22	(args.`(,@(if.(executable-find."
1620	6d 61 67 69 63 6b 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	magick")........................
1640	20 27 28 22 6d 61 67 69 63 6b 22 20 22 63 6f 6e 76 65 72 74 22 29 0a 20 20 20 20 20 20 20 20 20	.'("magick"."convert")..........
1660	20 20 20 20 20 20 20 20 20 20 20 20 20 27 28 22 63 6f 6e 76 65 72 74 22 29 29 0a 20 20 20 20 20	.............'("convert"))......
1680	20 20 20 20 20 20 20 20 20 20 20 20 20 22 2d 64 65 62 75 67 22 20 22 61 6e 6e 6f 74 61 74 65 22	............."-debug"."annotate"
16a0	20 22 78 63 3a 22 20 22 2d 66 6f 6e 74 22 20 22 44 65 6a 61 56 75 2d 53 61 6e 73 22 0a 20 20 20	."xc:"."-font"."DejaVu-Sans"....
16c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2d 70 6f 69 6e 74 73 69 7a 65 22 20 22 31 31 30	..............."-pointsize"."110
16e0	22 20 22 2d 61 6e 6e 6f 74 61 74 65 22 20 22 30 22 20 2c 73 74 72 20 22 6e 75 6c 6c 3a 22 29 29	"."-annotate"."0".,str."null:"))
1700	29 0a 20 20 20 20 20 20 28 61 70 70 6c 79 20 23 27 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 28 63	).......(apply.#'call-process.(c
1720	61 72 20 61 72 67 73 29 20 6e 69 6c 20 74 20 6e 69 6c 20 28 64 65 6c 71 20 6e 69 6c 20 28 63 64	ar.args).nil.t.nil.(delq.nil.(cd
1740	72 20 61 72 67 73 29 29 29 0a 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e	r.args))).......(goto-char.(poin
1760	74 2d 6d 69 6e 29 29 0a 20 20 20 20 20 20 28 69 66 20 28 6e 6f 74 20 28 72 65 2d 73 65 61 72 63	t-min)).......(if.(not.(re-searc
1780	68 2d 66 6f 72 77 61 72 64 20 22 4d 65 74 72 69 63 73 3a 2e 2a 3f 77 69 64 74 68 3a 20 5c 5c 28	h-forward."Metrics:.*?width:.\\(
17a0	5b 30 2d 39 5d 2b 5c 5c 29 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 43	[0-9]+\\)"))...........(error."C
17c0	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 64 74 68 22	ould.not.determine.string.width"
17e0	29 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 77 69 64 74 68 20 28 73 74 72 69 6e 67 2d 74	).........(let.((width.(string-t
1800	6f 2d 6e 75 6d 62 65 72 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 31 29 29 29 29 0a 20 20 20	o-number.(match-string.1))))....
1820	20 20 20 20 20 20 20 3b 3b 20 54 68 69 73 20 74 65 73 74 20 61 69 6d 73 20 74 6f 20 63 61 74 63	.......;;.This.test.aims.to.catc
1840	68 20 74 68 65 20 63 61 73 65 20 77 68 65 72 65 20 74 68 65 20 66 6f 6e 74 20 69 73 20 6d 69 73	h.the.case.where.the.font.is.mis
1860	73 69 6e 67 2c 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 62 75 74 20 69 74 20 73 65 65 6d 73 20	sing,...........;;.but.it.seems.
1880	69 74 20 6f 6e 6c 79 20 77 6f 72 6b 73 20 69 6e 20 73 6f 6d 65 20 63 61 73 65 73 20 3a 2d 28 0a	it.only.works.in.some.cases.:-(.
18a0	20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 61 6e 64 20 28 3e 20 28 73 74 72 69 6e 67 2d 77 69	..........(if.(and.(>.(string-wi
18c0	64 74 68 20 73 74 72 29 20 30 29 20 28 6e 6f 74 20 28 3e 20 77 69 64 74 68 20 30 29 29 29 0a 20	dth.str).0).(not.(>.width.0)))..
18e0	20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 20 28 6d 65 73 73 61 67 65 20 22 63 6f	.............(progn.(message."co
1900	6e 76 65 72 74 3a 5c 6e 25 73 22 20 28 62 75 66 66 65 72 2d 73 74 72 69 6e 67 29 29 0a 20 20 20	nvert:\n%s".(buffer-string))....
1920	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 43 6f 75 6c 64 20	..................(error."Could.
1940	6e 6f 74 20 64 65 74 65 72 6d 69 6e 65 20 73 74 72 69 6e 67 20 77 69 64 74 68 22 29 29 0a 20 20	not.determine.string.width"))...
1960	20 20 20 20 20 20 20 20 20 20 77 69 64 74 68 29 29 29 29 29 29 0a 0a 28 70 72 6f 76 69 64 65 20	..........width))))))..(provide.
1980	27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 62 61 64 67 65 73 29 0a 3b 3b 3b 20 70 61 63 6b 61	'package-build-badges).;;;.packa
19a0	67 65 2d 62 61 64 67 65 73 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00 00 00	ge-badges.el.ends.here..........
19c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
19e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
1a00	70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 32 30 32 34 30 33 30 36 2e 32 32 33 34 2f 70 61 63 6b	package-build-20240306.2234/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 31 37 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 37 32 36 36 00 20 30 00 00 00	0001217.00000000000.017266..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	28 64 65 66 69 6e 65 2d 70 61 63 6b 61 67 65 20 22 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 22 20	(define-package."package-build".
1c20	22 32 30 32 34 30 33 30 36 2e 32 32 33 34 22 20 22 54 6f 6f 6c 73 20 66 6f 72 20 61 73 73 65 6d	"20240306.2234"."Tools.for.assem
1c40	62 6c 69 6e 67 20 61 20 70 61 63 6b 61 67 65 20 61 72 63 68 69 76 65 22 0a 20 20 27 28 28 65 6d	bling.a.package.archive"...'((em
1c60	61 63 73 20 22 32 36 2e 31 22 29 0a 20 20 20 20 28 63 6f 6d 70 61 74 20 22 32 37 2e 31 22 29 29	acs."26.1").....(compat."27.1"))
1c80	0a 20 20 3a 63 6f 6d 6d 69 74 20 22 32 33 36 65 66 34 65 34 64 36 31 35 36 39 39 64 34 62 61 38	...:commit."236ef4e4d615699d4ba8
1ca0	62 37 61 64 32 38 62 64 34 30 62 38 37 64 32 36 39 34 31 31 22 20 3a 61 75 74 68 6f 72 73 0a 20	b7ad28bd40b87d269411".:authors..
1cc0	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 20 2e 20 22 64	.'(("Donald.Ephraim.Curtis"..."d
1ce0	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 28 22 53 74 65 76 65	curtis@milkbox.net").....("Steve
1d00	20 50 75 72 63 65 6c 6c 22 20 2e 20 22 73 74 65 76 65 40 73 61 6e 69 74 79 69 6e 63 2e 63 6f 6d	.Purcell"..."steve@sanityinc.com
1d20	22 29 0a 20 20 20 20 28 22 4a 6f 6e 61 73 20 42 65 72 6e 6f 75 6c 6c 69 22 20 2e 20 22 6a 6f 6e	").....("Jonas.Bernoulli"..."jon
1d40	61 73 40 62 65 72 6e 6f 75 6c 2e 6c 69 22 29 0a 20 20 20 20 28 22 50 68 69 6c 20 48 61 67 65 6c	as@bernoul.li").....("Phil.Hagel
1d60	62 65 72 67 22 20 2e 20 22 74 65 63 68 6e 6f 6d 61 6e 63 79 40 67 6d 61 69 6c 2e 63 6f 6d 22 29	berg"..."technomancy@gmail.com")
1d80	29 0a 20 20 3a 6d 61 69 6e 74 61 69 6e 65 72 73 0a 20 20 27 28 28 22 44 6f 6e 61 6c 64 20 45 70	)...:maintainers...'(("Donald.Ep
1da0	68 72 61 69 6d 20 43 75 72 74 69 73 22 20 2e 20 22 64 63 75 72 74 69 73 40 6d 69 6c 6b 62 6f 78	hraim.Curtis"..."dcurtis@milkbox
1dc0	2e 6e 65 74 22 29 29 0a 20 20 3a 6d 61 69 6e 74 61 69 6e 65 72 0a 20 20 27 28 22 44 6f 6e 61 6c	.net"))...:maintainer...'("Donal
1de0	64 20 45 70 68 72 61 69 6d 20 43 75 72 74 69 73 22 20 2e 20 22 64 63 75 72 74 69 73 40 6d 69 6c	d.Ephraim.Curtis"..."dcurtis@mil
1e00	6b 62 6f 78 2e 6e 65 74 22 29 0a 20 20 3a 6b 65 79 77 6f 72 64 73 0a 20 20 27 28 22 6d 61 69 6e	kbox.net")...:keywords...'("main
1e20	74 22 20 22 74 6f 6f 6c 73 22 29 0a 20 20 3a 75 72 6c 20 22 68 74 74 70 73 3a 2f 2f 67 69 74 68	t"."tools")...:url."https://gith
1e40	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 22 29 0a 3b 3b 20	ub.com/melpa/package-build").;;.
1e60	4c 6f 63 61 6c 20 56 61 72 69 61 62 6c 65 73 3a 0a 3b 3b 20 6e 6f 2d 62 79 74 65 2d 63 6f 6d 70	Local.Variables:.;;.no-byte-comp
1e80	69 6c 65 3a 20 74 0a 3b 3b 20 45 6e 64 3a 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	ile:.t.;;.End:..................
1ea0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
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 34 30 33 30 36 2e 32 32 33 34 2f 70 61 63 6b	package-build-20240306.2234/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 32 32 35 35 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 36 35 31 36 00 20 30 00 00 00	0222552.00000000000.016516..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 34 20 4a	ell.;;.Copyright.(C).2016-2024.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 6a 6f 6e 61 73 40 62 65 72 6e 6f 75 6c 2e 6c 69 3e	nas.Bernoulli.<jonas@bernoul.li>
23a0	0a 3b 3b 20 20 20 20 20 50 68 69 6c 20 48 61 67 65 6c 62 65 72 67 20 3c 74 65 63 68 6e 6f 6d 61	.;;.....Phil.Hagelberg.<technoma
23c0	6e 63 79 40 67 6d 61 69 6c 2e 63 6f 6d 3e 0a 3b 3b 20 48 6f 6d 65 70 61 67 65 3a 20 68 74 74 70	ncy@gmail.com>.;;.Homepage:.http
23e0	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
2400	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..;;.
2420	50 61 63 6b 61 67 65 2d 56 65 72 73 69 6f 6e 3a 20 34 2e 30 2e 30 2e 35 30 2d 67 69 74 0a 3b 3b	Package-Version:.4.0.0.50-git.;;
2440	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 36 2e 31	.Package-Requires:.((emacs."26.1
2460	22 29 20 28 63 6f 6d 70 61 74 20 22 32 37 2e 31 22 29 29 0a 0a 3b 3b 20 53 50 44 58 2d 4c 69 63	").(compat."27.1"))..;;.SPDX-Lic
2480	65 6e 73 65 2d 49 64 65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d 33 2e 30 2d 6f 72 2d 6c 61 74 65	ense-Identifier:.GPL-3.0-or-late
24a0	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 72 65	r..;;.This.file.is.free.software
24c0	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 6f 72	:.you.can.redistribute.it.and/or
24e0	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 6f 66	.modify.;;.it.under.the.terms.of
2500	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 20	.the.GNU.General.Public.License.
2520	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 66 74	as.published.;;.by.the.Free.Soft
2540	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 6e 20	ware.Foundation,.either.version.
2560	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 75 72	3.of.the.License,.;;.or.(at.your
2580	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 0a 3b	.option).any.later.version..;;.;
25a0	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 74 68	;.This.file.is.distributed.in.th
25c0	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 0a 3b	e.hope.that.it.will.be.useful,.;
25e0	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 74 68	;.but.WITHOUT.ANY.WARRANTY;.with
2600	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 6f 66	out.even.the.implied.warranty.of
2620	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 20 46	.;;.MERCHANTABILITY.or.FITNESS.F
2640	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 74 68	OR.A.PARTICULAR.PURPOSE...See.th
2660	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 65 20	e.;;.GNU.General.Public.License.
2680	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 6f 75	for.more.details..;;.;;.You.shou
26a0	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 20 47	ld.have.received.a.copy.of.the.G
26c0	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 6c 6f	NU.General.Public.License.;;.alo
26e0	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 65 20	ng.with.this.file...If.not,.see.
2700	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 3e 2e	<https://www.gnu.org/licenses/>.
2720	0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 20	..;;;.Commentary:..;;.This.file.
2740	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 73 68 20 61 6e 20 61	allows.a.curator.to.publish.an.a
2760	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 0a 0a 3b 3b 20 54 68	rchive.of.Emacs.packages...;;.Th
2780	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 6f 6d 20 61 20 73 65	e.archive.is.generated.from.a.se
27a0	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 69 62 65 20 65 6c 69	t.of.recipes,.which.describe.eli
27c0	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 74 6f 72 69 65 73 20	sp.;;.projects.and.repositories.
27e0	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 54 68 65 20 74 65 72	from.which.to.get.them...The.ter
2800	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 65 64 20 74 6f 20 6d	m."package".;;.here.is.used.to.m
2820	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 20 61 20 70 72 6f 6a	ean.a.specific.version.of.a.proj
2840	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 6f 72 20 64 6f 77 6e	ect.that.is.prepared.;;.for.down
2860	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 3b 3b 20 43 6f 64 65	load.and.installation...;;;.Code
2880	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 75 69 72 65 20 27 63	:..(require.'cl-lib).(require.'c
28a0	6f 6d 70 61 74 20 6e 69 6c 20 74 29 0a 28 72 65 71 75 69 72 65 20 27 70 63 61 73 65 29 0a 28 72	ompat.nil.t).(require.'pcase).(r
28c0	65 71 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	equire.'subr-x)..(require.'packa
28e0	67 65 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	ge).(require.'lisp-mnt).(require
2900	20 27 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	.'json)..(require.'package-recip
2920	65 29 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	e).(require.'package-build-badge
2940	73 29 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	s)..;;;.Options..(defvar.package
2960	2d 62 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	-build--melpa-base...(file-name-
2980	64 69 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	directory....(directory-file-nam
29a0	65 0a 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	e.....(file-name-directory.(or.l
29c0	6f 61 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	oad-file-name.(buffer-file-name)
29e0	29 29 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	)))))..(defgroup.package-build.n
2a00	69 6c 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	il..."Tools.for.building.package
2a20	2e 65 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	.el-compliant.packages.from.upst
2a40	72 65 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	ream.source.code."...:group.'dev
2a60	65 6c 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	elopment)..(defcustom.package-bu
2a80	69 6c 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	ild-working-dir...(expand-file-n
2aa0	61 6d 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	ame."working/".package-build--me
2ac0	6c 70 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	lpa-base)..."Directory.in.which.
2ae0	74 6f 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	to.keep.checkouts."...:group.'pa
2b00	63 6b 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	ckage-build...:type.'string)..(d
2b20	65 66 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	efcustom.package-build-archive-d
2b40	69 72 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	ir...(expand-file-name."packages
2b60	2f 22 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	/".package-build--melpa-base)...
2b80	22 44 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	"Directory.in.which.to.keep.comp
2ba0	69 6c 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	iled.archives."...:group.'packag
2bc0	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 63 75	e-build...:type.'string)..(defcu
2be0	73 74 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	stom.package-build-recipes-dir..
2c00	20 28 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	.(expand-file-name."recipes/".pa
2c20	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 69 72 65	ckage-build--melpa-base)..."Dire
2c40	63 74 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	ctory.containing.recipe.files.".
2c60	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 65 20	..:group.'package-build...:type.
2c80	27 73 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	'string)..(defcustom.package-bui
2ca0	6c 64 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	ld-verbose.t..."When.non-nil,.th
2cc0	65 6e 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	en.print.additional.progress.inf
2ce0	6f 72 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	ormation."...:group.'package-bui
2d00	6c 64 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	ld...:type.'boolean)..(defcustom
2d20	20 70 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	.package-build-stable.nil..."Whe
2d40	74 68 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	ther.to.build.release.or.snapsho
2d60	74 20 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	t.packages...If.nil,.snapshot.pa
2d80	63 6b 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	ckages.are.build,.otherwise.rele
2da0	61 73 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	ase.packages.are.build...`packag
2dc0	65 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	e-build-snapshot-version-functio
2de0	6e 73 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	ns'.and/or.`package-build-releas
2e00	65 2d 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	e-version-functions'.are.used.to
2e20	20 64 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	.determine.the.appropriate.versi
2e40	6f 6e 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	on.for.each.package.and.how.the.
2e60	76 65 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	version.string.is.formatted."...
2e80	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 62	:group.'package-build...:type.'b
2ea0	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 62 75 69 6c	oolean)..(defcustom.package-buil
2ec0	64 2d 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	d-all-publishable.(not.package-b
2ee0	75 69 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	uild-stable)..."Whether.even.pac
2f00	6b 61 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	kages.that.lack.a.release.can.be
2f20	20 70 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	.published...This.option.is.used
2f40	20 74 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	.to.determine.whether.failure.to
2f60	20 63 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	.come.up.with.a.version.string.s
2f80	68 6f 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	hould.be.considered.an.error.or.
2fa0	6e 6f 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	not...Currently.this.defaults.to
2fc0	20 28 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	.(not.package-build-stable),.but
2fe0	20 74 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	.the.default.is.likely.to.be.cha
3000	6e 67 65 64 20 74 6f 20 6a 75 73 74 20 60 74 27 20 69 6e 20 74 68 65 20 66 75 74 75 72 65 2e 20	nged.to.just.`t'.in.the.future..
3020	20 53 65 65 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	.See.also.the.commit.that.added.
3040	74 68 69 73 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	this.option."...:group.'package-
3060	62 75 69 6c 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	build...:type.'boolean...:set-af
3080	74 65 72 20 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	ter.'(package-build-stable))..(m
30a0	61 6b 65 2d 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	ake-obsolete-variable.'package-b
30c0	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 0a 20 20 20 20 20 20	uild-get-version-function.......
30e0	20 20 20 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	..................'package-build
3100	2d 73 74 61 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	-stable.........................
3120	22 50 61 63 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	"Package-Build.5.0.0").(defvar.p
3140	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 6f	ackage-build-get-version-functio
3160	6e 20 6e 69 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	n.nil..."This.variable.is.obsole
3180	74 65 20 61 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	te.and.its.value.should.be.nil..
31a0	49 66 20 74 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	If.this.is.non-nil,.then.it.over
31c0	72 69 64 65 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	rides.`package-build-release-ver
31e0	73 69 6f 6e 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	sion-functions'.and.`package-bui
3200	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 27 2e 22	ld-snapshot-version-functions'."
3220	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 72 65 6c 65	)..(defcustom.package-build-rele
3240	61 73 65 2d 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	ase-version-functions...(list.#'
3260	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 29 0a 20 20 22 46 75	package-build-tag-version)..."Fu
3280	6e 63 74 69 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	nctions.used.to.determine.the.cu
32a0	72 72 65 6e 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	rrent.release.of.a.package...Eac
32c0	68 20 66 75 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	h.function.is.called.in.order,.w
32e0	69 74 68 20 74 68 65 20 72 65 63 69 70 65 20 6f 62 6a 65 63 74 20 61 73 0a 61 72 67 75 6d 65 6e	ith.the.recipe.object.as.argumen
3300	74 2c 20 75 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	t,.until.one.returns.non-nil...T
3320	68 65 20 72 65 74 75 72 6e 65 64 20 76 61 6c 75 65 20 6d 75 73 74 0a 68 61 76 65 20 74 68 65 20	he.returned.value.must.have.the.
3340	66 6f 72 6d 20 28 43 4f 4d 4d 49 54 20 54 49 4d 45 20 56 45 52 53 49 4f 4e 29 2c 20 77 68 65 72	form.(COMMIT.TIME.VERSION),.wher
3360	65 20 43 4f 4d 4d 49 54 20 69 73 20 74 68 65 20 63 6f 6d 6d 69 74 0a 63 68 6f 73 65 6e 20 62 79	e.COMMIT.is.the.commit.chosen.by
3380	20 74 68 65 20 66 75 6e 63 74 69 6f 6e 2c 20 54 49 4d 45 20 69 73 20 69 74 73 20 63 6f 6d 6d 69	.the.function,.TIME.is.its.commi
33a0	74 74 65 72 20 64 61 74 65 2c 20 61 6e 64 20 56 45 52 53 49 4f 4e 0a 69 73 20 74 68 65 20 76 65	tter.date,.and.VERSION.is.the.ve
33c0	72 73 69 6f 6e 20 73 74 72 69 6e 67 20 63 68 6f 73 65 6e 20 66 6f 72 20 43 4f 4d 4d 49 54 2e 0a	rsion.string.chosen.for.COMMIT..
33e0	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 2d	.If.obsolete.`package-build-get-
3400	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 68	version-function'.is.non-nil,.th
3420	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 20	en.that.overrides.the.value.set.
3440	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 20	here."...:group.'package-build..
3460	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 27	.:type.'hook...:options.(list.#'
3480	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 20	package-build-tag-version.......
34a0	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 65	...........#'package-build-heade
34c0	72 2d 76 65 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 70 61 63	r-version..................#'pac
34e0	6b 61 67 65 2d 62 75 69 6c 64 2d 70 6b 67 2d 76 65 72 73 69 6f 6e 29 29 0a 0a 28 64 65 66 63 75	kage-build-pkg-version))..(defcu
3500	73 74 6f 6d 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 73 6e 61 70 73 68 6f 74 2d 76 65 72 73	stom.package-build-snapshot-vers
3520	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 61 67 65 2d	ion-functions...(list.#'package-
3540	62 75 69 6c 64 2d 74 69 6d 65 73 74 61 6d 70 2d 76 65 72 73 69 6f 6e 29 0a 20 20 22 46 75 6e 63	build-timestamp-version)..."Func
3560	74 69 6f 6e 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	tion.used.to.determine.the.curre
3580	6e 74 20 73 6e 61 70 73 68 6f 74 20 6f 66 20 61 20 70 61 63 6b 61 67 65 2e 0a 0a 45 61 63 68 20	nt.snapshot.of.a.package...Each.
35a0	66 75 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	function.is.called.in.order,.wit
35c0	68 20 74 68 65 20 72 65 63 69 70 65 20 6f 62 6a 65 63 74 20 61 73 0a 61 72 67 75 6d 65 6e 74 2c	h.the.recipe.object.as.argument,
35e0	20 75 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	.until.one.returns.non-nil...The
3600	20 72 65 74 75 72 6e 65 64 20 76 61 6c 75 65 20 6d 75 73 74 0a 68 61 76 65 20 74 68 65 20 66 6f	.returned.value.must.have.the.fo
3620	72 6d 20 28 43 4f 4d 4d 49 54 20 54 49 4d 45 20 56 45 52 53 49 4f 4e 29 2c 20 77 68 65 72 65 20	rm.(COMMIT.TIME.VERSION),.where.
3640	43 4f 4d 4d 49 54 20 69 73 20 74 68 65 20 63 6f 6d 6d 69 74 0a 63 68 6f 73 65 6e 20 62 79 20 74	COMMIT.is.the.commit.chosen.by.t
3660	68 65 20 66 75 6e 63 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	he.function,.TIME.is.its.committ
3680	65 72 20 64 61 74 65 2c 20 61 6e 64 20 56 45 52 53 49 4f 4e 0a 69 73 20 74 68 65 20 76 65 72 73	er.date,.and.VERSION.is.the.vers
36a0	69 6f 6e 20 73 74 72 69 6e 67 20 63 68 6f 73 65 6e 20 66 6f 72 20 43 4f 4d 4d 49 54 2e 0a 0a 53	ion.string.chosen.for.COMMIT...S
36c0	6f 6d 65 20 6f 66 20 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	ome.of.the.functions.that.return
36e0	20 73 6e 61 70 73 68 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	.snapshot.versions,.internally.u
3700	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 65 72 73 69 6f	se.`package-build-release-versio
3720	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 20 74 68 65 0a 63 75	n-functions'.to.determine.the.cu
3740	72 72 65 6e 74 20 72 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	rrent.release,.which.they.use.as
3760	20 70 61 72 74 20 6f 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	.part.of.the.returned.VERSION...
3780	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 2d 76	If.obsolete.`package-build-get-v
37a0	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 68 65	ersion-function'.is.non-nil,.the
37c0	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 20 68	n.that.overrides.the.value.set.h
37e0	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 20 20	ere."...:group.'package-build...
3800	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 27 70	:type.'hook...:options.(list.#'p
3820	61 63 6b 61 67 65 2d 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	ackage-build-release+count-versi
3840	6f 6e 0a 20 20 20 20 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	on..................#'package-bu
3860	69 6c 64 2d 72 65 6c 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	ild-release+timestamp-version...
3880	20 20 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 74	...............#'package-build-t
38a0	69 6d 65 73 74 61 6d 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	imestamp-version))..(defcustom.p
38c0	61 63 6b 61 67 65 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 20	ackage-build-predicate-function.
38e0	6e 69 6c 0a 20 20 22 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	nil..."Predicate.used.by.`packag
3900	65 2d 62 75 69 6c 64 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	e-build-all'.to.determine.which.
3920	70 61 63 6b 61 67 65 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	packages.to.build..If.non-nil,.t
3940	68 69 73 20 66 75 6e 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	his.function.is.called.with.the.
3960	72 65 63 69 70 65 20 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	recipe.object.as.argument,.and.m
3980	75 73 74 20 72 65 74 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	ust.return.non-nil.if.the.packag
39a0	65 20 69 73 20 74 6f 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	e.is.to.be.build..If.nil.(the.de
39c0	66 61 75 6c 74 29 2c 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	fault),.then.all.packages.are.bu
39e0	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 69 6c 64 0a 20 20	ild."...:group.'package-build...
3a00	3a 74 79 70 65 20 27 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	:type.'(choice.(const.:tag."buil
3a20	64 20 61 6c 6c 22 29 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	d.all").function))..(defcustom.p
3a40	61 63 6b 61 67 65 2d 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	ackage-build-build-function...#'
3a60	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 2d	package-build--build-multi-file-
3a80	70 61 63 6b 61 67 65 0a 20 20 22 4c 6f 77 2d 6c 65 76 65 6c 20 66 75 6e 63 74 69 6f 6e 20 75 73	package..."Low-level.function.us
3aa0	65 64 20 74 6f 20 62 75 69 6c 64 20 61 20 70 61 63 6b 61 67 65 2e 0a 42 79 20 64 65 66 61 75 6c	ed.to.build.a.package..By.defaul
3ac0	74 20 61 20 74 61 72 62 61 6c 6c 20 69 73 20 75 73 65 64 20 66 6f 72 20 61 6c 6c 20 70 61 63 6b	t.a.tarball.is.used.for.all.pack
3ae0	61 67 65 73 2c 20 69 6e 63 6c 75 64 69 6e 67 20 74 68 6f 73 65 0a 63 6f 6e 73 69 73 74 69 6e 67	ages,.including.those.consisting
3b00	20 6f 66 20 61 20 73 69 6e 67 6c 65 20 66 69 6c 65 2e 20 20 49 74 20 74 68 69 73 20 69 73 20 6e	.of.a.single.file...It.this.is.n
3b20	69 6c 2c 20 74 68 65 6e 20 73 69 6e 67 6c 65 2d 66 69 6c 65 0a 70 61 63 6b 61 67 65 73 20 61 72	il,.then.single-file.packages.ar
3b40	65 20 64 69 73 74 72 69 62 75 74 65 64 20 77 69 74 68 6f 75 74 20 75 73 69 6e 67 20 74 61 72 62	e.distributed.without.using.tarb
3b60	61 6c 6c 73 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	alls."...:group.'package-build..
3b80	20 3a 74 79 70 65 20 27 28 63 68 6f 69 63 65 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 75 73 65	.:type.'(choice.(const.:tag."use
3ba0	20 74 61 72 62 61 6c 6c 20 66 6f 72 20 61 6c 6c 20 70 61 63 6b 61 67 65 73 22 0a 20 20 20 20 20	.tarball.for.all.packages"......
3bc0	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 6c 64	...................package-build
3be0	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 29 0a 20 20 20 20	--build-multi-file-package).....
3c00	20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 6f 6e 6c 79 20 75	.............(const.:tag."only.u
3c20	73 65 20 74 61 72 62 61 6c 6c 20 66 6f 72 20 6d 75 6c 74 69 2d 66 69 6c 65 20 70 61 63 6b 61 67	se.tarball.for.multi-file.packag
3c40	65 73 22 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 75 6e 63 74 69	es".nil)..................functi
3c60	6f 6e 29 29 0a 0a 3b 3b 20 4e 4f 54 45 20 74 68 61 74 20 74 68 65 73 65 20 68 6f 6f 6b 73 20 61	on))..;;.NOTE.that.these.hooks.a
3c80	72 65 20 73 74 69 6c 6c 20 65 78 70 65 72 69 6d 65 6e 74 61 6c 2e 20 20 4c 65 74 20 6d 65 20 6b	re.still.experimental...Let.me.k
3ca0	6e 6f 77 20 69 66 20 74 68 65 73 65 0a 3b 3b 20 61 72 65 20 70 6f 74 65 6e 74 69 61 6c 6c 79 20	now.if.these.;;.are.potentially.
3cc0	75 73 65 66 75 6c 20 66 6f 72 20 79 6f 75 20 61 6e 64 20 77 68 65 74 68 65 72 20 61 6e 79 20 63	useful.for.you.and.whether.any.c
3ce0	68 61 6e 67 65 73 20 61 72 65 20 72 65 71 75 69 72 65 64 0a 3b 3b 20 74 6f 20 6d 61 6b 65 20 74	hanges.are.required.;;.to.make.t
3d00	68 65 6d 20 6d 6f 72 65 20 61 70 70 72 6f 70 72 69 61 74 65 20 66 6f 72 20 79 6f 75 72 20 75 73	hem.more.appropriate.for.your.us
3d20	65 63 61 73 65 2e 0a 28 64 65 66 76 61 72 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 77 6f 72	ecase..(defvar.package-build-wor
3d40	6b 74 72 65 65 2d 66 75 6e 63 74 69 6f 6e 20 23 27 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d	ktree-function.#'package-recipe-
3d60	2d 77 6f 72 6b 69 6e 67 2d 74 72 65 65 29 0a 28 64 65 66 76 61 72 20 70 61 63 6b 61 67 65 2d 62	-working-tree).(defvar.package-b
3d80	75 69 6c 64 2d 65 61 72 6c 79 2d 77 6f 72 6b 74 72 65 65 2d 66 75 6e 63 74 69 6f 6e 20 23 27 70	uild-early-worktree-function.#'p
3da0	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 29 0a 28 64 65	ackage-recipe--working-tree).(de
3dc0	66 76 61 72 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 66 65 74 63 68 2d 66 75 6e 63 74 69 6f	fvar.package-build-fetch-functio
3de0	6e 20 23 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 66 65 74 63 68 29 0a 28 64 65 66 76 61	n.#'package-build--fetch).(defva
3e00	72 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 63 68 65 63 6b 6f 75 74 2d 66 75 6e 63 74 69 6f	r.package-build-checkout-functio
3e20	6e 20 23 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 63 68 65 63 6b 6f 75 74 29 0a 28 64 65	n.#'package-build--checkout).(de
3e40	66 76 61 72 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 63 6c 65 61 6e 75 70 2d 66 75 6e 63 74	fvar.package-build-cleanup-funct
3e60	69 6f 6e 20 23 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 63 6c 65 61 6e 75 70 29 0a 0a 28	ion.#'package-build--cleanup)..(
3e80	64 65 66 63 75 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	defcustom.package-build-timeout-
3ea0	65 78 65 63 75 74 61 62 6c 65 20 22 74 69 6d 65 6f 75 74 22 0a 20 20 22 50 61 74 68 20 74 6f 20	executable."timeout"..."Path.to.
3ec0	61 20 47 4e 55 20 63 6f 72 65 75 74 69 6c 73 20 5c 22 74 69 6d 65 6f 75 74 5c 22 20 63 6f 6d 6d	a.GNU.coreutils.\"timeout\".comm
3ee0	61 6e 64 20 69 66 20 61 76 61 69 6c 61 62 6c 65 2e 0a 54 68 69 73 20 6d 75 73 74 20 62 65 20 61	and.if.available..This.must.be.a
3f00	20 76 65 72 73 69 6f 6e 20 77 68 69 63 68 20 73 75 70 70 6f 72 74 73 20 74 68 65 20 5c 22 2d 6b	.version.which.supports.the.\"-k
3f20	5c 22 20 6f 70 74 69 6f 6e 2e 0a 0a 4f 6e 20 4d 61 63 4f 53 20 69 74 20 69 73 20 70 6f 73 73 69	\".option...On.MacOS.it.is.possi
3f40	62 6c 65 20 74 6f 20 69 6e 73 74 61 6c 6c 20 63 6f 72 65 75 74 69 6c 73 20 75 73 69 6e 67 20 48	ble.to.install.coreutils.using.H
3f60	6f 6d 65 62 72 65 77 20 6f 72 0a 73 69 6d 69 6c 61 72 2c 20 77 68 69 63 68 20 77 69 6c 6c 20 70	omebrew.or.similar,.which.will.p
3f80	72 6f 76 69 64 65 20 74 68 65 20 47 4e 55 20 74 69 6d 65 6f 75 74 20 70 72 6f 67 72 61 6d 20 61	rovide.the.GNU.timeout.program.a
3fa0	73 0a 5c 22 67 74 69 6d 65 6f 75 74 5c 22 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 70 61 63 6b 61	s.\"gtimeout\"."...:group.'packa
3fc0	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 73 74 2d 6d 61	ge-build...:type.'(file.:must-ma
3fe0	74 63 68 20 74 29 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	tch.t))..(defcustom.package-buil
4000	64 2d 74 69 6d 65 6f 75 74 2d 73 65 63 73 20 6e 69 6c 0a 20 20 22 57 61 69 74 20 74 68 69 73 20	d-timeout-secs.nil..."Wait.this.
4020	6d 61 6e 79 20 73 65 63 6f 6e 64 73 20 66 6f 72 20 65 78 74 65 72 6e 61 6c 20 70 72 6f 63 65 73	many.seconds.for.external.proces
4040	73 65 73 20 74 6f 20 63 6f 6d 70 6c 65 74 65 2e 0a 0a 49 66 20 61 6e 20 65 78 74 65 72 6e 61 6c	ses.to.complete...If.an.external
4060	20 70 72 6f 63 65 73 73 20 74 61 6b 65 73 20 6c 6f 6e 67 65 72 20 74 68 61 6e 20 73 70 65 63 69	.process.takes.longer.than.speci
4080	66 69 65 64 20 68 65 72 65 20 74 6f 0a 63 6f 6d 70 6c 65 74 65 2c 20 74 68 65 6e 20 69 74 20 69	fied.here.to.complete,.then.it.i
40a0	73 20 74 65 72 6d 69 6e 61 74 65 64 2e 20 20 49 66 20 6e 69 6c 2c 20 74 68 65 6e 20 6e 6f 20 74	s.terminated...If.nil,.then.no.t
40c0	69 6d 65 20 6c 69 6d 69 74 20 69 73 0a 61 70 70 6c 69 65 64 2e 20 20 54 68 69 73 20 73 65 74 74	ime.limit.is.applied...This.sett
40e0	69 6e 67 20 72 65 71 75 69 72 65 73 0a 60 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 74 69 6d 65	ing.requires.`package-build-time
4100	6f 75 74 2d 65 78 65 63 75 74 61 62 6c 65 27 20 74 6f 20 62 65 20 73 65 74 2e 22 0a 20 20 3a 67	out-executable'.to.be.set."...:g
4120	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 6e 75 6d	roup.'package-build...:type.'num
4140	62 65 72 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 74	ber)..(defcustom.package-build-t
4160	61 72 2d 65 78 65 63 75 74 61 62 6c 65 20 22 74 61 72 22 0a 20 20 22 50 61 74 68 20 74 6f 20 61	ar-executable."tar"..."Path.to.a
4180	20 28 70 72 65 66 65 72 61 62 6c 79 20 47 4e 55 29 20 74 61 72 20 63 6f 6d 6d 61 6e 64 2e 0a 43	.(preferably.GNU).tar.command..C
41a0	65 72 74 61 69 6e 20 70 61 63 6b 61 67 65 20 6e 61 6d 65 73 20 28 65 2e 67 2e 2c 20 5c 22 40 5c	ertain.package.names.(e.g.,.\"@\
41c0	22 29 20 6d 61 79 20 6e 6f 74 20 77 6f 72 6b 20 70 72 6f 70 65 72 6c 79 20 77 69 74 68 20 61 20	").may.not.work.properly.with.a.
41e0	42 53 44 20 74 61 72 2e 0a 0a 4f 6e 20 4d 61 63 4f 53 20 69 74 20 69 73 20 70 6f 73 73 69 62 6c	BSD.tar...On.MacOS.it.is.possibl
4200	65 20 74 6f 20 69 6e 73 74 61 6c 6c 20 63 6f 72 65 75 74 69 6c 73 20 75 73 69 6e 67 20 48 6f 6d	e.to.install.coreutils.using.Hom
4220	65 62 72 65 77 20 6f 72 0a 73 69 6d 69 6c 61 72 2c 20 77 68 69 63 68 20 77 69 6c 6c 20 70 72 6f	ebrew.or.similar,.which.will.pro
4240	76 69 64 65 20 74 68 65 20 47 4e 55 20 74 69 6d 65 6f 75 74 20 70 72 6f 67 72 61 6d 20 61 73 0a	vide.the.GNU.timeout.program.as.
4260	5c 22 67 74 61 72 5c 22 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 70 61 63 6b 61 67 65 2d 62 75 69	\"gtar\"."...:group.'package-bui
4280	6c 64 0a 20 20 3a 74 79 70 65 20 27 28 66 69 6c 65 20 3a 6d 75 73 74 2d 6d 61 74 63 68 20 74 29	ld...:type.'(file.:must-match.t)
42a0	29 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 74 61 72 2d 74 79	)..(defvar.package-build--tar-ty
42c0	70 65 20 6e 69 6c 0a 20 20 22 54 79 70 65 20 6f 66 20 60 70 61 63 6b 61 67 65 2d 62 75 69 6c 64	pe.nil..."Type.of.`package-build
42e0	2d 74 61 72 2d 65 78 65 63 75 74 61 62 6c 65 27 2e 0a 43 61 6e 20 62 65 20 60 67 6e 75 27 20 6f	-tar-executable'..Can.be.`gnu'.o
4300	72 20 60 62 73 64 27 3b 20 6e 69 6c 20 6d 65 61 6e 73 20 74 68 65 20 74 79 70 65 20 69 73 20 6e	r.`bsd';.nil.means.the.type.is.n
4320	6f 74 20 64 65 63 69 64 65 64 20 79 65 74 2e 22 29 0a 0a 28 64 65 66 69 6e 65 2d 6f 62 73 6f 6c	ot.decided.yet.")..(define-obsol
4340	65 74 65 2d 76 61 72 69 61 62 6c 65 2d 61 6c 69 61 73 20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c	ete-variable-alias.'package-buil
4360	64 2d 77 72 69 74 65 2d 6d 65 6c 70 61 2d 62 61 64 67 65 2d 69 6d 61 67 65 73 0a 20 20 27 70 61	d-write-melpa-badge-images...'pa
4380	63 6b 61 67 65 2d 62 75 69 6c 64 2d 62 61 64 67 65 2d 64 61 74 61 20 22 50 61 63 6b 61 67 65 2d	ckage-build-badge-data."Package-
43a0	42 75 69 6c 64 20 35 2e 30 2e 30 22 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 70 61 63 6b 61 67	Build.5.0.0")..(defcustom.packag
43c0	65 2d 62 75 69 6c 64 2d 62 61 64 67 65 2d 64 61 74 61 20 6e 69 6c 0a 20 20 22 54 65 78 74 20 61	e-build-badge-data.nil..."Text.a
43e0	6e 64 20 63 6f 6c 6f 72 20 75 73 65 64 20 69 6e 20 62 61 64 67 65 20 69 6d 61 67 65 73 2c 20 69	nd.color.used.in.badge.images,.i
4400	66 20 61 6e 79 2e 0a 0a 49 66 20 6e 69 6c 20 28 74 68 65 20 64 65 66 61 75 6c 74 29 2c 20 74 68	f.any...If.nil.(the.default),.th
4420	65 6e 20 6e 6f 20 62 61 64 67 65 20 69 6d 61 67 65 73 20 61 72 65 20 67 65 6e 65 72 61 74 65 64	en.no.badge.images.are.generated
4440	2c 0a 6f 74 68 65 72 77 69 73 65 20 74 68 69 73 20 68 61 73 20 74 68 65 20 66 6f 72 6d 20 28 4e	,.otherwise.this.has.the.form.(N
4460	41 4d 45 20 43 4f 4c 4f 52 29 2e 20 20 4d 45 4c 50 41 20 73 65 74 73 20 74 68 65 20 76 61 6c 75	AME.COLOR)...MELPA.sets.the.valu
4480	65 0a 69 6e 20 69 74 73 20 74 6f 70 2d 6c 65 76 65 6c 20 4d 61 6b 65 66 69 6c 65 2c 20 74 6f 20	e.in.its.top-level.Makefile,.to.
44a0	64 69 66 66 65 72 65 6e 74 20 76 61 6c 75 65 73 2c 20 64 65 70 65 6e 64 69 6e 67 20 6f 6e 20 74	different.values,.depending.on.t
44c0	68 65 0a 63 68 61 6e 6e 65 6c 20 74 68 61 74 20 69 73 20 62 65 69 6e 67 20 62 75 69 6c 64 2e 22	he.channel.that.is.being.build."
44e0	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 65	...:group.'package-build...:type
4500	20 27 28 6c 69 73 74 20 28 73 74 72 69 6e 67 20 3a 74 61 67 20 22 41 72 63 68 69 76 65 20 6e 61	.'(list.(string.:tag."Archive.na
4520	6d 65 22 29 20 63 6f 6c 6f 72 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 70 61 63 6b 61 67 65	me").color))..(defcustom.package
4540	2d 62 75 69 6c 64 2d 76 65 72 73 69 6f 6e 2d 72 65 67 65 78 70 0a 20 20 22 5c 5c 60 5b 72 52 76	-build-version-regexp..."\\`[rRv
4560	56 5d 3f 5c 5c 28 3f 31 3a 5b 30 2d 39 5d 2b 5c 5c 28 5c 5c 2e 5b 30 2d 39 5d 2b 5c 5c 29 2a 5c	V]?\$?1:[0-9]+\\(\\.[0-9]+\$*\
4580	5c 29 5c 5c 27 22 0a 20 20 22 52 65 67 65 78 70 20 75 73 65 64 20 74 6f 20 6d 61 74 63 68 20 76	\)\\'"..."Regexp.used.to.match.v
45a0	61 6c 69 64 20 76 65 72 73 69 6f 6e 2d 73 74 72 69 6e 67 73 2e 0a 0a 54 68 65 20 66 69 72 73 74	alid.version-strings...The.first
45c0	20 63 61 70 74 75 72 65 20 69 73 20 75 73 65 64 20 74 6f 20 65 78 74 72 61 63 74 20 74 68 65 20	.capture.is.used.to.extract.the.
45e0	61 63 74 75 61 6c 20 76 65 72 73 69 6f 6e 20 73 74 72 69 6e 67 2e 0a 53 74 72 69 6e 67 73 20 6d	actual.version.string..Strings.m
4600	61 74 63 68 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	atched.by.that.group.must.be.val
4620	69 64 20 61 63 63 6f 72 64 69 6e 67 20 74 6f 0a 60 76 65 72 73 69 6f 6e 2d 74 6f 2d 6c 69 73 74	id.according.to.`version-to-list
4640	27 2c 20 62 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	',.but.the.used.regexp.can.be.mo
4660	72 65 20 73 74 72 69 63 74 2e 20 20 54 68 65 0a 64 65 66 61 75 6c 74 20 76 61 6c 75 65 20 73 75	re.strict...The.default.value.su
4680	70 70 6f 72 74 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	pports.only.releases.but.no.pre-
46a0	72 65 6c 65 61 73 65 73 2e 20 20 49 74 0a 61 6c 73 6f 20 69 6e 74 65 6e 74 69 6f 6e 61 6c 6c 79	releases...It.also.intentionally
46c0	20 69 67 6e 6f 72 65 73 20 63 65 64 72 74 61 69 6e 20 75 6e 66 6f 72 74 75 6e 61 74 65 20 76 65	.ignores.cedrtain.unfortunate.ve
46e0	72 73 69 6f 6e 20 73 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	rsion.strings.such.as.\"1A\".or.
4700	5c 22 2e 35 5c 22 2c 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	\".5\",.and.only.supports.\".\".
4720	61 73 20 73 65 70 61 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	as.separator...The.part.before.t
4740	68 65 20 66 69 72 73 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	he.first.capture.group.should.ma
4760	74 63 68 20 70 72 65 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	tch.prefixes.commonly.used.in.ve
4780	72 73 69 6f 6e 20 74 61 67 73 2e 0a 0a 4e 6f 74 65 20 74 68 61 74 20 74 68 69 73 20 76 61 72 69	rsion.tags...Note.that.this.vari
47a0	61 62 6c 65 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	able.can.be.overridden.in.a.pack
47c0	61 67 65 27 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	age's.recipe,.using.the.`:versio
47e0	6e 2d 72 65 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	n-regexp'.slot."...:group.'packa
4800	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 63	ge-build...:type.'string)..(defc
4820	75 73 74 6f 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	ustom.package-build-allowed-git-
4840	70 72 6f 74 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	protocols.'("https"."file"."ssh"
4860	29 0a 20 20 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	)..."Protocols.that.can.be.used.
4880	74 6f 20 66 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	to.fetch.from.upstream.with.git.
48a0	0a 42 79 20 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	.By.default.insecure.protocols,.
48c0	73 75 63 68 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	such.as.\"http\".or.\"git\",.are
48e0	0a 64 69 73 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	.disallowed."...:group.'package-
4900	62 75 69 6c 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	build...:type.'(repeat.string)).
4920	0a 28 64 65 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	.(defvar.package-build-use-git-r
4940	65 6d 6f 74 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	emote-hg.nil..."Whether.to.use.`
4960	67 69 74 2d 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	git-remote-hg'.remote.helper.for
4980	20 6d 65 72 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	.mercurial.repos.")..(defvar.pac
49a0	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 6c 0a 20 20	kage-build--inhibit-fetch.nil...
49c0	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 2e 20 20 55	"Whether.to.inhibit.fetching...U
49e0	73 65 66 75 6c 20 66 6f 72 20 74 65 73 74 69 6e 67 20 70 75 72 70 6f 73 65 73 2e 22 29 0a 0a 28	seful.for.testing.purposes.")..(
4a00	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 68	defvar.package-build--inhibit-ch
4a20	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 74	eckout.nil..."Whether.to.inhibit
4a40	20 63 68 65 63 6b 6f 75 74 2e 20 20 55 73 65 66 75 6c 20 66 6f 72 20 74 65 73 74 69 6e 67 20 70	.checkout...Useful.for.testing.p
4a60	75 72 70 6f 73 65 73 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 70 61 63 6b 61 67 65 2d 62 75 69 6c	urposes.")..(defvar.package-buil
4a80	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 65 74 68 65 72 20	d--inhibit-build.nil..."Whether.
4aa0	74 6f 20 69 6e 68 69 62 69 74 20 62 75 69 6c 64 69 6e 67 2e 20 20 55 73 65 66 75 6c 20 66 6f 72	to.inhibit.building...Useful.for
4ac0	20 74 65 73 74 69 6e 67 20 70 75 72 70 6f 73 65 73 2e 22 29 0a 0a 3b 3b 3b 20 47 65 6e 65 72 69	.testing.purposes.")..;;;.Generi
4ae0	63 20 55 74 69 6c 69 74 69 65 73 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c	c.Utilities..(defun.package-buil
4b00	64 2d 2d 6d 65 73 73 61 67 65 20 28 66 6f 72 6d 61 74 2d 73 74 72 69 6e 67 20 26 72 65 73 74 20	d--message.(format-string.&rest.
4b20	61 72 67 73 29 0a 20 20 22 42 65 68 61 76 65 20 6c 69 6b 65 20 60 6d 65 73 73 61 67 65 27 20 69	args)..."Behave.like.`message'.i
4b40	66 20 60 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 76 65 72 62 6f 73 65 27 20 69 73 20 6e 6f 6e	f.`package-build-verbose'.is.non
4b60	2d 6e 69 6c 2e 0a 4f 74 68 65 72 77 69 73 65 20 64 6f 20 6e 6f 74 68 69 6e 67 2e 20 20 46 4f 52	-nil..Otherwise.do.nothing...FOR
4b80	4d 41 54 2d 53 54 52 49 4e 47 20 61 6e 64 20 41 52 47 53 20 61 72 65 20 61 73 20 70 65 72 20 74	MAT-STRING.and.ARGS.are.as.per.t
4ba0	68 61 74 20 66 75 6e 63 74 69 6f 6e 2e 22 0a 20 20 28 77 68 65 6e 20 70 61 63 6b 61 67 65 2d 62	hat.function."...(when.package-b
4bc0	75 69 6c 64 2d 76 65 72 62 6f 73 65 0a 20 20 20 20 28 61 70 70 6c 79 20 23 27 6d 65 73 73 61 67	uild-verbose.....(apply.#'messag
4be0	65 20 66 6f 72 6d 61 74 2d 73 74 72 69 6e 67 20 61 72 67 73 29 29 29 0a 0a 28 64 65 66 75 6e 20	e.format-string.args)))..(defun.
4c00	70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 65 72 72 6f 72 20 28 70 61 63 6b 61 67 65 20 66 6f	package-build--error.(package.fo
4c20	72 6d 61 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	rmat-string.&rest.args)..."Behav
4c40	65 20 73 69 6d 69 6c 61 72 20 74 6f 20 60 65 72 72 6f 72 27 20 62 75 74 20 77 69 74 68 20 61 64	e.similar.to.`error'.but.with.ad
4c60	64 69 74 69 6f 6e 61 6c 20 6c 6f 67 67 69 6e 67 2e 0a 4c 6f 67 20 74 68 65 20 65 72 72 6f 72 20	ditional.logging..Log.the.error.
4c80	74 6f 20 5c 22 65 72 72 6f 72 73 2e 6c 6f 67 5c 22 20 69 6e 20 60 70 61 63 6b 61 67 65 2d 62 75	to.\"errors.log\".in.`package-bu
4ca0	69 6c 64 2d 61 72 63 68 69 76 65 2d 64 69 72 27 2e 0a 50 72 65 66 69 78 20 74 68 65 20 65 6e 74	ild-archive-dir'..Prefix.the.ent
4cc0	72 79 20 77 69 74 68 20 74 68 65 20 64 61 74 65 20 61 6e 64 20 69 66 20 70 6f 73 73 69 62 6c 65	ry.with.the.date.and.if.possible
4ce0	20 74 68 65 20 6e 61 6d 65 20 6f 66 20 61 0a 70 61 63 6b 61 67 65 2e 20 20 50 41 43 4b 41 47 45	.the.name.of.a.package...PACKAGE
4d00	20 69 64 65 6e 74 69 66 69 65 73 20 61 20 70 61 63 6b 61 67 65 2c 20 69 74 20 6d 75 73 74 20 62	.identifies.a.package,.it.must.b
4d20	65 20 61 20 70 61 63 6b 61 67 65 0a 6e 61 6d 65 2c 20 61 20 60 70 61 63 6b 61 67 65 2d 72 65 63	e.a.package.name,.a.`package-rec
4d40	69 70 65 27 20 6f 62 6a 65 63 74 20 6f 72 20 6e 69 6c 2c 20 69 66 20 74 68 65 20 63 6f 6d 6d 61	ipe'.object.or.nil,.if.the.comma
4d60	6e 64 20 69 73 20 6e 6f 74 0a 62 65 69 6e 67 20 72 75 6e 20 66 6f 72 20 61 20 70 61 72 74 69 63	nd.is.not.being.run.for.a.partic
4d80	75 6c 61 72 20 70 61 63 6b 61 67 65 2e 22 0a 20 20 28 64 65 63 6c 61 72 65 20 28 69 6e 64 65 6e	ular.package."...(declare.(inden
4da0	74 20 64 65 66 75 6e 29 29 0a 20 20 28 6c 65 74 20 28 28 65 72 72 20 28 61 70 70 6c 79 20 23 27	t.defun))...(let.((err.(apply.#'
4dc0	66 6f 72 6d 61 74 2d 6d 65 73 73 61 67 65 20 66 6f 72 6d 61 74 2d 73 74 72 69 6e 67 20 61 72 67	format-message.format-string.arg
4de0	73 29 29 29 0a 20 20 20 20 3b 3b 20 54 68 61 74 27 73 20 61 20 62 69 74 20 6f 66 20 61 6e 20 69	s))).....;;.That's.a.bit.of.an.i
4e00	6e 63 6f 6e 76 65 6e 69 65 6e 74 20 69 6e 74 65 72 66 61 63 65 2e 2e 2e 0a 20 20 20 20 28 77 69	nconvenient.interface........(wi
4e20	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 20 28 66 6f	th-temp-buffer.......(insert.(fo
4e40	72 6d 61 74 20 22 25 73 20 20 25 2d 32 35 73 20 20 25 73 5c 6e 22 0a 20 20 20 20 20 20 20 20 20	rmat."%s..%-25s..%s\n"..........
4e60	20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 2d 74 69 6d 65 2d 73 74 72 69 6e 67	.............(format-time-string
4e80	20 22 25 46 54 25 54 25 7a 22 20 6e 69 6c 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	."%FT%T%z".nil.t)...............
4ea0	20 20 20 20 20 20 20 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	........(if.(cl-typep.package.'p
4ec0	61 63 6b 61 67 65 2d 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	ackage-recipe)..................
4ee0	20 20 20 20 20 20 20 20 20 28 6f 72 65 66 20 70 61 63 6b 61 67 65 20 6e 61 6d 65 29 0a 20 20 20	.........(oref.package.name)....
4f00	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 70 61 63 6b 61 67 65	.....................(or.package
4f20	20 22 6e 2f 61 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65	."n/a")).......................e
4f40	72 72 29 29 0a 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 65 71 20 28 63 68 61 72 2d 62 65 66	rr)).......(unless.(eq.(char-bef
4f60	6f 72 65 29 20 3f 5c 6e 29 0a 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 22 5c 6e 22 29 29	ore).?\n).........(insert."\n"))
4f80	0a 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20	.......(goto-char.(point-min))..
4fa0	20 20 20 20 20 28 61 70 70 65 6e 64 2d 74 6f 2d 66 69 6c 65 0a 20 20 20 20 20 20 20 28 70 6f 69	.....(append-to-file........(poi
4fc0	6e 74 29 0a 20 20 20 20 20 20 20 28 31 2b 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f	nt)........(1+.(line-end-positio
4fe0	6e 29 29 0a 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 22 65 72	n))........(expand-file-name."er
5000	72 6f 72 73 2e 6c 6f 67 22 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 61 72 63 68 69 76 65 2d	rors.log".package-build-archive-
5020	64 69 72 29 29 29 0a 20 20 20 20 28 65 72 72 6f 72 20 22 25 73 22 20 65 72 72 29 29 29 0a 0a 3b	dir))).....(error."%s".err)))..;
5040	3b 3b 20 56 65 72 73 69 6f 6e 20 48 61 6e 64 6c 69 6e 67 0a 3b 3b 3b 3b 20 43 6f 6d 6d 6f 6e 0a	;;.Version.Handling.;;;;.Common.
5060	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 6c 65 63 74 2d 76 65	.(defun.package-build--select-ve
5080	72 73 69 6f 6e 20 28 72 63 70 29 0a 20 20 28 70 63 61 73 65 2d 6c 65 74 2a 0a 20 20 20 20 20 20	rsion.(rcp)...(pcase-let*.......
50a0	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 62 75 69	((default-directory.(package-bui
50c0	6c 64 2d 2d 77 6f 72 6b 69 6e 67 2d 74 72 65 65 20 72 63 70 20 74 29 29 0a 20 20 20 20 20 20 20	ld--working-tree.rcp.t))........
50e0	28 60 28 2c 63 6f 6d 6d 69 74 20 2c 74 69 6d 65 20 2c 76 65 72 73 69 6f 6e 29 0a 20 20 20 20 20	(`(,commit.,time.,version)......
5100	20 20 20 28 63 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	...(cond..........((with-no-warn
5120	69 6e 67 73 20 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	ings.package-build-get-version-f
5140	75 6e 63 74 69 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	unction)...........(display-warn
5160	69 6e 67 20 27 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	ing.'package-build."\.Variable.`
5180	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
51a0	6f 6e 27 20 69 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	on'.is.obsolete..Instead.set.`pa
51c0	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 63	ckage-build-release-version-func
51e0	74 69 6f 6e 73 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	tions'.and/or.`package-build-sna
5200	70 73 68 6f 74 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	pshot-version-functions',.and.se
5220	74 20 60 70 61 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	t.`package-build-stable'.to.cont
5240	72 6f 6c 20 77 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	rol.whether.releases.or.snapshot
5260	73 20 61 72 65 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	s.are.build.")...........(with-n
5280	6f 2d 77 61 72 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	o-warnings.(funcall.package-buil
52a0	64 2d 67 65 74 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	d-get-version-function.rcp)))...
52c0	20 20 20 20 20 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	.......(package-build-stable....
52e0	20 20 20 20 20 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	.......(run-hook-with-args-until
5300	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 69	-success............'package-bui
5320	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 20 72 63 70	ld-release-version-functions.rcp
5340	29 29 0a 20 20 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	))..........((run-hook-with-args
5360	2d 75 6e 74 69 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	-until-success............'packa
5380	67 65 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	ge-build-snapshot-version-functi
53a0	6f 6e 73 20 72 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	ons.rcp))))).....(if.(not.versio
53c0	6e 29 0a 20 20 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	n).........(funcall.(if.package-
53e0	62 75 69 6c 64 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	build-all-publishable.#'error.#'
5400	6d 65 73 73 61 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	message).................."Canno
5420	74 20 64 65 74 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	t.determine.version.for.%s".(ore
5440	66 20 72 63 70 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	f.rcp.name)).......(oset.rcp.com
5460	6d 69 74 20 63 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	mit.commit).......(oset.rcp.time
5480	20 74 69 6d 65 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	.time).......(oset.rcp.version.v
54a0	65 72 73 69 6f 6e 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	ersion))))..(cl-defmethod.packag
54c0	65 2d 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	e-build--select-commit.((rcp.pac
54e0	6b 61 67 65 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 70	kage-git-recipe).rev.exact)...(p
5500	63 61 73 65 2d 6c 65 74 2a 0a 20 20 20 20 20 20 28 28 60 28 2c 68 61 73 68 20 2c 74 69 6d 65 29	case-let*.......((`(,hash.,time)
5520	0a 20 20 20 20 20 20 20 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20	.........(split-string..........
5540	28 63 61 72 20 28 61 70 70 6c 79 20 23 27 70 72 6f 63 65 73 73 2d 6c 69 6e 65 73 0a 20 20 20 20	(car.(apply.#'process-lines.....
5560	20 20 20 20 20 20 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	................."git"."log"."-n
5580	31 22 20 22 2d 2d 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	1"."--first-parent"."--no-show-s
55a0	69 67 6e 61 74 75 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 22	ignature"......................"
55c0	2d 2d 70 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	--pretty=format:%H.%cd"."--date=
55e0	75 6e 69 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 28	unix".rev......................(
5600	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).................
5620	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 2d 62 75	..........(cons."--".(package-bu
5640	69 6c 64 2d 2d 73 70 65 63 2d 67 6c 6f 62 73 20 72 63 70 29 29 29 29 29 0a 20 20 20 20 20 20 20	ild--spec-globs.rcp)))))........
5660	20 20 22 20 22 29 29 29 0a 20 20 20 20 28 6c 69 73 74 20 68 61 73 68 20 28 73 74 72 69 6e 67 2d	.."."))).....(list.hash.(string-
5680	74 6f 2d 6e 75 6d 62 65 72 20 74 69 6d 65 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f	to-number.time))))..(cl-defmetho
56a0	64 20 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 28	d.package-build--select-commit.(
56c0	28 72 63 70 20 70 61 63 6b 61 67 65 2d 68 67 2d 72 65 63 69 70 65 29 20 72 65 76 20 65 78 61 63	(rcp.package-hg-recipe).rev.exac
56e0	74 29 0a 20 20 28 70 63 61 73 65 2d 6c 65 74 2a 0a 20 20 20 20 20 20 28 28 60 28 2c 68 61 73 68	t)...(pcase-let*.......((`(,hash
5700	20 2c 74 69 6d 65 20 2c 5f 74 69 6d 65 7a 6f 6e 65 29 0a 20 20 20 20 20 20 20 20 28 73 70 6c 69	.,time.,_timezone).........(spli
5720	74 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 28 63 61 72 20 28 61 70 70 6c 79 20 23 27	t-string..........(car.(apply.#'
5740	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 20 20 20 20 20	process-lines...................
5760	20 20 20 3b 3b 20 54 68 65 20 22 64 61 74 65 22 20 6b 65 79 77 6f 72 64 20 75 73 65 73 20 55 54	...;;.The."date".keyword.uses.UT
5780	43 2e 20 54 68 65 20 22 68 67 64 61 74 65 22 20 66 69 6c 74 65 72 0a 20 20 20 20 20 20 20 20 20	C..The."hgdate".filter..........
57a0	20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 72 65 74 75 72 6e 73 20 74 77 6f 20 69 6e 74 65 67	............;;.returns.two.integ
57c0	65 72 73 20 73 65 70 61 72 61 74 65 64 20 62 79 20 61 20 73 70 61 63 65 3b 20 74 68 65 0a 20 20	ers.separated.by.a.space;.the...
57e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 75 6e 69 78 20 74 69 6d 65 73	...................;;.unix.times
5800	74 61 6d 70 20 61 6e 64 20 74 68 65 20 74 69 6d 65 7a 6f 6e 65 20 6f 66 66 73 65 74 2e 20 20 57	tamp.and.the.timezone.offset...W
5820	65 20 75 73 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 22 68	e.use......................;;."h
5840	67 64 61 74 65 22 20 62 65 63 61 75 73 65 20 74 68 61 74 20 6d 61 6b 65 73 20 69 74 20 65 61 73	gdate".because.that.makes.it.eas
5860	69 65 72 20 74 6f 20 64 69 73 63 61 72 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ier.to.discard..................
5880	20 20 20 20 3b 3b 20 74 68 65 20 74 69 6d 65 20 7a 6f 6e 65 20 6f 66 66 73 65 74 2c 20 77 68 69	....;;.the.time.zone.offset,.whi
58a0	63 68 20 64 6f 65 73 6e 27 74 20 69 6e 74 65 72 65 73 74 20 75 73 2e 0a 20 20 20 20 20 20 20 20	ch.doesn't.interest.us..........
58c0	20 20 20 20 20 20 20 20 20 20 20 20 20 22 68 67 22 20 22 6c 6f 67 22 20 22 2d 2d 6c 69 6d 69 74	............."hg"."log"."--limit
58e0	22 20 22 31 22 0a 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	"."1"......................"--te
5900	6d 70 6c 61 74 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	mplate"."{node}.{date\|hgdate}\n"
5920	20 22 2d 2d 72 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	."--rev".rev....................
5940	20 20 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	..(and.(not.exact)..............
5960	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
5980	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 0a 20 20 20 20	-build--spec-globs.rcp))))).....
59a0	20 20 20 20 20 22 20 22 29 29 29 0a 20 20 20 20 28 6c 69 73 74 20 68 61 73 68 20 28 73 74 72 69	....."."))).....(list.hash.(stri
59c0	6e 67 2d 74 6f 2d 6e 75 6d 62 65 72 20 74 69 6d 65 29 29 29 29 0a 0a 3b 3b 3b 3b 20 54 61 67 0a	ng-to-number.time))))..;;;;.Tag.
59e0	0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 74 61 67 2d 76 65 72 73 69 6f	.(defun.package-build-tag-versio
5a00	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 63 6f 72	n.(rcp)..."Determine.version.cor
5a20	72 65 73 70 6f 6e 64 69 6e 67 20 74 6f 20 6c 61 72 67 65 73 74 20 76 65 72 73 69 6f 6e 20 74 61	responding.to.largest.version.ta
5a40	67 20 66 6f 72 20 52 43 50 2e 0a 52 65 74 75 72 6e 20 28 43 4f 4d 4d 49 54 2d 48 41 53 48 20 43	g.for.RCP..Return.(COMMIT-HASH.C
5a60	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 29 2e 22 0a	OMMITTER-DATE.VERSION-STRING).".
5a80	20 20 28 6c 65 74 20 28 28 72 65 67 65 78 70 20 28 6f 72 20 28 6f 72 65 66 20 72 63 70 20 76 65	..(let.((regexp.(or.(oref.rcp.ve
5aa0	72 73 69 6f 6e 2d 72 65 67 65 78 70 29 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 76 65 72 73	rsion-regexp).package-build-vers
5ac0	69 6f 6e 2d 72 65 67 65 78 70 29 29 0a 20 20 20 20 20 20 20 20 28 74 61 67 20 6e 69 6c 29 0a 20	ion-regexp)).........(tag.nil)..
5ae0	20 20 20 20 20 20 20 28 76 65 72 73 69 6f 6e 20 27 28 30 29 29 29 0a 20 20 20 20 28 64 6f 6c 69	.......(version.'(0))).....(doli
5b00	73 74 20 28 6e 20 28 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	st.(n.(package-build--list-tags.
5b20	72 63 70 29 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 76 20 28 69 67 6e 6f 72 65 2d 65 72 72	rcp)).......(let.((v.(ignore-err
5b40	6f 72 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 76 65 72 73 69 6f 6e 2d 74 6f	ors..................(version-to
5b60	2d 6c 69 73 74 20 28 61 6e 64 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 72 65 67 65 78 70 20	-list.(and.(string-match.regexp.
5b80	6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	n)..............................
5ba0	20 20 20 20 20 20 20 20 20 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 31 20 6e 29 29 29 29 29	..........(match-string.1.n)))))
5bc0	29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 76 20 28 76 65 72 73 69 6f 6e 2d	).........(when.(and.v.(version-
5be0	6c 69 73 74 2d 3c 3d 20 76 65 72 73 69 6f 6e 20 76 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 69	list-<=.version.v))...........(i
5c00	66 20 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	f.(cl-typep.rcp.'package-git-rec
5c20	69 70 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 74 61 67 20 28 63 6f	ipe)...............(setq.tag.(co
5c40	6e 63 61 74 20 22 72 65 66 73 2f 74 61 67 73 2f 22 20 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20	ncat."refs/tags/".n))...........
5c60	20 20 28 73 65 74 71 20 74 61 67 20 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20	..(setq.tag.n))...........(setq.
5c80	76 65 72 73 69 6f 6e 20 76 29 29 29 29 0a 20 20 20 20 28 61 6e 64 20 74 61 67 0a 20 20 20 20 20	version.v)))).....(and.tag......
5ca0	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).
5cc0	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 20 72 63	(package-build--select-commit.rc
5ce0	70 20 74 61 67 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 68 61 73 68	p.tag.t)))............(list.hash
5d00	20 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 76 65 72 73	.time.(package-version-join.vers
5d20	69 6f 6e 29 29 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	ion))))))..(cl-defmethod.package
5d40	2d 62 75 69 6c 64 2d 2d 6c 69 73 74 2d 74 61 67 73 20 28 28 5f 72 63 70 20 70 61 63 6b 61 67 65	-build--list-tags.((_rcp.package
5d60	2d 67 69 74 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	-git-recipe))...(process-lines."
5d80	67 69 74 22 20 22 74 61 67 22 20 22 2d 2d 6c 69 73 74 22 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65	git"."tag"."--list"))..(cl-defme
5da0	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.((
5dc0	5f 72 63 70 20 70 61 63 6b 61 67 65 2d 68 67 2d 72 65 63 69 70 65 29 29 0a 20 20 28 70 72 6f 63	_rcp.package-hg-recipe))...(proc
5de0	65 73 73 2d 6c 69 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	ess-lines."hg"."tags"."--quiet")
5e00	29 0a 0a 28 64 65 66 69 6e 65 2d 6f 62 73 6f 6c 65 74 65 2d 66 75 6e 63 74 69 6f 6e 2d 61 6c 69	)..(define-obsolete-function-ali
5e20	61 73 20 27 70 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	as.'package-build-get-tag-versio
5e40	6e 0a 20 20 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 20 22	n...'package-build-tag-version."
5e60	50 61 63 6b 61 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	Package-Build.5.0.0")..;;;;.Head
5e80	65 72 0a 0a 28 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	er..(defun.package-build-header-
5ea0	76 65 72 73 69 6f 6e 20 28 72 63 70 29 0a 20 20 22 52 65 74 75 72 6e 20 76 65 72 73 69 6f 6e 20	version.(rcp)..."Return.version.
5ec0	73 70 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	specified.in.the.header.of.the.m
5ee0	61 69 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	ain.library...Walk.the.history.o
5f00	66 20 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	f.the.main.library.until.a.commi
5f20	74 20 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	t.is.found.which.changes.the.`Pa
5f40	63 6b 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	ckage-Version'.or.`Version'.head
5f60	65 72 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	er.in.the.main.library.to.a.vers
5f80	69 6f 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	ion.that.qualifies.as.a.release,
5fa0	20 69 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	.ignoring.any.pre-releases...Ret
5fc0	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 44 41 54 45 20	urn.(COMMIT-HASH.COMMITTER-DATE.
5fe0	56 45 52 53 49 4f 4e 2d 53 54 52 49 4e 47 29 2e 22 0a 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28	VERSION-STRING)."...(and-let*.((
6000	6c 69 62 20 28 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	lib.(package-build--main-library
6020	20 72 63 70 29 29 29 0a 20 20 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 20	.rcp))).....(with-temp-buffer...
6040	20 20 20 20 28 6c 65 74 20 28 63 6f 6d 6d 69 74 20 64 61 74 65 20 76 65 72 73 69 6f 6e 29 0a 20	....(let.(commit.date.version)..
6060	20 20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20	.......(save-excursion..........
6080	20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 69 6e 73 65 72 74 2d 76 65 72 73 69 6f 6e 2d	.(package-build--insert-version-
60a0	68 65 61 64 65 72 2d 6c 6f 67 0a 20 20 20 20 20 20 20 20 20 20 20 72 63 70 20 28 66 69 6c 65 2d	header-log............rcp.(file-
60c0	72 65 6c 61 74 69 76 65 2d 6e 61 6d 65 20 6c 69 62 29 29 29 0a 20 20 20 20 20 20 20 20 28 77 68	relative-name.lib))).........(wh
60e0	69 6c 65 20 28 61 6e 64 20 28 6e 6f 74 20 76 65 72 73 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20	ile.(and.(not.version)..........
6100	20 20 20 20 20 20 20 20 20 20 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 5e	...........(re-search-forward."^
6120	63 6f 6d 6d 69 74 20 5c 5c 28 5b 5e 20 5d 2b 5c 5c 29 20 5c 5c 28 2e 2b 5c 5c 29 22 20 6e 69 6c	commit.\$[^.]+\$.\$.+\$".nil
6140	20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 6f 6d 6d 69 74 20 28 6d 61 74	.t))...........(setq.commit.(mat
6160	63 68 2d 73 74 72 69 6e 67 20 31 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 64 61	ch-string.1))...........(setq.da
6180	74 65 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 32 29 29 0a 20 20 20 20 20 20 20 20 20 20 28	te.(match-string.2))...........(
61a0	6c 65 74 20 28 28 65 6e 64 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 20 28 72 65 2d 73 65	let.((end.(save-excursion.(re-se
61c0	61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 5e 24 22 20 6e 69 6c 20 74 29 29 29 29 0a 20 20 20 20	arch-forward."^$".nil.t)))).....
61e0	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 77 61 72 64	........(when.(re-search-forward
6200	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 5e 5c 5c 2b 3b 3b 2a 20 2a 5c 5c	...................."^\\+;;.\\
6220	28 50 61 63 6b 61 67 65 2d 5c 5c 29 3f 56 65 72 73 69 6f 6e 3a 20 2a 5c 5c 28 2e 2b 5c 5c 29 22	(Package-\\)?Version:.*\$.+\$"
6240	20 65 6e 64 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 76 65 72	.end.t)...............(let.((ver
6260	20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 32 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	.(match-string.2))).............
6280	20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 6e 6f 74 20 28 65 71 75 61 6c 20 76 65 72 20 22	....(when.(and.(not.(equal.ver."
62a0	30 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	0"))............................
62c0	28 73 74 72 69 6e 67 2d 6d 61 74 63 68 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	(string-match...................
62e0	20 20 20 20 20 20 20 20 20 20 22 5c 5c 60 5c 5c 28 5b 30 2d 39 5d 2b 5c 5c 29 5c 5c 28 5c 5c 2e	.........."\\`\$[0-9]+\$\\(\\.
6300	5b 30 2d 39 5d 2b 5c 5c 29 2a 5c 5c 27 22 20 76 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20	[0-9]+\\)*\\'".ver))............
6320	20 20 20 20 20 20 20 28 73 65 74 71 20 76 65 72 73 69 6f 6e 20 76 65 72 29 29 29 29 0a 20 20 20	.......(setq.version.ver))))....
6340	20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 65 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	.........(when.end..............
6360	20 28 67 6f 74 6f 2d 63 68 61 72 20 65 6e 64 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 61 6e 64	.(goto-char.end)))).........(and
6380	20 76 65 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 63 6f 6d 6d	.version..............(list.comm
63a0	69 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 2d 74 6f	it....................(string-to
63c0	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 20	-number.date)...................
63e0	20 28 70 61 63 6b 61 67 65 2d 76 65 72 73 69 6f 6e 2d 6a 6f 69 6e 20 28 76 65 72 73 69 6f 6e 2d	.(package-version-join.(version-
6400	74 6f 2d 6c 69 73 74 20 76 65 72 73 69 6f 6e 29 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20	to-list.version))))))))..(defun.
6420	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 28 72 63 70	package-build--main-library.(rcp
6440	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 62 72 61 72	)...(package-build--match-librar
6460	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 64 2d 2d 6d	y.rcp))..(defun.package-build--m
6480	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 66 69 6c 65	atch-library.(rcp.&optional.file
64a0	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 2d 62 75 69	name)...(let.((libs.(package-bui
64c0	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 20 20 20 20	ld--list-libraries.rcp))........
64e0	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 63 61 74 20	.(filename.(or.filename.(concat.
6500	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 20 20 28 63	(oref.rcp.name).".el")))).....(c
6520	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 61 74 20 22	ond......((car.(member.(concat."
6540	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 20 20 28 28	lisp/".filename).libs)))......((
6560	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 0a 20 20 20	car.(member.filename.libs)))....
6580	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 65 73 74 20	..((cl-find.filename.libs.:test.
65a0	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 64 69 72 65	#'equal.:key.#'file-name-nondire
65c0	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 63 6b 61 67	ctory)))))..(cl-defmethod.packag
65e0	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 63 70 20 70	e-build--list-libraries.((_rcp.p
6600	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 73 73 2d 6c	ackage-git-recipe))...(process-l
6620	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 29 29 0a 0a	ines."git"."ls-files"."*.el"))..
6640	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 6c 69 73	(cl-defmethod.package-build--lis
6660	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 67 2d 72 65	t-libraries.((_rcp.package-hg-re
6680	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 20 22 66 69	cipe))...(process-lines."hg"."fi
66a0	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 0a 0a 28 63	les"."--include"."*/.el"))..(c
66c0	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
66e0	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
6700	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 6c 6c 2d 70	ckage-git-recipe).lib)...(call-p
6720	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 20 20 20 20	rocess."git".nil.t.nil..........
6740	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 22 20 22 2d	......."log"."--first-parent"."-
6760	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 20 22 2d 2d	-no-renames"................."--
6780	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 20 22 2d 2d	pretty=format:commit.%H.%cd"."--
67a0	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 2d 4c 22 20	date=unix"................."-L".
67c0	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 5c 29 5c 5c	(format."/^;;.\$Package-\$\\
67e0	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 6c 2d 64 65	?Version:/,+1:%s".lib)))..(cl-de
6800	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 74 2d 76 65	fmethod.package-build--insert-ve
6820	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 63 6b 61 67	rsion-header-log...((_rcp.packag
6840	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 72 6f 63 65	e-hg-recipe)._lib)...(call-proce
6860	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 20 20 20 20	ss."hg".nil.t.nil...............
6880	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 20 20 20 20	.."log"."--first-parent"........
68a0	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 74 3a 20 7b	........."--template"."commit:.{
68c0	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"..........
68e0	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 20 65 71 75	.......)).;.TODO.What.is.the.equ
6900	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 20 4e 41 4d	ivalent.of.Git's."-L"?..;;;;.NAM
6920	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 70 6b 67 2d	E-pkg..(defun.package-build-pkg-
6940	76 65 72 73 69 6f 6e 20 28 72 63 70 29 0a 20 20 22 52 65 74 75 72 6e 20 76 65 72 73 69 6f 6e 20	version.(rcp)..."Return.version.
6960	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 6b 67 2e 65 6c 5c 22	specified.in.the.\"NAME-pkg.el\"
6980	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 48 20 43 4f 4d 4d 49	.file..Return.(COMMIT-HASH.COMMI
69a0	54 54 45 52 2d 44 41 54 45 20 56 45 52 53 49 4f 4e 2d 53 54 52 49 4e 47 29 2e 22 0a 20 20 28 61	TTER-DATE.VERSION-STRING)."...(a
69c0	6e 64 2d 6c 65 74 2a 20 28 28 66 69 6c 65 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 70	nd-let*.((file.(package-build--p
69e0	6b 67 66 69 6c 65 20 72 63 70 29 29 29 0a 20 20 20 20 28 6c 65 74 20 28 28 72 65 67 65 78 70 20	kgfile.rcp))).....(let.((regexp.
6a00	28 6f 72 20 28 6f 72 65 66 20 72 63 70 20 76 65 72 73 69 6f 6e 2d 72 65 67 65 78 70 29 20 70 61	(or.(oref.rcp.version-regexp).pa
6a20	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 29 29 0a 20 20 20	ckage-build-version-regexp))....
6a40	20 20 20 20 20 20 20 63 6f 6d 6d 69 74 20 64 61 74 65 20 76 65 72 73 69 6f 6e 29 0a 20 20 20 20	.......commit.date.version).....
6a60	20 20 28 63 61 74 63 68 20 27 62 65 66 6f 72 65 2d 6c 61 74 65 73 74 0a 20 20 20 20 20 20 20 20	..(catch.'before-latest.........
6a80	28 70 63 61 73 65 2d 64 6f 6c 69 73 74 20 28 60 28 2c 63 20 2c 64 29 20 28 70 61 63 6b 61 67 65	(pcase-dolist.(`(,c.,d).(package
6aa0	2d 62 75 69 6c 64 2d 2d 70 6b 67 66 69 6c 65 2d 63 6f 6d 6d 69 74 73 20 72 63 70 20 66 69 6c 65	-build--pkgfile-commits.rcp.file
6ac0	29 29 0a 20 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	))...........(with-temp-buffer..
6ae0	20 20 20 20 20 20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20	...........(save-excursion......
6b00	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 73 65 72 74 2d	.........(package-build--insert-
6b20	70 6b 67 66 69 6c 65 20 72 63 70 20 63 20 66 69 6c 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20	pkgfile.rcp.c.file))............
6b40	20 28 77 68 65 6e 2d 6c 65 74 2a 20 28 28 6e 20 28 69 67 6e 6f 72 65 2d 65 72 72 6f 72 73 20 28	.(when-let*.((n.(ignore-errors.(
6b60	6e 74 68 20 32 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	nth.2.(read.(current-buffer)))))
6b80	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 76 20 28 69 67 6e	.........................(v.(ign
6ba0	6f 72 65 2d 65 72 72 6f 72 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ore-errors......................
6bc0	20 20 20 20 20 20 20 20 28 76 65 72 73 69 6f 6e 2d 74 6f 2d 6c 69 73 74 0a 20 20 20 20 20 20 20	........(version-to-list........
6be0	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 73 74 72	.......................(and.(str
6c00	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 20	ing-match.regexp.n).............
6c20	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 55 73 65 20 6d 61	.......................;;.Use.ma
6c40	74 63 68 2d 67 72 6f 75 70 20 30 2c 20 6e 6f 74 20 31 2c 20 62 65 63 61 75 73 65 20 69 6e 0a 20	tch-group.0,.not.1,.because.in..
6c60	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
6c80	20 20 3b 3b 20 74 68 69 73 20 66 69 6c 65 20 61 20 76 65 72 73 69 6f 6e 20 73 74 72 69 6e 67 20	..;;.this.file.a.version.string.
6ca0	77 69 74 68 6f 75 74 20 61 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	without.a.......................
6cc0	20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 70 72 65 66 69 78 20 69 73 20 65 78 70 65 63 74	.............;;.prefix.is.expect
6ce0	65 64 2e 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	ed..............................
6d00	20 20 20 20 20 20 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 30 20 6e 29 29 29 29 29 29 0a 20	.......(match-string.0.n))))))..
6d20	20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 76 65 72 73 69 6f 6e 20	.............(when.(and.version.
6d40	28 6e 6f 74 20 28 65 71 75 61 6c 20 76 20 76 65 72 73 69 6f 6e 29 29 29 0a 20 20 20 20 20 20 20	(not.(equal.v.version)))........
6d60	20 20 20 20 20 20 20 20 20 28 74 68 72 6f 77 20 27 62 65 66 6f 72 65 2d 6c 61 74 65 73 74 20 6e	.........(throw.'before-latest.n
6d80	69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 6f 6d 6d 69 74 20	il))...............(setq.commit.
6da0	63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 64 61 74 65 20 64 29 0a 20	c)...............(setq.date.d)..
6dc0	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 6e 20 76 29 29 29 29	.............(setq.version.v))))
6de0	29 0a 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 20	).......(and.version............
6e00	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 20 28 73	(list.commit..................(s
6e20	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 20 20 20 20 20	tring-to-number.date)...........
6e40	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 69 6e 20 76 65 72	.......(package-version-join.ver
6e60	73 69 6f 6e 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 6c 64	sion))))))..(defun.package-build
6e80	2d 2d 70 6b 67 66 69 6c 65 20 28 72 63 70 29 0a 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64	--pkgfile.(rcp)...(package-build
6ea0	2d 2d 6d 61 74 63 68 2d 6c 69 62 72 61 72 79 20 72 63 70 20 28 63 6f 6e 63 61 74 20 28 6f 72 65	--match-library.rcp.(concat.(ore
6ec0	66 20 72 63 70 20 6e 61 6d 65 29 20 22 2d 70 6b 67 2e 65 6c 22 29 29 29 0a 0a 28 63 6c 2d 64 65	f.rcp.name)."-pkg.el")))..(cl-de
6ee0	66 6d 65 74 68 6f 64 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 70 6b 67 66 69 6c 65 2d 63	fmethod.package-build--pkgfile-c
6f00	6f 6d 6d 69 74 73 0a 20 20 28 28 5f 72 63 70 20 70 61 63 6b 61 67 65 2d 67 69 74 2d 72 65 63 69	ommits...((_rcp.package-git-reci
6f20	70 65 29 20 66 69 6c 65 29 0a 20 20 28 6d 61 70 63 61 72 20 28 6c 61 6d 62 64 61 20 28 6c 69 6e	pe).file)...(mapcar.(lambda.(lin
6f40	65 29 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 6c 69 6e 65 20 22 20 22 29 29 0a 20 20 20 20	e).(split-string.line.".")).....
6f60	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 22 6c 6f 67 22	......(process-lines."git"."log"
6f80	20 22 2d 2d 66 69 72 73 74 2d 70 61 72 65 6e 74 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	."--first-parent"...............
6fa0	20 20 20 20 20 20 20 20 20 20 20 22 2d 2d 70 72 65 74 74 79 3d 66 6f 72 6d 61 74 3a 25 48 20 25	..........."--pretty=format:%H.%
6fc0	63 64 22 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	cd"."--date=unix"...............
6fe0	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 6c 2d 64 65 66	..........."--".file)))..(cl-def
7000	6d 65 74 68 6f 64 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 70 6b 67 66 69 6c 65 2d 63 6f	method.package-build--pkgfile-co
7020	6d 6d 69 74 73 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	mmits...((_rcp.package-hg-recipe
7040	29 20 66 69 6c 65 29 0a 20 20 28 6d 61 70 63 61 72 20 28 6c 61 6d 62 64 61 20 28 6c 69 6e 65 29	).file)...(mapcar.(lambda.(line)
7060	20 28 73 65 71 2d 74 61 6b 65 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 6c 69 6e 65 20 22 20	.(seq-take.(split-string.line.".
7080	22 29 20 32 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 73 20	").2))...........(process-lines.
70a0	22 68 67 22 20 22 6c 6f 67 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	"hg"."log"......................
70c0	20 20 20 20 22 2d 2d 74 65 6d 70 6c 61 74 65 22 20 22 7b 6e 6f 64 65 7d 20 7b 64 61 74 65 7c 68	...."--template"."{node}.{date\|h
70e0	67 64 61 74 65 7d 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	gdate}\n".......................
7100	20 20 20 22 2d 2d 22 20 66 69 6c 65 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 70	..."--".file)))..(cl-defmethod.p
7120	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 0a 20 20 28	ackage-build--insert-pkgfile...(
7140	28 5f 72 63 70 20 70 61 63 6b 61 67 65 2d 67 69 74 2d 72 65 63 69 70 65 29 20 63 6f 6d 6d 69 74	(_rcp.package-git-recipe).commit
7160	20 66 69 6c 65 29 0a 20 20 28 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 22 67 69 74 22 20 6e 69 6c	.file)...(call-process."git".nil
7180	20 74 20 6e 69 6c 20 22 73 68 6f 77 22 20 28 63 6f 6e 63 61 74 20 63 6f 6d 6d 69 74 20 22 3a 22	.t.nil."show".(concat.commit.":"
71a0	20 66 69 6c 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	.file)))..(cl-defmethod.package-
71c0	62 75 69 6c 64 2d 2d 69 6e 73 65 72 74 2d 70 6b 67 66 69 6c 65 0a 20 20 28 28 5f 72 63 70 20 70	build--insert-pkgfile...((_rcp.p
71e0	61 63 6b 61 67 65 2d 68 67 2d 72 65 63 69 70 65 29 20 63 6f 6d 6d 69 74 20 66 69 6c 65 29 0a 20	ackage-hg-recipe).commit.file)..
7200	20 28 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 22 68 67 22 20 6e 69 6c 20 74 20 6e 69 6c 20 22 63	.(call-process."hg".nil.t.nil."c
7220	61 74 22 20 22 2d 72 22 20 63 6f 6d 6d 69 74 20 66 69 6c 65 29 29 0a 0a 3b 3b 3b 3b 20 54 69 6d	at"."-r".commit.file))..;;;;.Tim
7240	65 73 74 61 6d 70 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 74 69 6d	estamp..(defun.package-build-tim
7260	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 6d 69 6e	estamp-version.(rcp)..."Determin
7280	65 20 74 69 6d 65 73 74 61 6d 70 20 76 65 72 73 69 6f 6e 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e	e.timestamp.version.correspondin
72a0	67 20 74 6f 20 6c 61 74 65 73 74 20 72 65 6c 65 76 61 6e 74 20 63 6f 6d 6d 69 74 20 66 6f 72 20	g.to.latest.relevant.commit.for.
72c0	52 43 50 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	RCP..Return.(COMMIT-HASH.COMMITT
72e0	45 52 2d 44 41 54 45 20 56 45 52 53 49 4f 4e 2d 53 54 52 49 4e 47 29 2c 20 77 68 65 72 65 0a 56	ER-DATE.VERSION-STRING),.where.V
7300	45 52 53 49 4f 4e 2d 53 54 52 49 4e 47 20 68 61 73 20 74 68 65 20 66 6f 72 6d 61 74 20 5c 22 25	ERSION-STRING.has.the.format.\"%
7320	59 25 6d 25 64 2e 25 48 25 4d 5c 22 2e 22 0a 20 20 28 70 63 61 73 65 2d 6c 65 74 20 28 28 60 28	Y%m%d.%H%M\"."...(pcase-let.((`(
7340	2c 68 61 73 68 20 2c 74 69 6d 65 29 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 74 69 6d	,hash.,time).(package-build--tim
7360	65 73 74 61 6d 70 2d 76 65 72 73 69 6f 6e 20 72 63 70 29 29 29 0a 20 20 20 20 28 6c 69 73 74 20	estamp-version.rcp))).....(list.
7380	68 61 73 68 20 74 69 6d 65 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 57 65 20 72 65 6d 6f 76 65	hash.time...........;;.We.remove
73a0	20 7a 65 72 6f 2d 70 61 64 64 69 6e 67 20 6f 66 20 74 68 65 20 48 48 20 70 6f 72 74 69 6f 6e 2c	.zero-padding.of.the.HH.portion,
73c0	20 61 73 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 74 68 61 74 20 69 73 20 6c 6f 73 74 20 77 68	.as...........;;.that.is.lost.wh
73e0	65 6e 20 73 74 6f 72 65 64 20 69 6e 20 61 72 63 68 69 76 65 2d 63 6f 6e 74 65 6e 74 73 2e 0a 20	en.stored.in.archive-contents...
7400	20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 28 66 6f 72 6d 61 74 2d 74 69 6d 65 2d 73 74	.........(concat.(format-time-st
7420	72 69 6e 67 20 22 25 59 25 6d 25 64 2e 22 20 74 69 6d 65 20 74 29 0a 20 20 20 20 20 20 20 20 20	ring."%Y%m%d.".time.t)..........
7440	20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 64 22 20 28 73 74 72 69 6e 67 2d 74 6f	.........(format."%d".(string-to
7460	2d 6e 75 6d 62 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	-number.........................
7480	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 20 22 25 48 25	........(format-time-string."%H%
74a0	4d 22 20 74 69 6d 65 20 74 29 29 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20	M".time.t)))))))..(cl-defmethod.
74c0	70 61 63 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	package-build--timestamp-version
74e0	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 70	.((rcp.package-git-recipe))...(p
7500	63 61 73 65 2d 6c 65 74 2a 0a 20 20 20 20 20 20 28 28 63 6f 6d 6d 69 74 20 28 6f 72 65 66 20 72	case-let*.......((commit.(oref.r
7520	63 70 20 63 6f 6d 6d 69 74 29 29 0a 20 20 20 20 20 20 20 28 62 72 61 6e 63 68 20 28 6f 72 65 66	cp.commit))........(branch.(oref
7540	20 72 63 70 20 62 72 61 6e 63 68 29 29 0a 20 20 20 20 20 20 20 28 62 72 61 6e 63 68 20 28 61 6e	.rcp.branch))........(branch.(an
7560	64 20 62 72 61 6e 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	d.branch.(concat."origin/".branc
7580	68 29 29 29 0a 20 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	h)))........(rev.(or.commit.bran
75a0	63 68 20 22 6f 72 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	ch."origin/HEAD"))........(`(,re
75c0	76 2d 68 61 73 68 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	v-hash.,rev-time).(package-build
75e0	2d 2d 73 65 6c 65 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	--select-commit.rcp.rev.commit))
7600	0a 20 20 20 20 20 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	........(`(,tag-hash.,tag-time).
7620	28 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 72 63 70 29 29	(package-build-tag-version.rcp))
7640	29 0a 20 20 20 20 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	).....;;.If.the.latest.commit.th
7660	61 74 20 74 6f 75 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	at.touches.a.relevant.file.is.an
7680	20 61 6e 63 65 73 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	.ancestor.of.....;;.the.latest.t
76a0	61 67 67 65 64 20 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	agged.release.and.the.tag.is.rea
76c0	63 68 61 62 6c 65 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	chable.from.origin/HEAD.....;;.(
76e0	69 2e 65 2e 2c 20 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	i.e.,.it.isn't.on.a.separate.rel
7700	65 61 73 65 20 62 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	ease.branch).then.use.the.tagged
7720	0a 20 20 20 20 3b 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	.....;;.release...Snapshots.shou
7740	6c 64 20 6e 6f 74 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	ld.not.be.older.than.the.latest.
7760	72 65 6c 65 61 73 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	release......(if.(and.tag-hash..
7780	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 65 73 73	............(zerop.(call-process
77a0	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 20 20 20	."git".nil.nil.nil..............
77c0	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 61 73 65	....................."merge-base
77e0	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 20 20 20	"."--is-ancestor"...............
7800	20 20 20 20 20 20 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	....................rev-hash.tag
7820	2d 68 61 73 68 29 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	-hash))..............(zerop.(cal
7840	6c 2d 70 72 6f 63 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	l-process."git".nil.nil.nil.....
7860	20 20 20 20 20 20 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	.............................."m
7880	65 72 67 65 2d 62 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	erge-base"."--is-ancestor"......
78a0	20 20 20 20 20 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	.............................tag
78c0	2d 68 61 73 68 20 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	-hash.rev))).........(list.tag-h
78e0	61 73 68 20 74 61 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	ash.tag-time).......(list.rev-ha
7900	73 68 20 72 65 76 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	sh.rev-time))))..(cl-defmethod.p
7920	61 63 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	ackage-build--timestamp-version.
7940	28 28 72 63 70 20 70 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	((rcp.package-hg-recipe))...(let
7960	2a 20 28 28 63 6f 6d 6d 69 74 20 28 6f 72 65 66 20 72 63 70 20 63 6f 6d 6d 69 74 29 29 0a 20 20	*.((commit.(oref.rcp.commit))...
7980	20 20 20 20 20 20 20 28 62 72 61 6e 63 68 20 28 6f 72 20 28 6f 72 65 66 20 72 63 70 20 62 72 61	.......(branch.(or.(oref.rcp.bra
79a0	6e 63 68 29 20 22 64 65 66 61 75 6c 74 22 29 29 0a 20 20 20 20 20 20 20 20 20 28 72 65 76 20 28	nch)."default"))..........(rev.(
79c0	66 6f 72 6d 61 74 20 22 73 6f 72 74 28 61 6e 63 65 73 74 6f 72 73 28 25 73 29 2c 20 2d 72 65 76	format."sort(ancestors(%s),.-rev
79e0	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 28 6f 72 20 63 6f 6d	)".......................(or.com
7a00	6d 69 74 20 28 66 6f 72 6d 61 74 20 22 6d 61 78 28 62 72 61 6e 63 68 28 25 73 29 29 22 20 62 72	mit.(format."max(branch(%s))".br
7a20	61 6e 63 68 29 29 29 29 29 0a 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 73 65	anch))))).....(package-build--se
7a40	6c 65 63 74 2d 63 6f 6d 6d 69 74 20 72 63 70 20 72 65 76 20 6e 69 6c 29 29 29 0a 0a 28 64 65 66	lect-commit.rcp.rev.nil)))..(def
7a60	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 61 63	ine-obsolete-function-alias.'pac
7a80	6b 61 67 65 2d 62 75 69 6c 64 2d 67 65 74 2d 73 6e 61 70 73 68 6f 74 2d 76 65 72 73 69 6f 6e 0a	kage-build-get-snapshot-version.
7aa0	20 20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 73 6e 61 70 73 68 6f 74 2d 76 65 72 73 69 6f	..'package-build-snapshot-versio
7ac0	6e 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 3b 3b 3b 3b 20 52	n."Package-Build.5.0.0")..;;;;.R
7ae0	65 6c 65 61 73 65 2b 54 69 6d 65 73 74 61 6d 70 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65	elease+Timestamp..(defun.package
7b00	2d 62 75 69 6c 64 2d 72 65 6c 65 61 73 65 2b 74 69 6d 65 73 74 61 6d 70 2d 76 65 72 73 69 6f 6e	-build-release+timestamp-version
7b20	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 74 72 69	.(rcp)..."Determine.version.stri
7b40	6e 67 20 69 6e 20 74 68 65 20 5c 22 52 45 4c 45 41 53 45 2e 30 2e 54 49 4d 45 53 54 41 4d 50 5c	ng.in.the.\"RELEASE.0.TIMESTAMP\
7b60	22 20 66 6f 72 6d 61 74 20 66 6f 72 20 52 43 50 2e 0a 0a 2a 45 78 70 65 72 69 6d 65 6e 74 61 6c	".format.for.RCP...*Experimental
7b80	2a 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 73 74 69 6c 6c 20 73 75 62 6a 65 63 74	*.This.function.is.still.subject
7ba0	20 74 6f 20 63 68 61 6e 67 65 2e 0a 0a 55 73 65 20 60 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d	.to.change...Use.`package-build-
7bc0	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 27 20 74 6f 20 64 65	release-version-functions'.to.de
7be0	74 65 72 6d 69 6e 65 0a 52 45 4c 45 41 53 45 2e 20 20 54 49 4d 45 53 54 41 4d 50 20 69 73 20 74	termine.RELEASE...TIMESTAMP.is.t
7c00	68 65 20 43 4f 4d 4d 49 54 54 45 52 2d 44 41 54 45 20 66 6f 72 20 74 68 65 20 69 64 65 6e 74 69	he.COMMITTER-DATE.for.the.identi
7c20	66 69 65 64 0a 6c 61 73 74 20 72 65 6c 65 76 61 6e 74 20 63 6f 6d 6d 69 74 2c 20 75 73 69 6e 67	fied.last.relevant.commit,.using
7c40	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 0a 0a 52 65	.the.format.\"%Y%m%d.%H%M\"...Re
7c60	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 44 41 54 45	turn.(COMMIT-HASH.COMMITTER-DATE
7c80	20 56 45 52 53 49 4f 4e 2d 53 54 52 49 4e 47 29 2e 22 0a 20 20 28 70 63 61 73 65 2d 6c 65 74 2a	.VERSION-STRING)."...(pcase-let*
7ca0	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 20 2c 73 76 65 72	.......((`(,scommit.,stime.,sver
7cc0	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 74 61 6d 70 2d 76	sion).(package-build-timestamp-v
7ce0	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 6f 6d 6d 69 74 20	ersion.rcp))........(`(,rcommit.
7d00	2c 72 74 69 6d 65 20 2c 72 76 65 72 73 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 28 72 75 6e 2d 68	,rtime.,rversion).........(run-h
7d20	6f 6f 6b 2d 77 69 74 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	ook-with-args-until-success.....
7d40	20 20 20 20 20 27 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	.....'package-build-release-vers
7d60	69 6f 6e 2d 66 75 6e 63 74 69 6f 6e 73 20 72 63 70 29 29 0a 20 20 20 20 20 20 20 28 61 68 65 61	ion-functions.rcp))........(ahea
7d80	64 20 28 70 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	d.(package-build--commit-count.r
7da0	63 70 20 73 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	cp.scommit.rcommit))).....(cond.
7dc0	20 20 20 20 20 28 28 3e 20 61 68 65 61 64 20 30 29 0a 20 20 20 20 20 20 28 6c 69 73 74 20 73 63	.....((>.ahead.0).......(list.sc
7de0	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 61 63 6b 61 67 65	ommit.stime.............(package
7e00	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 20 28 6e 63 6f 6e	-version-join..............(ncon
7e20	63 20 28 69 66 20 72 76 65 72 73 69 6f 6e 20 28 76 65 72 73 69 6f 6e 2d 74 6f 2d 6c 69 73 74 20	c.(if.rversion.(version-to-list.
7e40	72 76 65 72 73 69 6f 6e 29 20 28 6c 69 73 74 20 30 20 30 29 29 0a 20 20 20 20 20 20 20 20 20 20	rversion).(list.0.0))...........
7e60	20 20 20 20 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	..........(list.0)..............
7e80	20 20 20 20 20 20 20 28 76 65 72 73 69 6f 6e 2d 74 6f 2d 6c 69 73 74 20 73 76 65 72 73 69 6f 6e	.......(version-to-list.sversion
7ea0	29 29 29 29 29 0a 20 20 20 20 20 28 74 0a 20 20 20 20 20 20 3b 3b 20 54 68 65 20 6c 61 74 65 73	)))))......(t.......;;.The.lates
7ec0	74 20 63 6f 6d 6d 69 74 2c 20 77 68 69 63 68 20 74 6f 75 63 68 65 64 20 61 20 72 65 6c 65 76 61	t.commit,.which.touched.a.releva
7ee0	6e 74 20 66 69 6c 65 2c 20 69 73 20 65 69 74 68 65 72 20 74 68 65 0a 20 20 20 20 20 20 3b 3b 20	nt.file,.is.either.the.......;;.
7f00	6c 61 74 65 73 74 20 72 65 6c 65 61 73 65 20 69 74 73 65 6c 66 2c 20 6f 72 20 61 20 63 6f 6d 6d	latest.release.itself,.or.a.comm
7f20	69 74 20 62 65 66 6f 72 65 20 74 68 61 74 2e 20 20 44 69 73 74 72 69 62 75 74 65 20 74 68 65 0a	it.before.that...Distribute.the.
7f40	20 20 20 20 20 20 3b 3b 20 73 61 6d 65 20 63 6f 6d 6d 69 74 2f 72 65 6c 65 61 73 65 20 61 73 20	......;;.same.commit/release.as.
7f60	6f 6e 20 74 68 65 20 73 74 61 62 6c 65 20 63 68 61 6e 6e 65 6c 3b 20 61 73 20 69 74 20 77 6f 75	on.the.stable.channel;.as.it.wou
7f80	6c 64 20 6e 6f 74 0a 20 20 20 20 20 20 3b 3b 20 6d 61 6b 65 20 73 65 6e 73 65 20 66 6f 72 20 74	ld.not.......;;.make.sense.for.t
7fa0	68 65 20 64 65 76 65 6c 6f 70 6d 65 6e 74 20 63 68 61 6e 6e 65 6c 20 74 6f 20 6c 61 67 20 62 65	he.development.channel.to.lag.be
7fc0	68 69 6e 64 20 74 68 65 20 6c 61 74 65 73 74 0a 20 20 20 20 20 20 3b 3b 20 72 65 6c 65 61 73 65	hind.the.latest.......;;.release
7fe0	2e 0a 20 20 20 20 20 20 28 6c 69 73 74 20 72 63 6f 6d 6d 69 74 20 72 74 69 6d 65 20 28 70 61 63	........(list.rcommit.rtime.(pac
8000	6b 61 67 65 2d 76 65 72 73 69 6f 6e 2d 6a 6f 69 6e 20 72 76 65 72 73 69 6f 6e 29 29 29 29 29 29	kage-version-join.rversion))))))
8020	0a 0a 3b 3b 3b 3b 20 52 65 6c 65 61 73 65 2b 43 6f 75 6e 74 0a 0a 28 64 65 66 75 6e 20 70 61 63	..;;;;.Release+Count..(defun.pac
8040	6b 61 67 65 2d 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	kage-build-release+count-version
8060	20 28 72 63 70 20 26 6f 70 74 69 6f 6e 61 6c 20 73 69 6e 67 6c 65 2d 63 6f 75 6e 74 29 0a 20 20	.(rcp.&optional.single-count)...
8080	22 44 65 74 65 72 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	"Determine.version.string.in.the
80a0	20 5c 22 52 45 4c 45 41 53 45 2e 30 2e 43 4f 55 4e 54 5c 22 20 66 6f 72 6d 61 74 20 66 6f 72 20	.\"RELEASE.0.COUNT\".format.for.
80c0	52 43 50 2e 0a 0a 2a 45 78 70 65 72 69 6d 65 6e 74 61 6c 2a 20 54 68 69 73 20 66 75 6e 63 74 69	RCP...Experimental.This.functi
80e0	6f 6e 20 69 73 20 73 74 69 6c 6c 20 73 75 62 6a 65 63 74 20 74 6f 20 63 68 61 6e 67 65 2e 0a 0a	on.is.still.subject.to.change...
8100	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 65 72 73 69	Use.`package-build-release-versi
8120	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 45 4c 45 41	on-functions'.to.determine.RELEA
8140	53 45 2e 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	SE...COUNT.is.the.number.of.comm
8160	69 74 73 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	its.since.RELEASE.until.the.last
8180	20 72 65 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	.relevant.commit...If.RELEASE.is
81a0	20 74 68 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	.the.same.as.for.the.last.snapsh
81c0	6f 74 20 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	ot.but.COUNT.is.not.larger.than.
81e0	66 6f 72 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	for.that.snapshot.because.histor
8200	79 20 77 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	y.was.rewritten,.then.use.\"RELE
8220	41 53 45 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	ASE.0.OLDCOUNT.NEWCOUNT\"...Retu
8240	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 44 41 54 45 20 56	rn.(COMMIT-HASH.COMMITTER-DATE.V
8260	45 52 53 49 4f 4e 2d 53 54 52 49 4e 47 29 2e 0a 5c 6e 28 66 6e 20 52 43 50 29 22 0a 20 20 28 70	ERSION-STRING)..\n(fn.RCP)"...(p
8280	63 61 73 65 2d 6c 65 74 2a 0a 20 20 20 20 20 20 3b 3b 20 47 65 74 20 74 68 65 20 63 6f 6d 6d 69	case-let*.......;;.Get.the.commi
82a0	74 20 62 75 74 20 69 67 6e 6f 72 65 20 74 68 65 20 61 73 73 6f 63 69 61 74 65 64 20 74 69 6d 65	t.but.ignore.the.associated.time
82c0	73 74 61 6d 70 2e 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	stamp........((`(,scommit.,stime
82e0	20 2c 5f 29 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 74 69 6d 65 73 74 61 6d 70 2d 76 65	.,_).(package-build-timestamp-ve
8300	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 6f 6d 6d 69 74 20 2c	rsion.rcp))........(`(,rcommit.,
8320	72 74 69 6d 65 20 2c 76 65 72 73 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 28 72 75 6e 2d 68 6f 6f	rtime.,version).........(run-hoo
8340	6b 2d 77 69 74 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	k-with-args-until-success.......
8360	20 20 20 27 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	...'package-build-release-versio
8380	6e 2d 66 75 6e 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	n-functions.rcp))........(versio
83a0	6e 20 28 61 6e 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	n.(and.rcommit.(version-to-list.
83c0	76 65 72 73 69 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	version)))........(merge-base.(a
83e0	6e 64 20 72 63 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	nd.rcommit......................
8400	20 20 20 28 70 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	...(package-build--merge-base.rc
8420	70 20 73 63 6f 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	p.scommit.rcommit)))........(ahe
8440	61 64 20 28 70 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	ad.(package-build--commit-count.
8460	72 63 70 20 73 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	rcp.scommit.rcommit))).....(cond
8480	0a 20 20 20 20 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	......((or.(when.(not.rcommit)..
84a0	20 20 20 20 20 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	...........;;.No.appropriate.rel
84c0	65 61 73 65 20 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	ease.detected..............(setq
84e0	20 76 65 72 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	.version.(list.0.0))............
8500	20 74 29 0a 20 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	.t)...........(when.(not.merge-b
8520	61 73 65 29 0a 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	ase).............;;.As.a.result.
8540	6f 66 20 62 75 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	of.butchered.history.rewriting,.
8560	76 65 72 73 69 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	version.tags.............;;.shar
8580	65 20 6e 6f 20 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	e.no.history.at.all.with.what.is
85a0	20 63 75 72 72 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	.currently.reachable............
85c0	20 3b 3b 20 66 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	.;;.from.the.tip...Completely.ig
85e0	6e 6f 72 65 20 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	nore.these.unreachable.tags.and.
8600	20 20 20 20 20 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	............;;.behave.as.if.no.v
8620	65 72 73 69 6f 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	ersion.tags.existed.at.all...Unf
8640	6f 72 74 75 6e 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	ortunately.............;;.that.m
8660	65 61 6e 73 20 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	eans.that.users,.who.have.instal
8680	6c 65 64 20 61 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	led.a.snapshot.based............
86a0	20 3b 3b 20 6f 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	.;;.on.a.now.abandoned.tag,.are.
86c0	73 74 75 63 6b 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	stuck.on.that.snapshot.until....
86e0	20 20 20 20 20 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	.........;;.upstream.creates.a.n
8700	65 77 20 76 65 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	ew.version.tag..............(set
8720	71 20 76 65 72 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	q.version.(list.0.0))...........
8740	20 20 74 29 0a 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	..t)...........;;.Snapshot.commi
8760	74 20 69 73 20 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	t.is.newer.than.latest.release.(
8780	6f 72 20 74 68 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	or.there.is.no...........;;.rele
87a0	61 73 65 29 2e 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	ase)............(>.ahead.0))....
87c0	20 20 20 28 6c 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	...(list.scommit.stime..........
87e0	20 20 20 28 70 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	...(package-version-join........
8800	20 20 20 20 20 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	......(append.version...........
8820	20 20 20 20 20 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	...........(list.0).............
8840	20 20 20 20 20 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	.........;;.(This.argument.*coul
8860	64 2a 20 62 65 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	d*.be.used.by.a.wrapper.).......
8880	20 20 20 20 20 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	...............(if.single-count.
88a0	20 20 20 20 20 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	.........................ahead.;
88c0	20 50 72 65 74 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	.Pretend.time-travel.doesn't.hap
88e0	70 65 6e 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63	pen.........................(pac
8900	6b 61 67 65 2d 62 75 69 6c 64 2d 2d 65 6e 73 75 72 65 2d 63 6f 75 6e 74 2d 69 6e 63 72 65 61 73	kage-build--ensure-count-increas
8920	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 72 63 70 20 28 63	e.........................rcp.(c
8940	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 29	opy-sequence.version).ahead)))))
8960	29 0a 20 20 20 20 20 28 74 0a 20 20 20 20 20 20 3b 3b 20 54 68 65 20 6c 61 74 65 73 74 20 63 6f	)......(t.......;;.The.latest.co
8980	6d 6d 69 74 2c 20 77 68 69 63 68 20 74 6f 75 63 68 65 64 20 61 20 72 65 6c 65 76 61 6e 74 20 66	mmit,.which.touched.a.relevant.f
89a0	69 6c 65 2c 20 69 73 20 65 69 74 68 65 72 20 74 68 65 0a 20 20 20 20 20 20 3b 3b 20 6c 61 74 65	ile,.is.either.the.......;;.late
89c0	73 74 20 72 65 6c 65 61 73 65 20 69 74 73 65 6c 66 2c 20 6f 72 20 61 20 63 6f 6d 6d 69 74 20 62	st.release.itself,.or.a.commit.b
89e0	65 66 6f 72 65 20 74 68 61 74 2e 20 20 44 69 73 74 72 69 62 75 74 65 20 74 68 65 0a 20 20 20 20	efore.that...Distribute.the.....
8a00	20 20 3b 3b 20 73 61 6d 65 20 63 6f 6d 6d 69 74 2f 72 65 6c 65 61 73 65 20 61 73 20 6f 6e 20 74	..;;.same.commit/release.as.on.t
8a20	68 65 20 73 74 61 62 6c 65 20 63 68 61 6e 6e 65 6c 3b 20 61 73 20 69 74 20 77 6f 75 6c 64 20 6e	he.stable.channel;.as.it.would.n
8a40	6f 74 0a 20 20 20 20 20 20 3b 3b 20 6d 61 6b 65 20 73 65 6e 73 65 20 66 6f 72 20 74 68 65 20 64	ot.......;;.make.sense.for.the.d
8a60	65 76 65 6c 6f 70 6d 65 6e 74 20 63 68 61 6e 6e 65 6c 20 74 6f 20 6c 61 67 20 62 65 68 69 6e 64	evelopment.channel.to.lag.behind
8a80	20 74 68 65 20 6c 61 74 65 73 74 0a 20 20 20 20 20 20 3b 3b 20 72 65 6c 65 61 73 65 2e 0a 20 20	.the.latest.......;;.release....
8aa0	20 20 20 20 28 6c 69 73 74 20 72 63 6f 6d 6d 69 74 20 72 74 69 6d 65 20 28 70 61 63 6b 61 67 65	....(list.rcommit.rtime.(package
8ac0	2d 76 65 72 73 69 6f 6e 2d 6a 6f 69 6e 20 76 65 72 73 69 6f 6e 29 29 29 29 29 29 0a 0a 28 64 65	-version-join.version))))))..(de
8ae0	66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 65 6e 73 75 72 65 2d 63 6f 75 6e 74 2d	fun.package-build--ensure-count-
8b00	69 6e 63 72 65 61 73 65 20 28 72 63 70 20 76 65 72 73 69 6f 6e 20 61 68 65 61 64 29 0a 20 20 28	increase.(rcp.version.ahead)...(
8b20	69 66 2d 6c 65 74 20 28 28 70 72 65 76 69 6f 75 73 20 28 63 64 72 20 28 61 73 73 71 20 28 69 6e	if-let.((previous.(cdr.(assq.(in
8b40	74 65 72 6e 20 28 6f 72 65 66 20 72 63 70 20 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 20	tern.(oref.rcp.name))...........
8b60	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 62	......................(package-b
8b80	75 69 6c 64 2d 61 72 63 68 69 76 65 2d 61 6c 69 73 74 29 29 29 29 29 0a 20 20 20 20 20 20 3b 3b	uild-archive-alist))))).......;;
8ba0	20 42 65 63 61 75 73 65 20 75 70 73 74 72 65 61 6d 20 6d 61 79 20 68 61 76 65 20 72 65 77 72 69	.Because.upstream.may.have.rewri
8bc0	74 74 65 6e 20 68 69 73 74 6f 72 79 2c 20 77 65 20 63 61 6e 6e 6f 74 20 62 65 20 63 65 72 74 61	tten.history,.we.cannot.be.certa
8be0	69 6e 0a 20 20 20 20 20 20 3b 3b 20 74 68 61 74 20 61 70 70 65 6e 64 69 6e 67 20 74 68 65 20 6e	in.......;;.that.appending.the.n
8c00	65 77 20 63 6f 75 6e 74 20 6f 66 20 63 6f 6d 6d 69 74 73 20 77 6f 75 6c 64 20 72 65 73 75 6c 74	ew.count.of.commits.would.result
8c20	20 69 6e 20 61 20 76 65 72 73 69 6f 6e 0a 20 20 20 20 20 20 3b 3b 20 73 74 72 69 6e 67 20 74 68	.in.a.version.......;;.string.th
8c40	61 74 20 69 73 20 67 72 65 61 74 65 72 20 74 68 61 6e 20 74 68 65 20 76 65 72 73 69 6f 6e 20 73	at.is.greater.than.the.version.s
8c60	74 72 69 6e 67 20 75 73 65 64 20 66 6f 72 20 74 68 65 0a 20 20 20 20 20 20 3b 3b 20 70 72 65 76	tring.used.for.the.......;;.prev
8c80	69 6f 75 73 20 73 6e 61 70 73 68 6f 74 2e 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 63 6f 75 6e	ious.snapshot........(let.((coun
8ca0	74 20 28 6c 69 73 74 20 61 68 65 61 64 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 70 76 65	t.(list.ahead)).............(pve
8cc0	72 73 69 6f 6e 20 28 61 72 65 66 20 70 72 65 76 69 6f 75 73 20 30 29 29 0a 20 20 20 20 20 20 20	rsion.(aref.previous.0))........
8ce0	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 77 68 65 6e	.....(pcount.nil)).........(when
8d00	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 68 65 72 65	.(and................;;.If.there
8d20	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 6f 77 20 74	.is.no.zero.part,.then.we.know.t
8d40	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 20 20 20 20	hat.the.previous................
8d60	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 61 20 74 61	;;.snapshot.exactly.matched.a.ta
8d80	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 20 20 20 20	gged.release.(in.which.case.....
8da0	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 6e 64 20 7a	...........;;.we.do.not.append.z
8dc0	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 20 20 20 20	ero.and.the.count)..............
8de0	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 20 20 20 20	...(memq.0.pversion)............
8e00	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 61 20 74 61	....;;.Likewise.if.there.is.a.ta
8e20	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 20 20 20 20	g.that.exactly.matches.the......
8e40	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 73 6e 61 70	..........;;.previous.(non-)snap
8e60	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 6f 75 6e 74	shot,.then.there.is.no.old.count
8e80	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 77 6f 75 6c	................;;.which.we.woul
8ea0	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 65 77 20 63	d.have.to.compare.with.the.new.c
8ec0	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 65 6d 62 65	ount.................(not.(membe
8ee0	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 69 6e 67 20	r.(mapconcat.#'number-to-string.
8f00	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 20 20 20 20	pversion.".")...................
8f20	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 73 74 2d 74	..........(package-build--list-t
8f40	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 20 70 72 65	ags.rcp))))...........;;.The.pre
8f60	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 74 6c 79 20	vious.snapshot.does.not.exactly.
8f80	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 76 65 72 73	match.a.tagged...........;;.vers
8fa0	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 69 6f 6e 20	ion...We.must.split.the.version.
8fc0	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 20 20 3b 3b	string.into.its.tag...........;;
8fe0	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 7a 65 72 6f	.and.count.parts...The.last.zero
9000	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 20 20 20 20	.part.is.the.boundary...........
9020	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 20 70 76 65	.(let.((split.(cl-position.0.pve
9040	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 20 20 20 20	rsion.:from-end.t)).............
9060	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 61 67 67 65	....(i.0).................(tagge
9080	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 3c 20 69 20	d.nil)).............(while.(<.i.
90a0	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 70 6f 70 20	split)...............(push.(pop.
90c0	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 20 20 20 20	pversion).tagged)...............
90e0	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 74 71 20 70	(cl-incf.i)).............(setq.p
9100	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 20 20 20 20	count.(cdr.pversion))...........
9120	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 61 67 67 65	..(setq.pversion.(nreverse.tagge
9140	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 77 68 65 74	d)))...........;;.Determine.whet
9160	68 65 72 20 77 65 20 63 61 6e 20 72 65 73 65 74 20 74 68 65 20 63 6f 75 6e 74 20 6f 72 20 69 6e	her.we.can.reset.the.count.or.in
9180	63 72 65 61 73 65 20 69 74 2c 20 6f 72 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 77 68 65 74 68	crease.it,.or...........;;.wheth
91a0	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 63	er.we.have.to.preserve.the.old.c
91c0	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 20	ount.due.to.rewritten...........
91e0	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 68	;;.history.in.order.to.ensure.th
9200	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 20	at.the.new.snapshot.version.is..
9220	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 65	.........;;.greater.than.the.pre
9240	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 20 49 66 20	vious.snapshot............;;.If.
9260	74 68 65 20 70 72 65 76 69 6f 75 73 20 61 6e 64 20 63 75 72 72 65 6e 74 20 73 6e 61 70 73 68 6f	the.previous.and.current.snapsho
9280	74 20 63 6f 6d 6d 69 74 73 20 64 6f 20 6e 6f 74 20 66 6f 6c 6c 6f 77 0a 20 20 20 20 20 20 20 20	t.commits.do.not.follow.........
92a0	20 20 3b 3b 20 74 68 65 20 73 61 6d 65 20 74 61 67 2c 20 74 68 65 6e 20 74 68 65 69 72 20 72 65	..;;.the.same.tag,.then.their.re
92c0	73 70 65 63 74 69 76 65 20 63 6f 75 6e 74 73 20 6f 66 20 63 6f 6d 6d 69 74 73 20 73 69 6e 63 65	spective.counts.of.commits.since
92e0	0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 74 68 65 69 72 20 72 65 73 70 65 63 74 69 76 65 20 74	...........;;.their.respective.t
9300	61 67 20 68 61 76 65 20 6e 6f 20 72 65 6c 61 74 69 6f 6e 20 74 6f 20 65 61 63 68 20 6f 74 68 65	ag.have.no.relation.to.each.othe
9320	72 20 61 6e 64 20 77 65 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 63 61 6e 20 73 69 6d 70 6c 79	r.and.we...........;;.can.simply
9340	20 72 65 73 65 74 20 74 68 65 20 63 6f 75 6e 74 2c 20 64 65 74 65 72 6d 69 6e 65 64 20 61 62 6f	.reset.the.count,.determined.abo
9360	76 65 2e 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 65 71 75 61 6c 20 76 65 72 73 69	ve............(when.(equal.versi
9380	6f 6e 20 70 76 65 72 73 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 49 66 20 74	on.pversion).............;;.If.t
93a0	68 65 20 6e 65 77 20 63 6f 75 6e 74 20 69 73 20 73 6d 61 6c 6c 65 72 20 74 68 61 6e 20 74 68 65	he.new.count.is.smaller.than.the
93c0	20 6f 6c 64 2c 20 74 68 65 6e 20 77 65 20 6b 65 65 70 20 74 68 65 0a 20 20 20 20 20 20 20 20 20	.old,.then.we.keep.the..........
93e0	20 20 20 3b 3b 20 6f 6c 64 20 63 6f 75 6e 74 20 61 6e 64 20 61 70 70 65 6e 64 20 74 68 65 20 6e	...;;.old.count.and.append.the.n
9400	65 77 20 63 6f 75 6e 74 20 61 73 20 61 20 73 65 70 61 72 61 74 65 20 76 65 72 73 69 6f 6e 0a 20	ew.count.as.a.separate.version..
9420	20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 70 61 72 74 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20	...........;;.part..............
9440	3b 3b 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 57 65 20 6d 61 79 20 68 61 76 65 20 68 61	;;.............;;.We.may.have.ha
9460	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 20 73 6e 61 70 73 68	d.to.do.that.for.previous.snapsh
9480	6f 74 73 2c 20 70 6f 73 73 69 62 6c 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 65 76 65	ots,.possibly.............;;.eve
94a0	6e 20 66 6f 72 20 6d 75 6c 74 69 70 6c 65 20 63 6f 6e 73 65 63 75 74 69 76 65 20 73 6e 61 70 73	n.for.multiple.consecutive.snaps
94c0	68 6f 74 73 2e 20 20 42 65 67 69 6e 6e 69 6e 67 20 61 74 20 74 68 65 0a 20 20 20 20 20 20 20 20	hots...Beginning.at.the.........
94e0	20 20 20 20 3b 3b 20 65 6e 64 2c 20 73 63 72 61 70 65 20 6f 66 20 61 6c 6c 20 63 6f 75 6e 74 73	....;;.end,.scrape.of.all.counts
9500	20 74 68 61 74 20 61 72 65 20 73 6d 61 6c 6c 65 72 20 74 68 61 6e 20 74 68 65 20 63 75 72 72 65	.that.are.smaller.than.the.curre
9520	6e 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 63 6f 75 6e 74 2c 20 62 75 74 20 6c 65 61	nt.............;;.count,.but.lea
9540	76 65 20 74 68 65 20 6f 74 68 65 72 73 20 69 6e 74 61 63 74 2e 0a 20 20 20 20 20 20 20 20 20 20	ve.the.others.intact............
9560	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)
9580	29 0a 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 6e 74	).............(while.(and.pcount
95a0	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 20 20	.(>.ahead.(car.pcount)))........
95c0	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 20 20 20 20	.......(pop.pcount))............
95e0	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 20 20 3b 3b 20 54	.(when.pcount...............;;.T
9600	68 69 73 20 73 6e 61 70 73 68 6f 74 20 69 73 20 62 61 73 65 64 20 6f 6e 20 74 68 65 20 73 61 6d	his.snapshot.is.based.on.the.sam
9620	65 20 74 61 67 20 61 73 20 74 68 65 20 70 72 65 76 69 6f 75 73 0a 20 20 20 20 20 20 20 20 20 20	e.tag.as.the.previous...........
9640	20 20 20 20 3b 3b 20 73 6e 61 70 73 68 6f 74 20 61 6e 64 2c 20 64 75 65 20 74 6f 20 68 69 73 74	....;;.snapshot.and,.due.to.hist
9660	6f 72 79 20 72 65 77 72 69 74 69 6e 67 2c 20 74 68 65 20 63 6f 75 6e 74 20 64 69 64 0a 20 20 20	ory.rewriting,.the.count.did....
9680	20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6e 6f 74 20 69 6e 63 72 65 61 73 65 2e 0a 20 20 20 20	...........;;.not.increase......
96a0	20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 6f 75 6e 74 20 28 6e 72 65 76 65 72 73 65 20	..........(setq.count.(nreverse.
96c0	28 63 6f 6e 73 20 28 63 61 72 20 63 6f 75 6e 74 29 20 70 63 6f 75 6e 74 29 29 29 29 29 29 0a 20	(cons.(car.count).pcount))))))..
96e0	20 20 20 20 20 20 20 63 6f 75 6e 74 29 0a 20 20 20 20 28 6c 69 73 74 20 61 68 65 61 64 29 29 29	.......count).....(list.ahead)))
9700	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 6d	..(cl-defmethod.package-build--m
9720	65 72 67 65 2d 62 61 73 65 20 28 28 5f 72 63 70 20 70 61 63 6b 61 67 65 2d 67 69 74 2d 72 65 63	erge-base.((_rcp.package-git-rec
9740	69 70 65 29 20 61 20 62 29 0a 20 20 28 69 67 6e 6f 72 65 2d 65 72 72 6f 72 73 20 28 63 61 72 20	ipe).a.b)...(ignore-errors.(car.
9760	28 70 72 6f 63 65 73 73 2d 6c 69 6e 65 73 20 22 67 69 74 22 20 22 6d 65 72 67 65 2d 62 61 73 65	(process-lines."git"."merge-base
9780	22 20 61 20 62 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	".a.b))))..(cl-defmethod.package
97a0	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 70 61 63 6b 61 67	-build--merge-base.((_rcp.packag
97c0	65 2d 68 67 2d 72 65 63 69 70 65 29 20 61 20 62 29 0a 20 20 28 63 61 72 20 28 70 72 6f 63 65 73	e-hg-recipe).a.b)...(car.(proces
97e0	73 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	s-lines."hg"."log"."--template".
9800	22 7b 6e 6f 64 65 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	"{node}\\n"."--rev".............
9820	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 28 25 73 2c 20	..........(format."ancestor(%s,.
9840	25 73 29 22 20 61 20 62 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 70 61 63 6b	%s)".a.b))))..(cl-defmethod.pack
9860	61 67 65 2d 62 75 69 6c 64 2d 2d 63 6f 6d 6d 69 74 2d 63 6f 75 6e 74 20 28 28 5f 72 63 70 20 70	age-build--commit-count.((_rcp.p
9880	61 63 6b 61 67 65 2d 67 69 74 2d 72 65 63 69 70 65 29 20 72 65 76 20 73 69 6e 63 65 29 0a 20 20	ackage-git-recipe).rev.since)...
98a0	28 73 74 72 69 6e 67 2d 74 6f 2d 6e 75 6d 62 65 72 0a 20 20 20 28 63 61 72 20 28 69 66 20 73 69	(string-to-number....(car.(if.si
98c0	6e 63 65 0a 20 20 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	nce.............(process-lines."
98e0	67 69 74 22 20 22 72 65 76 2d 6c 69 73 74 22 20 22 2d 2d 63 6f 75 6e 74 22 20 72 65 76 20 28 63	git"."rev-list"."--count".rev.(c
9900	6f 6e 63 61 74 20 22 5e 22 20 73 69 6e 63 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 72 6f	oncat."^".since))...........(pro
9920	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 2d 2d 63	cess-lines."git"."rev-list"."--c
9940	6f 75 6e 74 22 20 72 65 76 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f 64 20 70 61	ount".rev)))))..(cl-defmethod.pa
9960	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 28 28 5f 72 63 70	ckage-build--commit-count.((_rcp
9980	20 70 61 63 6b 61 67 65 2d 68 67 2d 72 65 63 69 70 65 29 20 72 65 76 20 73 69 6e 63 65 29 0a 20	.package-hg-recipe).rev.since)..
99a0	20 28 6c 65 6e 67 74 68 20 28 70 72 6f 63 65 73 73 2d 6c 69 6e 65 73 20 22 68 67 22 20 22 6c 6f	.(length.(process-lines."hg"."lo
99c0	67 22 20 22 2d 2d 74 65 6d 70 6c 61 74 65 22 20 22 7b 72 65 76 7d 5c 5c 6e 22 20 22 2d 2d 72 65	g"."--template"."{rev}\\n"."--re
99e0	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 20 20 20 28 69 66 20	v"..........................(if.
9a00	73 69 6e 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	since...........................
9a20	20 20 20 28 66 6f 72 6d 61 74 20 22 6f 6e 6c 79 28 25 73 2c 20 25 73 29 22 20 72 65 76 20 73 69	...(format."only(%s,.%s)".rev.si
9a40	6e 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	nce)............................
9a60	28 66 6f 72 6d 61 74 20 22 61 6e 63 65 73 74 6f 72 73 28 25 73 29 22 20 72 65 76 29 29 29 29 29	(format."ancestors(%s)".rev)))))
9a80	0a 0a 3b 3b 3b 3b 20 46 61 6c 6c 62 61 63 6b 2d 43 6f 75 6e 74 0a 0a 28 64 65 66 75 6e 20 70 61	..;;;;.Fallback-Count..(defun.pa
9aa0	63 6b 61 67 65 2d 62 75 69 6c 64 2d 66 61 6c 6c 62 61 63 6b 2d 63 6f 75 6e 74 2d 76 65 72 73 69	ckage-build-fallback-count-versi
9ac0	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 74	on.(rcp)..."Determine.version.st
9ae0	72 69 6e 67 20 69 6e 20 74 68 65 20 5c 22 30 2e 30 2e 30 2e 43 4f 55 4e 54 5c 22 20 66 6f 72 6d	ring.in.the.\"0.0.0.COUNT\".form
9b00	61 74 20 66 6f 72 20 52 43 50 2e 0a 0a 2a 45 78 70 65 72 69 6d 65 6e 74 61 6c 2a 20 54 68 69 73	at.for.RCP...Experimental.This
9b20	20 66 75 6e 63 74 69 6f 6e 20 69 73 20 73 74 69 6c 6c 20 73 75 62 6a 65 63 74 20 74 6f 20 63 68	.function.is.still.subject.to.ch
9b40	61 6e 67 65 2e 0a 0a 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 6d 70 6c 65 6d 65 6e 74 73 20	ange...This.function.implements.
9b60	61 20 66 61 6c 6c 62 61 63 6b 20 74 68 61 74 20 63 61 6e 20 62 65 20 75 73 65 64 20 6f 6e 20 74	a.fallback.that.can.be.used.on.t
9b80	68 65 0a 72 65 6c 65 61 73 65 20 63 68 61 6e 6e 65 6c 2c 20 66 6f 72 20 70 61 63 6b 61 67 65 73	he.release.channel,.for.packages
9ba0	20 74 68 61 74 20 64 6f 6e 27 74 20 64 6f 20 72 65 6c 65 61 73 65 73 2e 20 20 49 74 20 73 68 6f	.that.don't.do.releases...It.sho
9bc0	75 6c 64 0a 62 65 20 74 68 65 20 6c 61 73 74 20 65 6c 65 6d 65 6e 74 20 6f 66 20 60 70 61 63 6b	uld.be.the.last.element.of.`pack
9be0	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 69	age-build-release-version-functi
9c00	6f 6e 73 27 2c 0a 61 6e 64 20 61 74 20 74 68 65 20 73 61 6d 65 20 74 69 6d 65 20 60 70 61 63 6b	ons',.and.at.the.same.time.`pack
9c20	61 67 65 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	age-build-snapshot-version-funct
9c40	69 6f 6e 73 27 0a 73 68 6f 75 6c 64 20 63 6f 6e 74 61 69 6e 20 6f 6e 6c 79 20 60 70 61 63 6b 61	ions'.should.contain.only.`packa
9c60	67 65 2d 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 27 2e	ge-build-release+count-version'.
9c80	0a 0a 54 68 65 20 72 65 73 75 6c 74 20 6f 66 20 73 75 63 68 20 61 20 63 6f 6e 66 69 67 75 72 61	..The.result.of.such.a.configura
9ca0	74 69 6f 6e 20 69 73 20 74 68 61 74 2c 20 66 6f 72 20 70 61 63 6b 61 67 65 73 20 74 68 61 74 0a	tion.is.that,.for.packages.that.
9cc0	64 6f 6e 27 74 20 64 6f 20 72 65 6c 65 61 73 65 73 2c 20 74 68 65 20 72 65 6c 65 61 73 65 20 61	don't.do.releases,.the.release.a
9ce0	6e 64 20 73 6e 61 70 73 68 6f 74 20 63 68 61 6e 6e 65 6c 73 20 70 72 6f 76 69 64 65 0a 74 68 65	nd.snapshot.channels.provide.the
9d00	20 73 61 6d 65 20 5c 22 30 2e 30 2e 30 2e 43 4f 55 4e 54 5c 22 20 73 6e 61 70 73 68 6f 74 2e 20	.same.\"0.0.0.COUNT\".snapshot..
9d20	20 54 68 61 74 20 77 61 79 2c 20 61 6c 6c 20 70 61 63 6b 61 67 65 73 20 61 72 65 0a 61 76 61 69	.That.way,.all.packages.are.avai
9d40	6c 61 62 6c 65 20 6f 6e 20 74 68 65 20 72 65 6c 65 61 73 65 20 63 68 61 6e 6e 65 6c 2c 20 77 68	lable.on.the.release.channel,.wh
9d60	69 63 68 20 6d 61 6b 65 73 20 74 68 61 74 20 63 68 61 6e 6e 65 6c 20 6d 6f 72 65 0a 61 74 74 72	ich.makes.that.channel.more.attr
9d80	61 63 74 69 76 65 20 74 6f 20 75 73 65 72 73 2c 20 77 68 69 63 68 20 6d 69 67 68 74 20 65 6e 63	active.to.users,.which.might.enc
9da0	6f 75 72 61 67 65 20 73 6f 6d 65 20 6d 61 69 6e 74 61 69 6e 65 72 73 20 74 6f 0a 72 65 6c 65 61	ourage.some.maintainers.to.relea
9dc0	73 65 20 6d 6f 72 65 20 6f 66 74 65 6e 2c 20 6f 72 20 69 66 20 74 68 65 79 20 68 61 76 65 20 6e	se.more.often,.or.if.they.have.n
9de0	65 76 65 72 20 64 6f 6e 65 20 61 20 72 65 6c 65 61 73 65 20 62 65 66 6f 72 65 2c 0a 74 6f 20 66	ever.done.a.release.before,.to.f
9e00	69 6e 61 6c 6c 79 20 67 65 74 20 61 72 6f 75 6e 64 20 74 6f 20 74 68 61 74 20 69 6e 69 74 69 61	inally.get.around.to.that.initia
9e20	6c 20 72 65 6c 65 61 73 65 2e 20 20 49 6e 20 6f 74 68 65 72 20 77 6f 72 64 73 2c 0a 74 68 69 73	l.release...In.other.words,.this
9e40	20 6d 69 67 68 74 20 68 65 6c 70 20 6f 76 65 72 63 6f 6d 65 20 74 68 65 20 72 65 6c 65 61 73 65	.might.help.overcome.the.release
9e60	20 63 68 61 6e 6e 65 6c 27 73 20 63 68 69 63 6b 65 6e 20 61 6e 64 20 65 67 67 0a 70 72 6f 62 6c	.channel's.chicken.and.egg.probl
9e80	65 6d 2e 22 0a 20 20 28 6c 65 74 20 28 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 72 65 6c 65	em."...(let.((package-build-rele
9ea0	61 73 65 2d 76 65 72 73 69 6f 6e 2d 66 75 6e 63 74 69 6f 6e 73 20 6e 69 6c 29 29 0a 20 20 20 20	ase-version-functions.nil)).....
9ec0	28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 72 65 6c 65 61 73 65 2b 63 6f 75 6e 74 2d 76 65 72	(package-build-release+count-ver
9ee0	73 69 6f 6e 20 72 63 70 29 29 29 0a 0a 3b 3b 3b 20 43 61 6c 6c 20 50 72 6f 63 65 73 73 0a 0a 28	sion.rcp)))..;;;.Call.Process..(
9f00	64 65 66 75 6e 20 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	defun.package-build--call-proces
9f20	73 20 28 70 61 63 6b 61 67 65 20 63 6f 6d 6d 61 6e 64 20 26 72 65 73 74 20 61 72 67 73 29 0a 20	s.(package.command.&rest.args)..
9f40	20 22 46 6f 72 20 50 41 43 4b 41 47 45 2c 20 72 75 6e 20 43 4f 4d 4d 41 4e 44 20 77 69 74 68 20	."For.PACKAGE,.run.COMMAND.with.
9f60	41 52 47 53 20 69 6e 20 60 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 27 2e 0a 57 65 20	ARGS.in.`default-directory'..We.
9f80	75 73 65 20 74 68 69 73 20 74 6f 20 77 72 61 70 20 63 6f 6d 6d 61 6e 64 73 20 69 73 20 70 72 6f	use.this.to.wrap.commands.is.pro
9fa0	70 65 72 20 65 6e 76 69 72 6f 6e 6d 65 6e 74 20 73 65 74 74 69 6e 67 73 20 61 6e 64 0a 77 69 74	per.environment.settings.and.wit
9fc0	68 20 61 20 74 69 6d 65 6f 75 74 20 73 6f 20 74 68 61 74 20 6e 6f 20 63 6f 6d 6d 61 6e 64 20 63	h.a.timeout.so.that.no.command.c
9fe0	61 6e 20 62 6c 6f 63 6b 20 74 68 65 20 62 75 69 6c 64 20 70 72 6f 63 65 73 73 2c 0a 61 6e 64 20	an.block.the.build.process,.and.
a000	73 6f 20 77 65 20 63 61 6e 20 70 72 6f 70 65 72 6c 79 20 6c 6f 67 20 65 72 72 6f 72 73 2e 20 20	so.we.can.properly.log.errors...
a020	50 41 43 4b 41 47 45 20 6d 75 73 74 20 62 65 20 74 68 65 20 6e 61 6d 65 20 6f 66 0a 61 20 70 61	PACKAGE.must.be.the.name.of.a.pa
a040	63 6b 61 67 65 2c 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	ckage,.a.`package-recipe'.object
a060	20 6f 72 20 6e 69 6c 2c 20 61 6e 64 20 69 73 20 6f 6e 6c 79 20 75 73 65 64 0a 66 6f 72 20 6c 6f	.or.nil,.and.is.only.used.for.lo
a080	67 67 69 6e 67 20 70 75 72 70 6f 73 65 73 2e 22 0a 20 20 28 75 6e 6c 65 73 73 20 28 66 69 6c 65	gging.purposes."...(unless.(file
a0a0	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 79 29 0a	-directory-p.default-directory).
a0c0	20 20 20 20 28 65 72 72 6f 72 20 22 43 61 6e 6e 6f 74 20 72 75 6e 20 70 72 6f 63 65 73 73 20 69	....(error."Cannot.run.process.i
a0e0	6e 20 6e 6f 6e 2d 65 78 69 73 74 65 6e 74 20 64 69 72 65 63 74 6f 72 79 3a 20 25 73 22 0a 20 20	n.non-existent.directory:.%s"...
a100	20 20 20 20 20 20 20 20 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 29 0a 20 20 28	.........default-directory))...(
a120	77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 20 28 70 63 61 73 65 2d 6c 65 74 2a	with-temp-buffer.....(pcase-let*
a140	20 28 28 61 72 67 73 2d 6f 72 69 67 20 28 63 6f 6e 73 20 63 6f 6d 6d 61 6e 64 20 61 72 67 73 29	.((args-orig.(cons.command.args)
a160	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 60 28 2c 63 6f 6d 6d 61 6e 64 20 2e	)..................(`(,command..
a180	20 2c 61 72 67 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 63 6f 6e 63	.,args)...................(nconc
a1a0	20 28 61 6e 64 20 28 6e 6f 74 20 28 65 71 20 73 79 73 74 65 6d 2d 74 79 70 65 20 27 77 69 6e 64	.(and.(not.(eq.system-type.'wind
a1c0	6f 77 73 2d 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ows-nt))........................
a1e0	20 20 20 20 20 20 20 28 6c 69 73 74 20 22 65 6e 76 22 20 22 4c 43 5f 41 4c 4c 3d 43 22 29 29 0a	.......(list."env"."LC_ALL=C")).
a200	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 61 6e	.........................(if.(an
a220	64 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 0a 20 20 20	d.package-build-timeout-secs....
a240	20 20 20 20 20 20 20 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	...............................p
a260	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 29	ackage-build-timeout-executable)
a280	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e	..............................(n
a2a0	63 6f 6e 63 20 28 6c 69 73 74 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 74 69 6d 65 6f 75 74	conc.(list.package-build-timeout
a2c0	2d 65 78 65 63 75 74 61 62 6c 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	-executable.....................
a2e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2d 6b 22 20 22 36 30 22 0a	......................"-k"."60".
a300	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
a320	20 20 20 20 20 20 20 20 20 20 28 6e 75 6d 62 65 72 2d 74 6f 2d 73 74 72 69 6e 67 0a 20 20 20 20	..........(number-to-string.....
a340	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
a360	20 20 20 20 20 20 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	.......package-build-timeout-sec
a380	73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	s)..............................
a3a0	20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 6d 6d 61 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20	.............command)...........
a3c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 72 67 73 29 0a	..........................args).
a3e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73	...........................(cons
a400	20 63 6f 6d 6d 61 6e 64 20 61 72 67 73 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.command.args))))...............
a420	20 20 20 28 65 78 69 74 2d 63 6f 64 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	...(exit-code...................
a440	28 61 70 70 6c 79 20 23 27 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 63 6f 6d 6d 61 6e 64 20 6e 69	(apply.#'call-process.command.ni
a460	6c 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 20 6e 69 6c 20 61 72 67 73 29 29 29 0a 20	l.(current-buffer).nil.args)))..
a480	20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 65 71 75 61 6c 20 65 78 69 74 2d 63 6f 64 65 20 30 29	.....(unless.(equal.exit-code.0)
a4a0	20 3b 20 6d 61 79 20 61 6c 73 6f 20 62 65 20 61 20 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20	.;.may.also.be.a.string.........
a4c0	28 6c 65 74 20 28 28 73 75 6d 6d 61 72 79 20 28 66 6f 72 6d 61 74 2d 6d 65 73 73 61 67 65 0a 20	(let.((summary.(format-message..
a4e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 43 6f 6d 6d 61 6e 64 20	......................."Command.
a500	60 25 73 27 20 65 78 69 74 65 64 20 77 69 74 68 20 6e 6f 6e 2d 7a 65 72 6f 20 65 78 69 74 2d 63	`%s'.exited.with.non-zero.exit-c
a520	6f 64 65 3a 20 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ode:.%s"........................
a540	20 28 6d 61 70 63 6f 6e 63 61 74 20 23 27 73 68 65 6c 6c 2d 71 75 6f 74 65 2d 61 72 67 75 6d 65	.(mapconcat.#'shell-quote-argume
a560	6e 74 20 61 72 67 73 2d 6f 72 69 67 20 22 20 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	nt.args-orig.".")...............
a580	20 20 20 20 20 20 20 20 20 20 65 78 69 74 2d 63 6f 64 65 29 29 29 0a 20 20 20 20 20 20 20 20 20	..........exit-code)))..........
a5a0	20 3b 3b 20 44 75 70 6c 69 63 61 74 69 6e 67 20 74 68 65 20 73 75 6d 6d 61 72 79 20 6c 69 6b 65	.;;.Duplicating.the.summary.like
a5c0	20 74 68 69 73 20 69 73 20 61 20 62 69 74 20 75 6e 66 6f 72 74 75 6e 61 74 65 2c 20 62 75 74 0a	.this.is.a.bit.unfortunate,.but.
a5e0	20 20 20 20 20 20 20 20 20 20 3b 3b 20 73 74 69 6c 6c 20 74 68 65 20 62 65 73 74 20 6f 70 74 69	..........;;.still.the.best.opti
a600	6f 6e 20 62 65 63 61 75 73 65 20 77 65 20 77 61 6e 74 20 74 6f 20 73 68 6f 77 20 69 74 20 62 65	on.because.we.want.to.show.it.be
a620	66 6f 72 65 20 74 68 65 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6f 75 74 70 75 74 2c 20 62 75	fore.the...........;;.output,.bu
a640	74 20 61 6c 73 6f 20 77 61 6e 74 20 69 74 20 74 6f 20 61 70 70 65 61 72 20 61 73 20 61 6e 20 65	t.also.want.it.to.appear.as.an.e
a660	72 72 6f 72 20 6d 65 73 73 61 67 65 2c 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 77 69 74 68 6f	rror.message,...........;;.witho
a680	75 74 20 6d 61 6b 69 6e 67 20 74 68 65 2c 20 70 6f 74 65 6e 74 69 61 6c 6c 79 20 6d 75 6c 74 69	ut.making.the,.potentially.multi
a6a0	2d 6c 69 6e 65 2c 20 6f 75 74 70 75 74 20 70 61 72 74 20 6f 66 0a 20 20 20 20 20 20 20 20 20 20	-line,.output.part.of...........
a6c0	3b 3b 20 74 68 65 20 65 72 72 6f 72 20 6d 65 73 73 61 67 65 2e 0a 20 20 20 20 20 20 20 20 20 20	;;.the.error.message............
a6e0	28 6d 65 73 73 61 67 65 20 22 25 73 22 20 73 75 6d 6d 61 72 79 29 0a 20 20 20 20 20 20 20 20 20	(message."%s".summary)..........
a700	20 28 6d 65 73 73 61 67 65 20 22 25 73 22 20 28 62 75 66 66 65 72 2d 73 74 72 69 6e 67 29 29 0a	.(message."%s".(buffer-string)).
a720	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 65 72 72 6f 72 20	..........(package-build--error.
a740	70 61 63 6b 61 67 65 20 22 25 73 22 20 73 75 6d 6d 61 72 79 29 29 29 29 29 29 0a 0a 28 64 65 66	package."%s".summary))))))..(def
a760	75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 72 75 6e 2d 70 72 6f 63 65 73 73 20 28 63	un.package-build--run-process.(c
a780	6f 6d 6d 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	ommand.&rest.args)..."Like.`pack
a7a0	61 67 65 2d 62 75 69 6c 64 2d 2d 63 61 6c 6c 2d 70 72 6f 63 65 73 73 27 2c 20 62 75 74 20 6c 61	age-build--call-process',.but.la
a7c0	63 6b 73 20 74 68 65 20 50 41 43 4b 41 47 45 20 61 72 67 75 6d 65 6e 74 2e 22 0a 20 20 28 61 70	cks.the.PACKAGE.argument."...(ap
a7e0	70 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 70 72 6f 63 65 73	ply.#'package-build--call-proces
a800	73 20 6e 69 6c 20 63 6f 6d 6d 61 6e 64 20 61 72 67 73 29 29 0a 28 6d 61 6b 65 2d 6f 62 73 6f 6c	s.nil.command.args)).(make-obsol
a820	65 74 65 20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 72 75 6e 2d 70 72 6f 63 65 73 73 20	ete.'package-build--run-process.
a840	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 22 35 2e	'package-build--call-process."5.
a860	30 2e 30 22 29 0a 0a 3b 3b 3b 20 57 6f 72 6b 74 72 65 65 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b	0.0")..;;;.Worktree..(defun.pack
a880	61 67 65 2d 62 75 69 6c 64 2d 2d 77 6f 72 6b 69 6e 67 2d 74 72 65 65 20 28 72 63 70 20 26 6f 70	age-build--working-tree.(rcp.&op
a8a0	74 69 6f 6e 61 6c 20 65 61 72 6c 79 29 0a 20 20 28 69 66 20 65 61 72 6c 79 0a 20 20 20 20 20 20	tional.early)...(if.early.......
a8c0	28 66 75 6e 63 61 6c 6c 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 65 61 72 6c 79 2d 77 6f 72	(funcall.package-build-early-wor
a8e0	6b 74 72 65 65 2d 66 75 6e 63 74 69 6f 6e 20 72 63 70 29 0a 20 20 20 20 28 66 75 6e 63 61 6c 6c	ktree-function.rcp).....(funcall
a900	20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 77 6f 72 6b 74 72 65 65 2d 66 75 6e 63 74 69 6f 6e	.package-build-worktree-function
a920	20 72 63 70 29 29 29 0a 0a 3b 3b 3b 20 46 65 74 63 68 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68 6f	.rcp)))..;;;.Fetch..(cl-defmetho
a940	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 61 63	d.package-build--fetch.((rcp.pac
a960	6b 61 67 65 2d 67 69 74 2d 72 65 63 69 70 65 29 29 0a 20 20 28 6c 65 74 20 28 28 64 69 72 20 28	kage-git-recipe))...(let.((dir.(
a980	70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 77 6f 72 6b 69 6e 67 2d 74 72 65 65 20 72 63 70 20	package-build--working-tree.rcp.
a9a0	74 29 29 0a 20 20 20 20 20 20 20 20 28 75 72 6c 20 28 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65	t)).........(url.(package-recipe
a9c0	2d 2d 75 70 73 74 72 65 61 6d 2d 75 72 6c 20 72 63 70 29 29 0a 20 20 20 20 20 20 20 20 28 70 72	--upstream-url.rcp)).........(pr
a9e0	6f 74 6f 63 6f 6c 20 28 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 2d 75 70 73 74 72 65 61 6d	otocol.(package-recipe--upstream
aa00	2d 70 72 6f 74 6f 63 6f 6c 20 72 63 70 29 29 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 28 6d 65	-protocol.rcp))).....(unless.(me
aa20	6d 62 65 72 20 70 72 6f 74 6f 63 6f 6c 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 61 6c 6c 6f	mber.protocol.package-build-allo
aa40	77 65 64 2d 67 69 74 2d 70 72 6f 74 6f 63 6f 6c 73 29 0a 20 20 20 20 20 20 28 70 61 63 6b 61 67	wed-git-protocols).......(packag
aa60	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 22 46 65 74 63	e-build--error.rcp........."Fetc
aa80	68 69 6e 67 20 75 73 69 6e 67 20 74 68 65 20 25 73 20 70 72 6f 74 6f 63 6f 6c 20 69 73 20 6e 6f	hing.using.the.%s.protocol.is.no
aaa0	74 20 61 6c 6c 6f 77 65 64 22 20 70 72 6f 74 6f 63 6f 6c 29 29 0a 20 20 20 20 28 63 6f 6e 64 0a	t.allowed".protocol)).....(cond.
aac0	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 28 65 78 70 61 6e	.....((and.(file-exists-p.(expan
aae0	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 20 20 20 20 20 20	d-file-name.".git".dir))........
ab00	20 20 20 20 28 6c 65 74 20 28 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 64 69 72	....(let.((default-directory.dir
ab20	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 63 61 72 20 28 70	))..............(string=.(car.(p
ab40	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 22 20 22 72 65 6d	rocess-lines."git"."config"."rem
ab60	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 20 20 20 20 20 20	ote.origin.url"))...............
ab80	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 73 73 20 70 61 63	........url))).......(unless.pac
aba0	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 20 20 20 20 20 20	kage-build--inhibit-fetch.......
abc0	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 64 69 72 29 29	..(let.((default-directory.dir))
abe0	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 6d 65 73 73 61	...........(package-build--messa
ac00	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 20 20 20 20 20 20	ge."Updating.%s".dir)...........
ac20	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 70	(package-build--call-process.rcp
ac40	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 73 22 20 22 6f 72	."git"."fetch"."-f"."--tags"."or
ac60	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 68 74 20 6c 61 74	igin")...........;;.We.might.lat
ac80	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 20 53 61 64 6c 79	er.checkout."origin/HEAD"..Sadly
aca0	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 63 61 6e 6e 6f 74	."git.fetch"...........;;.cannot
acc0	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 64 61 74 65 2c 20	.be.told.to.keep.it.up-to-date,.
ace0	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 20 20 20 3b 3b 20	so.we.have.to.make...........;;.
ad00	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 20 20 28 70 61 63	a.second.request............(pac
ad20	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 20 20 20 20 20 20	kage-build--call-process........
ad40	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 74 2d 68 65 61 64	....rcp."git"."remote"."set-head
ad60	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 20 20 20 28 74 0a	"."origin"."--auto"))))......(t.
ad80	20 20 20 20 20 20 28 77 68 65 6e 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 64 69 72 29 0a	......(when.(file-exists-p.dir).
ada0	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 64 69 72 20 74 29	........(delete-directory.dir.t)
adc0	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 73 73 61 67 65 20	).......(package-build--message.
ade0	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 29 0a 20 20 20 20	"Cloning.%s.to.%s".url.dir).....
ae00	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 62 75 69 6c 64 2d	..(make-directory.package-build-
ae20	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 28 28 64 65 66 61	working-dir.t).......(let.((defa
ae40	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 77 6f 72 6b	ult-directory.package-build-work
ae60	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 2d 62 75 69 6c 64	ing-dir)).........(package-build
ae80	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 63 6c 6f 6e 65 22	--call-process.rcp."git"."clone"
aea0	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 68 6f 64 20 70 61	.url.dir))))))..(cl-defmethod.pa
aec0	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 61 63 6b 61 67 65	ckage-build--fetch.((rcp.package
aee0	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 28 70 61 63 6b 61	-hg-recipe))...(let.((dir.(packa
af00	67 65 2d 62 75 69 6c 64 2d 2d 77 6f 72 6b 69 6e 67 2d 74 72 65 65 20 72 63 70 20 74 29 29 0a 20	ge-build--working-tree.rcp.t))..
af20	20 20 20 20 20 20 20 28 75 72 6c 20 28 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 2d 75 70 73	.......(url.(package-recipe--ups
af40	74 72 65 61 6d 2d 75 72 6c 20 72 63 70 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20	tream-url.rcp))).....(cond......
af60	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 69 6c	((and.(file-exists-p.(expand-fil
af80	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 28 6c	e-name.".hg".dir))............(l
afa0	65 74 20 28 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 64 69 72 29 29 0a 20 20 20	et.((default-directory.dir))....
afc0	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 73 73	..........(string=.(car.(process
afe0	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 29 20	-lines."hg"."paths"."default")).
b000	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 75 69	url))).......(unless.package-bui
b020	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 20 28	ld--inhibit-fetch.........(let.(
b040	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 20 20	(default-directory.dir))........
b060	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 64 61	...(package-build--message."Upda
b080	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 67 65	ting.%s".dir)...........(package
b0a0	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 22 70	-build--call-process.rcp."hg"."p
b0c0	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 2d 2d	ull")...........(package-build--
b0e0	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 29 29	call-process.rcp."hg"."update"))
b100	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 78 69	))......(t.......(when.(file-exi
b120	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 65 63	sts-p.dir).........(delete-direc
b140	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 69 6c	tory.dir.t)).......(package-buil
b160	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 75 72	d--message."Cloning.%s.to.%s".ur
b180	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 61 63	l.dir).......(make-directory.pac
b1a0	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 20 20	kage-build-working-dir.t).......
b1c0	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 67 65	(let.((default-directory.package
b1e0	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 70 61	-build-working-dir)).........(pa
b200	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 22 68	ckage-build--call-process.rcp."h
b220	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 43 68	g"."clone".url.dir))))))..;;;.Ch
b240	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 62 75	eckout..(cl-defmethod.package-bu
b260	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 74 2d	ild--checkout.((rcp.package-git-
b280	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 6c 64	recipe))...(unless.package-build
b2a0	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 72 65	--inhibit-checkout.....(let.((re
b2c0	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 61 63	v.(oref.rcp.commit))).......(pac
b2e0	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 6f 75	kage-build--message."Checking.ou
b300	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 64 2d	t.%s".rev).......(package-build-
b320	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 22 20	-call-process.rcp."git"."reset".
b340	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 64 20	"--hard".rev))))..(cl-defmethod.
b360	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 70 61	package-build--checkout.((rcp.pa
b380	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 63 6b	ckage-hg-recipe))...(unless.pack
b3a0	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 20 20	age-build--inhibit-checkout.....
b3c0	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 0a 20	(let.((rev.(oref.rcp.commit)))..
b3e0	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 43 68	.....(package-build--message."Ch
b400	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 6b 61	ecking.out.%s".rev).......(packa
b420	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".
b440	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 20 46	"update".rev))))..;;;.Generate.F
b460	69 6c 65 73 0a 0a 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	iles..(defun.package-build--writ
b480	65 2d 70 6b 67 2d 66 69 6c 65 20 28 64 65 73 63 20 64 69 72 29 0a 20 20 28 6c 65 74 20 28 28 6e	e-pkg-file.(desc.dir)...(let.((n
b4a0	61 6d 65 20 28 70 61 63 6b 61 67 65 2d 64 65 73 63 2d 6e 61 6d 65 20 64 65 73 63 29 29 29 0a 20	ame.(package-desc-name.desc)))..
b4c0	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 66 69 6c 65 2d	...(with-temp-file.(expand-file-
b4e0	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 6d 65 29 20 64	name.(format."%s-pkg.el".name).d
b500	69 72 29 0a 20 20 20 20 20 20 28 70 70 20 60 28 64 65 66 69 6e 65 2d 70 61 63 6b 61 67 65 20 2c	ir).......(pp.`(define-package.,
b520	28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	(symbol-name.name)..............
b540	2c 28 70 61 63 6b 61 67 65 2d 76 65 72 73 69 6f 6e 2d 6a 6f 69 6e 20 28 70 61 63 6b 61 67 65 2d	,(package-version-join.(package-
b560	64 65 73 63 2d 76 65 72 73 69 6f 6e 20 64 65 73 63 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	desc-version.desc)).............
b580	20 2c 28 70 61 63 6b 61 67 65 2d 64 65 73 63 2d 73 75 6d 6d 61 72 79 20 64 65 73 63 29 0a 20 20	.,(package-desc-summary.desc)...
b5a0	20 20 20 20 20 20 20 20 20 20 20 27 2c 28 6d 61 70 63 61 72 20 28 70 63 61 73 65 2d 6c 61 6d 62	...........',(mapcar.(pcase-lamb
b5c0	64 61 20 28 60 28 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	da.(`(,pkg.,ver))...............
b5e0	20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 70 6b 67 20 28 70 61 63 6b 61 67 65 2d 76 65	...........(list.pkg.(package-ve
b600	72 73 69 6f 6e 2d 6a 6f 69 6e 20 76 65 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	rsion-join.ver)))...............
b620	20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 64 65 73 63 2d 72 65 71 73 20 64 65 73 63	.........(package-desc-reqs.desc
b640	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 40 28 63 6c 2d 6d 61 70 63 61 6e 20 28 70 63	))..............,@(cl-mapcan.(pc
b660	61 73 65 2d 6c 61 6d 62 64 61 20 28 60 28 2c 6b 65 79 20 2e 20 2c 76 61 6c 29 29 0a 20 20 20 20	ase-lambda.(`(,key...,val)).....
b680	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 6f	........................(when.(o
b6a0	72 20 28 73 79 6d 62 6f 6c 70 20 76 61 6c 29 20 28 6c 69 73 74 70 20 76 61 6c 29 29 0a 20 20 20	r.(symbolp.val).(listp.val))....
b6c0	20 20 20 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 57 65	...........................;;.We
b6e0	20 6d 75 73 74 20 71 75 6f 74 65 20 6c 69 73 74 73 20 61 6e 64 20 73 79 6d 62 6f 6c 73 2c 0a 20	.must.quote.lists.and.symbols,..
b700	20 20 20 20 20 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	.............................;;.
b720	62 65 63 61 75 73 65 20 45 6d 61 63 73 20 32 34 2e 33 20 61 6e 64 20 65 61 72 6c 69 65 72 20 65	because.Emacs.24.3.and.earlier.e
b740	76 61 6c 75 61 74 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	valuate.........................
b760	20 20 20 20 20 20 3b 3b 20 74 68 65 20 70 61 63 6b 61 67 65 20 69 6e 66 6f 72 6d 61 74 69 6f 6e	......;;.the.package.information
b780	2c 20 77 68 69 63 68 20 77 6f 75 6c 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	,.which.would...................
b7a0	20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 62 72 65 61 6b 20 66 6f 72 20 75 6e 71 75 6f 74 65	............;;.break.for.unquote
b7c0	64 20 73 79 6d 62 6f 6c 73 20 6f 72 20 6c 69 73 74 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20	d.symbols.or.lists..............
b7e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 57 68 69 6c 65 20 74 68 69 73 20	..................;;.While.this.
b800	6c 69 62 72 61 72 79 20 64 6f 65 73 20 6e 6f 74 20 73 75 70 70 6f 72 74 0a 20 20 20 20 20 20 20	library.does.not.support........
b820	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 73 75 63 68 20 6f	.......................;;.such.o
b840	6c 64 20 45 6d 61 63 73 65 6e 2c 20 74 68 65 20 70 61 63 6b 61 67 65 73 20 74 68 61 74 0a 20 20	ld.Emacsen,.the.packages.that...
b860	20 20 20 20 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 77	............................;;.w
b880	65 20 70 72 6f 64 75 63 65 20 73 68 6f 75 6c 64 20 72 65 6d 61 69 6e 20 63 6f 6d 70 61 74 69 62	e.produce.should.remain.compatib
b8a0	6c 65 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	le..............................
b8c0	20 20 28 73 65 74 71 20 76 61 6c 20 28 6c 69 73 74 20 27 71 75 6f 74 65 20 76 61 6c 29 29 29 0a	..(setq.val.(list.'quote.val))).
b8e0	20 20 20 20 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	............................(lis
b900	74 20 6b 65 79 20 76 61 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	t.key.val)).....................
b920	20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 64 65 73 63 2d 65 78 74 72 61 73 20 64 65 73 63 29	......(package-desc-extras.desc)
b940	29 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 0a 20	))...........(current-buffer))..
b960	20 20 20 20 20 28 70 72 69 6e 63 20 22 3b 3b 20 4c 6f 63 61 6c 20 56 61 72 69 61 62 6c 65 73 3a	.....(princ.";;.Local.Variables:
b980	5c 6e 3b 3b 20 6e 6f 2d 62 79 74 65 2d 63 6f 6d 70 69 6c 65 3a 20 74 5c 6e 3b 3b 20 45 6e 64 3a	\n;;.no-byte-compile:.t\n;;.End:
b9a0	5c 6e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72	\n"..............(current-buffer
b9c0	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 6c 64 2d 2d 74 61 72	)))))..(defun.package-build--tar
b9e0	2d 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	-type.()..."Return.`bsd'.or.`gnu
ba00	27 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	'.depending.on.type.of.Tar.execu
ba20	74 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	table..Tests.and.sets.variable.`
ba40	70 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	package-build--tar-type'.if.not.
ba60	61 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	already.set."...(or.package-buil
ba80	64 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	d--tar-type.......(and.package-b
baa0	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 20 20 28	uild-tar-executable............(
bac0	6c 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	let.((v.(shell-command-to-string
bae0	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25	......................(format."%
bb00	73 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	s.--version".package-build-tar-e
bb20	78 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	xecutable))))..............(setq
bb40	20 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	.package-build--tar-type........
bb60	20 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	............(cond.((string-match
bb80	2d 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	-p."bsdtar".v).'bsd)............
bba0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 22	..............((string-match-p."
bbc0	47 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	GNU.tar".v).'gnu)...............
bbe0	20 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	...........(t.'gnu)))))))..(defu
bc00	6e 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	n.package-build--create-tar.(rcp
bc20	20 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	.directory)..."Create.a.tar.file
bc40	20 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	.containing.the.package.version.
bc60	73 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	specified.by.RCP..DIRECTORY.is.a
bc80	20 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	.temporary.directory.that.contai
bca0	6e 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	ns.the.directory.that.is.put.in.
bcc0	74 68 65 20 74 61 72 62 61 6c 6c 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 6e 61 6d 65 20 28 6f 72	the.tarball."...(let*.((name.(or
bce0	65 66 20 72 63 70 20 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 76 65 72 73 69 6f 6e 20	ef.rcp.name))..........(version.
bd00	28 6f 72 65 66 20 72 63 70 20 76 65 72 73 69 6f 6e 29 29 0a 20 20 20 20 20 20 20 20 20 28 74 69	(oref.rcp.version))..........(ti
bd20	6d 65 20 28 6f 72 65 66 20 72 63 70 20 74 69 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 74 61	me.(oref.rcp.time))..........(ta
bd40	72 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	r.(expand-file-name.(concat.name
bd60	20 22 2d 22 20 76 65 72 73 69 6f 6e 20 22 2e 74 61 72 22 29 0a 20 20 20 20 20 20 20 20 20 20 20	."-".version.".tar")............
bd80	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
bda0	6c 64 2d 61 72 63 68 69 76 65 2d 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 20 28 64 69 72 20 28	ld-archive-dir))..........(dir.(
bdc0	63 6f 6e 63 61 74 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	concat.name."-".version))).....(
bde0	77 68 65 6e 20 28 61 6e 64 20 28 65 71 20 73 79 73 74 65 6d 2d 74 79 70 65 20 27 77 69 6e 64 6f	when.(and.(eq.system-type.'windo
be00	77 73 2d 6e 74 29 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	ws-nt)................(eq.(packa
be20	67 65 2d 62 75 69 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	ge-build--tar-type).'gnu))......
be40	20 28 73 65 74 71 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	.(setq.tar.(replace-regexp-in-st
be60	72 69 6e 67 20 22 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	ring."^\$[a-z]\$:"."/\\1".tar)
be80	29 29 0a 20 20 20 20 28 6c 65 74 20 28 28 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20	)).....(let.((default-directory.
bea0	64 69 72 65 63 74 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	directory)).......(process-file.
bec0	20 20 20 20 20 20 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	.......package-build-tar-executa
bee0	62 6c 65 20 6e 69 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	ble.nil........(get-buffer-creat
bf00	65 20 22 2a 70 61 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	e."package-build-checkout").ni
bf20	6c 0a 20 20 20 20 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	l........"-cf".tar.dir........;;
bf40	20 41 72 67 75 6d 65 6e 74 73 20 74 68 61 74 20 61 72 65 20 6e 65 65 64 20 74 6f 20 73 74 72 69	.Arguments.that.are.need.to.stri
bf60	70 20 6d 65 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	p.metadata.that........;;.preven
bf80	74 20 61 20 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	t.a.reproducible.tarball.as.desc
bfa0	72 69 62 65 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	ribed.at........;;.https://repro
bfc0	64 75 63 69 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	ducible-builds.org/docs/archives
bfe0	2e 0a 20 20 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	........."--sort=name"........(f
c000	6f 72 6d 61 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	ormat."--mtime=@%d".time).......
c020	20 22 2d 2d 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	."--owner=0"."--group=0"."--nume
c040	72 69 63 2d 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	ric-owner"........"--pax-option=
c060	65 78 74 68 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	exthdr.name=%d/PaxHeaders/%f,del
c080	65 74 65 3d 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	ete=atime,delete=ctime")).....(w
c0a0	68 65 6e 20 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	hen.(and.package-build-verbose.n
c0c0	6f 6e 69 6e 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	oninteractive).......(message."C
c0e0	72 65 61 74 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	reated.%s.containing:".(file-nam
c100	65 2d 6e 6f 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	e-nondirectory.tar)).......(doli
c120	73 74 20 28 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	st.(line.(sort.(process-lines.pa
c140	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 0a 20 20 20 20 20	ckage-build-tar-executable......
c160	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
c180	20 20 20 20 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	...."--list"."--file".tar)......
c1a0	20 20 20 20 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	.....................#'string<))
c1c0	0a 20 20 20 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	.........(message."..%s".line)))
c1e0	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 77 72 69 74 65 2d	))..(defun.package-build--write-
c200	70 6b 67 2d 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	pkg-readme.(pkg.files)...(when-l
c220	65 74 2a 20 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	et*.((name.(oref.pkg.name)).....
c240	20 20 20 20 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	..........(commentary...........
c260	20 20 20 20 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	.....(let*.((file.(concat.name."
c280	2e 65 6c 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69	.el")).......................(fi
c2a0	6c 65 20 28 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	le.(or.(car.(rassoc.file.files))
c2c0	20 66 69 6c 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66	.file)).......................(f
c2e0	69 6c 65 20 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	ile.(and.file.(expand-file-name.
c300	66 69 6c 65 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28	file))))..................(and.(
c320	66 69 6c 65 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	file-exists-p.file).............
c340	20 20 20 20 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	..........(lm-commentary.file)))
c360	29 29 0a 20 20 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 28	)).....(with-temp-buffer.......(
c380	69 66 20 28 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	if.(>=.emacs-major-version.28)..
c3a0	20 20 20 20 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	.........(insert.commentary)....
c3c0	20 20 20 20 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	.....;;.Taken.from.28.0's.`lm-co
c3e0	6d 6d 65 6e 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	mmentary'..........(insert......
c400	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 20 20 20	....(replace-regexp-in-string...
c420	20 20 20 20 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	....;.Get.rid.of.............."[
c440	5b 3a 62 6c 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	[:blank:]]*$"."".............;.t
c460	72 61 69 6c 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	railing.white-space...........(r
c480	65 70 6c 61 63 65 2d 72 65 67 65 78 70 2d 69 6e 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20	eplace-regexp-in-string.........
c4a0	20 20 20 28 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	...(format."%s\\\|%s\\\|%s".......
c4c0	20 20 20 20 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	.............;;.commentary.heade
c4e0	72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 22 5e 3b	r....................(concat."^;
c500	3b 3b 5b 5b 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	;;[[:blank:]]*\\("..............
c520	20 20 20 20 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	..............lm-commentary-head
c540	65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 5c	er............................"\
c560	5c 29 3a 5b 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	\):[[:blank:]\n]*").............
c580	20 20 20 20 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	......."^;;[[:blank:]]?".....;.d
c5a0	6f 75 62 6c 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	ouble.semicolon.prefix..........
c5c0	20 20 20 20 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	.........."[[:blank:]\n]*\\'")..
c5e0	3b 20 74 72 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	;.trailing.new-lines............
c600	22 22 20 63 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	"".commentary)))).......(unless.
c620	28 6f 72 20 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	(or.(bobp).(=.(char-before).?\n)
c640	29 0a 20 20 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	).........(insert.?\n)).......;;
c660	20 57 65 20 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	.We.write.the.file.even.if.it.is
c680	20 65 6d 70 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	.empty,.which.is.perhaps.......;
c6a0	3b 20 61 20 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	;.a.questionable.choice,.but.at.
c6c0	6c 65 61 73 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	least.it's.consistent........(le
c6e0	74 20 28 28 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	t.((coding-system-for-write.buff
c700	65 72 2d 66 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	er-file-coding-system)).........
c720	28 77 72 69 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	(write-region.nil.nil...........
c740	20 20 20 20 20 20 20 20 20 20 20 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 28 63	............(expand-file-name.(c
c760	6f 6e 63 61 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	oncat.name."-readme.txt").......
c780	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
c7a0	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 29 29 29 29 29	..package-build-archive-dir)))))
c7c0	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 67 65 6e 65 72 61 74	)..(defun.package-build--generat
c7e0	65 2d 69 6e 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	e-info-files.(rcp.files.target-d
c800	69 72 29 0a 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	ir)..."Create.an.info.file.for.e
c820	61 63 68 20 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	ach.texinfo.file.listed.in.FILES
c840	2e 0a 41 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	..Also.create.the.info.dir.file.
c860	20 20 52 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	..Remove.each.original.texinfo.f
c880	69 6c 65 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	ile...The.source.and.destination
c8a0	20 66 69 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	.file.paths.are.expanded.in.`def
c8c0	61 75 6c 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	ault-directory'.and.TARGET-DIR.r
c8e0	65 73 70 65 63 74 69 76 65 6c 79 2e 22 0a 20 20 28 70 63 61 73 65 2d 64 6f 6c 69 73 74 20 28 60	espectively."...(pcase-dolist.(`
c900	28 2c 73 72 63 20 2e 20 2c 74 6d 70 29 20 66 69 6c 65 73 29 0a 20 20 20 20 28 6c 65 74 20 28 28	(,src...,tmp).files).....(let.((
c920	65 78 74 65 6e 73 69 6f 6e 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 65 78 74 65 6e 73 69 6f 6e 20 74	extension.(file-name-extension.t
c940	6d 70 29 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 6d 65 6d 62 65 72 20 65 78 74 65 6e 73	mp))).......(when.(member.extens
c960	69 6f 6e 20 27 28 22 69 6e 66 6f 22 20 22 74 65 78 69 22 20 22 74 65 78 69 6e 66 6f 22 29 29 0a	ion.'("info"."texi"."texinfo")).
c980	20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 73 72 63 20 28 65 78 70 61 6e 64 2d 66 69 6c 65	........(let*.((src.(expand-file
c9a0	2d 6e 61 6d 65 20 73 72 63 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 6d 70 20	-name.src))................(tmp.
c9c0	28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 74 6d 70 20 74 61 72 67 65 74 2d 64 69 72	(expand-file-name.tmp.target-dir
c9e0	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 65 78 69 20 73 72 63 29 0a 20 20 20	))................(texi.src)....
ca00	20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 66 6f 20 74 6d 70 29 29 0a 20 20 20 20 20 20 20 20	............(info.tmp)).........
ca20	20 20 28 77 68 65 6e 20 28 6d 65 6d 62 65 72 20 65 78 74 65 6e 73 69 6f 6e 20 27 28 22 74 65 78	..(when.(member.extension.'("tex
ca40	69 22 20 22 74 65 78 69 6e 66 6f 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 6c 65	i"."texinfo")).............(dele
ca60	74 65 2d 66 69 6c 65 20 74 6d 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 69	te-file.tmp).............(setq.i
ca80	6e 66 6f 20 28 63 6f 6e 63 61 74 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 73 61 6e 73 2d 65 78 74 65	nfo.(concat.(file-name-sans-exte
caa0	6e 73 69 6f 6e 20 74 6d 70 29 20 22 2e 69 6e 66 6f 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20	nsion.tmp).".info"))............
cac0	20 28 75 6e 6c 65 73 73 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 69 6e 66 6f 29 0a 20 20	.(unless.(file-exists-p.info)...
cae0	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 6d 65 73 73	............(package-build--mess
cb00	61 67 65 20 22 47 65 6e 65 72 61 74 69 6e 67 20 25 73 22 20 69 6e 66 6f 29 0a 20 20 20 20 20 20	age."Generating.%s".info).......
cb20	20 20 20 20 20 20 20 20 3b 3b 20 49 66 20 74 68 65 20 69 6e 66 6f 20 66 69 6c 65 20 69 73 20 6c	........;;.If.the.info.file.is.l
cb40	6f 63 61 74 65 64 20 69 6e 20 61 20 73 75 62 64 69 72 65 63 74 6f 72 79 0a 20 20 20 20 20 20 20	ocated.in.a.subdirectory........
cb60	20 20 20 20 20 20 20 3b 3b 20 61 6e 64 20 63 6f 6e 74 61 69 6e 73 20 72 65 6c 61 74 69 76 65 20	.......;;.and.contains.relative.
cb80	69 6e 63 6c 75 64 65 73 2c 20 74 68 65 6e 20 69 74 20 69 73 0a 20 20 20 20 20 20 20 20 20 20 20	includes,.then.it.is............
cba0	20 20 20 3b 3b 20 6e 65 63 65 73 73 61 72 79 20 74 6f 20 72 75 6e 20 6d 61 6b 65 69 6e 66 6f 20	...;;.necessary.to.run.makeinfo.
cbc0	69 6e 20 74 68 65 20 73 75 62 64 69 72 65 63 74 6f 72 79 2e 0a 20 20 20 20 20 20 20 20 20 20 20	in.the.subdirectory.............
cbe0	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 6f 72 3a 20	...(with-demoted-errors."Error:.
cc00	25 53 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 64 65 66 61 75	%S".................(let.((defau
cc20	6c 74 2d 64 69 72 65 63 74 6f 72 79 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72	lt-directory.(file-name-director
cc40	79 20 74 65 78 69 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63	y.texi)))...................(pac
cc60	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 20 20 20 20 20 20	kage-build--call-process........
cc80	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 6f	............rcp."makeinfo"."--no
cca0	2d 73 70 6c 69 74 22 20 74 65 78 69 20 22 2d 6f 22 20 69 6e 66 6f 29 29 29 29 29 0a 20 20 20 20	-split".texi."-o".info))))).....
ccc0	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 6f	......(with-demoted-errors."Erro
cce0	72 3a 20 25 53 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 64 65 66 61 75 6c	r:.%S".............(let.((defaul
cd00	74 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	t-directory.target-dir))........
cd20	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 70 72 6f 63	.......(package-build--call-proc
cd40	65 73 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 63 70 20 22 69 6e 73 74 61 6c 6c 2d	ess................rcp."install-
cd60	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 29 29 29 29 0a 0a	info"."--dir=dir".info))))))))..
cd80	3b 3b 3b 20 50 61 74 63 68 20 4c 69 62 72 61 72 69 65 73 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b	;;;.Patch.Libraries..(defun.pack
cda0	61 67 65 2d 62 75 69 6c 64 2d 2d 75 70 64 61 74 65 2d 6f 72 2d 69 6e 73 65 72 74 2d 68 65 61 64	age-build--update-or-insert-head
cdc0	65 72 20 28 6e 61 6d 65 20 76 61 6c 75 65 29 0a 20 20 22 45 6e 73 75 72 65 20 63 75 72 72 65 6e	er.(name.value)..."Ensure.curren
cde0	74 20 62 75 66 66 65 72 20 68 61 73 20 4e 41 4d 45 20 68 65 61 64 65 72 20 77 69 74 68 20 74 68	t.buffer.has.NAME.header.with.th
ce00	65 20 67 69 76 65 6e 20 56 41 4c 55 45 2e 0a 41 6e 79 20 65 78 69 73 74 69 6e 67 20 68 65 61 64	e.given.VALUE..Any.existing.head
ce20	65 72 20 77 69 6c 6c 20 62 65 20 70 72 65 73 65 72 76 65 64 20 61 6e 64 20 67 69 76 65 6e 20 74	er.will.be.preserved.and.given.t
ce40	68 65 20 5c 22 58 2d 4f 72 69 67 69 6e 61 6c 2d 5c 22 20 70 72 65 66 69 78 2e 0a 49 66 20 56 41	he.\"X-Original-\".prefix..If.VA
ce60	4c 55 45 20 69 73 20 6e 69 6c 2c 20 74 68 65 20 6e 65 77 20 68 65 61 64 65 72 20 77 69 6c 6c 20	LUE.is.nil,.the.new.header.will.
ce80	6e 6f 74 20 62 65 20 69 6e 73 65 72 74 65 64 2c 20 62 75 74 20 61 6e 79 20 6f 72 69 67 69 6e 61	not.be.inserted,.but.any.origina
cea0	6c 20 77 69 6c 6c 0a 73 74 69 6c 6c 20 62 65 20 72 65 6e 61 6d 65 64 2e 22 0a 20 20 28 67 6f 74	l.will.still.be.renamed."...(got
cec0	6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 28 63 6f 6e 64 0a 20 20 20 28	o-char.(point-min))...(cond....(
cee0	28 6c 65 74 20 28 28 63 61 73 65 2d 66 6f 6c 64 2d 73 65 61 72 63 68 20 74 29 29 0a 20 20 20 20	(let.((case-fold-search.t)).....
cf00	20 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	..(re-search-forward.(format."^;
cf20	2b 2a 20 2a 25 73 20 2a 3a 20 2a 22 20 28 72 65 67 65 78 70 2d 71 75 6f 74 65 20 6e 61 6d 65 29	+.%s.:.".(regexp-quote.name)
cf40	29 20 6e 69 6c 20 74 29 29 0a 20 20 20 20 28 6d 6f 76 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 6f 66	).nil.t)).....(move-beginning-of
cf60	2d 6c 69 6e 65 20 6e 69 6c 29 0a 20 20 20 20 28 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22	-line.nil).....(search-forward."
cf80	56 22 20 6e 69 6c 20 74 29 0a 20 20 20 20 28 62 61 63 6b 77 61 72 64 2d 63 68 61 72 29 0a 20 20	V".nil.t).....(backward-char)...
cfa0	20 20 28 69 6e 73 65 72 74 20 22 58 2d 4f 72 69 67 69 6e 61 6c 2d 22 29 0a 20 20 20 20 28 6d 6f	..(insert."X-Original-").....(mo
cfc0	76 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 20 6e 69 6c 29 29 0a 20 20 20 28 74	ve-beginning-of-line.nil))....(t
cfe0	0a 20 20 20 20 3b 3b 20 50 75 74 20 74 68 65 20 6e 65 77 20 68 65 61 64 65 72 20 69 6e 20 61 20	.....;;.Put.the.new.header.in.a.
d000	73 65 6e 73 69 62 6c 65 20 70 6c 61 63 65 20 69 66 20 77 65 20 63 61 6e 2e 0a 20 20 20 20 28 72	sensible.place.if.we.can......(r
d020	65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 0a 20 20 20 20 20 22 5e 3b 2b 2a 20 2a 5c 5c 28	e-search-forward......"^;+.\\(
d040	56 65 72 73 69 6f 6e 5c 5c 7c 50 61 63 6b 61 67 65 2d 52 65 71 75 69 72 65 73 5c 5c 7c 4b 65 79	Version\\\|Package-Requires\\\|Key
d060	77 6f 72 64 73 5c 5c 7c 55 52 4c 5c 5c 29 20 2a 3a 22 20 6e 69 6c 20 74 29 0a 20 20 20 20 28 66	words\\\|URL\\).*:".nil.t).....(f
d080	6f 72 77 61 72 64 2d 6c 69 6e 65 29 29 29 0a 20 20 28 69 6e 73 65 72 74 20 28 66 6f 72 6d 61 74	orward-line)))...(insert.(format
d0a0	20 22 3b 3b 20 25 73 3a 20 25 73 5c 6e 22 20 6e 61 6d 65 20 76 61 6c 75 65 29 29 29 0a 0a 28 64	.";;.%s:.%s\n".name.value)))..(d
d0c0	65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 65 6e 73 75 72 65 2d 65 6e 64 73 2d	efun.package-build--ensure-ends-
d0e0	68 65 72 65 2d 6c 69 6e 65 20 28 66 69 6c 65 29 0a 20 20 22 41 64 64 20 74 68 65 20 5c 22 46 49	here-line.(file)..."Add.the.\"FI
d100	4c 45 20 65 6e 64 73 20 68 65 72 65 5c 22 20 74 72 61 69 6c 69 6e 67 20 6c 69 6e 65 20 69 66 20	LE.ends.here\".trailing.line.if.
d120	69 74 20 69 73 20 6d 69 73 73 69 6e 67 2e 22 0a 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f	it.is.missing."...(save-excursio
d140	6e 0a 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20	n.....(goto-char.(point-min))...
d160	20 20 28 6c 65 74 20 28 28 74 72 61 69 6c 65 72 20 28 66 6f 72 6d 61 74 20 22 3b 3b 3b 20 25 73	..(let.((trailer.(format.";;;.%s
d180	20 65 6e 64 73 20 68 65 72 65 22 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 72 65 63 74	.ends.here".(file-name-nondirect
d1a0	6f 72 79 20 66 69 6c 65 29 29 29 29 0a 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 72 65 2d 73	ory.file)))).......(unless.(re-s
d1c0	65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 28 66 6f 72 6d 61 74 20 22 5e 25 73 22 20 28 72 65 67	earch-forward.(format."^%s".(reg
d1e0	65 78 70 2d 71 75 6f 74 65 20 74 72 61 69 6c 65 72 29 29 20 6e 69 6c 20 74 29 0a 20 20 20 20 20	exp-quote.trailer)).nil.t)......
d200	20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 20 20 20 20 20	...(goto-char.(point-max))......
d220	20 20 20 28 69 6e 73 65 72 74 20 3f 5c 6e 20 74 72 61 69 6c 65 72 20 3f 5c 6e 29 29 29 29 29 0a	...(insert.?\n.trailer.?\n))))).
d240	0a 3b 3b 3b 20 50 61 63 6b 61 67 65 20 53 74 72 75 63 74 73 0a 0a 28 64 65 66 75 6e 20 70 61 63	.;;;.Package.Structs..(defun.pac
d260	6b 61 67 65 2d 62 75 69 6c 64 2d 2d 64 65 73 63 2d 66 72 6f 6d 2d 6c 69 62 72 61 72 79 20 28 72	kage-build--desc-from-library.(r
d280	63 70 20 66 69 6c 65 73 20 26 6f 70 74 69 6f 6e 61 6c 20 6b 69 6e 64 29 0a 20 20 22 52 65 74 75	cp.files.&optional.kind)..."Retu
d2a0	72 6e 20 74 68 65 20 70 61 63 6b 61 67 65 20 64 65 73 63 72 69 70 74 69 6f 6e 20 66 6f 72 20 52	rn.the.package.description.for.R
d2c0	43 50 2e 0a 0a 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 75 73 65 64 20 66 6f 72 20 61	CP...This.function.is.used.for.a
d2e0	6c 6c 20 70 61 63 6b 61 67 65 73 20 74 68 61 74 20 63 6f 6e 73 69 73 74 20 6f 66 20 61 20 73 69	ll.packages.that.consist.of.a.si
d300	6e 67 6c 65 0a 66 69 6c 65 20 61 6e 64 20 74 68 6f 73 65 20 70 61 63 6b 61 67 65 73 20 74 68 61	ngle.file.and.those.packages.tha
d320	74 20 63 6f 6e 73 69 73 74 20 6f 66 20 6d 75 6c 74 69 70 6c 65 20 66 69 6c 65 73 20 62 75 74 20	t.consist.of.multiple.files.but.
d340	6c 61 63 6b 0a 61 20 66 69 6c 65 20 6e 61 6d 65 64 20 5c 22 4e 41 4d 45 2d 70 6b 67 2e 65 6c 5c	lack.a.file.named.\"NAME-pkg.el\
d360	22 20 6f 72 20 5c 22 4e 41 4d 45 2d 70 6b 67 2e 65 6c 5c 22 2e 0a 0a 54 68 65 20 72 65 74 75 72	".or.\"NAME-pkg.el\"...The.retur
d380	6e 65 64 20 76 61 6c 75 65 20 69 73 20 61 20 60 70 61 63 6b 61 67 65 2d 64 65 73 63 27 20 73 74	ned.value.is.a.`package-desc'.st
d3a0	72 75 63 74 20 28 77 68 69 63 68 20 73 65 65 29 2e 0a 54 68 65 20 76 61 6c 75 65 73 20 6f 66 20	ruct.(which.see)..The.values.of.
d3c0	74 68 65 20 60 6e 61 6d 65 27 20 61 6e 64 20 60 76 65 72 73 69 6f 6e 27 20 73 6c 6f 74 73 20 61	the.`name'.and.`version'.slots.a
d3e0	72 65 20 74 61 6b 65 6e 20 66 72 6f 6d 20 52 43 50 0a 69 74 73 65 6c 66 2e 20 20 54 68 65 20 76	re.taken.from.RCP.itself...The.v
d400	61 6c 75 65 20 6f 66 20 60 6b 69 6e 64 27 20 69 73 20 74 61 6b 65 6e 20 66 72 6f 6d 20 74 68 65	alue.of.`kind'.is.taken.from.the
d420	20 4b 49 4e 44 20 61 72 67 75 6d 65 6e 74 2c 0a 77 68 69 63 68 20 64 65 66 61 75 6c 74 73 20 74	.KIND.argument,.which.defaults.t
d440	6f 20 60 73 69 6e 67 6c 65 27 3b 20 74 68 65 20 6f 74 68 65 72 20 76 61 6c 69 64 20 76 61 6c 75	o.`single';.the.other.valid.valu
d460	65 20 62 65 69 6e 67 20 60 74 61 72 27 2e 0a 0a 4f 74 68 65 72 20 69 6e 66 6f 72 6d 61 74 69 6f	e.being.`tar'...Other.informatio
d480	6e 20 69 73 20 74 61 6b 65 6e 20 66 72 6f 6d 20 74 68 65 20 66 69 6c 65 20 6e 61 6d 65 64 20 5c	n.is.taken.from.the.file.named.\
d4a0	22 4e 41 4d 45 2d 70 6b 67 2e 65 6c 5c 22 2c 0a 77 68 69 63 68 20 73 68 6f 75 6c 64 20 61 70 70	"NAME-pkg.el\",.which.should.app
d4c0	65 61 72 20 69 6e 20 46 49 4c 45 53 2e 20 20 41 73 20 61 20 66 61 6c 6c 62 61 63 6b 2c 20 5c 22	ear.in.FILES...As.a.fallback,.\"
d4e0	4e 41 4d 45 2d 70 6b 67 2e 65 6c 2e 69 6e 5c 22 0a 69 73 20 61 6c 73 6f 20 74 72 69 65 64 2e 20	NAME-pkg.el.in\".is.also.tried..
d500	20 49 66 20 6e 65 69 74 68 65 72 20 66 69 6c 65 20 65 78 69 73 74 73 2c 20 74 68 65 6e 20 72 65	.If.neither.file.exists,.then.re
d520	74 75 72 6e 20 6e 69 6c 2e 20 20 49 66 20 61 0a 76 61 6c 75 65 20 69 73 20 6e 6f 74 20 73 70 65	turn.nil...If.a.value.is.not.spe
d540	63 69 66 69 65 64 20 69 6e 20 74 68 65 20 75 73 65 64 20 66 69 6c 65 2c 20 74 68 65 6e 20 66 61	cified.in.the.used.file,.then.fa
d560	6c 6c 20 62 61 63 6b 20 74 6f 20 74 68 65 0a 76 61 6c 75 65 20 73 70 65 63 69 66 69 65 64 20 69	ll.back.to.the.value.specified.i
d580	6e 20 74 68 65 20 66 69 6c 65 20 5c 22 4e 41 4d 45 2e 65 6c 5c 22 2e 22 0a 20 20 28 6c 65 74 2a	n.the.file.\"NAME.el\"."...(let*
d5a0	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 20 20 20 20	.((name.(oref.rcp.name))........
d5c0	20 20 28 76 65 72 73 69 6f 6e 20 28 6f 72 65 66 20 72 63 70 20 76 65 72 73 69 6f 6e 29 29 0a 20	..(version.(oref.rcp.version))..
d5e0	20 20 20 20 20 20 20 20 28 63 6f 6d 6d 69 74 20 28 6f 72 65 66 20 72 63 70 20 63 6f 6d 6d 69 74	........(commit.(oref.rcp.commit
d600	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 6d 65 20 22	))..........(file.(concat.name."
d620	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 61 72 20 28	.el"))..........(file.(or.(car.(
d640	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 0a 20 20 20 20 20	rassoc.file.files)).file))......
d660	20 20 20 20 28 6d 61 69 6e 74 61 69 6e 65 72 73 20 6e 69 6c 29 29 0a 20 20 20 20 28 61 6e 64 20	....(maintainers.nil)).....(and.
d680	28 66 69 6c 65 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 28 77	(file-exists-p.file)..........(w
d6a0	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 20 20 28 69 6e 73 65	ith-temp-buffer............(inse
d6c0	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)..........
d6e0	20 20 28 73 65 74 71 20 6d 61 69 6e 74 61 69 6e 65 72 73 0a 20 20 20 20 20 20 20 20 20 20 20 20	..(setq.maintainers.............
d700	20 20 20 20 20 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 6c 6d 2d 6d 61 69 6e 74 61 69 6e 65 72	.....(if.(fboundp.'lm-maintainer
d720	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 6c 6d 2d 6d 61 69 6e	s)......................(lm-main
d740	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 20 20 28 77 69 74	tainers)....................(wit
d760	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 20 20 20 20 20 20	h-no-warnings...................
d780	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 2d 6d 61	...(and-let*.((maintainer.(lm-ma
d7a0	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 20 20 20	intainer))).....................
d7c0	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)))))........
d7e0	20 20 20 20 28 70 61 63 6b 61 67 65 2d 64 65 73 63 2d 66 72 6f 6d 2d 64 65 66 69 6e 65 0a 20 20	....(package-desc-from-define...
d800	20 20 20 20 20 20 20 20 20 20 6e 61 6d 65 20 76 65 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20	..........name.version..........
d820	20 20 20 28 6f 72 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	...(or.(save-excursion..........
d840	20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29	.........(goto-char.(point-min))
d860	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 72 65 2d 73 65 61 72	...................(and.(re-sear
d880	63 68 2d 66 6f 72 77 61 72 64 20 22 5c 0a 5e 3b 3b 3b 20 5b 5e 20 5d 2a 5c 5c 2e 65 6c 20 2d 2d	ch-forward."\.^;;;.[^.]*\\.el.--
d8a0	2d 5b 20 5c 74 5d 2a 5c 5c 28 2e 2a 3f 5c 5c 29 5b 20 5c 74 5d 2a 5c 5c 28 2d 5c 5c 2a 2d 2e 2a	-[.\t]\$.?\$[.\t]\\(-\\-.*
d8c0	2d 5c 5c 2a 2d 5b 20 5c 74 5d 2a 5c 5c 29 3f 24 22 20 6e 69 6c 20 74 29 0a 20 20 20 20 20 20 20	-\\-[.\t]\\)?$".nil.t)........
d8e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 2d 6e 6f	................(match-string-no
d900	2d 70 72 6f 70 65 72 74 69 65 73 20 31 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	-properties.1)))................
d920	20 22 4e 6f 20 64 65 73 63 72 69 70 74 69 6f 6e 20 61 76 61 69 6c 61 62 6c 65 2e 22 29 0a 20 20	."No.description.available.")...
d940	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 28 28 66	..........(cond..............((f
d960	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 20 20	boundp.'lm-package-requires)....
d980	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 72 65 73 29	...........(lm-package-requires)
d9a0	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 66 62 6f 75 6e 64 70 20 27 70 61 63 6b 61 67	)..............((fboundp.'packag
d9c0	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 20 20 20 20 20 20	e--prepare-dependencies)........
d9e0	20 20 20 20 20 20 20 28 61 6e 64 2d 6c 65 74 2a 20 28 28 72 65 71 75 69 72 65 2d 6c 69 6e 65 73	.......(and-let*.((require-lines
da00	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 6d 2d 68	...........................(lm-h
da20	65 61 64 65 72 2d 6d 75 6c 74 69 6c 69 6e 65 20 22 70 61 63 6b 61 67 65 2d 72 65 71 75 69 72 65	eader-multiline."package-require
da40	73 22 29 29 29 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 2d	s"))).................(package--
da60	70 72 65 70 61 72 65 2d 64 65 70 65 6e 64 65 6e 63 69 65 73 0a 20 20 20 20 20 20 20 20 20 20 20	prepare-dependencies............
da80	20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 72 65 61 64 2d 66 72 6f 6d 2d 73 74 72 69 6e 67 0a	......(package-read-from-string.
daa0	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 69	..................(mapconcat.#'i
dac0	64 65 6e 74 69 74 79 20 72 65 71 75 69 72 65 2d 6c 69 6e 65 73 20 22 20 22 29 29 29 29 29 29 0a	dentity.require-lines.".")))))).
dae0	20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 60 3a 6b 69 6e 64 27 20 61 6e 64 20 60 3a 61 72 63	............;;.`:kind'.and.`:arc
db00	68 69 76 65 27 20 61 72 65 20 68 61 6e 64 6c 65 64 20 73 65 70 61 72 61 74 65 6c 79 2e 0a 20 20	hive'.are.handled.separately....
db20	20 20 20 20 20 20 20 20 20 20 3a 6b 69 6e 64 20 20 20 20 20 20 20 28 6f 72 20 6b 69 6e 64 20 27	..........:kind.......(or.kind.'
db40	73 69 6e 67 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 54 68 65 20 6f 74 68 65 72	single).............;;.The.other
db60	20 6b 65 79 77 6f 72 64 20 61 72 67 75 6d 65 6e 74 73 20 61 72 65 20 61 70 70 65 6e 64 65 64 20	.keyword.arguments.are.appended.
db80	74 6f 20 74 68 65 20 61 6c 69 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 73 74 6f 72	to.the.alist.............;;.stor
dba0	65 64 20 69 6e 20 74 68 65 20 60 65 78 74 72 61 73 27 20 73 6c 6f 74 2e 20 20 4d 61 6b 65 20 73	ed.in.the.`extras'.slot...Make.s
dbc0	75 72 65 20 60 3a 63 6f 6d 6d 69 74 27 2c 20 77 68 69 63 68 0a 20 20 20 20 20 20 20 20 20 20 20	ure.`:commit',.which............
dbe0	20 3b 3b 20 61 6c 77 61 79 73 20 65 78 69 73 74 73 20 61 6e 64 20 6e 65 76 65 72 20 68 61 73 20	.;;.always.exists.and.never.has.
dc00	74 6f 20 62 65 20 72 65 6d 6f 76 65 64 2c 20 63 6f 6d 65 73 20 66 69 72 73 74 20 69 6e 0a 20 20	to.be.removed,.comes.first.in...
dc20	20 20 20 20 20 20 20 20 20 20 3b 3b 20 74 68 65 20 65 6e 64 20 72 65 73 75 6c 74 2c 20 73 6f 20	..........;;.the.end.result,.so.
dc40	77 65 20 63 61 6e 20 70 6f 73 74 2d 70 72 6f 63 65 73 73 20 74 68 65 20 72 65 74 75 72 6e 65 64	we.can.post-process.the.returned
dc60	20 64 61 74 61 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 62 79 20 73 69 64 65 2d 65 66 66	.data.............;;.by.side-eff
dc80	65 63 74 2c 20 65 2e 67 2e 2c 20 74 6f 20 72 65 6d 6f 76 65 20 73 6f 6d 65 77 68 61 74 20 62 72	ect,.e.g.,.to.remove.somewhat.br
dca0	6f 6b 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 3b 3b 20 69	oken.maintainer.............;;.i
dcc0	6e 66 6f 72 6d 61 74 69 6f 6e 2c 20 74 68 61 74 20 63 61 6e 6e 6f 74 20 65 61 73 69 6c 79 20 62	nformation,.that.cannot.easily.b
dce0	65 20 65 6e 63 6f 64 65 64 20 61 73 20 6a 73 6f 6e 20 28 73 65 65 0a 20 20 20 20 20 20 20 20 20	e.encoded.as.json.(see..........
dd00	20 20 20 3b 3b 20 60 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	...;;.`package-build--archive-al
dd20	69 73 74 2d 66 6f 72 2d 6a 73 6f 6e 27 29 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 75 72 6c	ist-for-json')..............:url
dd40	20 20 20 20 20 20 20 20 28 6c 6d 2d 68 6f 6d 65 70 61 67 65 29 0a 20 20 20 20 20 20 20 20 20 20	........(lm-homepage)...........
dd60	20 20 3a 6b 65 79 77 6f 72 64 73 20 20 20 28 6c 6d 2d 6b 65 79 77 6f 72 64 73 2d 6c 69 73 74 29	..:keywords...(lm-keywords-list)
dd80	0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 4e 65 77 65 72 20 60 70 61 63 6b 61 67 65 2e 65	.............;;.Newer.`package.e
dda0	6c 27 20 76 65 72 73 69 6f 6e 73 20 73 75 70 70 6f 72 74 20 62 6f 74 68 20 60 3a 6d 61 69 6e 74	l'.versions.support.both.`:maint
ddc0	61 69 6e 65 72 73 27 20 61 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 60 3a 6d 61 69	ainers'.and.............;;.`:mai
dde0	6e 74 61 69 6e 65 72 27 2c 20 77 68 69 6c 65 20 6f 6c 64 65 72 20 76 65 72 73 69 6f 6e 73 20 6f	ntainer',.while.older.versions.o
de00	6e 6c 79 20 73 75 70 70 6f 72 74 20 74 68 65 20 6c 61 74 74 65 72 2e 0a 20 20 20 20 20 20 20 20	nly.support.the.latter..........
de20	20 20 20 20 3a 6d 61 69 6e 74 61 69 6e 65 72 20 20 28 63 61 72 20 6d 61 69 6e 74 61 69 6e 65 72	....:maintainer..(car.maintainer
de40	73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 6d 61 69 6e 74 61 69 6e 65 72 73 20 6d 61 69 6e	s).............:maintainers.main
de60	74 61 69 6e 65 72 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 75 74 68 6f 72 73 20 20 20 20	tainers.............:authors....
de80	20 28 6c 6d 2d 61 75 74 68 6f 72 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 6f 6d 6d 69	.(lm-authors).............:commi
dea0	74 20 20 20 20 20 20 63 6f 6d 6d 69 74 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61	t......commit)))))..(defun.packa
dec0	67 65 2d 62 75 69 6c 64 2d 2d 64 65 73 63 2d 66 72 6f 6d 2d 70 61 63 6b 61 67 65 20 28 72 63 70	ge-build--desc-from-package.(rcp
dee0	20 66 69 6c 65 73 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 70 61 63 6b 61 67 65 20 64 65	.files)..."Return.the.package.de
df00	73 63 72 69 70 74 69 6f 6e 20 66 6f 72 20 52 43 50 2e 0a 0a 54 68 69 73 20 66 75 6e 63 74 69 6f	scription.for.RCP...This.functio
df20	6e 20 69 73 20 75 73 65 64 20 66 6f 72 20 70 61 63 6b 61 67 65 73 20 74 68 61 74 20 63 6f 6e 73	n.is.used.for.packages.that.cons
df40	69 73 74 20 6f 66 20 6d 75 6c 74 69 70 6c 65 20 66 69 6c 65 73 2e 0a 0a 54 68 65 20 72 65 74 75	ist.of.multiple.files...The.retu
df60	72 6e 65 64 20 76 61 6c 75 65 20 69 73 20 61 20 60 70 61 63 6b 61 67 65 2d 64 65 73 63 27 20 73	rned.value.is.a.`package-desc'.s
df80	74 72 75 63 74 20 28 77 68 69 63 68 20 73 65 65 29 2e 0a 54 68 65 20 76 61 6c 75 65 73 20 6f 66	truct.(which.see)..The.values.of
dfa0	20 74 68 65 20 60 6e 61 6d 65 27 20 61 6e 64 20 60 76 65 72 73 69 6f 6e 27 20 73 6c 6f 74 73 20	.the.`name'.and.`version'.slots.
dfc0	61 72 65 20 74 61 6b 65 6e 20 66 72 6f 6d 20 52 43 50 0a 69 74 73 65 6c 66 2e 20 20 54 68 65 20	are.taken.from.RCP.itself...The.
dfe0	76 61 6c 75 65 20 6f 66 20 60 6b 69 6e 64 27 20 69 73 20 61 6c 77 61 79 73 20 60 74 61 72 27 2e	value.of.`kind'.is.always.`tar'.
e000	0a 0a 4f 74 68 65 72 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 69 73 20 74 61 6b 65 6e 20 66 72 6f	..Other.information.is.taken.fro
e020	6d 20 74 68 65 20 66 69 6c 65 20 6e 61 6d 65 64 20 5c 22 4e 41 4d 45 2e 65 6c 5c 22 2c 0a 77 68	m.the.file.named.\"NAME.el\",.wh
e040	69 63 68 20 73 68 6f 75 6c 64 20 61 70 70 65 61 72 20 69 6e 20 46 49 4c 45 53 2e 20 20 41 73 20	ich.should.appear.in.FILES...As.
e060	61 20 66 61 6c 6c 62 61 63 6b 2c 20 5c 22 4e 41 4d 45 2e 65 6c 2e 69 6e 5c 22 0a 69 73 20 61 6c	a.fallback,.\"NAME.el.in\".is.al
e080	73 6f 20 74 72 69 65 64 2e 20 20 49 66 20 6e 65 69 74 68 65 72 20 66 69 6c 65 20 65 78 69 73 74	so.tried...If.neither.file.exist
e0a0	73 2c 20 74 68 65 6e 20 72 65 74 75 72 6e 20 6e 69 6c 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 6e	s,.then.return.nil."...(let*.((n
e0c0	61 6d 65 20 28 6f 72 65 66 20 72 63 70 20 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 76	ame.(oref.rcp.name))..........(v
e0e0	65 72 73 69 6f 6e 20 28 6f 72 65 66 20 72 63 70 20 76 65 72 73 69 6f 6e 29 29 0a 20 20 20 20 20	ersion.(oref.rcp.version))......
e100	20 20 20 20 28 63 6f 6d 6d 69 74 20 28 6f 72 65 66 20 72 63 70 20 63 6f 6d 6d 69 74 29 29 0a 20	....(commit.(oref.rcp.commit))..
e120	20 20 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	........(file.(concat.name."-pkg
e140	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 61 72 20 28	.el"))..........(file.(or.(car.(
e160	72 61 73 73 6f 63 20 66 69 6c 65 20 66 69 6c 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	rassoc.file.files)).............
e180	20 20 20 20 20 20 20 66 69 6c 65 29 29 29 0a 20 20 20 20 28 61 6e 64 20 28 6f 72 20 28 66 69 6c	.......file))).....(and.(or.(fil
e1a0	65 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 28 66	e-exists-p.file)..............(f
e1c0	69 6c 65 2d 65 78 69 73 74 73 2d 70 20 28 73 65 74 71 20 66 69 6c 65 20 28 63 6f 6e 63 61 74 20	ile-exists-p.(setq.file.(concat.
e1e0	66 69 6c 65 20 22 2e 69 6e 22 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 66	file.".in"))))..........(let.((f
e200	6f 72 6d 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 20	orm.(with-temp-buffer...........
e220	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
e240	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 20 20 20 20 20 20 20	ts.file)........................
e260	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 20 20 20 20	(read.(current-buffer)))))......
e280	20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 65 71 20 28 63 61 72 20 66 6f 72 6d 29 20 27 64 65	......(unless.(eq.(car.form).'de
e2a0	66 69 6e 65 2d 70 61 63 6b 61 67 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b	fine-package)..............(pack
e2c0	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 69 6e 65	age-build--error.name."No.define
e2e0	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 20 20 20	-package.found.in.%s".file))....
e300	20 20 20 20 20 20 20 20 28 70 63 61 73 65 2d 6c 65 74 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20	........(pcase-let*.............
e320	20 20 20 28 28 60 28 2c 5f 20 2c 5f 20 2c 5f 20 2c 73 75 6d 6d 61 72 79 20 2c 64 65 70 73 20 2e	...((`(,_.,_.,_.,summary.,deps..
e340	20 2c 65 78 74 72 61 29 20 66 6f 72 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	.,extra).form).................(
e360	64 65 70 73 20 28 65 76 61 6c 20 64 65 70 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	deps.(eval.deps))...............
e380	20 20 28 61 6c 74 2d 64 65 73 63 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 64 65 73 63	..(alt-desc.(package-build--desc
e3a0	2d 66 72 6f 6d 2d 6c 69 62 72 61 72 79 20 72 63 70 20 66 69 6c 65 73 29 29 0a 20 20 20 20 20 20	-from-library.rcp.files)).......
e3c0	20 20 20 20 20 20 20 20 20 20 28 61 6c 74 20 28 61 6e 64 20 61 6c 74 2d 64 65 73 63 20 28 70 61	..........(alt.(and.alt-desc.(pa
e3e0	63 6b 61 67 65 2d 64 65 73 63 2d 65 78 74 72 61 73 20 61 6c 74 2d 64 65 73 63 29 29 29 29 0a 20	ckage-desc-extras.alt-desc))))..
e400	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 6d 61 74 63 68 20	............(when.(string-match.
e420	22 5b 5c 72 5c 6e 5d 22 20 73 75 6d 6d 61 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	"[\r\n]".summary)...............
e440	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 0a 20 20 20 20	.(package-build--error.name.....
e460	20 20 20 20 20 20 20 20 20 20 20 20 20 22 49 6c 6c 65 67 61 6c 20 6d 75 6c 74 69 2d 6c 69 6e 65	............."Illegal.multi-line
e480	20 70 61 63 6b 61 67 65 20 64 65 73 63 72 69 70 74 69 6f 6e 20 69 6e 20 25 73 22 20 66 69 6c 65	.package.description.in.%s".file
e4a0	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 64 65 73 63 2d 66 72	))..............(package-desc-fr
e4c0	6f 6d 2d 64 65 66 69 6e 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 61 6d 65 20 76 65 72	om-define...............name.ver
e4e0	73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 73 74 72 69 6e 67 2d 65	sion...............(if.(string-e
e500	6d 70 74 79 2d 70 20 73 75 6d 6d 61 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	mpty-p.summary).................
e520	20 20 28 6f 72 20 28 61 6e 64 20 61 6c 74 2d 64 65 73 63 20 28 70 61 63 6b 61 67 65 2d 64 65 73	..(or.(and.alt-desc.(package-des
e540	63 2d 73 75 6d 6d 61 72 79 20 61 6c 74 2d 64 65 73 63 29 29 0a 20 20 20 20 20 20 20 20 20 20 20	c-summary.alt-desc))............
e560	20 20 20 20 20 20 20 20 20 20 20 22 4e 6f 20 64 65 73 63 72 69 70 74 69 6f 6e 20 61 76 61 69 6c	..........."No.description.avail
e580	61 62 6c 65 2e 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 75 6d 6d 61 72 79 29	able.").................summary)
e5a0	0a 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 61 73 65 2d 6c 61	...............(mapcar.(pcase-la
e5c0	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 20 20 20 20 20 20	mbda.(`(,pkg.,ver)).............
e5e0	20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 73 79 6d 62 6f 6c 70 20 70 6b 67	............(unless.(symbolp.pkg
e600	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63	)...........................(pac
e620	6b 61 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 20	kage-build--error.name..........
e640	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 49 6e 76 61 6c 69 64 20 70 61 63 6b	..................."Invalid.pack
e660	61 67 65 20 6e 61 6d 65 20 69 6e 20 64 65 70 65 6e 64 65 6e 63 79 3a 20 25 53 22 20 70 6b 67 29	age.name.in.dependency:.%S".pkg)
e680	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 6c 69 73 74 20	).........................(list.
e6a0	70 6b 67 20 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	pkg.ver)).......................
e6c0	64 65 70 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6b 69 6e 64 20 20 20 20 20 20 20	deps)...............:kind.......
e6e0	27 74 61 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 75 72 6c 20 20 20 20 20 20 20 20 28	'tar...............:url........(
e700	6f 72 20 28 61 6c 69 73 74 2d 67 65 74 20 3a 75 72 6c 20 65 78 74 72 61 29 0a 20 20 20 20 20 20	or.(alist-get.:url.extra).......
e720	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 6c 69 73 74 2d 67	........................(alist-g
e740	65 74 20 3a 68 6f 6d 65 70 61 67 65 20 65 78 74 72 61 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	et.:homepage.extra).............
e760	20 20 20 20 20 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 75 72	..................(alist-get.:ur
e780	6c 20 61 6c 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6b 65 79 77 6f 72 64 73 20	l.alt))...............:keywords.
e7a0	20 20 28 6f 72 20 28 61 6c 69 73 74 2d 67 65 74 20 3a 6b 65 79 77 6f 72 64 73 20 65 78 74 72 61	..(or.(alist-get.:keywords.extra
e7c0	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	)...............................
e7e0	28 61 6c 69 73 74 2d 67 65 74 20 3a 6b 65 79 77 6f 72 64 73 20 61 6c 74 29 29 0a 20 20 20 20 20	(alist-get.:keywords.alt))......
e800	20 20 20 20 20 20 20 20 20 3a 6d 61 69 6e 74 61 69 6e 65 72 20 28 6f 72 20 28 61 6c 69 73 74 2d	.........:maintainer.(or.(alist-
e820	67 65 74 20 3a 6d 61 69 6e 74 61 69 6e 65 72 20 65 78 74 72 61 29 0a 20 20 20 20 20 20 20 20 20	get.:maintainer.extra)..........
e840	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6c 69 73 74 2d 67 65 74 20	.....................(alist-get.
e860	3a 6d 61 69 6e 74 61 69 6e 65 72 20 61 6c 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	:maintainer.alt))...............
e880	3a 61 75 74 68 6f 72 73 20 20 20 20 28 6f 72 20 28 61 6c 69 73 74 2d 67 65 74 20 3a 61 75 74 68	:authors....(or.(alist-get.:auth
e8a0	6f 72 73 20 65 78 74 72 61 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ors.extra)......................
e8c0	20 20 20 20 20 20 20 20 20 28 61 6c 69 73 74 2d 67 65 74 20 3a 61 75 74 68 6f 72 73 20 61 6c 74	.........(alist-get.:authors.alt
e8e0	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 6f 6d 6d 69 74 20 20 20 20 20 63 6f 6d	))...............:commit.....com
e900	6d 69 74 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 6c 64 2d	mit))))))..(defun.package-build-
e920	2d 77 72 69 74 65 2d 61 72 63 68 69 76 65 2d 65 6e 74 72 79 20 28 64 65 73 63 29 0a 20 20 28 77	-write-archive-entry.(desc)...(w
e940	69 74 68 2d 74 65 6d 70 2d 66 69 6c 65 0a 20 20 20 20 20 20 28 65 78 70 61 6e 64 2d 66 69 6c 65	ith-temp-file.......(expand-file
e960	2d 6e 61 6d 65 20 28 63 6f 6e 63 61 74 20 28 70 61 63 6b 61 67 65 2d 64 65 73 63 2d 66 75 6c 6c	-name.(concat.(package-desc-full
e980	2d 6e 61 6d 65 20 64 65 73 63 29 20 22 2e 65 6e 74 72 79 22 29 0a 20 20 20 20 20 20 20 20 20 20	-name.desc).".entry")...........
e9a0	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 61 72 63 68	..............package-build-arch
e9c0	69 76 65 2d 64 69 72 29 0a 20 20 20 20 28 73 65 74 2d 62 75 66 66 65 72 2d 66 69 6c 65 2d 63 6f	ive-dir).....(set-buffer-file-co
e9e0	64 69 6e 67 2d 73 79 73 74 65 6d 20 27 75 74 66 2d 38 29 0a 20 20 20 20 28 70 70 20 28 63 6f 6e	ding-system.'utf-8).....(pp.(con
ea00	73 20 28 70 61 63 6b 61 67 65 2d 64 65 73 63 2d 6e 61 6d 65 20 20 20 20 64 65 73 63 29 0a 20 20	s.(package-desc-name....desc)...
ea20	20 20 20 20 20 20 20 20 20 20 20 20 28 76 65 63 74 6f 72 20 28 70 61 63 6b 61 67 65 2d 64 65 73	............(vector.(package-des
ea40	63 2d 76 65 72 73 69 6f 6e 20 64 65 73 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	c-version.desc).................
ea60	20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 64 65 73 63 2d 72 65 71 73 20 20 20 20 64 65 73 63	......(package-desc-reqs....desc
ea80	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65	).......................(package
eaa0	2d 64 65 73 63 2d 73 75 6d 6d 61 72 79 20 64 65 73 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	-desc-summary.desc).............
eac0	20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 64 65 73 63 2d 6b 69 6e 64 20 20 20 20	..........(package-desc-kind....
eae0	64 65 73 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63	desc).......................(pac
eb00	6b 61 67 65 2d 64 65 73 63 2d 65 78 74 72 61 73 20 20 64 65 73 63 29 29 29 0a 20 20 20 20 20 20	kage-desc-extras..desc))).......
eb20	20 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 29 0a 0a 3b 3b 3b 20 46 69 6c 65 73	..(current-buffer))))..;;;.Files
eb40	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 62 75 69 6c 64 2d 64	.Spec..(defconst.package-build-d
eb60	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 65 6c 22 20 22 6c 69	efault-files-spec...'("*.el"."li
eb80	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 6f 22 20 22 2a 2e 74	sp/.el"....."dir".".info"."*.t
eba0	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 2f 64 69 72 22 20 22	exi"."*.texinfo"....."doc/dir"."
ebc0	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 22 64 6f 63 2f 2a 2e	doc/.info"."doc/.texi"."doc/*.
ebe0	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 64 6f 63 73 2f 2a 2e	texinfo"....."docs/dir"."docs/*.
ec00	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 2f 2a 2e 74 65 78 69	info"."docs/.texi"."docs/.texi
ec20	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 2e 64 69 72 2d 6c 6f	nfo".....(:exclude......".dir-lo
ec40	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 73 2e 65 6c 22 0a 20	cals.el"."lisp/.dir-locals.el"..
ec60	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 22 2a 2d 74 65 73 74	...."test.el"."tests.el"."*-test
ec80	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 69 73 70 2f 74 65 73	.el"."*-tests.el"......"lisp/tes
eca0	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 73 70 2f 2a 2d 74 65	t.el"."lisp/tests.el"."lisp/*-te
ecc0	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 29 0a 20 20 22 44 65	st.el"."lisp/*-tests.el"))..."De
ece0	66 61 75 6c 74 20 76 61 6c 75 65 20 66 6f 72 20 3a 66 69 6c 65 73 20 61 74 74 72 69 62 75 74 65	fault.value.for.:files.attribute
ed00	20 69 6e 20 72 65 63 69 70 65 73 2e 22 29 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62	.in.recipes.")..(defun.package-b
ed20	75 69 6c 64 2d 65 78 70 61 6e 64 2d 66 69 6c 65 73 2d 73 70 65 63 20 28 72 63 70 20 26 6f 70 74	uild-expand-files-spec.(rcp.&opt
ed40	69 6f 6e 61 6c 20 61 73 73 65 72 74 20 72 65 70 6f 20 73 70 65 63 29 0a 20 20 22 52 65 74 75 72	ional.assert.repo.spec)..."Retur
ed60	6e 20 61 6e 20 61 6c 69 73 74 20 6f 66 20 66 69 6c 65 73 20 6f 66 20 70 61 63 6b 61 67 65 20 52	n.an.alist.of.files.of.package.R
ed80	43 50 20 74 6f 20 62 65 20 69 6e 63 6c 75 64 65 64 20 69 6e 20 74 61 72 62 61 6c 6c 2e 0a 0a 45	CP.to.be.included.in.tarball...E
eda0	61 63 68 20 65 6c 65 6d 65 6e 74 20 68 61 73 20 74 68 65 20 66 6f 72 6d 20 28 53 4f 55 52 43 45	ach.element.has.the.form.(SOURCE
edc0	20 2e 20 44 45 53 54 49 4e 41 54 49 4f 4e 29 2c 20 77 68 65 72 65 20 53 4f 55 52 43 45 0a 69 73	...DESTINATION),.where.SOURCE.is
ede0	20 61 20 66 69 6c 65 20 69 6e 20 74 68 65 20 70 61 63 6b 61 67 65 27 73 20 72 65 70 6f 73 69 74	.a.file.in.the.package's.reposit
ee00	6f 72 79 20 61 6e 64 20 44 45 53 54 49 4e 41 54 49 4f 4e 20 69 73 20 77 68 65 72 65 0a 74 68 61	ory.and.DESTINATION.is.where.tha
ee20	74 20 66 69 6c 65 20 69 73 20 70 6c 61 63 65 64 20 69 6e 20 74 68 65 20 70 61 63 6b 61 67 65 27	t.file.is.placed.in.the.package'
ee40	73 20 74 61 72 62 61 6c 6c 2e 0a 0a 52 43 50 20 69 73 20 74 68 65 20 70 61 63 6b 61 67 65 20 72	s.tarball...RCP.is.the.package.r
ee60	65 63 69 70 65 20 61 73 20 61 6e 20 6f 62 6a 65 63 74 2e 20 20 49 66 20 74 68 65 20 60 66 69 6c	ecipe.as.an.object...If.the.`fil
ee80	65 73 27 20 73 6c 6f 74 20 6f 66 0a 52 43 50 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 74 68 65 6e	es'.slot.of.RCP.is.non-nil,.then
eea0	20 74 68 61 74 20 69 73 20 75 73 65 64 20 61 73 20 74 68 65 20 66 69 6c 65 20 73 70 65 63 69 66	.that.is.used.as.the.file.specif
eec0	69 63 61 74 69 6f 6e 2e 0a 4f 74 68 65 72 77 69 73 65 20 60 70 61 63 6b 61 67 65 2d 62 75 69 6c	ication..Otherwise.`package-buil
eee0	64 2d 64 65 66 61 75 6c 74 2d 66 69 6c 65 73 2d 73 70 65 63 27 20 69 73 20 75 73 65 64 2e 0a 0a	d-default-files-spec'.is.used...
ef00	49 66 20 6f 70 74 69 6f 6e 61 6c 20 41 53 53 45 52 54 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 74	If.optional.ASSERT.is.non-nil,.t
ef20	68 65 6e 20 72 61 69 73 65 20 61 6e 20 65 72 72 6f 72 20 69 66 20 6e 69 6c 20 77 6f 75 6c 64 0a	hen.raise.an.error.if.nil.would.
ef40	62 65 20 72 65 74 75 72 6e 65 64 2e 20 20 49 66 20 41 53 53 45 52 54 20 61 6e 64 20 60 66 69 6c	be.returned...If.ASSERT.and.`fil
ef60	65 73 27 20 61 72 65 20 62 6f 74 68 20 6e 6f 6e 2d 6e 69 6c 20 61 6e 64 20 75 73 69 6e 67 0a 60	es'.are.both.non-nil.and.using.`
ef80	66 69 6c 65 73 27 20 72 65 73 75 6c 74 73 20 69 6e 20 74 68 65 20 73 61 6d 65 20 73 65 74 20 6f	files'.results.in.the.same.set.o
efa0	66 20 66 69 6c 65 73 20 61 73 20 74 68 65 20 64 65 66 61 75 6c 74 20 73 70 65 63 2c 0a 74 68 65	f.files.as.the.default.spec,.the
efc0	6e 20 73 68 6f 77 20 61 20 77 61 72 6e 69 6e 67 2e 0a 0a 41 20 66 69 6c 65 73 20 73 70 65 63 69	n.show.a.warning...A.files.speci
efe0	66 69 63 61 74 69 6f 6e 20 69 73 20 61 20 6c 69 73 74 2e 20 20 49 74 73 20 65 6c 65 6d 65 6e 74	fication.is.a.list...Its.element
f000	73 20 61 72 65 20 70 72 6f 63 65 73 73 65 64 20 69 6e 0a 6f 72 64 65 72 20 61 6e 64 20 63 61 6e	s.are.processed.in.order.and.can
f020	20 68 61 76 65 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 66 6f 72 6d 3a 0a 0a 2d 20 3a 64 65	.have.the.following.form:..-.:de
f040	66 61 75 6c 74 73 0a 0a 20 20 49 66 20 74 68 65 20 66 69 72 73 74 20 65 6c 65 6d 65 6e 74 20 69	faults....If.the.first.element.i
f060	73 20 60 3a 64 65 66 61 75 6c 74 73 27 2c 20 74 68 65 6e 20 74 68 61 74 20 6d 65 61 6e 73 20 74	s.`:defaults',.then.that.means.t
f080	6f 20 70 72 65 70 65 6e 64 0a 20 20 74 68 65 20 64 65 66 61 75 6c 74 20 66 69 6c 65 73 20 73 70	o.prepend...the.default.files.sp
f0a0	65 63 20 74 6f 20 74 68 65 20 53 50 45 43 20 73 70 65 63 69 66 69 65 64 20 62 79 20 74 68 65 20	ec.to.the.SPEC.specified.by.the.
f0c0	72 65 6d 61 69 6e 69 6e 67 0a 20 20 65 6c 65 6d 65 6e 74 73 2e 0a 0a 2d 20 47 4c 4f 42 0a 0a 20	remaining...elements...-.GLOB...
f0e0	20 41 20 73 74 72 69 6e 67 20 69 73 20 67 6c 6f 62 2d 65 78 70 61 6e 64 65 64 20 74 6f 20 6d 61	.A.string.is.glob-expanded.to.ma
f100	74 63 68 20 7a 65 72 6f 20 6f 72 20 6d 6f 72 65 20 66 69 6c 65 73 2e 20 20 4d 61 74 63 68 65 64	tch.zero.or.more.files...Matched
f120	0a 20 20 66 69 6c 65 73 20 61 72 65 20 63 6f 70 69 65 64 20 74 6f 20 74 68 65 20 74 6f 70 2d 6c	...files.are.copied.to.the.top-l
f140	65 76 65 6c 20 64 69 72 65 63 74 6f 72 79 2e 0a 0a 2d 20 28 53 55 42 44 49 52 45 43 54 4f 52 59	evel.directory...-.(SUBDIRECTORY
f160	20 47 4c 4f 42 2e 2e 2e 29 0a 0a 20 20 41 20 6c 69 73 74 20 74 68 61 74 20 62 65 67 69 6e 73 20	.GLOB...)....A.list.that.begins.
f180	77 69 74 68 20 61 20 73 74 72 69 6e 67 20 63 61 75 73 65 73 20 74 68 65 20 66 69 6c 65 73 20 6d	with.a.string.causes.the.files.m
f1a0	61 74 63 68 65 64 20 62 79 0a 20 20 74 68 65 20 73 65 63 6f 6e 64 20 61 6e 64 20 73 75 62 73 65	atched.by...the.second.and.subse
f1c0	71 75 65 6e 74 20 65 6c 65 6d 65 6e 74 73 20 74 6f 20 62 65 20 63 6f 70 69 65 64 20 69 6e 74 6f	quent.elements.to.be.copied.into
f1e0	20 74 68 65 20 73 75 62 2d 0a 20 20 64 69 72 65 63 74 6f 72 79 20 73 70 65 63 69 66 69 65 64 20	.the.sub-...directory.specified.
f200	62 79 20 74 68 65 20 66 69 72 73 74 20 65 6c 65 6d 65 6e 74 2e 0a 0a 2d 20 28 3a 65 78 63 6c 75	by.the.first.element...-.(:exclu
f220	64 65 20 47 4c 4f 42 2e 2e 2e 29 0a 0a 20 20 41 20 6c 69 73 74 20 74 68 61 74 20 62 65 67 69 6e	de.GLOB...)....A.list.that.begin
f240	73 20 77 69 74 68 20 60 3a 65 78 63 6c 75 64 65 27 20 63 61 75 73 65 73 20 66 69 6c 65 73 20 74	s.with.`:exclude'.causes.files.t
f260	68 61 74 20 77 65 72 65 0a 20 20 6d 61 74 63 68 65 64 20 62 79 20 65 61 72 6c 69 65 72 20 65 6c	hat.were...matched.by.earlier.el
f280	65 6d 65 6e 74 73 20 74 68 61 74 20 61 72 65 20 61 6c 73 6f 20 6d 61 74 63 68 65 64 20 62 79 20	ements.that.are.also.matched.by.
f2a0	74 68 65 20 73 65 63 6f 6e 64 0a 20 20 61 6e 64 20 73 75 62 73 65 71 75 65 6e 74 20 65 6c 65 6d	the.second...and.subsequent.elem
f2c0	65 6e 74 73 20 6f 66 20 74 68 69 73 20 6c 69 73 74 20 74 6f 20 62 65 20 72 65 6d 6f 76 65 64 20	ents.of.this.list.to.be.removed.
f2e0	66 72 6f 6d 20 74 68 65 0a 20 20 72 65 74 75 72 6e 65 64 20 61 6c 69 73 74 2e 20 20 46 69 6c 65	from.the...returned.alist...File
f300	73 20 6d 61 74 63 68 65 64 20 62 79 20 6c 61 74 65 72 20 65 6c 65 6d 65 6e 74 73 20 61 72 65 20	s.matched.by.later.elements.are.
f320	6e 6f 74 0a 20 20 61 66 66 65 63 74 65 64 2e 22 0a 20 20 28 6c 65 74 20 28 28 64 65 66 61 75 6c	not...affected."...(let.((defaul
f340	74 2d 64 69 72 65 63 74 6f 72 79 20 28 6f 72 20 72 65 70 6f 20 28 70 61 63 6b 61 67 65 2d 62 75	t-directory.(or.repo.(package-bu
f360	69 6c 64 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 20 20 20	ild--working-tree.rcp)))........
f380	20 28 73 70 65 63 20 28 6f 72 20 73 70 65 63 20 28 6f 72 65 66 20 72 63 70 20 66 69 6c 65 73 29	.(spec.(or.spec.(oref.rcp.files)
f3a0	29 29 0a 20 20 20 20 20 20 20 20 28 6e 61 6d 65 20 28 6f 72 65 66 20 72 63 70 20 6e 61 6d 65 29	)).........(name.(oref.rcp.name)
f3c0	29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 65 71 20 28 63 61 72 20 73 70 65 63 29 20 3a 64 65 66	)).....(when.(eq.(car.spec).:def
f3e0	61 75 6c 74 73 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 73 70 65 63 20 28 61 70 70 65 6e 64 20	aults).......(setq.spec.(append.
f400	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 70 65 63	package-build-default-files-spec
f420	20 28 63 64 72 20 73 70 65 63 29 29 29 29 0a 20 20 20 20 28 6c 65 74 20 28 28 66 69 6c 65 73 20	.(cdr.spec)))).....(let.((files.
f440	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
f460	63 2d 31 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 73 70 65 63 20 70	c-1...................(or.spec.p
f480	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 70 65 63 29	ackage-build-default-files-spec)
f4a0	29 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 61 73 73 65 72 74 0a 20 20 20 20 20 20 20 20 28	))).......(when.assert.........(
f4c0	77 68 65 6e 20 28 61 6e 64 20 72 63 70 20 73 70 65 63 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	when.(and.rcp.spec..............
f4e0	20 20 20 20 20 20 28 65 71 75 61 6c 20 66 69 6c 65 73 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c	......(equal.files.(package-buil
f500	64 2d 2d 65 78 70 61 6e 64 2d 66 69 6c 65 73 2d 73 70 65 63 2d 31 0a 20 20 20 20 20 20 20 20 20	d--expand-files-spec-1..........
f520	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 2d	........................package-
f540	62 75 69 6c 64 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	build-default-files-spec))).....
f560	20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 57 61 72 6e 69 6e 67 3a 20 25 73 20 3a 66 69 6c	......(message."Warning:.%s.:fil
f580	65 73 20 73 70 65 63 20 69 73 20 65 71 75 69 76 61 6c 65 6e 74 20 74 6f 20 74 68 65 20 64 65 66	es.spec.is.equivalent.to.the.def
f5a0	61 75 6c 74 22 20 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 66 69 6c	ault".name)).........(unless.fil
f5c0	65 73 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 65 72 72	es...........(package-build--err
f5e0	6f 72 20 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 22 4e 6f 20 6d 61 74 63 68 69 6e 67	or.name............."No.matching
f600	20 66 69 6c 65 28 73 29 20 66 6f 75 6e 64 20 69 6e 20 25 73 20 75 73 69 6e 67 20 25 73 22 0a 20	.file(s).found.in.%s.using.%s"..
f620	20 20 20 20 20 20 20 20 20 20 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 28 6f 72	...........default-directory.(or
f640	20 73 70 65 63 20 22 64 65 66 61 75 6c 74 20 73 70 65 63 22 29 29 29 29 0a 20 20 20 20 20 20 66	.spec."default.spec")))).......f
f660	69 6c 65 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	iles)))..(defun.package-build--e
f680	78 70 61 6e 64 2d 66 69 6c 65 73 2d 73 70 65 63 2d 31 20 28 73 70 65 63 29 0a 20 20 22 52 65 74	xpand-files-spec-1.(spec)..."Ret
f6a0	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 6e 67	urn.a.list.of.all.files.matching
f6c0	20 53 50 45 43 20 69 6e 20 60 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 27 2e 0a 53 50	.SPEC.in.`default-directory'..SP
f6e0	45 43 20 69 73 20 61 20 66 75 6c 6c 20 66 69 6c 65 73 20 73 70 65 63 20 61 73 20 73 74 6f 72 65	EC.is.a.full.files.spec.as.store
f700	64 20 69 6e 20 61 20 72 65 63 69 70 65 20 6f 62 6a 65 63 74 2e 22 0a 20 20 28 6c 65 74 20 28 69	d.in.a.recipe.object."...(let.(i
f720	6e 63 6c 75 64 65 20 65 78 63 6c 75 64 65 29 0a 20 20 20 20 28 64 6f 6c 69 73 74 20 28 65 6e 74	nclude.exclude).....(dolist.(ent
f740	72 79 20 73 70 65 63 29 0a 20 20 20 20 20 20 28 69 66 20 28 65 71 20 28 63 61 72 2d 73 61 66 65	ry.spec).......(if.(eq.(car-safe
f760	20 65 6e 74 72 79 29 20 3a 65 78 63 6c 75 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 64 6f 6c	.entry).:exclude)...........(dol
f780	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 20 20 20	ist.(entry.(cdr.entry)).........
f7a0	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 0a 20 20 20 20 20 20	....(push.entry.exclude)).......
f7c0	20 20 28 70 75 73 68 20 65 6e 74 72 79 20 69 6e 63 6c 75 64 65 29 29 29 0a 20 20 20 20 28 63 6c	..(push.entry.include))).....(cl
f7e0	2d 73 65 74 2d 64 69 66 66 65 72 65 6e 63 65 0a 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75	-set-difference......(package-bu
f800	69 6c 64 2d 2d 65 78 70 61 6e 64 2d 66 69 6c 65 73 2d 73 70 65 63 2d 32 20 28 6e 72 65 76 65 72	ild--expand-files-spec-2.(nrever
f820	73 65 20 69 6e 63 6c 75 64 65 29 29 0a 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64	se.include))......(package-build
f840	2d 2d 65 78 70 61 6e 64 2d 66 69 6c 65 73 2d 73 70 65 63 2d 32 20 28 6e 72 65 76 65 72 73 65 20	--expand-files-spec-2.(nreverse.
f860	65 78 63 6c 75 64 65 29 29 0a 20 20 20 20 20 3a 74 65 73 74 20 23 27 65 71 75 61 6c 20 3a 6b 65	exclude))......:test.#'equal.:ke
f880	79 20 23 27 63 61 72 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	y.#'car)))..(defun.package-build
f8a0	2d 2d 65 78 70 61 6e 64 2d 66 69 6c 65 73 2d 73 70 65 63 2d 32 20 28 73 70 65 63 20 26 6f 70 74	--expand-files-spec-2.(spec.&opt
f8c0	69 6f 6e 61 6c 20 73 75 62 64 69 72 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 6c 69 73 74 20 6f	ional.subdir)..."Return.a.list.o
f8e0	66 20 61 6c 6c 20 66 69 6c 65 73 20 6d 61 74 63 68 69 6e 67 20 53 50 45 43 20 69 6e 20 53 55 42	f.all.files.matching.SPEC.in.SUB
f900	44 49 52 2e 0a 49 66 20 53 55 42 44 49 52 20 69 73 20 6e 69 6c 2c 20 75 73 65 20 60 64 65 66 61	DIR..If.SUBDIR.is.nil,.use.`defa
f920	75 6c 74 2d 64 69 72 65 63 74 6f 72 79 27 2e 20 20 53 50 45 43 20 69 73 20 65 78 70 65 63 74 65	ult-directory'...SPEC.is.expecte
f940	64 20 74 6f 0a 62 65 20 61 20 70 61 72 74 69 61 6c 20 66 69 6c 65 73 20 73 70 65 63 2c 20 63 6f	d.to.be.a.partial.files.spec,.co
f960	6e 73 69 73 74 69 6e 67 20 6f 66 20 65 69 74 68 65 72 20 61 6c 6c 20 69 6e 63 6c 75 64 65 20 72	nsisting.of.either.all.include.r
f980	75 6c 65 73 0a 6f 72 20 61 6c 6c 20 65 78 63 6c 75 64 65 20 72 75 6c 65 73 20 28 77 69 74 68 20	ules.or.all.exclude.rules.(with.
f9a0	74 68 65 20 60 3a 65 78 63 6c 75 64 65 27 20 6b 65 79 77 6f 72 64 20 72 65 6d 6f 76 65 64 29 2e	the.`:exclude'.keyword.removed).
f9c0	22 0a 20 20 28 6d 61 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	"...(mapcan.(lambda.(entry).....
f9e0	20 20 20 20 20 20 20 20 28 69 66 20 28 73 74 72 69 6e 67 70 20 65 6e 74 72 79 29 0a 20 20 20 20	........(if.(stringp.entry).....
fa00	20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 20 28 6c 61 6d 62 64 61 20 28 66 29 0a	............(mapcar.(lambda.(f).
fa20	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20	..........................(cons.
fa40	66 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	f...............................
fa60	20 20 28 63 6f 6e 63 61 74 20 73 75 62 64 69 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	..(concat.subdir................
fa80	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 70 6c 61 63	.........................(replac
faa0	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 20 20	e-regexp-in-string..............
fac0	20 20 20 20 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 2e	............................"\\.
fae0	65 6c 5c 5c 2e 69 6e 5c 5c 27 22 20 20 22 2e 65 6c 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	el\\.in\\'"..".el"..............
fb00	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c	............................(fil
fb20	65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 72 65 63 74 6f 72 79 20 66 29 29 29 29 29 0a 20 20 20 20 20	e-name-nondirectory.f)))))......
fb40	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 65 78 70 61 6e 64 2d	...................(file-expand-
fb60	77 69 6c 64 63 61 72 64 73 20 65 6e 74 72 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	wildcards.entry))...............
fb80	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
fba0	63 2d 32 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 64 72 20 65 6e 74 72 79 29 0a 20	c-2................(cdr.entry)..
fbc0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 73 75 62 64 69 72 20 28 63 61	..............(concat.subdir.(ca
fbe0	72 20 65 6e 74 72 79 29 20 22 2f 22 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 73 70 65 63 29	r.entry)."/"))))...........spec)
fc00	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 6f 70 79 2d 70 61	)..(defun.package-build--copy-pa
fc20	63 6b 61 67 65 2d 66 69 6c 65 73 20 28 66 69 6c 65 73 20 74 61 72 67 65 74 2d 64 69 72 29 0a 20	ckage-files.(files.target-dir)..
fc40	20 22 43 6f 70 79 20 46 49 4c 45 53 20 66 72 6f 6d 20 60 64 65 66 61 75 6c 74 2d 64 69 72 65 63	."Copy.FILES.from.`default-direc
fc60	74 6f 72 79 27 20 74 6f 20 54 41 52 47 45 54 2d 44 49 52 2e 0a 46 49 4c 45 53 20 69 73 20 61 20	tory'.to.TARGET-DIR..FILES.is.a.
fc80	6c 69 73 74 20 6f 66 20 28 53 4f 55 52 43 45 20 2e 20 44 45 53 54 29 20 72 65 6c 61 74 69 76 65	list.of.(SOURCE...DEST).relative
fca0	20 66 69 6c 65 70 61 74 68 20 70 61 69 72 73 2e 22 0a 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69	.filepath.pairs."...(package-bui
fcc0	6c 64 2d 2d 6d 65 73 73 61 67 65 0a 20 20 20 22 43 6f 70 79 69 6e 67 20 66 69 6c 65 73 20 28 2d	ld--message...."Copying.files.(-
fce0	3e 29 20 61 6e 64 20 64 69 72 65 63 74 6f 72 69 65 73 20 28 3d 3e 29 5c 6e 20 20 66 72 6f 6d 20	>).and.directories.(=>)\n..from.
fd00	25 73 5c 6e 20 20 74 6f 20 25 73 22 0a 20 20 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72	%s\n..to.%s"....default-director
fd20	79 20 74 61 72 67 65 74 2d 64 69 72 29 0a 20 20 28 70 63 61 73 65 2d 64 6f 6c 69 73 74 20 28 60	y.target-dir)...(pcase-dolist.(`
fd40	28 2c 73 72 63 20 2e 20 2c 64 73 74 29 20 66 69 6c 65 73 29 0a 20 20 20 20 28 6c 65 74 20 28 28	(,src...,dst).files).....(let.((
fd60	73 72 63 2a 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 73 72 63 29 29 0a 20 20 20	src*.(expand-file-name.src))....
fd80	20 20 20 20 20 20 20 28 64 73 74 2a 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 64	.......(dst*.(expand-file-name.d
fda0	73 74 20 74 61 72 67 65 74 2d 64 69 72 29 29 29 0a 20 20 20 20 20 20 28 6d 61 6b 65 2d 64 69 72	st.target-dir))).......(make-dir
fdc0	65 63 74 6f 72 79 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 64 73 74 2a	ectory.(file-name-directory.dst*
fde0	29 20 74 29 0a 20 20 20 20 20 20 28 63 6f 6e 64 20 28 28 66 69 6c 65 2d 72 65 67 75 6c 61 72 2d	).t).......(cond.((file-regular-
fe00	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 67 65 2d 62 75	p.src*)..............(package-bu
fe20	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 22 20 20 25 73	ild--message..............."..%s
fe40	20 25 73 20 2d 3e 20 25 73 22 20 28 69 66 20 28 65 71 75 61 6c 20 73 72 63 20 64 73 74 29 20 22	.%s.->.%s".(if.(equal.src.dst)."
fe60	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 20 20 20 28 63	."."!").src.dst)..............(c
fe80	6f 70 79 2d 66 69 6c 65 20 73 72 63 2a 20 64 73 74 2a 29 29 0a 20 20 20 20 20 20 20 20 20 20 20	opy-file.src.dst))............
fea0	20 28 28 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 73 72 63 2a 29 0a 20 20 20 20 20 20	.((file-directory-p.src*).......
fec0	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 20	.......(package-build--message..
fee0	20 20 20 20 20 20 20 20 20 20 20 20 20 22 20 20 25 73 20 25 73 20 3d 3e 20 25 73 22 20 28 69 66	............."..%s.%s.=>.%s".(if
ff00	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 73	.(equal.src.dst)."."."!").src.ds
ff20	74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 70 79 2d 64 69 72 65 63 74 6f 72 79 20	t)..............(copy-directory.
ff40	73 72 63 2a 20 64 73 74 2a 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d	src.dst))))))..(defun.package-
ff60	62 75 69 6c 64 2d 2d 73 70 65 63 2d 67 6c 6f 62 73 20 28 72 63 70 29 0a 20 20 22 52 65 74 75 72	build--spec-globs.(rcp)..."Retur
ff80	6e 20 61 20 6c 69 73 74 20 6f 66 20 76 63 73 20 61 72 67 75 6d 65 6e 74 73 20 74 6f 20 6d 61 74	n.a.list.of.vcs.arguments.to.mat
ffa0	63 68 20 74 68 65 20 66 69 6c 65 73 20 73 70 65 63 69 66 69 65 64 20 69 6e 20 52 43 50 2e 22 0a	ch.the.files.specified.in.RCP.".
ffc0	20 20 3b 3b 20 53 65 65 20 67 6c 6f 62 28 37 29 2c 20 67 69 74 67 6c 6f 73 73 61 72 79 28 37 29	..;;.See.glob(7),.gitglossary(7)
ffe0	20 61 6e 64 20 22 68 67 20 68 65 6c 70 20 70 61 74 74 65 72 6e 73 22 2e 0a 20 20 28 63 6c 2d 66	.and."hg.help.patterns"....(cl-f
10000	6c 65 74 20 28 28 74 6f 61 72 67 73 20 28 67 6c 6f 62 20 26 6f 70 74 69 6f 6e 61 6c 20 65 78 63	let.((toargs.(glob.&optional.exc
10020	6c 75 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 47 69 76 65 6e 20 61 6e 20	lude)...............;;.Given.an.
10040	65 6c 65 6d 65 6e 74 20 6c 69 6b 65 20 28 22 64 69 72 22 20 22 64 69 72 2f 2a 22 29 2c 20 77 65	element.like.("dir"."dir/*"),.we
10060	20 77 61 6e 74 20 74 6f 20 6d 6f 76 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 61	.want.to.move...............;;.a
10080	6c 6c 20 63 68 69 6c 64 72 65 6e 20 6f 66 20 22 64 69 72 22 20 74 6f 20 74 68 65 20 74 6f 70 2d	ll.children.of."dir".to.the.top-
100a0	6c 65 76 65 6c 2e 20 20 47 6c 6f 62 20 68 61 6e 64 6c 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20	level...Glob.handling...........
100c0	20 20 20 20 3b 3b 20 6f 66 20 67 69 74 2d 6c 6f 67 2f 68 67 2d 6c 6f 67 20 6f 6e 6c 79 20 63 61	....;;.of.git-log/hg-log.only.ca
100e0	72 65 73 20 61 62 6f 75 74 20 72 65 67 75 6c 61 72 20 66 69 6c 65 2c 20 73 6f 20 69 66 0a 20 20	res.about.regular.file,.so.if...
10100	20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 22 64 69 72 2f 73 75 62 64 69 72 2f 66 69 6c 65 22	............;;."dir/subdir/file"
10120	20 69 73 20 6d 6f 64 69 66 69 65 64 2c 20 74 68 65 6e 20 22 64 69 72 2f 2a 22 20 64 6f 65 73 20	.is.modified,.then."dir/*".does.
10140	6e 6f 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6d 61 74 63 68 20 74 68 61 74 20	not...............;;.match.that.
10160	63 68 61 6e 67 65 2e 20 20 55 73 65 20 22 64 69 72 2f 2a 2a 22 20 69 6e 73 74 65 61 64 2c 20 74	change...Use."dir/**".instead,.t
10180	6f 20 6d 61 6b 65 20 74 68 65 6d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6c 6f 6f	o.make.them...............;;.loo
101a0	6b 20 66 6f 72 20 63 68 61 6e 67 65 73 20 74 6f 20 66 69 6c 65 73 20 69 6e 20 22 64 69 72 22 20	k.for.changes.to.files.in."dir".
101c0	61 6e 64 20 61 6c 6c 20 73 75 62 64 69 72 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	and.all.subdirs................(
101e0	77 68 65 6e 20 28 73 74 72 69 6e 67 2d 73 75 66 66 69 78 2d 70 20 22 2f 2a 22 20 67 6c 6f 62 29	when.(string-suffix-p."/*".glob)
10200	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 67 6c 6f 62 20 28 63 6f 6e	.................(setq.glob.(con
10220	63 61 74 20 67 6c 6f 62 20 22 2a 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63	cat.glob."*")))...............(c
10240	6c 2d 65 74 79 70 65 63 61 73 65 20 72 63 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	l-etypecase.rcp.................
10260	28 70 61 63 6b 61 67 65 2d 67 69 74 2d 72 65 63 69 70 65 0a 20 20 20 20 20 20 20 20 20 20 20 20	(package-git-recipe.............
10280	20 20 20 20 20 28 6c 69 73 74 20 28 66 6f 72 6d 61 74 20 22 3a 28 67 6c 6f 62 25 73 29 25 73 22	.....(list.(format.":(glob%s)%s"
102a0	20 28 69 66 20 65 78 63 6c 75 64 65 20 22 2c 65 78 63 6c 75 64 65 22 20 22 22 29 20 67 6c 6f 62	.(if.exclude.",exclude"."").glob
102c0	29 29 29 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 68 67 2d	))).................(package-hg-
102e0	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 69	recipe..................(list.(i
10300	66 20 65 78 63 6c 75 64 65 20 22 2d 2d 65 78 63 6c 75 64 65 22 20 22 2d 2d 69 6e 63 6c 75 64 65	f.exclude."--exclude"."--include
10320	22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61	")........................(conca
10340	74 20 22 67 6c 6f 62 3a 22 20 67 6c 6f 62 29 29 29 29 29 29 0a 20 20 20 20 28 6d 61 70 63 61 6e	t."glob:".glob)))))).....(mapcan
10360	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 20 20 20 28	.(lambda.(entry)...............(
10380	70 63 61 73 65 2d 65 78 68 61 75 73 74 69 76 65 20 65 6e 74 72 79 0a 20 20 20 20 20 20 20 20 20	pcase-exhaustive.entry..........
103a0	20 20 20 20 20 20 20 28 28 61 6e 64 20 67 6c 6f 62 20 28 70 72 65 64 20 73 74 72 69 6e 67 70 29	.......((and.glob.(pred.stringp)
103c0	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 6f 61 72 67 73 20 67 6c 6f 62 29	)..................(toargs.glob)
103e0	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 65 78 63 6c 75	).................((and.`(:exclu
10400	64 65 20 2e 20 2c 67 6c 6f 62 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	de...,globs)....................
10420	20 20 20 28 67 75 61 72 64 20 28 63 6c 2d 65 76 65 72 79 20 23 27 73 74 72 69 6e 67 70 20 67 6c	...(guard.(cl-every.#'stringp.gl
10440	6f 62 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 6e 20	obs)))..................(mapcan.
10460	28 6c 61 6d 62 64 61 20 28 67 29 20 28 74 6f 61 72 67 73 20 67 20 74 29 29 20 67 6c 6f 62 73 29	(lambda.(g).(toargs.g.t)).globs)
10480	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 2c 64 69 72 20 2e	).................((and.`(,dir..
104a0	20 2c 67 6c 6f 62 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28	.,globs).......................(
104c0	67 75 61 72 64 20 28 73 74 72 69 6e 67 70 20 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20	guard.(stringp.dir))............
104e0	20 20 20 20 20 20 20 20 20 20 20 28 67 75 61 72 64 20 28 63 6c 2d 65 76 65 72 79 20 23 27 73 74	...........(guard.(cl-every.#'st
10500	72 69 6e 67 70 20 67 6c 6f 62 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ringp.globs)))..................
10520	64 69 72 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 66 20 45	dir.;.Silence.byte-compiler.of.E
10540	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 20 28 6d	macs.<.28.1...................(m
10560	61 70 63 61 6e 20 23 27 74 6f 61 72 67 73 20 67 6c 6f 62 73 29 29 29 29 0a 20 20 20 20 20 20 20	apcan.#'toargs.globs))))........
10580	20 20 20 20 20 28 6c 65 74 20 28 28 73 70 65 63 20 28 6f 72 20 28 6f 72 65 66 20 72 63 70 20 66	.....(let.((spec.(or.(oref.rcp.f
105a0	69 6c 65 73 29 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	iles).package-build-default-file
105c0	73 2d 73 70 65 63 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 65 71 20	s-spec)))...............(if.(eq.
105e0	28 63 61 72 20 73 70 65 63 29 20 3a 64 65 66 61 75 6c 74 73 29 0a 20 20 20 20 20 20 20 20 20 20	(car.spec).:defaults)...........
10600	20 20 20 20 20 20 20 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	........(append.package-build-de
10620	66 61 75 6c 74 2d 66 69 6c 65 73 2d 73 70 65 63 20 28 63 64 72 20 73 70 65 63 29 29 0a 20 20 20	fault-files-spec.(cdr.spec))....
10640	20 20 20 20 20 20 20 20 20 20 20 20 20 73 70 65 63 29 29 29 29 29 0a 0a 3b 3b 3b 20 43 6f 6d 6d	.............spec)))))..;;;.Comm
10660	61 6e 64 73 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 70 61 63 6b	ands..;;;###autoload.(defun.pack
10680	61 67 65 2d 62 75 69 6c 64 2d 61 72 63 68 69 76 65 20 28 6e 61 6d 65 20 26 6f 70 74 69 6f 6e 61	age-build-archive.(name.&optiona
106a0	6c 20 64 75 6d 70 2d 61 72 63 68 69 76 65 2d 63 6f 6e 74 65 6e 74 73 29 0a 20 20 22 42 75 69 6c	l.dump-archive-contents)..."Buil
106c0	64 20 61 20 70 61 63 6b 61 67 65 20 61 72 63 68 69 76 65 20 66 6f 72 20 74 68 65 20 70 61 63 6b	d.a.package.archive.for.the.pack
106e0	61 67 65 20 6e 61 6d 65 64 20 4e 41 4d 45 2e 0a 49 66 20 44 55 4d 50 2d 41 52 43 48 49 56 45 2d	age.named.NAME..If.DUMP-ARCHIVE-
10700	43 4f 4e 54 45 4e 54 53 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 74 68 65 20 75 70 64 61 74 65 64	CONTENTS.is.non-nil,.the.updated
10720	20 61 72 63 68 69 76 65 20 63 6f 6e 74 65 6e 74 73 0a 61 72 65 20 73 75 62 73 65 71 75 65 6e 74	.archive.contents.are.subsequent
10740	6c 79 20 64 75 6d 70 65 64 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 28 6c 69 73 74	ly.dumped."...(interactive.(list
10760	20 28 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 72 65 61 64 2d 6e 61 6d 65 29 20 74 29 29 0a	.(package-recipe-read-name).t)).
10780	20 20 28 75 6e 6c 65 73 73 20 28 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 70 61 63 6b 61 67 65	..(unless.(file-exists-p.package
107a0	2d 62 75 69 6c 64 2d 61 72 63 68 69 76 65 2d 64 69 72 29 0a 20 20 20 20 28 70 61 63 6b 61 67 65	-build-archive-dir).....(package
107c0	2d 62 75 69 6c 64 2d 2d 6d 65 73 73 61 67 65 20 22 43 72 65 61 74 69 6e 67 20 64 69 72 65 63 74	-build--message."Creating.direct
107e0	6f 72 79 20 25 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	ory.%s".package-build-archive-di
10800	72 29 0a 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 62	r).....(make-directory.package-b
10820	75 69 6c 64 2d 61 72 63 68 69 76 65 2d 64 69 72 29 29 0a 20 20 28 6c 65 74 2a 20 28 28 73 74 61	uild-archive-dir))...(let*.((sta
10840	72 74 2d 74 69 6d 65 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	rt-time.(current-time)).........
10860	20 28 72 63 70 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	.(rcp.(package-recipe-lookup.nam
10880	65 29 29 0a 20 20 20 20 20 20 20 20 20 28 75 72 6c 20 28 70 61 63 6b 61 67 65 2d 72 65 63 69 70	e))..........(url.(package-recip
108a0	65 2d 2d 75 70 73 74 72 65 61 6d 2d 75 72 6c 20 72 63 70 29 29 0a 20 20 20 20 20 20 20 20 20 28	e--upstream-url.rcp))..........(
108c0	72 65 70 6f 20 28 6f 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	repo.(oref.rcp.repo))..........(
108e0	66 65 74 63 68 65 72 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	fetcher.(package-recipe--fetcher
10900	20 72 63 70 29 29 0a 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	.rcp))..........(version.nil))..
10920	20 20 20 28 63 6f 6e 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	...(cond.((not.noninteractive)..
10940	20 20 20 20 20 20 20 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	..........(message.".....%s.pack
10960	61 67 65 20 25 73 20 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	age.%s.(from.%s)..."............
10980	20 20 20 20 20 20 20 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	.........(if.package-build--inhi
109a0	62 69 74 2d 62 75 69 6c 64 20 22 46 65 74 63 68 69 6e 67 22 20 22 42 75 69 6c 64 69 6e 67 22 29	bit-build."Fetching"."Building")
109c0	0a 20 20 20 20 20 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	.....................name.......
109e0	20 20 20 20 20 20 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	..............(if.repo.(format."
10a00	25 73 3a 25 73 22 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	%s:%s".fetcher.repo).url))).....
10a20	20 20 20 20 20 20 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	......(package-build-verbose....
10a40	20 20 20 20 20 20 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	........(message."Package:.%s".n
10a60	61 6d 65 29 0a 20 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	ame)............(message."Fetche
10a80	72 3a 20 25 73 22 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	r:.%s".fetcher)............(mess
10aa0	61 67 65 20 22 53 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	age."Source:..%s\n".url))).....(
10ac0	66 75 6e 63 61 6c 6c 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 66 65 74 63 68 2d 66 75 6e 63	funcall.package-build-fetch-func
10ae0	74 69 6f 6e 20 72 63 70 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 70 61 63 6b 61 67 65 2d 62 75	tion.rcp).....(unless.package-bu
10b00	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 70 61 63 6b 61 67	ild--inhibit-build.......(packag
10b20	65 2d 62 75 69 6c 64 2d 2d 73 65 6c 65 63 74 2d 76 65 72 73 69 6f 6e 20 72 63 70 29 0a 20 20 20	e-build--select-version.rcp)....
10b40	20 20 20 28 73 65 74 71 20 76 65 72 73 69 6f 6e 20 28 6f 72 65 66 20 72 63 70 20 76 65 72 73 69	...(setq.version.(oref.rcp.versi
10b60	6f 6e 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 76 65 72 73 69 6f 6e 0a 20 20 20 20 20 20 20	on)).......(when.version........
10b80	20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 70 61 63 6b 61 67 65 20 72 63 70 29 0a 20 20	.(package-build--package.rcp)...
10ba0	20 20 20 20 20 20 28 77 68 65 6e 20 64 75 6d 70 2d 61 72 63 68 69 76 65 2d 63 6f 6e 74 65 6e 74	......(when.dump-archive-content
10bc0	73 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 64 75 6d 70 2d	s...........(package-build-dump-
10be0	61 72 63 68 69 76 65 2d 63 6f 6e 74 65 6e 74 73 29 29 29 0a 20 20 20 20 20 20 28 69 66 20 28 6e	archive-contents))).......(if.(n
10c00	6f 74 20 76 65 72 73 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22	ot.version)...........(message."
10c20	20 e2 9c 97 20 43 61 6e 6e 6f 74 20 64 65 74 65 72 6d 69 6e 65 20 76 65 72 73 69 6f 6e 21 22 29	.....Cannot.determine.version!")
10c40	0a 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 20 e2 9c 93 20 53 75 63 63 65 73 73 3a	.........(message.".....Success:
10c60	22 29 0a 20 20 20 20 20 20 20 20 28 70 63 61 73 65 2d 64 6f 6c 69 73 74 20 28 60 28 2c 66 69 6c	").........(pcase-dolist.(`(,fil
10c80	65 20 2e 20 2c 61 74 74 72 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	e...,attrs).....................
10ca0	20 20 20 28 64 69 72 65 63 74 6f 72 79 2d 66 69 6c 65 73 2d 61 6e 64 2d 61 74 74 72 69 62 75 74	...(directory-files-and-attribut
10cc0	65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 61 63 6b 61	es.........................packa
10ce0	67 65 2d 62 75 69 6c 64 2d 61 72 63 68 69 76 65 2d 64 69 72 20 6e 69 6c 0a 20 20 20 20 20 20 20	ge-build-archive-dir.nil........
10d00	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 5c 5c 60 25 73 2d	.................(format."\\`%s-
10d20	5b 30 2d 39 5d 2b 22 20 6e 61 6d 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61	[0-9]+".name)))...........(messa
10d40	67 65 20 22 20 20 25 73 20 20 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ge."..%s..%s"...................
10d60	20 28 66 6f 72 6d 61 74 2d 74 69 6d 65 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20	.(format-time-string............
10d80	20 20 20 20 20 20 20 20 20 22 25 46 54 25 54 25 7a 22 20 28 66 69 6c 65 2d 61 74 74 72 69 62 75	........."%FT%T%z".(file-attribu
10da0	74 65 2d 6d 6f 64 69 66 69 63 61 74 69 6f 6e 2d 74 69 6d 65 20 61 74 74 72 73 29 20 74 29 0a 20	te-modification-time.attrs).t)..
10dc0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 69 6c 65 29 29 29 29 0a 20 20 20 20 28	..................file)))).....(
10de0	6d 65 73 73 61 67 65 20 22 25 73 20 25 73 20 69 6e 20 25 2e 33 66 73 2c 20 66 69 6e 69 73 68 65	message."%s.%s.in.%.3fs,.finishe
10e00	64 20 61 74 20 25 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 76 65 72 73 69 6f	d.at.%s"..............(if.versio
10e20	6e 20 22 42 75 69 6c 74 22 20 22 46 65 74 63 68 65 64 22 29 0a 20 20 20 20 20 20 20 20 20 20 20	n."Built"."Fetched")............
10e40	20 20 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6c 6f 61 74 2d 74 69 6d 65 20	..name..............(float-time.
10e60	28 74 69 6d 65 2d 73 69 6e 63 65 20 73 74 61 72 74 2d 74 69 6d 65 29 29 0a 20 20 20 20 20 20 20	(time-since.start-time))........
10e80	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 20 22 25 46 54 25 54	......(format-time-string."%FT%T
10ea0	25 7a 22 20 6e 69 6c 20 74 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64	%z".nil.t))))..;;;###autoload.(d
10ec0	65 66 75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 70 61 63 6b 61 67 65 20 28 72 63 70	efun.package-build--package.(rcp
10ee0	29 0a 20 20 22 42 75 69 6c 64 20 74 68 65 20 70 61 63 6b 61 67 65 20 76 65 72 73 69 6f 6e 20 73	)..."Build.the.package.version.s
10f00	70 65 63 69 66 69 65 64 20 62 79 20 52 43 50 2e 0a 52 65 74 75 72 6e 20 74 68 65 20 61 72 63 68	pecified.by.RCP..Return.the.arch
10f20	69 76 65 20 65 6e 74 72 79 20 66 6f 72 20 74 68 65 20 70 61 63 6b 61 67 65 20 61 6e 64 20 73 74	ive.entry.for.the.package.and.st
10f40	6f 72 65 20 74 68 65 20 70 61 63 6b 61 67 65 0a 69 6e 20 60 70 61 63 6b 61 67 65 2d 62 75 69 6c	ore.the.package.in.`package-buil
10f60	64 2d 61 72 63 68 69 76 65 2d 64 69 72 27 2e 22 0a 20 20 28 6c 65 74 20 28 28 64 65 66 61 75 6c	d-archive-dir'."...(let.((defaul
10f80	74 2d 64 69 72 65 63 74 6f 72 79 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 77 6f 72 6b	t-directory.(package-build--work
10fa0	69 6e 67 2d 74 72 65 65 20 72 63 70 29 29 29 0a 20 20 20 20 28 75 6e 77 69 6e 64 2d 70 72 6f 74	ing-tree.rcp))).....(unwind-prot
10fc0	65 63 74 0a 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 28 66 75	ect.........(progn...........(fu
10fe0	6e 63 61 6c 6c 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 63 68 65 63 6b 6f 75 74 2d 66 75 6e	ncall.package-build-checkout-fun
11000	63 74 69 6f 6e 20 72 63 70 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 66 69 6c 65	ction.rcp)...........(let.((file
11020	73 20 28 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	s.(package-build-expand-files-sp
11040	65 63 20 72 63 70 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 0a 20 20	ec.rcp.t))).............(cond...
11060	20 20 20 20 20 20 20 20 20 20 20 28 28 3d 20 28 6c 65 6e 67 74 68 20 66 69 6c 65 73 29 20 30 29	...........((=.(length.files).0)
11080	0a 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 65	...............(package-build--e
110a0	72 72 6f 72 20 72 63 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 55 6e 61 62 6c 65	rror.rcp................."Unable
110c0	20 74 6f 20 66 69 6e 64 20 66 69 6c 65 73 20 6d 61 74 63 68 69 6e 67 20 72 65 63 69 70 65 20 70	.to.find.files.matching.recipe.p
110e0	61 74 74 65 72 6e 73 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65	atterns"))..............(package
11100	2d 62 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	-build-build-function...........
11120	20 20 20 20 28 66 75 6e 63 61 6c 6c 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 62 75 69 6c 64	....(funcall.package-build-build
11140	2d 66 75 6e 63 74 69 6f 6e 20 72 63 70 20 66 69 6c 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 20	-function.rcp.files))...........
11160	20 20 20 28 28 3d 20 28 6c 65 6e 67 74 68 20 66 69 6c 65 73 29 20 31 29 0a 20 20 20 20 20 20 20	...((=.(length.files).1)........
11180	20 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 2d 73 69 6e	.......(package-build--build-sin
111a0	67 6c 65 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 0a 20 20 20	gle-file-package.rcp.files))....
111c0	20 20 20 20 20 20 20 20 20 20 28 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b	..........(t...............(pack
111e0	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 2d 70 61 63 6b	age-build--build-multi-file-pack
11200	61 67 65 20 72 63 70 20 66 69 6c 65 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68	age.rcp.files))).............(wh
11220	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 20 20	en.package-build-badge-data.....
11240	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-
11260	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 20 20 28 6f 72 65 66	badge-image................(oref
11280	20 72 63 70 20 6e 61 6d 65 29 20 28 6f 72 65 66 20 72 63 70 20 76 65 72 73 69 6f 6e 29 20 70 61	.rcp.name).(oref.rcp.version).pa
112a0	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 0a 20 20 20 20	ckage-build-archive-dir)))).....
112c0	20 20 28 66 75 6e 63 61 6c 6c 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 63 6c 65 61 6e 75 70	..(funcall.package-build-cleanup
112e0	2d 66 75 6e 63 74 69 6f 6e 20 72 63 70 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67	-function.rcp))))..(defun.packag
11300	65 2d 62 75 69 6c 64 2d 2d 62 75 69 6c 64 2d 73 69 6e 67 6c 65 2d 66 69 6c 65 2d 70 61 63 6b 61	e-build--build-single-file-packa
11320	67 65 20 28 72 63 70 20 66 69 6c 65 73 29 0a 20 20 28 6c 65 74 2a 20 28 28 6e 61 6d 65 20 28 6f	ge.(rcp.files)...(let*.((name.(o
11340	72 65 66 20 72 63 70 20 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 76 65 72 73 69 6f 6e	ref.rcp.name))..........(version
11360	20 28 6f 72 65 66 20 72 63 70 20 76 65 72 73 69 6f 6e 29 29 0a 20 20 20 20 20 20 20 20 20 28 63	.(oref.rcp.version))..........(c
11380	6f 6d 6d 69 74 20 28 6f 72 65 66 20 72 63 70 20 63 6f 6d 6d 69 74 29 29 0a 20 20 20 20 20 20 20	ommit.(oref.rcp.commit))........
113a0	20 20 28 66 69 6c 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 28	..(file.(caar.files))..........(
113c0	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)).
113e0	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 69 6c 65 2d 6e 61	.........(target.(expand-file-na
11400	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 6e 20 22 2e 65 6c	me.(concat.name."-".version.".el
11420	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	")..............................
11440	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 29	......package-build-archive-dir)
11460	29 0a 20 20 20 20 20 20 20 20 20 28 64 65 73 63 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d	)..........(desc.(package-build-
11480	2d 64 65 73 63 2d 66 72 6f 6d 2d 6c 69 62 72 61 72 79 20 72 63 70 20 66 69 6c 65 73 29 29 29 0a	-desc-from-library.rcp.files))).
114a0	20 20 20 20 28 75 6e 6c 65 73 73 20 28 6d 65 6d 62 65 72 20 28 64 6f 77 6e 63 61 73 65 20 28 66	....(unless.(member.(downcase.(f
114c0	69 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 29 0a 20 20 20	ile-name-nondirectory.file))....
114e0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 28 64 6f 77 6e 63 61 73 65	.................(list.(downcase
11500	20 28 63 6f 6e 63 61 74 20 6e 61 6d 65 20 22 2e 65 6c 22 29 29 0a 20 20 20 20 20 20 20 20 20 20	.(concat.name.".el"))...........
11520	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 6f 77 6e 63 61 73 65 20 28 63 6f 6e 63 61	................(downcase.(conca
11540	74 20 6e 61 6d 65 20 22 2e 65 6c 2e 69 6e 22 29 29 29 29 0a 20 20 20 20 20 20 28 70 61 63 6b 61	t.name.".el.in")))).......(packa
11560	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
11580	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
115a0	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 63 6f	age.name.%s".file.name)).....(co
115c0	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 28 6c 65	py-file.source.target.t).....(le
115e0	74 20 28 28 65 6e 61 62 6c 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 73 20 6e 69 6c 29 0a	t.((enable-local-variables.nil).
11600	20 20 20 20 20 20 20 20 20 20 28 6d 61 6b 65 2d 62 61 63 6b 75 70 2d 66 69 6c 65 73 20 6e 69 6c	..........(make-backup-files.nil
11620	29 0a 20 20 20 20 20 20 20 20 20 20 28 62 65 66 6f 72 65 2d 73 61 76 65 2d 68 6f 6f 6b 20 6e 69	)...........(before-save-hook.ni
11640	6c 29 29 0a 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 28	l)).......(with-current-buffer.(
11660	66 69 6e 64 2d 66 69 6c 65 20 74 61 72 67 65 74 29 0a 20 20 20 20 20 20 20 20 28 70 61 63 6b 61	find-file.target).........(packa
11680	67 65 2d 62 75 69 6c 64 2d 2d 75 70 64 61 74 65 2d 6f 72 2d 69 6e 73 65 72 74 2d 68 65 61 64 65	ge-build--update-or-insert-heade
116a0	72 20 22 50 61 63 6b 61 67 65 2d 43 6f 6d 6d 69 74 22 20 63 6f 6d 6d 69 74 29 0a 20 20 20 20 20	r."Package-Commit".commit)......
116c0	20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 2d 75 70 64 61 74 65 2d 6f 72 2d 69 6e 73	...(package-build--update-or-ins
116e0	65 72 74 2d 68 65 61 64 65 72 20 22 50 61 63 6b 61 67 65 2d 56 65 72 73 69 6f 6e 22 20 76 65 72	ert-header."Package-Version".ver
11700	73 69 6f 6e 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 6e	sion).........(package-build--en
11720	73 75 72 65 2d 65 6e 64 73 2d 68 65 72 65 2d 6c 69 6e 65 20 73 6f 75 72 63 65 29 0a 20 20 20 20	sure-ends-here-line.source).....
11740	20 20 20 20 28 77 72 69 74 65 2d 66 69 6c 65 20 74 61 72 67 65 74 20 6e 69 6c 29 0a 20 20 20 20	....(write-file.target.nil).....
11760	20 20 20 20 28 6b 69 6c 6c 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20 20 28 70 61 63 6b 61 67 65	....(kill-buffer))).....(package
11780	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 20 66 69 6c	-build--write-pkg-readme.rcp.fil
117a0	65 73 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	es).....(package-build--write-ar
117c0	63 68 69 76 65 2d 65 6e 74 72 79 20 64 65 73 63 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b	chive-entry.desc)))..(defun.pack
117e0	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 2d 70 61 63 6b	age-build--build-multi-file-pack
11800	61 67 65 20 28 72 63 70 20 66 69 6c 65 73 29 0a 20 20 28 6c 65 74 2a 20 28 28 6e 61 6d 65 20 28	age.(rcp.files)...(let*.((name.(
11820	6f 72 65 66 20 72 63 70 20 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 76 65 72 73 69 6f	oref.rcp.name))..........(versio
11840	6e 20 28 6f 72 65 66 20 72 63 70 20 76 65 72 73 69 6f 6e 29 29 0a 20 20 20 20 20 20 20 20 20 28	n.(oref.rcp.version))..........(
11860	74 6d 70 2d 64 69 72 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 61 73 2d 64 69 72 65 63 74 6f 72 79 20	tmp-dir.(file-name-as-directory.
11880	28 6d 61 6b 65 2d 74 65 6d 70 2d 66 69 6c 65 20 6e 61 6d 65 20 74 29 29 29 29 0a 20 20 20 20 28	(make-temp-file.name.t)))).....(
118a0	75 6e 77 69 6e 64 2d 70 72 6f 74 65 63 74 0a 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 74	unwind-protect.........(let*.((t
118c0	61 72 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	arget.(expand-file-name.(concat.
118e0	6e 61 6d 65 20 22 2d 22 20 76 65 72 73 69 6f 6e 29 20 74 6d 70 2d 64 69 72 29 29 0a 20 20 20 20	name."-".version).tmp-dir)).....
11900	20 20 20 20 20 20 20 20 20 20 20 28 64 65 73 63 20 28 6f 72 20 28 70 61 63 6b 61 67 65 2d 62 75	...........(desc.(or.(package-bu
11920	69 6c 64 2d 2d 64 65 73 63 2d 66 72 6f 6d 2d 70 61 63 6b 61 67 65 20 72 63 70 20 66 69 6c 65 73	ild--desc-from-package.rcp.files
11940	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 70 61 63 6b	)..........................(pack
11960	61 67 65 2d 62 75 69 6c 64 2d 2d 64 65 73 63 2d 66 72 6f 6d 2d 6c 69 62 72 61 72 79 20 72 63 70	age-build--desc-from-library.rcp
11980	20 66 69 6c 65 73 20 27 74 61 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.files.'tar)....................
119a0	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
119c0	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 22 25 73 5b	............................"%s[
119e0	2d 70 6b 67 5d 2e 65 6c 20 6d 61 74 63 68 69 6e 67 20 70 61 63 6b 61 67 65 20 6e 61 6d 65 20 69	-pkg].el.matching.package.name.i
11a00	73 20 6d 69 73 73 69 6e 67 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	s.missing"......................
11a20	20 20 20 20 20 20 6e 61 6d 65 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67	......name))))...........(packag
11a40	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 66 69 6c 65	e-build--copy-package-files.file
11a60	73 20 74 61 72 67 65 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 62 75 69	s.target)...........(package-bui
11a80	6c 64 2d 2d 77 72 69 74 65 2d 70 6b 67 2d 66 69 6c 65 20 64 65 73 63 20 74 61 72 67 65 74 29 0a	ld--write-pkg-file.desc.target).
11aa0	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 67 65 6e 65 72 61	..........(package-build--genera
11ac0	74 65 2d 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	te-info-files.rcp.files.target).
11ae0	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 72 65 61 74 65	..........(package-build--create
11b00	2d 74 61 72 20 72 63 70 20 74 6d 70 2d 64 69 72 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 61 63	-tar.rcp.tmp-dir)...........(pac
11b20	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
11b40	20 66 69 6c 65 73 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	.files)...........(package-build
11b60	2d 2d 77 72 69 74 65 2d 61 72 63 68 69 76 65 2d 65 6e 74 72 79 20 64 65 73 63 29 29 0a 20 20 20	--write-archive-entry.desc))....
11b80	20 20 20 28 64 65 6c 65 74 65 2d 64 69 72 65 63 74 6f 72 79 20 74 6d 70 2d 64 69 72 20 74 20 6e	...(delete-directory.tmp-dir.t.n
11ba0	69 6c 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 63 6c	il))))..(defun.package-build--cl
11bc0	65 61 6e 75 70 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	eanup.(rcp)...(cond.((cl-typep.r
11be0	63 70 20 27 70 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	cp.'package-git-recipe).........
11c00	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
11c20	70 20 22 67 69 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	p."git"."clean"."-f"."-d"."-x"))
11c40	0a 20 20 20 20 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	.........((cl-typep.rcp.'package
11c60	2d 68 67 2d 72 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	-hg-recipe)..........;;.Mercuria
11c80	6c 27 73 20 69 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	l's.interface.is.so.much.better.
11ca0	74 68 61 6e 20 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	than.Git's,.they.said...........
11cc0	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 20 20 28 70 72	(with-temp-buffer............(pr
11ce0	6f 63 65 73 73 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	ocess-file."hg".nil.t.nil."statu
11d00	73 22 20 22 2d 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	s"."--no-status"."--unknown"."-0
11d20	22 29 0a 20 20 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	")............(mapc.#'delete-fil
11d40	65 20 28 73 70 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	e.(split-string.(buffer-string).
11d60	22 5c 30 22 20 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	"\0".t)))..........(with-temp-bu
11d80	66 66 65 72 0a 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	ffer............(process-file."h
11da0	67 22 20 6e 69 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	g".nil.t.nil."status"."--no-stat
11dc0	75 73 22 20 22 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	us"."--ignored"."-0")...........
11de0	20 28 6d 61 70 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	.(mapc.#'delete-file.(split-stri
11e00	6e 67 20 28 62 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	ng.(buffer-string)."\0".t)))....
11e20	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
11e40	73 73 20 72 63 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	ss.rcp."hg"."purge"))))..;;;###a
11e60	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 61 6c 6c	utoload.(defun.package-build-all
11e80	20 28 29 0a 20 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	.()..."Build.a.package.for.each.
11ea0	6f 66 20 74 68 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	of.the.available.recipes..If.`pa
11ec0	63 6b 61 67 65 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	ckage-build-predicate-function'.
11ee0	69 73 20 6e 6f 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	is.non-nil,.then.only.packages.f
11f00	6f 72 20 77 68 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	or.which.that.returns.non-nil.ar
11f20	65 20 62 75 69 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	e.build."...(interactive)...(let
11f40	2a 20 28 28 73 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	*.((start.(current-time)).......
11f60	20 20 20 28 72 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	...(recipes.(package-recipe-reci
11f80	70 65 73 29 29 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	pes))..........(total.(length.re
11fa0	63 69 70 65 73 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	cipes))..........(success.0)....
11fc0	20 20 20 20 20 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	......skipped.invalid.failed)...
11fe0	20 20 28 64 6f 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	..(dolist.(name.recipes).......(
12000	6c 65 74 20 28 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	let.((rcp.(with-demoted-errors."
12020	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 20 20 20	Recipe.error:.%S"...............
12040	20 20 20 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	.....(package-recipe-lookup.name
12060	29 29 29 29 0a 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	)))).........(cond.((not.rcp)...
12080	20 20 20 20 20 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	.............(push.name.invalid)
120a0	29 0a 20 20 20 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	)...............((and.package-bu
120c0	69 6c 64 2d 70 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	ild-predicate-function..........
120e0	20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 66 75 6e 63 61 6c 6c 20 70 61 63 6b 61 67 65	...........(not.(funcall.package
12100	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 20 72 63 70 29 29 29	-build-predicate-function.rcp)))
12120	0a 20 20 20 20 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	................(push.name.skipp
12140	65 64 29 29 0a 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	ed))...............((with-demote
12160	64 2d 65 72 72 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	d-errors."Build.error:.%S"......
12180	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 68 69	............(package-build-archi
121a0	76 65 20 6e 61 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	ve.name).t)................(cl-i
121c0	6e 63 66 20 73 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	ncf.success))...............((pu
121e0	73 68 20 6e 61 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	sh.name.failed))))).....(let.((d
12200	75 72 61 74 69 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	uration.(/.(float-time.(time-sub
12220	74 72 61 63 74 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	tract.(current-time).start)).60)
12240	29 29 0a 20 20 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	)).......(if.(not.(or.skipped.in
12260	76 61 6c 69 64 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	valid.failed))...........(messag
12280	65 20 22 53 75 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	e."Successfully.built.all.%s.pac
122a0	6b 61 67 65 73 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	kages.(%.0fm)".total.duration)..
122c0	20 20 20 20 20 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	.......(message."Successfully.bu
122e0	69 6c 74 20 25 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	ilt.%i.of.%s.packages.(%.0fm)"..
12300	20 20 20 20 20 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	................success.total.du
12320	72 61 74 69 6f 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	ration).........(when.skipped...
12340	20 20 20 20 20 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	........(message."Skipped.%i.pac
12360	6b 61 67 65 73 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	kages:\n%s"....................(
12380	6c 65 6e 67 74 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	length.skipped).................
123a0	20 20 20 28 6d 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	...(mapconcat.(lambda.(n).(conca
123c0	74 20 22 20 20 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	t."..".n)).(nreverse.skipped)."\
123e0	6e 22 29 29 29 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	n"))).........(when.invalid.....
12400	20 20 20 20 20 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	......(message."Did.not.built.pa
12420	63 6b 61 67 65 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	ckages.for.%i.invalid.recipes:\n
12440	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 69	%s"....................(length.i
12460	6e 76 61 6c 69 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	nvalid)....................(mapc
12480	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 22 20 6e	oncat.(lambda.(n).(concat."..".n
124a0	29 29 20 28 6e 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	)).(nreverse.invalid)."\n")))...
124c0	20 20 20 20 20 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	......(when.failed...........(me
124e0	73 73 61 67 65 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	ssage."Building.%i.packages.fail
12500	65 64 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	ed:\n%s"....................(len
12520	67 74 68 20 66 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	gth.failed)....................(
12540	6d 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	mapconcat.(lambda.(n).(concat.".
12560	20 22 20 6e 29 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	.".n)).(nreverse.failed)."\n")))
12580	29 29 29 0a 20 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	)))...(package-build-dump-archiv
125a0	65 2d 63 6f 6e 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	e-contents))..(defun.package-bui
125c0	6c 64 2d 63 6c 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	ld-cleanup.()..."Remove.previous
125e0	6c 79 20 62 75 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	ly.built.packages.that.no.longer
12600	20 68 61 76 65 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	.have.recipes."...(interactive).
12620	20 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	..(package-build-dump-archive-co
12640	6e 74 65 6e 74 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	ntents))..;;;.Archive..(defun.pa
12660	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 20 28 29 0a 20 20 22	ckage-build-archive-alist.()..."
12680	52 65 74 75 72 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	Return.the.archive.contents,.wit
126a0	68 6f 75 74 20 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	hout.updating.it.first."...(let.
126c0	28 28 66 69 6c 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	((file.(expand-file-name."archiv
126e0	65 2d 63 6f 6e 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	e-contents".package-build-archiv
12700	65 2d 64 69 72 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	e-dir))).....(and.(file-exists-p
12720	20 66 69 6c 65 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	.file)..........(with-temp-buffe
12740	72 0a 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	r............(insert-file-conten
12760	74 73 20 66 69 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	ts.file)............(cdr.(read.(
12780	63 75 72 72 65 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	current-buffer)))))))..(defun.pa
127a0	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
127c0	73 20 28 26 6f 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	s.(&optional.file.pretty-print).
127e0	20 20 22 55 70 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	.."Update.and.return.the.archive
12800	20 63 6f 6e 74 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	.contents...Update.files.\"archi
12820	76 65 2d 63 6f 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	ve-contents\".and.\"elpa-package
12840	73 2e 65 6c 64 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	s.eld\".in.`package-build-archiv
12860	65 2d 64 69 72 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	e-dir'...If.optional.FILE.is.non
12880	2d 6e 69 6c 2c 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	-nil,.use.that.to.store.the.arch
128a0	69 76 65 20 63 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	ive.contents.and.place.the.secon
128c0	64 0a 66 69 6c 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	d.file.next.to.it...If.optional.
128e0	50 52 45 54 54 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	PRETTY-PRINT.is.non-nil,.then.pr
12900	65 74 74 79 2d 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	etty-print.\"archive-contents\".
12920	69 6e 73 74 65 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	instead.of.using.one.line.per.en
12940	74 72 79 2e 0a 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	try..\"elpa-packages.eld\".alway
12960	73 20 75 73 65 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	s.uses.one.line.per.entry."...(l
12980	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 67 65 2d 62	et.((default-directory.package-b
129a0	75 69 6c 64 2d 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	uild-archive-dir).........(entri
129c0	65 73 20 6e 69 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	es.nil).........(vc-pkgs.nil))..
129e0	20 20 20 28 64 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	...(dolist.(file.(sort.(director
12a00	79 2d 66 69 6c 65 73 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 74 20 22 2e 2a 5c	y-files.default-directory.t.".*\
12a20	5c 2e 65 6e 74 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	\.entry\\'")....................
12a40	20 20 20 20 20 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	.....;;.Sort.more.recently.build
12a60	20 70 61 63 6b 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	.packages.first.................
12a80	20 20 20 20 20 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	.........#'file-newer-than-file-
12aa0	70 29 29 0a 20 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	p)).......(let*.((entry.(with-te
12ac0	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.......................
12ae0	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 20 20 20	(insert-file-contents.file).....
12b00	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 75 72 72 65 6e 74	..................(read.(current
12b20	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 28 73 79 6d 62 6f 6c	-buffer))))..............(symbol
12b40	20 28 63 61 72 20 65 6e 74 72 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 61 6d 65	.(car.entry))..............(name
12b60	20 28 73 79 6d 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	.(symbol-name.symbol))..........
12b80	20 20 20 20 28 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	....(outdated.(assq.symbol.entri
12ba0	65 73 29 29 29 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	es))).........(cond..........((n
12bc0	6f 74 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 69 6c 65 2d 6e	ot.(file-exists-p.(expand-file-n
12be0	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 65 73 2d 64	ame.name.package-build-recipes-d
12c00	69 72 29 29 29 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	ir)))...........;;.Recipe.corres
12c20	70 6f 6e 64 69 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	ponding.to.this.entry.no.longer.
12c40	65 78 69 73 74 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	exists............(package-build
12c60	2d 2d 72 65 6d 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	--remove-archive-files.entry))..
12c80	20 20 20 20 20 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	........(outdated...........;;.P
12ca0	72 65 66 65 72 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	refer.the.more.recently.built.pa
12cc0	63 6b 61 67 65 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	ckage,.which.may.not...........;
12ce0	3b 20 6e 65 63 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	;.necessarily.have.the.highest.v
12d00	65 72 73 69 6f 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	ersion.number,.e.g.,.if.........
12d20	20 20 3b 3b 20 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	..;;.commit.histories.were.chang
12d40	65 64 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	ed............(package-build--re
12d60	6d 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	move-archive-files.entry))......
12d80	20 20 20 20 28 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	....(t...........(push.entry.ent
12da0	72 69 65 73 29 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	ries)...........;;.[Non]GNU.ELPA
12dc0	20 72 65 63 69 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	.recipes.are.not.compatible.with
12de0	20 4d 65 6c 70 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	.Melpa.recipes............;;.See
12e00	20 61 72 6f 75 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	.around.occurrences.of."pkg-spec
12e20	22 20 69 6e 20 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	".in."package-vc.el";...........
12e40	3b 3b 20 73 65 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	;;.section."Specifications.(elpa
12e60	2d 70 61 63 6b 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	-packages)".in."README".of.the..
12e80	20 20 20 20 20 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	.........;;."elpa-admin".branch.
12ea0	69 6e 20 22 65 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	in."emacs/elpa.git".repository;.
12ec0	61 6e 64 20 61 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	and.also...........;;.`elpaa--su
12ee0	70 70 6f 72 74 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	pported-keywords'.and.`elpaa--pu
12f00	62 6c 69 73 68 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	blish-package-spec'............(
12f20	61 6e 64 2d 6c 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	and-let*.((recipe.(with-demoted-
12f40	65 72 72 6f 72 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	errors."Recipe.error:.%S".......
12f60	20 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 61 63 6b 61 67	.........................(packag
12f80	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 20 20 20 20 20 20 20	e-recipe-lookup.name))))........
12fa0	20 20 20 20 20 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	.....(push.`(,symbol............
12fc0	20 20 20 20 20 20 20 20 20 3a 75 72 6c 20 2c 28 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 2d	.........:url.,(package-recipe--
12fe0	75 70 73 74 72 65 61 6d 2d 75 72 6c 20 72 65 63 69 70 65 29 0a 20 20 20 20 20 20 20 20 20 20 20	upstream-url.recipe)............
13000	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 20 72 65 63 69 70 65	.........,@(and.(cl-typep.recipe
13020	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 20 20 20 20 20 20 20	.'package-hg-recipe)............
13040	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 2d 62 61 63 6b 65 6e	................(list.:vc-backen
13060	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 20 20 20 2c 40 28 61	d.'Hg)).....................,@(a
13080	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 63 69 70 65 20 62 72	nd-let*.((branch.(oref.recipe.br
130a0	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 20 20 20 20 20 20 20	anch))).........................
130c0	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 20 20 20 20 20 20 20	(list.:branch.branch))).........
130e0	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 20 20 20 28 73 65 74	..........vc-pkgs)))))).....(set
13100	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 73 20 23 27 73 74 72	q.entries.(cl-sort.entries.#'str
13120	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
13140	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 6c 65 2d 6e 61 6d 65	-file.(or.file.(expand-file-name
13160	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 20 20 20 28 6c 65 74	."archive-contents")).......(let
13180	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 20 20 20 20 20 20	.((print-level.nil).............
131a0	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 20 20 28 69 66 20	(print-length.nil)).........(if.
131c0	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 28 70 70 20 28 63 6f	pretty-print.............(pp.(co
131e0	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 66 66 65 72 29 29 0a	ns.1.entries).(current-buffer)).
13200	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 20 20 20 20 20 20 20	..........(insert."(1").........
13220	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 0a 20 20 20 20 20 20	..(dolist.(entry.entries).......
13240	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 20 20 20 28 69 6e 73	......(newline).............(ins
13260	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 6e 31 20 65 6e 74 72	ert.".").............(prin1.entr
13280	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 20 20 20 20 20 28	y.(current-buffer)))...........(
132a0	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 71 20 76 63 2d 70 6b	insert.")\n")))).....(setq.vc-pk
132c0	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 69 6e 67 3c 20 3a 6b	gs.(cl-sort.vc-pkgs.#'string<.:k
132e0	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 2d 66 69 6c 65 20 28	ey.#'car)).....(with-temp-file.(
13300	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 63 6b 61 67 65 73 2e	expand-file-name."elpa-packages.
13320	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 20 20 20 20 20 20 20	eld"............................
13340	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 65 2d 6e 61 6d 65 2d	...........(and.file.(file-name-
13360	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 20 20 28 6c 65 74 20	nondirectory.file))).......(let.
13380	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 20 20 20 20 20 20 28	((print-level.nil).............(
133a0	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 20 20 28 69 6e 73 65	print-length.nil)).........(inse
133c0	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 63 61 72 20 76 63 2d	rt."((").........(prin1.(car.vc-
133e0	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 20 20 20 20 20 20 20	pkgs).(current-buffer)).........
13400	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 67 73 29 29 0a 20 20	(dolist.(entry.(cdr.vc-pkgs))...
13420	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 20 28 69 6e 73	........(newline)...........(ins
13440	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 31 20 65 6e 74 72 79	ert."..")...........(prin1.entry
13460	20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20 20 20 20 20 20 28 69 6e 73	.(current-buffer))).........(ins
13480	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 75 6c 74 2d 76 63 20	ert.")\n.:version.1.:default-vc.
134a0	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 0a 28 64 65 66 75 6e	Git)\n"))).....entries))..(defun
134c0	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 63 68 69 76 65 2d 66	.package-build--remove-archive-f
134e0	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 65 6d 6f 76 65 20 74	iles.(archive-entry)..."Remove.t
13500	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 20 66 6f 72 20 41 52	he.entry.and.archive.file.for.AR
13520	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 62 75 69 6c 64 2d 2d	CHIVE-ENTRY."...(package-build--
13540	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 3a 20 25 73 2d 25 73	message."Removing.archive:.%s-%s
13560	22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 72	"...........................(car
13580	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 20 20 20	.archive-entry).................
135a0	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 69 6e 20	..........(package-version-join.
135c0	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 20 30 29 29 29 0a 20	(aref.(cdr.archive-entry).0)))..
135e0	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 6c 64 2d 2d 61 72 74	.(let.((file.(package-build--art
13600	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 29 29 0a 20 20 20 20	ifact-file.archive-entry))).....
13620	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 20 20 20	(when.(file-exists-p.file)......
13640	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 6c 65 74 20 28 28 66	.(delete-file.file)))...(let.((f
13660	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 76 65 2d 65 6e 74 72	ile.(package-build--archive-entr
13680	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 20 20 20 28 77 68 65	y-file.archive-entry))).....(whe
136a0	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 20 20 20 20 28 64 65	n.(file-exists-p.file).......(de
136c0	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 6e 20 70 61 63 6b 61	lete-file.file))))..(defun.packa
136e0	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 61 72 63 68 69 76 65	ge-build--artifact-file.(archive
13700	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 69 66 61 63 74 20 66	-entry)..."Return.the.artifact.f
13720	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 66 69 65 64 20 62 79	ile.for.the.package.specified.by
13740	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 69 74 68 65 72 20 61	.ARCHIVE-ENTRY..This.is.either.a
13760	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 2e 22 0a 20 20 28 70	.tarball.or.an.Elisp.file."...(p
13780	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 63	case-let*.((`(,name...,desc).arc
137a0	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 73	hive-entry)................(vers
137c0	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 20	ion.(package-version-join.(aref.
137e0	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 28 66 6c 61 76 6f 75	desc.0)))................(flavou
13800	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 70 61 6e 64 2d 66 69	r.(aref.desc.3))).....(expand-fi
13820	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 25 73 2e 25 73 22 20	le-name......(format."%s-%s.%s".
13840	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 6f 75 72 20 27 73 69	name.version.(if.(eq.flavour.'si
13860	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 61 63 6b 61 67 65 2d	ngle)."el"."tar"))......package-
13880	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 66 75 6e 20 70 61 63	build-archive-dir)))..(defun.pac
138a0	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 2d 66 69 6c 65 20 28	kage-build--archive-entry-file.(
138c0	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 66 69 6c	archive-entry)..."Return.the.fil
138e0	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 73 68 6f 75 6c 64 20	e.in.which.ARCHIVE-ENTRY.should.
13900	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 63 6f 6e 74 61 69 6e	be.stored..ARCHIVE-ENTRY.contain
13920	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 63 69 66 69 63 20 76	s.information.about.a.specific.v
13940	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 70 63 61 73 65 2d 6c	ersion.of.a.package."...(pcase-l
13960	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 63 68 69 76 65 2d 65	et*.((`(,name...,desc).archive-e
13980	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 73 69 6f 6e 20 28 70	ntry)................(version.(p
139a0	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 20 64 65 73 63 20 30	ackage-version-join.(aref.desc.0
139c0	29 29 29 29 0a 20 20 20 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 0a 20 20 20 20 20	)))).....(expand-file-name......
139e0	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 72 73 69	(format."%s-%s.entry".name.versi
13a00	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 63 68 69 76 65 2d 64	on)......package-build-archive-d
13a20	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 28 64 65 66 75 6e 20	ir)))..;;;.Json.Exports..(defun.
13a40	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 74 2d 61 73 2d 6a 73	package-build-recipe-alist-as-js
13a60	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 69 70 65 20 6c 69 73	on.(file)..."Dump.the.recipe.lis
13a80	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 74 65 72 61 63 74 69	t.to.FILE.as.json."...(interacti
13aa0	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 29 0a 20 20 28 77 69	ve."FDump.json.to.file:.")...(wi
13ac0	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 73 65 72 74 0a 20 20	th-temp-file.file.....(insert...
13ae0	20 20 20 28 6a 73 6f 6e 2d 65 6e 63 6f 64 65 0a 20 20 20 20 20 20 28 63 6c 2d 6d 61 70 63 61 6e	...(json-encode.......(cl-mapcan
13b00	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 20 20 20 20	........(lambda.(name)..........
13b20	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 20 65 72 72	(with-demoted-errors."Recipe.err
13b40	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 6b 61 67 65	or:.%S"............(and.(package
13b60	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 20 20 20 20	-recipe-lookup.name)............
13b80	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..........
13ba0	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 74 73 0a 20	.........(insert-file-contents..
13bc0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e	..................(expand-file-n
13be0	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 65 73 2d 64	ame.name.package-build-recipes-d
13c00	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 28 28 65 78	ir))...................(let.((ex
13c20	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 20 20 20 20	p.(read.(current-buffer)))).....
13c40	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 2d 6d 65 6d	................(when.(plist-mem
13c60	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 20 20 20 20	ber.(cdr.exp).:files)...........
13c80	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 65 78 70 29	............(plist-put.(cdr.exp)
13ca0	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 20 20 20 20	.:files.........................
13cc0	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 2d 67 65 74	.........(format."%S".(plist-get
13ce0	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 20 20 20 20	.(cdr.exp).:files))))...........
13d00	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 20 20 20 20	..........(list.exp)))))).......
13d20	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 29 29 0a 0a	.(package-recipe-recipes))))))..
13d40	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 66 6f 2d 66	(defun.package-build--pkg-info-f
13d60	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 46 4f 20 73	or-json.(info)..."Convert.INFO.s
13d80	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 6f 20 4a 53	o.that.it.can.be.serialize.to.JS
13da0	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 28 70 63 61	ON.in.the.desired.shape."...(pca
13dc0	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 2c 74 79 70	se-let.((`(,ver.,deps.,desc.,typ
13de0	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 69 6c 29 29	e...(,props)).(append.info.nil))
13e00	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 20 20 20 3a	).....(list.:ver.ver...........:
13e20	64 65 70 73 20 28 63 6c 2d 6d 61 70 63 61 6e 20 28 6c 61 6d 62 64 61 20 28 64 65 70 29 0a 20 20	deps.(cl-mapcan.(lambda.(dep)...
13e40	20 20 20 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	...........................(list
13e60	20 28 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	.(intern.(format.":%s".(car.dep)
13e80	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	))..............................
13ea0	20 20 20 20 20 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	......(cadr.dep)))..............
13ec0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 65 70 73 29 0a 20 20 20 20 20 20 20 20 20 20 3a 64	..............deps)...........:d
13ee0	65 73 63 20 64 65 73 63 0a 20 20 20 20 20 20 20 20 20 20 3a 74 79 70 65 20 74 79 70 65 0a 20 20	esc.desc...........:type.type...
13f00	20 20 20 20 20 20 20 20 3a 70 72 6f 70 73 20 70 72 6f 70 73 29 29 29 0a 0a 28 64 65 66 75 6e 20	........:props.props)))..(defun.
13f20	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 74 2d 66 6f 72	package-build--archive-alist-for
13f40	2d 6a 73 6f 6e 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 61 72 63 68 69 76 65 20 61	-json.()..."Return.the.archive.a
13f60	6c 69 73 74 20 69 6e 20 61 20 66 6f 72 6d 20 73 75 69 74 61 62 6c 65 20 66 6f 72 20 4a 53 4f 4e	list.in.a.form.suitable.for.JSON
13f80	20 65 6e 63 6f 64 69 6e 67 2e 22 0a 20 20 28 63 6c 2d 66 6c 65 74 20 28 28 66 6f 72 6d 61 74 2d	.encoding."...(cl-flet.((format-
13fa0	70 65 72 73 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 65 72 73 6f 6e 29 0a 20 20 20	person..............(person)....
13fc0	20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 6e 61 6d 65 20 28 63 61 72 20 70 65 72 73 6f	..........(let.((name.(car.perso
13fe0	6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 69 6c 20 28 63 64	n))....................(mail.(cd
14000	72 20 70 65 72 73 6f 6e 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28	r.person)))................(if.(
14020	61 6e 64 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	and.name.mail)..................
14040	20 20 28 66 6f 72 6d 61 74 20 22 25 73 20 3c 25 73 3e 22 20 6e 61 6d 65 20 6d 61 69 6c 29 0a 20	..(format."%s.<%s>".name.mail)..
14060	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 6e 61 6d 65 0a 20 20 20 20 20 20 20	................(or.name........
14080	20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 3c 25 73 3e 22 20 6d 61 69	..............(format."<%s>".mai
140a0	6c 29 29 29 29 29 29 0a 20 20 20 20 28 63 6c 2d 6d 61 70 63 61 6e 20 28 6c 61 6d 62 64 61 20 28	l)))))).....(cl-mapcan.(lambda.(
140c0	65 6e 74 72 79 29 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 69	entry)..................(list.(i
140e0	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 65 6e 74 72 79 29 29	ntern.(format.":%s".(car.entry))
14100	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28	)........................(let*.(
14120	28 69 6e 66 6f 20 28 63 64 72 20 65 6e 74 72 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	(info.(cdr.entry))..............
14140	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 65 66 20 69 6e	.................(extra.(aref.in
14160	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 20 20 20 20 20	fo.4))..........................
14180	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 69 6e	.....(maintainer.(assq.:maintain
141a0	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 20 20	er.extra))......................
141c0	20 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	.........(maintainers.(assq.:mai
141e0	6e 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	ntainers.extra))................
14200	20 20 20 20 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	...............(authors.(assq.:a
14220	75 74 68 6f 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	uthors.extra))).................
14240	20 20 20 20 20 20 20 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	.........(when.maintainer.......
14260	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 63 64 72 20 6d 61 69	.....................(setcdr.mai
14280	6e 74 61 69 6e 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ntainer.........................
142a0	20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 2d 70 65 72 73 6f 6e 20 28 63 64 72 20 6d	...........(format-person.(cdr.m
142c0	61 69 6e 74 61 69 6e 65 72 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	aintainer))))...................
142e0	20 20 20 20 20 20 20 28 77 68 65 6e 20 6d 61 69 6e 74 61 69 6e 65 72 73 0a 20 20 20 20 20 20 20	.......(when.maintainers........
14300	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 65 76 65 72	....................(if.(cl-ever
14320	79 20 23 27 6c 69 73 74 70 20 28 63 64 72 20 6d 61 69 6e 74 61 69 6e 65 72 73 29 29 0a 20 20 20	y.#'listp.(cdr.maintainers))....
14340	20 20 20 20 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	............................(set
14360	63 64 72 20 6d 61 69 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	cdr.maintainers.................
14380	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 20 23	.......................(mapcar.#
143a0	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 20 20 20 20 20 20 20	'format-person..................
143c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63	..............................(c
143e0	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 20 20 20 20	dr.maintainers)))...............
14400	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 73	...............(setq.maintainers
14420	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 20	.;.silence.>=.30.compiler.......
14440	20 20 20 20 20 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
14460	73 71 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	sq-delete-all.:maintainers.extra
14480	29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77	))))..........................(w
144a0	68 65 6e 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 20 20 20 20	hen.authors.....................
144c0	20 20 20 20 20 20 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	.......(if.(cl-every.#'listp.(cd
144e0	72 20 61 75 74 68 6f 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	r.authors)).....................
14500	20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 63 64 72 20 61 75 74 68 6f 72 73 0a 20 20 20 20 20	...........(setcdr.authors......
14520	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	................................
14540	20 20 28 6d 61 70 63 61 72 20 23 27 66 6f 72 6d 61 74 2d 70 65 72 73 6f 6e 20 28 63 64 72 20 61	..(mapcar.#'format-person.(cdr.a
14560	75 74 68 6f 72 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	uthors))).......................
14580	20 20 20 20 20 20 20 28 73 65 74 71 20 61 75 74 68 6f 72 73 20 3b 20 73 69 6c 65 6e 63 65 20 3e	.......(setq.authors.;.silence.>
145a0	3d 20 33 30 20 63 6f 6d 70 69 6c 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	=.30.compiler...................
145c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 73 73 71 2d 64 65 6c 65 74 65 2d 61 6c	.................(assq-delete-al
145e0	6c 20 3a 61 75 74 68 6f 72 73 20 65 78 74 72 61 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20	l.:authors.extra))))............
14600	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 70 6b	..............(package-build--pk
14620	67 2d 69 6e 66 6f 2d 66 6f 72 2d 6a 73 6f 6e 20 69 6e 66 6f 29 29 29 29 0a 20 20 20 20 20 20 20	g-info-for-json.info))))........
14640	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 68 69 76 65 2d 61	........(package-build-archive-a
14660	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 75 69 6c 64 2d 61	list))))..(defun.package-build-a
14680	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 29 0a 20 20 22 44	rchive-alist-as-json.(file)..."D
146a0	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 74 20 74 6f 20 46	ump.the.build.packages.list.to.F
146c0	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 2d 66 69 6c 65 20	ILE.as.json."...(with-temp-file.
146e0	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 6f 64 65 20 28 70	file.....(insert.(json-encode.(p
14700	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 74 2d 66 6f 72 2d	ackage-build--archive-alist-for-
14720	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 20 27 70 61 63 6b	json)))))..;;;._..(provide.'pack
14740	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 6c 64 2e 65 6c 20	age-build).;;;.package-build.el.
14760	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.......................
14780	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
147a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
147c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
147e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
14800	70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 32 30 32 34 30 33 30 36 2e 32 32 33 34 2f 70 61 63 6b	package-build-20240306.2234/pack
14820	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..............
14840	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
14860	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
14880	30 30 31 31 33 34 31 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 37 36 30 30 00 20 30 00 00 00	0011341.00000000000.017600..0...
148a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
148c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
148e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
14900	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...................
14920	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...................
14940	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
14960	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
14980	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
149a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
149c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
149e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
14a00	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
14a20	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
14a40	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
14a60	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)
14a80	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
14aa0	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
14ac0	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-
14ae0	32 30 32 34 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	2024.Jonas.Bernoulli.;;.Copyrigh
14b00	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
14b20	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
14b40	72 74 69 73 40 6d 69 6c 6b 62 6f 78 2e 6e 65 74 3e 0a 3b 3b 20 48 6f 6d 65 70 61 67 65 3a 20 68	rtis@milkbox.net>.;;.Homepage:.h
14b60	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 63 6b 61 67 65 2d	ttps://github.com/melpa/package-
14b80	62 75 69 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	build.;;.Keywords:.maint.tools..
14ba0	3b 3b 20 53 50 44 58 2d 4c 69 63 65 6e 73 65 2d 49 64 65 6e 74 69 66 69 65 72 3a 20 47 50 4c 2d	;;.SPDX-License-Identifier:.GPL-
14bc0	33 2e 30 2d 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	3.0-or-later..;;.This.file.is.fr
14be0	65 65 20 73 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	ee.software:.you.can.redistribut
14c00	65 20 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 66 79 0a 3b 3b 20 69 74 20 75 6e 64 65 72 20 74	e.it.and/or.modify.;;.it.under.t
14c20	68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c	he.terms.of.the.GNU.General.Publ
14c40	69 63 20 4c 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	ic.License.as.published.;;.by.th
14c60	65 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 65 69 74 68	e.Free.Software.Foundation,.eith
14c80	65 72 20 76 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	er.version.3.of.the.License,.;;.
14ca0	6f 72 20 28 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	or.(at.your.option).any.later.ve
14cc0	72 73 69 6f 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	rsion..;;.;;.This.file.is.distri
14ce0	62 75 74 65 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	buted.in.the.hope.that.it.will.b
14d00	65 20 75 73 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	e.useful,.;;.but.WITHOUT.ANY.WAR
14d20	52 41 4e 54 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	RANTY;.without.even.the.implied.
14d40	77 61 72 72 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	warranty.of.;;.MERCHANTABILITY.o
14d60	72 20 46 49 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	r.FITNESS.FOR.A.PARTICULAR.PURPO
14d80	53 45 2e 20 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	SE...See.the.;;.GNU.General.Publ
14da0	69 63 20 4c 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	ic.License.for.more.details..;;.
14dc0	3b 3b 20 59 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	;;.You.should.have.received.a.co
14de0	70 79 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63	py.of.the.GNU.General.Public.Lic
14e00	65 6e 73 65 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	ense.;;.along.with.this.file...I
14e20	66 20 6e 6f 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	f.not,.see.<https://www.gnu.org/
14e40	6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b	licenses/>...;;;.Commentary:..;;
14e60	20 54 68 69 73 20 6c 69 62 72 61 72 79 20 64 65 66 69 6e 65 73 20 74 68 65 20 6d 61 6a 6f 72 2d	.This.library.defines.the.major-
14e80	6d 6f 64 65 20 60 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 6d 6f 64 65 27 2c 20 77 68 69 63	mode.`package-recipe-mode',.whic
14ea0	68 20 69 73 0a 3b 3b 20 75 73 65 64 20 66 6f 72 20 4d 65 6c 70 61 20 70 61 63 6b 61 67 65 20 72	h.is.;;.used.for.Melpa.package.r
14ec0	65 63 69 70 65 20 66 69 6c 65 73 2e 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72	ecipe.files...;;;.Code:..(requir
14ee0	65 20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 29 0a 0a 28 64 65 66 76 61 72 20 66 6c 79 63 68	e.'package-build)..(defvar.flych
14f00	65 63 6b 2d 63 68 65 63 6b 65 72 73 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64	eck-checkers)..;;;###autoload.(d
14f20	65 66 76 61 72 20 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 6d 6f 64 65 2d 6d 61 70 0a 20 20	efvar.package-recipe-mode-map...
14f40	28 6c 65 74 20 28 28 6d 61 70 20 28 6d 61 6b 65 2d 73 70 61 72 73 65 2d 6b 65 79 6d 61 70 29 29	(let.((map.(make-sparse-keymap))
14f60	29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 28 6b 62 64 20 22 43 2d 63 20	).....(define-key.map.(kbd."C-c.
14f80	43 2d 63 22 29 20 27 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	C-c").'package-build-current-rec
14fa0	69 70 65 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 28 6b 62 64 20 22 43	ipe).....(define-key.map.(kbd."C
14fc0	2d 63 20 43 2d 6e 22 29 20 27 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 63 72 65 61 74 65 2d 72	-c.C-n").'package-build-create-r
14fe0	65 63 69 70 65 29 0a 20 20 20 20 6d 61 70 29 0a 20 20 22 4b 65 79 6d 61 70 20 66 6f 72 20 60 70	ecipe).....map)..."Keymap.for.`p
15000	61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 6d 6f 64 65 27 2e 22 29 0a 0a 3b 3b 3b 23 23 23 61 75	ackage-recipe-mode'.")..;;;###au
15020	74 6f 6c 6f 61 64 0a 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 6c 69 73 70 2d 64 61 74 61 2d 6d	toload.(if.(fboundp.'lisp-data-m
15040	6f 64 65 29 20 3b 20 53 69 6e 63 65 20 45 6d 61 63 73 20 32 38 2e 31 2e 0a 20 20 20 20 28 64 65	ode).;.Since.Emacs.28.1......(de
15060	66 69 6e 65 2d 64 65 72 69 76 65 64 2d 6d 6f 64 65 20 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65	fine-derived-mode.package-recipe
15080	2d 6d 6f 64 65 20 6c 69 73 70 2d 64 61 74 61 2d 6d 6f 64 65 20 22 4d 65 6c 70 61 2d 52 65 63 69	-mode.lisp-data-mode."Melpa-Reci
150a0	70 65 22 0a 20 20 20 20 20 20 22 4d 61 6a 6f 72 20 6d 6f 64 65 20 66 6f 72 20 62 75 66 66 65 72	pe"......."Major.mode.for.buffer
150c0	73 20 68 6f 6c 64 69 6e 67 20 4d 65 6c 70 61 20 70 61 63 6b 61 67 65 20 72 65 63 69 70 65 73 2e	s.holding.Melpa.package.recipes.
150e0	22 0a 20 20 20 20 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	".......:group.'package-build...
15100	20 20 20 20 28 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 6d 6f 64 65 2d 2d 65 6e 61 62 6c 65	....(package-recipe-mode--enable
15120	29 29 0a 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 67	))...(define-derived-mode.packag
15140	65 2d 72 65 63 69 70 65 2d 6d 6f 64 65 20 65 6d 61 63 73 2d 6c 69 73 70 2d 6d 6f 64 65 20 22 4d	e-recipe-mode.emacs-lisp-mode."M
15160	65 6c 70 61 2d 52 65 63 69 70 65 22 0a 20 20 20 20 22 4d 61 6a 6f 72 20 6d 6f 64 65 20 66 6f 72	elpa-Recipe"....."Major.mode.for
15180	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 20 72	.buffers.holding.Melpa.package.r
151a0	65 63 69 70 65 73 2e 22 0a 20 20 20 20 3a 67 72 6f 75 70 20 27 70 61 63 6b 61 67 65 2d 62 75 69	ecipes.".....:group.'package-bui
151c0	6c 64 0a 20 20 20 20 28 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 6d 6f 64 65 2d 2d 65 6e 61	ld.....(package-recipe-mode--ena
151e0	62 6c 65 29 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 6d 6f	ble)))..(defun.package-recipe-mo
15200	64 65 2d 2d 65 6e 61 62 6c 65 20 28 29 0a 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 70 61 63 6b	de--enable.()...(setq-local.pack
15220	61 67 65 2d 62 75 69 6c 64 2d 72 65 63 69 70 65 73 2d 64 69 72 20 64 65 66 61 75 6c 74 2d 64 69	age-build-recipes-dir.default-di
15240	72 65 63 74 6f 72 79 29 0a 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 70 61 63 6b 61 67 65 2d 62	rectory)...(setq-local.package-b
15260	75 69 6c 64 2d 77 6f 72 6b 69 6e 67 2d 64 69 72 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61	uild-working-dir.(expand-file-na
15280	6d 65 20 22 2e 2e 2f 77 6f 72 6b 69 6e 67 2f 22 29 29 0a 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c	me."../working/"))...(setq-local
152a0	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 28 65 78 70 61	.package-build-archive-dir.(expa
152c0	6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 2e 2e 2f 70 61 63 6b 61 67 65 73 2f 22 29 29 0a 20 20	nd-file-name."../packages/"))...
152e0	28 73 65 74 71 2d 6c 6f 63 61 6c 20 66 6c 79 63 68 65 63 6b 2d 63 68 65 63 6b 65 72 73 20 6e 69	(setq-local.flycheck-checkers.ni
15300	6c 29 0a 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 69 6e 64 65 6e 74 2d 74 61 62 73 2d 6d 6f 64	l)...(setq-local.indent-tabs-mod
15320	65 20 6e 69 6c 29 0a 20 20 28 73 65 74 71 2d 6c 6f 63 61 6c 20 72 65 71 75 69 72 65 2d 66 69 6e	e.nil)...(setq-local.require-fin
15340	61 6c 2d 6e 65 77 6c 69 6e 65 20 74 29 0a 20 20 28 61 64 64 2d 68 6f 6f 6b 20 27 62 65 66 6f 72	al-newline.t)...(add-hook.'befor
15360	65 2d 73 61 76 65 2d 68 6f 6f 6b 20 23 27 77 68 69 74 65 73 70 61 63 65 2d 63 6c 65 61 6e 75 70	e-save-hook.#'whitespace-cleanup
15380	20 6e 69 6c 20 74 29 0a 20 20 28 6d 65 73 73 61 67 65 20 22 25 73 22 20 28 73 75 62 73 74 69 74	.nil.t)...(message."%s".(substit
153a0	75 74 65 2d 63 6f 6d 6d 61 6e 64 2d 6b 65 79 73 20 22 5c 0a 55 73 65 20 5c 5c 5b 70 61 63 6b 61	ute-command-keys."\.Use.\\[packa
153c0	67 65 2d 62 75 69 6c 64 2d 63 75 72 72 65 6e 74 2d 72 65 63 69 70 65 5d 20 74 6f 20 62 75 69 6c	ge-build-current-recipe].to.buil
153e0	64 20 74 68 69 73 20 72 65 63 69 70 65 2c 20 5c 0a 5c 5c 5b 70 61 63 6b 61 67 65 2d 62 75 69 6c	d.this.recipe,.\.\\[package-buil
15400	64 2d 63 72 65 61 74 65 2d 72 65 63 69 70 65 5d 20 74 6f 20 63 72 65 61 74 65 20 61 20 6e 65 77	d-create-recipe].to.create.a.new
15420	20 72 65 63 69 70 65 22 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66	.recipe")))..;;;###autoload.(def
15440	75 6e 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 63 72 65 61 74 65 2d 72 65 63 69 70 65 20 28	un.package-build-create-recipe.(
15460	6e 61 6d 65 20 66 65 74 63 68 65 72 29 0a 20 20 22 43 72 65 61 74 65 20 61 20 6e 65 77 20 72 65	name.fetcher)..."Create.a.new.re
15480	63 69 70 65 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 20	cipe.for.the.package.named.NAME.
154a0	75 73 69 6e 67 20 46 45 54 43 48 45 52 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 0a 20	using.FETCHER."...(interactive..
154c0	20 20 28 6c 69 73 74 20 28 72 65 61 64 2d 73 74 72 69 6e 67 20 22 50 61 63 6b 61 67 65 20 6e 61	..(list.(read-string."Package.na
154e0	6d 65 3a 20 22 29 0a 20 20 20 20 20 20 20 20 20 28 69 6e 74 65 72 6e 20 28 63 6f 6d 70 6c 65 74	me:.")..........(intern.(complet
15500	69 6e 67 2d 72 65 61 64 20 22 46 65 74 63 68 65 72 3a 20 22 20 70 61 63 6b 61 67 65 2d 72 65 63	ing-read."Fetcher:.".package-rec
15520	69 70 65 2d 2d 66 65 74 63 68 65 72 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ipe--fetchers...................
15540	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 20 74 20 6e 69 6c 20 6e 69 6c 20 22 67	................nil.t.nil.nil."g
15560	69 74 68 75 62 22 29 29 29 29 0a 20 20 28 6c 65 74 20 28 28 72 65 63 69 70 65 2d 66 69 6c 65 20	ithub"))))...(let.((recipe-file.
15580	28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 6e 61 6d 65 20 70 61 63 6b 61 67 65 2d 62	(expand-file-name.name.package-b
155a0	75 69 6c 64 2d 72 65 63 69 70 65 73 2d 64 69 72 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 66	uild-recipes-dir))).....(when.(f
155c0	69 6c 65 2d 65 78 69 73 74 73 2d 70 20 72 65 63 69 70 65 2d 66 69 6c 65 29 0a 20 20 20 20 20 20	ile-exists-p.recipe-file).......
155e0	28 65 72 72 6f 72 20 22 52 65 63 69 70 65 20 61 6c 72 65 61 64 79 20 65 78 69 73 74 73 22 29 29	(error."Recipe.already.exists"))
15600	0a 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 28 66 69 6e 64 2d	.....(with-current-buffer.(find-
15620	66 69 6c 65 20 72 65 63 69 70 65 2d 66 69 6c 65 29 0a 20 20 20 20 20 20 28 73 61 76 65 2d 65 78	file.recipe-file).......(save-ex
15640	63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 66 6f 72 6d 61 74 20	cursion.........(insert.(format.
15660	22 28 25 73 5c 6e 22 20 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66	"(%s\n".name).................(f
15680	6f 72 6d 61 74 20 22 20 3a 66 65 74 63 68 65 72 20 25 73 5c 6e 22 20 66 65 74 63 68 65 72 29 0a	ormat.".:fetcher.%s\n".fetcher).
156a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 6d 65 6d 71 20 66 65 74 63 68 65	................(if.(memq.fetche
156c0	72 20 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 2d 66 6f 72 67 65 2d 66 65 74 63 68 65 72 73	r.package-recipe--forge-fetchers
156e0	29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 20 3a 72 65 70 6f 20 5c 22	).....................".:repo.\"
15700	55 53 45 52 2f 52 45 50 4f 5c 22 29 5c 6e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	USER/REPO\")\n".................
15720	20 20 22 20 3a 75 72 6c 20 5c 22 68 74 74 70 73 3a 2f 2f 54 4f 44 4f 5c 22 29 5c 6e 22 29 29 29	..".:url.\"https://TODO\")\n")))
15740	29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 70 61 63 6b 61	)))..;;;###autoload.(defun.packa
15760	67 65 2d 62 75 69 6c 64 2d 63 75 72 72 65 6e 74 2d 72 65 63 69 70 65 20 28 29 0a 20 20 22 42 75	ge-build-current-recipe.()..."Bu
15780	69 6c 64 20 61 72 63 68 69 76 65 20 66 6f 72 20 74 68 65 20 72 65 63 69 70 65 20 64 65 66 69 6e	ild.archive.for.the.recipe.defin
157a0	65 64 20 69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2e 22 0a 20 20 28 69 6e	ed.in.the.current.buffer."...(in
157c0	74 65 72 61 63 74 69 76 65 29 0a 20 20 28 75 6e 6c 65 73 73 20 28 61 6e 64 20 28 62 75 66 66 65	teractive)...(unless.(and.(buffe
157e0	72 2d 66 69 6c 65 2d 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c	r-file-name)................(fil
15800	65 2d 65 71 75 61 6c 2d 70 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 28	e-equal-p.(file-name-directory.(
15820	62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	buffer-file-name))..............
15840	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 72 65	................package-build-re
15860	63 69 70 65 73 2d 64 69 72 29 29 0a 20 20 20 20 28 65 72 72 6f 72 20 22 42 75 66 66 65 72 20 69	cipes-dir)).....(error."Buffer.i
15880	73 20 6e 6f 74 20 76 69 73 69 74 69 6e 67 20 61 20 72 65 63 69 70 65 22 29 29 0a 20 20 28 77 68	s.not.visiting.a.recipe"))...(wh
158a0	65 6e 20 28 62 75 66 66 65 72 2d 6d 6f 64 69 66 69 65 64 2d 70 29 0a 20 20 20 20 28 69 66 20 28	en.(buffer-modified-p).....(if.(
158c0	79 2d 6f 72 2d 6e 2d 70 20 28 66 6f 72 6d 61 74 20 22 53 61 76 65 20 66 69 6c 65 20 25 73 3f 20	y-or-n-p.(format."Save.file.%s?.
158e0	22 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 28 73 61	".buffer-file-name)).........(sa
15900	76 65 2d 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 41 62 6f 72 74 69 6e	ve-buffer).......(error."Abortin
15920	67 22 29 29 29 0a 20 20 28 63 68 65 63 6b 2d 70 61 72 65 6e 73 29 0a 20 20 28 6c 65 74 20 28 28	g")))...(check-parens)...(let.((
15940	6e 61 6d 65 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 72 65 63 74 6f 72 79 20 28 62 75	name.(file-name-nondirectory.(bu
15960	66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 29 29 29 29 0a 20 20 20 20 28 70 61 63 6b 61 67 65 2d	ffer-file-name)))).....(package-
15980	62 75 69 6c 64 2d 61 72 63 68 69 76 65 20 6e 61 6d 65 20 74 29 0a 20 20 20 20 28 6c 65 74 20 28	build-archive.name.t).....(let.(
159a0	28 65 6e 74 72 79 20 28 61 73 73 71 20 28 69 6e 74 65 72 6e 20 6e 61 6d 65 29 20 28 70 61 63 6b	(entry.(assq.(intern.name).(pack
159c0	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 0a 20 20 20 20 20	age-build-archive-alist)))......
159e0	20 20 20 20 20 28 6f 75 74 70 75 74 2d 62 75 66 66 65 72 2d 6e 61 6d 65 20 22 2a 70 61 63 6b 61	.....(output-buffer-name."*packa
15a00	67 65 2d 62 75 69 6c 64 2d 61 72 63 68 69 76 65 2d 65 6e 74 72 79 2a 22 29 29 0a 20 20 20 20 20	ge-build-archive-entry*"))......
15a20	20 28 77 69 74 68 2d 6f 75 74 70 75 74 2d 74 6f 2d 74 65 6d 70 2d 62 75 66 66 65 72 20 6f 75 74	.(with-output-to-temp-buffer.out
15a40	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 70 72 69 6e 63 20 22	put-buffer-name.........(princ."
15a60	3b 3b 20 50 6c 65 61 73 65 20 63 68 65 63 6b 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 70 61	;;.Please.check.the.following.pa
15a80	63 6b 61 67 65 20 64 65 73 63 72 69 70 74 6f 72 2e 5c 6e 22 29 0a 20 20 20 20 20 20 20 20 28 70	ckage.descriptor.\n").........(p
15aa0	72 69 6e 63 20 22 3b 3b 20 49 66 20 74 68 65 20 63 6f 72 72 65 63 74 20 70 61 63 6b 61 67 65 20	rinc.";;.If.the.correct.package.
15ac0	64 65 73 63 72 69 70 74 69 6f 6e 20 6f 72 20 64 65 70 65 6e 64 65 6e 63 69 65 73 20 61 72 65 20	description.or.dependencies.are.
15ae0	6d 69 73 73 69 6e 67 2c 5c 6e 22 29 0a 20 20 20 20 20 20 20 20 28 70 72 69 6e 63 20 22 3b 3b 20	missing,\n").........(princ.";;.
15b00	74 68 65 6e 20 74 68 65 20 73 6f 75 72 63 65 20 2e 65 6c 20 66 69 6c 65 20 69 73 20 6c 69 6b 65	then.the.source..el.file.is.like
15b20	6c 79 20 6d 61 6c 66 6f 72 6d 65 64 2c 20 61 6e 64 20 73 68 6f 75 6c 64 20 62 65 20 66 69 78 65	ly.malformed,.and.should.be.fixe
15b40	64 2e 5c 6e 22 29 0a 20 20 20 20 20 20 20 20 28 70 70 20 65 6e 74 72 79 29 29 0a 20 20 20 20 20	d.\n").........(pp.entry))......
15b60	20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 6f 75 74 70 75 74 2d 62 75 66	.(with-current-buffer.output-buf
15b80	66 65 72 2d 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 6c	fer-name.........(if.(fboundp.'l
15ba0	69 73 70 2d 64 61 74 61 2d 6d 6f 64 65 29 20 28 6c 69 73 70 2d 64 61 74 61 2d 6d 6f 64 65 29 20	isp-data-mode).(lisp-data-mode).
15bc0	28 65 6d 61 63 73 2d 6c 69 73 70 2d 6d 6f 64 65 29 29 0a 20 20 20 20 20 20 20 20 28 76 69 65 77	(emacs-lisp-mode)).........(view
15be0	2d 6d 6f 64 65 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 79 2d 6f 72 2d 6e 2d 70 20 22 49	-mode)).......(when.(y-or-n-p."I
15c00	6e 73 74 61 6c 6c 20 6e 65 77 20 70 61 63 6b 61 67 65 3f 20 22 29 0a 20 20 20 20 20 20 20 20 28	nstall.new.package?.").........(
15c20	70 61 63 6b 61 67 65 2d 69 6e 73 74 61 6c 6c 2d 66 69 6c 65 20 28 70 61 63 6b 61 67 65 2d 62 75	package-install-file.(package-bu
15c40	69 6c 64 2d 2d 61 72 74 69 66 61 63 74 2d 66 69 6c 65 20 65 6e 74 72 79 29 29 0a 20 20 20 20 20	ild--artifact-file.entry))......
15c60	20 20 20 28 70 6f 70 2d 74 6f 2d 62 75 66 66 65 72 20 28 67 65 74 2d 62 75 66 66 65 72 20 62 79	...(pop-to-buffer.(get-buffer.by
15c80	74 65 2d 63 6f 6d 70 69 6c 65 2d 6c 6f 67 2d 62 75 66 66 65 72 29 29 29 29 29 29 0a 0a 28 70 72	te-compile-log-buffer))))))..(pr
15ca0	6f 76 69 64 65 20 27 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 6d 6f 64 65 29 0a 3b 3b 3b 20	ovide.'package-recipe-mode).;;;.
15cc0	70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 6d 6f 64 65 2e 65 6c 20 65 6e 64 73 20 68 65 72 65	package-recipe-mode.el.ends.here
15ce0	0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
15d00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
15d20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
15d40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
15d60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
15d80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
15da0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
15dc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
15de0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
15e00	70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 32 30 32 34 30 33 30 36 2e 32 32 33 34 2f 70 61 63 6b	package-build-20240306.2234/pack
15e20	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...................
15e40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
15e60	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
15e80	30 30 32 30 36 36 34 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 36 36 36 36 00 20 30 00 00 00	0020664.00000000000.016666..0...
15ea0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
15ec0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
15ee0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
15f00	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...................
15f20	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...................
15f40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
15f60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
15f80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
15fa0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
15fc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
15fe0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
16000	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
16020	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..-*-.
16040	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.
16060	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 34 20	-*-..;;.Copyright.(C).2018-2024.
16080	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
160a0	73 20 42 65 72 6e 6f 75 6c 6c 69 20 3c 6a 6f 6e 61 73 40 62 65 72 6e 6f 75 6c 2e 6c 69 3e 0a 3b	s.Bernoulli.<jonas@bernoul.li>.;
160c0	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
160e0	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:.
16100	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
16120	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
16140	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
16160	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.
16180	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
161a0	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
161c0	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
161e0	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
16200	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)
16220	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
16240	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
16260	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
16280	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
162a0	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
162c0	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
162e0	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
16300	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
16320	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.
16340	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
16360	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.
16380	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:/
163a0	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
163c0	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
163e0	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
16400	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
16420	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.
16440	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
16460	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
16480	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
164a0	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)..;;;
164c0	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
164e0	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
16500	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
16520	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
16540	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)...
16560	20 28 73 74 61 62 6c 65 2d 70 20 20 20 20 20 20 20 20 3a 61 6c 6c 6f 63 61 74 69 6f 6e 20 3a 63	.(stable-p........:allocation.:c
16580	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 20 28 6e 61	lass.......:initform.nil)....(na
165a0	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 20 20 20 20	me............:initarg.:name....
165c0	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 6c 20 20 20	.......:initform.nil)....(url...
165e0	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 20 20 20 20	..........:initarg.:url.........
16600	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 20 20 20 20	...:initform.nil)....(repo......
16620	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 20 20 20 3a	......:initarg.:repo...........:
16640	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 20 20 20 20	initform.nil)....(repopage......
16660	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 69 6e 69 74	..:initarg.:repopage.......:init
16680	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 20 20 3a 69	form.nil)....(files...........:i
166a0	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 66 6f 72 6d	nitarg.:files..........:initform
166c0	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 6e 69 74 61	.nil)....(branch..........:inita
166e0	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 20 6e 69 6c	rg.:branch.........:initform.nil
16700	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 72 67 20 3a	)....(commit..........:initarg.:
16720	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 29 0a 20 20	commit.........:initform.nil)...
16740	20 28 74 69 6d 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	.(time..........................
16760	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 76 65	...........:initform.nil)....(ve
16780	72 73 69 6f 6e 20 20 20 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...........................
167a0	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 76 65 72 73 69 6f	.......:initform.nil)....(versio
167c0	6e 2d 72 65 67 65 78 70 20 20 3a 69 6e 69 74 61 72 67 20 3a 76 65 72 73 69 6f 6e 2d 72 65 67 65	n-regexp..:initarg.:version-rege
167e0	78 70 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	xp.:initform.nil)....(old-names.
16800	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......:
16820	69 6e 69 74 66 6f 72 6d 20 6e 69 6c 29 29 0a 20 20 3a 61 62 73 74 72 61 63 74 20 74 29 0a 0a 3b	initform.nil))...:abstract.t)..;
16840	3b 3b 3b 20 47 69 74 0a 0a 28 64 65 66 63 6c 61 73 73 20 70 61 63 6b 61 67 65 2d 67 69 74 2d 72	;;;.Git..(defclass.package-git-r
16860	65 63 69 70 65 20 28 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	ecipe.(package-recipe).())..(def
16880	63 6c 61 73 73 20 70 61 63 6b 61 67 65 2d 67 69 74 68 75 62 2d 72 65 63 69 70 65 20 28 70 61 63	class.package-github-recipe.(pac
168a0	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 6d 61 74 20	kage-git-recipe)...((url-format.
168c0	20 20 20 20 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63	.....:initform."https://github.c
168e0	6f 6d 2f 25 73 2e 67 69 74 22 29 0a 20 20 20 28 72 65 70 6f 70 61 67 65 2d 66 6f 72 6d 61 74 20	om/%s.git")....(repopage-format.
16900	3a 69 6e 69 74 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	:initform."https://github.com/%s
16920	22 29 29 29 0a 0a 28 64 65 66 63 6c 61 73 73 20 70 61 63 6b 61 67 65 2d 67 69 74 6c 61 62 2d 72	")))..(defclass.package-gitlab-r
16940	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 29 0a 20 20 28 28 75	ecipe.(package-git-recipe)...((u
16960	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 22 68 74 74 70 73 3a	rl-format......:initform."https:
16980	2f 2f 67 69 74 6c 61 62 2e 63 6f 6d 2f 25 73 2e 67 69 74 22 29 0a 20 20 20 28 72 65 70 6f 70 61	//gitlab.com/%s.git")....(repopa
169a0	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 67 69 74	ge-format.:initform."https://git
169c0	6c 61 62 2e 63 6f 6d 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	lab.com/%s")))..(defclass.packag
169e0	65 2d 63 6f 64 65 62 65 72 67 2d 72 65 63 69 70 65 20 28 70 61 63 6b 61 67 65 2d 67 69 74 2d 72	e-codeberg-recipe.(package-git-r
16a00	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
16a20	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 67 2f 25 73 2e 67 69	form."https://codeberg.org/%s.gi
16a40	74 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	t")....(repopage-format.:initfor
16a60	6d 20 22 68 74 74 70 73 3a 2f 2f 63 6f 64 65 62 65 72 67 2e 6f 72 67 2f 25 73 22 29 29 29 0a 0a	m."https://codeberg.org/%s")))..
16a80	28 64 65 66 63 6c 61 73 73 20 70 61 63 6b 61 67 65 2d 73 6f 75 72 63 65 68 75 74 2d 72 65 63 69	(defclass.package-sourcehut-reci
16aa0	70 65 20 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	pe.(package-git-recipe)...((url-
16ac0	66 6f 72 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 67	format......:initform."https://g
16ae0	69 74 2e 73 72 2e 68 74 2f 7e 25 73 22 29 0a 20 20 20 28 72 65 70 6f 70 61 67 65 2d 66 6f 72 6d	it.sr.ht/~%s")....(repopage-form
16b00	61 74 20 3a 69 6e 69 74 66 6f 72 6d 20 22 68 74 74 70 73 3a 2f 2f 67 69 74 2e 73 72 2e 68 74 2f	at.:initform."https://git.sr.ht/
16b20	7e 25 73 22 29 29 29 0a 0a 3b 3b 3b 3b 20 4d 65 72 63 75 72 69 61 6c 0a 0a 28 64 65 66 63 6c 61	~%s")))..;;;;.Mercurial..(defcla
16b40	73 73 20 70 61 63 6b 61 67 65 2d 68 67 2d 72 65 63 69 70 65 20 28 70 61 63 6b 61 67 65 2d 72 65	ss.package-hg-recipe.(package-re
16b60	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 61 67 65 2d 67 69 74	cipe).())..(defclass.package-git
16b80	2d 72 65 6d 6f 74 65 2d 68 67 2d 72 65 63 69 70 65 20 28 70 61 63 6b 61 67 65 2d 67 69 74 2d 72	-remote-hg-recipe.(package-git-r
16ba0	65 63 69 70 65 29 20 28 29 29 0a 0a 3b 3b 3b 20 4d 65 74 68 6f 64 73 0a 0a 28 63 6c 2d 64 65 66	ecipe).())..;;;.Methods..(cl-def
16bc0	6d 65 74 68 6f 64 20 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	method.package-recipe--working-t
16be0	72 65 65 20 28 28 72 63 70 20 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 29 29 0a 20 20 28 66 69	ree.((rcp.package-recipe))...(fi
16c00	6c 65 2d 6e 61 6d 65 2d 61 73 2d 64 69 72 65 63 74 6f 72 79 0a 20 20 20 28 65 78 70 61 6e 64 2d	le-name-as-directory....(expand-
16c20	66 69 6c 65 2d 6e 61 6d 65 20 28 6f 72 65 66 20 72 63 70 20 6e 61 6d 65 29 20 70 61 63 6b 61 67	file-name.(oref.rcp.name).packag
16c40	65 2d 62 75 69 6c 64 2d 77 6f 72 6b 69 6e 67 2d 64 69 72 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d	e-build-working-dir)))..(cl-defm
16c60	65 74 68 6f 64 20 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 2d 75 70 73 74 72 65 61 6d 2d 75	ethod.package-recipe--upstream-u
16c80	72 6c 20 28 28 72 63 70 20 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 29 29 0a 20 20 28 6f 72 20	rl.((rcp.package-recipe))...(or.
16ca0	28 6f 72 65 66 20 72 63 70 20 75 72 6c 29 0a 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 28 6f 72	(oref.rcp.url).......(format.(or
16cc0	65 66 20 72 63 70 20 75 72 6c 2d 66 6f 72 6d 61 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	ef.rcp.url-format)..............
16ce0	20 28 6f 72 65 66 20 72 63 70 20 72 65 70 6f 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 6d 65 74 68	.(oref.rcp.repo))))..(cl-defmeth
16d00	6f 64 20 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 2d 75 70 73 74 72 65 61 6d 2d 75 72 6c 20	od.package-recipe--upstream-url.
16d20	28 28 72 63 70 20 70 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	((rcp.package-git-remote-hg-reci
16d40	70 65 29 29 0a 20 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 20	pe))...(concat."hg::".(oref.rcp.
16d60	75 72 6c 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	url)))..(cl-defmethod.package-re
16d80	63 69 70 65 2d 2d 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	cipe--upstream-protocol.((rcp.pa
16da0	63 6b 61 67 65 2d 72 65 63 69 70 65 29 29 0a 20 20 28 6c 65 74 20 28 28 75 72 6c 20 28 70 61 63	ckage-recipe))...(let.((url.(pac
16dc0	6b 61 67 65 2d 72 65 63 69 70 65 2d 2d 75 70 73 74 72 65 61 6d 2d 75 72 6c 20 72 63 70 29 29 29	kage-recipe--upstream-url.rcp)))
16de0	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 22 5c 5c 60 5c 5c	.....(cond.((string-match."\\`\\
16e00	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 20 20 20 20 20 28	([a-z]+\\)://".url)............(
16e20	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 20 20 20 20 20 28	match-string.1.url))...........(
16e40	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 22 20 75 72 6c 29	(string-match."\\`[^:/.]+:".url)
16e60	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 22 29 29 29 29 0a	."ssh")...........(t."file")))).
16e80	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 66	.(cl-defmethod.package-recipe--f
16ea0	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 65 29 29 0a 20 20	etcher.((rcp.package-recipe))...
16ec0	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 69 65 69 6f 2d 6f	(substring.(symbol-name.(eieio-o
16ee0	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 3b 3b 3b 20 43 6f	bject-class.rcp)).8.-7))..;;;.Co
16f00	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 2d 72 65 63 69 70	nstants..(defconst.package-recip
16f20	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 75 62 20 67 69 74	e--forge-fetchers...'(github.git
16f40	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 28 64 65 66 63 6f	lab.codeberg.sourcehut))..(defco
16f60	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 72 73 0a 20 20 28	nst.package-recipe--fetchers...(
16f80	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 65 63 69 70 65 2d	append.'(git.hg).package-recipe-
16fa0	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 65 72 66 61 63 65	-forge-fetchers))..;;;.Interface
16fc0	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 63 69 70 65 73 20	..(defun.package-recipe-recipes.
16fe0	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 20 6e 61 6d 65 73	()..."Return.a.list.of.the.names
17000	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 65 20 72 65 63 69	.of.packages.with.available.reci
17020	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 61 63 6b 61 67 65	pes."...(directory-files.package
17040	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 5e 2e 5d 22 29 29	-build-recipes-dir.nil."^[^.]"))
17060	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 61 64 2d 6e 61 6d	..(defun.package-recipe-read-nam
17080	65 20 28 29 0a 20 20 22 52 65 61 64 20 74 68 65 20 6e 61 6d 65 20 6f 66 20 61 20 70 61 63 6b 61	e.()..."Read.the.name.of.a.packa
170a0	67 65 20 66 6f 72 20 77 68 69 63 68 20 61 20 72 65 63 69 70 65 20 69 73 20 61 76 61 69 6c 61 62	ge.for.which.a.recipe.is.availab
170c0	6c 65 2e 22 0a 20 20 28 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 20 22 50 61 63 6b 61 67 65	le."...(completing-read."Package
170e0	3a 20 22 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 0a 0a	:.".(package-recipe-recipes)))..
17100	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 6e 61	(defun.package-recipe-lookup.(na
17120	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 66 6f	me)..."Return.a.recipe.object.fo
17140	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 6f 20	r.the.package.named.NAME..If.no.
17160	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 74 68	such.recipe.file.exists.or.if.th
17180	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 69 73	e.contents.of.the.recipe.file.is
171a0	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 22 0a	.invalid,.then.raise.an.error.".
171c0	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 65 20	..(let.((file.(expand-file-name.
171e0	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 29 29	name.package-build-recipes-dir))
17200	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 0a 20	).....(if.(file-exists-p.file)..
17220	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 6d 70	.......(let*.((recipe.(with-temp
17240	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 20 20	-buffer.........................
17260	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 20 20	.(insert-file-contents.file)....
17280	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 75 72	......................(read.(cur
172a0	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 20 28	rent-buffer))))................(
172c0	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 20 20	plist.(cdr.recipe)).............
172e0	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 66 65	...(fetcher.(plist-get.plist.:fe
17300	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 20 61	tcher))................key.val.a
17320	72 67 73 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 2d	rgs)...........(package-recipe--
17340	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 20 20 20 20 20 20	validate.recipe.name)...........
17360	28 77 68 69 6c 65 20 28 61 6e 64 20 28 73 65 74 71 20 6b 65 79 20 28 70 6f 70 20 70 6c 69 73 74	(while.(and.(setq.key.(pop.plist
17380	29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 76	)).......................(setq.v
173a0	61 6c 20 28 70 6f 70 20 70 6c 69 73 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e	al.(pop.plist))).............(un
173c0	6c 65 73 73 20 28 65 71 20 6b 65 79 20 3a 66 65 74 63 68 65 72 29 0a 20 20 20 20 20 20 20 20 20	less.(eq.key.:fetcher)..........
173e0	20 20 20 20 20 28 70 75 73 68 20 76 61 6c 20 61 72 67 73 29 0a 20 20 20 20 20 20 20 20 20 20 20	.....(push.val.args)............
17400	20 20 20 28 70 75 73 68 20 6b 65 79 20 61 72 67 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28	...(push.key.args)))...........(
17420	77 68 65 6e 20 28 61 6e 64 20 70 61 63 6b 61 67 65 2d 62 75 69 6c 64 2d 75 73 65 2d 67 69 74 2d	when.(and.package-build-use-git-
17440	72 65 6d 6f 74 65 2d 68 67 20 28 65 71 20 66 65 74 63 68 65 72 20 27 68 67 29 29 0a 20 20 20 20	remote-hg.(eq.fetcher.'hg)).....
17460	20 20 20 20 20 20 20 20 28 73 65 74 71 20 66 65 74 63 68 65 72 20 27 67 69 74 2d 72 65 6d 6f 74	........(setq.fetcher.'git-remot
17480	65 2d 68 67 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 61 70 70 6c 79 20 28 69 6e 74 65 72 6e 20	e-hg))...........(apply.(intern.
174a0	28 66 6f 72 6d 61 74 20 22 70 61 63 6b 61 67 65 2d 25 73 2d 72 65 63 69 70 65 22 20 66 65 74 63	(format."package-%s-recipe".fetc
174c0	68 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 61 6d 65 20 3a 6e 61 6d	her))..................name.:nam
174e0	65 20 6e 61 6d 65 20 61 72 67 73 29 29 0a 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 4e 6f 20 73	e.name.args)).......(error."No.s
17500	75 63 68 20 72 65 63 69 70 65 3a 20 25 73 22 20 6e 61 6d 65 29 29 29 29 0a 0a 3b 3b 3b 20 56 61	uch.recipe:.%s".name))))..;;;.Va
17520	6c 69 64 61 74 69 6f 6e 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20	lidation..;;;###autoload.(defun.
17540	70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d 76 61 6c 69 64 61 74 65 2d 61 6c 6c 20 28 29 0a 20	package-recipe-validate-all.()..
17560	20 22 56 61 6c 69 64 61 74 65 20 61 6c 6c 20 72 65 63 69 70 65 73 2e 22 0a 20 20 28 69 6e 74 65	."Validate.all.recipes."...(inte
17580	72 61 63 74 69 76 65 29 0a 20 20 28 64 6f 6c 69 73 74 2d 77 69 74 68 2d 70 72 6f 67 72 65 73 73	ractive)...(dolist-with-progress
175a0	2d 72 65 70 6f 72 74 65 72 20 28 6e 61 6d 65 20 28 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 2d	-reporter.(name.(package-recipe-
175c0	72 65 63 69 70 65 73 29 29 0a 20 20 20 20 20 20 22 56 61 6c 69 64 61 74 69 6e 67 20 72 65 63 69	recipes))......."Validating.reci
175e0	70 65 73 2e 2e 2e 22 0a 20 20 20 20 28 63 6f 6e 64 69 74 69 6f 6e 2d 63 61 73 65 20 65 72 72 0a	pes...".....(condition-case.err.
17600	20 20 20 20 20 20 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	........(package-recipe-lookup.n
17620	61 6d 65 29 0a 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	ame).......(error.(message."Inva
17640	6c 69 64 20 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	lid.recipe.for.%s:.%S".name.(cdr
17660	20 65 72 72 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 61 63 6b 61 67 65 2d 72 65 63 69 70	.err))))))..(defun.package-recip
17680	65 2d 2d 76 61 6c 69 64 61 74 65 20 28 72 65 63 69 70 65 20 6e 61 6d 65 29 0a 20 20 22 50 65 72	e--validate.(recipe.name)..."Per
176a0	66 6f 72 6d 20 73 6f 6d 65 20 62 61 73 69 63 20 63 68 65 63 6b 73 20 6f 6e 20 74 68 65 20 72 61	form.some.basic.checks.on.the.ra
176c0	77 20 52 45 43 49 50 45 20 66 6f 72 20 74 68 65 20 70 61 63 6b 61 67 65 20 6e 61 6d 65 64 20 4e	w.RECIPE.for.the.package.named.N
176e0	41 4d 45 2e 22 0a 20 20 28 70 63 61 73 65 2d 6c 65 74 20 28 28 60 28 2c 69 64 65 6e 74 20 2e 20	AME."...(pcase-let.((`(,ident...
17700	2c 70 6c 69 73 74 29 20 72 65 63 69 70 65 29 29 0a 20 20 20 20 28 63 6c 2d 61 73 73 65 72 74 20	,plist).recipe)).....(cl-assert.
17720	69 64 65 6e 74 29 0a 20 20 20 20 28 63 6c 2d 61 73 73 65 72 74 20 28 73 79 6d 62 6f 6c 70 20 69	ident).....(cl-assert.(symbolp.i
17740	64 65 6e 74 29 29 0a 20 20 20 20 28 63 6c 2d 61 73 73 65 72 74 20 28 73 74 72 69 6e 67 3d 20 28	dent)).....(cl-assert.(string=.(
17760	73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 69 64 65 6e 74 29 20 6e 61 6d 65 29 0a 20 20 20 20 20 20 20	symbol-name.ident).name)........
17780	20 20 20 20 20 20 20 20 6e 69 6c 20 22 52 65 63 69 70 65 20 27 25 73 27 20 63 6f 6e 74 61 69 6e	........nil."Recipe.'%s'.contain
177a0	73 20 6d 69 73 6d 61 74 63 68 65 64 20 70 61 63 6b 61 67 65 20 6e 61 6d 65 20 27 25 73 27 22 0a	s.mismatched.package.name.'%s'".
177c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 61 6d 65 20 69 64 65 6e 74 29 0a 20 20 20 20 28	...............name.ident).....(
177e0	63 6c 2d 61 73 73 65 72 74 20 70 6c 69 73 74 29 0a 20 20 20 20 28 6c 65 74 2a 20 28 28 73 79 6d	cl-assert.plist).....(let*.((sym
17800	62 6f 6c 2d 6b 65 79 73 20 27 28 3a 66 65 74 63 68 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 20	bol-keys.'(:fetcher))...........
17820	20 28 73 74 72 69 6e 67 2d 6b 65 79 73 20 27 28 3a 75 72 6c 20 3a 72 65 70 6f 20 3a 63 6f 6d 6d	.(string-keys.'(:url.:repo.:comm
17840	69 74 20 3a 62 72 61 6e 63 68 20 3a 76 65 72 73 69 6f 6e 2d 72 65 67 65 78 70 29 29 0a 20 20 20	it.:branch.:version-regexp))....
17860	20 20 20 20 20 20 20 20 28 6c 69 73 74 2d 6b 65 79 73 20 27 28 3a 66 69 6c 65 73 20 3a 6f 6c 64	........(list-keys.'(:files.:old
17880	2d 6e 61 6d 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 61 6c 6c 2d 6b 65 79 73 20 28 61	-names))............(all-keys.(a
178a0	70 70 65 6e 64 20 73 79 6d 62 6f 6c 2d 6b 65 79 73 20 73 74 72 69 6e 67 2d 6b 65 79 73 20 6c 69	ppend.symbol-keys.string-keys.li
178c0	73 74 2d 6b 65 79 73 29 29 29 0a 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 74 68 69 6e 67 20	st-keys))).......(dolist.(thing.
178e0	70 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 6b 65 79 77 6f 72 64 70 20 74	plist).........(when.(keywordp.t
17900	68 69 6e 67 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 61 73 73 65 72 74 20 28 6d 65 6d 71	hing)...........(cl-assert.(memq
17920	20 74 68 69 6e 67 20 61 6c 6c 2d 6b 65 79 73 29 20 6e 69 6c 20 22 55 6e 6b 6e 6f 77 6e 20 6b 65	.thing.all-keys).nil."Unknown.ke
17940	79 77 6f 72 64 20 25 53 22 20 74 68 69 6e 67 29 29 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28	yword.%S".thing))).......(let.((
17960	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 66 65 74 63 68 65	fetcher.(plist-get.plist.:fetche
17980	72 29 29 29 0a 20 20 20 20 20 20 20 20 28 63 6c 2d 61 73 73 65 72 74 20 66 65 74 63 68 65 72 20	r))).........(cl-assert.fetcher.
179a0	6e 69 6c 20 22 3a 66 65 74 63 68 65 72 20 69 73 20 6d 69 73 73 69 6e 67 22 29 0a 20 20 20 20 20	nil.":fetcher.is.missing")......
179c0	20 20 20 28 69 66 20 28 6d 65 6d 71 20 66 65 74 63 68 65 72 20 70 61 63 6b 61 67 65 2d 72 65 63	...(if.(memq.fetcher.package-rec
179e0	69 70 65 2d 2d 66 6f 72 67 65 2d 66 65 74 63 68 65 72 73 29 0a 20 20 20 20 20 20 20 20 20 20 20	ipe--forge-fetchers)............
17a00	20 28 70 72 6f 67 6e 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	.(progn...............(cl-assert
17a20	20 28 70 6c 69 73 74 2d 67 65 74 20 70 6c 69 73 74 20 3a 72 65 70 6f 29 20 22 3a 72 65 70 6f 20	.(plist-get.plist.:repo).":repo.
17a40	69 73 20 6d 69 73 73 69 6e 67 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 61	is.missing")...............(cl-a
17a60	73 73 65 72 74 20 28 6e 6f 74 20 28 70 6c 69 73 74 2d 67 65 74 20 70 6c 69 73 74 20 3a 75 72 6c	ssert.(not.(plist-get.plist.:url
17a80	29 29 20 22 3a 75 72 6c 20 69 73 20 72 65 64 75 6e 64 61 6e 74 22 29 29 0a 20 20 20 20 20 20 20	)).":url.is.redundant"))........
17aa0	20 20 20 28 63 6c 2d 61 73 73 65 72 74 20 28 70 6c 69 73 74 2d 67 65 74 20 70 6c 69 73 74 20 3a	...(cl-assert.(plist-get.plist.:
17ac0	75 72 6c 29 20 22 3a 75 72 6c 20 69 73 20 6d 69 73 73 69 6e 67 22 29 29 29 0a 20 20 20 20 20 20	url).":url.is.missing"))).......
17ae0	28 64 6f 6c 69 73 74 20 28 6b 65 79 20 73 79 6d 62 6f 6c 2d 6b 65 79 73 29 0a 20 20 20 20 20 20	(dolist.(key.symbol-keys).......
17b00	20 20 28 77 68 65 6e 2d 6c 65 74 20 28 28 76 61 6c 20 28 70 6c 69 73 74 2d 67 65 74 20 70 6c 69	..(when-let.((val.(plist-get.pli
17b20	73 74 20 6b 65 79 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 61 73 73 65 72 74 20 28	st.key)))...........(cl-assert.(
17b40	73 79 6d 62 6f 6c 70 20 76 61 6c 29 20 6e 69 6c 20 22 25 73 20 6d 75 73 74 20 62 65 20 61 20 73	symbolp.val).nil."%s.must.be.a.s
17b60	79 6d 62 6f 6c 20 62 75 74 20 69 73 20 25 53 22 20 6b 65 79 20 76 61 6c 29 29 29 0a 20 20 20 20	ymbol.but.is.%S".key.val))).....
17b80	20 20 28 64 6f 6c 69 73 74 20 28 6b 65 79 20 6c 69 73 74 2d 6b 65 79 73 29 0a 20 20 20 20 20 20	..(dolist.(key.list-keys).......
17ba0	20 20 28 77 68 65 6e 2d 6c 65 74 20 28 28 76 61 6c 20 28 70 6c 69 73 74 2d 67 65 74 20 70 6c 69	..(when-let.((val.(plist-get.pli
17bc0	73 74 20 6b 65 79 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 61 73 73 65 72 74 20 28	st.key)))...........(cl-assert.(
17be0	6c 69 73 74 70 20 76 61 6c 29 20 6e 69 6c 20 22 25 73 20 6d 75 73 74 20 62 65 20 61 20 6c 69 73	listp.val).nil."%s.must.be.a.lis
17c00	74 20 62 75 74 20 69 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	t.but.is.%S".key.val))).......(d
17c20	6f 6c 69 73 74 20 28 6b 65 79 20 73 74 72 69 6e 67 2d 6b 65 79 73 29 0a 20 20 20 20 20 20 20 20	olist.(key.string-keys).........
17c40	28 77 68 65 6e 2d 6c 65 74 20 28 28 76 61 6c 20 28 70 6c 69 73 74 2d 67 65 74 20 70 6c 69 73 74	(when-let.((val.(plist-get.plist
17c60	20 6b 65 79 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 61 73 73 65 72 74 20 28 73 74	.key)))...........(cl-assert.(st
17c80	72 69 6e 67 70 20 76 61 6c 29 20 6e 69 6c 20 22 25 73 20 6d 75 73 74 20 62 65 20 61 20 73 74 72	ringp.val).nil."%s.must.be.a.str
17ca0	69 6e 67 20 62 75 74 20 69 73 20 25 53 22 20 6b 65 79 20 76 61 6c 29 29 29 0a 20 20 20 20 20 20	ing.but.is.%S".key.val))).......
17cc0	28 77 68 65 6e 2d 6c 65 74 20 28 28 73 70 65 63 20 28 70 6c 69 73 74 2d 67 65 74 20 70 6c 69 73	(when-let.((spec.(plist-get.plis
17ce0	74 20 3a 66 69 6c 65 73 29 29 29 0a 20 20 20 20 20 20 20 20 3b 3b 20 60 3a 64 65 66 61 75 6c 74	t.:files))).........;;.`:default
17d00	73 27 20 69 73 20 6f 6e 6c 79 20 61 6c 6c 6f 77 65 64 20 61 73 20 74 68 65 20 66 69 72 73 74 20	s'.is.only.allowed.as.the.first.
17d20	65 6c 65 6d 65 6e 74 2e 0a 20 20 20 20 20 20 20 20 3b 3b 20 49 66 20 77 65 20 66 69 6e 64 20 69	element..........;;.If.we.find.i
17d40	74 20 69 6e 20 74 68 61 74 20 70 6f 73 69 74 69 6f 6e 2c 20 73 6b 69 70 20 6f 76 65 72 20 69 74	t.in.that.position,.skip.over.it
17d60	2e 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 65 71 20 28 63 61 72 20 73 70 65 63 29 20 3a	..........(when.(eq.(car.spec).:
17d80	64 65 66 61 75 6c 74 73 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 73 70 65 63 20 28	defaults)...........(setq.spec.(
17da0	63 64 72 20 73 70 65 63 29 29 29 0a 20 20 20 20 20 20 20 20 3b 3b 20 41 6c 6c 20 6f 74 68 65 72	cdr.spec))).........;;.All.other
17dc0	20 65 6c 65 6d 65 6e 74 73 20 68 61 76 65 20 74 6f 20 62 65 20 73 74 72 69 6e 67 73 20 6f 72 20	.elements.have.to.be.strings.or.
17de0	6c 69 73 74 73 20 6f 66 20 73 74 72 69 6e 67 73 2e 0a 20 20 20 20 20 20 20 20 3b 3b 20 41 20 6c	lists.of.strings..........;;.A.l
17e00	69 73 74 20 77 68 6f 73 65 20 66 69 72 73 74 20 65 6c 65 6d 65 6e 74 20 69 73 20 60 3a 65 78 63	ist.whose.first.element.is.`:exc
17e20	6c 75 64 65 27 20 69 73 20 61 6c 73 6f 20 76 61 6c 69 64 2e 0a 20 20 20 20 20 20 20 20 28 64 6f	lude'.is.also.valid..........(do
17e40	6c 69 73 74 20 28 65 6e 74 72 79 20 73 70 65 63 29 0a 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c	list.(entry.spec)...........(unl
17e60	65 73 73 20 28 63 6f 6e 64 20 28 28 73 74 72 69 6e 67 70 20 65 6e 74 72 79 29 0a 20 20 20 20 20	ess.(cond.((stringp.entry)......
17e80	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 65 71 75 61 6c 20	....................(not.(equal.
17ea0	65 6e 74 72 79 20 22 2a 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	entry."*")))....................
17ec0	20 20 20 20 20 28 28 6c 69 73 74 70 20 65 6e 74 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20	.....((listp.entry).............
17ee0	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 67 6c 6f 62 73 20 28	.............(and-let*.((globs.(
17f00	63 64 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	cdr.entry)))....................
17f20	20 20 20 20 20 20 20 20 28 61 6e 64 20 28 6f 72 20 28 65 71 20 28 63 61 72 20 65 6e 74 72 79 29	........(and.(or.(eq.(car.entry)
17f40	20 3a 65 78 63 6c 75 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	.:exclude)......................
17f60	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 70 20 28 63 61 72 20 65 6e 74	...............(stringp.(car.ent
17f80	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 20 20 20 20 20 20 20	ry)))...........................
17fa0	20 20 20 20 20 20 28 73 65 71 2d 65 76 65 72 79 2d 70 20 28 6c 61 6d 62 64 61 20 28 67 6c 6f 62	......(seq-every-p.(lambda.(glob
17fc0	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	)...............................
17fe0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 73 74 72 69 6e 67 70 20 67	.................(and.(stringp.g
18000	6c 6f 62 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	lob)............................
18020	20 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 6f 74 20 28 65	.........................(not.(e
18040	71 75 61 6c 20 67 6c 6f 62 20 22 2a 22 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20	qual.glob."*"))))...............
18060	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 67	...............................g
18080	6c 6f 62 73 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 49 6e	lobs))))).............(error."In
180a0	76 61 6c 69 64 20 66 69 6c 65 73 20 73 70 65 63 20 65 6e 74 72 79 20 25 53 22 20 65 6e 74 72 79	valid.files.spec.entry.%S".entry
180c0	29 29 29 29 0a 20 20 20 20 20 20 3b 3b 20 53 69 6c 65 6e 63 65 20 62 79 74 65 20 63 6f 6d 70 69	)))).......;;.Silence.byte.compi
180e0	6c 65 72 20 6f 66 20 45 6d 61 63 73 20 32 38 2e 20 20 49 74 20 61 70 70 65 61 72 73 20 74 68 61	ler.of.Emacs.28...It.appears.tha
18100	74 20 75 73 65 73 0a 20 20 20 20 20 20 3b 3b 20 69 6e 73 69 64 65 20 63 6c 2d 61 73 73 65 72 74	t.uses.......;;.inside.cl-assert
18120	20 73 6f 6d 65 74 69 6d 65 73 2c 20 62 75 74 20 6e 6f 74 20 61 6c 77 61 79 73 2c 20 64 6f 20 6e	.sometimes,.but.not.always,.do.n
18140	6f 74 20 63 6f 75 6e 74 2e 0a 20 20 20 20 20 20 28 6c 69 73 74 20 6e 61 6d 65 20 69 64 65 6e 74	ot.count........(list.name.ident
18160	20 61 6c 6c 2d 6b 65 79 73 29 29 0a 20 20 20 20 72 65 63 69 70 65 29 29 0a 0a 28 70 72 6f 76 69	.all-keys)).....recipe))..(provi
18180	64 65 20 27 70 61 63 6b 61 67 65 2d 72 65 63 69 70 65 29 0a 3b 3b 3b 20 70 61 63 6b 61 67 65 2d	de.'package-recipe).;;;.package-
181a0	72 65 63 69 70 65 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 00	recipe.el.ends.here.............
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	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18220	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18240	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18260	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18280	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
182a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
182c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
182e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18300	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18320	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18340	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18360	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18380	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
183a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
183c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
183e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18400	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18420	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18440	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18460	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18480	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
184a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
184c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
184e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18500	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18520	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18540	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18560	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18580	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
185a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
185c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
185e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18600	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18620	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18640	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18660	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18680	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
186a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
186c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
186e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18700	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18720	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18740	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18760	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18780	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
187a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
187c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
187e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18800	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18820	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18840	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18860	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18880	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
188a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
188c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
188e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18900	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18920	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18940	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18960	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18980	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
189a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
189c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
189e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18a00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18a20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18a40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18a60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18a80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18aa0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18ac0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18ae0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18b00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18b20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18b40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18b60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18b80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18ba0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18bc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18be0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18c00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18c20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18c40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18c60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18c80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18ca0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18cc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18ce0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18d00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18d20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18d40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18d60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18d80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18da0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18dc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18de0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18e00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18e20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18e40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18e60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18e80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18ea0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18ec0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18ee0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18f00	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18f20	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18f40	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18f60	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18f80	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18fa0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18fc0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
18fe0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................