blob: aebfd4a6655745d8a00377b1809aba8974fde86b (plain)

ofs	hex dump	ascii
0000	3b 45 4c 43 1e 00 00 00 0a 3b 3b 3b 20 43 6f 6d 70 69 6c 65 64 0a 3b 3b 3b 20 69 6e 20 45 6d 61	;ELC.....;;;.Compiled.;;;.in.Ema
0020	63 73 20 76 65 72 73 69 6f 6e 20 33 30 2e 32 0a 3b 3b 3b 20 77 69 74 68 20 61 6c 6c 20 6f 70 74	cs.version.30.2.;;;.with.all.opt
0040	69 6d 69 7a 61 74 69 6f 6e 73 2e 0a 0a 0a 23 40 31 36 38 20 57 68 65 74 68 65 72 20 66 75 6e 63	imizations....#@168.Whether.func
0060	74 69 6f 6e 20 60 61 6e 6e 61 6c 69 73 74 2d 72 65 63 6f 72 64 27 20 73 68 6f 75 6c 64 20 64 6f	tion.`annalist-record'.should.do
0080	20 61 6e 79 74 68 69 6e 67 2e 0a 53 65 74 20 74 68 69 73 20 74 6f 20 6e 69 6c 20 69 66 20 79 6f	.anything..Set.this.to.nil.if.yo
00a0	75 20 6e 65 76 65 72 20 75 73 65 20 60 61 6e 6e 61 6c 69 73 74 2d 64 65 73 63 72 69 62 65 27 20	u.never.use.`annalist-describe'.
00c0	61 6e 64 20 77 61 6e 74 20 74 6f 20 73 68 61 76 65 20 73 6f 6d 65 0a 6d 69 6c 6c 69 73 65 63 6f	and.want.to.shave.some.milliseco
00e0	6e 64 73 20 6f 66 66 20 6f 66 20 79 6f 75 72 20 69 6e 69 74 20 74 69 6d 65 2e 1f 23 40 32 20 1f	nds.off.of.your.init.time..#@2..
0100	23 40 33 35 36 20 57 68 69 74 65 6c 69 73 74 20 6f 66 20 61 6e 6e 61 6c 69 73 74 2d 6e 61 6d 65	#@356.Whitelist.of.annalist-name
0120	2f 74 6f 6d 65 2d 74 79 70 65 20 70 61 69 72 73 20 74 6f 20 61 6c 6c 6f 77 20 72 65 63 6f 72 64	/tome-type.pairs.to.allow.record
0140	69 6e 67 2e 0a 41 6e 20 65 78 61 6d 70 6c 65 20 76 61 6c 75 65 20 77 6f 75 6c 64 20 62 65 20 28	ing..An.example.value.would.be.(
0160	6c 69 73 74 20 28 6c 69 73 74 20 27 61 6e 6e 61 6c 69 73 74 20 27 6b 65 79 62 69 6e 64 69 6e 67	list.(list.'annalist.'keybinding
0180	73 29 29 2e 20 74 20 63 61 6e 20 62 65 0a 73 70 65 63 69 66 69 65 64 20 74 6f 20 6d 61 74 63 68	s))..t.can.be.specified.to.match
01a0	20 61 6c 6c 20 61 6e 6e 61 6c 69 73 74 20 6e 61 6d 65 73 20 6f 72 20 74 6f 6d 65 20 74 79 70 65	.all.annalist.names.or.tome.type
01c0	73 2e 20 53 65 74 74 69 6e 67 20 74 68 69 73 20 76 61 72 69 61 62 6c 65 20 69 73 0a 6d 75 74 75	s..Setting.this.variable.is.mutu
01e0	61 6c 6c 79 20 65 78 63 6c 75 73 69 76 65 20 77 69 74 68 20 73 65 74 74 69 6e 67 20 60 61 6e 6e	ally.exclusive.with.setting.`ann
0200	61 6c 69 73 74 2d 72 65 63 6f 72 64 2d 62 6c 61 63 6b 6c 69 73 74 27 2e 20 53 65 74 74 69 6e 67	alist-record-blacklist'..Setting
0220	20 74 68 69 73 0a 76 61 72 69 61 62 6c 65 20 77 69 6c 6c 20 68 61 76 65 20 6e 6f 20 65 66 66 65	.this.variable.will.have.no.effe
0240	63 74 20 69 66 20 76 61 72 69 61 62 6c 65 20 60 61 6e 6e 61 6c 69 73 74 2d 72 65 63 6f 72 64 27	ct.if.variable.`annalist-record'
0260	20 69 73 20 6e 69 6c 2e 1f 23 40 33 34 37 20 42 6c 61 63 6b 6c 69 73 74 20 6f 66 20 61 6e 6e 61	.is.nil..#@347.Blacklist.of.anna
0280	6c 69 73 74 2d 6e 61 6d 65 2f 74 6f 6d 65 2d 74 79 70 65 20 70 61 69 72 73 20 74 6f 20 69 67 6e	list-name/tome-type.pairs.to.ign
02a0	6f 72 65 2e 0a 41 6e 20 65 78 61 6d 70 6c 65 20 76 61 6c 75 65 20 77 6f 75 6c 64 20 62 65 20 28	ore..An.example.value.would.be.(
02c0	6c 69 73 74 20 28 6c 69 73 74 20 27 61 6e 6e 61 6c 69 73 74 20 27 6b 65 79 62 69 6e 64 69 6e 67	list.(list.'annalist.'keybinding
02e0	73 29 29 2e 20 74 20 63 61 6e 20 62 65 0a 73 70 65 63 69 66 69 65 64 20 74 6f 20 6d 61 74 63 68	s))..t.can.be.specified.to.match
0300	20 61 6c 6c 20 61 6e 6e 61 6c 69 73 74 20 6e 61 6d 65 73 20 6f 72 20 74 6f 6d 65 20 74 79 70 65	.all.annalist.names.or.tome.type
0320	73 2e 20 53 65 74 74 69 6e 67 20 74 68 69 73 20 76 61 72 69 61 62 6c 65 20 69 73 0a 6d 75 74 75	s..Setting.this.variable.is.mutu
0340	61 6c 6c 79 20 65 78 63 6c 75 73 69 76 65 20 77 69 74 68 20 73 65 74 74 69 6e 67 20 60 61 6e 6e	ally.exclusive.with.setting.`ann
0360	61 6c 69 73 74 2d 72 65 63 6f 72 64 2d 77 68 69 74 65 6c 69 73 74 27 2e 20 53 65 74 74 69 6e 67	alist-record-whitelist'..Setting
0380	20 74 68 69 73 0a 76 61 72 69 61 62 6c 65 20 77 69 6c 6c 20 68 61 76 65 20 6e 6f 20 65 66 66 65	.this.variable.will.have.no.effe
03a0	63 74 20 69 66 20 76 61 72 69 61 62 6c 65 20 60 61 6e 6e 61 6c 69 73 74 2d 72 65 63 6f 72 64 27	ct.if.variable.`annalist-record'
03c0	20 69 73 20 6e 69 6c 2e 1f 23 40 31 31 31 20 48 6f 6f 6b 20 72 75 6e 20 69 6e 20 74 68 65 20 64	.is.nil..#@111.Hook.run.in.the.d
03e0	65 73 63 72 69 70 74 69 6f 6e 20 62 75 66 66 65 72 20 61 66 74 65 72 20 69 74 20 68 61 73 20 62	escription.buffer.after.it.has.b
0400	65 65 6e 20 70 6f 70 75 6c 61 74 65 64 2e 0a 54 68 65 20 62 75 66 66 65 72 20 69 73 20 65 64 69	een.populated..The.buffer.is.edi
0420	74 61 62 6c 65 20 77 68 65 6e 20 74 68 69 73 20 68 6f 6f 6b 20 69 73 20 72 75 6e 2e 1f 23 40 36	table.when.this.hook.is.run..#@6
0440	38 20 54 68 65 20 73 65 74 74 69 6e 67 20 6f 66 20 60 6f 72 67 2d 73 74 61 72 74 75 70 2d 66 6f	8.The.setting.of.`org-startup-fo
0460	6c 64 65 64 27 20 74 6f 20 75 73 65 20 69 6e 20 60 61 6e 6e 61 6c 69 73 74 2d 64 65 73 63 72 69	lded'.to.use.in.`annalist-descri
0480	62 65 27 2e 1f 23 40 31 38 39 20 55 73 65 64 20 69 6e 20 60 61 6e 6e 61 6c 69 73 74 2d 6d 75 6c	be'..#@189.Used.in.`annalist-mul
04a0	74 69 6c 69 6e 65 2d 73 6f 75 72 63 65 2d 62 6c 6f 63 6b 73 27 20 74 6f 20 66 6f 72 6d 61 74 20	tiline-source-blocks'.to.format.
04c0	74 6f 70 20 6c 65 76 65 6c 20 66 6f 72 6d 73 2e 0a 54 68 65 20 64 65 66 61 75 6c 74 20 69 73 20	top.level.forms..The.default.is.
04e0	60 6c 69 73 70 79 2d 61 6c 74 2d 6d 75 6c 74 69 6c 69 6e 65 27 20 77 68 69 63 68 20 72 65 73 75	`lispy-alt-multiline'.which.resu
0500	6c 74 73 20 69 6e 20 73 68 6f 72 74 65 72 20 6c 69 6e 65 20 6c 65 6e 67 74 68 73 2e 0a 60 6c 69	lts.in.shorter.line.lengths..`li
0520	73 70 79 2d 6d 75 6c 74 69 6c 69 6e 65 27 20 69 73 20 61 6e 6f 74 68 65 72 20 61 6c 74 65 72 6e	spy-multiline'.is.another.altern
0540	61 74 69 76 65 2e 1f 23 40 34 38 20 53 74 6f 72 65 73 20 72 65 63 6f 72 64 65 64 20 69 6e 66 6f	ative..#@48.Stores.recorded.info
0560	72 6d 61 74 69 6f 6e 20 66 6f 72 20 64 65 66 69 6e 65 64 20 74 6f 6d 65 73 2e 1f 0a 28 62 79 74	rmation.for.defined.tomes...(byt
0580	65 2d 63 6f 64 65 20 22 5c 33 30 30 5c 33 30 31 21 5c 32 31 30 5c 33 30 32 5c 33 30 33 5c 33 30	e-code."\300\301!\210\302\303\30
05a0	34 5c 33 30 35 5c 33 30 36 5c 33 30 37 5c 33 31 30 5c 33 31 31 26 07 5c 32 31 30 5c 33 31 32 5c	4\305\306\307\310\311&.\210\312\
05c0	33 31 33 5c 33 31 34 5c 33 31 35 5c 33 31 36 44 44 5c 33 31 37 5c 33 32 30 5c 33 32 31 25 5c 32	313\314\315\316DD\317\320\321%\2
05e0	31 30 5c 33 32 32 5c 33 32 33 5c 33 32 34 5c 33 32 35 5c 33 32 30 5c 33 32 36 25 5c 32 31 30 5c	10\322\323\324\325\320\326%\210\
0600	33 31 32 5c 33 32 37 5c 33 31 34 5c 33 31 35 5c 33 33 30 44 44 5c 33 33 31 5c 33 32 30 5c 33 32	312\327\314\315\330DD\331\320\32
0620	33 25 5c 32 31 30 5c 33 31 32 5c 33 33 32 5c 33 31 34 5c 33 31 35 5c 33 33 33 44 44 5c 33 33 34	3%\210\312\332\314\315\333DD\334
0640	5c 33 32 30 5c 33 32 33 25 5c 32 31 30 5c 33 31 32 5c 33 33 35 5c 33 31 34 5c 33 31 35 5c 33 33	\320\323%\210\312\335\314\315\33
0660	36 44 44 5c 33 33 37 5c 33 32 30 5c 33 34 30 25 5c 32 31 30 5c 33 31 32 5c 33 34 31 5c 33 31 34	6DD\337\320\340%\210\312\341\314
0680	5c 33 31 35 5c 33 34 32 44 44 5c 33 34 33 5c 33 32 30 5c 33 34 34 25 5c 32 31 30 5c 33 31 32 5c	\315\342DD\343\320\344%\210\312\
06a0	33 34 35 5c 33 31 34 5c 33 31 35 5c 33 34 36 44 44 5c 33 34 37 5c 33 32 30 5c 33 31 35 25 5c 32	345\314\315\346DD\347\320\315%\2
06c0	30 37 22 20 5b 72 65 71 75 69 72 65 20 63 6c 2d 6c 69 62 20 63 75 73 74 6f 6d 2d 64 65 63 6c 61	07".[require.cl-lib.custom-decla
06e0	72 65 2d 67 72 6f 75 70 20 61 6e 6e 61 6c 69 73 74 20 6e 69 6c 20 22 52 65 63 6f 72 64 20 61 6e	re-group.annalist.nil."Record.an
0700	64 20 64 69 73 70 6c 61 79 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 73 75 63 68 20 61 73 20 6b 65	d.display.information.such.as.ke
0720	79 62 69 6e 64 69 6e 67 73 2e 22 20 3a 67 72 6f 75 70 20 63 6f 6e 76 65 6e 69 65 6e 63 65 20 3a	ybindings.".:group.convenience.:
0740	70 72 65 66 69 78 20 22 61 6e 6e 61 6c 69 73 74 2d 22 20 63 75 73 74 6f 6d 2d 64 65 63 6c 61 72	prefix."annalist-".custom-declar
0760	65 2d 76 61 72 69 61 62 6c 65 20 61 6e 6e 61 6c 69 73 74 2d 72 65 63 6f 72 64 20 66 75 6e 63 61	e-variable.annalist-record.funca
0780	6c 6c 20 66 75 6e 63 74 69 6f 6e 20 23 5b 30 20 22 5c 33 30 30 5c 32 30 37 22 20 5b 74 5d 20 31	ll.function.#[0."\300\207".[t].1
07a0	20 28 23 24 20 2e 20 32 35 35 29 5d 20 28 23 24 20 2e 20 38 34 29 20 3a 74 79 70 65 20 62 6f 6f	.(#$...255)].(#$...84).:type.boo
07c0	6c 65 61 6e 20 64 65 66 69 6e 65 2d 77 69 64 67 65 74 20 61 6e 6e 61 6c 69 73 74 2d 6c 69 73 74	lean.define-widget.annalist-list
07e0	20 6c 61 7a 79 20 22 4c 69 73 74 20 77 69 74 68 20 65 6c 65 6d 65 6e 74 73 20 69 6e 20 74 68 65	.lazy."List.with.elements.in.the
0800	20 66 6f 72 6d 20 28 3c 61 6e 6e 61 6c 69 73 74 2d 6e 61 6d 65 3e 20 3c 74 6f 6d 65 2d 74 79 70	.form.(<annalist-name>.<tome-typ
0820	65 3e 29 2e 5c 6e 54 79 70 65 20 66 6f 72 20 60 61 6e 6e 61 6c 69 73 74 2d 72 65 63 6f 72 64 2d	e>).\nType.for.`annalist-record-
0840	62 6c 61 63 6b 6c 69 73 74 27 20 61 6e 64 20 60 61 6e 6e 61 6c 69 73 74 2d 72 65 63 6f 72 64 2d	blacklist'.and.`annalist-record-
0860	77 68 69 74 65 6c 69 73 74 27 2e 22 20 28 63 68 6f 69 63 65 20 28 6c 69 73 74 20 28 6c 69 73 74	whitelist'.".(choice.(list.(list
0880	20 73 79 6d 62 6f 6c 20 73 79 6d 62 6f 6c 29 29 20 28 63 6f 6e 73 74 20 6e 69 6c 29 29 20 61 6e	.symbol.symbol)).(const.nil)).an
08a0	6e 61 6c 69 73 74 2d 72 65 63 6f 72 64 2d 77 68 69 74 65 6c 69 73 74 20 23 5b 30 20 22 5c 33 30	nalist-record-whitelist.#[0."\30
08c0	30 5c 32 30 37 22 20 5b 6e 69 6c 5d 20 31 20 28 23 24 20 2e 20 32 35 35 29 5d 20 28 23 24 20 2e	0\207".[nil].1.(#$...255)].(#$..
08e0	20 32 36 32 29 20 61 6e 6e 61 6c 69 73 74 2d 72 65 63 6f 72 64 2d 62 6c 61 63 6b 6c 69 73 74 20	.262).annalist-record-blacklist.
0900	23 5b 30 20 22 5c 33 30 30 5c 32 30 37 22 20 5b 6e 69 6c 5d 20 31 20 28 23 24 20 2e 20 32 35 35	#[0."\300\207".[nil].1.(#$...255
0920	29 5d 20 28 23 24 20 2e 20 36 32 33 29 20 61 6e 6e 61 6c 69 73 74 2d 64 65 73 63 72 69 62 65 2d	)].(#$...623).annalist-describe-
0940	68 6f 6f 6b 20 23 5b 30 20 22 5c 33 30 30 5c 32 30 37 22 20 5b 6e 69 6c 5d 20 31 20 28 23 24 20	hook.#[0."\300\207".[nil].1.(#$.
0960	2e 20 32 35 35 29 5d 20 28 23 24 20 2e 20 39 37 35 29 20 68 6f 6f 6b 20 61 6e 6e 61 6c 69 73 74	..255)].(#$...975).hook.annalist
0980	2d 6f 72 67 2d 73 74 61 72 74 75 70 2d 66 6f 6c 64 65 64 20 23 5b 30 20 22 5c 33 30 30 5c 32 30	-org-startup-folded.#[0."\300\20
09a0	37 22 20 5b 6e 69 6c 5d 20 31 20 28 23 24 20 2e 20 32 35 35 29 5d 20 28 23 24 20 2e 20 31 30 39	7".[nil].1.(#$...255)].(#$...109
09c0	30 29 20 28 63 68 6f 69 63 65 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 6e 6f 66 6f 6c 64 3a 20	0).(choice.(const.:tag."nofold:.
09e0	73 68 6f 77 20 61 6c 6c 22 20 6e 69 6c 29 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 66 6f 6c 64	show.all".nil).(const.:tag."fold
0a00	3a 20 6f 76 65 72 76 69 65 77 22 20 74 29 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 63 6f 6e 74	:.overview".t).(const.:tag."cont
0a20	65 6e 74 3a 20 61 6c 6c 20 68 65 61 64 6c 69 6e 65 73 22 20 63 6f 6e 74 65 6e 74 29 20 28 63 6f	ent:.all.headlines".content).(co
0a40	6e 73 74 20 3a 74 61 67 20 22 73 68 6f 77 20 65 76 65 72 79 74 68 69 6e 67 2c 20 65 76 65 6e 20	nst.:tag."show.everything,.even.
0a60	64 72 61 77 65 72 73 22 20 73 68 6f 77 65 76 65 72 79 74 68 69 6e 67 29 29 20 61 6e 6e 61 6c 69	drawers".showeverything)).annali
0a80	73 74 2d 6d 75 6c 74 69 6c 69 6e 65 2d 66 75 6e 63 74 69 6f 6e 20 23 5b 30 20 22 5c 33 30 30 5c	st-multiline-function.#[0."\300\
0aa0	32 30 37 22 20 5b 6c 69 73 70 79 2d 61 6c 74 2d 6d 75 6c 74 69 6c 69 6e 65 5d 20 31 20 28 23 24	207".[lispy-alt-multiline].1.(#$
0ac0	20 2e 20 32 35 35 29 5d 20 28 23 24 20 2e 20 31 31 36 33 29 5d 20 38 29 0a 28 64 65 66 76 61 72	...255)].(#$...1163)].8).(defvar
0ae0	20 61 6e 6e 61 6c 69 73 74 2d 2d 74 6f 6d 65 73 20 6e 69 6c 20 28 23 24 20 2e 20 31 33 35 36 29	.annalist--tomes.nil.(#$...1356)
0b00	29 23 40 36 31 20 53 74 6f 72 65 73 20 62 75 66 66 65 72 2d 6c 6f 63 61 6c 20 72 65 63 6f 72 64	)#@61.Stores.buffer-local.record
0b20	65 64 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 66 6f 72 20 64 65 66 69 6e 65 64 20 74 6f 6d 65 73	ed.information.for.defined.tomes
0b40	2e 1f 0a 28 64 65 66 76 61 72 20 61 6e 6e 61 6c 69 73 74 2d 2d 6c 6f 63 61 6c 2d 74 6f 6d 65 73	...(defvar.annalist--local-tomes
0b60	20 6e 69 6c 20 28 23 24 20 2e 20 32 38 32 32 29 29 23 40 33 36 20 53 74 6f 72 65 73 20 73 65 74	.nil.(#$...2822))#@36.Stores.set
0b80	74 69 6e 67 73 20 66 6f 72 20 64 65 66 69 6e 65 64 20 74 6f 6d 65 73 2e 1f 0a 28 6d 61 6b 65 2d	tings.for.defined.tomes...(make-
0ba0	76 61 72 69 61 62 6c 65 2d 62 75 66 66 65 72 2d 6c 6f 63 61 6c 20 27 61 6e 6e 61 6c 69 73 74 2d	variable-buffer-local.'annalist-
0bc0	2d 6c 6f 63 61 6c 2d 74 6f 6d 65 73 29 0a 28 64 65 66 76 61 72 20 61 6e 6e 61 6c 69 73 74 2d 2d	-local-tomes).(defvar.annalist--
0be0	74 6f 6d 65 73 2d 73 65 74 74 69 6e 67 73 20 6e 69 6c 20 28 23 24 20 2e 20 32 39 33 34 29 29 23	tomes-settings.nil.(#$...2934))#
0c00	40 34 32 20 53 74 6f 72 65 73 20 70 6f 73 73 69 62 6c 65 20 76 69 65 77 73 20 66 6f 72 20 64 65	@42.Stores.possible.views.for.de
0c20	66 69 6e 65 64 20 74 6f 6d 65 73 2e 1f 0a 28 64 65 66 76 61 72 20 61 6e 6e 61 6c 69 73 74 2d 2d	fined.tomes...(defvar.annalist--
0c40	74 6f 6d 65 73 2d 76 69 65 77 73 20 28 6d 61 6b 65 2d 68 61 73 68 2d 74 61 62 6c 65 20 3a 74 65	tomes-views.(make-hash-table.:te
0c60	73 74 20 27 65 71 75 61 6c 29 20 28 23 24 20 2e 20 33 30 37 36 29 29 23 40 31 33 33 20 49 66 20	st.'equal).(#$...3076))#@133.If.
0c80	49 54 45 4d 20 69 73 20 61 20 6c 69 73 74 2c 20 72 65 74 75 72 6e 20 69 74 3b 20 6f 74 68 65 72	ITEM.is.a.list,.return.it;.other
0ca0	77 69 73 65 20 72 65 74 75 72 6e 20 28 6c 69 73 74 20 49 54 45 4d 29 2e 0a 49 66 20 49 54 45 4d	wise.return.(list.ITEM)..If.ITEM
0cc0	20 69 73 20 61 20 6c 61 6d 62 64 61 2c 20 69 74 20 77 69 6c 6c 20 6e 6f 74 20 62 65 20 63 6f 6e	.is.a.lambda,.it.will.not.be.con
0ce0	73 69 64 65 72 65 64 20 74 6f 20 62 65 20 61 20 6c 69 73 74 2e 0a 0a 28 66 6e 20 49 54 45 4d 29	sidered.to.be.a.list...(fn.ITEM)
0d00	1f 0a 28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 2d 6d 61 6b 65 2d 6c 69 73 74	..(defalias.'annalist--make-list
0d20	20 23 5b 32 35 37 20 22 5c 32 31 31 3c 5c 32 30 33 5c 66 00 5c 33 30 30 01 21 5c 32 30 34 5c 66	.#[257."\211<\203\f.\300.!\204\f
0d40	00 5c 32 30 37 43 5c 32 30 37 22 20 5b 66 75 6e 63 74 69 6f 6e 70 5d 20 33 20 28 23 24 20 2e 20	.\207C\207".[functionp].3.(#$...
0d60	33 31 39 37 29 5d 29 23 40 32 30 33 20 52 65 74 75 72 6e 20 74 68 65 20 72 65 73 75 6c 74 20 6f	3197)])#@203.Return.the.result.o
0d80	66 20 6d 65 72 67 69 6e 67 20 74 68 65 20 6c 69 73 74 73 20 41 20 69 6e 20 42 2e 0a 4d 65 72 67	f.merging.the.lists.A.in.B..Merg
0da0	69 6e 67 20 69 73 20 64 6f 6e 65 20 62 79 20 61 64 64 69 6e 67 20 69 74 65 6d 73 20 69 6e 20 42	ing.is.done.by.adding.items.in.B
0dc0	20 74 68 61 74 20 61 72 65 20 6e 6f 74 20 69 6e 20 41 20 28 61 73 20 74 65 73 74 65 64 20 62 79	.that.are.not.in.A.(as.tested.by
0de0	20 54 45 53 54 29 20 74 6f 0a 74 68 65 20 65 6e 64 20 6f 66 20 41 2e 20 54 68 65 20 6f 72 64 65	.TEST).to.the.end.of.A..The.orde
0e00	72 20 6f 66 20 62 6f 74 68 20 6c 69 73 74 73 20 69 73 20 70 72 65 73 65 72 76 65 64 2e 0a 0a 28	r.of.both.lists.is.preserved...(
0e20	66 6e 20 41 20 42 20 26 6f 70 74 69 6f 6e 61 6c 20 54 45 53 54 29 1f 23 40 31 35 20 0a 0a 28 66	fn.A.B.&optional.TEST).#@15...(f
0e40	6e 20 41 2d 49 54 45 4d 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 2d	n.A-ITEM)..(defalias.'annalist--
0e60	6d 65 72 67 65 2d 6c 69 73 74 73 20 23 5b 37 37 30 20 22 5c 33 30 30 03 03 5c 33 30 31 43 5c 33	merge-lists.#[770."\300..\301C\3
0e80	30 31 02 3a 5c 32 30 33 36 00 01 03 40 5c 32 34 30 5c 32 31 30 05 5c 32 30 33 21 00 5c 33 30 32	01.:\2036...@\240\210.\203!.\302
0ea0	5c 33 30 33 5c 33 30 34 04 06 09 23 06 09 5c 22 5c 32 30 32 26 00 01 5c 32 34 32 06 08 5c 32 33	\303\304...#..\"\202&..\242..\23
0ec0	35 5c 32 30 34 2f 00 01 5c 32 34 32 01 42 5c 32 36 32 01 02 41 5c 32 36 32 03 5c 32 30 32 06 00	5\204/..\242.B\262..A\262.\202..
0ee0	5c 32 36 36 5c 32 30 32 5c 32 33 37 5c 22 5c 32 30 37 22 20 5b 61 70 70 65 6e 64 20 6e 69 6c 20	\266\202\237\"\207".[append.nil.
0f00	63 6c 2d 73 6f 6d 65 20 6d 61 6b 65 2d 63 6c 6f 73 75 72 65 20 23 5b 32 35 37 20 22 5c 33 30 31	cl-some.make-closure.#[257."\301
0f20	01 5c 33 30 30 5c 32 34 32 5c 22 5c 32 30 37 22 20 5b 56 30 20 56 31 5d 20 34 20 28 23 24 20 2e	.\300\242\"\207".[V0.V1].4.(#$..
0f40	20 33 36 34 34 29 5d 5d 20 31 33 20 28 23 24 20 2e 20 33 34 33 37 29 5d 29 23 40 31 32 35 20 52	.3644)]].13.(#$...3437)])#@125.R
0f60	65 74 75 72 6e 20 74 68 65 20 72 65 73 75 6c 74 20 6f 66 20 6d 65 72 67 69 6e 67 20 74 68 65 20	eturn.the.result.of.merging.the.
0f80	70 6c 69 73 74 73 20 41 20 61 6e 64 20 42 2e 0a 57 68 65 6e 20 74 68 65 20 73 61 6d 65 20 70 72	plists.A.and.B..When.the.same.pr
0fa0	6f 70 65 72 74 79 20 65 78 69 73 74 73 20 69 6e 20 62 6f 74 68 20 41 20 61 6e 64 20 42 2c 20 70	operty.exists.in.both.A.and.B,.p
0fc0	72 65 66 65 72 20 41 27 73 20 76 61 6c 75 65 2e 0a 0a 28 66 6e 20 41 20 42 29 1f 0a 28 64 65 66	refer.A's.value...(fn.A.B)..(def
0fe0	61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 2d 6d 65 72 67 65 2d 70 6c 69 73 74 73 20 23 5b	alias.'annalist--merge-plists.#[
1000	35 31 34 20 22 5c 33 30 30 02 21 01 5c 33 30 31 5c 32 31 31 5c 32 31 31 03 3a 5c 32 30 33 30 00	514."\300.!.\301\211\211.:\2030.
1020	5c 32 31 30 02 5c 32 31 31 01 41 5c 32 36 32 02 5c 32 34 32 5c 32 36 32 03 5c 32 31 31 40 5c 32	\210.\211.A\262.\242\262.\211@\2
1040	36 32 02 5c 33 30 32 05 04 5c 22 5c 32 30 34 28 00 5c 33 30 33 05 04 04 23 5c 32 36 32 05 03 41	62.\302..\"\204(.\303...#\262..A
1060	41 5c 32 36 32 04 5c 32 30 32 07 00 5c 32 36 36 04 5c 32 30 37 22 20 5b 63 6c 2d 63 6f 70 79 2d	A\262.\202..\266.\207".[cl-copy-
1080	6c 69 73 74 20 6e 69 6c 20 70 6c 69 73 74 2d 67 65 74 20 70 6c 69 73 74 2d 70 75 74 5d 20 31 31	list.nil.plist-get.plist-put].11
10a0	20 28 23 24 20 2e 20 33 39 33 35 29 5d 29 23 40 32 36 38 20 52 65 74 75 72 6e 20 74 68 65 20 72	.(#$...3935)])#@268.Return.the.r
10c0	65 73 75 6c 74 20 6f 66 20 6d 65 72 67 69 6e 67 20 74 68 65 20 73 65 74 74 69 6e 67 73 20 70 6c	esult.of.merging.the.settings.pl
10e0	69 73 74 73 20 41 20 61 6e 64 20 42 2e 0a 57 68 65 6e 20 74 68 65 20 73 61 6d 65 20 70 72 6f 70	ists.A.and.B..When.the.same.prop
1100	65 72 74 79 20 65 78 69 73 74 73 20 69 6e 20 62 6f 74 68 20 41 20 61 6e 64 20 42 2c 20 70 72 65	erty.exists.in.both.A.and.B,.pre
1120	66 65 72 20 41 27 73 20 76 61 6c 75 65 20 75 6e 6c 65 73 73 20 74 68 65 20 76 61 6c 75 65 0a 69	fer.A's.value.unless.the.value.i
1140	73 20 61 20 6e 65 73 74 65 64 20 70 6c 69 73 74 2e 20 49 6e 20 74 68 61 74 20 63 61 73 65 2c 20	s.a.nested.plist..In.that.case,.
1160	6d 65 72 67 65 20 74 68 65 20 6e 65 73 74 65 64 20 70 6c 69 73 74 73 20 6f 66 20 74 68 65 20 74	merge.the.nested.plists.of.the.t
1180	77 6f 2e 20 54 68 69 73 0a 66 75 6e 63 74 69 6f 6e 20 6f 6e 6c 79 20 68 61 6e 64 6c 65 73 20 6f	wo..This.function.only.handles.o
11a0	6e 65 20 6c 65 76 65 6c 20 6f 66 20 6e 65 73 74 69 6e 67 2e 0a 0a 28 66 6e 20 41 20 42 29 1f 0a	ne.level.of.nesting...(fn.A.B)..
11c0	28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 2d 6d 65 72 67 65 2d 6e 65 73 74 65	(defalias.'annalist--merge-neste
11e0	64 2d 70 6c 69 73 74 73 20 23 5b 35 31 34 20 22 5c 33 30 30 02 21 01 5c 33 30 31 5c 32 31 31 5c	d-plists.#[514."\300.!.\301\211\
1200	32 31 31 03 3a 5c 32 30 33 49 00 5c 32 31 30 02 5c 32 31 31 01 41 5c 32 36 32 02 5c 32 34 32 5c	211.:\203I.\210.\211.A\262.\242\
1220	32 36 32 03 5c 32 31 31 40 5c 32 36 32 02 5c 33 30 32 05 04 5c 22 5c 32 30 34 2b 00 5c 33 30 33	262.\211@\262.\302..\"\204+.\303
1240	05 04 04 23 5c 32 36 32 05 5c 32 30 32 41 00 01 3c 5c 32 30 33 41 00 5c 33 30 34 5c 33 30 32 06	...#\262.\202A..<\203A.\304\302.
1260	06 05 5c 22 03 5c 22 5c 33 30 33 06 06 05 03 23 5c 32 36 32 06 5c 32 31 30 03 41 41 5c 32 36 32	..\".\"\303....#\262.\210.AA\262
1280	04 5c 32 30 32 07 00 5c 32 36 36 04 5c 32 30 37 22 20 5b 63 6c 2d 63 6f 70 79 2d 6c 69 73 74 20	.\202..\266.\207".[cl-copy-list.
12a0	6e 69 6c 20 70 6c 69 73 74 2d 67 65 74 20 63 6c 2d 2d 73 65 74 2d 67 65 74 66 20 61 6e 6e 61 6c	nil.plist-get.cl--set-getf.annal
12c0	69 73 74 2d 2d 6d 65 72 67 65 2d 70 6c 69 73 74 73 5d 20 31 32 20 28 23 24 20 2e 20 34 32 37 36	ist--merge-plists].12.(#$...4276
12e0	29 5d 29 23 40 33 32 32 20 46 72 6f 6d 20 50 4c 49 53 54 20 6f 72 20 46 41 4c 4c 42 41 43 4b 2d	)])#@322.From.PLIST.or.FALLBACK-
1300	50 4c 49 53 54 20 67 65 74 20 74 68 65 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 76 61 6c 75	PLIST.get.the.corresponding.valu
1320	65 20 66 6f 72 20 4b 45 59 57 4f 52 44 2e 0a 46 41 4c 4c 42 41 43 4b 2d 50 4c 49 53 54 20 77 69	e.for.KEYWORD..FALLBACK-PLIST.wi
1340	6c 6c 20 62 65 20 63 68 65 63 6b 65 64 20 77 68 65 6e 20 4b 45 59 57 4f 52 44 20 64 6f 65 73 20	ll.be.checked.when.KEYWORD.does.
1360	6e 6f 74 20 65 78 69 73 74 20 69 6e 20 50 4c 49 53 54 20 28 62 75 74 20 6e 6f 74 20 69 6e 0a 63	not.exist.in.PLIST.(but.not.in.c
1380	61 73 65 73 20 77 68 65 72 65 20 69 74 20 69 73 20 65 78 70 6c 69 63 69 74 6c 79 20 73 70 65 63	ases.where.it.is.explicitly.spec
13a0	69 66 69 65 64 20 69 6e 20 50 4c 49 53 54 20 61 73 20 6e 69 6c 29 2e 20 49 66 20 4b 45 59 57 4f	ified.in.PLIST.as.nil)..If.KEYWO
13c0	52 44 20 69 73 20 6e 6f 74 0a 73 70 65 63 69 66 69 65 64 20 69 6e 20 65 69 74 68 65 72 20 70 6c	RD.is.not.specified.in.either.pl
13e0	69 73 74 2c 20 72 65 74 75 72 6e 20 44 45 46 41 55 4c 54 2e 0a 0a 28 66 6e 20 50 4c 49 53 54 20	ist,.return.DEFAULT...(fn.PLIST.
1400	46 41 4c 4c 42 41 43 4b 2d 50 4c 49 53 54 20 4b 45 59 57 4f 52 44 20 26 6f 70 74 69 6f 6e 61 6c	FALLBACK-PLIST.KEYWORD.&optional
1420	20 44 45 46 41 55 4c 54 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 2d	.DEFAULT)..(defalias.'annalist--
1440	67 65 74 20 23 5b 31 30 32 37 20 22 5c 33 30 30 04 03 5c 33 30 30 06 06 06 06 06 06 23 23 5c 32	get.#[1027."\300..\300......##\2
1460	30 37 22 20 5b 63 6c 2d 67 65 74 66 5d 20 31 31 20 28 23 24 20 2e 20 34 38 34 31 29 5d 29 23 40	07".[cl-getf].11.(#$...4841)])#@
1480	34 32 31 20 45 78 74 72 61 63 74 20 61 6e 20 69 74 65 6d 2d 73 70 65 63 69 66 69 63 20 73 65 74	421.Extract.an.item-specific.set
14a0	74 69 6e 67 20 66 72 6f 6d 20 53 45 54 54 49 4e 47 53 2e 0a 53 45 54 54 49 4e 47 53 20 69 73 20	ting.from.SETTINGS..SETTINGS.is.
14c0	61 20 73 65 74 74 69 6e 67 73 20 70 6c 69 73 74 20 6f 66 20 74 68 65 20 66 6f 72 6d 20 28 49 54	a.settings.plist.of.the.form.(IT
14e0	45 4d 31 20 28 50 52 4f 50 31 20 76 61 6c 75 65 31 29 20 3a 64 65 66 61 75 6c 74 73 20 28 50 52	EM1.(PROP1.value1).:defaults.(PR
1500	4f 50 31 0a 64 65 66 61 75 6c 74 76 61 6c 75 65 29 29 2e 20 49 54 45 4d 20 69 73 20 74 68 65 20	OP1.defaultvalue))..ITEM.is.the.
1520	69 74 65 6d 20 74 6f 20 63 68 65 63 6b 20 66 6f 72 20 50 52 4f 50 20 66 6f 72 2e 20 50 52 4f 50	item.to.check.for.PROP.for..PROP
1540	20 69 73 20 74 68 65 20 73 65 74 74 69 6e 67 20 74 6f 0a 63 68 65 63 6b 20 66 6f 72 20 28 65 2e	.is.the.setting.to.check.for.(e.
1560	67 2e 20 3a 66 6f 72 6d 61 74 29 2e 20 49 66 20 50 52 4f 50 20 64 6f 65 73 20 6e 6f 74 20 61 70	g..:format)..If.PROP.does.not.ap
1580	70 65 61 72 20 69 6e 20 74 68 65 20 49 54 45 4d 27 73 20 70 6c 69 73 74 2c 20 72 65 74 75 72 6e	pear.in.the.ITEM's.plist,.return
15a0	0a 74 68 65 20 76 61 6c 75 65 20 66 72 6f 6d 20 74 68 65 20 3a 64 65 66 61 75 6c 74 73 20 70 6c	.the.value.from.the.:defaults.pl
15c0	69 73 74 20 28 6f 72 20 44 45 46 41 55 4c 54 20 69 66 20 74 68 65 20 70 72 6f 70 65 72 74 79 20	ist.(or.DEFAULT.if.the.property.
15e0	69 73 20 6e 6f 74 20 73 70 65 63 69 66 69 65 64 0a 69 6e 20 65 69 74 68 65 72 29 2e 0a 0a 28 66	is.not.specified.in.either)...(f
1600	6e 20 53 45 54 54 49 4e 47 53 20 49 54 45 4d 20 50 52 4f 50 20 26 6f 70 74 69 6f 6e 61 6c 20 44	n.SETTINGS.ITEM.PROP.&optional.D
1620	45 46 41 55 4c 54 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 2d 69 74	EFAULT)..(defalias.'annalist--it
1640	65 6d 2d 67 65 74 20 23 5b 31 30 32 37 20 22 5c 33 30 30 04 5c 33 30 31 5c 22 5c 33 30 30 05 05	em-get.#[1027."\300.\301\"\300..
1660	5c 22 5c 33 30 32 01 03 06 06 06 06 24 5c 32 30 37 22 20 5b 70 6c 69 73 74 2d 67 65 74 20 3a 64	\"\302......$\207".[plist-get.:d
1680	65 66 61 75 6c 74 73 20 61 6e 6e 61 6c 69 73 74 2d 2d 67 65 74 5d 20 31 31 20 28 23 24 20 2e 20	efaults.annalist--get].11.(#$...
16a0	35 32 35 32 29 5d 29 23 40 33 31 30 20 52 65 74 75 72 6e 20 74 68 65 20 74 65 73 74 20 73 70 65	5252)])#@310.Return.the.test.spe
16c0	63 69 66 69 65 64 20 62 79 20 3a 74 65 73 74 20 69 6e 20 53 45 54 54 49 4e 47 53 20 66 6f 72 20	cified.by.:test.in.SETTINGS.for.
16e0	49 54 45 4d 27 73 20 70 6c 69 73 74 2e 0a 53 45 54 54 49 4e 47 53 20 69 73 20 61 20 70 6c 69 73	ITEM's.plist..SETTINGS.is.a.plis
1700	74 20 69 6e 20 74 68 65 20 66 6f 72 6d 20 28 49 54 45 4d 31 20 28 3a 74 65 73 74 20 27 65 71 29	t.in.the.form.(ITEM1.(:test.'eq)
1720	20 49 54 45 4d 32 20 28 3a 74 65 73 74 20 27 6d 79 2d 74 65 73 74 29 0a 3a 64 65 66 61 75 6c 74	.ITEM2.(:test.'my-test).:default
1740	73 20 28 3a 74 65 73 74 20 27 73 6f 6d 65 2d 74 65 73 74 29 29 2e 20 49 66 20 3a 74 65 73 74 20	s.(:test.'some-test))..If.:test.
1760	69 73 20 6e 6f 74 20 69 6e 20 49 54 45 4d 27 73 20 70 6c 69 73 74 2c 20 63 68 65 63 6b 20 66 6f	is.not.in.ITEM's.plist,.check.fo
1780	72 20 3a 74 65 73 74 0a 69 6e 20 74 68 65 20 3a 64 65 66 61 75 6c 74 73 20 70 6c 69 73 74 2e 20	r.:test.in.the.:defaults.plist..
17a0	49 66 20 3a 74 65 73 74 20 69 73 20 69 6e 20 6e 65 69 74 68 65 72 20 70 6c 69 73 74 2c 20 72 65	If.:test.is.in.neither.plist,.re
17c0	74 75 72 6e 20 23 27 65 71 75 61 6c 2e 0a 0a 28 66 6e 20 53 45 54 54 49 4e 47 53 20 49 54 45 4d	turn.#'equal...(fn.SETTINGS.ITEM
17e0	29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 2d 74 65 73 74 20 23 5b 35	)..(defalias.'annalist--test.#[5
1800	31 34 20 22 5c 33 30 30 02 02 5c 33 30 31 23 5c 32 30 36 09 00 5c 33 30 32 5c 32 30 37 22 20 5b	14."\300..\301#\206..\302\207".[
1820	61 6e 6e 61 6c 69 73 74 2d 2d 69 74 65 6d 2d 67 65 74 20 3a 74 65 73 74 20 65 71 75 61 6c 5d 20	annalist--item-get.:test.equal].
1840	36 20 28 23 24 20 2e 20 35 38 30 35 29 5d 29 23 40 37 38 33 20 43 6f 6e 76 65 72 74 20 44 45 46	6.(#$...5805)])#@783.Convert.DEF
1860	49 4e 49 54 49 4f 4e 2d 53 45 54 54 49 4e 47 53 20 74 6f 20 61 6e 20 69 6e 74 65 72 6e 61 6c 6c	INITION-SETTINGS.to.an.internall
1880	79 20 75 73 65 61 62 6c 65 20 70 6c 69 73 74 2e 0a 44 45 46 49 4e 49 54 49 4f 4e 2d 53 45 54 54	y.useable.plist..DEFINITION-SETT
18a0	49 4e 47 53 20 69 73 20 61 20 6c 69 73 74 20 6f 66 20 61 72 67 75 6d 65 6e 74 73 20 66 6f 72 20	INGS.is.a.list.of.arguments.for.
18c0	60 61 6e 6e 61 6c 69 73 74 2d 64 65 66 69 6e 65 2d 74 6f 6d 65 27 2e 0a 46 6f 72 20 65 78 61 6d	`annalist-define-tome'..For.exam
18e0	70 6c 65 3a 0a 27 28 3a 74 65 73 74 20 6d 79 2d 65 71 75 61 6c 0a 20 20 3a 70 72 69 6d 61 72 79	ple:.'(:test.my-equal...:primary
1900	2d 6b 65 79 20 28 6b 65 79 6d 61 70 20 6b 65 79 29 0a 20 20 6b 65 79 6d 61 70 0a 20 20 6b 65 79	-key.(keymap.key)...keymap...key
1920	0a 20 20 64 65 66 69 6e 69 74 69 6f 6e 29 0a 0a 77 6f 75 6c 64 20 62 65 63 6f 6d 65 20 28 69 67	...definition)..would.become.(ig
1940	6e 6f 72 69 6e 67 20 6f 72 64 65 72 29 3a 0a 27 28 3a 74 79 70 65 20 54 59 50 45 0a 20 20 3a 74	noring.order):.'(:type.TYPE...:t
1960	65 73 74 20 6d 79 2d 65 71 75 61 6c 0a 20 20 3a 70 72 69 6d 61 72 79 2d 6b 65 79 20 28 6b 65 79	est.my-equal...:primary-key.(key
1980	6d 61 70 20 6b 65 79 29 0a 20 20 3a 6b 65 79 2d 69 6e 64 69 63 65 73 20 28 30 20 31 29 0a 20 20	map.key)...:key-indices.(0.1)...
19a0	3a 66 69 6e 61 6c 2d 69 6e 64 65 78 20 32 0a 20 20 3a 6d 65 74 61 64 61 74 61 2d 69 6e 64 65 78	:final-index.2...:metadata-index
19c0	20 33 0a 20 20 30 20 28 3a 6e 61 6d 65 20 6b 65 79 6d 61 70 20 3a 69 6e 64 65 78 20 30 29 0a 20	.3...0.(:name.keymap.:index.0)..
19e0	20 31 20 28 3a 6e 61 6d 65 20 6b 65 79 20 3a 69 6e 64 65 78 20 31 29 0a 20 20 32 20 28 3a 6e 61	.1.(:name.key.:index.1)...2.(:na
1a00	6d 65 20 64 65 66 69 6e 69 74 69 6f 6e 20 3a 69 6e 64 65 78 20 32 29 0a 20 20 6b 65 79 6d 61 70	me.definition.:index.2)...keymap
1a20	20 28 3a 6e 61 6d 65 20 6b 65 79 6d 61 70 20 3a 69 6e 64 65 78 20 30 29 0a 20 20 6b 65 79 20 28	.(:name.keymap.:index.0)...key.(
1a40	3a 6e 61 6d 65 20 6b 65 79 20 3a 69 6e 64 65 78 20 31 29 0a 20 20 64 65 66 69 6e 69 74 69 6f 6e	:name.key.:index.1)...definition
1a60	20 28 3a 6e 61 6d 65 20 64 65 66 69 6e 69 74 69 6f 6e 20 69 6e 64 65 78 20 32 29 29 0a 0a 49 66	.(:name.definition.index.2))..If
1a80	20 56 49 45 57 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 65 78 63 6c 75 64 65 20 74 68 65 20 65 78	.VIEW.is.non-nil,.exclude.the.ex
1aa0	74 72 61 20 67 65 6e 65 72 61 74 65 64 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 28 65 2e 67 2e 20	tra.generated.information.(e.g..
1ac0	3a 66 69 6e 61 6c 2d 69 6e 64 65 78 29 2e 0a 41 6c 73 6f 20 61 6c 6c 6f 77 20 6e 6f 74 20 73 70	:final-index)..Also.allow.not.sp
1ae0	65 63 69 66 79 69 6e 67 20 61 6c 6c 20 69 74 65 6d 73 2e 20 49 6e 64 69 63 65 73 20 61 72 65 20	ecifying.all.items..Indices.are.
1b00	64 65 74 65 72 6d 69 6e 65 64 20 62 79 20 63 68 65 63 6b 69 6e 67 20 74 68 65 0a 73 74 6f 72 65	determined.by.checking.the.store
1b20	64 20 73 65 74 74 69 6e 67 73 20 66 6f 72 20 54 59 50 45 2e 0a 0a 28 66 6e 20 44 45 46 49 4e 49	d.settings.for.TYPE...(fn.DEFINI
1b40	54 49 4f 4e 2d 53 45 54 54 49 4e 47 53 20 54 59 50 45 20 26 6f 70 74 69 6f 6e 61 6c 20 56 49 45	TION-SETTINGS.TYPE.&optional.VIE
1b60	57 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 2d 70 6c 69 73 74 69 66	W)..(defalias.'annalist--plistif
1b80	79 2d 73 65 74 74 69 6e 67 73 20 23 5b 37 37 30 20 22 5c 33 30 30 01 5c 32 30 35 08 00 5c 33 30	y-settings.#[770."\300.\205..\30
1ba0	31 03 21 5c 33 30 32 5c 32 31 31 5c 32 31 31 06 07 5c 33 30 32 5c 32 31 31 5c 32 31 31 03 3a 5c	1.!\302\211\211..\302\211\211.:\
1bc0	32 30 33 3e 00 5c 32 31 30 02 5c 32 31 31 01 41 5c 32 36 32 02 5c 32 34 32 5c 32 36 32 03 5c 32	203>.\210.\211.A\262.\242\262.\2
1be0	31 31 40 5c 32 36 32 02 02 5c 33 30 33 3d 5c 32 30 33 36 00 01 3c 5c 32 30 33 32 00 01 5c 32 30	11@\262..\303=\2036..<\2032..\20
1c00	32 34 00 01 43 5c 32 36 32 07 03 41 41 5c 32 36 32 04 5c 32 30 32 10 00 5c 32 36 36 04 06 07 5c	24..C\262..AA\262.\202..\266...\
1c20	32 30 33 5c 32 36 33 00 06 07 5c 32 31 31 41 5c 32 36 32 09 5c 32 34 32 5c 33 30 34 01 21 5c 32	203\263...\211A\262.\242\304.!\2
1c40	30 33 62 00 5c 33 30 35 02 02 06 0b 5c 32 31 31 41 5c 32 36 32 0d 5c 32 34 32 23 5c 32 36 36 5c	03b.\305....\211A\262.\242#\266\
1c60	32 30 32 5c 32 30 32 40 00 5c 32 31 31 3c 5c 32 30 33 6c 00 5c 32 31 31 40 5c 32 30 32 6d 00 5c	202\202@.\211<\203l.\211@\202m.\
1c80	32 31 31 06 07 5c 32 30 33 7d 00 5c 33 30 36 5c 32 31 31 06 07 03 5c 22 5c 33 30 37 5c 22 5c 32	211..\203}.\306\211...\"\307\"\2
1ca0	30 32 7f 00 06 06 5c 33 31 30 5c 33 31 31 03 5c 33 30 37 04 46 04 3c 5c 32 30 35 5c 32 31 34 00	02....\310\311.\307.F.<\205\214.
1cc0	04 41 5c 22 5c 33 30 35 05 04 03 23 5c 32 36 32 05 5c 33 30 35 05 03 03 23 5c 32 36 32 05 02 06	.A\"\305...#\262.\305...#\262...
1ce0	07 3e 5c 32 30 33 5c 32 35 31 00 06 08 06 06 42 5c 32 36 32 06 06 08 54 5c 32 36 32 09 5c 32 36	.>\203\251.....B\262...T\262.\26
1d00	36 04 5c 32 30 32 40 00 05 5c 32 30 33 5c 32 37 30 00 5c 32 30 37 5c 33 31 30 5c 33 31 32 06 08	6.\202@..\203\270.\207\310\312..
1d20	5c 33 31 33 5c 33 31 34 06 06 5c 33 31 35 5c 22 5c 33 31 36 06 5c 6e 53 5c 33 31 37 06 5c 66 5c	\313\314..\315\"\316.\nS\317.\f\
1d40	32 35 37 08 02 5c 22 5c 32 30 37 22 20 5b 30 20 61 6e 6e 61 6c 69 73 74 2d 2d 67 65 74 2d 74 6f	257..\"\207".[0.annalist--get-to
1d60	6d 65 2d 73 65 74 74 69 6e 67 73 20 6e 69 6c 20 3a 70 72 69 6d 61 72 79 2d 6b 65 79 20 6b 65 79	me-settings.nil.:primary-key.key
1d80	77 6f 72 64 70 20 70 6c 69 73 74 2d 70 75 74 20 70 6c 69 73 74 2d 67 65 74 20 3a 69 6e 64 65 78	wordp.plist-put.plist-get.:index
1da0	20 61 70 70 65 6e 64 20 3a 6e 61 6d 65 20 3a 74 79 70 65 20 3a 6b 65 79 2d 69 6e 64 69 63 65 73	.append.:name.:type.:key-indices
1dc0	20 73 6f 72 74 20 3c 20 3a 66 69 6e 61 6c 2d 69 6e 64 65 78 20 3a 6d 65 74 61 64 61 74 61 2d 69	.sort.<.:final-index.:metadata-i
1de0	6e 64 65 78 5d 20 31 37 20 28 23 24 20 2e 20 36 32 32 39 29 5d 29 23 40 37 31 20 43 6f 6e 76 65	ndex].17.(#$...6229)])#@71.Conve
1e00	72 74 20 74 68 65 20 6f 72 64 65 72 65 64 20 52 45 43 4f 52 44 20 6c 69 73 74 20 6f 66 20 54 59	rt.the.ordered.RECORD.list.of.TY
1e20	50 45 20 74 6f 20 61 20 70 6c 69 73 74 2e 0a 0a 28 66 6e 20 52 45 43 4f 52 44 20 54 59 50 45 29	PE.to.a.plist...(fn.RECORD.TYPE)
1e40	1f 0a 28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 70 6c 69 73 74 69 66 79 2d 72	..(defalias.'annalist-plistify-r
1e60	65 63 6f 72 64 20 23 5b 35 31 34 20 22 5c 33 30 30 01 21 5c 33 30 31 01 5c 33 30 32 5c 22 03 38	ecord.#[514."\300.!\301.\302\".8
1e80	5c 33 30 33 32 44 00 5c 33 30 34 5c 33 30 31 03 5c 33 30 35 5c 22 5c 33 30 36 02 02 58 5c 32 30	\3032D.\304\301.\305\"\306..X\20
1ea0	33 37 00 5c 32 31 31 5c 33 30 31 5c 32 31 31 06 07 06 06 5c 22 5c 33 30 37 5c 22 43 5c 32 34 34	37.\211\301\211....\"\307\"C\244
1ec0	5c 32 36 32 01 5c 32 31 31 03 06 08 38 43 5c 32 34 34 5c 32 36 32 01 02 54 5c 32 36 32 03 5c 32	\262.\211...8C\244\262..T\262.\2
1ee0	30 32 13 00 5c 33 31 30 5c 33 30 33 02 5c 33 31 31 06 07 44 5c 32 34 34 5c 22 5c 32 36 36 04 5c	02..\310\303.\311..D\244\"\266.\
1f00	33 30 36 30 5c 32 30 37 22 20 5b 61 6e 6e 61 6c 69 73 74 2d 2d 67 65 74 2d 74 6f 6d 65 2d 73 65	3060\207".[annalist--get-tome-se
1f20	74 74 69 6e 67 73 20 70 6c 69 73 74 2d 67 65 74 20 3a 6d 65 74 61 64 61 74 61 2d 69 6e 64 65 78	ttings.plist-get.:metadata-index
1f40	20 2d 2d 63 6c 2d 62 6c 6f 63 6b 2d 6e 69 6c 2d 2d 20 30 20 3a 66 69 6e 61 6c 2d 69 6e 64 65 78	.--cl-block-nil--.0.:final-index
1f60	20 6e 69 6c 20 3a 6e 61 6d 65 20 74 68 72 6f 77 20 74 5d 20 31 32 20 28 23 24 20 2e 20 37 36 37	.nil.:name.throw.t].12.(#$...767
1f80	35 29 5d 29 23 40 37 32 20 43 6f 6e 76 65 72 74 20 74 68 65 20 52 45 43 4f 52 44 20 70 6c 69 73	5)])#@72.Convert.the.RECORD.plis
1fa0	74 20 6f 66 20 54 59 50 45 20 74 6f 20 61 6e 20 6f 72 64 65 72 65 64 20 6c 69 73 74 2e 0a 0a 28	t.of.TYPE.to.an.ordered.list...(
1fc0	66 6e 20 52 45 43 4f 52 44 20 54 59 50 45 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61	fn.RECORD.TYPE)..(defalias.'anna
1fe0	6c 69 73 74 2d 6c 69 73 74 69 66 79 2d 72 65 63 6f 72 64 20 23 5b 35 31 34 20 22 5c 33 30 30 01	list-listify-record.#[514."\300.
2000	21 5c 33 30 31 32 3b 00 5c 33 30 32 5c 33 30 33 02 5c 33 30 34 5c 22 5c 33 30 35 02 02 58 5c 32	!\3012;.\302\303.\304\"\305..X\2
2020	30 33 2c 00 5c 32 31 31 5c 33 30 33 06 07 5c 33 30 33 5c 32 31 31 06 08 06 08 5c 22 5c 33 30 36	03,.\211\303..\303\211....\"\306
2040	5c 22 5c 22 43 5c 32 34 34 5c 32 36 32 01 02 54 5c 32 36 32 03 5c 32 30 32 0d 00 5c 33 30 37 5c	\"\"C\244\262..T\262.\202..\307\
2060	33 30 31 02 5c 33 30 33 06 09 5c 33 31 30 5c 22 43 5c 32 34 34 5c 22 5c 32 36 36 04 5c 33 30 35	301.\303..\310\"C\244\"\266.\305
2080	30 5c 32 30 37 22 20 5b 61 6e 6e 61 6c 69 73 74 2d 2d 67 65 74 2d 74 6f 6d 65 2d 73 65 74 74 69	0\207".[annalist--get-tome-setti
20a0	6e 67 73 20 2d 2d 63 6c 2d 62 6c 6f 63 6b 2d 6e 69 6c 2d 2d 20 30 20 70 6c 69 73 74 2d 67 65 74	ngs.--cl-block-nil--.0.plist-get
20c0	20 3a 66 69 6e 61 6c 2d 69 6e 64 65 78 20 6e 69 6c 20 3a 6e 61 6d 65 20 74 68 72 6f 77 20 74 5d	.:final-index.nil.:name.throw.t]
20e0	20 31 33 20 28 23 24 20 2e 20 38 30 37 33 29 5d 29 23 40 39 30 20 52 65 74 75 72 6e 20 74 68 65	.13.(#$...8073)])#@90.Return.the
2100	20 74 6f 6d 65 20 66 6f 72 20 54 59 50 45 20 61 6e 64 20 4c 4f 43 41 4c 2c 20 63 72 65 61 74 69	.tome.for.TYPE.and.LOCAL,.creati
2120	6e 67 20 69 74 20 69 66 20 6e 65 63 65 73 73 61 72 79 2e 0a 0a 28 66 6e 20 54 59 50 45 20 26 6f	ng.it.if.necessary...(fn.TYPE.&o
2140	70 74 69 6f 6e 61 6c 20 4c 4f 43 41 4c 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61 6c	ptional.LOCAL)..(defalias.'annal
2160	69 73 74 2d 2d 74 6f 6d 65 20 23 5b 35 31 33 20 22 5c 32 31 31 5c 32 30 33 0b 00 5c 33 30 32 08	ist--tome.#[513."\211\203..\302.
2180	03 5c 22 5c 32 30 32 0f 00 5c 33 30 32 09 03 5c 22 5c 32 31 31 5c 32 30 36 30 00 01 5c 32 30 33	.\"\202..\302..\"\211\2060..\203
21a0	23 00 5c 33 30 33 08 04 5c 33 30 34 5c 33 30 35 5c 33 30 36 5c 22 23 10 5c 32 30 32 2c 00 5c 33	#.\303..\304\305\306\"#.\202,.\3
21c0	30 33 09 04 5c 33 30 34 5c 33 30 35 5c 33 30 36 5c 22 23 11 5c 33 30 37 03 03 5c 22 5c 32 30 37	03..\304\305\306\"#.\307..\"\207
21e0	22 20 5b 61 6e 6e 61 6c 69 73 74 2d 2d 6c 6f 63 61 6c 2d 74 6f 6d 65 73 20 61 6e 6e 61 6c 69 73	".[annalist--local-tomes.annalis
2200	74 2d 2d 74 6f 6d 65 73 20 70 6c 69 73 74 2d 67 65 74 20 70 6c 69 73 74 2d 70 75 74 20 6d 61 6b	t--tomes.plist-get.plist-put.mak
2220	65 2d 68 61 73 68 2d 74 61 62 6c 65 20 3a 74 65 73 74 20 65 71 75 61 6c 20 61 6e 6e 61 6c 69 73	e-hash-table.:test.equal.annalis
2240	74 2d 2d 74 6f 6d 65 5d 20 39 20 28 23 24 20 2e 20 38 34 33 38 29 5d 29 23 40 33 30 35 20 52 65	t--tome].9.(#$...8438)])#@305.Re
2260	74 75 72 6e 20 61 20 6c 69 73 74 20 6f 66 20 6b 65 79 73 20 69 6e 20 48 41 53 48 2d 54 41 42 4c	turn.a.list.of.keys.in.HASH-TABL
2280	45 2e 0a 54 68 65 20 64 65 66 61 75 6c 74 20 60 68 61 73 68 2d 74 61 62 6c 65 2d 6b 65 79 73 27	E..The.default.`hash-table-keys'
22a0	20 6d 61 6b 65 73 20 6e 6f 20 67 75 61 72 61 6e 74 65 65 20 61 62 6f 75 74 20 74 68 65 20 6f 72	.makes.no.guarantee.about.the.or
22c0	64 65 72 20 6f 66 20 74 68 65 20 6b 65 79 73 2c 0a 61 6e 64 20 74 68 65 20 62 65 68 61 76 69 6f	der.of.the.keys,.and.the.behavio
22e0	72 20 64 69 66 66 65 72 73 20 62 65 74 77 65 65 6e 20 45 6d 61 63 73 20 76 65 72 73 69 6f 6e 73	r.differs.between.Emacs.versions
2300	2e 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 72 65 74 75 72 6e 73 20 74 68 65 20 6b 65 79 73	..This.function.returns.the.keys
2320	0a 69 6e 20 74 68 65 20 6f 72 64 65 72 20 6f 66 20 75 73 61 67 65 20 28 6c 65 61 73 74 20 72 65	.in.the.order.of.usage.(least.re
2340	63 65 6e 74 20 74 6f 20 6d 6f 73 74 20 72 65 63 65 6e 74 29 20 61 74 20 6c 65 61 73 74 20 66 6f	cent.to.most.recent).at.least.fo
2360	72 20 45 6d 61 63 73 20 32 34 2e 34 20 75 70 0a 74 6f 20 45 6d 61 63 73 20 32 37 2e 0a 0a 28 66	r.Emacs.24.4.up.to.Emacs.27...(f
2380	6e 20 48 41 53 48 2d 54 41 42 4c 45 29 1f 23 40 32 31 20 0a 0a 28 66 6e 20 4b 20 2d 2d 43 4c 2d	n.HASH-TABLE).#@21...(fn.K.--CL-
23a0	56 41 52 2d 2d 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 2d 68 61 73	VAR--)..(defalias.'annalist--has
23c0	68 2d 74 61 62 6c 65 2d 6b 65 79 73 20 23 5b 32 35 37 20 22 5c 33 30 30 43 5c 33 30 31 5c 33 30	h-table-keys.#[257."\300C\301\30
23e0	32 5c 33 30 33 03 5c 22 03 5c 22 5c 32 31 30 5c 32 31 31 5c 32 34 32 5c 32 33 37 5c 32 30 37 22	2\303.\".\"\210\211\242\237\207"
2400	20 5b 6e 69 6c 20 6d 61 70 68 61 73 68 20 6d 61 6b 65 2d 63 6c 6f 73 75 72 65 20 23 5b 35 31 34	.[nil.maphash.make-closure.#[514
2420	20 22 5c 33 30 30 02 5c 33 30 30 5c 32 34 32 42 5c 32 34 30 5c 32 30 37 22 20 5b 56 30 5d 20 35	."\300.\300\242B\240\207".[V0].5
2440	20 28 23 24 20 2e 20 39 31 30 37 29 5d 5d 20 36 20 28 23 24 20 2e 20 38 37 39 38 29 5d 29 23 40	.(#$...9107)]].6.(#$...8798)])#@
2460	31 31 35 20 52 65 74 75 72 6e 20 61 20 6c 69 73 74 20 6f 66 20 74 68 65 20 76 61 6c 75 65 73 20	115.Return.a.list.of.the.values.
2480	69 6e 20 48 41 53 48 2d 54 41 42 4c 45 2e 0a 53 65 65 20 60 61 6e 6e 61 6c 69 73 74 2d 2d 68 61	in.HASH-TABLE..See.`annalist--ha
24a0	73 68 2d 74 61 62 6c 65 2d 6b 65 79 73 27 20 66 6f 72 20 6d 6f 72 65 20 69 6e 66 6f 72 6d 61 74	sh-table-keys'.for.more.informat
24c0	69 6f 6e 2e 0a 0a 28 66 6e 20 48 41 53 48 2d 54 41 42 4c 45 29 1f 23 40 32 31 20 0a 0a 28 66 6e	ion...(fn.HASH-TABLE).#@21...(fn
24e0	20 2d 2d 43 4c 2d 56 41 52 2d 2d 20 56 29 1f 0a 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30	.--CL-VAR--.V)..(byte-code."\300
2500	5c 33 30 31 5c 33 30 32 5c 33 30 33 23 5c 33 30 34 5c 33 30 31 5c 33 30 35 5c 33 30 36 23 5c 32	\301\302\303#\304\301\305\306#\2
2520	30 37 22 20 5b 66 75 6e 63 74 69 6f 6e 2d 70 75 74 20 61 6e 6e 61 6c 69 73 74 2d 2d 68 61 73 68	07".[function-put.annalist--hash
2540	2d 74 61 62 6c 65 2d 6b 65 79 73 20 73 70 65 65 64 20 2d 31 20 70 75 74 20 62 79 74 65 2d 6f 70	-table-keys.speed.-1.put.byte-op
2560	74 69 6d 69 7a 65 72 20 62 79 74 65 2d 63 6f 6d 70 69 6c 65 2d 69 6e 6c 69 6e 65 2d 65 78 70 61	timizer.byte-compile-inline-expa
2580	6e 64 5d 20 35 29 0a 28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 2d 68 61 73 68	nd].5).(defalias.'annalist--hash
25a0	2d 74 61 62 6c 65 2d 76 61 6c 75 65 73 20 23 5b 32 35 37 20 22 5c 33 30 30 43 5c 33 30 31 5c 33	-table-values.#[257."\300C\301\3
25c0	30 32 5c 33 30 33 03 5c 22 03 5c 22 5c 32 31 30 5c 32 31 31 5c 32 34 32 5c 32 33 37 5c 32 30 37	02\303.\".\"\210\211\242\237\207
25e0	22 20 5b 6e 69 6c 20 6d 61 70 68 61 73 68 20 6d 61 6b 65 2d 63 6c 6f 73 75 72 65 20 23 5b 35 31	".[nil.maphash.make-closure.#[51
2600	34 20 22 5c 33 30 30 01 5c 33 30 30 5c 32 34 32 42 5c 32 34 30 5c 32 30 37 22 20 5b 56 30 5d 20	4."\300.\300\242B\240\207".[V0].
2620	35 20 28 23 24 20 2e 20 39 34 33 35 29 5d 5d 20 36 20 28 23 24 20 2e 20 39 33 31 36 29 5d 29 23	5.(#$...9435)]].6.(#$...9316)])#
2640	40 34 38 20 52 65 74 75 72 6e 20 74 68 65 20 73 65 74 74 69 6e 67 73 20 70 6c 69 73 74 20 66 6f	@48.Return.the.settings.plist.fo
2660	72 20 54 59 50 45 2e 0a 0a 28 66 6e 20 54 59 50 45 29 1f 0a 28 62 79 74 65 2d 63 6f 64 65 20 22	r.TYPE...(fn.TYPE)..(byte-code."
2680	5c 33 30 30 5c 33 30 31 5c 33 30 32 5c 33 30 33 23 5c 33 30 34 5c 33 30 31 5c 33 30 35 5c 33 30	\300\301\302\303#\304\301\305\30
26a0	36 23 5c 32 30 37 22 20 5b 66 75 6e 63 74 69 6f 6e 2d 70 75 74 20 61 6e 6e 61 6c 69 73 74 2d 2d	6#\207".[function-put.annalist--
26c0	68 61 73 68 2d 74 61 62 6c 65 2d 76 61 6c 75 65 73 20 73 70 65 65 64 20 2d 31 20 70 75 74 20 62	hash-table-values.speed.-1.put.b
26e0	79 74 65 2d 6f 70 74 69 6d 69 7a 65 72 20 62 79 74 65 2d 63 6f 6d 70 69 6c 65 2d 69 6e 6c 69 6e	yte-optimizer.byte-compile-inlin
2700	65 2d 65 78 70 61 6e 64 5d 20 35 29 0a 28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74	e-expand].5).(defalias.'annalist
2720	2d 2d 67 65 74 2d 74 6f 6d 65 2d 73 65 74 74 69 6e 67 73 20 23 5b 32 35 37 20 22 5c 33 30 31 08	--get-tome-settings.#[257."\301.
2740	02 5c 22 5c 32 30 37 22 20 5b 61 6e 6e 61 6c 69 73 74 2d 2d 74 6f 6d 65 73 2d 73 65 74 74 69 6e	.\"\207".[annalist--tomes-settin
2760	67 73 20 70 6c 69 73 74 2d 67 65 74 5d 20 34 20 28 23 24 20 2e 20 39 37 39 36 29 5d 29 23 40 31	gs.plist-get].4.(#$...9796)])#@1
2780	35 37 20 43 72 65 61 74 65 20 61 20 6e 65 77 20 74 79 70 65 20 6f 66 20 74 68 69 6e 67 20 74 68	57.Create.a.new.type.of.thing.th
27a0	61 74 20 63 61 6e 20 62 65 20 72 65 63 6f 72 64 65 64 20 63 61 6c 6c 65 64 20 54 59 50 45 2e 0a	at.can.be.recorded.called.TYPE..
27c0	53 45 54 54 49 4e 47 53 20 62 65 20 61 20 6c 69 73 74 20 6f 66 20 69 74 65 6d 73 20 61 6e 64 20	SETTINGS.be.a.list.of.items.and.
27e0	61 6e 79 20 73 65 74 74 69 6e 67 73 20 6e 65 63 65 73 73 61 72 79 20 66 6f 72 20 72 65 63 6f 72	any.settings.necessary.for.recor
2800	64 69 6e 67 20 74 68 65 6d 2e 0a 0a 28 66 6e 20 54 59 50 45 20 53 45 54 54 49 4e 47 53 29 1f 0a	ding.them...(fn.TYPE.SETTINGS)..
2820	28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 64 65 66 69 6e 65 2d 74 6f 6d 65 20	(defalias.'annalist-define-tome.
2840	23 5b 35 31 34 20 22 5c 33 30 31 08 03 5c 33 30 32 04 06 06 5c 22 23 5c 32 31 31 10 5c 32 30 37	#[514."\301..\302...\"#\211.\207
2860	22 20 5b 61 6e 6e 61 6c 69 73 74 2d 2d 74 6f 6d 65 73 2d 73 65 74 74 69 6e 67 73 20 70 6c 69 73	".[annalist--tomes-settings.plis
2880	74 2d 70 75 74 20 61 6e 6e 61 6c 69 73 74 2d 2d 70 6c 69 73 74 69 66 79 2d 73 65 74 74 69 6e 67	t-put.annalist--plistify-setting
28a0	73 5d 20 38 20 28 23 24 20 2e 20 31 30 31 31 35 29 5d 29 23 40 37 35 20 52 65 74 75 72 6e 20 74	s].8.(#$...10115)])#@75.Return.t
28c0	68 65 20 73 65 74 74 69 6e 67 73 20 70 6c 69 73 74 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20	he.settings.plist.corresponding.
28e0	74 6f 20 54 59 50 45 20 61 6e 64 20 56 49 45 57 2e 0a 0a 28 66 6e 20 54 59 50 45 20 56 49 45 57	to.TYPE.and.VIEW...(fn.TYPE.VIEW
2900	29 1f 0a 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 5c 33 30 31 5c 33 30 32 5c 33 30 33 23	)..(byte-code."\300\301\302\303#
2920	5c 33 30 30 5c 32 30 37 22 20 5b 66 75 6e 63 74 69 6f 6e 2d 70 75 74 20 61 6e 6e 61 6c 69 73 74	\300\207".[function-put.annalist
2940	2d 64 65 66 69 6e 65 2d 74 6f 6d 65 20 6c 69 73 70 2d 69 6e 64 65 6e 74 2d 66 75 6e 63 74 69 6f	-define-tome.lisp-indent-functio
2960	6e 20 31 5d 20 34 29 0a 28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 2d 67 65 74	n.1].4).(defalias.'annalist--get
2980	2d 76 69 65 77 2d 73 65 74 74 69 6e 67 73 20 23 5b 35 31 34 20 22 5c 32 31 31 5c 32 30 34 06 00	-view-settings.#[514."\211\204..
29a0	5c 32 31 30 5c 33 30 31 5c 33 30 32 02 02 42 08 5c 22 5c 32 30 37 22 20 5b 61 6e 6e 61 6c 69 73	\210\301\302..B.\"\207".[annalis
29c0	74 2d 2d 74 6f 6d 65 73 2d 76 69 65 77 73 20 64 65 66 61 75 6c 74 20 67 65 74 68 61 73 68 5d 20	t--tomes-views.default.gethash].
29e0	35 20 28 23 24 20 2e 20 31 30 34 32 34 29 5d 29 23 40 32 32 20 0a 0a 28 66 6e 20 44 4f 20 26 72	5.(#$...10424)])#@22...(fn.DO.&r
2a00	65 73 74 20 41 52 47 53 29 1f 23 40 32 32 20 0a 0a 28 66 6e 20 56 41 4c 20 54 59 50 45 20 56 49	est.ARGS).#@22...(fn.VAL.TYPE.VI
2a20	45 57 29 1f 23 40 32 30 33 20 44 65 66 69 6e 65 20 61 20 64 69 73 70 6c 61 79 20 6d 65 74 68 6f	EW).#@203.Define.a.display.metho
2a40	64 20 66 6f 72 20 54 59 50 45 20 63 61 6c 6c 65 64 20 4e 41 4d 45 2e 0a 54 6f 20 64 65 66 69 6e	d.for.TYPE.called.NAME..To.defin
2a60	65 20 74 68 65 20 64 65 66 61 75 6c 74 20 76 69 65 77 20 53 45 54 54 49 4e 47 53 2c 20 4e 41 4d	e.the.default.view.SETTINGS,.NAM
2a80	45 20 73 68 6f 75 6c 64 20 62 65 20 27 64 65 66 61 75 6c 74 2e 20 49 66 20 49 4e 48 45 52 49 54	E.should.be.'default..If.INHERIT
2aa0	20 69 73 0a 6e 6f 6e 2d 6e 69 6c 2c 20 69 6e 68 65 72 69 74 20 53 45 54 54 49 4e 47 53 20 66 72	.is.non-nil,.inherit.SETTINGS.fr
2ac0	6f 6d 20 74 68 61 74 20 76 69 65 77 2e 0a 0a 28 66 6e 20 54 59 50 45 20 4e 41 4d 45 20 53 45 54	om.that.view...(fn.TYPE.NAME.SET
2ae0	54 49 4e 47 53 20 26 6b 65 79 20 49 4e 48 45 52 49 54 29 1f 0a 28 62 79 74 65 2d 63 6f 64 65 20	TINGS.&key.INHERIT)..(byte-code.
2b00	22 5c 33 30 30 5c 33 30 31 5c 33 30 32 5c 33 30 33 23 5c 33 30 30 5c 32 30 37 22 20 5b 66 75 6e	"\300\301\302\303#\300\207".[fun
2b20	63 74 69 6f 6e 2d 70 75 74 20 61 6e 6e 61 6c 69 73 74 2d 2d 67 65 74 2d 76 69 65 77 2d 73 65 74	ction-put.annalist--get-view-set
2b40	74 69 6e 67 73 20 67 76 2d 65 78 70 61 6e 64 65 72 20 23 5b 33 38 35 20 22 5c 33 30 30 5c 33 30	tings.gv-expander.#[385."\300\30
2b60	31 5c 33 30 32 04 04 24 5c 32 30 37 22 20 5b 67 76 2d 2d 64 65 66 73 65 74 74 65 72 20 61 6e 6e	1\302..$\207".[gv--defsetter.ann
2b80	61 6c 69 73 74 2d 2d 67 65 74 2d 76 69 65 77 2d 73 65 74 74 69 6e 67 73 20 23 5b 37 37 31 20 22	alist--get-view-settings.#[771."
2ba0	5c 33 30 30 5c 33 30 31 03 5c 33 30 32 04 5c 33 30 33 42 42 45 04 5c 33 30 34 42 42 42 5c 32 30	\300\301.\302.\303BBE.\304BBB\20
2bc0	37 22 20 5b 70 75 74 68 61 73 68 20 63 6f 6e 73 20 6f 72 20 28 27 64 65 66 61 75 6c 74 29 20 28	7".[puthash.cons.or.('default).(
2be0	61 6e 6e 61 6c 69 73 74 2d 2d 74 6f 6d 65 73 2d 76 69 65 77 73 29 5d 20 39 20 28 23 24 20 2e 20	annalist--tomes-views)].9.(#$...
2c00	31 30 37 36 37 29 5d 5d 20 37 20 28 23 24 20 2e 20 31 30 37 34 31 29 5d 5d 20 34 29 0a 28 64 65	10767)]].7.(#$...10741)]].4).(de
2c20	66 61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 64 65 66 69 6e 65 2d 76 69 65 77 20 23 5b 38	falias.'annalist-define-view.#[8
2c40	39 39 20 22 5c 33 30 31 01 5c 33 30 32 5c 22 41 40 01 5c 32 31 31 5c 32 30 33 38 00 5c 32 31 31	99."\301.\302\"A@.\211\2038.\211
2c60	40 5c 33 30 33 3e 5c 32 30 33 5c 22 00 5c 32 31 31 41 5c 32 30 34 1d 00 5c 33 30 34 5c 33 30 35	@\303>\203\".\211A\204..\304\305
2c80	02 40 5c 22 5c 32 31 30 41 41 5c 32 30 32 07 00 5c 33 30 36 03 3e 41 40 5c 32 30 33 2f 00 5c 32	.@\"\210AA\202..\306.>A@\203/.\2
2ca0	31 30 5c 33 30 37 5c 32 30 32 07 00 5c 33 30 34 5c 33 31 30 02 40 5c 22 5c 32 31 30 5c 32 30 32	10\307\202..\304\310.@\"\210\202
2cc0	07 00 5c 32 31 30 5c 33 31 31 03 06 06 5c 33 31 32 23 5c 32 36 32 03 5c 32 31 31 5c 32 30 33 4f	..\210\311...\312#\262.\211\203O
2ce0	00 5c 33 31 33 03 5c 33 31 34 06 07 04 5c 22 5c 22 5c 32 36 32 03 5c 33 31 35 05 05 5c 32 30 36	.\313.\314...\"\"\262.\315..\206
2d00	56 00 5c 33 31 36 42 04 08 23 5c 32 30 37 22 20 5b 61 6e 6e 61 6c 69 73 74 2d 2d 74 6f 6d 65 73	V.\316B..#\207".[annalist--tomes
2d20	2d 76 69 65 77 73 20 70 6c 69 73 74 2d 6d 65 6d 62 65 72 20 3a 69 6e 68 65 72 69 74 20 28 3a 69	-views.plist-member.:inherit.(:i
2d40	6e 68 65 72 69 74 20 3a 61 6c 6c 6f 77 2d 6f 74 68 65 72 2d 6b 65 79 73 29 20 65 72 72 6f 72 20	nherit.:allow-other-keys).error.
2d60	22 4d 69 73 73 69 6e 67 20 61 72 67 75 6d 65 6e 74 20 66 6f 72 20 25 73 22 20 3a 61 6c 6c 6f 77	"Missing.argument.for.%s".:allow
2d80	2d 6f 74 68 65 72 2d 6b 65 79 73 20 6e 69 6c 20 22 4b 65 79 77 6f 72 64 20 61 72 67 75 6d 65 6e	-other-keys.nil."Keyword.argumen
2da0	74 20 25 73 20 6e 6f 74 20 6f 6e 65 20 6f 66 20 28 3a 69 6e 68 65 72 69 74 29 22 20 61 6e 6e 61	t.%s.not.one.of.(:inherit)".anna
2dc0	6c 69 73 74 2d 2d 70 6c 69 73 74 69 66 79 2d 73 65 74 74 69 6e 67 73 20 74 20 61 6e 6e 61 6c 69	list--plistify-settings.t.annali
2de0	73 74 2d 2d 6d 65 72 67 65 2d 6e 65 73 74 65 64 2d 70 6c 69 73 74 73 20 61 6e 6e 61 6c 69 73 74	st--merge-nested-plists.annalist
2e00	2d 2d 67 65 74 2d 76 69 65 77 2d 73 65 74 74 69 6e 67 73 20 70 75 74 68 61 73 68 20 64 65 66 61	--get-view-settings.puthash.defa
2e20	75 6c 74 5d 20 31 30 20 28 23 24 20 2e 20 31 30 37 39 34 29 5d 29 23 40 36 34 36 20 4e 6f 6e 2d	ult].10.(#$...10794)])#@646.Non-
2e40	64 65 73 74 72 75 63 74 69 76 65 6c 79 20 61 64 64 20 4e 45 57 2d 52 45 43 4f 52 44 20 74 6f 20	destructively.add.NEW-RECORD.to.
2e60	45 58 49 53 54 49 4e 47 2d 52 45 43 4f 52 44 53 20 61 6e 64 20 72 65 74 75 72 6e 20 69 74 2e 0a	EXISTING-RECORDS.and.return.it..
2e80	53 45 54 54 49 4e 47 53 20 69 73 20 74 68 65 20 70 6c 69 73 74 20 6f 66 20 73 65 74 74 69 6e 67	SETTINGS.is.the.plist.of.setting
2ea0	73 20 66 6f 72 20 74 68 65 20 74 79 70 65 20 6f 66 20 74 68 69 6e 67 2f 74 6f 6d 65 20 74 68 65	s.for.the.type.of.thing/tome.the
2ec0	20 72 65 63 6f 72 64 0a 63 6f 72 72 65 73 70 6f 6e 64 73 20 74 6f 20 28 65 2e 67 2e 20 6b 65 79	.record.corresponds.to.(e.g..key
2ee0	62 69 6e 64 69 6e 67 73 29 2e 0a 0a 57 68 65 6e 20 74 68 65 20 70 72 69 6d 61 72 79 20 6b 65 79	bindings)...When.the.primary.key
2f00	20 69 6e 20 4e 45 57 2d 52 45 43 4f 52 44 20 6d 61 74 63 68 65 73 20 74 68 61 74 20 69 6e 20 61	.in.NEW-RECORD.matches.that.in.a
2f20	6e 20 6f 6c 64 20 72 65 63 6f 72 64 20 65 78 61 63 74 6c 79 20 28 61 73 0a 64 65 74 65 72 6d 69	n.old.record.exactly.(as.determi
2f40	6e 65 64 20 62 79 20 3a 74 65 73 74 20 69 6e 20 53 45 54 54 49 4e 47 53 20 6f 72 20 60 65 71 75	ned.by.:test.in.SETTINGS.or.`equ
2f60	61 6c 27 29 2c 20 72 65 70 6c 61 63 65 20 74 68 65 20 6f 6c 64 20 72 65 63 6f 72 64 20 77 69 74	al'),.replace.the.old.record.wit
2f80	68 0a 4e 45 57 2d 52 45 43 4f 52 44 2e 0a 0a 57 68 65 6e 20 3a 72 65 63 6f 72 64 2d 75 70 64 61	h.NEW-RECORD...When.:record-upda
2fa0	74 65 20 69 73 20 70 72 65 73 65 6e 74 20 69 6e 20 53 45 54 54 49 4e 47 53 2c 20 75 73 65 20 69	te.is.present.in.SETTINGS,.use.i
2fc0	74 73 20 76 61 6c 75 65 20 74 6f 20 75 70 64 61 74 65 20 74 68 65 0a 4e 45 57 2d 52 45 43 4f 52	ts.value.to.update.the.NEW-RECOR
2fe0	44 20 28 65 2e 67 2e 20 74 6f 20 75 70 64 61 74 65 20 61 20 22 70 72 65 76 69 6f 75 73 20 64 65	D.(e.g..to.update.a."previous.de
3000	66 69 6e 69 74 69 6f 6e 22 20 69 74 65 6d 29 2e 20 41 6e 20 75 70 64 61 74 65 20 66 75 6e 63 74	finition".item)..An.update.funct
3020	69 6f 6e 0a 69 73 20 70 61 73 73 65 64 20 74 68 65 20 6f 6c 64 20 72 65 63 6f 72 64 20 28 6e 69	ion.is.passed.the.old.record.(ni
3040	6c 20 69 66 20 6e 6f 6e 65 29 2c 20 4e 45 57 2d 52 45 43 4f 52 44 2c 20 61 6e 64 20 53 45 54 54	l.if.none),.NEW-RECORD,.and.SETT
3060	49 4e 47 53 2e 20 49 74 20 73 68 6f 75 6c 64 0a 72 65 74 75 72 6e 20 61 6e 20 75 70 64 61 74 65	INGS..It.should.return.an.update
3080	64 20 72 65 63 6f 72 64 69 6e 67 20 74 6f 20 73 74 6f 72 65 2e 0a 0a 28 66 6e 20 4e 45 57 2d 52	d.recording.to.store...(fn.NEW-R
30a0	45 43 4f 52 44 20 45 58 49 53 54 49 4e 47 2d 52 45 43 4f 52 44 53 20 53 45 54 54 49 4e 47 53 29	ECORD.EXISTING-RECORDS.SETTINGS)
30c0	1f 0a 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 5c 33 30 31 5c 33 30 32 5c 33 30 33 23 5c	..(byte-code."\300\301\302\303#\
30e0	33 30 30 5c 32 30 37 22 20 5b 66 75 6e 63 74 69 6f 6e 2d 70 75 74 20 61 6e 6e 61 6c 69 73 74 2d	300\207".[function-put.annalist-
3100	64 65 66 69 6e 65 2d 76 69 65 77 20 6c 69 73 70 2d 69 6e 64 65 6e 74 2d 66 75 6e 63 74 69 6f 6e	define-view.lisp-indent-function
3120	20 32 5d 20 34 29 0a 28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 2d 72 65 63 6f	.2].4).(defalias.'annalist--reco
3140	72 64 2d 72 65 63 6f 72 64 20 23 5b 37 37 31 20 22 01 5c 32 30 34 11 00 5c 33 30 30 5c 33 30 31	rd-record.#[771.".\204..\300\301
3160	5c 33 30 32 03 5c 33 30 31 5c 22 5c 32 30 36 0e 00 5c 33 30 33 5c 22 5c 32 36 32 02 5c 33 30 32	\302.\301\"\206..\303\"\262.\302
3180	01 5c 33 30 34 5c 22 5c 32 31 31 5c 33 30 35 5c 32 31 31 02 3a 5c 32 30 33 30 00 02 40 5c 32 36	.\304\"\211\305\211.:\2030..@\26
31a0	32 02 01 06 07 38 01 42 5c 32 36 32 01 02 41 5c 32 36 32 03 5c 32 30 32 18 00 5c 32 36 36 5c 32	2....8.B\262..A\262.\202..\266\2
31c0	30 32 5c 32 33 37 5c 33 30 32 03 5c 33 30 36 5c 22 5c 33 30 37 02 06 06 5c 22 01 5c 32 30 33 49	02\237\302.\306\"\307...\".\203I
31e0	00 01 01 06 08 06 07 23 5c 32 36 32 07 5c 33 31 30 03 06 08 06 08 23 5c 32 31 30 05 5c 32 30 37	.......#\262.\310.....#\210.\207
3200	22 20 5b 6d 61 6b 65 2d 68 61 73 68 2d 74 61 62 6c 65 20 3a 74 65 73 74 20 70 6c 69 73 74 2d 67	".[make-hash-table.:test.plist-g
3220	65 74 20 65 71 75 61 6c 20 3a 6b 65 79 2d 69 6e 64 69 63 65 73 20 6e 69 6c 20 3a 72 65 63 6f 72	et.equal.:key-indices.nil.:recor
3240	64 2d 75 70 64 61 74 65 20 67 65 74 68 61 73 68 20 70 75 74 68 61 73 68 5d 20 31 31 20 28 23 24	d-update.gethash.puthash].11.(#$
3260	20 2e 20 31 31 38 33 36 29 5d 29 23 40 36 30 39 20 4e 6f 6e 2d 64 65 73 74 72 75 63 74 69 76 65	...11836)])#@609.Non-destructive
3280	6c 79 20 72 65 63 6f 72 64 20 52 45 43 4f 52 44 20 69 6e 74 6f 20 53 54 4f 52 45 2c 20 72 65 74	ly.record.RECORD.into.STORE,.ret
32a0	75 72 6e 69 6e 67 20 53 54 4f 52 45 2e 0a 52 45 43 4f 52 44 20 69 73 20 61 20 6c 69 73 74 20 6f	urning.STORE..RECORD.is.a.list.o
32c0	66 20 74 68 65 20 68 65 61 64 69 6e 67 73 20 61 6e 64 20 63 6f 6c 75 6d 6e 20 65 6e 74 72 69 65	f.the.headings.and.column.entrie
32e0	73 20 66 6f 72 20 61 20 72 6f 77 20 74 6f 20 62 65 20 72 65 63 6f 72 64 65 64 2e 0a 44 45 50 54	s.for.a.row.to.be.recorded..DEPT
3300	48 20 69 73 20 74 68 65 20 64 65 70 74 68 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 69 74	H.is.the.depth.of.the.current.it
3320	65 6d 20 62 65 69 6e 67 20 72 65 63 6f 72 64 65 64 2e 20 53 45 54 54 49 4e 47 53 20 69 73 20 74	em.being.recorded..SETTINGS.is.t
3340	68 65 20 70 6c 69 73 74 20 6f 66 0a 73 65 74 74 69 6e 67 73 20 66 6f 72 20 74 68 65 20 74 79 70	he.plist.of.settings.for.the.typ
3360	65 20 6f 66 20 74 68 69 6e 67 2f 74 6f 6d 65 20 62 65 69 6e 67 20 72 65 63 6f 72 64 65 64 20 28	e.of.thing/tome.being.recorded.(
3380	65 2e 67 2e 20 6b 65 79 62 69 6e 64 69 6e 67 73 29 2e 20 49 66 20 44 45 50 54 48 0a 65 78 63 65	e.g..keybindings)..If.DEPTH.exce
33a0	65 64 73 20 74 68 65 20 6d 61 78 20 68 65 61 64 69 6e 67 20 64 65 70 74 68 20 69 6e 20 53 45 54	eds.the.max.heading.depth.in.SET
33c0	54 49 4e 47 53 20 28 69 2e 65 2e 20 69 74 20 69 73 20 74 68 65 20 64 65 70 74 68 20 61 74 20 77	TINGS.(i.e..it.is.the.depth.at.w
33e0	68 69 63 68 20 74 68 65 0a 74 61 62 6c 65 20 73 74 61 72 74 73 20 61 73 20 73 70 65 63 69 66 69	hich.the.table.starts.as.specifi
3400	65 64 20 62 79 20 3a 74 61 62 6c 65 2d 73 74 61 72 74 2d 69 6e 64 65 78 29 2c 20 69 6e 73 65 72	ed.by.:table-start-index),.inser
3420	74 20 52 45 43 4f 52 44 20 69 6e 74 6f 20 74 68 65 20 63 75 72 72 65 6e 74 0a 53 54 4f 52 45 20	t.RECORD.into.the.current.STORE.
3440	61 6e 64 20 72 65 74 75 72 6e 20 69 74 2e 20 4f 74 68 65 72 77 69 73 65 2c 20 72 65 63 6f 72 64	and.return.it..Otherwise,.record
3460	20 74 68 65 20 63 75 72 72 65 6e 74 20 69 74 65 6d 20 61 73 20 61 20 68 65 61 64 69 6e 67 20 69	.the.current.item.as.a.heading.i
3480	6e 20 53 54 4f 52 45 0a 61 6e 64 20 72 65 63 75 72 73 65 20 77 69 74 68 20 61 6e 20 69 6e 63 72	n.STORE.and.recurse.with.an.incr
34a0	65 6d 65 6e 74 65 64 20 44 45 50 54 48 2e 0a 0a 28 66 6e 20 52 45 43 4f 52 44 20 53 54 4f 52 45	emented.DEPTH...(fn.RECORD.STORE
34c0	20 44 45 50 54 48 20 53 45 54 54 49 4e 47 53 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e	.DEPTH.SETTINGS)..(defalias.'ann
34e0	61 6c 69 73 74 2d 2d 72 65 63 6f 72 64 2d 68 65 61 64 69 6e 67 73 20 23 5b 31 30 32 38 20 22 01	alist--record-headings.#[1028.".
3500	5c 33 30 30 02 5c 33 30 31 5c 22 59 5c 32 30 33 0f 00 5c 33 30 32 04 04 03 23 5c 32 30 37 5c 33	\300.\301\"Y\203..\302...#\207\3
3520	30 33 01 03 5c 22 5c 33 30 34 04 21 5c 32 30 33 1d 00 03 5c 32 30 32 21 00 5c 33 30 35 5c 33 30	03..\"\304.!\203...\202!.\305\30
3540	36 02 5c 22 5c 33 30 37 04 06 07 38 02 5c 22 5c 33 31 30 05 06 08 38 5c 33 31 31 06 09 04 06 09	6.\"\307...8.\"\310...8\311.....
3560	54 06 09 24 04 23 5c 32 31 30 01 5c 32 30 37 22 20 5b 70 6c 69 73 74 2d 67 65 74 20 3a 74 61 62	T..$.#\210.\207".[plist-get.:tab
3580	6c 65 2d 73 74 61 72 74 2d 69 6e 64 65 78 20 61 6e 6e 61 6c 69 73 74 2d 2d 72 65 63 6f 72 64 2d	le-start-index.annalist--record-
35a0	72 65 63 6f 72 64 20 61 6e 6e 61 6c 69 73 74 2d 2d 74 65 73 74 20 68 61 73 68 2d 74 61 62 6c 65	record.annalist--test.hash-table
35c0	2d 70 20 6d 61 6b 65 2d 68 61 73 68 2d 74 61 62 6c 65 20 3a 74 65 73 74 20 67 65 74 68 61 73 68	-p.make-hash-table.:test.gethash
35e0	20 70 75 74 68 61 73 68 20 61 6e 6e 61 6c 69 73 74 2d 2d 72 65 63 6f 72 64 2d 68 65 61 64 69 6e	.puthash.annalist--record-headin
3600	67 73 5d 20 31 34 20 28 23 24 20 2e 20 31 32 39 31 33 29 5d 29 23 40 38 37 20 52 65 74 75 72 6e	gs].14.(#$...12913)])#@87.Return
3620	20 77 68 65 74 68 65 72 20 4c 49 53 54 20 68 61 73 20 61 6e 20 65 6e 74 72 79 20 6d 61 74 63 68	.whether.LIST.has.an.entry.match
3640	69 6e 67 20 41 4e 4e 41 4c 49 53 54 20 61 6e 64 20 54 59 50 45 2e 0a 0a 28 66 6e 20 4c 49 53 54	ing.ANNALIST.and.TYPE...(fn.LIST
3660	20 41 4e 4e 41 4c 49 53 54 20 54 59 50 45 29 1f 23 40 31 34 20 0a 0a 28 66 6e 20 45 4e 54 52 59	.ANNALIST.TYPE).#@14...(fn.ENTRY
3680	29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 2d 6d 61 74 63 68 65 73 2d	)..(defalias.'annalist--matches-
36a0	77 68 69 74 65 2d 6f 72 2d 62 6c 61 63 6b 2d 6c 69 73 74 2d 70 20 23 5b 37 37 31 20 22 5c 33 30	white-or-black-list-p.#[771."\30
36c0	30 5c 33 30 31 5c 33 30 32 03 05 23 04 5c 22 5c 32 30 37 22 20 5b 63 6c 2d 73 6f 6d 65 20 6d 61	0\301\302..#.\"\207".[cl-some.ma
36e0	6b 65 2d 63 6c 6f 73 75 72 65 20 23 5b 32 35 37 20 22 5c 32 31 31 01 47 5c 33 30 32 55 5c 32 30	ke-closure.#[257."\211.G\302U\20
3700	33 11 00 01 5c 32 31 31 41 5c 32 36 32 02 5c 32 34 32 5c 32 30 32 18 00 5c 33 30 33 5c 33 30 34	3...\211A\262.\242\202..\303\304
3720	5c 33 30 35 03 47 44 5c 22 01 5c 32 34 32 01 5c 33 30 36 3d 5c 32 30 34 26 00 01 5c 33 30 31 5c	\305.GD\".\242.\306=\204&..\301\
3740	32 33 32 5c 32 30 35 2f 00 5c 32 31 31 5c 33 30 36 3d 5c 32 30 36 2f 00 5c 32 31 31 5c 33 30 30	232\205/.\211\306=\206/.\211\300
3760	5c 32 33 32 5c 32 30 37 22 20 5b 56 30 20 56 31 20 32 20 73 69 67 6e 61 6c 20 77 72 6f 6e 67 2d	\232\207".[V0.V1.2.signal.wrong-
3780	6e 75 6d 62 65 72 2d 6f 66 2d 61 72 67 75 6d 65 6e 74 73 20 28 65 6e 74 72 79 2d 61 6e 6e 61 6c	number-of-arguments.(entry-annal
37a0	69 73 74 20 65 6e 74 72 79 2d 74 79 70 65 29 20 74 5d 20 36 20 28 23 24 20 2e 20 31 33 39 34 31	ist.entry-type).t].6.(#$...13941
37c0	29 5d 5d 20 38 20 28 23 24 20 2e 20 31 33 38 35 30 29 5d 29 23 40 31 37 38 20 52 65 74 75 72 6e	)]].8.(#$...13850)])#@178.Return
37e0	20 77 68 65 74 68 65 72 20 72 65 63 6f 72 64 69 6e 67 20 66 6f 72 20 41 4e 4e 41 4c 49 53 54 20	.whether.recording.for.ANNALIST.
3800	61 6e 64 20 54 59 50 45 20 69 73 20 65 6e 61 62 6c 65 64 2e 0a 43 6f 6e 73 75 6c 74 20 76 61 72	and.TYPE.is.enabled..Consult.var
3820	69 61 62 6c 65 20 60 61 6e 6e 61 6c 69 73 74 2d 72 65 63 6f 72 64 27 2c 20 60 61 6e 6e 61 6c 69	iable.`annalist-record',.`annali
3840	73 74 2d 72 65 63 6f 72 64 2d 77 68 69 74 65 6c 69 73 74 27 2c 20 61 6e 64 0a 60 61 6e 6e 61 6c	st-record-whitelist',.and.`annal
3860	69 73 74 2d 72 65 63 6f 72 64 2d 62 6c 61 63 6b 6c 69 73 74 27 2e 0a 0a 28 66 6e 20 41 4e 4e 41	ist-record-blacklist'...(fn.ANNA
3880	4c 49 53 54 20 54 59 50 45 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d	LIST.TYPE)..(defalias.'annalist-
38a0	2d 73 68 6f 75 6c 64 2d 72 65 63 6f 72 64 2d 70 20 23 5b 35 31 34 20 22 08 5c 32 30 35 1a 00 09	-should-record-p.#[514.".\205...
38c0	5c 32 30 33 0e 00 5c 33 30 33 09 03 03 23 5c 32 30 37 5c 6e 5c 32 30 33 19 00 5c 33 30 33 5c 6e	\203..\303...#\207\n\203..\303\n
38e0	03 03 23 3f 5c 32 30 37 5c 33 30 34 5c 32 30 37 22 20 5b 61 6e 6e 61 6c 69 73 74 2d 72 65 63 6f	..#?\207\304\207".[annalist-reco
3900	72 64 20 61 6e 6e 61 6c 69 73 74 2d 72 65 63 6f 72 64 2d 77 68 69 74 65 6c 69 73 74 20 61 6e 6e	rd.annalist-record-whitelist.ann
3920	61 6c 69 73 74 2d 72 65 63 6f 72 64 2d 62 6c 61 63 6b 6c 69 73 74 20 61 6e 6e 61 6c 69 73 74 2d	alist-record-blacklist.annalist-
3940	2d 6d 61 74 63 68 65 73 2d 77 68 69 74 65 2d 6f 72 2d 62 6c 61 63 6b 2d 6c 69 73 74 2d 70 20 74	-matches-white-or-black-list-p.t
3960	5d 20 36 20 28 23 24 20 2e 20 31 34 32 39 38 29 5d 29 23 40 37 37 37 20 49 6e 20 74 68 65 20 73	].6.(#$...14298)])#@777.In.the.s
3980	74 6f 72 65 20 66 6f 72 20 41 4e 4e 41 4c 49 53 54 2c 20 54 59 50 45 2c 20 61 6e 64 20 4c 4f 43	tore.for.ANNALIST,.TYPE,.and.LOC
39a0	41 4c 2c 20 72 65 63 6f 72 64 20 52 45 43 4f 52 44 2e 0a 41 4e 4e 41 4c 49 53 54 20 73 68 6f 75	AL,.record.RECORD..ANNALIST.shou
39c0	6c 64 20 63 6f 72 72 65 73 70 6f 6e 64 20 74 6f 20 74 68 65 20 70 61 63 6b 61 67 65 2f 75 73 65	ld.correspond.to.the.package/use
39e0	72 20 72 65 63 6f 72 64 69 6e 67 20 74 68 69 73 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 28 65 2e	r.recording.this.information.(e.
3a00	67 2e 0a 27 67 65 6e 65 72 61 6c 2c 20 27 6d 65 2c 20 65 74 63 2e 29 2e 20 54 59 50 45 20 69 73	g..'general,.'me,.etc.)..TYPE.is
3a20	20 74 68 65 20 74 79 70 65 20 6f 66 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 62 65 69 6e 67 20 72	.the.type.of.information.being.r
3a40	65 63 6f 72 64 65 64 20 28 65 2e 67 2e 0a 27 6b 65 79 62 69 6e 64 69 6e 67 73 29 2e 20 4c 4f 43	ecorded.(e.g..'keybindings)..LOC
3a60	41 4c 20 63 6f 72 72 65 73 70 6f 6e 64 73 20 74 6f 20 77 68 65 74 68 65 72 20 74 6f 20 73 74 6f	AL.corresponds.to.whether.to.sto
3a80	72 65 20 52 45 43 4f 52 44 20 6f 6e 6c 79 20 66 6f 72 20 74 68 65 20 63 75 72 72 65 6e 74 0a 62	re.RECORD.only.for.the.current.b
3aa0	75 66 66 65 72 2e 20 54 68 69 73 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 74 6f 67 65 74 68 65 72	uffer..This.information.together
3ac0	20 69 73 20 75 73 65 64 20 74 6f 20 73 65 6c 65 63 74 20 77 68 65 72 65 20 52 45 43 4f 52 44 20	.is.used.to.select.where.RECORD.
3ae0	73 68 6f 75 6c 64 20 62 65 0a 73 74 6f 72 65 64 20 69 6e 20 61 6e 64 20 6c 61 74 65 72 20 72 65	should.be.stored.in.and.later.re
3b00	74 72 69 65 76 65 64 20 66 72 6f 6d 20 77 69 74 68 20 60 61 6e 6e 61 6c 69 73 74 2d 64 65 73 63	trieved.from.with.`annalist-desc
3b20	72 69 62 65 27 2e 20 52 45 43 4f 52 44 20 73 68 6f 75 6c 64 20 62 65 20 61 0a 6c 69 73 74 20 6f	ribe'..RECORD.should.be.a.list.o
3b40	66 20 69 74 65 6d 73 20 74 6f 20 72 65 63 6f 72 64 20 61 6e 64 20 6c 61 74 65 72 20 70 72 69 6e	f.items.to.record.and.later.prin
3b60	74 20 61 73 20 6f 72 67 20 68 65 61 64 69 6e 67 73 20 61 6e 64 20 63 6f 6c 75 6d 6e 20 65 6e 74	t.as.org.headings.and.column.ent
3b80	72 69 65 73 20 69 6e 20 61 0a 73 69 6e 67 6c 65 20 72 6f 77 2e 20 49 66 20 50 4c 49 53 54 20 69	ries.in.a.single.row..If.PLIST.i
3ba0	73 20 6e 6f 6e 2d 6e 69 6c 2c 20 52 45 43 4f 52 44 20 73 68 6f 75 6c 64 20 62 65 20 61 20 70 6c	s.non-nil,.RECORD.should.be.a.pl
3bc0	69 73 74 20 69 6e 73 74 65 61 64 20 6f 66 20 61 6e 20 6f 72 64 65 72 65 64 0a 6c 69 73 74 20 28	ist.instead.of.an.ordered.list.(
3be0	65 2e 67 2e 20 27 28 6b 65 79 6d 61 70 20 6f 72 67 2d 6d 6f 64 65 2d 6d 61 70 20 6b 65 79 20 22	e.g..'(keymap.org-mode-map.key."
3c00	43 2d 63 20 61 22 20 2e 2e 2e 29 29 2e 20 54 68 65 20 70 6c 69 73 74 20 6b 65 79 73 20 73 68 6f	C-c.a"....))..The.plist.keys.sho
3c20	75 6c 64 20 62 65 0a 74 68 65 20 73 79 6d 62 6f 6c 73 20 75 73 65 64 20 66 6f 72 20 74 68 65 20	uld.be.the.symbols.used.for.the.
3c40	64 65 66 69 6e 69 74 69 6f 6e 20 6f 66 20 54 59 50 45 2e 0a 0a 28 66 6e 20 41 4e 4e 41 4c 49 53	definition.of.TYPE...(fn.ANNALIS
3c60	54 20 54 59 50 45 20 52 45 43 4f 52 44 20 26 6b 65 79 20 4c 4f 43 41 4c 20 50 4c 49 53 54 29 1f	T.TYPE.RECORD.&key.LOCAL.PLIST).
3c80	0a 28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 72 65 63 6f 72 64 20 23 5b 38 39	.(defalias.'annalist-record.#[89
3ca0	39 20 22 5c 33 30 30 01 5c 33 30 31 5c 22 41 40 5c 33 30 30 02 5c 33 30 32 5c 22 41 40 02 5c 32	9."\300.\301\"A@\300.\302\"A@.\2
3cc0	31 31 5c 32 30 33 3e 00 5c 32 31 31 40 5c 33 30 33 3e 5c 32 30 33 28 00 5c 32 31 31 41 5c 32 30	11\203>.\211@\303>\203(.\211A\20
3ce0	34 23 00 5c 33 30 34 5c 33 30 35 02 40 5c 22 5c 32 31 30 41 41 5c 32 30 32 0d 00 5c 33 30 36 04	4#.\304\305.@\"\210AA\202..\306.
3d00	3e 41 40 5c 32 30 33 35 00 5c 32 31 30 5c 33 30 37 5c 32 30 32 0d 00 5c 33 30 34 5c 33 31 30 02	>A@\2035.\210\307\202..\304\310.
3d20	40 5c 22 5c 32 31 30 5c 32 30 32 0d 00 5c 32 31 30 5c 33 31 31 06 06 06 06 5c 22 5c 32 30 35 5c	@\"\210\202..\210\311....\"\205\
3d40	32 33 30 00 5c 33 31 32 05 03 5c 22 5c 33 31 33 06 06 21 5c 33 31 34 01 5c 33 31 35 5c 22 5c 33	230.\312..\"\313..!\314.\315\"\3
3d60	31 36 06 09 04 5c 22 5c 33 31 34 03 5c 33 31 37 5c 22 06 08 47 53 5a 05 5c 32 30 33 6e 00 5c 33	16...\"\314.\317\"..GSZ.\203n.\3
3d80	32 30 06 09 06 0b 5c 22 5c 32 36 32 09 02 5c 32 30 33 79 00 02 06 09 05 5c 22 5c 32 36 32 09 5c	20....\"\262..\203y.....\"\262.\
3da0	32 31 31 5c 33 32 31 58 5c 32 30 34 5c 32 31 30 00 06 08 5c 33 32 32 02 5c 33 30 37 5c 22 5c 32	211\321X\204\210...\322.\307\"\2
3dc0	34 34 5c 32 36 32 09 5c 33 32 33 06 0b 5c 33 32 34 06 0b 05 5c 33 32 31 06 09 24 06 07 23 5c 32	44\262.\323..\324...\321..$..#\2
3de0	36 36 5c 32 30 35 5c 32 30 37 22 20 5b 70 6c 69 73 74 2d 6d 65 6d 62 65 72 20 3a 6c 6f 63 61 6c	66\205\207".[plist-member.:local
3e00	20 3a 70 6c 69 73 74 20 28 3a 6c 6f 63 61 6c 20 3a 70 6c 69 73 74 20 3a 61 6c 6c 6f 77 2d 6f 74	.:plist.(:local.:plist.:allow-ot
3e20	68 65 72 2d 6b 65 79 73 29 20 65 72 72 6f 72 20 22 4d 69 73 73 69 6e 67 20 61 72 67 75 6d 65 6e	her-keys).error."Missing.argumen
3e40	74 20 66 6f 72 20 25 73 22 20 3a 61 6c 6c 6f 77 2d 6f 74 68 65 72 2d 6b 65 79 73 20 6e 69 6c 20	t.for.%s".:allow-other-keys.nil.
3e60	22 4b 65 79 77 6f 72 64 20 61 72 67 75 6d 65 6e 74 20 25 73 20 6e 6f 74 20 6f 6e 65 20 6f 66 20	"Keyword.argument.%s.not.one.of.
3e80	28 3a 6c 6f 63 61 6c 20 3a 70 6c 69 73 74 29 22 20 61 6e 6e 61 6c 69 73 74 2d 2d 73 68 6f 75 6c	(:local.:plist)".annalist--shoul
3ea0	64 2d 72 65 63 6f 72 64 2d 70 20 61 6e 6e 61 6c 69 73 74 2d 2d 74 6f 6d 65 20 61 6e 6e 61 6c 69	d-record-p.annalist--tome.annali
3ec0	73 74 2d 2d 67 65 74 2d 74 6f 6d 65 2d 73 65 74 74 69 6e 67 73 20 70 6c 69 73 74 2d 67 65 74 20	st--get-tome-settings.plist-get.
3ee0	3a 70 72 65 70 72 6f 63 65 73 73 20 67 65 74 68 61 73 68 20 3a 6d 65 74 61 64 61 74 61 2d 69 6e	:preprocess.gethash.:metadata-in
3f00	64 65 78 20 61 6e 6e 61 6c 69 73 74 2d 6c 69 73 74 69 66 79 2d 72 65 63 6f 72 64 20 30 20 6d 61	dex.annalist-listify-record.0.ma
3f20	6b 65 2d 6c 69 73 74 20 70 75 74 68 61 73 68 20 61 6e 6e 61 6c 69 73 74 2d 2d 72 65 63 6f 72 64	ke-list.puthash.annalist--record
3f40	2d 68 65 61 64 69 6e 67 73 5d 20 31 38 20 28 23 24 20 2e 20 31 34 37 31 32 29 5d 29 23 40 36 36	-headings].18.(#$...14712)])#@66
3f60	20 46 6f 72 6d 61 74 20 49 54 45 4d 20 74 6f 20 72 65 70 6c 61 63 65 20 61 6c 6c 20 22 7c 22 20	.Format.ITEM.to.replace.all."|".
3f80	6f 63 63 75 72 72 65 6e 63 65 73 20 77 69 74 68 20 22 c2 a6 22 2e 0a 0a 28 66 6e 20 49 54 45 4d	occurrences.with.".."...(fn.ITEM
3fa0	29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 2d 73 61 66 65 2d 70 69 70	)..(defalias.'annalist--safe-pip
3fc0	65 20 23 5b 32 35 37 20 22 5c 33 30 30 5c 33 30 31 5c 33 30 32 03 23 5c 32 30 37 22 20 5b 72 65	e.#[257."\300\301\302.#\207".[re
3fe0	70 6c 61 63 65 2d 72 65 67 65 78 70 2d 69 6e 2d 73 74 72 69 6e 67 20 22 7c 22 20 22 c2 a6 22 5d	place-regexp-in-string."|".".."]
4000	20 35 20 28 23 24 20 2e 20 31 36 32 32 35 29 5d 29 23 40 33 35 20 43 6f 75 6e 74 65 72 20 66 6f	.5.(#$...16225)])#@35.Counter.fo
4020	72 20 74 68 65 20 63 75 72 72 65 6e 74 20 66 6f 6f 74 6e 6f 74 65 2e 1f 0a 28 64 65 66 76 61 72	r.the.current.footnote...(defvar
4040	20 61 6e 6e 61 6c 69 73 74 2d 2d 66 6e 2d 63 6f 75 6e 74 65 72 20 6e 69 6c 20 28 23 24 20 2e 20	.annalist--fn-counter.nil.(#$...
4060	31 36 34 30 36 29 29 23 40 37 34 20 50 72 69 6e 74 20 61 6e 20 6f 72 67 20 74 61 62 6c 65 20 68	16406))#@74.Print.an.org.table.h
4080	65 61 64 65 72 20 75 73 69 6e 67 20 74 68 65 20 74 69 74 6c 65 73 20 66 72 6f 6d 20 53 45 54 54	eader.using.the.titles.from.SETT
40a0	49 4e 47 53 2e 0a 0a 28 66 6e 20 53 45 54 54 49 4e 47 53 29 1f 0a 28 64 65 66 61 6c 69 61 73 20	INGS...(fn.SETTINGS)..(defalias.
40c0	27 61 6e 6e 61 6c 69 73 74 2d 2d 70 72 69 6e 74 2d 74 61 62 6c 65 2d 68 65 61 64 65 72 20 23 5b	'annalist--print-table-header.#[
40e0	32 35 37 20 22 5c 33 30 30 01 5c 33 30 31 5c 22 5c 33 30 32 5c 32 31 31 5c 33 30 30 04 04 5c 22	257."\300.\301\"\302\211\300..\"
4100	5c 32 31 31 5c 32 36 32 03 5c 32 30 33 35 00 5c 33 30 30 02 5c 33 30 33 5c 22 5c 32 30 36 1f 00	\211\262.\2035.\300.\303\"\206..
4120	5c 33 30 34 5c 33 30 35 5c 33 30 30 04 5c 33 30 36 5c 22 21 21 5c 32 36 32 01 5c 33 30 37 5c 33	\304\305\300.\306\"!!\262.\307\3
4140	31 30 21 5c 32 31 30 5c 33 30 37 5c 33 31 31 5c 33 31 32 5c 33 31 33 04 5c 22 21 21 5c 32 31 30	10!\210\307\311\312\313.\"!!\210
4160	02 54 5c 32 36 32 03 5c 32 30 32 06 00 5c 32 36 36 03 5c 33 30 37 5c 33 31 34 21 5c 32 30 37 22	.T\262.\202..\266.\307\314!\207"
4180	20 5b 70 6c 69 73 74 2d 67 65 74 20 3a 74 61 62 6c 65 2d 73 74 61 72 74 2d 69 6e 64 65 78 20 6e	.[plist-get.:table-start-index.n
41a0	69 6c 20 3a 74 69 74 6c 65 20 63 61 70 69 74 61 6c 69 7a 65 20 73 79 6d 62 6f 6c 2d 6e 61 6d 65	il.:title.capitalize.symbol-name
41c0	20 3a 6e 61 6d 65 20 70 72 69 6e 63 20 22 7c 22 20 61 6e 6e 61 6c 69 73 74 2d 2d 73 61 66 65 2d	.:name.princ."|".annalist--safe-
41e0	70 69 70 65 20 66 6f 72 6d 61 74 20 22 25 73 22 20 22 7c 5c 6e 7c 2d 2b 2d 7c 5c 6e 22 5d 20 39	pipe.format."%s"."|\n|-+-|\n"].9
4200	20 28 23 24 20 2e 20 31 36 34 39 32 29 5d 29 23 40 37 31 20 50 72 69 6e 74 20 61 6e 20 6f 72 67	.(#$...16492)])#@71.Print.an.org
4220	20 74 61 62 6c 65 20 66 6f 72 20 52 45 43 4f 52 44 53 20 75 73 69 6e 67 20 53 45 54 54 49 4e 47	.table.for.RECORDS.using.SETTING
4240	53 2e 0a 0a 28 66 6e 20 52 45 43 4f 52 44 53 20 53 45 54 54 49 4e 47 53 29 1f 0a 28 64 65 66 61	S...(fn.RECORDS.SETTINGS)..(defa
4260	6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 2d 70 72 69 6e 74 2d 74 61 62 6c 65 20 23 5b 35 31	lias.'annalist--print-table.#[51
4280	34 20 22 01 5c 33 30 31 43 5c 33 30 32 5c 33 30 33 5c 33 30 34 03 5c 22 03 5c 22 5c 32 31 30 5c	4.".\301C\302\303\304.\".\"\210\
42a0	32 36 36 5c 32 30 31 5c 32 34 32 5c 32 33 37 5c 32 36 32 02 5c 33 30 35 01 5c 33 30 36 5c 22 5c	266\201\242\237\262.\305.\306\"\
42c0	33 30 35 02 5c 33 30 37 5c 22 5c 32 31 31 5c 32 30 33 24 00 5c 33 31 30 04 02 5c 22 5c 32 30 32	305.\307\"\211\203$.\310..\"\202
42e0	25 00 03 5c 33 30 35 04 5c 33 31 31 5c 22 5c 33 30 35 05 5c 33 31 32 5c 22 5c 33 30 31 5c 33 31	%..\305.\311\"\305.\312\"\301\31
4300	33 06 07 21 5c 32 31 30 03 5c 32 31 31 5c 32 30 33 5c 33 36 32 00 5c 32 31 31 40 06 07 5c 32 30	3..!\210.\211\203\362.\211@..\20
4320	33 46 00 06 07 01 21 5c 32 30 33 5c 33 35 35 00 03 5c 32 30 33 51 00 03 01 06 5c 6e 5c 22 5c 32	3F....!\203\355..\203Q....\n\"\2
4340	36 32 01 04 5c 33 30 35 06 5c 6e 5c 33 31 34 5c 22 01 01 58 5c 32 30 33 5c 33 34 37 00 01 03 38	62..\305.\n\314\"..X\203\347...8
4360	5c 33 31 35 06 5c 66 04 5c 33 31 36 23 5c 33 31 35 06 0d 05 5c 33 31 37 5c 33 32 30 24 5c 33 31	\315.\f.\316#\315...\317\320$\31
4380	35 06 0e 06 06 5c 33 32 31 23 5c 33 31 35 06 0f 06 07 5c 33 32 32 23 02 5c 32 30 35 5c 32 30 37	5....\321#\315....\322#.\205\207
43a0	00 5c 33 32 33 5c 33 32 34 06 06 5c 22 47 03 56 5c 33 32 35 5c 33 32 36 21 5c 32 31 30 5c 32 31	.\323\324..\"G.V\325\326!\210\21
43c0	31 5c 32 30 33 5c 32 37 34 00 02 5c 32 30 33 5c 32 37 34 00 02 06 06 21 5c 32 30 33 5c 32 37 34	1\203\274..\203\274....!\203\274
43e0	00 5c 33 32 35 5c 33 32 33 5c 33 32 37 08 5c 22 21 5c 32 31 30 08 06 06 06 06 04 5c 32 30 35 5c	.\325\323\327.\"!\210......\205\
4400	32 35 36 00 04 06 09 21 46 06 0b 42 5c 32 36 32 0b 08 54 10 5c 32 36 36 06 5c 32 30 32 5c 33 34	256....!F..B\262..T.\266.\202\34
4420	30 00 5c 32 31 31 5c 32 30 33 5c 33 31 33 00 5c 33 32 33 5c 32 31 31 5c 33 33 30 06 06 5c 22 06	0.\211\203\313.\323\211\330..\".
4440	07 5c 22 5c 32 36 32 06 04 5c 32 30 33 5c 33 32 35 00 04 06 06 21 5c 32 36 32 06 5c 33 32 35 5c	.\"\262..\203\325....!\262.\325\
4460	33 33 31 5c 33 32 33 5c 33 32 34 06 09 5c 22 21 21 5c 32 36 36 07 01 54 5c 32 36 32 02 5c 32 30	331\323\324..\"!!\266..T\262.\20
4480	32 57 00 5c 32 36 36 02 5c 33 32 35 5c 33 33 32 21 5c 32 31 30 5c 32 31 30 41 5c 32 30 32 34 00	2W.\266.\325\332!\210\210A\2024.
44a0	5c 32 31 30 5c 33 32 35 5c 33 33 33 21 5c 32 31 30 5c 32 31 31 5c 32 33 37 5c 32 31 31 5c 32 30	\210\325\333!\210\211\237\211\20
44c0	35 46 01 5c 32 31 31 40 5c 32 31 31 40 01 41 40 02 41 41 41 40 03 41 41 40 5c 33 32 35 5c 33 32	5F.\211@\211@.A@.AAA@.AA@\325\32
44e0	33 5c 33 33 34 06 06 5c 22 21 5c 32 31 30 01 5c 32 30 33 2b 01 5c 33 32 35 5c 33 33 35 21 5c 32	3\334..\"!\210.\203+.\325\335!\2
4500	31 30 5c 33 32 35 5c 33 32 33 5c 33 33 36 05 5c 22 21 5c 32 31 30 5c 33 32 35 5c 33 33 37 21 5c	10\325\323\336.\"!\210\325\337!\
4520	32 31 30 5c 32 30 32 3d 01 5c 33 32 35 5c 33 32 33 5c 33 33 36 03 5c 32 30 33 39 01 03 06 06 21	210\202=.\325\323\336.\2039....!
4540	5c 32 30 32 3a 01 05 5c 22 21 5c 32 31 30 5c 33 32 35 5c 33 33 33 21 5c 32 36 36 06 41 5c 32 30	\202:..\"!\210\325\333!\266.A\20
4560	32 5c 33 37 31 00 5c 32 30 37 22 20 5b 61 6e 6e 61 6c 69 73 74 2d 2d 66 6e 2d 63 6f 75 6e 74 65	2\371.\207".[annalist--fn-counte
4580	72 20 6e 69 6c 20 6d 61 70 68 61 73 68 20 6d 61 6b 65 2d 63 6c 6f 73 75 72 65 20 23 5b 35 31 34	r.nil.maphash.make-closure.#[514
45a0	20 22 5c 33 30 30 01 5c 33 30 30 5c 32 34 32 42 5c 32 34 30 5c 32 30 37 22 20 5b 56 30 5d 20 35	."\300.\300\242B\240\207".[V0].5
45c0	20 28 23 24 20 2e 20 39 34 33 35 29 5d 20 70 6c 69 73 74 2d 67 65 74 20 3a 70 72 65 64 69 63 61	.(#$...9435)].plist-get.:predica
45e0	74 65 20 3a 73 6f 72 74 20 73 6f 72 74 20 3a 74 61 62 6c 65 2d 73 74 61 72 74 2d 69 6e 64 65 78	te.:sort.sort.:table-start-index
4600	20 3a 70 6f 73 74 70 72 6f 63 65 73 73 20 61 6e 6e 61 6c 69 73 74 2d 2d 70 72 69 6e 74 2d 74 61	.:postprocess.annalist--print-ta
4620	62 6c 65 2d 68 65 61 64 65 72 20 3a 66 69 6e 61 6c 2d 69 6e 64 65 78 20 61 6e 6e 61 6c 69 73 74	ble-header.:final-index.annalist
4640	2d 2d 69 74 65 6d 2d 67 65 74 20 3a 66 6f 72 6d 61 74 20 3a 6d 61 78 2d 77 69 64 74 68 20 35 30	--item-get.:format.:max-width.50
4660	20 3a 65 78 74 72 61 63 74 70 20 3a 73 72 63 2d 62 6c 6f 63 6b 2d 70 20 66 6f 72 6d 61 74 20 22	.:extractp.:src-block-p.format."
4680	25 73 22 20 70 72 69 6e 63 20 22 7c 20 22 20 22 5b 66 6e 3a 25 73 5d 22 20 22 25 25 2e 25 73 73	%s".princ."|."."[fn:%s]"."%%.%ss
46a0	22 20 61 6e 6e 61 6c 69 73 74 2d 2d 73 61 66 65 2d 70 69 70 65 20 22 7c 5c 6e 22 20 22 5c 6e 22	".annalist--safe-pipe."|\n"."\n"
46c0	20 22 5b 66 6e 3a 25 73 5d 5c 6e 22 20 22 23 2b 62 65 67 69 6e 5f 73 72 63 20 65 6d 61 63 73 2d	."[fn:%s]\n"."#+begin_src.emacs-
46e0	6c 69 73 70 5c 6e 22 20 22 25 73 5c 6e 22 20 22 23 2b 65 6e 64 5f 73 72 63 5c 6e 22 5d 20 32 33	lisp\n"."%s\n"."#+end_src\n"].23
4700	20 28 23 24 20 2e 20 31 36 39 31 36 29 5d 29 23 40 33 33 37 20 50 72 69 6e 74 20 69 6e 66 6f 72	.(#$...16916)])#@337.Print.infor
4720	6d 61 74 69 6f 6e 20 66 72 6f 6d 20 53 54 4f 52 45 20 61 73 20 60 6f 72 67 2d 6d 6f 64 65 27 20	mation.from.STORE.as.`org-mode'.
4740	68 65 61 64 69 6e 67 73 2e 0a 44 45 50 54 48 20 69 73 20 74 68 65 20 64 65 70 74 68 20 6f 66 20	headings..DEPTH.is.the.depth.of.
4760	74 68 65 20 63 75 72 72 65 6e 74 20 68 65 61 64 69 6e 67 2e 20 53 45 54 54 49 4e 47 53 20 63 6f	the.current.heading..SETTINGS.co
4780	6e 74 61 69 6e 73 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 61 62 6f 75 74 0a 77 68 69 63 68 20 65	ntains.information.about.which.e
47a0	6e 74 72 69 65 73 20 69 6e 20 53 54 4f 52 45 20 61 72 65 20 68 65 61 64 69 6e 67 73 20 61 6e 64	ntries.in.STORE.are.headings.and
47c0	20 68 6f 77 20 74 6f 20 70 72 69 6e 74 20 74 68 65 6d 2e 20 49 66 0a 49 4e 43 52 45 41 53 45 2d	.how.to.print.them..If.INCREASE-
47e0	50 52 49 4e 54 2d 44 45 50 54 48 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 69 6e 63 72 65 61 73 65	PRINT-DEPTH.is.non-nil,.increase
4800	20 74 68 65 20 6c 65 76 65 6c 20 6f 66 20 61 6c 6c 20 70 72 69 6e 74 65 64 20 68 65 61 64 69 6e	.the.level.of.all.printed.headin
4820	67 73 20 62 79 0a 6f 6e 65 2e 0a 0a 28 66 6e 20 53 54 4f 52 45 20 44 45 50 54 48 20 53 45 54 54	gs.by.one...(fn.STORE.DEPTH.SETT
4840	49 4e 47 53 20 26 6f 70 74 69 6f 6e 61 6c 20 49 4e 43 52 45 41 53 45 2d 50 52 49 4e 54 2d 44 45	INGS.&optional.INCREASE-PRINT-DE
4860	50 54 48 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 2d 70 72 69 6e 74	PTH)..(defalias.'annalist--print
4880	2d 68 65 61 64 69 6e 67 73 20 23 5b 31 30 32 37 20 22 02 5c 33 30 30 03 5c 33 30 31 5c 22 59 5c	-headings.#[1027.".\300.\301\"Y\
48a0	32 30 33 0e 00 5c 33 30 32 04 03 5c 22 5c 32 30 37 5c 33 30 33 02 04 5c 33 30 34 23 5c 33 30 33	203..\302..\"\207\303..\304#\303
48c0	03 05 5c 33 30 35 23 05 5c 33 30 36 43 5c 33 30 37 5c 33 31 30 5c 33 31 31 03 5c 22 03 5c 22 5c	..\305#.\306C\307\310\311.\".\"\
48e0	32 31 30 5c 32 36 36 5c 32 30 31 5c 32 34 32 5c 32 33 37 5c 33 30 33 05 06 07 5c 33 31 32 23 5c	210\266\201\242\237\303...\312#\
4900	33 31 33 03 02 5c 32 30 33 3a 00 5c 33 31 34 04 04 5c 22 5c 32 30 32 3b 00 03 5c 22 5c 33 30 33	313..\203:.\314..\"\202;..\"\303
4920	06 07 06 09 5c 33 31 35 23 06 06 5c 32 30 33 4f 00 06 08 5c 33 31 36 5c 5c 5c 32 30 32 52 00 06	....\315#..\203O...\316\\\202R..
4940	08 54 02 5c 32 31 31 5c 32 30 35 5c 32 33 32 00 5c 32 31 31 40 5c 33 31 37 01 06 0e 5c 22 5c 32	.T.\211\205\232.\211@\317...\"\2
4960	31 31 5c 32 30 33 5c 32 32 34 00 04 5c 32 30 33 6c 00 04 02 21 5c 32 30 33 5c 32 32 34 00 01 5c	11\203\224..\203l...!\203\224..\
4980	32 30 33 5c 32 31 31 00 5c 33 32 30 5c 33 32 31 5c 33 32 32 5c 33 32 33 06 07 5c 33 32 34 5c 22	203\211.\320\321\322\323..\324\"
49a0	06 0d 5c 32 30 33 5c 32 30 35 00 06 0d 06 06 21 5c 32 30 32 5c 32 30 36 00 05 23 21 5c 32 31 30	..\203\205.....!\202\206..#!\210
49c0	5c 33 32 35 01 06 0e 54 06 0e 06 0e 24 5c 32 31 30 5c 32 36 36 02 41 5c 32 30 32 53 00 5c 32 30	\325...T....$\210\266.A\202S.\20
49e0	37 22 20 5b 70 6c 69 73 74 2d 67 65 74 20 3a 74 61 62 6c 65 2d 73 74 61 72 74 2d 69 6e 64 65 78	7".[plist-get.:table-start-index
4a00	20 61 6e 6e 61 6c 69 73 74 2d 2d 70 72 69 6e 74 2d 74 61 62 6c 65 20 61 6e 6e 61 6c 69 73 74 2d	.annalist--print-table.annalist-
4a20	2d 69 74 65 6d 2d 67 65 74 20 3a 66 6f 72 6d 61 74 20 3a 70 72 69 6f 72 69 74 69 7a 65 20 6e 69	-item-get.:format.:prioritize.ni
4a40	6c 20 6d 61 70 68 61 73 68 20 6d 61 6b 65 2d 63 6c 6f 73 75 72 65 20 23 5b 35 31 34 20 22 5c 33	l.maphash.make-closure.#[514."\3
4a60	30 30 02 5c 33 30 30 5c 32 34 32 42 5c 32 34 30 5c 32 30 37 22 20 5b 56 30 5d 20 35 20 28 23 24	00.\300\242B\240\207".[V0].5.(#$
4a80	20 2e 20 39 31 30 37 29 5d 20 3a 73 6f 72 74 20 61 6e 6e 61 6c 69 73 74 2d 2d 6d 65 72 67 65 2d	...9107)].:sort.annalist--merge-
4aa0	6c 69 73 74 73 20 73 6f 72 74 20 3a 70 72 65 64 69 63 61 74 65 20 32 20 67 65 74 68 61 73 68 20	lists.sort.:predicate.2.gethash.
4ac0	70 72 69 6e 63 20 66 6f 72 6d 61 74 20 22 25 73 20 25 73 5c 6e 22 20 6d 61 6b 65 2d 73 74 72 69	princ.format."%s.%s\n".make-stri
4ae0	6e 67 20 34 32 20 61 6e 6e 61 6c 69 73 74 2d 2d 70 72 69 6e 74 2d 68 65 61 64 69 6e 67 73 5d 20	ng.42.annalist--print-headings].
4b00	32 30 20 28 23 24 20 2e 20 31 38 31 39 37 29 5d 29 23 40 32 34 33 20 44 65 73 63 72 69 62 65 20	20.(#$...18197)])#@243.Describe.
4b20	69 6e 66 6f 72 6d 61 74 69 6f 6e 20 72 65 63 6f 72 64 65 64 20 62 79 20 41 4e 4e 41 4c 49 53 54	information.recorded.by.ANNALIST
4b40	20 66 6f 72 20 54 59 50 45 2e 0a 46 6f 72 20 65 78 61 6d 70 6c 65 3a 20 28 61 6e 6e 61 6c 69 73	.for.TYPE..For.example:.(annalis
4b60	74 2d 64 65 73 63 72 69 62 65 20 27 67 65 6e 65 72 61 6c 20 27 6b 65 79 62 69 6e 64 69 6e 67 73	t-describe.'general.'keybindings
4b80	29 20 49 66 20 56 49 45 57 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 75 73 65 0a 74 68 6f 73 65 20	).If.VIEW.is.non-nil,.use.those.
4ba0	73 65 74 74 69 6e 67 73 20 66 6f 72 20 64 69 73 70 6c 61 79 69 6e 67 20 72 65 63 6f 72 64 65 64	settings.for.displaying.recorded
4bc0	20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 69 6e 73 74 65 61 64 20 6f 66 20 74 68 65 20 64 65 66 61	.information.instead.of.the.defa
4be0	75 6c 74 73 2e 0a 0a 28 66 6e 20 41 4e 4e 41 4c 49 53 54 20 54 59 50 45 20 26 6f 70 74 69 6f 6e	ults...(fn.ANNALIST.TYPE.&option
4c00	61 6c 20 56 49 45 57 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 64 65	al.VIEW)..(defalias.'annalist-de
4c20	73 63 72 69 62 65 20 23 5b 37 37 30 20 22 5c 33 30 36 5c 33 30 37 03 03 5c 22 5c 33 31 30 04 21	scribe.#[770."\306\307..\"\310.!
4c40	5c 22 5c 33 31 31 03 21 5c 33 31 31 04 5c 33 31 32 5c 22 01 5c 32 30 35 19 00 5c 33 31 33 06 06	\"\311.!\311.\312\".\205..\313..
4c60	03 5c 22 01 5c 32 30 35 5c 22 00 5c 33 31 33 06 07 03 5c 22 5c 33 31 34 5c 33 31 35 06 09 06 09	.\".\205\".\313...\"\314\315....
4c80	23 5c 33 31 36 5c 33 31 37 06 07 5c 33 32 30 5c 22 21 5c 33 32 31 18 09 72 5c 33 32 32 03 21 71	#\316\317..\320\"!\321..r\322.!q
4ca0	5c 32 31 30 70 5c 33 32 33 20 5c 32 31 30 01 11 5c 33 32 34 5c 32 31 31 12 13 5c 33 31 32 5c 32	\210p\323.\210..\324\211..\312\2
4cc0	31 31 14 5c 33 31 32 1d 1e 24 5c 33 32 35 20 5c 32 31 30 5c 33 32 36 5c 33 32 37 21 2b 5c 32 31	11.\312..$\325.\210\326\327!+\21
4ce0	30 5c 32 31 31 1e 25 04 5c 32 30 33 65 00 5c 33 33 30 5c 33 33 31 21 5c 32 31 30 5c 33 33 32 05	0\211.%.\203e.\330\331!\210\332.
4d00	5c 33 33 33 06 0b 5c 33 31 32 24 5c 32 31 30 05 5c 32 30 33 7b 00 04 5c 32 30 33 71 00 5c 33 33	\333..\312$\210.\203{..\203q.\33
4d20	30 5c 33 33 34 21 5c 32 31 30 5c 33 33 32 06 06 5c 33 33 33 06 0b 06 08 24 5c 32 31 30 5c 33 33	0\334!\210\332..\333....$\210\33
4d40	35 01 21 29 5c 32 36 36 03 02 5c 32 30 34 5c 32 31 31 00 03 5c 32 30 35 5c 32 37 35 00 5c 33 33	5.!)\266..\204\211..\205\275.\33
4d60	36 5c 33 33 37 21 5c 32 31 30 72 01 71 5c 32 31 30 5c 33 34 30 5c 33 34 31 21 5c 32 31 30 0e 26	6\337!\210r.q\210\340\341!\210.&
4d80	5c 33 31 32 5c 33 32 34 1e 27 1e 28 1e 29 5c 33 34 32 20 2b 5c 32 31 30 65 62 5c 32 31 30 5c 32	\312\324.'.(.)\342.+\210eb\210\2
4da0	31 31 5c 32 31 31 5c 32 30 33 5c 32 36 35 00 5c 32 31 31 40 5c 32 31 31 20 5c 32 36 36 02 41 5c	11\211\203\265.\211@\211.\266.A\
4dc0	32 30 32 5c 32 34 37 00 5c 32 31 30 5c 33 32 36 5c 33 34 33 21 5c 32 31 30 5c 33 34 30 20 29 29	202\247.\210\326\343!\210\340.))
4de0	5c 32 30 37 22 20 5b 61 6e 6e 61 6c 69 73 74 2d 2d 66 6e 2d 63 6f 75 6e 74 65 72 20 64 65 66 61	\207".[annalist--fn-counter.defa
4e00	75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 62 75 66 66 65 72 2d 72 65 61 64 2d 6f 6e 6c 79 20 62	ult-directory.buffer-read-only.b
4e20	75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 62 75 66 66 65 72 2d 75 6e 64 6f 2d 6c 69 73 74	uffer-file-name.buffer-undo-list
4e40	20 69 6e 68 69 62 69 74 2d 6d 6f 64 69 66 69 63 61 74 69 6f 6e 2d 68 6f 6f 6b 73 20 61 6e 6e 61	.inhibit-modification-hooks.anna
4e60	6c 69 73 74 2d 2d 6d 65 72 67 65 2d 6e 65 73 74 65 64 2d 70 6c 69 73 74 73 20 61 6e 6e 61 6c 69	list--merge-nested-plists.annali
4e80	73 74 2d 2d 67 65 74 2d 76 69 65 77 2d 73 65 74 74 69 6e 67 73 20 61 6e 6e 61 6c 69 73 74 2d 2d	st--get-view-settings.annalist--
4ea0	67 65 74 2d 74 6f 6d 65 2d 73 65 74 74 69 6e 67 73 20 61 6e 6e 61 6c 69 73 74 2d 2d 74 6f 6d 65	get-tome-settings.annalist--tome
4ec0	20 74 20 67 65 74 68 61 73 68 20 66 6f 72 6d 61 74 20 22 2a 25 73 20 25 73 2a 22 20 61 6e 6e 61	.t.gethash.format."*%s.%s*".anna
4ee0	6c 69 73 74 2d 2d 6d 61 6b 65 2d 6c 69 73 74 20 70 6c 69 73 74 2d 67 65 74 20 3a 68 6f 6f 6b 73	list--make-list.plist-get.:hooks
4f00	20 31 20 67 65 74 2d 62 75 66 66 65 72 2d 63 72 65 61 74 65 20 6b 69 6c 6c 2d 61 6c 6c 2d 6c 6f	.1.get-buffer-create.kill-all-lo
4f20	63 61 6c 2d 76 61 72 69 61 62 6c 65 73 20 6e 69 6c 20 65 72 61 73 65 2d 62 75 66 66 65 72 20 72	cal-variables.nil.erase-buffer.r
4f40	75 6e 2d 68 6f 6f 6b 73 20 74 65 6d 70 2d 62 75 66 66 65 72 2d 73 65 74 75 70 2d 68 6f 6f 6b 20	un-hooks.temp-buffer-setup-hook.
4f60	70 72 69 6e 63 20 22 2a 20 4c 6f 63 61 6c 5c 6e 22 20 61 6e 6e 61 6c 69 73 74 2d 2d 70 72 69 6e	princ."*.Local\n".annalist--prin
4f80	74 2d 68 65 61 64 69 6e 67 73 20 30 20 22 2a 20 47 6c 6f 62 61 6c 5c 6e 22 20 69 6e 74 65 72 6e	t-headings.0."*.Global\n".intern
4fa0	61 6c 2d 74 65 6d 70 2d 6f 75 74 70 75 74 2d 62 75 66 66 65 72 2d 73 68 6f 77 20 72 65 71 75 69	al-temp-output-buffer-show.requi
4fc0	72 65 20 6f 72 67 20 72 65 61 64 2d 6f 6e 6c 79 2d 6d 6f 64 65 20 2d 31 20 6f 72 67 2d 6d 6f 64	re.org.read-only-mode.-1.org-mod
4fe0	65 20 61 6e 6e 61 6c 69 73 74 2d 64 65 73 63 72 69 62 65 2d 68 6f 6f 6b 20 69 6e 68 69 62 69 74	e.annalist-describe-hook.inhibit
5000	2d 72 65 61 64 2d 6f 6e 6c 79 20 73 74 61 6e 64 61 72 64 2d 6f 75 74 70 75 74 20 61 6e 6e 61 6c	-read-only.standard-output.annal
5020	69 73 74 2d 6f 72 67 2d 73 74 61 72 74 75 70 2d 66 6f 6c 64 65 64 20 6f 72 67 2d 73 74 61 72 74	ist-org-startup-folded.org-start
5040	75 70 2d 73 68 72 69 6e 6b 2d 61 6c 6c 2d 74 61 62 6c 65 73 20 6f 72 67 2d 73 74 61 72 74 75 70	up-shrink-all-tables.org-startup
5060	2d 61 6c 69 67 6e 2d 61 6c 6c 2d 74 61 62 6c 65 73 20 6f 72 67 2d 73 74 61 72 74 75 70 2d 66 6f	-align-all-tables.org-startup-fo
5080	6c 64 65 64 5d 20 31 38 20 28 23 24 20 2e 20 31 39 32 32 33 29 5d 29 23 40 35 37 20 46 6f 72 6d	lded].18.(#$...19223)])#@57.Form
50a0	61 74 20 49 54 45 4d 20 74 6f 20 62 65 20 73 75 72 72 6f 75 6e 64 65 64 20 62 79 20 65 71 75 61	at.ITEM.to.be.surrounded.by.equa
50c0	6c 20 73 69 67 6e 73 2e 0a 0a 28 66 6e 20 49 54 45 4d 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27	l.signs...(fn.ITEM)..(defalias.'
50e0	61 6e 6e 61 6c 69 73 74 2d 76 65 72 62 61 74 69 6d 20 23 5b 32 35 37 20 22 5c 33 30 30 5c 33 30	annalist-verbatim.#[257."\300\30
5100	31 02 5c 22 5c 32 30 37 22 20 5b 66 6f 72 6d 61 74 20 22 3d 25 73 3d 22 5d 20 34 20 28 23 24 20	1.\"\207".[format."=%s="].4.(#$.
5120	2e 20 32 30 36 33 36 29 5d 29 23 40 35 32 20 46 6f 72 6d 61 74 20 49 54 45 4d 20 74 6f 20 62 65	..20636)])#@52.Format.ITEM.to.be
5140	20 73 75 72 72 6f 75 6e 64 65 64 20 62 79 20 74 69 6c 64 65 73 2e 0a 0a 28 66 6e 20 49 54 45 4d	.surrounded.by.tildes...(fn.ITEM
5160	29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 63 6f 64 65 20 23 5b 32 35	)..(defalias.'annalist-code.#[25
5180	37 20 22 5c 33 30 30 5c 33 30 31 02 5c 22 5c 32 30 37 22 20 5b 66 6f 72 6d 61 74 20 22 7e 25 73	7."\300\301.\"\207".[format."~%s
51a0	7e 22 5d 20 34 20 28 23 24 20 2e 20 32 30 37 38 33 29 5d 29 23 40 35 36 20 43 6f 6e 76 65 72 74	~"].4.(#$...20783)])#@56.Convert
51c0	20 49 54 45 4d 20 74 6f 20 61 20 73 74 72 69 6e 67 20 61 6e 64 20 63 61 70 69 74 61 6c 69 7a 65	.ITEM.to.a.string.and.capitalize
51e0	20 69 74 2e 0a 0a 28 66 6e 20 49 54 45 4d 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61	.it...(fn.ITEM)..(defalias.'anna
5200	6c 69 73 74 2d 63 61 70 69 74 61 6c 69 7a 65 20 23 5b 32 35 37 20 22 5c 33 30 30 5c 33 30 31 5c	list-capitalize.#[257."\300\301\
5220	33 30 32 03 5c 22 21 5c 32 30 37 22 20 5b 63 61 70 69 74 61 6c 69 7a 65 20 66 6f 72 6d 61 74 20	302.\"!\207".[capitalize.format.
5240	22 25 73 22 5d 20 35 20 28 23 24 20 2e 20 32 30 39 32 31 29 5d 29 23 40 38 36 20 52 65 74 75 72	"%s"].5.(#$...20921)])#@86.Retur
5260	6e 20 61 20 66 75 6e 63 74 69 6f 6e 20 63 6f 6d 70 6f 73 65 64 20 6f 66 20 46 4e 53 2e 0a 46 4e	n.a.function.composed.of.FNS..FN
5280	53 20 77 69 6c 6c 20 62 65 20 63 61 6c 6c 65 64 20 72 69 67 68 74 20 74 6f 20 6c 65 66 74 2e 0a	S.will.be.called.right.to.left..
52a0	0a 28 66 6e 20 26 72 65 73 74 20 46 4e 53 29 1f 23 40 31 39 20 0a 0a 28 66 6e 20 26 72 65 73 74	.(fn.&rest.FNS).#@19...(fn.&rest
52c0	20 41 52 47 53 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 63 6f 6d 70	.ARGS)..(defalias.'annalist-comp
52e0	6f 73 65 20 23 5b 31 32 38 20 22 5c 33 30 30 01 21 40 5c 33 30 31 02 21 5c 33 30 32 5c 33 30 33	ose.#[128."\300.!@\301.!\302\303
5300	02 04 23 5c 32 30 37 22 20 5b 6c 61 73 74 20 62 75 74 6c 61 73 74 20 6d 61 6b 65 2d 63 6c 6f 73	..#\207".[last.butlast.make-clos
5320	75 72 65 20 23 5b 31 32 38 20 22 5c 33 30 32 5c 33 30 33 5c 33 30 30 5c 33 30 34 5c 33 30 35 5c	ure.#[128."\302\303\300\304\305\
5340	33 30 36 5c 33 30 37 5c 33 30 31 06 08 5c 22 26 06 5c 32 30 37 22 20 5b 56 30 20 56 31 20 63 6c	306\307\301..\"&.\207".[V0.V1.cl
5360	2d 72 65 64 75 63 65 20 66 75 6e 63 61 6c 6c 20 3a 66 72 6f 6d 2d 65 6e 64 20 74 20 3a 69 6e 69	-reduce.funcall.:from-end.t.:ini
5380	74 69 61 6c 2d 76 61 6c 75 65 20 61 70 70 6c 79 5d 20 31 30 20 28 23 24 20 2e 20 32 31 31 37 33	tial-value.apply].10.(#$...21173
53a0	29 5d 5d 20 37 20 28 23 24 20 2e 20 32 31 30 38 33 29 5d 29 23 40 31 32 39 20 52 65 74 75 72 6e	)]].7.(#$...21083)])#@129.Return
53c0	20 77 68 65 74 68 65 72 20 58 20 69 73 20 6c 65 78 69 63 6f 67 72 61 70 68 69 63 6c 6c 79 20 6c	.whether.X.is.lexicographiclly.l
53e0	65 73 73 20 74 68 61 6e 20 59 2e 0a 54 68 65 20 73 74 72 69 6e 67 20 66 6f 72 6d 73 20 6f 66 20	ess.than.Y..The.string.forms.of.
5400	58 20 61 6e 64 20 59 20 61 73 20 6f 62 74 61 69 6e 65 64 20 77 69 74 68 20 60 66 6f 72 6d 61 74	X.and.Y.as.obtained.with.`format
5420	27 20 61 72 65 20 63 6f 6d 70 61 72 65 64 2e 0a 0a 28 66 6e 20 58 20 59 29 1f 0a 28 64 65 66 61	'.are.compared...(fn.X.Y)..(defa
5440	6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 73 74 72 69 6e 67 2d 3c 20 23 5b 35 31 34 20 22 5c	lias.'annalist-string-<.#[514."\
5460	33 30 30 5c 33 30 31 03 5c 22 5c 33 30 30 5c 33 30 31 03 5c 22 5c 32 33 31 5c 32 30 37 22 20 5b	300\301.\"\300\301.\"\231\207".[
5480	66 6f 72 6d 61 74 20 22 25 73 22 5d 20 36 20 28 23 24 20 2e 20 32 31 34 33 34 29 5d 29 23 40 31	format."%s"].6.(#$...21434)])#@1
54a0	38 35 20 52 65 74 75 72 6e 20 77 68 65 74 68 65 72 20 58 20 69 73 20 6c 65 78 69 63 6f 67 72 61	85.Return.whether.X.is.lexicogra
54c0	70 68 69 63 61 6c 6c 79 20 6c 65 73 73 20 74 68 61 6e 20 59 2e 0a 42 6f 74 68 20 61 72 65 20 63	phically.less.than.Y..Both.are.c
54e0	6f 6e 73 69 64 65 72 65 64 20 74 6f 20 62 65 20 6b 65 79 73 20 69 6e 20 74 68 65 69 72 20 62 69	onsidered.to.be.keys.in.their.bi
5500	6e 64 61 62 6c 65 20 66 6f 72 6d 73 2e 20 43 6f 6d 70 61 72 65 20 74 68 65 69 72 0a 64 65 73 63	ndable.forms..Compare.their.desc
5520	72 69 70 74 69 76 65 20 66 6f 72 6d 73 20 61 73 20 6f 62 74 61 69 6e 65 64 20 77 69 74 68 20 60	riptive.forms.as.obtained.with.`
5540	6b 65 79 2d 64 65 73 63 72 69 70 74 69 6f 6e 27 0a 0a 28 66 6e 20 58 20 59 29 1f 0a 28 64 65 66	key-description'..(fn.X.Y)..(def
5560	61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 6b 65 79 2d 3c 20 23 5b 35 31 34 20 22 5c 33 30	alias.'annalist-key-<.#[514."\30
5580	30 02 21 5c 33 30 30 02 21 5c 32 33 31 5c 32 30 37 22 20 5b 6b 65 79 2d 64 65 73 63 72 69 70 74	0.!\300.!\231\207".[key-descript
55a0	69 6f 6e 5d 20 35 20 28 23 24 20 2e 20 32 31 36 36 37 29 5d 29 23 40 32 35 32 20 46 6f 72 6d 61	ion].5.(#$...21667)])#@252.Forma
55c0	74 20 45 6d 61 63 73 20 4c 69 73 70 20 73 6f 75 72 63 65 20 62 6c 6f 63 6b 73 20 69 6e 20 63 75	t.Emacs.Lisp.source.blocks.in.cu
55e0	72 72 65 6e 74 20 62 75 66 66 65 72 20 75 73 69 6e 67 20 6c 69 73 70 79 2e 0a 57 68 65 6e 20 6c	rrent.buffer.using.lispy..When.l
5600	69 73 70 79 20 69 73 20 69 6e 73 74 61 6c 6c 65 64 2c 20 75 73 65 20 60 6c 69 73 70 79 2d 6d 75	ispy.is.installed,.use.`lispy-mu
5620	6c 74 69 6c 69 6e 65 27 20 74 6f 20 66 6f 72 6d 61 74 20 74 68 65 20 65 6c 69 73 70 20 73 6f 75	ltiline'.to.format.the.elisp.sou
5640	72 63 65 20 62 6c 6f 63 6b 73 0a 69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72	rce.blocks.in.the.current.buffer
5660	2e 20 54 68 69 73 20 69 73 20 75 73 65 66 75 6c 20 73 69 6e 63 65 20 61 6e 6e 61 6c 69 73 74 20	..This.is.useful.since.annalist.
5680	77 69 6c 6c 20 65 78 74 72 61 63 74 20 69 74 65 6d 73 20 74 6f 0a 73 6f 75 72 63 65 20 62 6c 6f	will.extract.items.to.source.blo
56a0	63 6b 73 20 61 73 20 61 20 73 69 6e 67 6c 65 20 6c 69 6e 65 2e 1f 0a 28 64 65 66 61 6c 69 61 73	cks.as.a.single.line...(defalias
56c0	20 27 61 6e 6e 61 6c 69 73 74 2d 6d 75 6c 74 69 6c 69 6e 65 2d 73 6f 75 72 63 65 2d 62 6c 6f 63	.'annalist-multiline-source-bloc
56e0	6b 73 20 23 5b 30 20 22 5c 33 30 33 5c 33 30 34 5c 33 30 35 5c 33 30 36 23 5c 32 30 35 5c 32 34	ks.#[0."\303\304\305\306#\205\24
5700	32 00 5c 33 30 33 5c 33 30 37 5c 33 30 35 5c 33 30 36 23 5c 32 30 35 5c 32 34 32 00 5c 33 30 35	2.\303\307\305\306#\205\242.\305
5720	5c 32 31 32 5c 33 30 36 18 60 5c 33 30 35 5c 33 31 30 20 5c 33 31 31 5c 33 31 32 02 5c 22 5c 32	\212\306.`\305\310.\311\312.\"\2
5740	31 36 70 5c 32 36 32 02 65 62 5c 32 31 30 5c 33 31 33 09 5c 33 30 35 5c 33 30 36 23 5c 32 30 33	16p\262.eb\210\313.\305\306#\203
5760	5c 32 33 33 00 5c 33 31 34 20 5c 32 30 33 23 00 5c 33 31 35 5c 32 32 34 62 5c 32 31 30 5c 33 31	\233.\314.\203#.\315\224b\210\31
5780	36 5c 33 31 35 21 5c 33 31 35 5c 32 32 34 5c 33 31 35 5c 32 32 35 5c 33 31 36 5c 33 31 37 21 5c	6\315!\315\224\315\225\316\317!\
57a0	33 31 37 5c 32 32 34 5c 33 31 37 5c 32 32 35 5c 33 31 36 5c 33 32 30 21 5c 33 32 30 5c 32 32 34	317\224\317\225\316\320!\320\224
57c0	5c 33 32 30 5c 32 32 35 5c 33 31 36 5c 33 32 31 21 5c 33 32 31 5c 32 32 34 5c 33 32 31 5c 32 32	\320\225\316\321!\321\224\321\22
57e0	35 5c 33 31 36 5c 33 32 32 21 5c 33 32 32 5c 32 32 34 5c 33 32 32 5c 32 32 35 06 0b 5c 33 32 33	5\316\322!\322\224\322\225..\323
5800	5c 32 33 30 5c 32 30 33 5c 32 32 33 00 01 62 5c 32 31 30 01 01 7c 5c 32 31 30 5c 33 32 34 5c 33	\230\203\223..b\210..|\210\324\3
5820	32 35 5c 33 30 36 5c 22 72 5c 32 31 31 71 5c 32 31 30 5c 33 31 31 5c 33 32 36 02 5c 22 5c 32 31	25\306\"r\211q\210\311\326.\"\21
5840	36 5c 32 31 32 03 63 29 5c 32 31 30 5c 33 32 37 20 5c 32 31 30 5c 33 33 30 31 5c 32 30 31 00 5c	6\212.c)\210\327.\210\3301\201.\
5860	6e 20 30 5c 32 31 30 5c 33 33 31 20 5c 32 31 30 6d 5c 32 30 33 7a 00 5c 33 33 32 20 2a 5c 32 36	n.0\210\331.\210m\203z.\332.*\26
5880	32 14 5c 32 31 30 06 12 63 5c 32 31 30 06 5c 66 62 5c 32 36 36 10 5c 32 30 32 23 00 29 5c 32 31	2.\210..c\210.\fb\266.\202#.)\21
58a0	30 01 62 2a 5c 32 36 36 5c 32 30 33 5c 32 30 37 22 20 5b 63 61 73 65 2d 66 6f 6c 64 2d 73 65 61	0.b*\266\203\207".[case-fold-sea
58c0	72 63 68 20 6f 72 67 2d 62 61 62 65 6c 2d 73 72 63 2d 62 6c 6f 63 6b 2d 72 65 67 65 78 70 20 61	rch.org-babel-src-block-regexp.a
58e0	6e 6e 61 6c 69 73 74 2d 6d 75 6c 74 69 6c 69 6e 65 2d 66 75 6e 63 74 69 6f 6e 20 72 65 71 75 69	nnalist-multiline-function.requi
5900	72 65 20 6c 69 73 70 79 20 6e 69 6c 20 74 20 6f 62 2d 63 6f 72 65 20 63 75 72 72 65 6e 74 2d 77	re.lispy.nil.t.ob-core.current-w
5920	69 6e 64 6f 77 2d 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e 20 6d 61 6b 65 2d 63 6c 6f 73 75 72 65	indow-configuration.make-closure
5940	20 23 5b 30 20 22 5c 33 30 31 5c 33 30 30 21 5c 32 30 37 22 20 5b 56 30 20 73 65 74 2d 77 69 6e	.#[0."\301\300!\207".[V0.set-win
5960	64 6f 77 2d 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e 5d 20 32 5d 20 72 65 2d 73 65 61 72 63 68 2d	dow-configuration].2].re-search-
5980	66 6f 72 77 61 72 64 20 6f 72 67 2d 62 61 62 65 6c 2d 61 63 74 69 76 65 2d 6c 6f 63 61 74 69 6f	forward.org-babel-active-locatio
59a0	6e 2d 70 20 30 20 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 32 20 33 20 34 20 35 20 22 65 6d 61 63	n-p.0.match-string.2.3.4.5."emac
59c0	73 2d 6c 69 73 70 22 20 67 65 6e 65 72 61 74 65 2d 6e 65 77 2d 62 75 66 66 65 72 20 22 20 2a 74	s-lisp".generate-new-buffer.".*t
59e0	65 6d 70 2a 22 20 23 5b 30 20 22 5c 33 30 31 5c 33 30 30 21 5c 32 30 35 09 00 5c 33 30 32 5c 33	emp*".#[0."\301\300!\205..\302\3
5a00	30 30 21 5c 32 30 37 22 20 5b 56 30 20 62 75 66 66 65 72 2d 6e 61 6d 65 20 6b 69 6c 6c 2d 62 75	00!\207".[V0.buffer-name.kill-bu
5a20	66 66 65 72 5d 20 32 5d 20 65 6d 61 63 73 2d 6c 69 73 70 2d 6d 6f 64 65 20 28 65 72 72 6f 72 29	ffer].2].emacs-lisp-mode.(error)
5a40	20 66 6f 72 77 61 72 64 2d 6c 69 73 74 20 62 75 66 66 65 72 2d 73 74 72 69 6e 67 5d 20 32 33 20	.forward-list.buffer-string].23.
5a60	28 23 24 20 2e 20 32 31 39 34 37 29 5d 29 23 40 32 30 31 20 50 72 65 70 72 6f 63 65 73 73 20 52	(#$...21947)])#@201.Preprocess.R
5a80	45 43 4f 52 44 20 62 79 20 6e 6f 72 6d 61 6c 69 7a 69 6e 67 20 74 68 65 20 6b 65 79 6d 61 70 2e	ECORD.by.normalizing.the.keymap.
5aa0	0a 49 66 20 74 68 65 20 6b 65 79 6d 61 70 20 69 73 20 27 67 6c 6f 62 61 6c 20 61 6e 64 20 74 68	.If.the.keymap.is.'global.and.th
5ac0	65 20 73 74 61 74 65 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 73 65 74 20 74 68 65 20 6b 65 79 6d	e.state.is.non-nil,.set.the.keym
5ae0	61 70 20 74 6f 20 62 65 20 74 68 65 0a 61 63 74 75 61 6c 20 65 76 69 6c 20 67 6c 6f 62 61 6c 20	ap.to.be.the.actual.evil.global.
5b00	6b 65 79 6d 61 70 20 28 65 2e 67 2e 20 27 65 76 69 6c 2d 6e 6f 72 6d 61 6c 2d 73 74 61 74 65 2d	keymap.(e.g..'evil-normal-state-
5b20	6d 61 70 29 2e 0a 0a 28 66 6e 20 52 45 43 4f 52 44 20 53 45 54 54 49 4e 47 53 29 1f 0a 28 64 65	map)...(fn.RECORD.SETTINGS)..(de
5b40	66 61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 2d 70 72 65 70 72 6f 63 65 73 73 2d 6b 65 79	falias.'annalist--preprocess-key
5b60	62 69 6e 64 69 6e 67 20 23 5b 35 31 34 20 22 01 40 02 41 40 5c 32 31 31 5c 32 30 33 2a 00 01 5c	binding.#[514.".@.A@\211\203*..\
5b80	33 30 30 3e 5c 32 30 33 2a 00 03 41 5c 32 31 31 5c 33 30 31 5c 32 34 30 5c 32 36 36 02 03 02 5c	300>\203*..A\211\301\240\266...\
5ba0	33 30 32 3d 5c 32 30 33 24 00 5c 33 30 33 02 5c 33 30 34 5c 22 5c 32 30 32 28 00 5c 33 30 33 02	302=\203$.\303.\304\"\202(.\303.
5bc0	5c 33 30 35 5c 22 5c 32 34 30 5c 32 31 30 03 5c 32 30 37 22 20 5b 28 67 6c 6f 62 61 6c 20 6c 6f	\305\"\240\210.\207".[(global.lo
5be0	63 61 6c 29 20 6e 69 6c 20 67 6c 6f 62 61 6c 20 65 76 69 6c 2d 73 74 61 74 65 2d 70 72 6f 70 65	cal).nil.global.evil-state-prope
5c00	72 74 79 20 3a 6b 65 79 6d 61 70 20 3a 6c 6f 63 61 6c 2d 6b 65 79 6d 61 70 5d 20 38 20 28 23 24	rty.:keymap.:local-keymap].8.(#$
5c20	20 2e 20 32 33 31 35 36 29 5d 29 23 40 32 37 35 20 47 65 74 20 74 68 65 20 6b 65 79 6d 61 70 20	...23156)])#@275.Get.the.keymap.
5c40	63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 74 6f 20 53 54 41 54 45 20 61 6e 64 20 4b 45 59 4d 41	corresponding.to.STATE.and.KEYMA
5c60	50 2d 53 59 4d 2e 0a 49 66 20 4d 49 4e 4f 52 2d 4d 4f 44 45 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c	P-SYM..If.MINOR-MODE.is.non-nil,
5c80	20 4b 45 59 4d 41 50 2d 53 59 4d 20 69 73 20 63 6f 6e 73 69 64 65 72 65 64 20 74 6f 20 62 65 20	.KEYMAP-SYM.is.considered.to.be.
5ca0	61 20 6d 69 6e 6f 72 20 6d 6f 64 65 20 6e 61 6d 65 2e 0a 52 65 74 75 72 6e 20 6e 69 6c 20 69 66	a.minor.mode.name..Return.nil.if
5cc0	20 74 68 65 20 53 54 41 54 45 20 61 6e 64 20 4b 45 59 4d 41 50 2d 53 59 4d 20 63 6f 6d 62 69 6e	.the.STATE.and.KEYMAP-SYM.combin
5ce0	61 74 69 6f 6e 20 69 73 20 69 6e 76 61 6c 69 64 20 28 65 2e 67 2e 20 74 68 65 20 6b 65 79 6d 61	ation.is.invalid.(e.g..the.keyma
5d00	70 0a 64 6f 65 73 20 6e 6f 74 20 79 65 74 20 65 78 69 73 74 29 2e 0a 0a 28 66 6e 20 53 54 41 54	p.does.not.yet.exist)...(fn.STAT
5d20	45 20 4b 45 59 4d 41 50 2d 53 59 4d 20 26 6f 70 74 69 6f 6e 61 6c 20 4d 49 4e 4f 52 2d 4d 4f 44	E.KEYMAP-SYM.&optional.MINOR-MOD
5d40	45 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 2d 67 65 74 2d 6b 65 79	E)..(defalias.'annalist--get-key
5d60	6d 61 70 20 23 5b 37 37 30 20 22 5c 33 30 30 02 21 5c 32 30 35 08 00 01 4a 03 5c 32 30 33 38 00	map.#[770."\300.!\205...J.\2038.
5d80	02 5c 33 30 31 3d 5c 32 30 33 18 00 5c 33 30 32 04 5c 33 30 33 5c 33 30 34 23 5c 32 30 37 01 5c	.\301=\203..\302.\303\304#\207.\
5da0	32 30 33 21 00 5c 33 30 35 04 04 5c 22 5c 32 30 37 02 5c 33 30 36 3d 5c 32 30 33 2d 00 5c 33 30	203!.\305..\"\207.\306=\203-.\30
5dc0	32 04 5c 33 30 37 5c 33 30 34 23 5c 32 30 37 5c 32 31 31 5c 32 30 35 42 00 5c 33 31 30 01 05 5c	2.\307\304#\207\211\205B.\310..\
5de0	33 30 34 5c 32 31 31 24 5c 32 30 37 02 5c 33 30 31 3d 5c 32 30 33 41 00 5c 33 31 31 20 5c 32 30	304\211$\207.\301=\203A.\311.\20
5e00	37 5c 32 31 31 5c 32 30 37 22 20 5b 62 6f 75 6e 64 70 20 67 6c 6f 62 61 6c 20 65 76 69 6c 2d 73	7\211\207".[boundp.global.evil-s
5e20	74 61 74 65 2d 70 72 6f 70 65 72 74 79 20 3a 6b 65 79 6d 61 70 20 74 20 65 76 69 6c 2d 67 65 74	tate-property.:keymap.t.evil-get
5e40	2d 6d 69 6e 6f 72 2d 6d 6f 64 65 2d 6b 65 79 6d 61 70 20 6c 6f 63 61 6c 20 3a 6c 6f 63 61 6c 2d	-minor-mode-keymap.local.:local-
5e60	6b 65 79 6d 61 70 20 65 76 69 6c 2d 67 65 74 2d 61 75 78 69 6c 69 61 72 79 2d 6b 65 79 6d 61 70	keymap.evil-get-auxiliary-keymap
5e80	20 63 75 72 72 65 6e 74 2d 67 6c 6f 62 61 6c 2d 6d 61 70 5d 20 39 20 28 23 24 20 2e 20 32 33 36	.current-global-map].9.(#$...236
5ea0	30 31 29 5d 29 23 40 31 33 30 20 52 65 74 75 72 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 64 65	01)])#@130.Return.the.current.de
5ec0	66 69 6e 69 74 69 6f 6e 20 66 6f 72 20 4b 45 59 4d 41 50 20 61 6e 64 20 4b 45 59 2e 0a 57 68 65	finition.for.KEYMAP.and.KEY..Whe
5ee0	6e 20 61 20 73 75 62 2d 73 65 71 75 65 6e 63 65 20 6f 66 20 4b 45 59 20 69 73 20 62 6f 75 6e 64	n.a.sub-sequence.of.KEY.is.bound
5f00	2c 20 72 65 74 75 72 6e 20 6e 69 6c 20 69 6e 73 74 65 61 64 20 6f 66 20 31 2e 0a 0a 28 66 6e 20	,.return.nil.instead.of.1...(fn.
5f20	4b 45 59 4d 41 50 20 4b 45 59 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74	KEYMAP.KEY)..(defalias.'annalist
5f40	2d 2d 6c 6f 6f 6b 75 70 2d 6b 65 79 20 23 5b 35 31 34 20 22 01 5c 32 30 35 16 00 5c 32 31 31 5c	--lookup-key.#[514.".\205..\211\
5f60	32 30 35 16 00 5c 33 30 30 02 02 5c 22 5c 32 31 31 5c 33 30 31 3d 3f 5c 32 30 35 14 00 5c 32 31	205..\300..\"\211\301=?\205..\21
5f80	31 5c 32 36 32 01 5c 32 30 37 22 20 5b 6c 6f 6f 6b 75 70 2d 6b 65 79 20 31 5d 20 35 20 28 23 24	1\262.\207".[lookup-key.1].5.(#$
5fa0	20 2e 20 32 34 32 33 35 29 5d 29 23 40 33 37 32 20 57 68 65 6e 20 74 6f 20 75 70 64 61 74 65 20	...24235)])#@372.When.to.update.
5fc0	74 68 65 20 73 74 6f 72 65 64 20 70 72 65 76 69 6f 75 73 20 6b 65 79 20 64 65 66 69 6e 69 74 69	the.stored.previous.key.definiti
5fe0	6f 6e 2e 0a 57 68 65 6e 20 73 65 74 20 74 6f 20 27 6f 6e 2d 63 68 61 6e 67 65 2c 20 75 70 64 61	on..When.set.to.'on-change,.upda
6000	74 65 20 74 68 65 20 70 72 65 76 69 6f 75 73 20 64 65 66 69 6e 69 74 69 6f 6e 20 6f 6e 6c 79 20	te.the.previous.definition.only.
6020	77 68 65 6e 20 74 68 65 20 6f 6c 64 0a 64 65 66 69 6e 69 74 69 6f 6e 20 69 73 20 64 69 66 66 65	when.the.old.definition.is.diffe
6040	72 65 6e 74 20 66 72 6f 6d 20 74 68 65 20 63 75 72 72 65 6e 74 20 6f 6e 65 20 28 65 2e 67 2e 20	rent.from.the.current.one.(e.g..
6060	65 76 61 6c 75 61 74 69 6e 67 20 61 20 60 64 65 66 69 6e 65 2d 6b 65 79 27 0a 63 61 6c 6c 20 74	evaluating.a.`define-key'.call.t
6080	77 69 63 65 20 77 69 6c 6c 20 6e 6f 74 20 61 66 66 65 63 74 20 74 68 65 20 73 74 6f 72 65 64 20	wice.will.not.affect.the.stored.
60a0	70 72 65 76 69 6f 75 73 20 64 65 66 69 6e 69 74 69 6f 6e 20 74 68 65 20 73 65 63 6f 6e 64 20 74	previous.definition.the.second.t
60c0	69 6d 65 29 2e 20 57 68 65 6e 0a 73 65 74 20 74 6f 20 6e 69 6c 2c 20 6f 6e 6c 79 20 75 70 64 61	ime)..When.set.to.nil,.only.upda
60e0	74 65 20 74 68 65 20 70 72 65 76 69 6f 75 73 20 64 65 66 69 6e 69 74 69 6f 6e 20 77 68 65 6e 20	te.the.previous.definition.when.
6100	74 68 65 20 6b 65 79 20 77 61 73 20 70 72 65 76 69 6f 75 73 6c 79 0a 75 6e 62 6f 75 6e 64 2f 6e	the.key.was.previously.unbound/n
6120	69 6c 2e 1f 23 40 37 38 39 20 55 70 64 61 74 65 20 61 20 22 70 72 65 76 69 6f 75 73 22 20 76 61	il..#@789.Update.a."previous".va
6140	6c 75 65 20 66 6f 72 20 73 6f 6d 65 74 68 69 6e 67 2e 0a 4f 4c 44 2d 52 45 43 4f 52 44 20 69 73	lue.for.something..OLD-RECORD.is
6160	20 74 68 65 20 70 72 65 76 69 6f 75 73 20 72 65 63 6f 72 64 20 6f 72 20 6e 69 6c 20 69 66 20 74	.the.previous.record.or.nil.if.t
6180	68 65 72 65 20 69 73 20 6e 6f 20 70 72 65 76 69 6f 75 73 20 72 65 63 6f 72 64 2e 20 4f 4c 44 2d	here.is.no.previous.record..OLD-
61a0	56 41 4c 0a 69 73 20 74 68 65 20 63 75 72 72 65 6e 74 6c 79 20 73 74 6f 72 65 64 20 22 70 72 65	VAL.is.the.currently.stored."pre
61c0	76 69 6f 75 73 22 20 76 61 6c 75 65 2e 20 43 55 52 52 45 4e 54 2d 56 41 4c 20 69 73 20 74 68 65	vious".value..CURRENT-VAL.is.the
61e0	20 61 63 74 75 61 6c 20 63 75 72 72 65 6e 74 0a 76 61 6c 75 65 20 66 6f 72 20 74 68 65 20 74 68	.actual.current.value.for.the.th
6200	69 6e 67 20 28 77 68 69 63 68 20 63 6f 75 6c 64 20 70 6f 74 65 6e 74 69 61 6c 6c 79 20 62 65 20	ing.(which.could.potentially.be.
6220	64 69 66 66 65 72 65 6e 74 20 66 72 6f 6d 20 74 68 65 20 73 74 6f 72 65 64 0a 63 75 72 72 65 6e	different.from.the.stored.curren
6240	74 20 76 61 6c 75 65 20 69 66 20 6e 6f 74 20 61 6c 6c 20 66 75 6e 63 74 69 6f 6e 73 20 74 68 61	t.value.if.not.all.functions.tha
6260	74 20 63 68 61 6e 67 65 20 74 68 65 20 74 68 69 6e 67 20 63 61 6c 6c 20 66 75 6e 63 74 69 6f 6e	t.change.the.thing.call.function
6280	0a 60 61 6e 6e 61 6c 69 73 74 2d 72 65 63 6f 72 64 27 29 2e 20 4e 45 57 2d 56 41 4c 20 69 73 20	.`annalist-record')..NEW-VAL.is.
62a0	74 68 65 20 6e 65 77 20 76 61 6c 75 65 20 74 68 61 74 20 74 68 65 20 74 68 69 6e 67 20 77 69 6c	the.new.value.that.the.thing.wil
62c0	6c 20 62 65 20 63 68 61 6e 67 65 64 20 74 6f 2e 0a 54 45 53 54 20 69 73 20 74 68 65 20 74 65 73	l.be.changed.to..TEST.is.the.tes
62e0	74 20 74 6f 20 75 73 65 64 20 74 6f 20 63 6f 6d 70 61 72 65 20 76 61 6c 75 65 73 20 28 6f 72 20	t.to.used.to.compare.values.(or.
6300	60 65 71 75 61 6c 27 29 2e 20 49 66 20 74 68 65 72 65 20 69 73 20 6e 6f 0a 4f 6c 44 2d 52 45 43	`equal')..If.there.is.no.OlD-REC
6320	4f 52 44 20 6f 72 20 69 66 20 4e 45 57 2d 56 41 4c 20 69 73 20 73 74 69 6c 6c 20 65 71 75 61 6c	ORD.or.if.NEW-VAL.is.still.equal
6340	20 74 6f 20 43 55 52 52 45 4e 54 2d 56 41 4c 20 61 6e 64 0a 60 61 6e 6e 61 6c 69 73 74 2d 75 70	.to.CURRENT-VAL.and.`annalist-up
6360	64 61 74 65 2d 70 72 65 76 69 6f 75 73 2d 6b 65 79 2d 64 65 66 69 6e 69 74 69 6f 6e 27 20 69 73	date-previous-key-definition'.is
6380	20 6e 6f 6e 2d 6e 69 6c 20 6f 72 20 69 66 20 4f 4c 44 2d 56 41 4c 20 69 73 20 6e 69 6c 20 61 6e	.non-nil.or.if.OLD-VAL.is.nil.an
63a0	64 0a 60 61 6e 6e 61 6c 69 73 74 2d 75 70 64 61 74 65 2d 70 72 65 76 69 6f 75 73 2d 6b 65 79 2d	d.`annalist-update-previous-key-
63c0	64 65 66 69 6e 69 74 69 6f 6e 27 20 69 73 20 6e 69 6c 2c 20 72 65 74 75 72 6e 20 43 55 52 52 45	definition'.is.nil,.return.CURRE
63e0	4e 54 2d 56 41 4c 2e 20 4f 74 68 65 72 77 69 73 65 0a 72 65 74 75 72 6e 20 4f 4c 44 2d 56 41 4c	NT-VAL..Otherwise.return.OLD-VAL
6400	2e 0a 0a 28 66 6e 20 4f 4c 44 2d 52 45 43 4f 52 44 20 4f 4c 44 2d 56 41 4c 20 43 55 52 52 45 4e	...(fn.OLD-RECORD.OLD-VAL.CURREN
6420	54 2d 56 41 4c 20 4e 45 57 2d 56 41 4c 20 26 6f 70 74 69 6f 6e 61 6c 20 54 45 53 54 29 1f 0a 28	T-VAL.NEW-VAL.&optional.TEST)..(
6440	62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 5c 33 30 31 5c 33 30 32 5c 33 30 33 5c 33 30 34 44	byte-code."\300\301\302\303\304D
6460	44 5c 33 30 35 5c 33 30 36 5c 33 30 37 25 5c 32 30 37 22 20 5b 63 75 73 74 6f 6d 2d 64 65 63 6c	D\305\306\307%\207".[custom-decl
6480	61 72 65 2d 76 61 72 69 61 62 6c 65 20 61 6e 6e 61 6c 69 73 74 2d 75 70 64 61 74 65 2d 70 72 65	are-variable.annalist-update-pre
64a0	76 69 6f 75 73 2d 6b 65 79 2d 64 65 66 69 6e 69 74 69 6f 6e 20 66 75 6e 63 61 6c 6c 20 66 75 6e	vious-key-definition.funcall.fun
64c0	63 74 69 6f 6e 20 23 5b 30 20 22 5c 33 30 30 5c 32 30 37 22 20 5b 6f 6e 2d 63 68 61 6e 67 65 5d	ction.#[0."\300\207".[on-change]
64e0	20 31 20 28 23 24 20 2e 20 32 35 35 29 5d 20 28 23 24 20 2e 20 32 34 34 39 37 29 20 3a 74 79 70	.1.(#$...255)].(#$...24497).:typ
6500	65 20 28 63 68 6f 69 63 65 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 57 68 65 6e 20 64 65 66 69	e.(choice.(const.:tag."When.defi
6520	6e 69 74 69 6f 6e 20 68 61 73 20 63 68 61 6e 67 65 64 22 20 6f 6e 2d 63 68 61 6e 67 65 29 20 28	nition.has.changed".on-change).(
6540	63 6f 6e 73 74 20 3a 74 61 67 20 22 57 68 65 6e 20 74 68 65 20 6b 65 79 20 77 61 73 20 70 72 65	const.:tag."When.the.key.was.pre
6560	76 69 6f 75 73 6c 79 20 75 6e 62 6f 75 6e 64 22 20 6e 69 6c 29 29 5d 20 36 29 0a 28 64 65 66 61	viously.unbound".nil))].6).(defa
6580	6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 2d 70 72 65 76 69 6f 75 73 2d 76 61 6c 75 65 20 23	lias.'annalist--previous-value.#
65a0	5b 31 32 38 34 20 22 04 5c 32 30 33 19 00 08 5c 32 30 33 14 00 5c 32 31 31 5c 32 30 36 0d 00 5c	[1284.".\203...\203..\211\206..\
65c0	33 30 31 03 03 5c 22 3f 5c 32 30 32 16 00 03 3f 5c 32 30 33 1b 00 02 5c 32 30 37 03 5c 32 30 37	301..\"?\202...?\203...\207.\207
65e0	22 20 5b 61 6e 6e 61 6c 69 73 74 2d 75 70 64 61 74 65 2d 70 72 65 76 69 6f 75 73 2d 6b 65 79 2d	".[annalist-update-previous-key-
6600	64 65 66 69 6e 69 74 69 6f 6e 20 65 71 75 61 6c 5d 20 38 20 28 23 24 20 2e 20 32 34 38 37 34 29	definition.equal].8.(#$...24874)
6620	5d 29 23 40 33 35 30 20 55 73 69 6e 67 20 74 68 65 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 69 6e	])#@350.Using.the.information.in
6640	20 4f 4c 44 2d 52 45 43 4f 52 44 20 75 70 64 61 74 65 20 4e 45 57 2d 52 45 43 4f 52 44 2e 0a 54	.OLD-RECORD.update.NEW-RECORD..T
6660	68 65 20 70 72 65 76 69 6f 75 73 20 64 65 66 69 6e 69 74 69 6f 6e 20 69 74 65 6d 20 69 6e 20 4e	he.previous.definition.item.in.N
6680	45 57 2d 52 45 43 4f 52 44 20 77 69 6c 6c 20 75 70 64 61 74 65 64 20 62 61 73 65 64 20 6f 6e 20	EW-RECORD.will.updated.based.on.
66a0	74 68 65 20 6f 6c 64 0a 72 65 63 6f 72 64 65 64 20 70 72 65 76 69 6f 75 73 20 64 65 66 69 6e 69	the.old.recorded.previous.defini
66c0	74 69 6f 6e 20 28 77 68 69 63 68 20 6d 61 79 20 6e 6f 74 20 65 78 69 73 74 29 2c 20 74 68 65 20	tion.(which.may.not.exist),.the.
66e0	61 63 74 75 61 6c 2f 63 75 72 72 65 6e 74 0a 64 65 66 69 6e 69 74 69 6f 6e 2c 20 61 6e 64 20 74	actual/current.definition,.and.t
6700	68 65 20 6e 65 77 20 64 65 66 69 6e 69 74 69 6f 6e 2e 20 53 45 54 54 49 4e 47 53 20 69 73 20 75	he.new.definition..SETTINGS.is.u
6720	73 65 64 20 74 6f 20 63 68 65 63 6b 20 66 6f 72 20 61 20 74 65 73 74 0a 66 75 6e 63 74 69 6f 6e	sed.to.check.for.a.test.function
6740	20 66 6f 72 20 63 6f 6d 70 61 72 69 6e 67 20 6b 65 79 20 64 65 66 69 6e 69 74 69 6f 6e 73 2e 0a	.for.comparing.key.definitions..
6760	0a 28 66 6e 20 4f 4c 44 2d 52 45 43 4f 52 44 20 4e 45 57 2d 52 45 43 4f 52 44 20 53 45 54 54 49	.(fn.OLD-RECORD.NEW-RECORD.SETTI
6780	4e 47 53 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 2d 75 70 64 61 74	NGS)..(defalias.'annalist--updat
67a0	65 2d 6b 65 79 62 69 6e 64 69 6e 67 20 23 5b 37 37 31 20 22 5c 33 30 30 01 5c 33 30 31 5c 22 02	e-keybinding.#[771."\300.\301\".
67c0	38 5c 33 30 32 04 38 03 40 04 41 40 5c 33 30 33 06 06 38 5c 33 30 30 05 5c 33 30 34 5c 22 5c 32	8\302.8.@.A@\303..8\300.\304\"\2
67e0	30 36 5c 22 00 5c 33 30 35 02 04 5c 33 30 30 06 08 5c 33 30 36 5c 22 23 5c 32 31 31 5c 32 30 35	06\".\305..\300..\306\"#\211\205
6800	2a 00 5c 33 30 37 01 03 5c 22 5c 33 31 30 06 09 38 5c 33 31 31 06 09 5c 33 31 32 5c 22 02 5c 32	*.\307..\"\310..8\311..\312\".\2
6820	30 33 4b 00 5c 33 30 32 06 0b 5c 32 33 33 5c 32 31 31 5c 33 31 33 06 0e 06 0b 06 07 06 07 06 07	03K.\302..\233\211\313..........
6840	25 5c 32 34 30 5c 32 36 36 02 06 5c 6e 5c 32 30 37 22 20 5b 70 6c 69 73 74 2d 67 65 74 20 3a 6d	%\240\266..\n\207".[plist-get.:m
6860	65 74 61 64 61 74 61 2d 69 6e 64 65 78 20 34 20 32 20 3a 6b 65 79 6d 61 70 20 61 6e 6e 61 6c 69	etadata-index.4.2.:keymap.annali
6880	73 74 2d 2d 67 65 74 2d 6b 65 79 6d 61 70 20 3a 6d 69 6e 6f 72 2d 6d 6f 64 65 20 61 6e 6e 61 6c	st--get-keymap.:minor-mode.annal
68a0	69 73 74 2d 2d 6c 6f 6f 6b 75 70 2d 6b 65 79 20 33 20 61 6e 6e 61 6c 69 73 74 2d 2d 74 65 73 74	ist--lookup-key.3.annalist--test
68c0	20 64 65 66 69 6e 69 74 69 6f 6e 20 61 6e 6e 61 6c 69 73 74 2d 2d 70 72 65 76 69 6f 75 73 2d 76	.definition.annalist--previous-v
68e0	61 6c 75 65 5d 20 32 30 20 28 23 24 20 2e 20 32 36 31 35 32 29 5d 29 23 40 32 36 37 20 52 65 74	alue].20.(#$...26152)])#@267.Ret
6900	75 72 6e 20 77 68 65 74 68 65 72 20 4b 45 59 4d 41 50 2d 53 59 4d 20 69 73 20 62 6f 75 6e 64 2e	urn.whether.KEYMAP-SYM.is.bound.
6920	0a 54 68 69 73 20 69 73 20 6e 65 63 65 73 73 61 72 79 20 73 69 6e 63 65 20 69 74 20 69 73 20 70	.This.is.necessary.since.it.is.p
6940	6f 73 73 69 62 6c 65 20 74 6f 20 72 65 63 6f 72 64 20 6b 65 79 62 69 6e 64 69 6e 67 73 20 62 65	ossible.to.record.keybindings.be
6960	66 6f 72 65 20 74 68 65 79 20 61 72 65 0a 61 63 74 75 61 6c 6c 79 20 64 65 66 69 6e 65 64 20 28	fore.they.are.actually.defined.(
6980	65 2e 67 2e 20 6b 65 79 62 69 6e 64 69 6e 67 73 20 6d 61 79 20 62 65 20 64 65 66 65 72 72 65 64	e.g..keybindings.may.be.deferred
69a0	20 75 6e 74 69 6c 20 74 68 65 20 6b 65 79 6d 61 70 20 65 78 69 73 74 73 29 2e 0a 27 6c 6f 63 61	.until.the.keymap.exists)..'loca
69c0	6c 20 61 6e 64 20 27 67 6c 6f 62 61 6c 20 61 72 65 20 68 61 6e 64 6c 65 64 20 73 70 65 63 69 61	l.and.'global.are.handled.specia
69e0	6c 6c 79 20 28 72 65 74 75 72 6e 20 6e 6f 6e 2d 6e 69 6c 29 2e 0a 0a 28 66 6e 20 4b 45 59 4d 41	lly.(return.non-nil)...(fn.KEYMA
6a00	50 2d 53 59 4d 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 2d 76 61 6c	P-SYM)..(defalias.'annalist--val
6a20	69 64 2d 6b 65 79 6d 61 70 2d 70 20 23 5b 32 35 37 20 22 5c 32 31 31 5c 33 30 30 3e 5c 32 30 36	id-keymap-p.#[257."\211\300>\206
6a40	09 00 5c 33 30 31 01 21 5c 32 30 37 22 20 5b 28 6c 6f 63 61 6c 20 67 6c 6f 62 61 6c 29 20 62 6f	..\301.!\207".[(local.global).bo
6a60	75 6e 64 70 5d 20 33 20 28 23 24 20 2e 20 32 36 38 37 37 29 5d 29 23 40 37 33 20 52 65 74 75 72	undp].3.(#$...26877)])#@73.Retur
6a80	6e 20 77 68 65 74 68 65 72 20 4b 45 59 4d 41 50 2d 53 59 4d 27 73 20 76 61 6c 75 65 20 69 73 20	n.whether.KEYMAP-SYM's.value.is.
6aa0	61 6e 20 61 63 74 69 76 65 20 6b 65 79 6d 61 70 2e 0a 0a 28 66 6e 20 4b 45 59 4d 41 50 2d 53 59	an.active.keymap...(fn.KEYMAP-SY
6ac0	4d 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 2d 61 63 74 69 76 65 2d	M)..(defalias.'annalist--active-
6ae0	6b 65 79 6d 61 70 2d 70 20 23 5b 32 35 37 20 22 5c 32 31 31 5c 33 30 30 3e 5c 32 30 36 11 00 5c	keymap-p.#[257."\211\300>\206..\
6b00	33 30 31 01 21 5c 32 30 35 11 00 5c 32 31 31 4a 5c 33 30 32 20 3e 5c 32 30 37 22 20 5b 28 6c 6f	301.!\205..\211J\302.>\207".[(lo
6b20	63 61 6c 20 67 6c 6f 62 61 6c 29 20 62 6f 75 6e 64 70 20 63 75 72 72 65 6e 74 2d 61 63 74 69 76	cal.global).boundp.current-activ
6b40	65 2d 6d 61 70 73 5d 20 33 20 28 23 24 20 2e 20 32 37 32 35 39 29 5d 29 23 40 34 34 20 52 65 74	e-maps].3.(#$...27259)])#@44.Ret
6b60	75 72 6e 20 77 68 65 74 68 65 72 20 53 54 41 54 45 20 69 73 20 76 61 6c 69 64 2e 0a 0a 28 66 6e	urn.whether.STATE.is.valid...(fn
6b80	20 53 54 41 54 45 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 2d 76 61	.STATE)..(defalias.'annalist--va
6ba0	6c 69 64 2d 73 74 61 74 65 2d 70 20 23 5b 32 35 37 20 22 5c 32 31 31 3f 5c 32 30 36 0e 00 5c 33	lid-state-p.#[257."\211?\206..\3
6bc0	30 30 5c 33 30 31 21 5c 32 30 35 0e 00 5c 33 30 32 01 21 5c 32 30 37 22 20 5b 66 65 61 74 75 72	00\301!\205..\302.!\207".[featur
6be0	65 70 20 65 76 69 6c 20 65 76 69 6c 2d 73 74 61 74 65 2d 70 5d 20 33 20 28 23 24 20 2e 20 32 37	ep.evil.evil-state-p].3.(#$...27
6c00	34 38 35 29 5d 29 23 40 38 36 20 52 65 74 75 72 6e 20 77 68 65 74 68 65 72 20 53 54 41 54 45 20	485)])#@86.Return.whether.STATE.
6c20	69 73 20 76 61 6c 69 64 20 61 6e 64 20 76 61 72 69 61 62 6c 65 20 60 65 76 69 6c 2d 6c 6f 63 61	is.valid.and.variable.`evil-loca
6c40	6c 2d 6d 6f 64 65 27 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2e 0a 0a 28 66 6e 20 53 54 41 54 45 29 1f	l-mode'.is.non-nil...(fn.STATE).
6c60	0a 28 64 65 66 61 6c 69 61 73 20 27 61 6e 6e 61 6c 69 73 74 2d 2d 76 61 6c 69 64 2d 73 74 61 74	.(defalias.'annalist--valid-stat
6c80	65 2d 61 6e 64 2d 65 76 69 6c 2d 6f 6e 2d 70 20 23 5b 32 35 37 20 22 5c 32 31 31 3f 5c 32 30 36	e-and-evil-on-p.#[257."\211?\206
6ca0	5c 66 00 5c 33 30 31 01 21 5c 32 30 35 5c 66 00 08 5c 32 30 37 22 20 5b 65 76 69 6c 2d 6c 6f 63	\f.\301.!\205\f..\207".[evil-loc
6cc0	61 6c 2d 6d 6f 64 65 20 61 6e 6e 61 6c 69 73 74 2d 2d 76 61 6c 69 64 2d 73 74 61 74 65 2d 70 5d	al-mode.annalist--valid-state-p]
6ce0	20 33 20 28 23 24 20 2e 20 32 37 36 35 39 29 5d 29 0a 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33	.3.(#$...27659)]).(byte-code."\3
6d00	30 30 5c 33 30 31 5c 33 30 32 5c 33 30 33 5c 33 30 34 5c 33 30 35 5c 33 30 36 5c 33 30 37 5c 33	00\301\302\303\304\305\306\307\3
6d20	31 30 5c 33 31 31 5c 33 31 32 5c 33 31 33 5c 33 31 34 5c 33 31 35 5c 33 31 36 5c 32 35 37 0d 5c	10\311\312\313\314\315\316\257.\
6d40	22 5c 32 31 30 5c 33 31 37 5c 33 30 31 5c 33 32 30 5c 33 31 32 5c 33 32 31 5c 33 32 32 45 5c 33	"\210\317\301\320\312\321\322E\3
6d60	31 33 5c 33 32 31 5c 33 32 33 45 5c 33 31 34 5c 33 32 31 5c 33 32 34 5c 33 32 35 5c 33 32 36 5c	13\321\323E\314\321\324\325\326\
6d80	22 45 5c 33 31 35 5c 33 32 31 5c 33 32 32 45 5c 33 31 36 5c 33 32 37 5c 33 33 30 5c 33 32 31 5c	"E\315\321\322E\316\327\330\321\
6da0	33 32 32 5c 32 35 37 05 5c 33 33 31 5c 33 33 32 5c 33 33 33 5c 33 33 34 5c 33 33 33 46 5c 33 33	322\257.\331\332\333\334\333F\33
6dc0	35 5c 33 33 36 5c 32 35 37 09 23 5c 32 31 30 5c 33 31 37 5c 33 30 31 5c 33 33 37 5c 33 31 32 5c	5\336\257.#\210\317\301\337\312\
6de0	33 34 30 5c 33 34 31 45 5c 33 31 33 5c 33 34 30 5c 33 34 32 45 44 5c 33 34 33 5c 33 32 30 25 5c	340\341E\313\340\342ED\343\320%\
6e00	32 31 30 5c 33 31 37 5c 33 30 31 5c 33 34 34 5c 33 31 32 5c 33 34 30 5c 33 34 35 45 5c 33 31 33	210\317\301\344\312\340\345E\313
6e20	5c 33 34 30 5c 33 34 36 45 44 5c 33 34 33 5c 33 32 30 25 5c 32 31 30 5c 33 34 37 5c 33 35 30 21	\340\346ED\343\320%\210\347\350!
6e40	5c 32 30 37 22 20 5b 61 6e 6e 61 6c 69 73 74 2d 64 65 66 69 6e 65 2d 74 6f 6d 65 20 6b 65 79 62	\207".[annalist-define-tome.keyb
6e60	69 6e 64 69 6e 67 73 20 3a 70 72 69 6d 61 72 79 2d 6b 65 79 20 28 6b 65 79 6d 61 70 20 73 74 61	indings.:primary-key.(keymap.sta
6e80	74 65 20 6b 65 79 29 20 3a 74 61 62 6c 65 2d 73 74 61 72 74 2d 69 6e 64 65 78 20 32 20 3a 70 72	te.key).:table-start-index.2.:pr
6ea0	65 70 72 6f 63 65 73 73 20 61 6e 6e 61 6c 69 73 74 2d 2d 70 72 65 70 72 6f 63 65 73 73 2d 6b 65	eprocess.annalist--preprocess-ke
6ec0	79 62 69 6e 64 69 6e 67 20 3a 72 65 63 6f 72 64 2d 75 70 64 61 74 65 20 61 6e 6e 61 6c 69 73 74	ybinding.:record-update.annalist
6ee0	2d 2d 75 70 64 61 74 65 2d 6b 65 79 62 69 6e 64 69 6e 67 20 6b 65 79 6d 61 70 20 73 74 61 74 65	--update-keybinding.keymap.state
6f00	20 6b 65 79 20 64 65 66 69 6e 69 74 69 6f 6e 20 70 72 65 76 69 6f 75 73 2d 64 65 66 69 6e 69 74	.key.definition.previous-definit
6f20	69 6f 6e 20 61 6e 6e 61 6c 69 73 74 2d 64 65 66 69 6e 65 2d 76 69 65 77 20 64 65 66 61 75 6c 74	ion.annalist-define-view.default
6f40	20 3a 66 6f 72 6d 61 74 20 61 6e 6e 61 6c 69 73 74 2d 63 6f 64 65 20 61 6e 6e 61 6c 69 73 74 2d	.:format.annalist-code.annalist-
6f60	63 61 70 69 74 61 6c 69 7a 65 20 61 6e 6e 61 6c 69 73 74 2d 63 6f 6d 70 6f 73 65 20 61 6e 6e 61	capitalize.annalist-compose.anna
6f80	6c 69 73 74 2d 76 65 72 62 61 74 69 6d 20 6b 65 79 2d 64 65 73 63 72 69 70 74 69 6f 6e 20 3a 74	list-verbatim.key-description.:t
6fa0	69 74 6c 65 20 22 50 72 65 76 69 6f 75 73 22 20 3a 64 65 66 61 75 6c 74 73 20 3a 65 78 74 72 61	itle."Previous".:defaults.:extra
6fc0	63 74 70 20 6c 69 73 74 70 20 3a 73 72 63 2d 62 6c 6f 63 6b 2d 70 20 3a 68 6f 6f 6b 73 20 61 6e	ctp.listp.:src-block-p.:hooks.an
6fe0	6e 61 6c 69 73 74 2d 6d 75 6c 74 69 6c 69 6e 65 2d 73 6f 75 72 63 65 2d 62 6c 6f 63 6b 73 20 76	nalist-multiline-source-blocks.v
7000	61 6c 69 64 20 3a 70 72 65 64 69 63 61 74 65 20 61 6e 6e 61 6c 69 73 74 2d 2d 76 61 6c 69 64 2d	alid.:predicate.annalist--valid-
7020	6b 65 79 6d 61 70 2d 70 20 61 6e 6e 61 6c 69 73 74 2d 2d 76 61 6c 69 64 2d 73 74 61 74 65 2d 70	keymap-p.annalist--valid-state-p
7040	20 3a 69 6e 68 65 72 69 74 20 61 63 74 69 76 65 20 61 6e 6e 61 6c 69 73 74 2d 2d 61 63 74 69 76	.:inherit.active.annalist--activ
7060	65 2d 6b 65 79 6d 61 70 2d 70 20 61 6e 6e 61 6c 69 73 74 2d 2d 76 61 6c 69 64 2d 73 74 61 74 65	e-keymap-p.annalist--valid-state
7080	2d 61 6e 64 2d 65 76 69 6c 2d 6f 6e 2d 70 20 70 72 6f 76 69 64 65 20 61 6e 6e 61 6c 69 73 74 5d	-and-evil-on-p.provide.annalist]
70a0	20 31 35 29 0a	.15).