blob: 8204379ce72f104921f7ac43921981442adb8f40 (plain)

ofs	hex dump	ascii
0000	3b 45 4c 43 1c 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 32 38 2e 31 0a 3b 3b 3b 20 77 69 74 68 20 61 6c 6c 20 6f 70 74	cs.version.28.1.;;;.with.all.opt
0040	69 6d 69 7a 61 74 69 6f 6e 73 2e 0a 0a 0a 0a 23 40 35 34 20 4c 69 73 74 20 6f 66 20 64 69 72 65	imizations.....#@54.List.of.dire
0060	63 74 6f 72 69 65 73 20 77 68 65 72 65 20 74 6f 6f 6c 62 61 72 78 20 66 69 6e 64 73 20 69 74 73	ctories.where.toolbarx.finds.its
0080	20 69 6d 61 67 65 73 2e 1f 0a 28 64 65 66 76 61 72 20 74 6f 6f 6c 62 61 72 78 2d 69 6d 61 67 65	.images...(defvar.toolbarx-image
00a0	2d 70 61 74 68 20 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 32 5c 33 30 33 5c 33 30 34 5c 33	-path.(byte-code."\302\303\304\3
00c0	30 35 08 5c 22 5c 22 09 43 5c 32 34 34 5c 32 30 37 22 20 5b 6c 6f 61 64 2d 70 61 74 68 20 64 61	05.\"\".C\244\207".[load-path.da
00e0	74 61 2d 64 69 72 65 63 74 6f 72 79 20 64 65 6c 71 20 6e 69 6c 20 6d 61 70 63 61 72 20 23 5b 32	ta-directory.delq.nil.mapcar.#[2
0100	35 37 20 22 5c 32 31 31 5c 32 30 35 0f 00 5c 33 30 30 5c 33 30 31 02 21 21 5c 33 30 32 5c 32 33	57."\211\205..\300\301.!!\302\23
0120	35 5c 32 30 35 0f 00 5c 32 31 31 5c 32 30 37 22 20 5b 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64	5\205..\211\207".[file-name-nond
0140	69 72 65 63 74 6f 72 79 20 64 69 72 65 63 74 6f 72 79 2d 66 69 6c 65 2d 6e 61 6d 65 20 28 22 74	irectory.directory-file-name.("t
0160	6f 6f 6c 62 61 72 22 20 22 69 6d 61 67 65 73 22 29 5d 20 34 20 22 5c 6e 5c 6e 28 66 6e 20 58 29	oolbar"."images")].4."\n\n(fn.X)
0180	22 5d 5d 20 35 29 20 28 23 24 20 2e 20 38 34 29 29 0a 23 40 31 30 33 20 52 65 74 75 72 6e 20 61	"]].5).(#$...84)).#@103.Return.a
01a0	20 73 74 72 69 6e 67 20 66 72 6f 6d 20 74 68 65 20 6e 61 6d 65 20 6f 66 20 61 20 53 59 4d 42 4f	.string.from.the.name.of.a.SYMBO
01c0	4c 2e 0a 55 70 63 61 73 65 20 69 6e 69 74 69 61 6c 73 20 61 6e 64 20 72 65 70 6c 61 63 65 20 64	L..Upcase.initials.and.replace.d
01e0	61 73 68 65 73 20 62 79 20 73 70 61 63 65 73 2e 0a 0a 28 66 6e 20 53 59 4d 42 4f 4c 29 1f 0a 28	ashes.by.spaces...(fn.SYMBOL)..(
0200	64 65 66 61 6c 69 61 73 20 27 74 6f 6f 6c 62 61 72 78 2d 6d 61 6b 65 2d 73 74 72 69 6e 67 2d 66	defalias.'toolbarx-make-string-f
0220	72 6f 6d 2d 73 79 6d 62 6f 6c 20 23 5b 32 35 37 20 22 5c 33 30 30 5c 33 30 31 02 21 21 5c 33 30	rom-symbol.#[257."\300\301.!!\30
0240	32 5c 33 30 33 02 5c 33 30 32 5c 22 5c 32 31 31 5c 32 30 33 2a 00 5c 32 31 31 40 5c 32 31 31 5c	2\303.\302\"\211\203*.\211@\211\
0260	33 30 34 3d 5c 32 30 33 1e 00 5c 33 30 35 03 42 5c 32 36 32 03 5c 32 30 32 23 00 5c 32 31 31 03	304=\203..\305.B\262.\202#.\211.
0280	42 5c 32 36 32 03 01 41 5c 32 36 36 5c 32 30 32 5c 32 30 32 5c 6e 00 5c 32 31 30 5c 32 31 31 5c	B\262..A\266\202\202\n.\210\211\
02a0	32 33 37 5c 32 36 30 01 5c 32 30 37 22 20 5b 75 70 63 61 73 65 2d 69 6e 69 74 69 61 6c 73 20 73	237\260.\207".[upcase-initials.s
02c0	79 6d 62 6f 6c 2d 6e 61 6d 65 20 6e 69 6c 20 61 70 70 65 6e 64 20 34 35 20 33 32 5d 20 37 20 28	ymbol-name.nil.append.45.32].7.(
02e0	23 24 20 2e 20 34 30 38 29 5d 29 0a 23 40 39 38 20 52 65 74 75 72 6e 20 61 20 28 69 6e 74 65 72	#$...408)]).#@98.Return.a.(inter
0300	6e 29 20 73 79 6d 62 6f 6c 20 66 72 6f 6d 20 53 54 52 49 4e 47 2e 0a 44 6f 77 6e 63 61 73 65 20	n).symbol.from.STRING..Downcase.
0320	73 74 72 69 6e 67 20 61 6e 64 20 72 65 70 6c 61 63 65 20 73 70 61 63 65 73 20 62 79 20 64 61 73	string.and.replace.spaces.by.das
0340	68 65 73 2e 0a 0a 28 66 6e 20 53 54 52 49 4e 47 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 74 6f	hes...(fn.STRING)..(defalias.'to
0360	6f 6c 62 61 72 78 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 66 72 6f 6d 2d 73 74 72 69 6e 67 20 23	olbarx-make-symbol-from-string.#
0380	5b 32 35 37 20 22 5c 33 30 30 01 5c 32 32 37 5c 33 30 31 5c 22 5c 33 30 31 01 5c 32 31 31 5c 32	[257."\300.\227\301\"\301.\211\2
03a0	30 33 27 00 5c 32 31 31 40 5c 32 31 31 5c 33 30 32 3d 5c 32 30 33 1b 00 5c 33 30 33 03 42 5c 32	03'.\211@\211\302=\203..\303.B\2
03c0	36 32 03 5c 32 30 32 20 00 5c 32 31 31 03 42 5c 32 36 32 03 01 41 5c 32 36 36 5c 32 30 32 5c 32	62.\202..\211.B\262..A\266\202\2
03e0	30 32 07 00 5c 32 31 30 5c 33 30 34 01 5c 32 33 37 5c 32 36 30 01 21 5c 32 30 37 22 20 5b 61 70	02..\210\304.\237\260.!\207".[ap
0400	70 65 6e 64 20 6e 69 6c 20 33 32 20 34 35 20 69 6e 74 65 72 6e 5d 20 37 20 28 23 24 20 2e 20 37	pend.nil.32.45.intern].7.(#$...7
0420	35 33 29 5d 29 0a 23 40 32 31 36 20 4e 6f 6e 2d 6e 69 6c 20 6d 65 61 6e 73 20 74 68 65 20 4f 50	53)]).#@216.Non-nil.means.the.OP
0440	54 49 4f 4e 2d 4c 49 53 54 20 69 73 20 6f 66 20 66 6f 72 6d 20 28 4f 50 54 20 46 4f 52 4d 20 2e	TION-LIST.is.of.form.(OPT.FORM..
0460	2e 2e 20 4f 50 54 20 46 4f 52 4d 29 2e 0a 45 61 63 68 20 4f 50 54 20 69 73 20 6d 65 6d 62 65 72	...OPT.FORM)..Each.OPT.is.member
0480	20 6f 66 20 56 41 4c 49 44 2d 4f 50 54 49 4f 4e 53 20 61 6e 64 20 4f 50 54 20 61 72 65 20 70 61	.of.VALID-OPTIONS.and.OPT.are.pa
04a0	69 72 77 69 73 65 0a 64 69 66 66 65 72 65 6e 74 2e 20 20 4f 50 54 49 4f 4e 2d 4c 49 53 54 20 65	irwise.different...OPTION-LIST.e
04c0	71 75 61 6c 20 74 6f 20 6e 69 6c 20 69 73 20 61 20 67 6f 6f 64 20 6f 70 74 69 6f 6e 20 6c 69 73	qual.to.nil.is.a.good.option.lis
04e0	74 2e 0a 0a 28 66 6e 20 4f 50 54 49 4f 4e 2d 4c 49 53 54 20 56 41 4c 49 44 2d 4f 50 54 49 4f 4e	t...(fn.OPTION-LIST.VALID-OPTION
0500	53 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 74 6f 6f 6c 62 61 72 78 2d 67 6f 6f 64 2d 6f 70 74	S)..(defalias.'toolbarx-good-opt
0520	69 6f 6e 2d 6c 69 73 74 2d 70 20 23 5b 35 31 34 20 22 5c 33 30 30 02 5c 33 30 31 04 47 5c 33 30	ion-list-p.#[514."\300.\301.G\30
0540	32 5c 32 34 35 5c 33 30 33 5c 32 31 31 02 57 5c 32 30 33 3e 00 5c 32 31 31 5c 33 30 33 56 5c 32	2\245\303\211.W\203>.\211\303V\2
0560	30 33 19 00 03 41 41 5c 32 36 32 04 03 40 5c 32 31 31 04 5c 32 33 35 5c 32 30 33 25 00 03 5c 32	03...AA\262..@\211.\235\203%..\2
0580	30 32 28 00 5c 32 31 31 04 42 5c 32 36 32 01 5c 32 36 32 03 04 5c 32 30 35 35 00 03 40 06 06 3e	02(.\211.B\262.\262..\2055..@..>
05a0	5c 32 36 32 05 5c 32 31 31 54 5c 32 36 32 01 5c 32 30 32 08 00 5c 32 31 30 03 5c 32 30 35 50 00	\262.\211T\262.\202..\210.\205P.
05c0	01 47 01 3d 5c 32 30 35 50 00 05 47 5c 33 30 32 5c 32 34 36 5c 33 30 33 3d 5c 32 30 37 22 20 5b	.G.=\205P..G\302\246\303=\207".[
05e0	74 20 6e 69 6c 20 32 20 30 5d 20 31 30 20 28 23 24 20 2e 20 31 30 36 38 29 5d 29 0a 23 40 35 31	t.nil.2.0].10.(#$...1068)]).#@51
0600	38 20 52 65 74 75 72 6e 20 61 20 63 6f 6e 73 20 63 65 6c 6c 20 77 69 74 68 20 6e 6f 6e 2d 6f 70	8.Return.a.cons.cell.with.non-op
0620	74 69 6f 6e 73 20 61 6e 64 20 6f 70 74 69 6f 6e 73 20 6f 66 20 47 52 4f 55 50 2d 4c 49 53 54 2e	tions.and.options.of.GROUP-LIST.
0640	0a 54 68 65 20 6f 70 74 69 6f 6e 73 2d 70 61 72 74 20 69 73 20 74 68 65 20 6c 61 72 67 65 73 74	.The.options-part.is.the.largest
0660	20 74 61 69 6c 20 6f 66 20 74 68 65 20 6c 69 73 74 20 47 52 4f 55 50 2d 4c 49 53 54 20 74 68 61	.tail.of.the.list.GROUP-LIST.tha
0680	74 0a 68 61 73 20 61 6e 20 65 6c 65 6d 65 6e 74 20 6f 66 20 56 41 4c 49 44 2d 4f 50 54 49 4f 4e	t.has.an.element.of.VALID-OPTION
06a0	53 20 28 74 68 65 20 63 6f 6d 70 61 72 61 74 69 6f 6e 20 69 73 20 6d 61 64 65 20 77 69 74 68 0a	S.(the.comparation.is.made.with.
06c0	60 6d 65 6d 71 27 2e 29 20 20 54 68 65 20 6e 6f 6e 2d 6f 70 74 69 6f 6e 73 2d 70 61 72 74 20 69	`memq'.)..The.non-options-part.i
06e0	73 20 74 68 65 20 62 65 67 69 6e 6e 69 6e 67 20 6f 66 20 47 52 4f 55 50 2d 4c 49 53 54 0a 6c 65	s.the.beginning.of.GROUP-LIST.le
0700	73 73 20 69 74 73 20 74 61 69 6c 2e 20 20 52 65 74 75 72 6e 20 61 20 63 6f 6e 73 20 63 65 6c 6c	ss.its.tail...Return.a.cons.cell
0720	20 77 68 69 63 68 20 60 63 61 72 27 20 69 73 20 74 68 65 0a 6e 6f 6e 2d 6f 70 74 69 6f 6e 73 2d	.which.`car'.is.the.non-options-
0740	70 61 72 74 20 61 6e 64 20 74 68 65 20 60 63 64 72 27 20 69 73 20 74 68 65 20 6f 70 74 69 6f 6e	part.and.the.`cdr'.is.the.option
0760	73 2d 70 61 72 74 2e 0a 0a 49 66 20 43 48 45 43 4b 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 74 68	s-part...If.CHECK.is.non-nil,.th
0780	65 20 74 61 69 6c 20 69 73 20 74 68 65 20 6c 61 72 67 65 73 74 20 74 68 61 74 20 79 69 65 6c 64	e.tail.is.the.largest.that.yield
07a0	20 6e 6f 6e 2d 6e 69 6c 0a 77 68 65 6e 20 61 70 70 6c 69 65 64 20 74 6f 20 60 74 6f 6f 6c 62 61	.non-nil.when.applied.to.`toolba
07c0	72 78 2d 67 6f 6f 64 2d 6f 70 74 69 6f 6e 2d 6c 69 73 74 2d 70 27 2e 0a 0a 28 66 6e 20 47 52 4f	rx-good-option-list-p'...(fn.GRO
07e0	55 50 2d 4c 49 53 54 20 56 41 4c 49 44 2d 4f 50 54 49 4f 4e 53 20 26 6f 70 74 69 6f 6e 61 6c 20	UP-LIST.VALID-OPTIONS.&optional.
0800	43 48 45 43 4b 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 74 6f 6f 6c 62 61 72 78 2d 73 65 70 61	CHECK)..(defalias.'toolbarx-sepa
0820	72 61 74 65 2d 6f 70 74 69 6f 6e 73 20 23 5b 37 37 30 20 22 5c 33 30 30 5c 32 31 31 03 5c 32 31	rate-options.#[770."\300\211.\21
0840	31 5c 32 30 33 34 00 5c 32 31 31 40 5c 32 31 31 06 07 3e 5c 32 36 32 03 02 47 04 47 56 5c 32 30	1\2034.\211@\211..>\262..G.GV\20
0860	33 2d 00 04 5c 32 30 33 23 00 5c 33 30 31 03 06 07 5c 22 5c 32 30 32 24 00 5c 33 30 32 5c 32 30	3-..\203#.\301...\"\202$.\302\20
0880	33 2d 00 5c 32 31 31 06 07 3e 5c 32 36 32 04 01 41 5c 32 36 36 5c 32 30 32 5c 32 30 32 03 00 5c	3-.\211..>\262..A\266\202\202..\
08a0	32 31 30 5c 33 30 33 05 03 47 5c 22 02 42 5c 32 30 37 22 20 5b 6e 69 6c 20 74 6f 6f 6c 62 61 72	210\303..G\".B\207".[nil.toolbar
08c0	78 2d 67 6f 6f 64 2d 6f 70 74 69 6f 6e 2d 6c 69 73 74 2d 70 20 74 20 62 75 74 6c 61 73 74 5d 20	x-good-option-list-p.t.butlast].
08e0	31 30 20 28 23 24 20 2e 20 31 35 33 38 29 5d 29 0a 23 40 35 38 37 20 4d 65 72 67 65 20 70 72 6f	10.(#$...1538)]).#@587.Merge.pro
0900	70 65 72 74 79 20 6c 69 73 74 73 20 49 4e 4e 45 52 2d 50 52 4f 50 53 20 61 6e 64 20 4f 55 54 45	perty.lists.INNER-PROPS.and.OUTE
0920	52 2d 50 52 4f 50 53 2e 0a 49 4e 4e 45 52 2d 50 52 4f 50 53 20 61 6e 64 20 4f 55 54 45 52 2d 50	R-PROPS..INNER-PROPS.and.OUTER-P
0940	52 4f 50 53 20 61 72 65 20 74 77 6f 20 6c 69 73 74 73 20 69 6e 20 74 68 65 20 66 6f 72 6d 61 74	ROPS.are.two.lists.in.the.format
0960	0a 20 28 50 52 4f 50 20 56 41 4c 20 50 52 4f 50 20 56 41 4c 20 2e 2e 2e 20 50 52 4f 50 20 56 41	..(PROP.VAL.PROP.VAL.....PROP.VA
0980	4c 29 2e 0a 52 65 74 75 72 6e 73 20 61 20 6c 69 73 74 20 77 69 74 68 20 70 72 6f 70 65 72 74 69	L)..Returns.a.list.with.properti
09a0	65 73 20 61 6e 64 20 76 61 6c 75 65 73 20 6d 65 72 67 65 64 2e 0a 0a 4f 56 45 52 52 49 44 45 20	es.and.values.merged...OVERRIDE.
09c0	61 6e 64 20 41 44 44 20 61 72 65 20 73 75 70 70 6f 73 65 64 20 74 6f 20 62 65 20 6c 69 73 74 73	and.ADD.are.supposed.to.be.lists
09e0	20 6f 66 20 73 79 6d 62 6f 6c 73 2e 20 20 54 68 65 20 76 61 6c 75 65 0a 6f 66 20 61 20 70 72 6f	.of.symbols...The.value.of.a.pro
0a00	70 65 72 74 79 20 69 6e 20 4f 56 45 52 52 49 44 45 20 69 73 20 74 68 65 20 6f 6e 65 20 6f 6e 20	perty.in.OVERRIDE.is.the.one.on.
0a20	4f 55 54 45 52 2d 50 52 4f 50 53 20 6f 72 0a 49 4e 4e 45 52 2d 50 52 4f 50 53 2c 20 62 75 74 20	OUTER-PROPS.or.INNER-PROPS,.but.
0a40	69 66 20 74 68 65 20 70 72 6f 70 65 72 74 79 20 69 73 20 69 6e 20 62 6f 74 68 2c 20 74 68 65 20	if.the.property.is.in.both,.the.
0a60	76 61 6c 75 65 20 69 6e 0a 49 4e 4e 45 52 2d 50 52 4f 50 53 20 69 73 20 75 73 65 64 2e 20 20 54	value.in.INNER-PROPS.is.used...T
0a80	68 65 20 76 61 6c 75 65 20 6f 66 20 61 20 70 72 6f 70 65 72 74 79 20 69 6e 20 41 44 44 20 77 69	he.value.of.a.property.in.ADD.wi
0aa0	6c 6c 20 62 65 20 61 0a 6c 69 73 74 20 77 69 74 68 20 66 69 72 73 74 20 65 6c 65 6d 65 6e 74 20	ll.be.a.list.with.first.element.
0ac0	74 68 65 20 73 79 6d 62 6f 6c 20 60 3a 61 64 64 2d 76 61 6c 75 65 2d 6c 69 73 74 27 20 61 6e 64	the.symbol.`:add-value-list'.and
0ae0	20 74 68 65 20 72 65 73 74 0a 61 72 65 20 74 68 65 20 70 72 6f 70 65 72 74 69 65 73 2c 20 69 6e	.the.rest.are.the.properties,.in
0b00	6e 65 72 20 70 72 6f 70 65 72 74 69 65 73 20 66 69 72 73 74 2e 0a 0a 28 66 6e 20 49 4e 4e 45 52	ner.properties.first...(fn.INNER
0b20	2d 50 52 4f 50 53 20 4f 55 54 45 52 2d 50 52 4f 50 53 20 4f 56 45 52 52 49 44 45 20 41 44 44 29	-PROPS.OUTER-PROPS.OVERRIDE.ADD)
0b40	1f 0a 28 64 65 66 61 6c 69 61 73 20 27 74 6f 6f 6c 62 61 72 78 2d 6d 65 72 67 65 2d 70 72 6f 70	..(defalias.'toolbarx-merge-prop
0b60	73 20 23 5b 31 30 32 38 20 22 5c 33 30 30 5c 32 31 31 5c 32 31 31 04 5c 32 31 31 5c 32 30 33 3c	s.#[1028."\300\211\211.\211\203<
0b80	00 5c 32 31 31 40 5c 32 31 31 06 09 3e 5c 32 30 33 21 00 5c 33 30 31 05 02 5c 32 31 31 06 5c 66	.\211@\211..>\203!.\301..\211.\f
0ba0	3e 41 40 44 5c 22 5c 32 36 32 05 5c 32 30 32 35 00 5c 32 31 31 06 08 3e 5c 32 30 33 35 00 5c 33	>A@D\"\262.\2025.\211..>\2035.\3
0bc0	30 31 05 02 5c 32 31 31 06 0b 3e 41 40 44 5c 22 5c 32 36 32 05 01 41 5c 32 36 36 5c 32 30 32 5c	01..\211..>A@D\"\262..A\266\202\
0be0	32 30 32 04 00 5c 32 31 30 03 5c 32 31 31 5c 32 30 33 5c 32 36 33 00 5c 32 31 31 40 5c 32 31 31	202..\210.\211\203\263.\211@\211
0c00	06 09 3e 5c 32 36 32 04 03 5c 32 30 33 6d 00 03 41 40 3c 5c 32 30 33 67 00 03 41 40 40 5c 33 30	..>\262..\203m..A@<\203g..A@@\30
0c20	32 3d 5c 32 30 33 67 00 03 41 40 41 5c 32 36 32 04 5c 32 30 32 6d 00 03 41 40 43 5c 32 36 32 04	2=\203g..A@A\262.\202m..A@C\262.
0c40	5c 32 31 31 06 08 3e 5c 32 36 32 03 02 5c 32 30 33 5c 32 32 36 00 02 41 40 3c 5c 32 30 33 5c 32	\211..>\262..\203\226..A@<\203\2
0c60	32 30 00 02 41 40 40 5c 33 30 32 3d 5c 32 30 33 5c 32 32 30 00 02 41 40 41 5c 32 36 32 03 5c 32	20..A@@\302=\203\220..A@A\262.\2
0c80	30 32 5c 32 32 36 00 02 41 40 43 5c 32 36 32 03 5c 33 30 31 04 04 5c 22 5c 32 30 33 5c 32 35 34	02\226..A@C\262.\301..\"\203\254
0ca0	00 5c 33 30 31 05 02 5c 33 30 32 5c 33 30 31 06 08 06 08 5c 22 42 44 5c 22 5c 32 36 32 05 01 41	.\301..\302\301....\"BD\"\262..A
0cc0	5c 32 36 36 5c 32 30 32 5c 32 30 32 3e 00 03 5c 32 30 37 22 20 5b 6e 69 6c 20 61 70 70 65 6e 64	\266\202\202>..\207".[nil.append
0ce0	20 3a 61 64 64 2d 76 61 6c 75 65 2d 6c 69 73 74 5d 20 31 36 20 28 23 24 20 2e 20 32 32 39 35 29	.:add-value-list].16.(#$...2295)
0d00	5d 29 0a 23 40 32 38 39 20 52 65 74 75 72 6e 20 61 20 63 6f 6d 6d 61 6e 64 20 6d 61 64 65 20 66	]).#@289.Return.a.command.made.f
0d20	72 6f 6d 20 43 4f 4d 4d 2c 20 50 52 45 50 20 61 6e 64 20 41 50 50 2e 0a 43 4f 4d 4d 20 69 73 20	rom.COMM,.PREP.and.APP..COMM.is.
0d40	61 20 63 6f 6d 6d 61 6e 64 20 6f 72 20 61 20 66 6f 72 6d 2e 20 20 50 52 45 50 20 61 6e 64 20 41	a.command.or.a.form...PREP.and.A
0d60	50 50 20 61 72 65 20 66 6f 72 6d 73 2e 20 20 49 66 20 50 52 45 50 20 6f 72 0a 41 50 50 20 61 72	PP.are.forms...If.PREP.or.APP.ar
0d80	65 20 6e 6f 6e 2d 6e 69 6c 2c 20 74 68 65 79 20 61 72 65 20 61 64 64 65 64 20 74 6f 20 74 68 65	e.non-nil,.they.are.added.to.the
0da0	20 72 65 73 75 6c 74 69 6e 67 20 63 6f 6d 6d 61 6e 64 20 61 74 20 74 68 65 0a 62 65 67 69 6e 6e	.resulting.command.at.the.beginn
0dc0	69 6e 67 20 61 6e 64 20 65 6e 64 2c 20 72 65 73 70 65 63 74 69 76 65 6c 79 2e 20 20 49 66 20 62	ing.and.end,.respectively...If.b
0de0	6f 74 68 20 61 72 65 20 6e 69 6c 20 61 6e 64 20 43 4f 4d 4d 20 69 73 20 61 0a 63 6f 6d 6d 61 6e	oth.are.nil.and.COMM.is.a.comman
0e00	64 2c 20 43 4f 4d 4d 20 69 73 20 72 65 74 75 72 6e 65 64 2e 0a 0a 28 66 6e 20 43 4f 4d 4d 20 50	d,.COMM.is.returned...(fn.COMM.P
0e20	52 45 50 20 41 50 50 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 74 6f 6f 6c 62 61 72 78 2d 6d 61	REP.APP)..(defalias.'toolbarx-ma
0e40	6b 65 2d 63 6f 6d 6d 61 6e 64 20 23 5b 37 37 31 20 22 5c 33 30 30 03 21 02 5c 32 30 34 11 00 01	ke-command.#[771."\300.!.\204...
0e60	5c 32 30 34 11 00 5c 32 31 31 5c 32 30 33 11 00 03 5c 32 30 37 5c 33 30 31 5c 33 30 32 05 05 05	\204..\211\203...\207\301\302...
0e80	05 25 5c 32 30 37 22 20 5b 63 6f 6d 6d 61 6e 64 70 20 6d 61 6b 65 2d 63 6c 6f 73 75 72 65 20 23	.%\207".[commandp.make-closure.#
0ea0	5b 30 20 22 5c 33 30 34 5c 33 30 31 5c 32 30 33 0b 00 5c 33 30 35 5c 33 30 31 5c 33 30 36 5c 22	[0."\304\301\203..\305\301\306\"
0ec0	5c 32 36 32 01 5c 33 30 30 5c 32 30 33 1f 00 5c 33 30 33 5c 32 30 33 19 00 5c 33 30 37 5c 33 30	\262.\300\203..\303\203..\307\30
0ee0	30 21 5c 32 30 32 1d 00 5c 33 30 35 5c 33 30 30 5c 33 30 36 5c 22 5c 32 36 32 01 5c 33 30 32 5c	0!\202..\305\300\306\"\262.\302\
0f00	32 30 33 29 00 5c 33 30 35 5c 33 30 32 5c 33 30 36 5c 22 5c 32 36 32 01 5c 32 30 37 22 20 5b 56	203).\305\302\306\"\262.\207".[V
0f20	30 20 56 31 20 56 32 20 56 33 20 6e 69 6c 20 65 76 61 6c 20 74 20 63 61 6c 6c 2d 69 6e 74 65 72	0.V1.V2.V3.nil.eval.t.call-inter
0f40	61 63 74 69 76 65 6c 79 5d 20 34 20 6e 69 6c 20 6e 69 6c 5d 5d 20 31 30 20 28 23 24 20 2e 20 33	actively].4.nil.nil]].10.(#$...3
0f60	33 33 37 29 5d 29 0a 23 40 32 33 33 20 52 65 74 75 72 6e 20 61 6e 20 69 6e 74 65 72 61 63 74 69	337)]).#@233.Return.an.interacti
0f80	76 65 20 60 6c 61 6d 62 64 61 27 2d 65 78 70 72 65 73 73 69 6f 6e 20 74 68 61 74 20 73 68 6f 77	ve.`lambda'-expression.that.show
0fa0	73 20 61 20 70 6f 70 75 70 20 6d 65 6e 75 2e 0a 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 73	s.a.popup.menu..This.function.is
0fc0	20 74 68 65 20 61 63 74 69 6f 6e 20 6f 66 20 60 74 6f 6f 6c 62 61 72 78 2d 6d 6f 75 6e 74 2d 70	.the.action.of.`toolbarx-mount-p
0fe0	6f 70 75 70 2d 6d 65 6e 75 27 20 69 66 0a 69 6e 73 69 64 65 20 45 6d 61 63 73 2e 20 53 65 65 20	opup-menu'.if.inside.Emacs..See.
1000	64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 61 74 20 66 75 6e 63 74 69 6f 6e 20 66	documentation.of.that.function.f
1020	6f 72 20 6d 6f 72 65 2e 0a 0a 28 66 6e 20 53 54 52 49 4e 47 53 20 56 41 52 20 54 59 50 45 20 26	or.more...(fn.STRINGS.VAR.TYPE.&
1040	6f 70 74 69 6f 6e 61 6c 20 54 49 54 4c 45 20 53 41 56 45 29 1f 0a 28 64 65 66 61 6c 69 61 73 20	optional.TITLE.SAVE)..(defalias.
1060	27 74 6f 6f 6c 62 61 72 78 2d 65 6d 61 63 73 2d 6d 6f 75 6e 74 2d 70 6f 70 75 70 2d 6d 65 6e 75	'toolbarx-emacs-mount-popup-menu
1080	20 23 5b 31 32 38 33 20 22 5c 33 30 30 02 21 5c 33 30 31 5c 33 30 32 5c 33 30 33 06 06 5c 33 30	.#[1283."\300.!\301\302\303..\30
10a0	34 3e 5c 32 30 33 12 00 06 06 5c 32 30 32 1c 00 5c 33 30 35 5c 33 30 36 5c 33 30 37 5c 33 31 30	4>\203....\202..\305\306\307\310
10c0	06 5c 6e 5c 22 5c 22 5c 32 31 30 5c 33 31 31 05 5c 33 31 32 3e 5c 32 30 33 26 00 05 5c 32 30 32	.\n\"\"\210\311.\312>\203&..\202
10e0	30 00 5c 33 30 35 5c 33 30 36 5c 33 30 37 5c 33 31 33 06 09 5c 22 5c 22 5c 32 31 30 5c 33 30 33	0.\305\306\307\313..\"\"\210\303
1100	06 5c 6e 5c 32 31 31 5c 32 30 33 5c 32 34 30 00 5c 32 31 31 40 5c 33 31 34 5c 33 31 35 02 21 5c	.\n\211\203\240.\211@\314\315.!\
1120	32 31 31 5c 32 36 32 07 06 06 06 08 3e 5c 32 30 33 57 00 01 54 5c 32 36 32 02 5c 33 31 36 5c 33	211\262.....>\203W..T\262.\316\3
1140	30 37 5c 33 31 37 03 05 23 21 5c 32 36 32 07 5c 32 30 32 3f 00 06 06 06 08 42 5c 32 36 32 08 5c	07\317..#!\262.\202?.....B\262.\
1160	32 36 36 02 5c 33 32 30 06 08 5c 33 32 31 06 07 21 5c 33 32 32 04 06 0b 5c 33 32 33 5c 33 32 34	266.\320..\321..!\322...\323\324
1180	06 13 06 5c 66 06 5c 66 05 25 5c 32 36 32 01 5c 33 32 35 06 5c 6e 5c 33 31 31 3d 5c 32 30 33 5c	...\f.\f.%\262.\325.\n\311=\203\
11a0	32 31 31 00 5c 33 32 36 5c 33 32 37 06 14 06 10 46 5c 32 30 32 5c 32 32 30 00 5c 33 33 30 5c 33	211.\326\327....F\202\220.\330\3
11c0	33 31 06 0f 06 15 46 5c 32 35 37 05 23 5c 32 31 30 06 06 54 5c 32 36 32 07 01 41 5c 32 36 36 5c	31....F\257.#\210..T\262..A\266\
11e0	32 30 32 5c 32 30 32 32 00 5c 32 31 30 5c 32 31 31 5c 33 33 32 3d 5c 32 30 33 5c 33 34 35 00 5c	202\2022.\210\211\332=\203\345.\
1200	33 32 30 06 06 5c 33 33 33 5c 33 33 34 23 5c 32 31 30 5c 33 31 34 5c 33 33 35 5c 32 36 32 04 03	320..\333\334#\210\314\335\262..
1220	05 3e 5c 32 30 33 5c 33 31 30 00 5c 32 31 31 54 5c 32 36 32 01 5c 33 31 36 5c 33 30 37 5c 33 31	.>\203\310.\211T\262.\316\307\31
1240	37 5c 33 33 35 04 23 21 5c 32 36 32 04 5c 32 30 32 5c 32 36 32 00 03 05 42 5c 32 36 32 05 5c 32	7\335.#!\262.\202\262...B\262.\2
1260	31 30 5c 33 32 30 06 06 5c 33 32 31 05 21 5c 33 32 32 5c 33 33 36 5c 33 33 37 5c 33 30 33 5c 33	10\320..\321.!\322\336\337\303\3
1280	34 30 5c 33 34 31 5c 33 34 32 06 13 44 06 13 45 46 45 23 5c 32 31 30 5c 33 32 33 5c 33 34 33 06	40\341\342..D..EFE#\210\323\343.
12a0	07 5c 22 5c 32 30 37 22 20 5b 6d 61 6b 65 2d 73 70 61 72 73 65 2d 6b 65 79 6d 61 70 20 31 20 28	.\"\207".[make-sparse-keymap.1.(
12c0	6e 69 6c 29 20 6e 69 6c 20 28 72 61 64 69 6f 20 74 6f 67 67 6c 65 29 20 64 69 73 70 6c 61 79 2d	nil).nil.(radio.toggle).display-
12e0	77 61 72 6e 69 6e 67 20 74 6f 6f 6c 62 61 72 78 20 66 6f 72 6d 61 74 20 22 54 59 50 45 20 73 68	warning.toolbarx.format."TYPE.sh
1300	6f 75 6c 64 20 62 65 20 73 79 6d 62 6f 6c 73 20 60 72 61 64 69 6f 27 20 6f 72 20 60 74 6f 67 67	ould.be.symbols.`radio'.or.`togg
1320	6c 65 27 2c 20 62 75 74 20 25 73 20 66 6f 75 6e 64 3b 20 75 73 69 6e 67 20 60 72 61 64 69 6f 27	le',.but.%s.found;.using.`radio'
1340	22 20 72 61 64 69 6f 20 28 61 6c 77 61 79 73 20 6f 66 66 65 72 20 6e 69 6c 29 20 22 53 41 56 45	".radio.(always.offer.nil)."SAVE
1360	20 73 68 6f 75 6c 64 20 62 65 20 73 79 6d 62 6f 6c 73 20 60 6e 69 6c 27 2c 20 60 6f 66 66 65 72	.should.be.symbols.`nil',.`offer
1380	27 20 6f 72 20 60 61 6c 77 61 79 73 27 2c 20 62 75 74 20 25 73 20 66 6f 75 6e 64 3b 20 75 73 69	'.or.`always',.but.%s.found;.usi
13a0	6e 67 20 60 6e 69 6c 27 22 20 30 20 74 6f 6f 6c 62 61 72 78 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c	ng.`nil'".0.toolbarx-make-symbol
13c0	2d 66 72 6f 6d 2d 73 74 72 69 6e 67 20 69 6e 74 65 72 6e 20 22 25 73 2d 25 64 22 20 64 65 66 69	-from-string.intern."%s-%d".defi
13e0	6e 65 2d 6b 65 79 2d 61 66 74 65 72 20 76 65 63 74 6f 72 20 6d 65 6e 75 2d 69 74 65 6d 20 6d 61	ne-key-after.vector.menu-item.ma
1400	6b 65 2d 63 6c 6f 73 75 72 65 20 23 5b 30 20 22 5c 33 30 30 5c 33 30 31 5c 33 30 34 3d 5c 32 30	ke-closure.#[0."\300\301\304=\20
1420	33 0b 00 5c 33 30 33 5c 32 30 32 21 00 5c 33 30 33 5c 33 30 30 4a 3e 5c 32 30 33 1a 00 5c 33 30	3..\303\202!.\303\300J>\203..\30
1440	35 5c 33 30 33 5c 33 30 30 4a 5c 22 5c 32 30 32 21 00 5c 33 30 36 5c 33 30 33 5c 33 30 30 4a 42	5\303\300J\"\202!.\306\303\300JB
1460	5c 33 30 37 5c 22 4c 5c 32 31 30 5c 33 31 30 20 5c 32 31 30 5c 33 30 32 5c 33 31 31 3d 5c 32 30	\307\"L\210\310.\210\302\311=\20
1480	33 32 00 5c 33 31 32 5c 33 30 30 5c 32 31 31 4a 5c 22 5c 32 31 30 5c 33 30 30 4a 5c 32 30 37 22	32.\312\300\211J\"\210\300J\207"
14a0	20 5b 56 30 20 56 31 20 56 32 20 56 33 20 72 61 64 69 6f 20 64 65 6c 65 74 65 20 73 6f 72 74 20	.[V0.V1.V2.V3.radio.delete.sort.
14c0	3c 20 74 6f 6f 6c 62 61 72 78 2d 72 65 66 72 65 73 68 20 61 6c 77 61 79 73 20 63 75 73 74 6f 6d	<.toolbarx-refresh.always.custom
14e0	69 7a 65 2d 73 61 76 65 2d 76 61 72 69 61 62 6c 65 5d 20 34 20 6e 69 6c 20 6e 69 6c 5d 20 3a 62	ize-save-variable].4.nil.nil].:b
1500	75 74 74 6f 6e 20 3a 72 61 64 69 6f 20 65 71 20 3a 74 6f 67 67 6c 65 20 6d 65 6d 71 20 6f 66 66	utton.:radio.eq.:toggle.memq.off
1520	65 72 20 5b 73 65 70 5d 20 28 6d 65 6e 75 2d 69 74 65 6d 20 22 2d 2d 73 68 61 64 6f 77 2d 65 74	er.[sep].(menu-item."--shadow-et
1540	63 68 65 64 2d 69 6e 2d 64 61 73 68 22 29 20 63 75 73 74 6f 6d 2d 73 61 76 65 20 22 53 61 76 65	ched-in-dash").custom-save."Save
1560	20 73 74 61 74 65 20 6f 66 20 74 68 69 73 20 6d 65 6e 75 22 20 6c 61 6d 62 64 61 20 28 69 6e 74	.state.of.this.menu".lambda.(int
1580	65 72 61 63 74 69 76 65 29 20 63 75 73 74 6f 6d 69 7a 65 2d 73 61 76 65 2d 76 61 72 69 61 62 6c	eractive).customize-save-variabl
15a0	65 20 71 75 6f 74 65 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	e.quote.#[0."\301\300!\207".[V0.
15c0	70 6f 70 75 70 2d 6d 65 6e 75 5d 20 32 20 6e 69 6c 20 6e 69 6c 5d 5d 20 32 35 20 28 23 24 20 2e	popup-menu].2.nil.nil]].25.(#$..
15e0	20 33 39 34 39 29 5d 29 0a 23 40 39 35 37 20 52 65 74 75 72 6e 20 61 20 63 6f 6d 6d 61 6e 64 20	.3949)]).#@957.Return.a.command.
1600	74 68 61 74 20 73 68 6f 77 20 61 20 70 6f 70 75 70 20 6d 65 6e 75 2e 0a 54 68 65 20 72 65 74 75	that.show.a.popup.menu..The.retu
1620	72 6e 20 69 73 20 61 20 60 6c 61 6d 62 64 61 27 2d 65 78 70 72 65 73 73 69 6f 6e 20 77 69 74 68	rn.is.a.`lambda'-expression.with
1640	20 61 20 69 6e 74 65 72 61 63 74 69 76 65 20 64 65 63 6c 61 72 61 74 69 6f 6e 2e 0a 0a 53 54 52	.a.interactive.declaration...STR
1660	49 4e 47 53 20 69 73 20 61 20 6c 69 73 74 20 6f 66 20 73 74 72 69 6e 67 73 20 77 68 69 63 68 20	INGS.is.a.list.of.strings.which.
1680	77 69 6c 6c 20 62 65 20 74 68 65 20 69 74 65 6e 73 20 6f 66 20 74 68 65 20 6d 65 6e 75 2e 0a 0a	will.be.the.itens.of.the.menu...
16a0	56 41 52 20 69 73 20 61 20 73 79 6d 62 6f 6c 20 74 68 61 74 20 69 73 20 73 65 74 20 77 68 65 6e	VAR.is.a.symbol.that.is.set.when
16c0	20 61 6e 20 69 74 65 6d 20 69 73 20 63 6c 69 63 6b 65 64 2e 20 20 54 59 50 45 20 73 68 6f 75 6c	.an.item.is.clicked...TYPE.shoul
16e0	64 0a 62 65 20 6f 6e 65 20 6f 66 20 74 68 65 20 73 79 6d 62 6f 6c 73 20 60 72 61 64 69 6f 27 20	d.be.one.of.the.symbols.`radio'.
1700	6f 72 20 60 74 6f 67 67 6c 65 27 3a 20 60 72 61 64 69 6f 27 20 6d 65 61 6e 73 20 74 68 61 74 20	or.`toggle':.`radio'.means.that.
1720	74 68 65 0a 6e 74 68 20 69 74 65 6d 20 69 73 20 73 65 6c 65 63 74 65 64 20 69 66 20 56 41 52 20	the.nth.item.is.selected.if.VAR.
1740	69 73 20 60 6e 27 20 61 6e 64 20 74 68 69 73 20 69 74 65 6d 20 73 65 74 73 20 56 41 52 20 74 6f	is.`n'.and.this.item.sets.VAR.to
1760	20 60 6e 27 3b 0a 60 74 6f 67 67 6c 65 27 20 6d 65 61 6e 73 20 74 68 61 74 20 56 41 52 20 73 68	.`n';.`toggle'.means.that.VAR.sh
1780	6f 75 6c 64 20 62 65 20 61 20 6c 69 73 74 20 6f 66 20 69 6e 74 65 67 65 72 73 20 61 6e 64 20 74	ould.be.a.list.of.integers.and.t
17a0	68 65 20 6e 74 68 0a 69 74 65 6d 20 69 73 20 73 65 6c 65 63 74 65 64 20 69 66 20 60 6e 27 20 62	he.nth.item.is.selected.if.`n'.b
17c0	65 6c 6f 6e 67 73 20 74 6f 20 56 41 52 2e 20 20 54 68 65 20 69 74 65 6d 20 69 6e 73 65 72 74 73	elongs.to.VAR...The.item.inserts
17e0	20 6f 72 0a 64 65 6c 65 74 65 73 20 60 6e 27 20 66 72 6f 6d 20 56 41 52 2e 0a 0a 54 49 54 4c 45	.or.deletes.`n'.from.VAR...TITLE
1800	20 69 73 20 61 20 73 74 72 69 6e 67 20 28 74 68 65 20 74 69 74 6c 65 20 6f 66 20 74 68 65 20 70	.is.a.string.(the.title.of.the.p
1820	6f 70 75 70 20 6d 65 6e 75 29 20 6f 72 20 6e 69 6c 20 66 6f 72 20 6e 6f 0a 74 69 74 6c 65 2e 0a	opup.menu).or.nil.for.no.title..
1840	0a 53 41 56 45 20 69 73 20 6f 6e 65 20 6f 66 20 74 68 65 20 73 79 6d 62 6f 6c 73 20 6e 69 6c 2c	.SAVE.is.one.of.the.symbols.nil,
1860	20 60 6f 66 66 65 72 27 20 6f 72 20 60 61 6c 77 61 79 73 27 2e 20 20 49 66 20 76 61 6c 75 65 0a	.`offer'.or.`always'...If.value.
1880	69 73 20 6e 69 6c 2c 20 64 6f 20 6e 6f 74 20 74 72 79 20 74 6f 20 73 61 76 65 20 61 6e 79 74 68	is.nil,.do.not.try.to.save.anyth
18a0	69 6e 67 2e 20 20 49 66 20 69 74 20 69 73 20 60 6f 66 66 65 72 27 2c 20 61 20 6d 65 6e 75 0a 69	ing...If.it.is.`offer',.a.menu.i
18c0	74 65 6d 20 69 73 20 61 64 64 65 64 20 6f 66 66 65 72 69 6e 67 20 74 68 65 20 75 73 65 72 20 74	tem.is.added.offering.the.user.t
18e0	68 65 20 70 6f 73 73 69 62 69 69 74 79 20 74 6f 20 73 61 76 65 20 73 74 61 74 65 20 6f 66 0a 74	he.possibiity.to.save.state.of.t
1900	68 61 74 20 64 72 6f 70 64 6f 77 6e 20 6d 65 6e 75 20 66 6f 72 20 66 75 74 75 72 65 20 73 65 73	hat.dropdown.menu.for.future.ses
1920	73 65 69 6f 6e 73 20 28 75 73 69 6e 67 20 60 63 75 73 74 6f 6d 27 29 2e 20 20 49 66 20 69 74 0a	seions.(using.`custom')...If.it.
1940	69 73 20 60 61 6c 77 61 79 73 27 2c 20 73 74 61 74 65 20 69 73 20 73 61 76 65 64 20 65 76 65 72	is.`always',.state.is.saved.ever
1960	79 20 74 69 6d 65 20 74 68 61 74 20 61 20 69 74 65 6d 20 69 73 20 63 6c 69 63 6b 65 64 2e 0a 0a	y.time.that.a.item.is.clicked...
1980	28 66 6e 20 53 54 52 49 4e 47 53 20 56 41 52 20 54 59 50 45 20 26 6f 70 74 69 6f 6e 61 6c 20 54	(fn.STRINGS.VAR.TYPE.&optional.T
19a0	49 54 4c 45 20 53 41 56 45 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 74 6f 6f 6c 62 61 72 78 2d	ITLE.SAVE)..(defalias.'toolbarx-
19c0	6d 6f 75 6e 74 2d 70 6f 70 75 70 2d 6d 65 6e 75 20 23 5b 31 32 38 33 20 22 5c 33 30 30 05 05 05	mount-popup-menu.#[1283."\300...
19e0	05 05 25 5c 32 30 37 22 20 5b 74 6f 6f 6c 62 61 72 78 2d 65 6d 61 63 73 2d 6d 6f 75 6e 74 2d 70	..%\207".[toolbarx-emacs-mount-p
1a00	6f 70 75 70 2d 6d 65 6e 75 5d 20 31 31 20 28 23 24 20 2e 20 35 36 31 35 29 5d 29 0a 23 40 31 35	opup-menu].11.(#$...5615)]).#@15
1a20	37 20 49 66 20 4f 50 54 20 69 73 20 61 20 76 65 63 74 6f 72 2c 20 72 65 74 75 72 6e 20 66 69 72	7.If.OPT.is.a.vector,.return.fir
1a40	73 74 20 65 6c 65 6d 65 6e 74 2c 20 6f 74 68 65 72 77 69 73 65 2c 20 72 65 74 75 72 6e 20 4f 50	st.element,.otherwise,.return.OP
1a60	54 2e 0a 49 66 20 4f 50 54 20 69 73 20 76 65 63 74 6f 72 20 61 6e 64 20 6c 65 6e 67 74 68 20 69	T..If.OPT.is.vector.and.length.i
1a80	73 20 73 6d 61 6c 6c 65 72 20 74 68 61 6e 20 74 68 65 20 6e 65 63 65 73 73 61 72 79 2c 20 74 68	s.smaller.than.the.necessary,.th
1aa0	65 6e 0a 6e 69 6c 20 69 73 20 72 65 74 75 72 6e 65 64 2e 0a 0a 28 66 6e 20 4f 50 54 29 1f 0a 28	en.nil.is.returned...(fn.OPT)..(
1ac0	64 65 66 61 6c 69 61 73 20 27 74 6f 6f 6c 62 61 72 78 2d 6f 70 74 69 6f 6e 2d 76 61 6c 75 65 20	defalias.'toolbarx-option-value.
1ae0	23 5b 32 35 37 20 22 5c 33 30 30 01 21 5c 32 30 33 11 00 5c 32 31 31 47 5c 33 30 31 56 5c 32 30	#[257."\300.!\203..\211G\301V\20
1b00	35 12 00 5c 32 31 31 5c 33 30 31 48 5c 32 30 37 5c 32 31 31 5c 32 30 37 22 20 5b 76 65 63 74 6f	5..\211\301H\207\211\207".[vecto
1b20	72 70 20 30 5d 20 33 20 28 23 24 20 2e 20 36 36 39 30 29 5d 29 0a 23 40 35 38 34 20 52 65 74 75	rp.0].3.(#$...6690)]).#@584.Retu
1b40	72 6e 20 61 20 63 6f 6e 73 20 63 65 6c 6c 20 28 47 4f 4f 44 2d 4f 42 4a 20 2e 20 56 41 4c 29 2e	rn.a.cons.cell.(GOOD-OBJ...VAL).
1b60	0a 47 4f 4f 44 2d 4f 42 4a 20 6e 6f 6e 2d 6e 69 6c 20 6d 65 61 6e 73 20 74 68 61 74 20 56 41 4c	.GOOD-OBJ.non-nil.means.that.VAL
1b80	20 69 73 20 61 20 76 61 6c 69 64 20 76 61 6c 75 65 2c 20 61 63 63 6f 72 64 69 6e 67 20 74 6f 0a	.is.a.valid.value,.according.to.
1ba0	74 68 65 20 63 61 72 20 6f 66 20 74 68 65 20 72 65 73 75 6c 74 20 6f 66 20 54 59 50 45 2d 54 45	the.car.of.the.result.of.TYPE-TE
1bc0	53 54 2d 46 55 4e 43 54 49 4f 4e 2c 20 74 68 61 74 20 73 68 6f 75 6c 64 20 72 65 74 75 72 6e 20	ST-FUNCTION,.that.should.return.
1be0	61 0a 63 6f 6e 73 20 63 65 6c 6c 20 69 6e 20 74 68 65 20 73 61 6d 65 20 66 6f 72 6d 61 74 20 61	a.cons.cell.in.the.same.format.a
1c00	73 20 74 68 65 20 72 65 74 75 72 6e 20 6f 66 20 74 68 69 73 20 66 75 6e 63 74 69 6f 6e 2e 0a 0a	s.the.return.of.this.function...
1c20	49 66 20 4f 42 4a 45 43 54 20 61 70 70 6c 69 65 64 20 74 6f 20 54 59 50 45 2d 54 45 53 54 2d 46	If.OBJECT.applied.to.TYPE-TEST-F
1c40	55 4e 43 20 72 65 74 75 72 6e 20 28 47 4f 4f 44 2d 4f 42 4a 20 2e 20 56 41 4c 29 2c 20 61 6e 64	UNC.return.(GOOD-OBJ...VAL),.and
1c60	0a 47 4f 4f 44 2d 4f 42 4a 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 72 65 74 75 72 6e 20 74 68 61	.GOOD-OBJ.is.non-nil,.return.tha
1c80	74 2e 20 20 45 6c 73 65 2c 20 63 68 65 63 6b 20 69 66 20 4f 42 4a 45 43 54 20 69 73 20 61 0a 66	t...Else,.check.if.OBJECT.is.a.f
1ca0	75 6e 63 74 69 6f 6e 2e 20 20 49 66 20 73 6f 2c 20 65 76 61 6c 75 61 74 65 20 61 6e 64 20 74 65	unction...If.so,.evaluate.and.te
1cc0	73 74 20 61 67 61 69 6e 20 77 69 74 68 20 54 59 50 45 2d 54 45 53 54 2d 46 55 4e 43 2e 20 20 49	st.again.with.TYPE-TEST-FUNC...I
1ce0	66 0a 6e 6f 74 20 61 20 66 75 6e 63 74 69 6f 6e 20 6f 72 20 69 66 20 47 4f 4f 44 2d 4f 42 4a 20	f.not.a.function.or.if.GOOD-OBJ.
1d00	69 73 20 61 67 61 69 6e 20 6e 69 6c 2c 20 74 65 73 74 20 69 66 20 4f 42 4a 45 43 54 20 69 73 20	is.again.nil,.test.if.OBJECT.is.
1d20	61 0a 62 6f 75 6e 64 20 73 79 6d 62 6f 6c 2c 20 65 76 61 6c 75 61 74 65 20 74 68 61 74 20 61 6e	a.bound.symbol,.evaluate.that.an
1d40	64 20 72 65 74 75 72 6e 20 74 68 65 20 72 65 73 75 6c 74 20 6f 66 0a 54 59 50 45 2d 54 45 53 54	d.return.the.result.of.TYPE-TEST
1d60	2d 46 55 4e 43 2e 0a 0a 28 66 6e 20 4f 42 4a 45 43 54 20 54 59 50 45 2d 54 45 53 54 2d 46 55 4e	-FUNC...(fn.OBJECT.TYPE-TEST-FUN
1d80	43 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 74 6f 6f 6c 62 61 72 78 2d 65 76 61 6c 2d 66 75 6e	C)..(defalias.'toolbarx-eval-fun
1da0	63 74 69 6f 6e 2d 6f 72 2d 73 79 6d 62 6f 6c 20 23 5b 35 31 34 20 22 5c 32 31 31 02 21 5c 32 31	ction-or-symbol.#[514."\211.!\21
1dc0	31 40 5c 32 30 34 3a 00 5c 33 30 30 03 21 5c 32 30 33 29 00 01 03 20 21 5c 32 36 32 01 5c 32 31	1@\204:.\300.!\203)....!\262.\21
1de0	31 40 5c 32 30 34 3a 00 02 39 5c 32 30 33 3a 00 5c 33 30 31 03 21 5c 32 30 33 3a 00 01 03 4a 21	1@\204:..9\203:.\301.!\203:...J!
1e00	5c 32 30 37 02 39 5c 32 30 33 3a 00 5c 33 30 31 03 21 5c 32 30 33 3a 00 01 03 4a 21 5c 32 36 32	\207.9\203:.\301.!\203:...J!\262
1e20	01 5c 32 30 37 22 20 5b 66 75 6e 63 74 69 6f 6e 70 20 62 6f 75 6e 64 70 5d 20 35 20 28 23 24 20	.\207".[functionp.boundp].5.(#$.
1e40	2e 20 36 39 37 32 29 5d 29 0a 23 40 31 36 36 20 52 65 74 75 72 6e 20 61 20 63 6f 6e 73 20 63 65	..6972)]).#@166.Return.a.cons.ce
1e60	6c 6c 20 28 47 4f 4f 44 2d 4f 42 4a 20 2e 20 56 41 4c 29 2e 0a 47 4f 4f 44 2d 4f 42 4a 20 69 73	ll.(GOOD-OBJ...VAL)..GOOD-OBJ.is
1e80	20 6e 6f 6e 2d 6e 69 6c 20 69 66 20 4f 42 4a 20 79 69 65 6c 64 73 20 61 20 76 61 6c 69 64 20 69	.non-nil.if.OBJ.yields.a.valid.i
1ea0	6d 61 67 65 20 6f 62 6a 65 63 74 20 56 41 4c 20 28 73 65 65 0a 64 6f 63 75 6d 65 6e 74 61 74 69	mage.object.VAL.(see.documentati
1ec0	6f 6e 20 6f 66 20 66 75 6e 63 74 69 6f 6e 20 60 74 6f 6f 6c 62 61 72 78 2d 70 72 6f 63 65 73 73	on.of.function.`toolbarx-process
1ee0	2d 73 79 6d 62 6f 6c 27 29 2e 0a 0a 28 66 6e 20 4f 42 4a 29 1f 0a 28 64 65 66 61 6c 69 61 73 20	-symbol')...(fn.OBJ)..(defalias.
1f00	27 74 6f 6f 6c 62 61 72 78 2d 74 65 73 74 2d 69 6d 61 67 65 2d 74 79 70 65 20 23 5b 32 35 37 20	'toolbarx-test-image-type.#[257.
1f20	22 5c 33 30 30 5c 33 30 31 02 02 5c 22 5c 32 30 37 22 20 5b 23 5b 32 35 37 20 22 5c 33 30 30 01	"\300\301..\"\207".[#[257."\300.
1f40	21 5c 33 30 31 01 3b 5c 32 30 36 55 00 01 5c 32 34 32 5c 33 30 32 3d 5c 32 30 36 55 00 01 39 5c	!\301.;\206U..\242\302=\206U..9\
1f60	32 30 33 29 00 5c 33 30 33 02 21 5c 32 30 33 29 00 01 4a 3a 5c 32 30 33 29 00 01 4a 40 5c 33 30	203).\303.!\203)..J:\203)..J@\30
1f80	32 3d 5c 32 30 36 55 00 01 3c 5c 32 30 35 55 00 01 47 5c 33 30 34 55 5c 32 30 35 55 00 01 5c 32	2=\206U..<\205U..G\304U\205U..\2
1fa0	31 31 5c 32 30 33 52 00 5c 32 31 31 40 02 5c 32 30 35 49 00 5c 32 31 31 3b 5c 32 30 36 49 00 5c	11\203R.\211@.\205I.\211;\206I.\
1fc0	32 31 31 5c 32 34 32 5c 33 30 32 3d 5c 32 36 32 03 01 41 5c 32 36 36 5c 32 30 32 5c 32 30 32 36	211\242\302=\262..A\266\202\2026
1fe0	00 01 5c 32 36 32 01 5c 32 31 31 03 42 5c 32 30 37 22 20 5b 74 6f 6f 6c 62 61 72 78 2d 6f 70 74	..\262.\211.B\207".[toolbarx-opt
2000	69 6f 6e 2d 76 61 6c 75 65 20 74 20 69 6d 61 67 65 20 62 6f 75 6e 64 70 20 34 5d 20 37 20 22 5c	ion-value.t.image.boundp.4].7."\
2020	6e 5c 6e 28 66 6e 20 49 4d 47 29 22 5d 20 74 6f 6f 6c 62 61 72 78 2d 65 76 61 6c 2d 66 75 6e 63	n\n(fn.IMG)"].toolbarx-eval-func
2040	74 69 6f 6e 2d 6f 72 2d 73 79 6d 62 6f 6c 5d 20 35 20 28 23 24 20 2e 20 37 37 36 30 29 5d 29 0a	tion-or-symbol].5.(#$...7760)]).
2060	23 40 31 36 37 20 52 65 74 75 72 6e 20 61 20 63 6f 6e 73 20 63 65 6c 6c 20 28 47 4f 4f 44 2d 4f	#@167.Return.a.cons.cell.(GOOD-O
2080	42 4a 20 2e 20 56 41 4c 29 2e 0a 47 4f 4f 44 2d 4f 42 4a 20 69 73 20 6e 6f 6e 2d 6e 69 6c 20 69	BJ...VAL)..GOOD-OBJ.is.non-nil.i
20a0	66 20 4f 42 4a 20 79 69 65 6c 64 73 20 61 20 76 61 6c 69 64 20 62 75 74 74 6f 6e 20 6f 62 6a 65	f.OBJ.yields.a.valid.button.obje
20c0	63 74 20 56 41 4c 20 28 73 65 65 0a 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 66 75 6e	ct.VAL.(see.documentation.of.fun
20e0	63 74 69 6f 6e 20 60 74 6f 6f 6c 62 61 72 78 2d 70 72 6f 63 65 73 73 2d 73 79 6d 62 6f 6c 27 29	ction.`toolbarx-process-symbol')
2100	2e 0a 0a 28 66 6e 20 4f 42 4a 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 74 6f 6f 6c 62 61 72 78	...(fn.OBJ)..(defalias.'toolbarx
2120	2d 74 65 73 74 2d 62 75 74 74 6f 6e 2d 74 79 70 65 20 23 5b 32 35 37 20 22 5c 33 30 30 5c 33 30	-test-button-type.#[257."\300\30
2140	31 02 02 5c 22 5c 32 30 37 22 20 5b 23 5b 32 35 37 20 22 5c 33 30 30 01 21 5c 32 31 31 3a 5c 32	1..\"\207".[#[257."\300.!\211:\2
2160	30 35 5c 66 00 5c 32 31 31 40 5c 33 30 31 3e 5c 32 31 31 02 42 5c 32 30 37 22 20 5b 74 6f 6f 6c	05\f.\211@\301>\211.B\207".[tool
2180	62 61 72 78 2d 6f 70 74 69 6f 6e 2d 76 61 6c 75 65 20 28 3a 74 6f 67 67 6c 65 20 3a 72 61 64 69	barx-option-value.(:toggle.:radi
21a0	6f 29 5d 20 35 20 22 5c 6e 5c 6e 28 66 6e 20 42 55 54 29 22 5d 20 74 6f 6f 6c 62 61 72 78 2d 65	o)].5."\n\n(fn.BUT)"].toolbarx-e
21c0	76 61 6c 2d 66 75 6e 63 74 69 6f 6e 2d 6f 72 2d 73 79 6d 62 6f 6c 5d 20 35 20 28 23 24 20 2e 20	val-function-or-symbol].5.(#$...
21e0	38 32 39 34 29 5d 29 0a 23 40 31 33 39 20 52 65 74 75 72 6e 20 61 20 63 6f 6e 73 20 63 65 6c 6c	8294)]).#@139.Return.a.cons.cell
2200	20 28 74 20 2e 20 56 41 4c 29 2e 0a 49 66 20 4f 42 4a 20 69 73 20 76 65 63 74 6f 72 2c 20 72 65	.(t...VAL)..If.OBJ.is.vector,.re
2220	74 75 72 6e 20 56 41 4c 20 61 63 63 6f 72 64 69 6e 67 20 74 6f 20 65 64 69 74 6f 72 2e 20 20 45	turn.VAL.according.to.editor...E
2240	6c 73 65 2c 20 72 65 74 75 72 6e 0a 4f 42 4a 2c 20 62 65 63 61 75 73 65 20 69 74 20 69 73 20 61	lse,.return.OBJ,.because.it.is.a
2260	20 66 6f 72 6d 20 61 6e 79 77 61 79 2e 0a 0a 28 66 6e 20 4f 42 4a 29 1f 0a 28 64 65 66 61 6c 69	.form.anyway...(fn.OBJ)..(defali
2280	61 73 20 27 74 6f 6f 6c 62 61 72 78 2d 74 65 73 74 2d 61 6e 79 2d 74 79 70 65 20 23 5b 32 35 37	as.'toolbarx-test-any-type.#[257
22a0	20 22 5c 33 30 30 5c 33 30 31 02 21 42 5c 32 30 37 22 20 5b 74 20 74 6f 6f 6c 62 61 72 78 2d 6f	."\300\301.!B\207".[t.toolbarx-o
22c0	70 74 69 6f 6e 2d 76 61 6c 75 65 5d 20 34 20 28 23 24 20 2e 20 38 36 38 36 29 5d 29 0a 23 40 31	ption-value].4.(#$...8686)]).#@1
22e0	36 35 20 52 65 74 75 72 6e 20 61 20 63 6f 6e 73 20 63 65 6c 6c 20 28 47 4f 4f 44 2d 4f 42 4a 20	65.Return.a.cons.cell.(GOOD-OBJ.
2300	2e 20 56 41 4c 29 2e 0a 47 4f 4f 44 2d 4f 42 4a 20 69 73 20 6e 6f 6e 2d 6e 69 6c 20 69 66 20 4f	..VAL)..GOOD-OBJ.is.non-nil.if.O
2320	42 4a 20 79 69 65 6c 64 73 20 61 20 76 61 6c 69 64 20 68 65 6c 70 20 6f 62 6a 65 63 74 20 56 41	BJ.yields.a.valid.help.object.VA
2340	4c 20 28 73 65 65 0a 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 66 75 6e 63 74 69 6f 6e	L.(see.documentation.of.function
2360	20 60 74 6f 6f 6c 62 61 72 78 2d 70 72 6f 63 65 73 73 2d 73 79 6d 62 6f 6c 27 29 2e 0a 0a 28 66	.`toolbarx-process-symbol')...(f
2380	6e 20 4f 42 4a 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 74 6f 6f 6c 62 61 72 78 2d 74 65 73 74	n.OBJ)..(defalias.'toolbarx-test
23a0	2d 73 74 72 69 6e 67 2d 6f 72 2d 6e 69 6c 20 23 5b 32 35 37 20 22 5c 33 30 30 5c 33 30 31 02 02	-string-or-nil.#[257."\300\301..
23c0	5c 22 5c 32 30 37 22 20 5b 23 5b 32 35 37 20 22 5c 33 30 30 01 21 5c 32 31 31 3b 5c 32 30 36 5c	\"\207".[#[257."\300.!\211;\206\
23e0	6e 00 5c 32 31 31 3f 5c 32 31 31 02 42 5c 32 30 37 22 20 5b 74 6f 6f 6c 62 61 72 78 2d 6f 70 74	n.\211?\211.B\207".[toolbarx-opt
2400	69 6f 6e 2d 76 61 6c 75 65 5d 20 35 20 22 5c 6e 5c 6e 28 66 6e 20 4f 42 4a 29 22 5d 20 74 6f 6f	ion-value].5."\n\n(fn.OBJ)"].too
2420	6c 62 61 72 78 2d 65 76 61 6c 2d 66 75 6e 63 74 69 6f 6e 2d 6f 72 2d 73 79 6d 62 6f 6c 5d 20 35	lbarx-eval-function-or-symbol].5
2440	20 28 23 24 20 2e 20 38 39 33 31 29 5d 29 0a 23 40 31 37 37 20 52 65 74 75 72 6e 20 61 20 63 6f	.(#$...8931)]).#@177.Return.a.co
2460	6e 73 20 63 65 6c 6c 20 28 47 4f 4f 44 2d 4f 42 4a 20 2e 20 56 41 4c 29 2e 0a 47 4f 4f 44 2d 4f	ns.cell.(GOOD-OBJ...VAL)..GOOD-O
2480	42 4a 20 69 73 20 6e 6f 6e 2d 6e 69 6c 20 69 66 20 4f 42 4a 20 79 69 65 6c 64 73 20 61 20 76 61	BJ.is.non-nil.if.OBJ.yields.a.va
24a0	6c 69 64 20 74 6f 6f 6c 62 61 72 20 70 72 6f 70 65 72 74 79 20 6f 62 6a 65 63 74 0a 56 41 4c 20	lid.toolbar.property.object.VAL.
24c0	28 73 65 65 20 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 66 75 6e 63 74 69 6f 6e 20 60	(see.documentation.of.function.`
24e0	74 6f 6f 6c 62 61 72 78 2d 70 72 6f 63 65 73 73 2d 73 79 6d 62 6f 6c 27 29 2e 0a 0a 28 66 6e 20	toolbarx-process-symbol')...(fn.
2500	4f 42 4a 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 74 6f 6f 6c 62 61 72 78 2d 74 65 73 74 2d 74	OBJ)..(defalias.'toolbarx-test-t
2520	6f 6f 6c 62 61 72 2d 74 79 70 65 20 23 5b 32 35 37 20 22 5c 33 30 30 5c 33 30 31 02 02 5c 22 5c	oolbar-type.#[257."\300\301..\"\
2540	32 30 37 22 20 5b 23 5b 32 35 37 20 22 5c 33 30 30 01 21 5c 33 30 31 01 42 5c 32 30 37 22 20 5b	207".[#[257."\300.!\301.B\207".[
2560	74 6f 6f 6c 62 61 72 78 2d 6f 70 74 69 6f 6e 2d 76 61 6c 75 65 20 74 5d 20 34 20 22 5c 6e 5c 6e	toolbarx-option-value.t].4."\n\n
2580	28 66 6e 20 4f 42 4a 29 22 5d 20 74 6f 6f 6c 62 61 72 78 2d 65 76 61 6c 2d 66 75 6e 63 74 69 6f	(fn.OBJ)"].toolbarx-eval-functio
25a0	6e 2d 6f 72 2d 73 79 6d 62 6f 6c 5d 20 35 20 28 23 24 20 2e 20 39 33 30 31 29 5d 29 0a 23 40 32	n-or-symbol].5.(#$...9301)]).#@2
25c0	30 34 20 52 65 74 75 72 6e 20 61 20 63 6f 6e 73 20 63 65 6c 6c 20 28 47 4f 4f 44 2d 4f 42 4a 20	04.Return.a.cons.cell.(GOOD-OBJ.
25e0	2e 20 56 41 4c 29 2e 0a 47 4f 4f 44 2d 4f 42 4a 20 69 73 20 6e 6f 6e 2d 6e 69 6c 20 69 66 20 4f	..VAL)..GOOD-OBJ.is.non-nil.if.O
2600	42 4a 20 79 69 65 6c 64 73 20 61 20 76 61 6c 69 64 20 60 3a 74 79 70 65 27 20 70 72 6f 70 65 72	BJ.yields.a.valid.`:type'.proper
2620	74 79 20 6f 62 6a 65 63 74 0a 56 41 4c 20 6f 66 20 61 20 64 72 6f 70 64 6f 77 6e 20 67 72 6f 75	ty.object.VAL.of.a.dropdown.grou
2640	70 20 28 73 65 65 20 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 66 75 6e 63 74 69 6f 6e	p.(see.documentation.of.function
2660	0a 60 74 6f 6f 6c 62 61 72 78 2d 70 72 6f 63 65 73 73 2d 64 72 6f 70 64 6f 77 6e 2d 67 72 6f 75	.`toolbarx-process-dropdown-grou
2680	70 27 2e 0a 0a 28 66 6e 20 4f 42 4a 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 74 6f 6f 6c 62 61	p'...(fn.OBJ)..(defalias.'toolba
26a0	72 78 2d 74 65 73 74 2d 64 72 6f 70 64 6f 77 6e 2d 74 79 70 65 20 23 5b 32 35 37 20 22 5c 33 30	rx-test-dropdown-type.#[257."\30
26c0	30 5c 33 30 31 02 02 5c 22 5c 32 30 37 22 20 5b 23 5b 32 35 37 20 22 5c 33 30 30 01 21 5c 32 31	0\301..\"\207".[#[257."\300.!\21
26e0	31 5c 33 30 31 3e 5c 32 31 31 02 42 5c 32 30 37 22 20 5b 74 6f 6f 6c 62 61 72 78 2d 6f 70 74 69	1\301>\211.B\207".[toolbarx-opti
2700	6f 6e 2d 76 61 6c 75 65 20 28 72 61 64 69 6f 20 74 6f 67 67 6c 65 29 5d 20 35 20 22 5c 6e 5c 6e	on-value.(radio.toggle)].5."\n\n
2720	28 66 6e 20 4f 42 4a 29 22 5d 20 74 6f 6f 6c 62 61 72 78 2d 65 76 61 6c 2d 66 75 6e 63 74 69 6f	(fn.OBJ)"].toolbarx-eval-functio
2740	6e 2d 6f 72 2d 73 79 6d 62 6f 6c 5d 20 35 20 28 23 24 20 2e 20 39 36 36 37 29 5d 29 0a 23 40 32	n-or-symbol].5.(#$...9667)]).#@2
2760	30 38 20 52 65 74 75 72 6e 20 61 20 63 6f 6e 73 20 63 65 6c 6c 20 28 47 4f 4f 44 2d 4f 42 4a 20	08.Return.a.cons.cell.(GOOD-OBJ.
2780	2e 20 56 41 4c 29 2e 0a 47 4f 4f 44 2d 4f 42 4a 20 69 73 20 6e 6f 6e 2d 6e 69 6c 20 69 66 20 4f	..VAL)..GOOD-OBJ.is.non-nil.if.O
27a0	42 4a 20 79 69 65 6c 64 73 20 61 20 76 61 6c 69 64 20 60 3a 76 61 72 69 61 62 6c 65 27 20 70 72	BJ.yields.a.valid.`:variable'.pr
27c0	6f 70 65 72 74 79 0a 6f 62 6a 65 63 74 20 56 41 4c 20 6f 66 20 61 20 64 72 6f 70 64 6f 77 6e 20	operty.object.VAL.of.a.dropdown.
27e0	67 72 6f 75 70 20 28 73 65 65 20 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 66 75 6e 63	group.(see.documentation.of.func
2800	74 69 6f 6e 0a 60 74 6f 6f 6c 62 61 72 78 2d 70 72 6f 63 65 73 73 2d 64 72 6f 70 64 6f 77 6e 2d	tion.`toolbarx-process-dropdown-
2820	67 72 6f 75 70 27 2e 0a 0a 28 66 6e 20 4f 42 4a 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 74 6f	group'...(fn.OBJ)..(defalias.'to
2840	6f 6c 62 61 72 78 2d 74 65 73 74 2d 73 79 6d 62 6f 6c 20 23 5b 32 35 37 20 22 5c 33 30 30 5c 33	olbarx-test-symbol.#[257."\300\3
2860	30 31 02 02 5c 22 5c 32 30 37 22 20 5b 23 5b 32 35 37 20 22 5c 33 30 30 01 21 5c 32 31 31 39 5c	01..\"\207".[#[257."\300.!\2119\
2880	32 31 31 02 42 5c 32 30 37 22 20 5b 74 6f 6f 6c 62 61 72 78 2d 6f 70 74 69 6f 6e 2d 76 61 6c 75	211.B\207".[toolbarx-option-valu
28a0	65 5d 20 35 20 22 5c 6e 5c 6e 28 66 6e 20 4f 42 4a 29 22 5d 20 74 6f 6f 6c 62 61 72 78 2d 65 76	e].5."\n\n(fn.OBJ)"].toolbarx-ev
28c0	61 6c 2d 66 75 6e 63 74 69 6f 6e 2d 6f 72 2d 73 79 6d 62 6f 6c 5d 20 35 20 28 23 24 20 2e 20 31	al-function-or-symbol].5.(#$...1
28e0	30 30 38 33 29 5d 29 0a 23 40 32 30 37 20 52 65 74 75 72 6e 20 61 20 63 6f 6e 73 20 63 65 6c 6c	0083)]).#@207.Return.a.cons.cell
2900	20 28 47 4f 4f 44 2d 4f 42 4a 20 2e 20 56 41 4c 29 2e 0a 47 4f 4f 44 2d 4f 42 4a 20 69 73 20 6e	.(GOOD-OBJ...VAL)..GOOD-OBJ.is.n
2920	6f 6e 2d 6e 69 6c 20 69 66 20 4f 42 4a 20 79 69 65 6c 64 73 20 61 20 76 61 6c 69 64 20 60 3a 64	on-nil.if.OBJ.yields.a.valid.`:d
2940	65 66 61 75 6c 74 27 20 70 72 6f 70 65 72 74 79 0a 6f 62 6a 65 63 74 20 56 41 4c 20 6f 66 20 61	efault'.property.object.VAL.of.a
2960	20 64 72 6f 70 64 6f 77 6e 20 67 72 6f 75 70 20 28 73 65 65 20 64 6f 63 75 6d 65 6e 74 61 74 69	.dropdown.group.(see.documentati
2980	6f 6e 20 6f 66 20 66 75 6e 63 74 69 6f 6e 0a 60 74 6f 6f 6c 62 61 72 78 2d 70 72 6f 63 65 73 73	on.of.function.`toolbarx-process
29a0	2d 64 72 6f 70 64 6f 77 6e 2d 67 72 6f 75 70 27 2e 0a 0a 28 66 6e 20 4f 42 4a 29 1f 0a 28 64 65	-dropdown-group'...(fn.OBJ)..(de
29c0	66 61 6c 69 61 73 20 27 74 6f 6f 6c 62 61 72 78 2d 74 65 73 74 2d 64 72 6f 70 64 6f 77 6e 2d 64	falias.'toolbarx-test-dropdown-d
29e0	65 66 61 75 6c 74 20 23 5b 32 35 37 20 22 5c 33 30 30 5c 33 30 31 02 02 5c 22 5c 32 30 37 22 20	efault.#[257."\300\301..\"\207".
2a00	5b 23 5b 32 35 37 20 22 5c 33 30 30 01 21 5c 32 31 31 5c 32 35 30 5c 32 30 36 29 00 5c 32 31 31	[#[257."\300.!\211\250\206).\211
2a20	3c 5c 32 30 35 29 00 5c 33 30 31 01 5c 32 31 31 5c 32 30 33 24 00 5c 32 31 31 40 02 5c 32 30 35	<\205).\301.\211\203$.\211@.\205
2a40	1b 00 5c 32 31 31 5c 32 35 30 5c 32 36 32 03 01 41 5c 32 36 36 5c 32 30 32 5c 32 30 32 0f 00 01	..\211\250\262..A\266\202\202...
2a60	5c 32 36 32 01 5c 32 36 32 01 5c 32 31 31 02 42 5c 32 30 37 22 20 5b 74 6f 6f 6c 62 61 72 78 2d	\262.\262.\211.B\207".[toolbarx-
2a80	6f 70 74 69 6f 6e 2d 76 61 6c 75 65 20 74 5d 20 36 20 22 5c 6e 5c 6e 28 66 6e 20 4f 42 4a 29 22	option-value.t].6."\n\n(fn.OBJ)"
2aa0	5d 20 74 6f 6f 6c 62 61 72 78 2d 65 76 61 6c 2d 66 75 6e 63 74 69 6f 6e 2d 6f 72 2d 73 79 6d 62	].toolbarx-eval-function-or-symb
2ac0	6f 6c 5d 20 35 20 28 23 24 20 2e 20 31 30 34 37 38 29 5d 29 0a 23 40 32 30 34 20 52 65 74 75 72	ol].5.(#$...10478)]).#@204.Retur
2ae0	6e 20 61 20 63 6f 6e 73 20 63 65 6c 6c 20 28 47 4f 4f 44 2d 4f 42 4a 20 2e 20 56 41 4c 29 2e 0a	n.a.cons.cell.(GOOD-OBJ...VAL)..
2b00	47 4f 4f 44 2d 4f 42 4a 20 69 73 20 6e 6f 6e 2d 6e 69 6c 20 69 66 20 4f 42 4a 20 79 69 65 6c 64	GOOD-OBJ.is.non-nil.if.OBJ.yield
2b20	73 20 61 20 76 61 6c 69 64 20 60 3a 73 61 76 65 27 20 70 72 6f 70 65 72 74 79 0a 6f 62 6a 65 63	s.a.valid.`:save'.property.objec
2b40	74 20 56 41 4c 20 6f 66 20 61 20 64 72 6f 70 64 6f 77 6e 20 67 72 6f 75 70 20 28 73 65 65 20 64	t.VAL.of.a.dropdown.group.(see.d
2b60	6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 66 75 6e 63 74 69 6f 6e 0a 60 74 6f 6f 6c 62 61	ocumentation.of.function.`toolba
2b80	72 78 2d 70 72 6f 63 65 73 73 2d 64 72 6f 70 64 6f 77 6e 2d 67 72 6f 75 70 27 2e 0a 0a 28 66 6e	rx-process-dropdown-group'...(fn
2ba0	20 4f 42 4a 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 74 6f 6f 6c 62 61 72 78 2d 74 65 73 74 2d	.OBJ)..(defalias.'toolbarx-test-
2bc0	64 72 6f 70 64 6f 77 6e 2d 73 61 76 65 20 23 5b 32 35 37 20 22 5c 33 30 30 5c 33 30 31 02 02 5c	dropdown-save.#[257."\300\301..\
2be0	22 5c 32 30 37 22 20 5b 23 5b 32 35 37 20 22 5c 33 30 30 01 21 5c 32 31 31 5c 33 30 31 3e 5c 32	"\207".[#[257."\300.!\211\301>\2
2c00	31 31 02 42 5c 32 30 37 22 20 5b 74 6f 6f 6c 62 61 72 78 2d 6f 70 74 69 6f 6e 2d 76 61 6c 75 65	11.B\207".[toolbarx-option-value
2c20	20 28 6e 69 6c 20 6f 66 66 65 72 20 61 6c 77 61 79 73 29 5d 20 35 20 22 5c 6e 5c 6e 28 66 6e 20	.(nil.offer.always)].5."\n\n(fn.
2c40	4f 42 4a 29 22 5d 20 74 6f 6f 6c 62 61 72 78 2d 65 76 61 6c 2d 66 75 6e 63 74 69 6f 6e 2d 6f 72	OBJ)"].toolbarx-eval-function-or
2c60	2d 73 79 6d 62 6f 6c 5d 20 35 20 28 23 24 20 2e 20 31 30 39 37 31 29 5d 29 0a 23 40 33 30 37 20	-symbol].5.(#$...10971)]).#@307.
2c80	4c 69 73 74 20 79 69 65 6c 64 69 6e 67 20 61 6c 6c 20 65 6e 63 61 72 6e 61 74 69 6f 6e 73 20 6f	List.yielding.all.encarnations.o
2ca0	66 20 70 72 6f 70 65 72 74 69 65 73 20 6f 66 20 61 20 62 75 74 74 6f 6e 2e 0a 46 69 72 73 74 20	f.properties.of.a.button..First.
2cc0	65 6c 65 6d 65 6e 74 3a 20 61 6c 69 73 74 2c 20 77 68 65 72 65 20 65 61 63 68 20 65 6c 65 6d 65	element:.alist,.where.each.eleme
2ce0	6e 74 20 69 73 20 6f 66 20 66 6f 72 6d 0a 20 28 50 52 4f 50 20 2e 20 28 54 59 50 45 2d 54 45 53	nt.is.of.form..(PROP...(TYPE-TES
2d00	54 2d 46 55 4e 43 54 49 4f 4e 20 2e 20 41 44 44 2d 4f 52 2d 4e 49 4c 29 29 0a 53 65 63 6f 6e 64	T-FUNCTION...ADD-OR-NIL)).Second
2d20	20 69 73 20 61 20 6c 69 73 74 20 77 69 74 68 20 61 6c 6c 20 70 72 6f 70 65 72 74 69 65 73 2e 0a	.is.a.list.with.all.properties..
2d40	54 68 69 72 64 2c 20 61 20 6c 69 73 74 20 77 69 74 68 20 70 72 6f 70 65 72 74 69 65 73 20 74 68	Third,.a.list.with.properties.th
2d60	61 74 20 6f 76 65 72 72 69 64 65 20 77 68 65 6e 20 6d 65 72 67 69 6e 67 2e 0a 46 6f 75 72 74 68	at.override.when.merging..Fourth
2d80	2c 20 61 20 6c 69 73 74 20 6f 66 20 6c 69 73 74 73 2c 20 65 61 63 68 20 69 6e 20 74 68 65 20 66	,.a.list.of.lists,.each.in.the.f
2da0	6f 72 6d 61 74 20 28 50 52 4f 50 20 41 44 44 29 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20 74 6f 6f	ormat.(PROP.ADD)...(defconst.too
2dc0	6c 62 61 72 78 2d 62 75 74 74 6f 6e 2d 70 72 6f 70 73 20 28 62 79 74 65 2d 63 6f 64 65 20 22 5c	lbarx-button-props.(byte-code."\
2de0	33 30 30 5c 33 30 31 01 5c 32 31 31 5c 32 30 33 16 00 5c 32 31 31 40 5c 32 31 31 40 03 42 5c 32	300\301.\211\203..\211@\211@.B\2
2e00	36 32 03 01 41 5c 32 36 36 5c 32 30 32 5c 32 30 32 03 00 01 5c 32 36 32 01 5c 32 36 32 01 5c 32	62..A\266\202\202...\262.\262.\2
2e20	33 37 5c 33 30 31 02 5c 32 31 31 5c 32 30 33 37 00 5c 32 31 31 40 5c 32 31 31 41 41 5c 32 30 34	37\301.\211\2037.\211@\211AA\204
2e40	30 00 5c 32 31 31 40 03 42 5c 32 36 32 03 01 41 5c 32 36 36 5c 32 30 32 5c 32 30 32 1e 00 01 5c	0.\211@.B\262..A\266\202\202...\
2e60	32 36 32 01 5c 32 36 32 01 5c 32 33 37 5c 33 30 31 03 5c 32 31 31 5c 32 30 33 58 00 5c 32 31 31	262.\262.\237\301.\211\203X.\211
2e80	40 5c 32 31 31 41 41 5c 32 30 33 51 00 5c 32 31 31 40 03 42 5c 32 36 32 03 01 41 5c 32 36 36 5c	@\211AA\203Q.\211@.B\262..A\266\
2ea0	32 30 32 5c 32 30 32 3f 00 01 5c 32 36 32 01 5c 32 36 32 01 5c 32 33 37 03 03 03 03 46 5c 32 30	202\202?..\262.\262.\237....F\20
2ec0	37 22 20 5b 28 28 3a 69 6d 61 67 65 20 74 6f 6f 6c 62 61 72 78 2d 74 65 73 74 2d 69 6d 61 67 65	7".[((:image.toolbarx-test-image
2ee0	2d 74 79 70 65 29 20 28 3a 63 6f 6d 6d 61 6e 64 20 74 6f 6f 6c 62 61 72 78 2d 74 65 73 74 2d 61	-type).(:command.toolbarx-test-a
2f00	6e 79 2d 74 79 70 65 29 20 28 3a 65 6e 61 62 6c 65 20 74 6f 6f 6c 62 61 72 78 2d 74 65 73 74 2d	ny-type).(:enable.toolbarx-test-
2f20	61 6e 79 2d 74 79 70 65 29 20 28 3a 76 69 73 69 62 6c 65 20 74 6f 6f 6c 62 61 72 78 2d 74 65 73	any-type).(:visible.toolbarx-tes
2f40	74 2d 61 6e 79 2d 74 79 70 65 29 20 28 3a 68 65 6c 70 20 74 6f 6f 6c 62 61 72 78 2d 74 65 73 74	t-any-type).(:help.toolbarx-test
2f60	2d 73 74 72 69 6e 67 2d 6f 72 2d 6e 69 6c 29 20 28 3a 69 6e 73 65 72 74 20 74 6f 6f 6c 62 61 72	-string-or-nil).(:insert.toolbar
2f80	78 2d 74 65 73 74 2d 61 6e 79 2d 74 79 70 65 20 2e 20 61 6e 64 29 20 28 3a 62 75 74 74 6f 6e 20	x-test-any-type...and).(:button.
2fa0	74 6f 6f 6c 62 61 72 78 2d 74 65 73 74 2d 62 75 74 74 6f 6e 2d 74 79 70 65 29 20 28 3a 61 70 70	toolbarx-test-button-type).(:app
2fc0	65 6e 64 2d 63 6f 6d 6d 61 6e 64 20 74 6f 6f 6c 62 61 72 78 2d 74 65 73 74 2d 61 6e 79 2d 74 79	end-command.toolbarx-test-any-ty
2fe0	70 65 20 2e 20 70 72 6f 67 6e 29 20 28 3a 70 72 65 70 65 6e 64 2d 63 6f 6d 6d 61 6e 64 20 74 6f	pe...progn).(:prepend-command.to
3000	6f 6c 62 61 72 78 2d 74 65 73 74 2d 61 6e 79 2d 74 79 70 65 20 2e 20 70 72 6f 67 6e 29 29 20 6e	olbarx-test-any-type...progn)).n
3020	69 6c 5d 20 38 29 20 28 23 24 20 2e 20 31 31 33 39 32 29 29 0a 23 40 34 38 39 20 4c 69 73 74 20	il].8).(#$...11392)).#@489.List.
3040	79 69 65 6c 64 69 6e 67 20 61 6c 6c 20 65 6e 63 61 72 6e 61 74 69 6f 6e 73 20 6f 66 20 70 72 6f	yielding.all.encarnations.of.pro
3060	70 65 72 74 69 65 73 20 6f 66 20 61 20 64 72 6f 70 64 6f 77 6e 20 67 72 6f 75 70 2e 0a 46 69 72	perties.of.a.dropdown.group..Fir
3080	73 74 20 65 6c 65 6d 65 6e 74 3a 20 61 6c 69 73 74 2c 20 77 68 65 72 65 20 65 61 63 68 20 65 6c	st.element:.alist,.where.each.el
30a0	65 6d 65 6e 74 20 69 73 20 6f 66 20 66 6f 72 6d 0a 20 28 50 52 4f 50 20 2e 20 28 54 59 50 45 2d	ement.is.of.form..(PROP...(TYPE-
30c0	54 45 53 54 2d 46 55 4e 43 54 49 4f 4e 20 2e 20 41 44 44 2d 4f 52 2d 4e 49 4c 29 29 0a 53 65 63	TEST-FUNCTION...ADD-OR-NIL)).Sec
30e0	6f 6e 64 20 69 73 20 61 20 6c 69 73 74 20 77 69 74 68 20 61 6c 6c 20 70 72 6f 70 65 72 74 69 65	ond.is.a.list.with.all.propertie
3100	73 2e 0a 54 68 69 72 64 2c 20 61 20 6c 69 73 74 20 77 69 74 68 20 70 72 6f 70 65 72 74 69 65 73	s..Third,.a.list.with.properties
3120	20 74 68 61 74 20 6f 76 65 72 72 69 64 65 20 77 68 65 6e 20 6d 65 72 67 69 6e 67 2e 0a 46 6f 75	.that.override.when.merging..Fou
3140	72 74 68 2c 20 61 20 6c 69 73 74 20 6f 66 20 6c 69 73 74 73 2c 20 65 61 63 68 20 69 6e 20 74 68	rth,.a.list.of.lists,.each.in.th
3160	65 20 66 6f 72 6d 61 74 20 28 50 52 4f 50 20 41 44 44 29 2e 0a 0a 43 6f 6e 76 65 6e 74 69 6f 6e	e.format.(PROP.ADD)...Convention
3180	3a 20 70 72 6f 70 65 72 74 69 65 73 20 66 6f 72 20 74 68 65 20 64 72 6f 70 64 6f 77 6e 20 62 75	:.properties.for.the.dropdown.bu
31a0	74 74 6f 6e 20 73 68 6f 75 6c 64 20 62 65 20 66 6f 72 6d 65 64 0a 77 69 74 68 20 74 68 65 20 73	tton.should.be.formed.with.the.s
31c0	74 72 69 6e 67 73 20 22 3a 64 72 6f 70 64 6f 77 6e 2d 22 20 77 69 74 68 20 74 68 65 20 62 75 74	trings.":dropdown-".with.the.but
31e0	74 6f 6e 20 70 72 6f 70 65 72 74 79 20 6e 61 6d 65 0a 77 69 74 68 6f 75 74 20 60 3a 27 2e 20 54	ton.property.name.without.`:'..T
3200	68 69 73 20 69 73 20 75 73 65 64 20 6f 6e 20 74 68 65 20 69 6d 70 6c 65 6d 65 6e 74 61 74 69 6f	his.is.used.on.the.implementatio
3220	6e 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20 74 6f 6f 6c 62 61 72 78 2d 64 72 6f 70 64 6f 77 6e 2d	n...(defconst.toolbarx-dropdown-
3240	70 72 6f 70 73 20 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 5c 33 30 31 01 5c 32 31 31 5c	props.(byte-code."\300\301.\211\
3260	32 30 33 16 00 5c 32 31 31 40 5c 32 31 31 40 03 42 5c 32 36 32 03 01 41 5c 32 36 36 5c 32 30 32	203..\211@\211@.B\262..A\266\202
3280	5c 32 30 32 03 00 01 5c 32 36 32 01 5c 32 36 32 01 5c 32 33 37 5c 33 30 31 02 5c 32 31 31 5c 32	\202...\262.\262.\237\301.\211\2
32a0	30 33 37 00 5c 32 31 31 40 5c 32 31 31 41 41 5c 32 30 34 30 00 5c 32 31 31 40 03 42 5c 32 36 32	037.\211@\211AA\2040.\211@.B\262
32c0	03 01 41 5c 32 36 36 5c 32 30 32 5c 32 30 32 1e 00 01 5c 32 36 32 01 5c 32 36 32 01 5c 32 33 37	..A\266\202\202...\262.\262.\237
32e0	5c 33 30 31 03 5c 32 31 31 5c 32 30 33 58 00 5c 32 31 31 40 5c 32 31 31 41 41 5c 32 30 33 51 00	\301.\211\203X.\211@\211AA\203Q.
3300	5c 32 31 31 40 03 42 5c 32 36 32 03 01 41 5c 32 36 36 5c 32 30 32 5c 32 30 32 3f 00 01 5c 32 36	\211@.B\262..A\266\202\202?..\26
3320	32 01 5c 32 36 32 01 5c 32 33 37 03 03 03 03 46 5c 32 30 37 22 20 5b 28 28 3a 74 79 70 65 20 74	2.\262.\237....F\207".[((:type.t
3340	6f 6f 6c 62 61 72 78 2d 74 65 73 74 2d 64 72 6f 70 64 6f 77 6e 2d 74 79 70 65 29 20 28 3a 76 61	oolbarx-test-dropdown-type).(:va
3360	72 69 61 62 6c 65 20 74 6f 6f 6c 62 61 72 78 2d 74 65 73 74 2d 73 79 6d 62 6f 6c 29 20 28 3a 64	riable.toolbarx-test-symbol).(:d
3380	65 66 61 75 6c 74 20 74 6f 6f 6c 62 61 72 78 2d 74 65 73 74 2d 64 72 6f 70 64 6f 77 6e 2d 64 65	efault.toolbarx-test-dropdown-de
33a0	66 61 75 6c 74 29 20 28 3a 73 61 76 65 20 74 6f 6f 6c 62 61 72 78 2d 74 65 73 74 2d 64 72 6f 70	fault).(:save.toolbarx-test-drop
33c0	64 6f 77 6e 2d 73 61 76 65 29 20 28 3a 74 69 74 6c 65 20 74 6f 6f 6c 62 61 72 78 2d 74 65 73 74	down-save).(:title.toolbarx-test
33e0	2d 73 74 72 69 6e 67 2d 6f 72 2d 6e 69 6c 29 20 28 3a 64 72 6f 70 64 6f 77 6e 2d 69 6d 61 67 65	-string-or-nil).(:dropdown-image
3400	20 74 6f 6f 6c 62 61 72 78 2d 74 65 73 74 2d 69 6d 61 67 65 2d 74 79 70 65 29 20 28 3a 64 72 6f	.toolbarx-test-image-type).(:dro
3420	70 64 6f 77 6e 2d 65 6e 61 62 6c 65 20 74 6f 6f 6c 62 61 72 78 2d 74 65 73 74 2d 61 6e 79 2d 74	pdown-enable.toolbarx-test-any-t
3440	79 70 65 29 20 28 3a 64 72 6f 70 64 6f 77 6e 2d 76 69 73 69 62 6c 65 20 74 6f 6f 6c 62 61 72 78	ype).(:dropdown-visible.toolbarx
3460	2d 74 65 73 74 2d 61 6e 79 2d 74 79 70 65 29 20 28 3a 64 72 6f 70 64 6f 77 6e 2d 69 6e 73 65 72	-test-any-type).(:dropdown-inser
3480	74 20 74 6f 6f 6c 62 61 72 78 2d 74 65 73 74 2d 61 6e 79 2d 74 79 70 65 20 2e 20 61 6e 64 29 20	t.toolbarx-test-any-type...and).
34a0	28 3a 64 72 6f 70 64 6f 77 6e 2d 68 65 6c 70 20 74 6f 6f 6c 62 61 72 78 2d 74 65 73 74 2d 73 74	(:dropdown-help.toolbarx-test-st
34c0	72 69 6e 67 2d 6f 72 2d 6e 69 6c 29 20 28 3a 64 72 6f 70 64 6f 77 6e 2d 61 70 70 65 6e 64 2d 63	ring-or-nil).(:dropdown-append-c
34e0	6f 6d 6d 61 6e 64 20 74 6f 6f 6c 62 61 72 78 2d 74 65 73 74 2d 61 6e 79 2d 74 79 70 65 20 2e 20	ommand.toolbarx-test-any-type...
3500	70 72 6f 67 6e 29 20 28 3a 64 72 6f 70 64 6f 77 6e 2d 70 72 65 70 65 6e 64 2d 63 6f 6d 6d 61 6e	progn).(:dropdown-prepend-comman
3520	64 20 74 6f 6f 6c 62 61 72 78 2d 74 65 73 74 2d 61 6e 79 2d 74 79 70 65 20 2e 20 70 72 6f 67 6e	d.toolbarx-test-any-type...progn
3540	29 29 20 6e 69 6c 5d 20 38 29 20 28 23 24 20 2e 20 31 32 33 34 37 29 29 0a 23 40 32 32 35 20 52	)).nil].8).(#$...12347)).#@225.R
3560	65 74 75 72 6e 20 61 6e 20 75 70 64 61 74 65 64 20 76 65 72 73 69 6f 6e 20 6f 66 20 53 57 49 54	eturn.an.updated.version.of.SWIT
3580	43 48 45 53 2e 0a 47 52 4f 55 50 2d 57 49 54 48 4f 55 54 2d 50 52 4f 50 53 20 61 6e 64 20 4d 45	CHES..GROUP-WITHOUT-PROPS.and.ME
35a0	52 47 45 44 2d 50 52 4f 50 53 2d 57 49 54 48 4f 55 54 2d 49 4e 53 45 52 54 20 61 72 65 0a 70 72	RGED-PROPS-WITHOUT-INSERT.are.pr
35c0	65 70 72 6f 63 65 73 73 65 64 20 76 61 72 69 61 62 6c 65 73 20 69 6e 20 60 74 6f 6f 6c 62 61 72	eprocessed.variables.in.`toolbar
35e0	78 2d 70 72 6f 63 65 73 73 2d 67 72 6f 75 70 27 2e 0a 0a 28 66 6e 20 47 52 4f 55 50 2d 57 49 54	x-process-group'...(fn.GROUP-WIT
3600	48 4f 55 54 2d 50 52 4f 50 53 20 4d 45 52 47 45 44 2d 50 52 4f 50 53 2d 57 49 54 48 4f 55 54 2d	HOUT-PROPS.MERGED-PROPS-WITHOUT-
3620	49 4e 53 45 52 54 20 4d 45 41 4e 49 4e 47 2d 41 4c 49 53 54 20 53 57 49 54 43 48 45 53 29 1f 0a	INSERT.MEANING-ALIST.SWITCHES)..
3640	28 64 65 66 61 6c 69 61 73 20 27 74 6f 6f 6c 62 61 72 78 2d 70 72 6f 63 65 73 73 2d 67 72 6f 75	(defalias.'toolbarx-process-grou
3660	70 2d 77 69 74 68 6f 75 74 2d 69 6e 73 65 72 74 20 23 5b 31 30 32 38 20 22 5c 32 31 31 04 5c 32	p-without-insert.#[1028."\211.\2
3680	31 31 5c 32 30 33 37 00 5c 32 31 31 40 5c 33 30 30 01 21 5c 32 36 32 01 5c 32 31 31 39 5c 32 30	11\2037.\211@\300.!\262.\2119\20
36a0	33 20 00 5c 33 30 31 01 06 06 06 08 06 06 24 5c 32 36 32 03 5c 32 30 32 30 00 5c 32 31 31 3c 5c	3..\301.......$\262.\2020.\211<\
36c0	32 30 33 30 00 5c 33 30 32 01 06 06 06 08 06 06 24 5c 32 36 32 03 01 41 5c 32 36 36 5c 32 30 32	2030.\302.......$\262..A\266\202
36e0	5c 32 30 32 02 00 01 5c 32 30 37 22 20 5b 74 6f 6f 6c 62 61 72 78 2d 6f 70 74 69 6f 6e 2d 76 61	\202...\207".[toolbarx-option-va
3700	6c 75 65 20 74 6f 6f 6c 62 61 72 78 2d 70 72 6f 63 65 73 73 2d 73 79 6d 62 6f 6c 20 74 6f 6f 6c	lue.toolbarx-process-symbol.tool
3720	62 61 72 78 2d 70 72 6f 63 65 73 73 2d 67 72 6f 75 70 5d 20 31 32 20 28 23 24 20 2e 20 31 33 36	barx-process-group].12.(#$...136
3740	36 33 29 5d 29 0a 23 40 35 31 36 20 52 65 74 75 72 6e 20 61 6e 20 75 70 64 61 74 65 64 20 76 65	63)]).#@516.Return.an.updated.ve
3760	72 73 69 6f 6e 20 6f 66 20 53 57 49 54 43 48 45 53 2e 0a 41 70 70 65 6e 64 20 74 6f 20 61 6c 72	rsion.of.SWITCHES..Append.to.alr
3780	65 61 64 79 20 70 72 6f 63 65 73 73 65 64 20 62 75 74 74 6f 6e 73 20 28 73 74 6f 72 65 64 20 69	eady.processed.buttons.(stored.i
37a0	6e 20 53 57 49 54 43 48 45 53 29 20 61 0a 70 72 6f 63 65 73 73 65 64 20 76 65 72 73 69 6f 6e 20	n.SWITCHES).a.processed.version.
37c0	6f 66 20 47 52 4f 55 50 2e 20 20 47 72 6f 75 70 73 20 61 72 65 20 75 73 65 66 75 6c 20 74 6f 20	of.GROUP...Groups.are.useful.to.
37e0	64 69 73 74 72 69 62 75 74 65 0a 70 72 6f 70 65 72 74 69 65 73 2e 20 20 45 78 74 65 72 6e 61 6c	distribute.properties...External
3800	20 70 72 6f 70 65 72 74 69 65 73 20 61 72 65 20 67 69 76 65 6e 20 69 6e 20 50 52 4f 50 53 2c 20	.properties.are.given.in.PROPS,.
3820	61 6e 64 20 6d 65 72 67 65 64 0a 77 69 74 68 20 74 68 65 20 69 6e 74 65 72 6e 61 6c 20 70 72 6f	and.merged.with.the.internal.pro
3840	70 65 72 74 69 65 73 20 74 68 61 74 20 61 72 65 20 69 6e 20 74 68 65 20 65 6e 64 20 6f 66 20 47	perties.that.are.in.the.end.of.G
3860	52 4f 55 50 2e 20 20 49 66 0a 70 72 6f 70 65 72 74 69 65 73 20 28 61 66 74 65 72 20 6d 65 72 67	ROUP...If.properties.(after.merg
3880	65 29 20 63 6f 6e 74 61 69 6e 20 61 20 60 3a 69 6e 73 65 72 74 27 20 70 72 6f 70 65 72 74 79 2c	e).contain.a.`:insert'.property,
38a0	20 72 65 74 75 72 6e 20 61 0a 6c 69 73 74 20 77 68 65 72 65 20 74 68 65 20 66 69 72 73 74 20 61	.return.a.list.where.the.first.a
38c0	6e 64 20 73 65 63 6f 6e 64 20 65 6c 65 6d 65 6e 74 73 20 61 72 65 20 60 3a 69 6e 73 65 72 74 27	nd.second.elements.are.`:insert'
38e0	20 61 6e 64 20 69 74 73 0a 76 61 6c 75 65 2c 20 61 6e 64 20 61 66 74 65 72 20 74 68 61 74 20 61	.and.its.value,.and.after.that.a
3900	20 6c 69 73 74 20 69 6e 20 74 68 65 20 73 61 6d 65 20 66 6f 72 6d 61 74 20 61 73 20 53 57 49 54	.list.in.the.same.format.as.SWIT
3920	43 48 45 53 2e 0a 0a 28 66 6e 20 47 52 4f 55 50 20 4d 45 41 4e 49 4e 47 2d 41 4c 49 53 54 20 50	CHES...(fn.GROUP.MEANING-ALIST.P
3940	52 4f 50 53 20 53 57 49 54 43 48 45 53 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 74 6f 6f 6c 62	ROPS.SWITCHES)..(defalias.'toolb
3960	61 72 78 2d 70 72 6f 63 65 73 73 2d 67 72 6f 75 70 20 23 5b 31 30 32 38 20 22 03 40 5c 33 30 32	arx-process-group.#[1028.".@\302
3980	3d 5c 32 30 33 0e 00 5c 33 30 33 04 04 04 04 24 5c 32 30 37 03 40 5c 33 30 34 3d 5c 32 30 33 41	=\203..\303....$\207.@\304=\203A
39a0	00 5c 32 31 31 04 41 5c 32 31 31 5c 32 30 33 3f 00 5c 32 31 31 40 5c 33 30 35 01 5c 33 30 36 5c	.\211.A\211\203?.\211@\305.\306\
39c0	22 5c 33 30 37 01 3c 5c 32 30 33 2c 00 01 5c 32 30 32 2e 00 01 43 06 08 06 08 06 07 24 5c 32 36	"\307.<\203,..\202...C......$\26
39e0	32 04 5c 32 31 30 01 41 5c 32 36 36 5c 32 30 32 5c 32 30 32 18 00 01 5c 32 30 37 5c 33 31 30 04	2.\210.A\266\202\202...\207\310.
3a00	5c 33 31 31 08 41 40 09 41 40 5c 22 5c 22 5c 32 31 31 41 01 40 5c 33 31 32 02 06 06 5c 33 31 31	\311.A@.A@\"\"\211A.@\312...\311
3a20	5c 33 31 33 08 38 5c 33 31 33 09 38 5c 22 5c 33 31 31 5c 33 31 34 08 38 5c 33 31 34 09 38 5c 22	\313.8\313.8\"\311\314.8\314.8\"
3a40	24 5c 33 31 35 01 3e 5c 32 30 33 5c 33 34 34 00 5c 33 31 35 01 3e 5c 32 31 31 41 40 3c 5c 32 30	$\315.>\203\344.\315.>\211A@<\20
3a60	33 5c 33 30 34 00 5c 32 31 31 41 40 40 5c 33 31 36 3d 5c 32 30 33 5c 33 30 34 00 5c 33 31 35 08	3\304.\211A@@\316=\203\304.\315.
3a80	40 5c 32 33 36 5c 32 31 31 41 41 43 5c 33 31 37 03 41 40 41 5c 32 31 31 5c 32 30 33 5c 32 35 32	@\236\211AAC\317.A@A\211\203\252
3aa0	00 5c 32 31 31 40 04 41 40 01 21 5c 32 36 32 03 02 40 5c 32 30 33 5c 32 34 33 00 02 41 04 42 5c	.\211@.A@.!\262..@\203\243..A.B\
3ac0	32 36 32 04 01 41 5c 32 36 36 5c 32 30 32 5c 32 30 32 5c 32 31 33 00 5c 32 31 30 01 5c 32 33 37	262..A\266\202\202\213.\210.\237
3ae0	5c 32 36 32 02 01 47 5c 33 31 33 3d 5c 32 30 33 5c 32 37 36 00 01 41 40 5c 32 36 36 5c 32 30 33	\262..G\313=\203\276..A@\266\203
3b00	5c 32 30 32 5c 33 30 37 00 01 5c 32 36 36 5c 32 30 33 5c 32 30 32 5c 33 30 37 00 5c 32 31 31 41	\202\307..\266\203\202\307.\211A
3b20	40 5c 33 31 31 5c 33 32 30 04 04 47 5c 22 03 41 41 5c 22 5c 33 32 31 05 02 06 5c 66 5c 33 31 37	@\311\320..G\".AA\"\321...\f\317
3b40	24 5c 33 31 31 5c 33 31 35 04 44 02 5c 22 06 09 5c 32 33 37 42 5c 32 33 37 5c 32 30 37 5c 33 32	$\311\315.D.\"..\237B\237\207\32
3b60	31 02 02 06 09 06 08 24 5c 32 30 37 22 20 5b 74 6f 6f 6c 62 61 72 78 2d 62 75 74 74 6f 6e 2d 70	1......$\207".[toolbarx-button-p
3b80	72 6f 70 73 20 74 6f 6f 6c 62 61 72 78 2d 64 72 6f 70 64 6f 77 6e 2d 70 72 6f 70 73 20 3a 64 72	rops.toolbarx-dropdown-props.:dr
3ba0	6f 70 64 6f 77 6e 2d 67 72 6f 75 70 20 74 6f 6f 6c 62 61 72 78 2d 70 72 6f 63 65 73 73 2d 64 72	opdown-group.toolbarx-process-dr
3bc0	6f 70 64 6f 77 6e 2d 67 72 6f 75 70 20 3a 65 76 61 6c 2d 67 72 6f 75 70 20 65 76 61 6c 20 74 20	opdown-group.:eval-group.eval.t.
3be0	74 6f 6f 6c 62 61 72 78 2d 70 72 6f 63 65 73 73 2d 67 72 6f 75 70 20 74 6f 6f 6c 62 61 72 78 2d	toolbarx-process-group.toolbarx-
3c00	73 65 70 61 72 61 74 65 2d 6f 70 74 69 6f 6e 73 20 61 70 70 65 6e 64 20 74 6f 6f 6c 62 61 72 78	separate-options.append.toolbarx
3c20	2d 6d 65 72 67 65 2d 70 72 6f 70 73 20 32 20 33 20 3a 69 6e 73 65 72 74 20 3a 61 64 64 2d 76 61	-merge-props.2.3.:insert.:add-va
3c40	6c 75 65 2d 6c 69 73 74 20 6e 69 6c 20 62 75 74 6c 61 73 74 20 74 6f 6f 6c 62 61 72 78 2d 70 72	lue-list.nil.butlast.toolbarx-pr
3c60	6f 63 65 73 73 2d 67 72 6f 75 70 2d 77 69 74 68 6f 75 74 2d 69 6e 73 65 72 74 5d 20 31 36 20 28	ocess-group-without-insert].16.(
3c80	23 24 20 2e 20 31 34 31 35 36 29 5d 29 0a 23 40 35 32 30 20 50 72 6f 63 65 73 73 20 61 20 62 75	#$...14156)]).#@520.Process.a.bu
3ca0	74 74 6f 6e 20 67 69 76 65 6e 20 62 79 20 53 59 4d 42 4f 4c 20 69 6e 20 4d 45 41 4e 49 4e 47 2d	tton.given.by.SYMBOL.in.MEANING-
3cc0	41 4c 49 53 54 2e 0a 54 68 65 20 70 72 6f 63 65 73 73 65 64 20 62 75 74 74 6f 6e 20 69 73 20 61	ALIST..The.processed.button.is.a
3ce0	70 70 65 6e 64 65 64 20 69 6e 20 53 57 49 54 43 48 45 53 2c 20 77 68 69 63 68 20 69 73 20 72 65	ppended.in.SWITCHES,.which.is.re
3d00	74 75 72 6e 65 64 2e 0a 4c 6f 6f 6b 20 66 6f 72 20 61 20 61 73 73 6f 63 69 61 74 69 6f 6e 20 6f	turned..Look.for.a.association.o
3d20	66 20 53 59 4d 42 4f 4c 20 69 6e 20 4d 45 41 4e 49 4e 47 2d 41 4c 49 53 54 20 66 6f 72 20 63 6f	f.SYMBOL.in.MEANING-ALIST.for.co
3d40	6c 6c 65 63 74 69 6e 67 0a 70 72 6f 70 65 72 74 69 65 73 2e 20 20 53 75 63 68 20 61 73 73 6f 63	llecting.properties...Such.assoc
3d60	69 61 74 69 6f 6e 20 69 73 20 61 20 6c 69 73 74 20 74 68 61 74 20 72 65 70 72 65 73 65 6e 74 73	iation.is.a.list.that.represents
3d80	20 65 69 74 68 65 72 20 61 0a 6e 6f 72 6d 61 6c 20 62 75 74 74 6f 6e 20 28 61 20 64 65 73 63 72	.either.a.normal.button.(a.descr
3da0	69 70 74 69 6f 6e 20 6f 66 20 74 68 65 20 62 75 74 74 6f 6e 29 20 6f 72 20 61 6e 20 61 6c 69 61	iption.of.the.button).or.an.alia
3dc0	73 0a 67 72 6f 75 70 20 28 74 68 65 20 73 79 6d 62 6f 6c 20 69 73 20 61 6e 20 61 6c 69 61 73 20	s.group.(the.symbol.is.an.alias.
3de0	66 6f 72 20 61 20 67 72 6f 75 70 20 6f 66 20 62 75 74 74 6f 6e 73 29 2e 20 20 50 52 4f 50 53 20	for.a.group.of.buttons)...PROPS.
3e00	69 73 0a 61 20 65 78 74 65 72 6e 65 6c 20 6c 69 73 74 20 6f 66 20 70 72 6f 70 65 72 74 69 65 73	is.a.externel.list.of.properties
3e20	20 74 68 61 74 20 61 72 65 20 6d 65 72 67 65 64 20 61 6e 64 20 74 68 65 6e 20 61 70 70 6c 69 65	.that.are.merged.and.then.applie
3e40	64 20 74 6f 0a 74 68 65 20 62 75 74 74 6f 6e 2e 20 20 53 63 6f 70 65 20 69 73 20 67 69 76 65 6e	d.to.the.button...Scope.is.given
3e60	20 62 79 20 47 4c 4f 42 41 4c 2d 46 4c 41 47 2e 0a 0a 28 66 6e 20 53 59 4d 42 4f 4c 20 4d 45 41	.by.GLOBAL-FLAG...(fn.SYMBOL.MEA
3e80	4e 49 4e 47 2d 41 4c 49 53 54 20 50 52 4f 50 53 20 53 57 49 54 43 48 45 53 29 1f 0a 28 64 65 66	NING-ALIST.PROPS.SWITCHES)..(def
3ea0	61 6c 69 61 73 20 27 74 6f 6f 6c 62 61 72 78 2d 70 72 6f 63 65 73 73 2d 73 79 6d 62 6f 6c 20 23	alias.'toolbarx-process-symbol.#
3ec0	5b 31 30 32 38 20 22 03 03 5c 32 33 36 41 5c 32 31 31 40 5c 33 30 32 3d 5c 32 30 33 13 00 5c 33	[1028."..\236A\211@\302=\203..\3
3ee0	30 33 01 41 05 05 05 24 5c 32 30 37 5c 33 30 34 08 38 5c 33 30 35 08 38 5c 33 30 36 03 5c 33 30	03.A...$\207\304.8\305.8\306.\30
3f00	37 08 41 40 09 41 40 5c 22 5c 22 5c 32 31 31 40 01 41 5c 33 31 30 01 3e 3f 5c 32 30 35 3a 00 01	7.A@.A@\"\"\211@.A\310.>?\205:..
3f20	47 5c 33 31 31 56 5c 32 30 35 3a 00 5c 33 31 30 02 40 44 5c 33 31 32 02 3e 3f 5c 32 30 35 4d 00	G\311V\205:.\310.@D\312.>?\205M.
3f40	02 47 5c 33 31 33 56 5c 32 30 35 4d 00 5c 33 31 32 03 41 40 44 5c 33 30 37 03 03 03 23 5c 33 31	.G\313V\205M.\312.A@D\307...#\31
3f60	34 01 06 5c 66 06 5c 6e 06 5c 6e 24 06 0d 01 42 06 0b 5c 32 33 37 42 5c 32 33 37 5c 32 30 37 22	4..\f.\n.\n$...B..\237B\237\207"
3f80	20 5b 74 6f 6f 6c 62 61 72 78 2d 62 75 74 74 6f 6e 2d 70 72 6f 70 73 20 74 6f 6f 6c 62 61 72 78	.[toolbarx-button-props.toolbarx
3fa0	2d 64 72 6f 70 64 6f 77 6e 2d 70 72 6f 70 73 20 3a 61 6c 69 61 73 20 74 6f 6f 6c 62 61 72 78 2d	-dropdown-props.:alias.toolbarx-
3fc0	70 72 6f 63 65 73 73 2d 67 72 6f 75 70 20 32 20 33 20 74 6f 6f 6c 62 61 72 78 2d 73 65 70 61 72	process-group.2.3.toolbarx-separ
3fe0	61 74 65 2d 6f 70 74 69 6f 6e 73 20 61 70 70 65 6e 64 20 3a 69 6d 61 67 65 20 30 20 3a 63 6f 6d	ate-options.append.:image.0.:com
4000	6d 61 6e 64 20 31 20 74 6f 6f 6c 62 61 72 78 2d 6d 65 72 67 65 2d 70 72 6f 70 73 5d 20 31 38 20	mand.1.toolbarx-merge-props].18.
4020	28 23 24 20 2e 20 31 35 35 30 38 29 5d 29 0a 23 40 33 38 35 20 50 72 6f 63 65 73 73 20 62 75 74	(#$...15508)]).#@385.Process.but
4040	74 6f 6e 73 20 74 68 61 74 20 61 70 70 65 61 72 20 61 63 63 6f 72 64 69 6e 67 20 74 6f 20 64 72	tons.that.appear.according.to.dr
4060	6f 70 64 6f 77 6e 20 6d 65 6e 75 2e 0a 50 72 6f 63 65 73 73 20 61 20 64 72 6f 70 64 6f 77 6e 20	opdown.menu..Process.a.dropdown.
4080	67 72 6f 75 70 20 44 52 4f 50 44 4f 57 4e 20 77 69 74 68 20 6d 65 61 6e 69 6e 67 20 61 6c 69 73	group.DROPDOWN.with.meaning.alis
40a0	74 0a 4d 45 41 4e 49 4e 47 2d 41 4c 49 53 54 2c 20 65 78 74 65 72 6e 61 6c 20 70 72 6f 70 65 72	t.MEANING-ALIST,.external.proper
40c0	74 79 20 6c 69 73 74 20 50 52 4f 50 20 61 6e 64 20 47 4c 4f 42 41 4c 2d 46 4c 41 47 0a 73 70 65	ty.list.PROP.and.GLOBAL-FLAG.spe
40e0	63 69 66 79 69 6e 67 20 73 63 6f 70 65 2e 20 46 6f 72 20 61 20 63 6f 6d 70 6c 65 74 65 20 64 65	cifying.scope..For.a.complete.de
4100	73 63 72 69 70 74 69 6f 6e 2c 20 73 65 65 20 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 0a 6f 66 20	scription,.see.documentation.of.
4120	60 74 6f 6f 6c 62 61 72 78 2d 69 6e 73 74 61 6c 6c 2d 74 6f 6f 6c 62 61 72 27 2e 20 20 54 68 65	`toolbarx-install-toolbar'...The
4140	20 70 72 6f 63 65 73 73 65 64 20 62 75 74 74 6f 6e 73 20 61 72 65 20 73 74 6f 72 65 64 0a 69 6e	.processed.buttons.are.stored.in
4160	20 74 68 65 20 65 6e 64 20 6f 66 20 53 57 49 54 43 48 45 53 2c 20 77 68 69 63 68 20 69 73 20 72	.the.end.of.SWITCHES,.which.is.r
4180	65 74 75 72 6e 65 64 2e 0a 0a 28 66 6e 20 44 52 4f 50 44 4f 57 4e 20 4d 45 41 4e 49 4e 47 2d 41	eturned...(fn.DROPDOWN.MEANING-A
41a0	4c 49 53 54 20 50 52 4f 50 53 20 53 57 49 54 43 48 45 53 29 1f 0a 28 64 65 66 61 6c 69 61 73 20	LIST.PROPS.SWITCHES)..(defalias.
41c0	27 74 6f 6f 6c 62 61 72 78 2d 70 72 6f 63 65 73 73 2d 64 72 6f 70 64 6f 77 6e 2d 67 72 6f 75 70	'toolbarx-process-dropdown-group
41e0	20 23 5b 31 30 32 38 20 22 03 40 5c 33 30 32 3d 5c 32 30 33 5c 66 00 03 41 5c 32 30 32 0d 00 03	.#[1028.".@\302=\203\f..A\202...
4200	5c 33 30 33 01 5c 33 30 34 08 41 40 09 41 40 5c 22 5c 22 5c 32 31 31 40 01 41 5c 33 30 35 01 06	\303.\304.A@.A@\"\"\211@.A\305..
4220	07 5c 33 30 34 5c 33 30 36 08 38 5c 33 30 36 09 38 5c 22 5c 33 30 34 5c 33 30 37 08 38 5c 33 30	.\304\306.8\306.8\"\304\307.8\30
4240	37 09 38 5c 22 24 5c 33 31 30 5c 32 31 31 08 41 40 5c 32 31 31 5c 32 30 33 56 00 5c 32 31 31 40	7.8\"$\310\211.A@\211\203V.\211@
4260	5c 32 31 31 05 3e 5c 32 36 32 03 02 5c 32 30 33 4f 00 5c 33 30 34 01 04 41 40 44 05 5c 22 5c 32	\211.>\262..\203O.\304..A@D.\"\2
4280	36 32 04 01 41 5c 32 36 36 5c 32 30 32 5c 32 30 32 36 00 02 5c 32 36 32 01 5c 32 36 36 5c 32 30	62..A\266\202\2026..\262.\266\20
42a0	32 5c 33 31 30 5c 32 31 31 09 41 40 5c 32 31 31 5c 32 30 33 5c 32 30 31 00 5c 32 31 31 40 5c 32	2\310\211.A@\211\203\201.\211@\2
42c0	31 31 06 06 3e 5c 32 36 32 03 02 5c 32 30 33 7a 00 5c 33 30 34 01 04 41 40 44 05 5c 22 5c 32 36	11..>\262..\203z.\304..A@D.\"\26
42e0	32 04 01 41 5c 32 36 36 5c 32 30 32 5c 32 30 32 60 00 02 5c 32 36 32 01 5c 32 36 36 5c 32 30 32	2..A\266\202\202`..\262.\266\202
4300	5c 33 31 30 5c 32 31 31 5c 32 31 31 5c 33 31 31 20 5c 33 31 32 5c 33 31 33 02 5c 22 5c 32 31 36	\310\211\211\311.\312\313.\"\216
4320	09 40 5c 32 31 31 5c 32 30 33 5c 33 33 32 00 5c 32 31 31 40 5c 33 31 34 5c 33 31 35 5c 33 31 36	.@\211\203\332.\211@\314\315\316
4340	03 40 21 5c 22 5c 32 30 34 5c 33 32 33 00 5c 32 31 31 40 06 07 3e 5c 32 36 32 04 03 5c 32 30 33	.@!\"\204\323.\211@..>\262..\203
4360	5c 33 32 33 00 5c 32 31 31 41 40 04 41 40 21 5c 32 36 32 05 04 40 5c 32 30 33 5c 33 31 32 00 5c	\323.\211A@.A@!\262..@\203\312.\
4380	33 30 34 06 06 02 40 06 07 41 44 5c 22 5c 32 36 32 06 5c 32 30 32 5c 33 32 33 00 5c 33 31 37 5c	304...@..AD\"\262.\202\323.\317\
43a0	33 32 30 5c 33 32 31 5c 33 32 32 04 40 5c 22 5c 22 5c 32 31 30 01 41 5c 32 36 36 5c 32 30 32 5c	320\321\322.@\"\"\210.A\266\202\
43c0	32 30 32 5c 32 32 32 00 04 5c 32 36 32 01 29 5c 32 36 32 01 5c 32 36 36 5c 32 30 33 5c 33 31 30	202\222..\262.)\262.\266\203\310
43e0	5c 33 31 31 20 5c 33 31 32 5c 33 32 33 02 5c 22 5c 32 31 36 09 41 40 5c 32 31 31 5c 32 30 33 27	\311.\312\323.\"\216.A@\211\203'
4400	01 5c 32 31 31 40 5c 32 31 31 06 06 3e 5c 32 30 33 20 01 5c 33 31 34 5c 33 32 34 5c 33 31 36 03	.\211@\211..>\203..\314\324\316.
4420	21 5c 22 5c 32 30 33 20 01 5c 33 32 35 5c 33 32 36 5c 33 31 36 03 21 5c 33 32 37 5c 32 32 34 5c	!\"\203..\325\326\316.!\327\224\
4440	33 32 37 5c 32 32 35 4f 50 21 01 06 07 3e 41 40 5c 33 30 34 02 02 44 06 07 5c 22 5c 32 36 32 06	327\225OP!...>A@\304..D..\"\262.
4460	5c 32 36 36 02 01 41 5c 32 36 36 5c 32 30 32 5c 32 30 32 5c 33 35 35 00 5c 32 31 30 29 5c 32 31	\266..A\266\202\202\355.\210)\21
4480	30 5c 33 33 30 01 3e 5c 32 30 34 38 01 5c 33 30 34 5c 33 33 30 5c 33 33 31 44 02 5c 22 5c 32 36	0\330.>\2048.\304\330\331D.\"\26
44a0	32 01 5c 32 31 31 5c 32 36 32 01 5c 33 33 32 01 42 5c 33 33 33 03 3e 5c 32 30 33 4c 01 5c 33 33	2.\211\262.\332.B\333.>\203L.\33
44c0	33 03 3e 41 40 5c 32 30 32 4d 01 5c 33 33 34 5c 33 33 35 04 3e 5c 32 31 31 41 40 01 5c 32 30 33	3.>A@\202M.\334\335.>\211A@.\203
44e0	5d 01 5c 32 31 31 5c 32 36 36 5c 32 30 32 5c 32 30 32 6d 01 02 5c 33 33 34 3d 5c 32 30 33 69 01	].\211\266\202\202m..\334=\203i.
4500	5c 32 36 36 02 5c 33 32 37 5c 32 30 32 6d 01 5c 33 32 37 43 5c 32 36 36 5c 32 30 32 5c 33 33 36	\266.\327\202m.\327C\266\202\336
4520	05 3e 5c 32 30 35 78 01 5c 33 33 36 05 3e 41 40 5c 32 31 31 5c 32 30 33 5c 32 31 34 01 5c 33 33	.>\205x.\336.>A@\211\203\214.\33
4540	37 06 06 3e 5c 32 30 34 5c 32 31 34 01 5c 33 31 37 5c 33 32 30 5c 33 34 30 5c 22 5c 32 31 30 5c	7..>\204\214.\317\320\340\"\210\
4560	33 31 30 5c 32 30 32 5c 32 31 35 01 5c 32 31 31 5c 32 36 32 01 5c 33 34 31 06 06 3e 5c 32 30 35	310\202\215.\211\262.\341..>\205
4580	5c 32 33 34 01 5c 33 34 31 06 06 3e 41 40 5c 33 33 37 06 07 3e 5c 32 30 33 5c 32 35 34 01 5c 33	\234.\341..>A@\337..>\203\254.\3
45a0	33 37 06 07 3e 41 40 5c 32 30 32 5c 33 31 32 01 5c 33 34 32 5c 33 32 35 5c 33 32 31 5c 33 34 33	37..>A@\202\312.\342\325\321\343
45c0	5c 33 34 32 5c 22 21 5c 33 34 34 01 21 5c 32 30 33 5c 33 31 30 01 01 54 5c 32 36 32 02 5c 33 32	\342\"!\344.!\203\310..T\262.\32
45e0	35 5c 33 32 31 5c 33 34 33 04 5c 22 21 5c 32 36 32 01 5c 32 30 32 5c 32 36 33 01 5c 32 36 32 01	5\321\343.\"!\262.\202\263.\262.
4600	5c 33 31 30 5c 32 31 31 04 5c 32 30 33 5c 33 33 32 01 5c 33 34 35 03 06 07 5c 33 34 36 23 5c 32	\310\211.\203\332.\345...\346#\2
4620	31 30 5c 32 30 32 5c 33 34 35 01 5c 33 34 34 03 21 5c 32 30 34 5c 33 34 35 01 02 06 06 4c 5c 32	10\202\345.\344.!\204\345....L\2
4640	31 30 02 5c 32 31 31 4a 06 08 5c 33 34 37 3d 5c 32 30 33 07 02 5c 32 31 31 3c 5c 32 30 33 5c 33	10.\211J..\347=\203..\211<\203\3
4660	37 30 01 5c 32 31 31 5c 32 30 32 25 02 5c 32 31 31 5c 32 35 30 5c 32 30 33 02 02 5c 32 31 31 43	70.\211\202%.\211\250\203..\211C
4680	5c 32 30 32 25 02 5c 33 32 37 43 5c 32 30 32 25 02 5c 32 31 31 5c 32 35 30 5c 32 30 33 10 02 5c	\202%.\327C\202%.\211\250\203..\
46a0	32 31 31 5c 32 30 32 25 02 5c 32 31 31 5c 32 30 33 24 02 5c 32 31 31 3c 5c 32 30 33 24 02 5c 32	211\202%.\211\203$.\211<\203$.\2
46c0	31 31 40 5c 32 35 30 5c 32 30 33 24 02 5c 32 31 31 40 5c 32 30 32 25 02 5c 33 32 37 5c 32 36 32	11@\250\203$.\211@\202%.\327\262
46e0	01 4c 5c 32 31 30 5c 33 35 30 06 0f 5c 32 31 31 5c 32 30 33 41 02 5c 32 31 31 40 02 5c 32 30 35	.L\210\350..\211\203A.\211@.\205
4700	38 02 5c 32 31 31 39 5c 32 36 32 03 01 41 5c 32 36 36 5c 32 30 32 5c 32 30 32 2c 02 01 5c 32 36	8.\2119\262..A\266\202\202,..\26
4720	32 01 5c 32 36 32 01 5c 32 30 33 5c 32 30 34 02 5c 33 34 32 06 0f 5c 32 31 31 5c 32 30 33 7f 02	2.\262.\203\204.\342..\211\203..
4740	5c 32 31 31 40 5c 33 35 31 01 21 05 42 5c 32 36 32 05 02 54 5c 32 36 32 03 5c 32 31 31 5c 33 35	\211@\351.!.B\262..T\262.\211\35
4760	32 06 0b 5c 33 33 34 3d 5c 32 30 33 6e 02 5c 33 35 33 05 06 09 45 5c 32 30 32 73 02 5c 33 35 34	2..\334=\203n.\353...E\202s.\354
4780	05 06 09 45 45 04 42 5c 32 36 32 04 01 41 5c 32 36 36 5c 32 30 32 5c 32 30 32 4c 02 5c 32 36 36	...EE.B\262..A\266\202\202L.\266
47a0	02 5c 32 30 32 5c 6e 03 06 0e 40 3b 5c 32 30 34 5c 32 32 32 02 5c 33 35 35 5c 33 35 36 5c 33 35	.\202\n...@;\204\222.\355\356\35
47c0	37 5c 33 36 30 5c 33 36 31 24 5c 32 31 30 5c 33 34 32 5c 33 31 30 5c 32 31 31 06 11 5c 32 30 33	7\360\361$\210\342\310\211..\203
47e0	5c 33 34 34 02 06 11 40 5c 32 36 32 02 06 11 41 5c 32 36 32 12 01 3b 5c 32 30 33 5c 33 33 34 02	\344...@\262...A\262..;\203\334.
4800	01 05 42 5c 32 36 32 05 5c 32 31 31 5c 32 30 33 5c 33 32 32 02 5c 33 30 34 01 5c 32 33 37 5c 33	..B\262.\211\203\322.\304.\237\3
4820	35 32 06 5c 66 5c 33 33 34 3d 5c 32 30 33 5c 33 30 36 02 5c 33 35 33 06 06 06 5c 6e 45 5c 32 30	52.\f\334=\203\306.\353...\nE\20
4840	32 5c 33 31 34 02 5c 33 35 34 06 06 06 5c 6e 45 44 5c 22 04 42 5c 32 36 32 04 5c 33 31 30 5c 32	2\314.\354...\nED\".B\262.\310\2
4860	36 32 01 02 54 5c 32 36 32 03 5c 32 30 32 5c 32 32 35 02 01 01 42 5c 32 36 32 01 5c 32 30 32 5c	62..T\262.\202\225...B\262.\202\
4880	32 32 35 02 5c 32 31 31 5c 32 30 33 08 03 5c 33 30 34 01 5c 32 33 37 5c 33 35 32 06 5c 66 5c 33	225.\211\203..\304.\237\352.\f\3
48a0	33 34 3d 5c 32 30 33 5c 33 37 34 02 5c 33 35 33 06 06 06 5c 6e 45 5c 32 30 32 02 03 5c 33 35 34	34=\203\374.\353...\nE\202..\354
48c0	06 06 06 5c 6e 45 44 5c 22 04 42 5c 32 36 32 04 5c 32 36 36 03 01 5c 32 33 37 5c 32 36 32 02 5c	...\nED\".B\262.\266..\237\262.\
48e0	32 31 31 5c 32 33 37 5c 32 36 32 01 06 11 5c 33 36 32 02 06 16 06 10 06 16 24 5c 32 36 32 01 5c	211\237\262...\362.......$\262.\
4900	33 36 32 5c 33 30 34 06 5c 6e 5c 33 36 33 5c 33 36 34 06 07 06 09 06 0e 06 5c 66 06 0e 25 44 5c	362\304.\n\363\364.......\f..%D\
4920	22 06 16 06 0f 06 16 24 5c 32 30 37 22 20 5b 74 6f 6f 6c 62 61 72 78 2d 62 75 74 74 6f 6e 2d 70	"......$\207".[toolbarx-button-p
4940	72 6f 70 73 20 74 6f 6f 6c 62 61 72 78 2d 64 72 6f 70 64 6f 77 6e 2d 70 72 6f 70 73 20 3a 64 72	rops.toolbarx-dropdown-props.:dr
4960	6f 70 64 6f 77 6e 2d 67 72 6f 75 70 20 74 6f 6f 6c 62 61 72 78 2d 73 65 70 61 72 61 74 65 2d 6f	opdown-group.toolbarx-separate-o
4980	70 74 69 6f 6e 73 20 61 70 70 65 6e 64 20 74 6f 6f 6c 62 61 72 78 2d 6d 65 72 67 65 2d 70 72 6f	ptions.append.toolbarx-merge-pro
49a0	70 73 20 32 20 33 20 6e 69 6c 20 6d 61 74 63 68 2d 64 61 74 61 20 6d 61 6b 65 2d 63 6c 6f 73 75	ps.2.3.nil.match-data.make-closu
49c0	72 65 20 23 5b 30 20 22 5c 33 30 31 5c 33 30 30 5c 33 30 32 5c 22 5c 32 30 37 22 20 5b 56 30 20	re.#[0."\301\300\302\"\207".[V0.
49e0	73 65 74 2d 6d 61 74 63 68 2d 64 61 74 61 20 65 76 61 70 6f 72 61 74 65 5d 20 33 5d 20 73 74 72	set-match-data.evaporate].3].str
4a00	69 6e 67 2d 6d 61 74 63 68 20 22 5e 3a 64 72 6f 70 64 6f 77 6e 2d 2e 2a 24 22 20 73 79 6d 62 6f	ing-match."^:dropdown-.*$".symbo
4a20	6c 2d 6e 61 6d 65 20 64 69 73 70 6c 61 79 2d 77 61 72 6e 69 6e 67 20 74 6f 6f 6c 62 61 72 78 20	l-name.display-warning.toolbarx.
4a40	66 6f 72 6d 61 74 20 22 57 72 6f 6e 67 20 74 79 70 65 20 66 6f 72 20 76 61 6c 75 65 20 69 6e 20	format."Wrong.type.for.value.in.
4a60	70 72 6f 70 65 72 74 79 20 60 25 73 27 20 69 6e 20 64 72 6f 70 64 6f 77 6e 20 67 72 6f 75 70 22	property.`%s'.in.dropdown.group"
4a80	20 23 5b 30 20 22 5c 33 30 31 5c 33 30 30 5c 33 30 32 5c 22 5c 32 30 37 22 20 5b 56 30 20 73 65	.#[0."\301\300\302\"\207".[V0.se
4aa0	74 2d 6d 61 74 63 68 2d 64 61 74 61 20 65 76 61 70 6f 72 61 74 65 5d 20 33 5d 20 22 5e 3a 64 72	t-match-data.evaporate].3]."^:dr
4ac0	6f 70 64 6f 77 6e 2d 5c 5c 28 2e 2a 5c 5c 29 24 22 20 69 6e 74 65 72 6e 20 22 3a 22 20 31 20 3a	opdown-\\(.*\\)$".intern.":".1.:
4ae0	69 6d 61 67 65 20 22 64 72 6f 70 64 6f 77 6e 22 20 64 72 6f 70 64 6f 77 6e 20 3a 74 79 70 65 20	image."dropdown".dropdown.:type.
4b00	72 61 64 69 6f 20 3a 64 65 66 61 75 6c 74 20 3a 73 61 76 65 20 3a 76 61 72 69 61 62 6c 65 20 22	radio.:default.:save.:variable."
4b20	60 3a 73 61 76 65 27 20 70 72 6f 70 65 72 74 79 20 77 69 74 68 20 6e 6f 6e 2d 6e 69 6c 20 76 61	`:save'.property.with.non-nil.va
4b40	6c 75 65 20 73 68 6f 75 6c 64 20 62 65 20 75 73 65 64 20 6f 6e 6c 79 20 77 69 74 68 20 74 68 65	lue.should.be.used.only.with.the
4b60	20 60 3a 76 61 72 69 61 62 6c 65 27 20 70 72 6f 70 65 72 74 79 3b 20 75 73 69 6e 67 20 76 61 6c	.`:variable'.property;.using.val
4b80	75 65 20 6e 69 6c 20 66 6f 72 20 60 3a 73 61 76 65 27 2e 22 20 3a 74 69 74 6c 65 20 30 20 22 74	ue.nil.for.`:save'.".:title.0."t
4ba0	6f 6f 6c 62 61 72 78 2d 69 6e 74 65 72 6e 61 6c 2d 6d 65 6e 75 2d 76 61 72 2d 25 64 22 20 62 6f	oolbarx-internal-menu-var-%d".bo
4bc0	75 6e 64 70 20 63 75 73 74 6f 6d 2d 64 65 63 6c 61 72 65 2d 76 61 72 69 61 62 6c 65 20 22 55 73	undp.custom-declare-variable."Us
4be0	65 64 20 61 73 20 76 61 72 69 61 62 6c 65 20 6f 66 20 64 72 6f 70 64 6f 77 6e 20 6d 65 6e 75 20	ed.as.variable.of.dropdown.menu.
4c00	64 65 66 69 6e 65 64 20 77 69 74 68 20 60 74 6f 6f 6c 62 61 72 78 27 2e 22 20 74 6f 67 67 6c 65	defined.with.`toolbarx'.".toggle
4c20	20 74 20 74 6f 6f 6c 62 61 72 78 2d 6d 61 6b 65 2d 73 74 72 69 6e 67 2d 66 72 6f 6d 2d 73 79 6d	.t.toolbarx-make-string-from-sym
4c40	62 6f 6c 20 3a 69 6e 73 65 72 74 20 65 71 20 6d 65 6d 71 20 65 72 72 6f 72 20 22 25 73 20 25 73	bol.:insert.eq.memq.error."%s.%s
4c60	20 25 73 22 20 22 49 66 20 6e 6f 74 20 61 6c 6c 20 69 74 65 6d 73 20 6f 6e 20 64 72 6f 70 64 6f	.%s"."If.not.all.items.on.dropdo
4c80	77 6e 20 61 72 65 20 73 79 6d 62 6f 6c 73 2c 20 74 68 65 6e 20 61 20 73 74 72 69 6e 67 22 20 22	wn.are.symbols,.then.a.string"."
4ca0	6d 75 73 74 20 63 6f 6d 65 20 62 65 66 6f 72 65 20 65 61 63 68 20 73 65 74 20 6f 66 20 62 75 74	must.come.before.each.set.of.but
4cc0	74 6f 6e 73 3b 20 6e 6f 20 73 74 72 69 6e 67 20 66 6f 75 6e 64 22 20 22 69 6e 20 66 69 72 73 74	tons;.no.string.found"."in.first
4ce0	20 70 6f 73 69 74 69 6f 6e 22 20 74 6f 6f 6c 62 61 72 78 2d 70 72 6f 63 65 73 73 2d 67 72 6f 75	.position".toolbarx-process-grou
4d00	70 20 3a 63 6f 6d 6d 61 6e 64 20 74 6f 6f 6c 62 61 72 78 2d 6d 6f 75 6e 74 2d 70 6f 70 75 70 2d	p.:command.toolbarx-mount-popup-
4d20	6d 65 6e 75 5d 20 33 32 20 28 23 24 20 2e 20 31 36 34 33 37 29 5d 29 0a 23 40 32 36 36 20 52 65	menu].32.(#$...16437)]).#@266.Re
4d40	74 75 72 6e 20 69 6d 61 67 65 20 64 65 73 63 72 69 70 74 6f 72 20 6f 72 20 67 6c 79 70 68 20 66	turn.image.descriptor.or.glyph.f
4d60	6f 72 20 49 4d 41 47 45 2e 0a 0a 49 4d 41 47 45 20 69 73 20 73 74 72 69 6e 67 2e 20 20 55 73 75	or.IMAGE...IMAGE.is.string...Usu
4d80	61 6c 6c 79 20 49 4d 41 47 45 20 6e 65 69 74 68 65 72 20 63 6f 6e 74 61 69 6e 73 20 61 20 64 69	ally.IMAGE.neither.contains.a.di
4da0	72 65 63 74 6f 72 79 20 6e 6f 72 0a 61 6e 20 65 78 74 65 6e 73 69 6f 6e 2e 20 20 49 66 20 74 68	rectory.nor.an.extension...If.th
4dc0	65 20 65 78 74 65 6e 73 69 6f 6e 20 69 73 20 6f 6d 69 74 74 65 64 2c 20 60 78 70 6d 27 2c 20 60	e.extension.is.omitted,.`xpm',.`
4de0	78 62 6d 27 20 61 6e 64 0a 60 70 62 6d 27 20 61 72 65 20 74 72 69 65 64 2e 20 20 49 66 20 74 68	xbm'.and.`pbm'.are.tried...If.th
4e00	65 20 64 69 72 65 63 74 6f 72 79 20 69 73 20 6f 6d 69 74 74 65 64 2c 0a 60 74 6f 6f 6c 62 61 72	e.directory.is.omitted,.`toolbar
4e20	78 2d 69 6d 61 67 65 2d 70 61 74 68 27 20 69 73 20 73 65 61 72 63 68 65 64 2e 0a 0a 28 66 6e 20	x-image-path'.is.searched...(fn.
4e40	49 4d 41 47 45 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 74 6f 6f 6c 62 61 72 78 2d 66 69 6e 64	IMAGE)..(defalias.'toolbarx-find
4e60	2d 69 6d 61 67 65 20 23 5b 32 35 37 20 22 5c 33 30 31 5c 33 30 32 5c 32 31 31 5c 32 30 33 1c 00	-image.#[257."\301\302\211\203..
4e80	5c 32 31 31 40 02 5c 32 30 34 15 00 5c 33 30 33 04 02 50 5c 33 30 34 08 23 5c 32 36 32 03 01 41	\211@.\204..\303..P\304.#\262..A
4ea0	5c 32 36 36 5c 32 30 32 5c 32 30 32 02 00 5c 32 31 30 5c 32 31 31 5c 32 30 33 25 00 5c 33 30 35	\266\202\202..\210\211\203%.\305
4ec0	01 21 5c 32 30 37 5c 33 30 36 5c 33 30 37 5c 33 31 30 5c 33 31 31 05 5c 33 31 32 50 46 5c 33 30	.!\207\306\307\310\311.\312PF\30
4ee0	37 5c 33 31 33 5c 33 31 31 06 06 5c 33 31 34 50 46 5c 33 30 37 5c 33 31 35 5c 33 31 31 06 07 5c	7\313\311..\314PF\307\315\311..\
4f00	33 31 36 50 46 45 21 5c 32 30 37 22 20 5b 74 6f 6f 6c 62 61 72 78 2d 69 6d 61 67 65 2d 70 61 74	316PFE!\207".[toolbarx-image-pat
4f20	68 20 6e 69 6c 20 28 22 22 20 22 2e 78 70 6d 22 20 22 2e 78 62 6d 22 20 22 2e 70 62 6d 22 29 20	h.nil.("".".xpm".".xbm".".pbm").
4f40	6c 6f 63 61 74 65 2d 6c 69 62 72 61 72 79 20 74 20 63 72 65 61 74 65 2d 69 6d 61 67 65 20 66 69	locate-library.t.create-image.fi
4f60	6e 64 2d 69 6d 61 67 65 20 3a 74 79 70 65 20 78 70 6d 20 3a 66 69 6c 65 20 22 2e 78 70 6d 22 20	nd-image.:type.xpm.:file.".xpm".
4f80	78 62 6d 20 22 2e 78 62 6d 22 20 70 62 6d 20 22 2e 70 62 6d 22 5d 20 31 30 20 28 23 24 20 2e 20	xbm.".xbm".pbm.".pbm"].10.(#$...
4fa0	31 39 37 37 34 29 5d 29 0a 23 40 31 33 34 20 53 74 6f 72 65 20 74 68 65 20 6c 69 73 74 20 6f 66	19774)]).#@134.Store.the.list.of
4fc0	20 70 72 6f 63 65 73 73 65 64 20 62 75 74 74 6f 6e 73 2c 20 75 73 65 64 20 62 79 20 60 74 6f 6f	.processed.buttons,.used.by.`too
4fe0	6c 62 61 72 78 2d 72 65 66 72 65 73 68 27 2e 0a 54 68 69 73 20 76 61 72 69 61 62 6c 65 20 63 61	lbarx-refresh'..This.variable.ca
5000	6e 20 73 74 6f 72 65 20 64 69 66 66 65 72 65 6e 74 20 76 61 6c 75 65 73 20 66 6f 72 20 74 68 65	n.store.different.values.for.the
5020	20 64 69 66 66 65 72 65 6e 74 20 62 75 66 66 65 72 73 2e 1f 0a 28 64 65 66 76 61 72 20 74 6f 6f	.different.buffers...(defvar.too
5040	6c 62 61 72 78 2d 69 6e 74 65 72 6e 61 6c 2d 62 75 74 74 6f 6e 2d 73 77 69 74 63 68 65 73 20 6e	lbarx-internal-button-switches.n
5060	69 6c 20 28 23 24 20 2e 20 32 30 33 39 39 29 29 0a 23 40 38 31 34 20 49 6e 73 65 72 74 20 61 20	il.(#$...20399)).#@814.Insert.a.
5080	62 75 74 74 6f 6e 20 77 68 65 72 65 20 42 55 54 54 4f 4e 20 69 73 20 69 74 73 20 64 65 73 63 72	button.where.BUTTON.is.its.descr
50a0	69 70 74 69 6f 6e 2e 0a 55 53 45 44 2d 4b 45 59 53 20 73 68 6f 75 6c 64 20 62 65 20 61 20 6c 69	iption..USED-KEYS.should.be.a.li
50c0	73 74 20 6f 66 20 73 79 6d 62 6f 6c 73 2c 20 77 68 65 72 65 20 74 68 65 20 66 69 72 73 74 20 65	st.of.symbols,.where.the.first.e
50e0	6c 65 6d 65 6e 74 20 69 73 0a 60 3a 75 73 65 64 2d 73 79 6d 62 6f 6c 73 27 2e 20 20 54 68 69 73	lement.is.`:used-symbols'...This
5100	20 6c 69 73 74 20 73 68 6f 75 6c 64 20 73 74 6f 72 65 20 74 68 65 20 73 79 6d 62 6f 6c 73 20 6f	.list.should.store.the.symbols.o
5120	66 20 74 68 65 0a 62 75 74 74 6f 6e 73 20 61 6c 72 65 61 64 79 20 69 6e 73 65 72 74 65 64 2e 20	f.the.buttons.already.inserted..
5140	20 54 68 69 73 20 6c 69 73 74 20 69 73 20 63 68 61 6e 67 65 64 20 62 79 20 73 69 64 65 20 65 66	.This.list.is.changed.by.side.ef
5160	66 65 63 74 2e 0a 4b 45 59 4d 41 50 20 69 73 20 74 68 65 20 6b 65 79 6d 61 70 20 77 68 65 72 65	fect..KEYMAP.is.the.keymap.where
5180	20 74 68 65 20 6d 65 6e 75 2d 69 74 65 6d 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 74 6f 20	.the.menu-item.corresponding.to.
51a0	74 68 65 0a 74 6f 6f 6c 2d 62 61 6c 20 62 75 74 74 6f 6e 20 69 73 20 67 6f 69 6e 67 20 74 6f 20	the.tool-bal.button.is.going.to.
51c0	62 65 20 69 6e 73 65 72 74 65 64 2e 20 20 49 6e 73 65 72 74 69 6f 6e 20 69 73 20 6d 61 64 65 20	be.inserted...Insertion.is.made.
51e0	69 6e 0a 74 68 65 20 65 6e 64 20 6f 66 20 4b 45 59 4d 41 50 2e 0a 0a 42 55 54 54 4f 4e 20 73 68	in.the.end.of.KEYMAP...BUTTON.sh
5200	6f 75 6c 64 20 62 65 20 61 20 6c 69 73 74 20 6f 66 20 66 6f 72 6d 20 28 53 59 4d 42 4f 4c 20 2e	ould.be.a.list.of.form.(SYMBOL..
5220	20 50 52 4f 50 2d 4c 49 53 54 29 2e 20 20 53 59 4d 42 4f 4c 20 69 73 0a 61 20 73 79 6d 62 6f 6c	.PROP-LIST)...SYMBOL.is.a.symbol
5240	20 74 68 61 74 20 22 6e 61 6d 65 73 22 20 74 68 69 73 20 62 75 74 74 6f 6e 2e 20 20 50 52 4f 50	.that."names".this.button...PROP
5260	2d 4c 49 53 54 20 69 73 20 61 20 6c 69 73 74 20 69 6e 20 74 68 65 0a 66 6f 72 6d 61 74 20 28 50	-LIST.is.a.list.in.the.format.(P
5280	52 4f 50 20 56 41 4c 20 2e 2e 2e 20 50 52 4f 50 20 56 41 4c 29 2e 20 20 54 68 65 20 73 75 70 70	ROP.VAL.....PROP.VAL)...The.supp
52a0	6f 72 74 65 64 20 70 72 6f 70 65 72 74 69 65 73 20 61 72 65 0a 60 3a 69 6d 61 67 65 27 2c 20 60	orted.properties.are.`:image',.`
52c0	3a 63 6f 6d 6d 61 6e 64 27 2c 20 60 3a 61 70 70 65 6e 64 2d 63 6f 6d 6d 61 6e 64 27 2c 20 60 3a	:command',.`:append-command',.`:
52e0	70 72 65 70 65 6e 64 2d 63 6f 6d 6d 61 6e 64 27 2c 0a 60 3a 68 65 6c 70 27 2c 20 60 3a 65 6e 61	prepend-command',.`:help',.`:ena
5300	62 6c 65 27 2c 20 60 3a 76 69 73 69 62 6c 65 27 2c 20 60 3a 62 75 74 74 6f 6e 27 2c 20 61 6e 64	ble',.`:visible',.`:button',.and
5320	20 60 3a 69 6e 73 65 72 74 27 2e 0a 46 6f 72 20 61 20 64 65 73 63 72 69 70 74 69 6f 6e 20 6f 66	.`:insert'..For.a.description.of
5340	20 70 72 6f 70 65 72 74 69 65 73 2c 20 73 65 65 20 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 6f	.properties,.see.documentation.o
5360	66 0a 66 75 6e 63 74 69 6f 6e 20 60 74 6f 6f 6c 62 61 72 2d 69 6e 73 74 61 6c 6c 2d 74 6f 6f 6c	f.function.`toolbar-install-tool
5380	62 61 72 27 2e 0a 0a 28 66 6e 20 42 55 54 54 4f 4e 20 55 53 45 44 2d 4b 45 59 53 20 4b 45 59 4d	bar'...(fn.BUTTON.USED-KEYS.KEYM
53a0	41 50 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 74 6f 6f 6c 62 61 72 78 2d 65 6d 61 63 73 2d 61	AP)..(defalias.'toolbarx-emacs-a
53c0	64 64 2d 62 75 74 74 6f 6e 20 23 5b 37 37 31 20 22 02 40 02 5c 32 30 35 08 00 02 41 5c 33 30 31	dd-button.#[771.".@.\205...A\301
53e0	5c 32 31 31 5c 32 31 31 08 40 5c 32 31 31 5c 32 30 33 5c 32 32 35 00 5c 32 31 31 40 5c 32 31 31	\211\211.@\211\203\225.\211@\211
5400	40 06 5c 6e 3e 5c 32 36 32 03 02 5c 32 30 33 5c 32 31 36 00 5c 32 31 31 41 41 5c 32 30 33 75 00	@.\n>\262..\203\216.\211AA\203u.
5420	02 41 40 40 5c 33 30 32 3d 5c 32 30 33 75 00 5c 32 31 31 41 41 43 03 41 40 41 5c 32 31 31 5c 32	.A@@\302=\203u.\211AAC.A@A\211\2
5440	30 33 56 00 5c 32 31 31 40 03 41 40 01 21 5c 32 36 32 07 06 06 40 5c 32 30 33 4f 00 06 06 41 03	03V.\211@.A@.!\262...@\203O...A.
5460	42 5c 32 36 32 03 01 41 5c 32 36 36 5c 32 30 32 5c 32 30 32 35 00 5c 32 31 30 5c 32 31 31 5c 32	B\262..A\266\202\2025.\210\211\2
5480	33 37 5c 32 36 32 01 5c 32 31 31 47 5c 33 30 33 3d 5c 32 30 33 67 00 5c 32 31 31 41 40 5c 32 36	37\262.\211G\303=\203g.\211A@\26
54a0	32 01 5c 33 30 34 02 40 02 44 06 07 5c 22 5c 32 36 32 06 5c 32 31 30 5c 32 30 32 5c 32 31 36 00	2.\304.@.D..\"\262.\210\202\216.
54c0	5c 32 31 31 41 40 03 41 40 21 5c 32 36 32 04 03 40 5c 32 30 33 5c 32 31 36 00 5c 33 30 34 01 40	\211A@.A@!\262..@\203\216.\304.@
54e0	05 41 44 06 06 5c 22 5c 32 36 32 05 01 41 5c 32 36 36 5c 32 30 32 5c 32 30 32 0d 00 03 5c 32 36	.AD..\"\262..A\266\202\202...\26
5500	32 01 5c 32 36 36 5c 32 30 33 5c 33 30 35 01 3e 3f 5c 32 30 36 5c 32 35 31 00 5c 33 30 36 5c 33	2.\266\203\305.>?\206\251.\306\3
5520	30 35 02 3e 41 40 5c 33 30 37 5c 22 5c 32 31 31 5c 32 30 33 5c 33 30 31 01 5c 33 31 30 02 3e 41	05.>A@\307\"\211\203\301.\310.>A
5540	40 5c 33 31 30 03 3e 5c 32 30 35 5c 33 37 30 00 5c 32 31 31 3b 5c 32 30 33 5c 33 30 33 00 5c 33	@\310.>\205\370.\211;\203\303.\3
5560	31 31 01 21 5c 32 30 32 5c 33 37 30 00 5c 32 31 31 3a 5c 32 30 33 5c 33 32 33 00 5c 32 31 31 40	11.!\202\370.\211:\203\323.\211@
5580	5c 33 31 32 3d 5c 32 30 33 5c 33 32 33 00 5c 32 31 31 5c 32 30 32 5c 33 37 30 00 5c 32 31 31 39	\312=\203\323.\211\202\370.\2119
55a0	5c 32 30 33 5c 33 36 31 00 5c 33 31 33 01 21 5c 32 30 33 5c 33 36 31 00 5c 32 31 31 4a 3a 5c 32	\203\361.\313.!\203\361.\211J:\2
55c0	30 33 5c 33 36 31 00 5c 32 31 31 4a 40 5c 33 31 32 3d 5c 32 30 33 5c 33 36 31 00 5c 32 31 31 4a	03\361.\211J@\312=\203\361.\211J
55e0	5c 32 30 32 5c 33 37 30 00 5c 33 31 34 5c 33 31 35 5c 33 31 36 5c 33 31 37 04 5c 22 5c 22 5c 33	\202\370.\314\315\316\317.\"\"\3
5600	32 30 04 3e 41 40 5c 33 32 31 05 3e 41 40 5c 33 32 32 06 06 3e 41 40 02 5c 32 30 34 14 01 01 5c	20.>A@\321.>A@\322..>A@.\204...\
5620	32 30 34 14 01 5c 32 31 31 5c 32 30 35 19 01 5c 33 32 33 03 02 04 23 5c 32 36 36 5c 32 30 33 5c	204..\211\205..\323...#\266\203\
5640	33 32 34 05 3e 5c 33 32 34 06 06 3e 41 40 42 5c 33 32 35 06 06 3e 5c 33 32 35 06 07 3e 41 40 42	324.>\324..>A@B\325..>\325..>A@B
5660	5c 33 32 36 06 07 3e 5c 33 32 36 06 08 3e 41 40 42 5c 33 32 37 06 08 3e 5c 33 32 37 06 09 3e 41	\326..>\326..>A@B\327..>\327..>A
5680	40 42 06 5c 6e 5c 33 33 30 3d 5c 32 30 33 51 01 5c 33 33 31 5c 32 30 32 5c 32 31 31 01 5c 33 30	@B.\n\330=\203Q.\331\202\211.\30
56a0	34 5c 33 33 32 5c 33 33 33 06 0d 21 06 07 5c 33 31 30 06 5c 6e 5c 32 35 37 05 05 40 5c 32 30 35	4\332\333..!..\310.\n\257..@\205
56c0	68 01 5c 33 32 34 06 06 41 44 05 40 5c 32 30 35 72 01 5c 33 32 35 06 06 41 44 05 40 5c 32 30 35	h.\324..AD.@\205r.\325..AD.@\205
56e0	7c 01 5c 33 32 36 06 06 41 44 05 40 5c 32 30 35 5c 32 30 36 01 5c 33 32 37 06 06 41 44 5c 33 33	|.\326..AD.@\205\206.\327..AD\33
5700	34 26 06 5c 33 33 35 06 5c 66 5c 32 31 31 06 0d 3e 5c 32 30 33 5c 32 34 34 01 01 54 5c 32 36 32	4&.\335.\f\211..>\203\244..T\262
5720	02 5c 33 33 36 5c 33 33 37 5c 33 34 30 06 10 05 23 21 5c 32 36 32 01 5c 32 30 32 5c 32 31 34 01	.\336\337\340...#!\262.\202\214.
5740	5c 32 36 32 01 06 07 5c 32 30 33 5c 32 37 37 01 06 06 5c 32 30 33 5c 32 37 37 01 5c 32 31 31 06	\262...\203\277...\203\277.\211.
5760	5c 66 42 5c 32 36 32 5c 66 5c 33 34 31 06 0e 5c 33 31 35 03 21 04 23 5c 32 31 30 5c 32 36 36 09	\fB\262\f\341..\315.!.#\210\266.
5780	05 5c 32 30 35 5c 33 31 30 01 05 03 5c 32 34 31 5c 32 30 37 22 20 5b 74 6f 6f 6c 62 61 72 78 2d	.\205\310...\241\207".[toolbarx-
57a0	62 75 74 74 6f 6e 2d 70 72 6f 70 73 20 6e 69 6c 20 3a 61 64 64 2d 76 61 6c 75 65 2d 6c 69 73 74	button-props.nil.:add-value-list
57c0	20 32 20 61 70 70 65 6e 64 20 3a 69 6e 73 65 72 74 20 65 76 61 6c 20 74 20 3a 69 6d 61 67 65 20	.2.append.:insert.eval.t.:image.
57e0	74 6f 6f 6c 62 61 72 78 2d 66 69 6e 64 2d 69 6d 61 67 65 20 69 6d 61 67 65 20 62 6f 75 6e 64 70	toolbarx-find-image.image.boundp
5800	20 61 70 70 6c 79 20 76 65 63 74 6f 72 20 6d 61 70 63 61 72 20 23 5b 32 35 37 20 22 5c 32 31 31	.apply.vector.mapcar.#[257."\211
5820	3b 5c 32 30 33 09 00 5c 33 30 30 01 21 5c 32 30 37 5c 32 30 37 22 20 5b 74 6f 6f 6c 62 61 72 78	;\203..\300.!\207\207".[toolbarx
5840	2d 66 69 6e 64 2d 69 6d 61 67 65 5d 20 33 20 22 5c 6e 5c 6e 28 66 6e 20 49 4d 47 29 22 5d 20 3a	-find-image].3."\n\n(fn.IMG)"].:
5860	63 6f 6d 6d 61 6e 64 20 3a 61 70 70 65 6e 64 2d 63 6f 6d 6d 61 6e 64 20 3a 70 72 65 70 65 6e 64	command.:append-command.:prepend
5880	2d 63 6f 6d 6d 61 6e 64 20 74 6f 6f 6c 62 61 72 78 2d 6d 61 6b 65 2d 63 6f 6d 6d 61 6e 64 20 3a	-command.toolbarx-make-command.:
58a0	68 65 6c 70 20 3a 65 6e 61 62 6c 65 20 3a 76 69 73 69 62 6c 65 20 3a 62 75 74 74 6f 6e 20 73 65	help.:enable.:visible.:button.se
58c0	70 61 72 61 74 6f 72 20 28 6d 65 6e 75 2d 69 74 65 6d 20 22 2d 2d 22 29 20 6d 65 6e 75 2d 69 74	parator.(menu-item."--").menu-it
58e0	65 6d 20 74 6f 6f 6c 62 61 72 78 2d 6d 61 6b 65 2d 73 74 72 69 6e 67 2d 66 72 6f 6d 2d 73 79 6d	em.toolbarx-make-string-from-sym
5900	62 6f 6c 20 28 3a 76 65 72 74 2d 6f 6e 6c 79 20 74 29 20 30 20 69 6e 74 65 72 6e 20 66 6f 72 6d	bol.(:vert-only.t).0.intern.form
5920	61 74 20 22 25 73 2d 25 64 22 20 64 65 66 69 6e 65 2d 6b 65 79 2d 61 66 74 65 72 5d 20 32 32 20	at."%s-%d".define-key-after].22.
5940	28 23 24 20 2e 20 32 30 35 39 39 29 5d 29 0a 23 40 33 39 36 20 50 72 6f 63 65 73 73 20 53 57 49	(#$...20599)]).#@396.Process.SWI
5960	54 43 48 45 53 2c 20 69 6e 73 65 72 74 69 6e 67 20 62 75 74 74 6f 6e 73 20 69 6e 20 60 74 6f 6f	TCHES,.inserting.buttons.in.`too
5980	6c 2d 62 61 72 2d 6d 61 70 27 2e 0a 49 66 20 61 20 62 75 74 74 6f 6e 20 69 73 20 61 63 74 75 61	l-bar-map'..If.a.button.is.actua
59a0	6c 6c 79 20 61 20 60 3a 69 6e 73 65 72 74 27 20 63 6c 61 75 73 65 20 67 72 6f 75 70 20 28 69 66	lly.a.`:insert'.clause.group.(if
59c0	20 60 63 61 72 27 20 69 73 0a 60 3a 69 6e 73 65 72 74 27 29 20 61 6e 64 20 65 76 61 6c 75 61 74	.`car'.is.`:insert').and.evaluat
59e0	69 6f 6e 20 6f 66 20 60 63 64 72 27 20 79 69 65 6c 64 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 70 72 6f	ion.of.`cdr'.yields.non-nil,.pro
5a00	63 65 73 73 20 60 63 64 64 72 27 0a 72 65 63 75 72 73 69 76 65 6c 79 20 61 73 20 53 57 49 54 43	cess.`cddr'.recursively.as.SWITC
5a20	48 45 53 2e 20 20 55 53 45 44 2d 4b 45 59 53 20 69 73 20 61 20 6c 69 73 74 20 77 68 69 63 68 20	HES...USED-KEYS.is.a.list.which.
5a40	60 63 61 72 27 20 69 73 0a 60 3a 75 73 65 64 2d 73 79 6d 62 6f 6c 73 27 20 61 6e 64 20 77 68 69	`car'.is.`:used-symbols'.and.whi
5a60	63 68 20 60 63 64 72 27 20 69 73 20 61 20 6c 69 73 74 20 6f 66 20 73 79 6d 62 6f 6c 73 20 74 68	ch.`cdr'.is.a.list.of.symbols.th
5a80	61 74 20 68 61 76 65 20 61 6c 72 65 61 64 79 0a 62 65 65 6e 20 75 73 65 64 20 61 73 20 6b 65 79	at.have.already.been.used.as.key
5aa0	73 20 69 6e 20 74 68 65 20 6b 65 79 6d 61 70 20 60 74 6f 6f 6c 2d 62 61 72 2d 6d 61 70 27 2e 0a	s.in.the.keymap.`tool-bar-map'..
5ac0	0a 28 66 6e 20 53 57 49 54 43 48 45 53 20 55 53 45 44 2d 4b 45 59 53 20 4b 45 59 4d 41 50 29 1f	.(fn.SWITCHES.USED-KEYS.KEYMAP).
5ae0	0a 28 64 65 66 61 6c 69 61 73 20 27 74 6f 6f 6c 62 61 72 78 2d 65 6d 61 63 73 2d 72 65 66 72 65	.(defalias.'toolbarx-emacs-refre
5b00	73 68 2d 70 72 6f 63 65 73 73 2d 62 75 74 74 6f 6e 2d 6f 72 2d 69 6e 73 65 72 74 2d 6c 69 73 74	sh-process-button-or-insert-list
5b20	20 23 5b 37 37 31 20 22 02 5c 32 31 31 5c 32 30 35 2f 00 5c 32 31 31 40 5c 32 31 31 40 5c 33 30	.#[771.".\211\205/.\211@\211@\30
5b40	30 3d 5c 32 30 33 5c 22 00 5c 33 30 31 01 41 40 5c 33 30 32 5c 22 5c 32 30 33 28 00 5c 33 30 33	0=\203\".\301.A@\302\"\203(.\303
5b60	01 41 41 05 05 23 5c 32 31 30 5c 32 30 32 28 00 5c 33 30 34 01 05 05 23 5c 32 31 30 01 41 5c 32	.AA..#\210\202(.\304...#\210.A\2
5b80	36 36 5c 32 30 32 5c 32 30 32 01 00 5c 32 30 37 22 20 5b 3a 69 6e 73 65 72 74 20 65 76 61 6c 20	66\202\202..\207".[:insert.eval.
5ba0	74 20 74 6f 6f 6c 62 61 72 78 2d 65 6d 61 63 73 2d 72 65 66 72 65 73 68 2d 70 72 6f 63 65 73 73	t.toolbarx-emacs-refresh-process
5bc0	2d 62 75 74 74 6f 6e 2d 6f 72 2d 69 6e 73 65 72 74 2d 6c 69 73 74 20 74 6f 6f 6c 62 61 72 78 2d	-button-or-insert-list.toolbarx-
5be0	65 6d 61 63 73 2d 61 64 64 2d 62 75 74 74 6f 6e 5d 20 39 20 28 23 24 20 2e 20 32 32 38 36 39 29	emacs-add-button].9.(#$...22869)
5c00	5d 29 0a 23 40 31 39 35 20 52 65 66 72 65 73 68 20 61 6e 64 20 72 65 64 72 61 77 20 74 68 65 20	]).#@195.Refresh.and.redraw.the.
5c20	74 6f 6f 6c 62 61 72 20 69 6e 20 45 6d 61 63 73 2e 0a 49 66 20 47 4c 4f 42 41 4c 2d 46 4c 41 47	toolbar.in.Emacs..If.GLOBAL-FLAG
5c40	20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 74 68 65 20 64 65 66 61 75 6c 74 20 76 61 6c 75 65 20 6f	.is.non-nil,.the.default.value.o
5c60	66 20 74 6f 6f 6c 62 61 72 20 73 77 69 74 63 68 65 73 0a 69 73 20 75 73 65 64 20 61 6e 64 20 74	f.toolbar.switches.is.used.and.t
5c80	68 65 20 64 65 66 61 75 6c 74 20 76 61 6c 75 65 20 6f 66 20 60 74 6f 6f 6c 62 61 72 78 2d 6d 61	he.default.value.of.`toolbarx-ma
5ca0	70 27 20 69 73 20 63 68 61 6e 67 65 64 2e 0a 0a 28 66 6e 20 26 6f 70 74 69 6f 6e 61 6c 20 47 4c	p'.is.changed...(fn.&optional.GL
5cc0	4f 42 41 4c 2d 46 4c 41 47 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 74 6f 6f 6c 62 61 72 78 2d	OBAL-FLAG)..(defalias.'toolbarx-
5ce0	65 6d 61 63 73 2d 72 65 66 72 65 73 68 20 23 5b 32 35 36 20 22 5c 32 31 31 5c 32 30 33 14 00 5c	emacs-refresh.#[256."\211\203..\
5d00	33 30 32 5c 33 30 30 21 5c 32 30 33 10 00 5c 33 30 33 5c 33 30 30 21 5c 32 30 32 15 00 08 5c 32	302\300!\203..\303\300!\202...\2
5d20	30 32 15 00 08 5c 33 30 34 5c 33 30 35 44 5c 33 30 36 20 5c 33 30 37 03 03 03 23 5c 32 31 30 03	02...\304\305D\306.\307...#\210.
5d40	5c 32 30 33 29 00 5c 33 31 30 5c 33 30 31 02 5c 22 5c 32 30 37 5c 32 31 31 5c 32 31 31 11 5c 32	\203).\310\301.\"\207\211\211.\2
5d60	30 37 22 20 5b 74 6f 6f 6c 62 61 72 78 2d 69 6e 74 65 72 6e 61 6c 2d 62 75 74 74 6f 6e 2d 73 77	07".[toolbarx-internal-button-sw
5d80	69 74 63 68 65 73 20 74 6f 6f 6c 2d 62 61 72 2d 6d 61 70 20 64 65 66 61 75 6c 74 2d 62 6f 75 6e	itches.tool-bar-map.default-boun
5da0	64 70 20 64 65 66 61 75 6c 74 2d 76 61 6c 75 65 20 3a 75 73 65 64 2d 73 79 6d 62 6f 6c 73 20 6e	dp.default-value.:used-symbols.n
5dc0	69 6c 20 6d 61 6b 65 2d 73 70 61 72 73 65 2d 6b 65 79 6d 61 70 20 74 6f 6f 6c 62 61 72 78 2d 65	il.make-sparse-keymap.toolbarx-e
5de0	6d 61 63 73 2d 72 65 66 72 65 73 68 2d 70 72 6f 63 65 73 73 2d 62 75 74 74 6f 6e 2d 6f 72 2d 69	macs-refresh-process-button-or-i
5e00	6e 73 65 72 74 2d 6c 69 73 74 20 73 65 74 2d 64 65 66 61 75 6c 74 5d 20 38 20 28 23 24 20 2e 20	nsert-list.set-default].8.(#$...
5e20	32 33 35 36 31 29 5d 29 0a 23 40 31 33 34 20 52 65 64 72 61 77 20 74 68 65 20 74 6f 6f 6c 62 61	23561)]).#@134.Redraw.the.toolba
5e40	72 2c 20 70 65 76 69 6f 75 73 6c 79 20 69 6e 73 74 61 6c 6c 65 64 20 77 69 74 68 20 60 74 6f 6f	r,.peviously.installed.with.`too
5e60	6c 62 61 72 78 27 2e 0a 46 6f 72 63 65 20 67 6c 6f 62 61 6c 20 72 65 66 72 65 73 68 20 69 66 20	lbarx'..Force.global.refresh.if.
5e80	47 4c 4f 42 41 4c 2d 46 4c 41 47 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2e 0a 0a 28 66 6e 20 26 6f 70	GLOBAL-FLAG.is.non-nil...(fn.&op
5ea0	74 69 6f 6e 61 6c 20 47 4c 4f 42 41 4c 2d 46 4c 41 47 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27	tional.GLOBAL-FLAG)..(defalias.'
5ec0	74 6f 6f 6c 62 61 72 78 2d 72 65 66 72 65 73 68 20 23 5b 32 35 36 20 22 5c 33 30 30 01 21 5c 32	toolbarx-refresh.#[256."\300.!\2
5ee0	30 37 22 20 5b 74 6f 6f 6c 62 61 72 78 2d 65 6d 61 63 73 2d 72 65 66 72 65 73 68 5d 20 33 20 28	07".[toolbarx-emacs-refresh].3.(
5f00	23 24 20 2e 20 32 34 31 31 31 29 20 22 50 22 5d 29 0a 23 40 39 33 32 31 20 49 6e 73 74 61 6c 6c	#$...24111)."P"]).#@9321.Install
5f20	20 74 6f 6f 6c 62 61 72 20 62 75 74 74 6f 6e 73 20 67 69 76 65 6e 20 69 6e 20 42 55 54 54 4f 4e	.toolbar.buttons.given.in.BUTTON
5f40	53 2e 0a 42 75 74 74 6f 6e 20 70 72 6f 70 65 72 74 69 65 73 20 61 72 65 20 6f 70 74 69 6f 6e 61	S..Button.properties.are.optiona
5f60	6c 6c 79 20 67 69 76 65 6e 20 69 6e 20 4d 45 41 4e 49 4e 47 2d 41 4c 49 53 54 2e 20 20 49 66 0a	lly.given.in.MEANING-ALIST...If.
5f80	47 4c 4f 42 41 4c 2d 46 4c 41 47 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 74 6f 6f 6c 62 61 72 20	GLOBAL-FLAG.is.non-nil,.toolbar.
5fa0	69 73 20 69 6e 73 74 61 6c 6c 65 64 20 67 6c 6f 62 61 6c 6c 79 20 28 6f 6e 20 65 76 65 72 79 0a	is.installed.globally.(on.every.
5fc0	62 75 66 66 65 72 20 74 68 61 74 20 64 6f 65 73 20 6e 6f 74 20 68 61 76 65 20 61 20 74 6f 6f 6c	buffer.that.does.not.have.a.tool
5fe0	62 61 72 20 73 65 74 20 6c 6f 63 61 6c 6c 79 29 2e 20 20 42 55 54 54 4f 4e 53 20 69 73 20 61 0a	bar.set.locally)...BUTTONS.is.a.
6000	6c 69 73 74 20 6f 66 20 66 6f 72 6d 61 74 0a 20 20 28 45 4c 45 4d 20 2e 2e 2e 20 45 4c 45 4d 20	list.of.format...(ELEM.....ELEM.
6020	2e 20 50 52 4f 50 53 29 2c 0a 77 68 65 72 65 20 65 61 63 68 20 45 4c 45 4d 20 69 73 20 65 69 74	..PROPS),.where.each.ELEM.is.eit
6040	68 65 72 0a 0a 20 2d 20 61 20 6c 69 73 74 20 69 6e 20 74 68 65 20 73 61 6d 65 20 66 6f 72 6d 61	her...-.a.list.in.the.same.forma
6060	74 20 6f 64 20 42 55 54 54 4f 4e 53 2c 20 77 68 69 63 68 20 69 73 20 67 6f 69 6e 67 20 74 6f 20	t.od.BUTTONS,.which.is.going.to.
6080	62 65 0a 20 20 20 72 65 66 65 72 65 64 20 61 73 20 61 20 2a 67 72 6f 75 70 2a 3b 20 67 72 6f 75	be....refered.as.a.*group*;.grou
60a0	70 73 20 61 72 65 20 75 73 65 64 20 74 6f 20 64 69 73 74 72 69 62 75 74 65 20 70 72 6f 70 65 72	ps.are.used.to.distribute.proper
60c0	74 69 65 73 0a 20 20 20 72 65 63 75 72 73 69 76 65 6c 79 20 74 6f 20 69 74 73 20 65 6c 65 6d 65	ties....recursively.to.its.eleme
60e0	6e 74 73 3b 20 74 68 65 72 65 20 61 72 65 20 67 72 6f 75 70 73 20 77 69 74 68 20 73 70 65 63 69	nts;.there.are.groups.with.speci
6100	61 6c 0a 20 20 20 66 6f 72 6d 61 74 20 66 6f 72 20 73 70 65 63 69 61 6c 20 70 75 72 70 6f 73 65	al....format.for.special.purpose
6120	3a 20 2a 64 72 6f 70 64 6f 77 6e 20 67 72 6f 75 70 73 2a 20 61 6e 64 20 61 6c 73 6f 20 2a 65 76	:.*dropdown.groups*.and.also.*ev
6140	61 6c 0a 20 20 20 67 72 6f 75 70 73 2a 2e 0a 0a 20 2d 20 61 20 73 79 6d 62 6f 6c 2c 20 77 68 69	al....groups*....-.a.symbol,.whi
6160	63 68 20 63 6f 75 6c 64 20 62 65 20 61 73 73 6f 63 69 61 74 65 64 20 69 6e 20 4d 45 41 4e 49 4e	ch.could.be.associated.in.MEANIN
6180	47 2d 41 4c 49 53 54 20 77 69 74 68 20 61 0a 20 20 20 6c 69 73 74 20 6f 66 20 62 75 74 74 6f 6e	G-ALIST.with.a....list.of.button
61a0	20 70 72 6f 70 65 72 74 69 65 73 20 28 73 79 6d 62 6f 6c 20 2b 20 70 72 6f 70 65 72 74 69 65 73	.properties.(symbol.+.properties
61c0	20 3d 20 61 20 2a 62 75 74 74 6f 6e 2a 29 0a 20 20 20 6f 72 20 61 73 73 6f 63 69 61 74 65 64 20	.=.a.*button*)....or.associated.
61e0	74 6f 20 61 20 73 70 65 63 69 61 6c 20 6b 69 6e 64 20 6f 66 20 67 72 6f 75 70 20 28 61 6e 20 2a	to.a.special.kind.of.group.(an.*
6200	61 6c 69 61 73 20 67 72 6f 75 70 2a 29 2e 0a 0a 4d 65 61 6e 69 6e 67 20 61 6c 69 73 74 0a 3d 3d	alias.group*)...Meaning.alist.==
6220	3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 0a 4d 45 41 4e 49 4e 47 2d 41 4c 49 53 54 20 69 73 20 61 20	===========..MEANING-ALIST.is.a.
6240	6c 69 73 74 20 77 68 65 72 65 20 65 61 63 68 20 65 6c 65 6d 65 6e 74 20 69 73 20 69 6e 20 6f 6e	list.where.each.element.is.in.on
6260	65 20 6f 66 20 74 68 65 0a 66 6f 72 6d 61 74 73 20 28 53 59 4d 42 20 2e 20 42 55 54 54 4f 4e 2d	e.of.the.formats.(SYMB...BUTTON-
6280	50 52 4f 50 53 2d 4c 49 53 54 29 20 6f 72 20 28 53 59 4d 42 20 2e 20 20 41 4c 49 41 53 2d 47 52	PROPS-LIST).or.(SYMB....ALIAS-GR
62a0	4f 55 50 29 2e 0a 42 55 54 54 4f 4e 2d 50 52 4f 50 53 2d 4c 49 53 54 20 69 73 20 61 20 6c 69 73	OUP)..BUTTON-PROPS-LIST.is.a.lis
62c0	74 20 69 6e 20 6f 6e 65 20 6f 66 20 74 68 65 20 66 6f 72 6d 61 74 73 0a 20 20 28 49 4d 41 47 45	t.in.one.of.the.formats...(IMAGE
62e0	20 43 4f 4d 4d 41 4e 44 20 50 52 4f 50 20 56 41 4c 20 50 52 4f 50 20 56 41 4c 20 2e 2e 2e 20 50	.COMMAND.PROP.VAL.PROP.VAL.....P
6300	52 4f 50 20 56 41 4c 29 20 20 6f 72 0a 20 20 28 50 52 4f 50 20 56 41 4c 20 50 52 4f 50 20 56 41	ROP.VAL)..or...(PROP.VAL.PROP.VA
6320	4c 20 2e 2e 2e 20 50 52 4f 50 20 56 41 4c 29 2e 0a 54 68 65 20 49 4d 41 47 45 20 69 73 20 67 6f	L.....PROP.VAL)..The.IMAGE.is.go
6340	69 6e 67 20 74 6f 20 62 65 20 75 73 65 64 20 61 73 20 74 68 65 20 60 3a 69 6d 61 67 65 27 20 70	ing.to.be.used.as.the.`:image'.p
6360	72 6f 70 65 72 74 79 20 6f 66 20 74 68 65 0a 62 75 74 74 6f 6e 20 28 73 65 65 20 62 75 74 74 6f	roperty.of.the.button.(see.butto
6380	6e 20 70 72 6f 70 65 72 74 69 65 73 20 62 65 6c 6c 6f 77 29 2c 20 61 6e 64 20 43 4f 4d 4d 41 4e	n.properties.bellow),.and.COMMAN
63a0	44 20 73 68 61 6c 6c 20 62 65 20 75 73 65 64 0a 61 73 20 74 68 65 20 60 3a 63 6f 6d 6d 61 6e 64	D.shall.be.used.as.the.`:command
63c0	27 20 70 72 6f 70 65 72 74 79 20 6f 66 20 74 68 65 20 62 75 74 74 6f 6e 2e 20 20 45 61 63 68 20	'.property.of.the.button...Each.
63e0	50 52 4f 50 20 69 73 20 6f 6e 65 20 6f 66 0a 74 68 65 20 62 75 74 74 6f 6e 20 70 72 6f 70 65 72	PROP.is.one.of.the.button.proper
6400	74 69 65 73 2c 20 61 6e 64 20 56 41 4c 20 69 73 20 69 74 73 20 72 65 73 70 65 63 74 69 76 65 20	ties,.and.VAL.is.its.respective.
6420	76 61 6c 75 65 2e 0a 41 4c 49 41 53 2d 47 52 4f 55 50 20 69 73 20 61 20 6c 69 73 74 20 77 68 69	value..ALIAS-GROUP.is.a.list.whi
6440	63 68 20 66 69 72 73 74 20 65 6c 65 6d 65 6e 74 20 69 73 20 74 68 65 20 73 79 6d 62 6f 6c 20 60	ch.first.element.is.the.symbol.`
6460	3a 61 6c 69 61 73 27 0a 61 6e 64 20 74 68 65 20 63 64 72 20 73 68 61 6c 6c 20 62 65 20 70 72 6f	:alias'.and.the.cdr.shall.be.pro
6480	63 65 73 73 65 64 20 61 73 20 61 20 67 72 6f 75 70 2e 0a 0a 48 6f 77 65 76 65 72 2c 20 61 20 73	cessed.as.a.group...However,.a.s
64a0	79 6d 62 6f 6c 20 69 73 20 6e 6f 74 20 72 65 71 75 69 72 65 64 20 74 6f 20 68 61 76 65 20 61 6e	ymbol.is.not.required.to.have.an
64c0	20 61 73 73 6f 63 69 61 74 69 6f 6e 20 69 6e 0a 4d 45 41 4e 49 4e 47 2d 41 4c 49 53 54 2c 20 77	.association.in.MEANING-ALIST,.w
64e0	68 69 63 68 20 69 73 20 6f 6e 6c 79 20 61 20 77 61 79 20 74 6f 20 73 70 65 63 69 66 79 20 70 72	hich.is.only.a.way.to.specify.pr
6500	6f 70 65 72 74 69 65 73 20 74 6f 20 61 0a 62 75 74 74 6f 6e 2e 20 20 4f 6e 65 20 63 61 6e 20 75	operties.to.a.button...One.can.u
6520	73 65 20 67 72 6f 75 70 73 20 74 6f 20 73 70 65 63 69 66 79 20 70 72 6f 70 65 72 74 69 65 73 2e	se.groups.to.specify.properties.
6540	20 20 4e 69 6c 20 69 73 20 61 20 67 6f 6f 64 0a 4d 45 41 4e 49 4e 47 2d 41 4c 49 53 54 2e 0a 0a	..Nil.is.a.good.MEANING-ALIST...
6560	42 75 74 74 6f 6e 73 0a 3d 3d 3d 3d 3d 3d 3d 0a 0a 41 20 74 6f 6f 6c 62 61 72 20 62 75 74 74 6f	Buttons.=======..A.toolbar.butto
6580	6e 20 69 6e 20 60 74 6f 6f 6c 62 61 72 78 27 20 69 73 20 74 68 65 20 73 65 74 20 77 69 74 68 20	n.in.`toolbarx'.is.the.set.with.
65a0	61 20 73 79 6d 62 6f 6c 20 61 6e 64 0a 70 72 6f 70 65 72 74 69 65 73 20 75 73 65 64 20 74 6f 20	a.symbol.and.properties.used.to.
65c0	64 69 73 70 6c 61 79 20 74 68 65 20 62 75 74 74 6f 6e 2c 20 6c 69 6b 65 20 61 20 69 6d 61 67 65	display.the.button,.like.a.image
65e0	20 61 6e 64 20 61 20 63 6f 6d 6d 61 6e 64 0a 74 6f 20 63 61 6c 6c 20 77 68 65 6e 20 74 68 65 20	.and.a.command.to.call.when.the.
6600	62 75 74 74 6f 6e 20 69 73 20 70 72 65 73 73 65 64 20 28 77 68 69 63 68 20 61 72 65 20 74 68 65	button.is.pressed.(which.are.the
6620	20 6d 69 6e 69 6d 61 6c 0a 65 6c 65 6d 65 6e 74 73 20 74 68 61 74 20 61 20 62 75 74 74 6f 6e 20	.minimal.elements.that.a.button.
6640	73 68 6f 75 6c 64 20 68 61 76 65 2e 29 20 20 54 68 65 20 73 75 70 70 6f 72 74 65 64 20 70 72 6f	should.have.)..The.supported.pro
6660	70 65 72 74 69 65 73 0a 66 6f 72 20 62 75 74 74 6f 6e 73 20 61 6e 64 20 74 68 65 69 72 20 60 62	perties.for.buttons.and.their.`b
6680	61 73 69 63 20 74 79 70 65 73 27 20 28 73 65 65 20 6e 6f 74 65 20 6f 6e 20 68 6f 77 20 76 61 6c	asic.types'.(see.note.on.how.val
66a0	75 65 73 20 6f 66 0a 70 72 6f 70 65 72 74 69 65 73 20 61 72 65 20 6f 62 74 61 69 6e 65 64 21 29	ues.of.properties.are.obtained!)
66c0	20 61 72 65 3a 0a 0a 20 3a 69 6d 61 67 65 20 2d 2d 20 65 69 74 68 65 72 20 61 20 73 74 72 69 6e	.are:...:image.--.either.a.strin
66e0	67 20 6f 72 20 69 6d 61 67 65 20 64 65 73 63 72 69 70 74 6f 72 20 28 73 65 65 0a 20 20 20 69 6e	g.or.image.descriptor.(see....in
6700	66 6f 20 66 6f 72 20 61 20 64 65 66 69 6e 69 74 69 6f 6e 29 2c 20 6f 72 20 61 20 76 61 72 69 61	fo.for.a.definition),.or.a.varia
6720	62 6c 65 20 62 6f 75 6e 64 20 74 6f 20 61 20 69 6d 61 67 65 0a 20 20 20 64 65 73 63 72 69 70 74	ble.bound.to.a.image....descript
6740	6f 72 20 28 6c 69 6b 65 20 74 68 6f 73 65 20 64 65 66 69 6e 65 64 20 77 69 74 68 20 60 64 65 66	or.(like.those.defined.with.`def
6760	69 6d 61 67 65 27 29 20 6f 72 20 61 20 6c 69 73 74 20 6f 66 20 34 0a 20 20 20 73 74 72 69 6e 67	image').or.a.list.of.4....string
6780	73 20 6f 72 20 69 6d 61 67 65 20 64 65 73 63 72 69 70 74 6f 72 73 3b 0a 20 20 20 64 65 66 69 6e	s.or.image.descriptors;....defin
67a0	65 73 20 74 68 65 20 69 6d 61 67 65 20 66 69 6c 65 20 64 69 73 70 6c 61 79 65 64 20 62 79 20 74	es.the.image.file.displayed.by.t
67c0	68 65 20 62 75 74 74 6f 6e 2e 20 20 49 66 0a 20 20 20 69 74 20 69 73 20 61 20 73 74 72 69 6e 67	he.button...If....it.is.a.string
67e0	2c 20 74 68 65 20 69 6d 61 67 65 20 66 69 6c 65 20 66 6f 75 6e 64 20 77 69 74 68 20 74 68 61 74	,.the.image.file.found.with.that
6800	20 6e 61 6d 65 20 28 61 6c 77 61 79 73 0a 20 20 20 75 73 69 6e 67 20 74 68 65 20 66 75 6e 63 74	.name.(always....using.the.funct
6820	69 6f 6e 20 60 74 6f 6f 6c 62 61 72 78 2d 66 69 6e 64 2d 69 6d 61 67 65 27 20 74 6f 20 6d 61 6b	ion.`toolbarx-find-image'.to.mak
6840	65 20 74 68 65 0a 20 20 20 60 69 6e 74 65 72 6e 61 6c 27 20 69 6d 61 67 65 20 64 65 73 63 72 69	e.the....`internal'.image.descri
6860	70 74 6f 72 29 20 69 73 20 75 73 65 64 20 61 73 20 62 75 74 74 6f 6e 20 69 6d 61 67 65 2e 20 20	ptor).is.used.as.button.image...
6880	46 6f 72 0a 20 20 20 74 68 65 20 6f 74 68 65 72 20 66 6f 72 6d 61 74 73 2c 20 74 68 65 20 62 75	For....the.other.formats,.the.bu
68a0	74 74 6f 6e 20 69 6d 61 67 65 20 69 73 20 68 61 6e 64 6c 65 64 20 69 6e 20 74 68 65 20 73 61 6d	tton.image.is.handled.in.the.sam
68c0	65 20 77 61 79 0a 20 20 20 61 73 20 69 74 20 69 73 20 74 72 65 61 74 65 64 20 62 79 20 74 68 65	e.way....as.it.is.treated.by.the
68e0	20 65 64 69 74 6f 72 73 3b 20 73 65 65 20 69 6e 66 6f 20 6e 6f 64 65 73 20 62 65 6c 6c 6f 77 20	.editors;.see.info.nodes.bellow.
6900	66 6f 72 20 61 0a 20 20 20 64 65 73 63 72 69 70 74 69 6f 6e 20 6f 66 20 74 68 65 20 63 61 70 61	for.a....description.of.the.capa
6920	62 69 6c 69 74 69 65 73 3a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 69 6e 66 6f 20 66 69 6c 65	bilities:..............info.file
6940	20 22 65 6c 69 73 70 22 2c 20 6e 6f 64 65 20 22 54 6f 6f 6c 20 42 61 72 22 20 28 73 65 65 20 60	."elisp",.node."Tool.Bar".(see.`
6960	3a 69 6d 61 67 65 27 20 70 72 6f 70 65 72 74 79 29 3b 0a 20 20 20 20 20 20 20 20 20 20 20 20 20	:image'.property);..............
6980	50 53 3a 20 61 20 2a 76 65 63 74 6f 72 2a 20 6f 66 20 66 6f 75 72 20 73 74 72 69 6e 67 73 20 69	PS:.a.*vector*.of.four.strings.i
69a0	73 20 75 73 65 64 20 69 6e 20 74 68 65 20 45 6d 61 63 73 0a 20 20 20 20 20 20 20 20 20 20 20 20	s.used.in.the.Emacs.............
69c0	20 4c 69 73 70 20 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 61 73 20 74 68 65 20 60 6d 6f 72 65	.Lisp.documentation.as.the.`more
69e0	20 65 6c 6c 61 62 6f 72 61 74 65 64 27 20 69 6d 61 67 65 0a 20 20 20 20 20 20 20 20 20 20 20 20	.ellaborated'.image.............
6a00	20 70 72 6f 70 65 72 74 79 20 66 6f 72 6d 61 74 2c 20 62 75 74 20 68 65 72 65 20 77 65 20 72 65	.property.format,.but.here.we.re
6a20	73 65 72 76 65 20 76 65 63 74 6f 72 73 20 74 6f 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 70 72	serve.vectors.to..............pr
6a40	6f 76 69 64 65 20 65 64 69 74 6f 72 2d 64 65 70 65 6e 64 65 6e 74 20 76 61 6c 75 65 73 3b 20 74	ovide.editor-dependent.values;.t
6a60	68 69 73 20 6d 6f 74 69 76 61 74 65 73 20 6f 75 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 63	his.motivates.our..............c
6a80	68 6f 69 63 65 20 66 6f 72 20 61 20 6c 69 73 74 20 69 6e 73 74 65 61 64 20 6f 66 20 76 65 63 74	hoice.for.a.list.instead.of.vect
6aa0	6f 72 20 28 68 6f 77 65 76 65 72 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 69 6e 74 65 72 6e	or.(however,..............intern
6ac0	61 6c 6c 79 20 74 68 65 20 6c 69 73 74 20 62 65 63 6f 6d 65 73 20 61 20 76 65 63 74 6f 72 20 77	ally.the.list.becomes.a.vector.w
6ae0	68 65 6e 20 64 69 73 70 6c 61 79 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 74 68 65 20	hen.displaying..............the.
6b00	62 75 74 74 6f 6e 29 2e 0a 0a 20 3a 63 6f 6d 6d 61 6e 64 20 2d 2d 20 61 20 66 6f 72 6d 3b 20 69	button)....:command.--.a.form;.i
6b20	66 20 74 68 65 20 66 6f 72 6d 20 68 61 70 70 65 6e 73 20 74 6f 20 62 65 20 61 20 63 6f 6d 6d 61	f.the.form.happens.to.be.a.comma
6b40	6e 64 2c 20 69 74 20 77 69 6c 6c 0a 20 20 20 62 65 20 63 61 6c 6c 65 64 20 77 69 74 68 20 60 63	nd,.it.will....be.called.with.`c
6b60	61 6c 6c 2d 69 6e 74 65 72 61 63 74 69 76 65 6c 79 27 2e 0a 0a 20 3a 61 70 70 65 6e 64 2d 63 6f	all-interactively'....:append-co
6b80	6d 6d 61 6e 64 20 2d 2d 20 61 20 66 6f 72 6d 20 61 64 64 65 64 20 74 6f 20 74 68 65 20 65 6e 64	mmand.--.a.form.added.to.the.end
6ba0	20 6f 66 20 74 68 65 20 76 61 6c 75 65 20 6f 66 0a 20 20 20 60 3a 63 6f 6d 6d 61 6e 64 27 2e 0a	.of.the.value.of....`:command'..
6bc0	0a 20 3a 70 72 65 70 65 6e 64 2d 63 6f 6d 6d 61 6e 64 20 2d 2d 20 61 20 66 6f 72 6d 20 61 64 64	..:prepend-command.--.a.form.add
6be0	65 64 20 61 74 20 74 68 65 20 62 65 67 69 6e 6e 69 6e 67 20 6f 66 20 74 68 65 20 76 61 6c 75 65	ed.at.the.beginning.of.the.value
6c00	0a 20 20 20 6f 66 20 60 3a 63 6f 6d 6d 61 6e 64 27 2e 0a 0a 20 3a 68 65 6c 70 20 2d 2d 20 65 69	....of.`:command'....:help.--.ei
6c20	74 68 65 72 20 61 20 73 74 72 69 6e 67 20 6f 72 20 6e 69 6c 3b 20 64 65 66 69 6e 65 64 20 74 68	ther.a.string.or.nil;.defined.th
6c40	65 20 68 65 6c 70 20 73 74 72 69 6e 67 20 6f 66 20 74 68 65 0a 20 20 20 62 75 74 74 6f 6e 3b 0a	e.help.string.of.the....button;.
6c60	0a 20 3a 65 6e 61 62 6c 65 20 2d 2d 20 61 20 66 6f 72 6d 2c 20 65 76 61 6c 75 61 74 65 64 20 63	..:enable.--.a.form,.evaluated.c
6c80	6f 6e 73 74 61 6e 74 6c 79 20 62 79 20 62 6f 74 68 20 65 64 69 74 6f 72 73 20 74 6f 0a 20 20 20	onstantly.by.both.editors.to....
6ca0	64 65 74 65 72 6d 69 6e 65 20 69 66 20 61 20 62 75 74 74 6f 6e 20 69 73 20 61 63 74 69 76 65 20	determine.if.a.button.is.active.
6cc0	28 65 6e 61 62 6c 65 64 29 20 6f 72 20 6e 6f 74 2e 0a 0a 20 3a 76 69 73 69 62 6c 65 20 2d 2d 20	(enabled).or.not....:visible.--.
6ce0	61 20 66 6f 72 6d 20 74 68 61 74 20 69 73 20 65 76 61 6c 75 61 74 65 64 20 63 6f 6e 73 74 61 6e	a.form.that.is.evaluated.constan
6d00	74 6c 79 20 74 6f 0a 20 20 20 64 65 74 65 72 6d 69 6e 65 20 69 66 20 61 20 62 75 74 74 6f 6e 20	tly.to....determine.if.a.button.
6d20	69 73 20 76 69 73 69 62 6c 65 2e 0a 0a 20 3a 62 75 74 74 6f 6e 20 2d 2d 20 61 20 63 6f 6e 73 20	is.visible....:button.--.a.cons.
6d40	63 65 6c 6c 20 28 54 59 50 45 20 2e 20 20 53 45 4c 45 43 54 45 44 29 20 77 68 65 72 65 20 74 68	cell.(TYPE....SELECTED).where.th
6d60	65 0a 20 20 20 54 59 50 45 20 73 68 6f 75 6c 64 20 62 65 20 60 3a 74 6f 67 67 6c 65 27 20 6f 72	e....TYPE.should.be.`:toggle'.or
6d80	20 60 3a 72 61 64 69 6f 27 20 61 6e 64 20 74 68 65 20 63 64 72 20 73 68 6f 75 6c 64 20 62 65 20	.`:radio'.and.the.cdr.should.be.
6da0	61 0a 20 20 20 66 6f 72 6d 2e 20 20 53 45 4c 45 43 54 45 44 20 69 73 20 65 76 61 6c 75 61 74 65	a....form...SELECTED.is.evaluate
6dc0	64 20 74 6f 20 64 65 74 65 72 6d 69 6e 65 20 77 68 65 6e 20 74 68 65 20 62 75 74 74 6f 6e 20 69	d.to.determine.when.the.button.i
6de0	73 0a 20 20 20 73 65 6c 65 63 74 65 64 2e 0a 0a 20 3a 69 6e 73 65 72 74 20 2d 2d 20 61 20 66 6f	s....selected....:insert.--.a.fo
6e00	72 6d 20 74 68 61 74 20 69 73 20 65 76 61 6c 75 61 74 65 64 20 65 76 65 72 79 20 74 69 6d 65 20	rm.that.is.evaluated.every.time.
6e20	74 68 61 74 20 74 68 65 20 74 6f 6f 6c 62 61 72 0a 20 20 20 69 73 20 72 65 66 72 65 73 68 20 28	that.the.toolbar....is.refresh.(
6e40	61 20 63 61 6c 6c 20 6f 66 20 60 74 6f 6f 6c 62 61 72 78 2d 72 65 66 72 65 73 68 27 29 20 74 6f	a.call.of.`toolbarx-refresh').to
6e60	20 64 65 74 65 72 6d 69 6e 65 20 69 66 20 74 68 65 0a 20 20 20 62 75 74 74 6f 6e 20 69 73 20 69	.determine.if.the....button.is.i
6e80	6e 73 65 72 74 65 64 20 6f 72 20 6a 75 73 74 20 69 67 6e 6f 72 65 64 20 28 75 6e 74 69 6c 20 6e	nserted.or.just.ignored.(until.n
6ea0	65 78 74 20 72 65 66 72 65 73 68 29 2e 0a 0a 48 6f 77 20 74 6f 20 73 70 65 63 69 66 79 20 61 20	ext.refresh)...How.to.specify.a.
6ec0	62 75 74 74 6f 6e 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 0a	button.=======================..
6ee0	4f 6e 65 20 63 61 6e 20 73 70 65 63 69 66 79 20 61 20 62 75 74 74 6f 6e 20 62 79 20 69 74 73 20	One.can.specify.a.button.by.its.
6f00	73 79 6d 62 6f 6c 20 6f 72 20 62 79 20 61 20 67 72 6f 75 70 20 74 6f 20 73 70 65 63 69 66 79 0a	symbol.or.by.a.group.to.specify.
6f20	70 72 6f 70 65 72 74 69 65 73 2e 20 20 46 6f 72 20 65 78 61 6d 70 6c 65 2c 0a 20 20 42 55 54 54	properties...For.example,...BUTT
6f40	4f 4e 20 3d 0a 20 20 20 20 28 20 66 6f 6f 0a 20 20 20 20 20 20 28 62 61 72 20 3a 69 6d 61 67 65	ON.=.....(.foo.......(bar.:image
6f60	20 22 62 61 72 22 0a 20 20 20 20 20 20 20 20 20 20 20 3a 63 6f 6d 6d 61 6e 64 20 62 61 72 2d 66	."bar"............:command.bar-f
6f80	75 6e 63 74 69 6f 6e 20 3a 68 65 6c 70 20 22 42 61 72 20 68 65 6c 70 20 73 74 72 69 6e 67 22 29	unction.:help."Bar.help.string")
6fa0	0a 20 20 20 20 20 20 3a 69 6e 73 65 72 74 20 66 6f 6f 2d 62 61 72 20 29 0a 20 20 4d 45 41 4e 49	.......:insert.foo-bar.)...MEANI
6fc0	4e 47 2d 41 4c 49 53 54 20 3d 20 28 20 28 66 6f 6f 20 3a 69 6d 61 67 65 20 22 66 6f 6f 22 20 3a	NG-ALIST.=.(.(foo.:image."foo".:
6fe0	63 6f 6d 6d 61 6e 64 20 66 6f 6f 2d 66 75 6e 63 74 69 6f 6e 29 20 29 0a 73 70 65 63 69 66 69 79	command.foo-function).).specifiy
7000	20 74 77 6f 20 62 75 74 74 6f 6e 73 20 60 66 6f 6f 27 20 61 6e 64 20 60 62 61 72 27 2c 20 65 61	.two.buttons.`foo'.and.`bar',.ea
7020	63 68 20 6f 6e 65 20 77 69 74 68 20 69 74 73 20 6e 65 63 65 73 73 61 72 79 0a 3a 69 6d 61 67 65	ch.one.with.its.necessary.:image
7040	20 61 6e 64 20 3a 63 6f 6d 6d 61 6e 64 20 70 72 6f 70 65 72 74 69 65 73 2c 20 61 6e 64 20 62 6f	.and.:command.properties,.and.bo
7060	74 68 20 75 73 65 20 74 68 65 20 3a 69 6e 73 65 72 74 20 70 72 6f 70 65 72 74 79 0a 73 70 65 63	th.use.the.:insert.property.spec
7080	69 66 69 65 64 20 61 74 65 20 74 68 65 20 65 6e 64 20 6f 66 20 42 55 54 54 4f 4e 53 20 28 62 65	ified.ate.the.end.of.BUTTONS.(be
70a0	63 61 75 73 65 20 67 72 6f 75 70 73 20 64 69 73 74 72 69 62 75 74 65 0a 70 72 6f 70 65 72 74 69	cause.groups.distribute.properti
70c0	65 73 20 74 6f 20 61 6c 6c 20 69 74 73 20 65 6c 65 6d 65 6e 74 73 29 2e 20 20 60 66 6f 6f 27 20	es.to.all.its.elements)...`foo'.
70e0	61 6e 64 20 60 62 61 72 27 20 77 69 6c 6c 20 62 65 0a 69 6e 73 65 72 74 65 64 20 6f 6e 6c 79 20	and.`bar'.will.be.inserted.only.
7100	69 66 20 60 66 6f 6f 2d 62 61 72 27 20 65 76 61 6c 75 61 74 69 6f 6e 20 79 69 65 6c 64 73 20 6e	if.`foo-bar'.evaluation.yields.n
7120	6f 6e 2d 6e 69 6c 2e 0a 0a 4e 6f 74 65 20 6f 6e 20 68 6f 77 20 76 61 6c 75 65 73 20 6f 66 20 70	on-nil...Note.on.how.values.of.p
7140	72 6f 70 65 72 74 69 65 73 20 61 72 65 20 6f 62 74 61 69 6e 65 64 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d	roperties.are.obtained.=========
7160	3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d	================================
7180	3d 3d 3d 3d 0a 0a 46 6f 72 20 65 61 63 68 20 70 72 6f 70 65 72 74 79 20 50 52 4f 50 2c 20 69 74	====..For.each.property.PROP,.it
71a0	73 20 76 61 6c 75 65 20 73 68 6f 75 6c 64 20 62 65 20 65 69 74 68 65 72 3a 0a 20 20 20 69 29 20	s.value.should.be.either:....i).
71c0	61 20 76 65 63 74 6f 72 20 6f 66 20 32 20 65 6c 65 6d 65 6e 74 73 3b 20 74 68 65 6e 20 65 61 63	a.vector.of.2.elements;.then.eac
71e0	68 20 65 6c 65 6d 65 6e 74 20 73 68 6f 75 6c 64 20 62 65 20 6f 66 20 74 68 65 0a 20 20 20 20 20	h.element.should.be.of.the......
7200	20 62 61 73 69 63 20 74 79 70 65 20 6f 66 20 50 52 4f 50 2e 0a 20 20 69 69 29 20 61 6e 20 65 6c	.basic.type.of.PROP....ii).an.el
7220	65 6d 65 6e 74 20 6f 6e 20 74 68 65 20 62 61 73 69 63 20 74 79 70 65 20 6f 66 20 50 52 4f 50 2e	ement.on.the.basic.type.of.PROP.
7240	0a 20 69 69 69 29 20 61 20 66 75 6e 63 74 69 6f 6e 20 28 74 68 61 74 20 64 6f 65 73 20 6e 6f 74	..iii).a.function.(that.does.not
7260	20 6e 65 65 64 20 61 72 67 75 6d 65 6e 74 73 29 3b 20 69 74 20 69 73 20 65 76 61 6c 75 61 74 65	.need.arguments);.it.is.evaluate
7280	64 0a 20 20 20 20 20 20 61 6e 64 20 74 68 65 20 72 65 74 75 72 6e 20 73 68 6f 75 6c 64 20 62 65	d.......and.the.return.should.be
72a0	20 6f 74 20 74 79 70 65 20 69 29 20 6f 72 20 69 69 29 20 61 62 6f 76 65 0a 20 20 69 76 29 20 61	.ot.type.i).or.ii).above...iv).a
72c0	20 73 79 6d 62 6f 6c 20 62 6f 75 6e 64 20 74 6f 20 61 20 65 6c 65 6d 65 6e 74 20 6f 66 20 74 79	.symbol.bound.to.a.element.of.ty
72e0	70 65 20 69 29 20 6f 72 20 69 69 29 2e 0a 0a 54 68 65 20 74 79 70 65 20 69 73 20 63 68 65 63 68	pe.i).or.ii)...The.type.is.chech
7300	65 64 20 69 6e 20 74 68 65 20 6f 72 64 65 72 20 69 29 2c 20 69 69 29 20 69 69 69 29 20 61 6e 64	ed.in.the.order.i),.ii).iii).and
7320	20 69 76 29 2e 20 20 54 68 69 73 0a 65 76 61 6c 75 61 74 69 6f 6e 73 20 61 72 65 20 64 6f 6e 65	.iv)...This.evaluations.are.done
7340	20 65 76 65 72 79 20 74 69 6d 65 20 74 68 61 74 20 74 68 65 20 6f 6f 6c 62 61 72 20 69 73 20 72	.every.time.that.the.oolbar.is.r
7360	65 66 72 65 73 68 2e 0a 0a 50 73 2e 3a 20 69 6e 20 6f 72 64 65 72 20 74 6f 20 73 70 65 63 69 66	efresh...Ps.:.in.order.to.specif
7380	79 20 61 20 76 65 63 74 6f 72 20 61 73 20 76 61 6c 75 65 20 6f 66 20 61 20 70 72 6f 70 65 72 74	y.a.vector.as.value.of.a.propert
73a0	79 20 28 6c 69 6b 65 0a 74 68 65 20 3a 69 6d 61 67 65 20 69 6e 20 45 6d 61 63 73 29 2c 20 69 74	y.(like.the.:image.in.Emacs),.it
73c0	20 69 73 20 6e 65 63 65 73 73 61 72 79 20 74 6f 20 70 72 6f 76 69 64 65 20 74 68 65 20 76 65 63	.is.necessary.to.provide.the.vec
73e0	74 6f 72 20 61 73 0a 65 6c 65 6d 65 6e 74 20 6f 66 20 61 6e 6f 74 68 65 72 20 76 65 63 74 6f 72	tor.as.element.of.another.vector
7400	2e 0a 0a 53 70 65 63 69 61 6c 20 67 72 6f 75 70 73 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d	...Special.groups.==============
7420	0a 0a 45 76 61 6c 20 67 72 6f 75 70 73 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a 49 66 20 74 68	..Eval.groups.-----------..If.th
7440	65 20 66 69 72 73 74 20 65 6c 65 6d 65 6e 74 20 6f 66 20 61 20 67 72 6f 75 70 20 69 73 20 74 68	e.first.element.of.a.group.is.th
7460	65 20 73 79 6d 62 6f 6c 20 60 3a 65 76 61 6c 2d 67 72 6f 75 70 27 2c 20 65 61 63 68 0a 65 6c 65	e.symbol.`:eval-group',.each.ele
7480	6d 65 6e 74 20 69 73 20 65 76 61 6c 75 61 74 65 64 20 28 77 69 74 68 20 60 65 76 61 6c 27 29 2c	ment.is.evaluated.(with.`eval'),
74a0	20 70 75 74 20 69 6e 73 69 64 65 20 61 20 6c 69 73 74 20 61 6e 64 0a 70 72 6f 63 65 73 73 65 64	.put.inside.a.list.and.processed
74c0	20 6c 69 6b 65 20 61 20 67 72 6f 75 70 2e 20 20 45 76 61 6c 20 67 72 6f 75 70 73 20 61 72 65 20	.like.a.group...Eval.groups.are.
74e0	75 73 65 66 75 6c 20 74 6f 20 73 74 6f 72 65 0a 64 65 66 69 6e 69 74 69 6f 6e 20 6f 66 20 62 75	useful.to.store.definition.of.bu
7500	74 74 6f 6e 73 20 69 6e 20 61 20 76 61 72 69 61 62 6c 65 2e 0a 0a 44 72 6f 70 64 6f 77 6e 20 67	ttons.in.a.variable...Dropdown.g
7520	72 6f 75 70 73 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a 54 68 65 20 69 64 65 61 20	roups.---------------..The.idea.
7540	69 73 20 74 6f 20 73 70 65 63 69 66 79 20 61 20 73 65 74 20 6f 66 20 62 75 74 74 6f 6e 73 20 74	is.to.specify.a.set.of.buttons.t
7560	68 61 74 20 61 70 70 65 61 72 20 77 68 65 6e 20 61 0a 64 65 74 65 72 6d 69 6e 65 64 20 6d 65 6e	hat.appear.when.a.determined.men
7580	75 20 69 74 65 6d 20 6f 66 20 61 20 64 72 6f 70 64 6f 77 6e 20 6d 65 6e 75 20 69 73 20 61 63 74	u.item.of.a.dropdown.menu.is.act
75a0	69 76 65 2e 20 20 54 68 65 20 64 72 6f 70 64 6f 77 6e 0a 6d 65 6e 75 20 61 70 70 65 61 72 73 20	ive...The.dropdown.menu.appears.
75c0	77 68 65 6e 20 61 20 62 75 74 74 6f 6e 20 28 62 79 20 64 65 66 61 75 6c 74 20 77 69 74 68 20 61	when.a.button.(by.default.with.a
75e0	20 74 72 69 61 6e 67 6c 65 20 70 6f 69 6e 74 69 6e 67 0a 64 6f 77 6e 29 20 69 73 20 63 6c 69 63	.triangle.pointing.down).is.clic
7600	6b 65 64 2e 20 20 54 68 69 73 20 62 75 74 74 6f 6e 20 69 73 20 63 61 6c 6c 65 64 20 60 64 72 6f	ked...This.button.is.called.`dro
7620	70 64 6f 77 6e 20 62 75 74 74 6f 6e 27 2e 20 20 54 68 65 0a 64 72 6f 70 64 6f 77 6e 20 62 75 74	pdown.button'...The.dropdown.but
7640	74 6f 6e 20 61 70 70 65 61 72 73 20 6f 6e 20 74 68 65 20 6c 65 66 74 20 6f 66 20 74 68 65 20 63	ton.appears.on.the.left.of.the.c
7660	75 72 72 65 6e 74 6c 79 20 76 69 73 69 62 6c 65 0a 62 75 74 74 6f 6e 73 20 6f 66 20 74 68 65 20	urrently.visible.buttons.of.the.
7680	64 72 6f 70 64 6f 77 6e 20 67 72 6f 75 70 2e 0a 0a 41 20 64 72 6f 70 64 6f 77 6e 20 67 72 6f 75	dropdown.group...A.dropdown.grou
76a0	70 20 69 73 20 61 20 6c 69 73 74 20 77 68 69 63 68 20 66 69 72 73 74 20 65 6c 65 6d 65 6e 74 20	p.is.a.list.which.first.element.
76c0	69 73 20 74 68 65 20 73 79 6d 62 6f 6c 0a 60 3a 64 72 6f 70 64 6f 77 6e 2d 67 72 6f 75 70 27 20	is.the.symbol.`:dropdown-group'.
76e0	61 6e 64 20 69 6e 20 6f 6e 65 20 6f 66 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 66 6f 72 6d	and.in.one.of.the.following.form
7700	61 74 73 0a 20 20 28 3a 64 72 6f 70 64 6f 77 6e 2d 67 72 6f 75 70 20 53 59 4d 42 4f 4c 2d 31 20	ats...(:dropdown-group.SYMBOL-1.
7720	2e 2e 2e 20 53 59 4d 42 4f 4c 2d 6e 20 20 50 52 4f 50 2d 31 20 56 41 4c 2d 31 20 2e 2e 2e 20 50	....SYMBOL-n..PROP-1.VAL-1.....P
7740	52 4f 50 2d 6b 20 56 41 4c 2d 6b 29 0a 6f 72 0a 20 20 28 3a 64 72 6f 70 64 6f 77 6e 2d 67 72 6f	ROP-k.VAL-k).or...(:dropdown-gro
7760	75 70 0a 20 20 20 20 20 53 54 52 49 4e 47 2d 31 20 49 54 45 4d 2d 31 31 20 2e 2e 2e 20 49 54 45	up......STRING-1.ITEM-11.....ITE
7780	4d 2d 31 6e 0a 20 20 20 20 20 53 54 52 49 4e 47 2d 32 20 49 54 45 4d 2d 32 31 20 2e 2e 2e 20 49	M-1n......STRING-2.ITEM-21.....I
77a0	54 45 4d 2d 32 6d 0a 20 20 20 20 20 20 20 20 20 20 20 2e 20 2e 20 2e 0a 20 20 20 20 20 53 54 52	TEM-2m.......................STR
77c0	49 4e 47 2d 6e 20 49 54 45 4d 2d 6e 31 20 2e 2e 2e 20 49 54 45 4d 2d 6e 70 0a 20 20 20 20 20 20	ING-n.ITEM-n1.....ITEM-np.......
77e0	20 50 52 4f 50 2d 31 20 56 41 4c 2d 31 20 2e 2e 2e 20 50 52 4f 50 2d 6a 20 56 41 4c 2d 6a 29 0a	.PROP-1.VAL-1.....PROP-j.VAL-j).
7800	77 68 65 72 65 0a 20 53 59 4d 42 4f 4c 2d 2a 20 69 73 20 61 20 73 79 6d 62 6f 6c 20 74 68 61 74	where..SYMBOL-*.is.a.symbol.that
7820	20 64 65 66 69 6e 65 73 20 61 20 62 75 74 74 6f 6e 20 69 6e 20 4d 45 41 4e 49 4e 47 2d 41 4c 49	.defines.a.button.in.MEANING-ALI
7840	53 54 3b 0a 20 53 54 52 49 4e 47 2d 2a 20 69 73 20 61 20 73 74 72 69 6e 67 20 74 68 61 74 20 77	ST;..STRING-*.is.a.string.that.w
7860	69 6c 6c 20 61 70 70 65 61 72 20 69 6e 20 74 68 65 20 64 72 6f 70 64 6f 77 6e 20 6d 65 6e 75 3b	ill.appear.in.the.dropdown.menu;
7880	0a 20 49 54 45 4d 2d 2a 20 69 73 20 61 6e 79 20 66 6f 72 6d 61 74 20 74 68 61 74 20 64 65 66 69	..ITEM-*.is.any.format.that.defi
78a0	6e 65 20 62 75 74 74 6f 6e 73 20 6f 72 20 67 72 6f 75 70 73 2e 0a 0a 28 61 20 64 72 6f 70 64 6f	ne.buttons.or.groups...(a.dropdo
78c0	77 6e 20 67 72 6f 75 70 20 6f 66 20 66 69 72 73 74 20 66 6f 72 6d 61 74 20 69 73 20 69 6e 74 65	wn.group.of.first.format.is.inte
78e0	72 6e 61 6c 6c 79 20 63 6f 6e 76 65 72 74 65 64 20 74 6f 20 74 68 65 0a 73 65 63 6f 6e 64 20 62	rnally.converted.to.the.second.b
7900	79 20 6d 61 6b 69 6e 67 20 73 74 72 69 6e 67 73 20 66 72 6f 6d 20 74 68 65 20 73 79 6d 62 6f 6c	y.making.strings.from.the.symbol
7920	73 20 61 6e 64 20 65 61 63 68 20 73 79 6d 62 6f 6c 20 69 73 20 74 68 65 0a 69 74 65 6d 29 0a 0a	s.and.each.symbol.is.the.item)..
7940	54 68 65 20 73 61 6d 65 20 72 75 6c 65 73 20 66 6f 72 20 6f 62 74 61 69 6e 69 6e 67 20 70 72 6f	The.same.rules.for.obtaining.pro
7960	70 65 72 74 79 20 76 61 6c 75 65 73 2c 20 64 65 73 63 72 69 62 65 64 20 61 62 6f 76 65 2c 0a 61	perty.values,.described.above,.a
7980	70 70 6c 79 20 68 65 72 65 2e 20 20 50 72 6f 70 65 72 74 69 65 73 20 61 72 65 20 61 6c 73 6f 20	pply.here...Properties.are.also.
79a0	64 69 73 74 72 69 62 75 74 65 64 20 62 79 20 67 72 6f 75 70 73 2e 20 20 54 68 65 0a 73 75 70 70	distributed.by.groups...The.supp
79c0	6f 72 74 65 64 20 70 72 6f 70 65 72 74 69 65 73 20 61 6e 64 20 74 68 65 69 72 20 62 61 73 69 63	orted.properties.and.their.basic
79e0	20 74 79 70 65 20 61 72 65 3a 0a 0a 20 3a 74 79 70 65 20 2d 2d 20 6f 6e 65 20 6f 66 20 74 68 65	.type.are:...:type.--.one.of.the
7a00	20 73 79 6d 62 6f 6c 73 20 60 72 61 64 69 6f 27 20 28 64 65 66 61 75 6c 74 29 20 6f 72 20 60 74	.symbols.`radio'.(default).or.`t
7a20	6f 67 67 6c 65 27 3b 20 69 66 0a 20 20 20 74 79 70 65 20 69 73 20 72 61 64 69 6f 2c 20 6f 6e 6c	oggle';.if....type.is.radio,.onl
7a40	79 20 6f 6e 65 20 6f 66 20 74 68 65 20 69 74 65 6e 73 20 6d 61 79 20 62 65 20 61 63 74 69 76 65	y.one.of.the.itens.may.be.active
7a60	2c 20 61 6e 64 20 69 66 0a 20 20 20 74 79 70 65 20 69 73 20 74 6f 67 67 6c 65 2c 20 61 6e 79 20	,.and.if....type.is.toggle,.any.
7a80	69 74 65 6d 20 6e 75 6d 62 65 72 20 6f 66 20 69 74 65 6e 73 20 63 61 6e 20 62 65 20 61 63 74 69	item.number.of.itens.can.be.acti
7aa0	76 65 2e 0a 0a 20 3a 76 61 72 69 61 62 6c 65 20 2d 2d 20 61 20 73 79 6d 62 6f 6c 3b 20 69 74 20	ve....:variable.--.a.symbol;.it.
7ac0	69 73 20 74 68 65 20 76 61 72 69 61 62 6c 65 20 74 68 61 74 20 67 6f 76 65 72 6e 20 74 68 65 0a	is.the.variable.that.govern.the.
7ae0	20 20 20 64 72 6f 70 64 6f 77 6e 20 62 75 74 74 6f 6e 3b 20 65 76 65 72 79 20 74 69 6d 65 20 74	...dropdown.button;.every.time.t
7b00	68 65 20 76 61 6c 75 65 20 73 68 6f 75 6c 64 20 62 65 20 61 6e 20 69 6e 74 65 67 65 72 0a 20 20	he.value.should.be.an.integer...
7b20	20 73 74 61 72 74 69 6e 67 20 66 72 6f 6d 20 31 20 28 69 66 20 74 79 70 65 20 69 73 20 72 61 64	.starting.from.1.(if.type.is.rad
7b40	69 6f 29 20 6f 72 20 61 20 6c 69 73 74 20 6f 66 20 69 6e 74 65 67 65 72 73 20 28 69 66 0a 20 20	io).or.a.list.of.integers.(if...
7b60	20 74 79 70 65 20 69 73 20 74 6f 67 67 6c 65 29 2e 20 20 54 68 65 20 4e 74 68 20 73 65 74 20 6f	.type.is.toggle)...The.Nth.set.o
7b80	66 20 62 75 74 74 6f 6e 73 20 69 73 20 3a 69 6e 73 65 72 74 27 65 64 2e 0a 0a 20 3a 64 65 66 61	f.buttons.is.:insert'ed....:defa
7ba0	75 6c 74 20 2d 2d 20 64 65 74 65 72 6d 69 6e 65 73 20 74 68 65 20 64 65 66 61 75 6c 74 20 76 61	ult.--.determines.the.default.va
7bc0	6c 75 65 20 77 68 65 6e 20 74 68 65 20 6d 65 6e 75 20 69 73 0a 20 20 20 69 6e 73 74 61 6c 6c 65	lue.when.the.menu.is....installe
7be0	64 3b 20 69 74 20 69 73 20 69 67 6e 6f 72 65 64 20 69 66 20 61 20 76 61 6c 75 65 20 77 61 73 20	d;.it.is.ignored.if.a.value.was.
7c00	73 61 76 65 64 20 77 69 74 68 20 63 75 73 74 6f 6d 3b 20 69 74 0a 20 20 20 64 65 66 61 75 6c 74	saved.with.custom;.it....default
7c20	73 20 74 6f 20 31 20 69 66 20 74 79 70 65 20 69 73 20 72 61 64 69 6f 20 6f 72 20 6e 69 6c 20 69	s.to.1.if.type.is.radio.or.nil.i
7c40	66 20 74 79 70 65 20 69 73 20 74 6f 67 67 6c 65 2e 20 20 49 66 0a 20 20 20 76 61 6c 75 65 20 69	f.type.is.toggle...If....value.i
7c60	73 20 61 20 69 6e 74 65 67 65 72 20 61 6e 64 20 74 79 70 65 20 69 73 20 60 74 6f 67 67 6c 65 27	s.a.integer.and.type.is.`toggle'
7c80	2c 20 76 61 6c 75 65 20 75 73 65 64 20 69 73 20 61 20 6c 69 73 74 0a 20 20 20 77 69 74 68 20 74	,.value.used.is.a.list....with.t
7ca0	68 61 74 20 69 6e 74 65 67 65 72 2e 0a 0a 20 3a 73 61 76 65 20 2d 2d 20 6f 6e 65 20 6f 66 20 74	hat.integer....:save.--.one.of.t
7cc0	68 65 20 73 79 6d 62 6f 6c 73 20 6e 69 6c 20 28 64 65 66 61 75 6c 74 29 2c 20 60 6f 66 66 65 72	he.symbols.nil.(default),.`offer
7ce0	27 20 6f 72 0a 20 20 20 60 61 6c 77 61 79 73 27 3b 20 64 65 74 65 72 6d 69 6e 65 64 20 69 66 20	'.or....`always';.determined.if.
7d00	69 74 20 69 73 20 70 6f 73 73 69 62 6c 65 20 66 6f 72 20 74 68 65 20 75 73 65 72 20 74 6f 20 73	it.is.possible.for.the.user.to.s
7d20	61 76 65 0a 20 20 20 74 68 65 20 77 68 69 63 68 20 6d 65 6e 75 20 69 74 65 6e 73 20 61 72 65 20	ave....the.which.menu.itens.are.
7d40	61 63 74 69 76 65 2c 20 66 6f 72 20 61 20 6e 65 78 74 20 73 65 73 73 69 6f 6e 2e 20 20 49 66 20	active,.for.a.next.session...If.
7d60	76 61 6c 75 65 0a 20 20 20 69 73 20 60 6f 66 66 65 72 27 2c 20 61 20 69 74 65 6d 20 28 6f 66 66	value....is.`offer',.a.item.(off
7d80	65 72 69 6e 67 20 74 6f 20 73 61 76 65 29 20 69 73 20 61 64 64 65 64 20 74 6f 20 74 68 65 0a 20	ering.to.save).is.added.to.the..
7da0	20 20 70 6f 70 75 70 20 6d 65 6e 75 2e 20 20 49 66 20 74 68 65 20 76 61 6c 75 65 20 69 73 20 60	..popup.menu...If.the.value.is.`
7dc0	61 6c 77 61 79 73 27 2c 20 65 76 65 72 79 20 74 69 6d 65 20 74 68 61 74 20 61 20 69 74 65 6d 0a	always',.every.time.that.a.item.
7de0	20 20 20 69 73 20 73 65 6c 65 63 74 65 64 2c 20 74 68 65 20 76 61 72 69 61 62 6c 65 20 69 73 20	...is.selected,.the.variable.is.
7e00	73 61 76 65 64 2e 20 20 49 66 20 76 61 6c 75 65 20 69 73 20 6e 69 6c 2c 20 76 61 72 69 61 62 6c	saved...If.value.is.nil,.variabl
7e20	65 0a 20 20 20 73 68 61 6c 6c 20 6e 6f 74 20 62 65 20 73 61 76 65 64 2e 20 20 49 66 20 76 61 6c	e....shall.not.be.saved...If.val
7e40	75 65 20 69 73 20 6e 6f 6e 2d 6e 69 6c 20 74 68 65 6e 20 60 3a 76 61 72 69 61 62 6c 65 27 20 69	ue.is.non-nil.then.`:variable'.i
7e60	73 0a 20 20 20 6d 61 6e 64 61 74 6f 72 79 2e 0a 0a 20 3a 74 69 74 6c 65 20 2d 2d 20 61 20 73 74	s....mandatory....:title.--.a.st
7e80	72 69 6e 67 20 6f 72 20 6e 69 6c 3b 20 69 66 20 61 20 73 74 72 69 6e 67 2c 20 74 68 65 20 70 6f	ring.or.nil;.if.a.string,.the.po
7ea0	70 75 70 20 6d 65 6e 75 20 77 69 6c 6c 20 73 68 6f 77 0a 20 20 20 69 73 20 61 73 20 6d 65 6e 75	pup.menu.will.show....is.as.menu
7ec0	20 74 69 74 6c 65 3b 20 69 66 20 6e 69 6c 2c 20 6e 6f 20 74 69 74 6c 65 20 69 73 20 73 68 6f 77	.title;.if.nil,.no.title.is.show
7ee0	6e 2e 0a 0a 20 3a 64 72 6f 70 64 6f 77 6e 2d 68 65 6c 70 20 2d 2d 20 61 20 73 74 72 69 6e 67 20	n....:dropdown-help.--.a.string.
7f00	6f 72 20 6e 69 6c 3b 20 74 68 65 20 68 65 6c 70 20 73 74 72 69 6e 67 20 6f 66 20 74 68 65 0a 20	or.nil;.the.help.string.of.the..
7f20	20 20 64 72 6f 70 64 6f 77 6e 20 62 75 74 74 6f 6e 2e 0a 0a 20 3a 64 72 6f 70 64 6f 77 6e 2d 69	..dropdown.button....:dropdown-i
7f40	6d 61 67 65 20 2d 2d 20 65 69 74 68 65 72 20 61 20 73 74 72 69 6e 67 20 6f 72 20 61 20 76 65 63	mage.--.either.a.string.or.a.vec
7f60	74 6f 72 20 6f 66 20 34 20 73 74 72 69 6e 67 73 3b 0a 20 20 20 64 65 66 69 6e 65 73 20 74 68 65	tor.of.4.strings;....defines.the
7f80	20 69 6d 61 67 65 20 20 20 66 69 6c 65 20 64 69 73 70 6c 61 79 65 64 20 62 79 20 74 68 65 20 64	.image...file.displayed.by.the.d
7fa0	72 6f 70 64 6f 77 6e 20 62 75 74 74 6f 6e 3b 0a 20 20 20 62 79 20 64 65 66 61 75 6c 74 2c 20 69	ropdown.button;....by.default,.i
7fc0	74 20 69 73 20 74 68 65 20 73 74 72 69 6e 67 20 22 64 72 6f 70 64 6f 77 6e 22 2e 0a 0a 20 3a 64	t.is.the.string."dropdown"....:d
7fe0	72 6f 70 64 6f 77 6e 2d 61 70 70 65 6e 64 2d 63 6f 6d 6d 61 6e 64 2c 0a 20 3a 64 72 6f 70 64 6f	ropdown-append-command,..:dropdo
8000	77 6e 70 72 65 70 65 6e 64 2d 63 6f 6d 6d 61 6e 64 20 2d 2d 20 61 20 66 6f 72 6d 3b 20 61 70 70	wnprepend-command.--.a.form;.app
8020	65 6e 64 20 6f 72 20 70 72 65 70 65 6e 64 20 66 6f 72 6d 73 20 74 6f 0a 20 20 20 74 68 65 20 63	end.or.prepend.forms.to....the.c
8040	6f 6d 6d 61 6e 64 20 74 68 61 74 20 73 68 6f 77 73 20 74 68 65 20 64 72 6f 70 64 6f 77 6e 20 6d	ommand.that.shows.the.dropdown.m
8060	65 6e 75 2c 20 61 6c 6c 6f 77 69 6e 67 20 65 78 74 72 61 20 63 6f 64 65 0a 20 20 20 74 6f 20 72	enu,.allowing.extra.code....to.r
8080	75 6e 20 62 65 66 6f 72 65 20 6f 72 20 61 66 74 65 72 20 74 68 65 20 6d 65 6e 75 20 61 70 70 65	un.before.or.after.the.menu.appe
80a0	61 72 73 20 28 72 65 6d 65 6d 62 65 72 20 74 68 61 74 20 65 76 65 72 79 0a 20 20 20 6d 65 6e 75	ars.(remember.that.every....menu
80c0	20 69 74 65 6d 20 63 6c 69 63 6b 65 64 20 72 65 66 72 65 73 68 20 74 68 65 20 74 6f 6f 6c 62 61	.item.clicked.refresh.the.toolba
80e0	72 2e 29 0a 0a 20 3a 64 72 6f 70 64 6f 77 6e 2d 65 6e 61 62 6c 65 20 2d 2d 20 61 20 66 6f 72 6d	r.)...:dropdown-enable.--.a.form
8100	3b 20 65 76 61 6c 75 61 74 65 64 20 63 6f 6e 73 74 61 6e 74 6c 79 20 62 79 20 62 6f 74 68 20 65	;.evaluated.constantly.by.both.e
8120	64 69 74 6f 72 73 0a 20 20 20 74 6f 20 64 65 74 65 72 6d 69 6e 65 20 69 66 20 74 68 65 20 64 72	ditors....to.determine.if.the.dr
8140	6f 70 64 6f 77 6e 20 62 75 74 74 6f 6e 20 69 73 20 61 63 74 69 76 65 20 28 65 6e 61 62 6c 65 64	opdown.button.is.active.(enabled
8160	29 20 6f 72 0a 20 20 20 6e 6f 74 2e 0a 0a 20 3a 64 72 6f 70 64 6f 77 6e 2d 76 69 73 69 62 6c 65	).or....not....:dropdown-visible
8180	20 2d 2d 20 61 20 66 6f 72 6d 3b 20 69 74 20 69 73 20 65 76 61 6c 75 61 74 65 64 0a 20 20 20 63	.--.a.form;.it.is.evaluated....c
81a0	6f 6e 73 74 61 6e 74 6c 79 20 74 6f 20 64 65 74 65 72 6d 69 6e 65 20 69 66 20 74 68 65 20 64 72	onstantly.to.determine.if.the.dr
81c0	6f 70 64 6f 77 6e 20 62 75 74 74 6f 6e 20 69 73 20 76 69 73 69 62 6c 65 2e 0a 0a 41 6c 73 6f 2c	opdown.button.is.visible...Also,
81e0	20 69 66 20 74 68 65 20 73 79 6d 62 6f 6c 20 60 64 72 6f 70 64 6f 77 6e 27 20 69 73 20 61 73 73	.if.the.symbol.`dropdown'.is.ass
8200	6f 63 69 74 65 64 20 69 6e 20 4d 45 41 4e 49 4e 47 2d 41 4c 49 53 54 0a 77 69 74 68 20 73 6f 6d	ocited.in.MEANING-ALIST.with.som
8220	65 20 70 72 6f 70 65 72 74 69 65 73 2c 20 74 68 65 73 65 20 70 72 6f 70 65 72 74 69 65 73 20 6f	e.properties,.these.properties.o
8240	76 65 72 72 69 64 65 20 28 6f 72 20 61 64 64 29 20 77 69 74 68 0a 68 69 67 68 65 72 20 70 72 65	verride.(or.add).with.higher.pre
8260	63 65 64 65 6e 63 65 2e 0a 0a 53 70 65 63 69 61 6c 20 62 75 74 74 6f 6e 73 0a 3d 3d 3d 3d 3d 3d	cedence...Special.buttons.======
8280	3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 0a 49 66 20 74 68 65 20 73 79 6d 62 6f 6c 20 6f 66 20 61 20 62 75	=========..If.the.symbol.of.a.bu
82a0	74 74 6f 6e 20 69 73 20 60 3a 6e 65 77 2d 6c 69 6e 65 27 2c 20 69 74 20 69 73 20 69 6e 73 65 72	tton.is.`:new-line',.it.is.inser
82c0	74 65 64 0a 61 20 28 66 61 6b 65 64 29 20 72 65 74 75 72 6e 2c 20 61 6e 64 20 74 68 65 20 6e 65	ted.a.(faked).return,.and.the.ne
82e0	78 74 20 62 75 74 74 6f 6e 20 77 69 6c 6c 20 62 65 20 64 69 73 70 6c 61 79 65 64 20 61 20 6e 65	xt.button.will.be.displayed.a.ne
8300	78 74 0a 6c 69 6e 65 20 6f 66 20 62 75 74 74 6f 6e 73 2e 20 20 54 68 65 20 6f 6e 6c 79 20 70 72	xt.line.of.buttons...The.only.pr
8320	6f 70 65 72 74 79 20 73 75 70 70 6f 72 74 65 64 20 66 6f 72 20 74 68 69 73 20 62 75 74 74 6f 6e	operty.supported.for.this.button
8340	20 69 73 0a 60 3a 69 6e 73 65 72 74 27 2e 0a 0a 28 66 6e 20 42 55 54 54 4f 4e 53 20 26 6f 70 74	.is.`:insert'...(fn.BUTTONS.&opt
8360	69 6f 6e 61 6c 20 4d 45 41 4e 49 4e 47 2d 41 4c 49 53 54 20 47 4c 4f 42 41 4c 2d 46 4c 41 47 29	ional.MEANING-ALIST.GLOBAL-FLAG)
8380	1f 0a 28 64 65 66 61 6c 69 61 73 20 27 74 6f 6f 6c 62 61 72 78 2d 69 6e 73 74 61 6c 6c 2d 74 6f	..(defalias.'toolbarx-install-to
83a0	6f 6c 62 61 72 20 23 5b 37 36 39 20 22 5c 33 30 31 03 03 5c 33 30 32 5c 32 31 31 24 01 5c 32 30	olbar.#[769."\301..\302\211$.\20
83c0	33 13 00 5c 33 30 33 5c 33 30 30 02 5c 22 5c 32 36 36 02 5c 32 30 32 1e 00 5c 33 30 34 5c 33 30	3..\303\300.\"\266.\202..\304\30
83e0	30 21 5c 32 31 30 5c 32 31 31 10 5c 33 30 34 5c 33 30 35 21 5c 32 36 36 02 5c 33 30 36 01 21 5c	0!\210\211.\304\305!\266.\306.!\
8400	32 30 37 22 20 5b 74 6f 6f 6c 62 61 72 78 2d 69 6e 74 65 72 6e 61 6c 2d 62 75 74 74 6f 6e 2d 73	207".[toolbarx-internal-button-s
8420	77 69 74 63 68 65 73 20 74 6f 6f 6c 62 61 72 78 2d 70 72 6f 63 65 73 73 2d 67 72 6f 75 70 20 6e	witches.toolbarx-process-group.n
8440	69 6c 20 73 65 74 2d 64 65 66 61 75 6c 74 20 6d 61 6b 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62	il.set-default.make-local-variab
8460	6c 65 20 74 6f 6f 6c 2d 62 61 72 2d 6d 61 70 20 74 6f 6f 6c 62 61 72 78 2d 72 65 66 72 65 73 68	le.tool-bar-map.toolbarx-refresh
8480	5d 20 38 20 28 23 24 20 2e 20 32 34 33 34 35 29 5d 29 0a 23 40 36 39 34 20 41 20 6d 65 61 6e 69	].8.(#$...24345)]).#@694.A.meani
84a0	6e 67 20 61 6c 69 73 74 20 77 69 74 68 20 64 65 66 69 6e 69 74 69 6f 6e 20 6f 66 20 74 68 65 20	ng.alist.with.definition.of.the.
84c0	64 65 66 61 75 6c 74 20 62 75 74 74 6f 6e 73 2e 0a 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 62	default.buttons..The.following.b
84e0	75 74 74 6f 6e 73 20 61 72 65 20 61 76 61 69 6c 61 62 6c 65 3a 0a 0a 20 20 60 6f 70 65 6e 2d 66	uttons.are.available:....`open-f
8500	69 6c 65 27 2c 20 60 64 69 72 65 64 27 2c 20 60 73 61 76 65 2d 62 75 66 66 65 72 27 2c 0a 20 20	ile',.`dired',.`save-buffer',...
8520	60 75 6e 64 6f 27 2c 20 60 63 75 74 27 2c 20 60 63 6f 70 79 27 2c 20 60 70 61 73 74 65 27 2c 20	`undo',.`cut',.`copy',.`paste',.
8540	60 73 65 61 72 63 68 2d 72 65 70 6c 61 63 65 27 2c 20 60 70 72 69 6e 74 2d 62 75 66 66 65 72 27	`search-replace',.`print-buffer'
8560	2c 0a 20 20 60 73 70 65 6c 6c 2d 62 75 66 66 65 72 27 2c 20 60 69 6e 66 6f 27 2e 0a 20 20 60 6e	,...`spell-buffer',.`info'....`n
8580	65 77 2d 66 69 6c 65 27 2c 20 60 77 72 69 74 65 2d 66 69 6c 65 27 2c 20 60 73 65 61 72 63 68 2d	ew-file',.`write-file',.`search-
85a0	66 6f 72 77 61 72 64 27 2c 0a 20 20 60 63 75 73 74 6f 6d 69 7a 65 27 2c 20 60 68 65 6c 70 27 2c	forward',...`customize',.`help',
85c0	20 60 6b 69 6c 6c 2d 62 75 66 66 65 72 27 2c 20 60 65 78 69 74 2d 65 6d 61 63 73 27 2e 0a 0a 54	.`kill-buffer',.`exit-emacs'...T
85e0	6f 20 72 65 70 72 6f 64 75 63 65 20 74 68 65 20 64 65 66 61 75 6c 74 20 74 6f 6f 6c 62 61 72 20	o.reproduce.the.default.toolbar.
8600	77 69 74 68 20 75 73 65 20 61 73 20 42 55 54 54 4f 4e 0a 69 6e 20 60 74 6f 6f 6c 62 61 72 78 2d	with.use.as.BUTTON.in.`toolbarx-
8620	69 6e 73 74 61 6c 6c 2d 74 6f 6f 6c 62 61 72 27 3a 0a 0a 28 74 6f 6f 6c 62 61 72 78 2d 69 6e 73	install-toolbar':..(toolbarx-ins
8640	74 61 6c 6c 2d 74 6f 6f 6c 62 61 72 0a 20 5c 3d 27 28 28 6f 70 65 6e 2d 66 69 6c 65 20 64 69 72	tall-toolbar..\='((open-file.dir
8660	65 64 20 6b 69 6c 6c 2d 62 75 66 66 65 72 20 73 61 76 65 2d 62 75 66 66 65 72 20 77 72 69 74 65	ed.kill-buffer.save-buffer.write
8680	2d 66 69 6c 65 20 75 6e 64 6f 20 63 75 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f	-file.undo.cut................co
86a0	70 79 20 70 61 73 74 65 20 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 70 72 69 6e 74 2d 62 75	py.paste.search-forward.print-bu
86c0	66 66 65 72 20 63 75 73 74 6f 6d 69 7a 65 20 68 65 6c 70 29 29 0a 20 74 6f 6f 6c 62 61 72 78 2d	ffer.customize.help))..toolbarx-
86e0	64 65 66 61 75 6c 74 2d 74 6f 6f 6c 62 61 72 2d 6d 65 61 6e 69 6e 67 2d 61 6c 69 73 74 29 0a 0a	default-toolbar-meaning-alist)..
8700	50 73 2e 3a 20 74 68 65 72 65 20 61 72 65 20 6d 6f 72 65 20 62 75 74 74 6f 6e 73 20 61 76 61 69	Ps.:.there.are.more.buttons.avai
8720	6c 61 62 6c 65 20 74 68 61 6e 20 73 75 67 67 65 73 74 65 64 20 69 6e 20 74 68 65 0a 65 78 70 72	lable.than.suggested.in.the.expr
8740	65 73 73 69 6f 6e 20 61 62 6f 76 65 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20 74 6f 6f 6c 62 61 72	ession.above...(defconst.toolbar
8760	78 2d 64 65 66 61 75 6c 74 2d 74 6f 6f 6c 62 61 72 2d 6d 65 61 6e 69 6e 67 2d 61 6c 69 73 74 20	x-default-toolbar-meaning-alist.
8780	27 28 28 73 65 70 61 72 61 74 6f 72 20 3a 69 6d 61 67 65 20 22 73 65 70 22 20 3a 63 6f 6d 6d 61	'((separator.:image."sep".:comma
87a0	6e 64 20 74 20 3a 65 6e 61 62 6c 65 20 6e 69 6c 20 3a 68 65 6c 70 20 22 22 29 20 28 6e 65 77 2d	nd.t.:enable.nil.:help."").(new-
87c0	66 69 6c 65 20 3a 69 6d 61 67 65 20 22 6e 65 77 22 20 3a 63 6f 6d 6d 61 6e 64 20 66 69 6e 64 2d	file.:image."new".:command.find-
87e0	66 69 6c 65 20 3a 65 6e 61 62 6c 65 20 28 6e 6f 74 20 28 77 69 6e 64 6f 77 2d 6d 69 6e 69 62 75	file.:enable.(not.(window-minibu
8800	66 66 65 72 2d 70 20 28 66 72 61 6d 65 2d 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 20 6d 65	ffer-p.(frame-selected-window.me
8820	6e 75 2d 75 70 64 61 74 69 6e 67 2d 66 72 61 6d 65 29 29 29 20 3a 68 65 6c 70 20 22 53 70 65 63	nu-updating-frame))).:help."Spec
8840	69 66 79 20 61 20 6e 65 77 20 66 69 6c 65 27 73 20 6e 61 6d 65 2c 20 74 6f 20 65 64 69 74 20 74	ify.a.new.file's.name,.to.edit.t
8860	68 65 20 66 69 6c 65 22 29 20 28 6f 70 65 6e 2d 66 69 6c 65 20 3a 69 6d 61 67 65 20 22 6f 70 65	he.file").(open-file.:image."ope
8880	6e 22 20 3a 63 6f 6d 6d 61 6e 64 20 6d 65 6e 75 2d 66 69 6e 64 2d 66 69 6c 65 2d 65 78 69 73 74	n".:command.menu-find-file-exist
88a0	69 6e 67 20 3a 65 6e 61 62 6c 65 20 28 6e 6f 74 20 28 77 69 6e 64 6f 77 2d 6d 69 6e 69 62 75 66	ing.:enable.(not.(window-minibuf
88c0	66 65 72 2d 70 20 28 66 72 61 6d 65 2d 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 20 6d 65 6e	fer-p.(frame-selected-window.men
88e0	75 2d 75 70 64 61 74 69 6e 67 2d 66 72 61 6d 65 29 29 29 20 3a 68 65 6c 70 20 22 52 65 61 64 20	u-updating-frame))).:help."Read.
8900	61 20 66 69 6c 65 20 69 6e 74 6f 20 61 6e 20 45 6d 61 63 73 20 62 75 66 66 65 72 22 29 20 28 64	a.file.into.an.Emacs.buffer").(d
8920	69 72 65 64 20 3a 69 6d 61 67 65 20 22 64 69 72 6f 70 65 6e 22 20 3a 63 6f 6d 6d 61 6e 64 20 64	ired.:image."diropen".:command.d
8940	69 72 65 64 20 3a 68 65 6c 70 20 22 52 65 61 64 20 61 20 64 69 72 65 63 74 6f 72 79 2c 20 6f 70	ired.:help."Read.a.directory,.op
8960	65 72 61 74 65 20 6f 6e 20 69 74 73 20 66 69 6c 65 73 22 29 20 28 73 61 76 65 2d 62 75 66 66 65	erate.on.its.files").(save-buffe
8980	72 20 3a 69 6d 61 67 65 20 22 73 61 76 65 22 20 3a 63 6f 6d 6d 61 6e 64 20 73 61 76 65 2d 62 75	r.:image."save".:command.save-bu
89a0	66 66 65 72 20 3a 65 6e 61 62 6c 65 20 28 61 6e 64 20 28 62 75 66 66 65 72 2d 6d 6f 64 69 66 69	ffer.:enable.(and.(buffer-modifi
89c0	65 64 2d 70 29 20 28 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 29 20 28 6e 6f 74 20 28 77	ed-p).(buffer-file-name).(not.(w
89e0	69 6e 64 6f 77 2d 6d 69 6e 69 62 75 66 66 65 72 2d 70 20 28 66 72 61 6d 65 2d 73 65 6c 65 63 74	indow-minibuffer-p.(frame-select
8a00	65 64 2d 77 69 6e 64 6f 77 20 6d 65 6e 75 2d 75 70 64 61 74 69 6e 67 2d 66 72 61 6d 65 29 29 29	ed-window.menu-updating-frame)))
8a20	29 20 3a 68 65 6c 70 20 22 53 61 76 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 20 74 6f 20	).:help."Save.current.buffer.to.
8a40	69 74 73 20 66 69 6c 65 22 20 3a 76 69 73 69 62 6c 65 20 28 6f 72 20 62 75 66 66 65 72 2d 66 69	its.file".:visible.(or.buffer-fi
8a60	6c 65 2d 6e 61 6d 65 20 28 6e 6f 74 20 28 65 71 20 27 73 70 65 63 69 61 6c 20 28 67 65 74 20 6d	le-name.(not.(eq.'special.(get.m
8a80	61 6a 6f 72 2d 6d 6f 64 65 20 27 6d 6f 64 65 2d 63 6c 61 73 73 29 29 29 29 29 20 28 77 72 69 74	ajor-mode.'mode-class))))).(writ
8aa0	65 2d 66 69 6c 65 20 3a 69 6d 61 67 65 20 22 73 61 76 65 61 73 22 20 3a 63 6f 6d 6d 61 6e 64 20	e-file.:image."saveas".:command.
8ac0	77 72 69 74 65 2d 66 69 6c 65 20 3a 65 6e 61 62 6c 65 20 28 6e 6f 74 20 28 77 69 6e 64 6f 77 2d	write-file.:enable.(not.(window-
8ae0	6d 69 6e 69 62 75 66 66 65 72 2d 70 20 28 66 72 61 6d 65 2d 73 65 6c 65 63 74 65 64 2d 77 69 6e	minibuffer-p.(frame-selected-win
8b00	64 6f 77 20 6d 65 6e 75 2d 75 70 64 61 74 69 6e 67 2d 66 72 61 6d 65 29 29 29 20 3a 68 65 6c 70	dow.menu-updating-frame))).:help
8b20	20 22 57 72 69 74 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 20 74 6f 20 61 6e 6f 74 68 65	."Write.current.buffer.to.anothe
8b40	72 20 66 69 6c 65 22 20 3a 76 69 73 69 62 6c 65 20 28 6f 72 20 62 75 66 66 65 72 2d 66 69 6c 65	r.file".:visible.(or.buffer-file
8b60	2d 6e 61 6d 65 20 28 6e 6f 74 20 28 65 71 20 27 73 70 65 63 69 61 6c 20 28 67 65 74 20 6d 61 6a	-name.(not.(eq.'special.(get.maj
8b80	6f 72 2d 6d 6f 64 65 20 27 6d 6f 64 65 2d 63 6c 61 73 73 29 29 29 29 29 20 28 75 6e 64 6f 20 3a	or-mode.'mode-class))))).(undo.:
8ba0	69 6d 61 67 65 20 22 75 6e 64 6f 22 20 3a 63 6f 6d 6d 61 6e 64 20 75 6e 64 6f 20 3a 65 6e 61 62	image."undo".:command.undo.:enab
8bc0	6c 65 20 28 61 6e 64 20 28 6e 6f 74 20 62 75 66 66 65 72 2d 72 65 61 64 2d 6f 6e 6c 79 29 20 28	le.(and.(not.buffer-read-only).(
8be0	6e 6f 74 20 28 65 71 20 74 20 62 75 66 66 65 72 2d 75 6e 64 6f 2d 6c 69 73 74 29 29 20 28 69 66	not.(eq.t.buffer-undo-list)).(if
8c00	20 28 65 71 20 6c 61 73 74 2d 63 6f 6d 6d 61 6e 64 20 23 27 75 6e 64 6f 29 20 70 65 6e 64 69 6e	.(eq.last-command.#'undo).pendin
8c20	67 2d 75 6e 64 6f 2d 6c 69 73 74 20 28 63 6f 6e 73 70 20 62 75 66 66 65 72 2d 75 6e 64 6f 2d 6c	g-undo-list.(consp.buffer-undo-l
8c40	69 73 74 29 29 29 20 3a 68 65 6c 70 20 22 55 6e 64 6f 20 6c 61 73 74 20 6f 70 65 72 61 74 69 6f	ist))).:help."Undo.last.operatio
8c60	6e 22 20 3a 76 69 73 69 62 6c 65 20 28 6e 6f 74 20 28 65 71 20 27 73 70 65 63 69 61 6c 20 28 67	n".:visible.(not.(eq.'special.(g
8c80	65 74 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 6d 6f 64 65 2d 63 6c 61 73 73 29 29 29 29 20 28 63	et.major-mode.'mode-class)))).(c
8ca0	75 74 20 3a 69 6d 61 67 65 20 22 63 75 74 22 20 3a 68 65 6c 70 20 22 44 65 6c 65 74 65 20 74 65	ut.:image."cut".:help."Delete.te
8cc0	78 74 20 69 6e 20 72 65 67 69 6f 6e 20 61 6e 64 20 63 6f 70 79 20 69 74 20 74 6f 20 74 68 65 20	xt.in.region.and.copy.it.to.the.
8ce0	63 6c 69 70 62 6f 61 72 64 22 20 3a 63 6f 6d 6d 61 6e 64 20 63 6c 69 70 62 6f 61 72 64 2d 6b 69	clipboard".:command.clipboard-ki
8d00	6c 6c 2d 72 65 67 69 6f 6e 20 3a 76 69 73 69 62 6c 65 20 28 6e 6f 74 20 28 65 71 20 27 73 70 65	ll-region.:visible.(not.(eq.'spe
8d20	63 69 61 6c 20 28 67 65 74 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 6d 6f 64 65 2d 63 6c 61 73 73	cial.(get.major-mode.'mode-class
8d40	29 29 29 29 20 28 63 6f 70 79 20 3a 69 6d 61 67 65 20 22 63 6f 70 79 22 20 3a 68 65 6c 70 20 22	)))).(copy.:image."copy".:help."
8d60	43 6f 70 79 20 74 65 78 74 20 69 6e 20 72 65 67 69 6f 6e 20 74 6f 20 74 68 65 20 63 6c 69 70 62	Copy.text.in.region.to.the.clipb
8d80	6f 61 72 64 22 20 3a 63 6f 6d 6d 61 6e 64 20 63 6c 69 70 62 6f 61 72 64 2d 6b 69 6c 6c 2d 72 69	oard".:command.clipboard-kill-ri
8da0	6e 67 2d 73 61 76 65 29 20 28 70 61 73 74 65 20 3a 69 6d 61 67 65 20 22 70 61 73 74 65 22 20 3a	ng-save).(paste.:image."paste".:
8dc0	68 65 6c 70 20 22 50 61 73 74 65 20 74 65 78 74 20 66 72 6f 6d 20 63 6c 69 70 62 6f 61 72 64 22	help."Paste.text.from.clipboard"
8de0	20 3a 63 6f 6d 6d 61 6e 64 20 63 6c 69 70 62 6f 61 72 64 2d 79 61 6e 6b 20 3a 76 69 73 69 62 6c	.:command.clipboard-yank.:visibl
8e00	65 20 28 6e 6f 74 20 28 65 71 20 27 73 70 65 63 69 61 6c 20 28 67 65 74 20 6d 61 6a 6f 72 2d 6d	e.(not.(eq.'special.(get.major-m
8e20	6f 64 65 20 27 6d 6f 64 65 2d 63 6c 61 73 73 29 29 29 29 20 28 73 65 61 72 63 68 2d 66 6f 72 77	ode.'mode-class)))).(search-forw
8e40	61 72 64 20 3a 63 6f 6d 6d 61 6e 64 20 6e 6f 6e 69 6e 63 72 65 6d 65 6e 74 61 6c 2d 73 65 61 72	ard.:command.nonincremental-sear
8e60	63 68 2d 66 6f 72 77 61 72 64 20 3a 68 65 6c 70 20 22 53 65 61 72 63 68 20 66 6f 72 77 61 72 64	ch-forward.:help."Search.forward
8e80	20 66 6f 72 20 61 20 73 74 72 69 6e 67 22 20 3a 69 6d 61 67 65 20 22 73 65 61 72 63 68 22 29 20	.for.a.string".:image."search").
8ea0	28 73 65 61 72 63 68 2d 72 65 70 6c 61 63 65 20 3a 69 6d 61 67 65 20 22 73 65 61 72 63 68 2d 72	(search-replace.:image."search-r
8ec0	65 70 6c 61 63 65 22 20 3a 63 6f 6d 6d 61 6e 64 20 71 75 65 72 79 2d 72 65 70 6c 61 63 65 20 3a	eplace".:command.query-replace.:
8ee0	68 65 6c 70 20 22 52 65 70 6c 61 63 65 20 73 74 72 69 6e 67 20 69 6e 74 65 72 61 63 74 69 76 65	help."Replace.string.interactive
8f00	6c 79 2c 20 61 73 6b 20 61 62 6f 75 74 20 65 61 63 68 20 6f 63 63 75 72 72 65 6e 63 65 22 29 20	ly,.ask.about.each.occurrence").
8f20	28 70 72 69 6e 74 2d 62 75 66 66 65 72 20 3a 69 6d 61 67 65 20 22 70 72 69 6e 74 22 20 3a 63 6f	(print-buffer.:image."print".:co
8f40	6d 6d 61 6e 64 20 70 72 69 6e 74 2d 62 75 66 66 65 72 20 3a 68 65 6c 70 20 22 50 72 69 6e 74 20	mmand.print-buffer.:help."Print.
8f60	63 75 72 72 65 6e 74 20 62 75 66 66 65 72 20 77 69 74 68 20 70 61 67 65 20 68 65 61 64 69 6e 67	current.buffer.with.page.heading
8f80	73 22 29 20 28 63 75 73 74 6f 6d 69 7a 65 20 3a 69 6d 61 67 65 20 22 70 72 65 66 65 72 65 6e 63	s").(customize.:image."preferenc
8fa0	65 73 22 20 3a 63 6f 6d 6d 61 6e 64 20 63 75 73 74 6f 6d 69 7a 65 20 3a 68 65 6c 70 20 22 45 64	es".:command.customize.:help."Ed
8fc0	69 74 20 70 72 65 66 65 72 65 6e 63 65 73 20 28 63 75 73 74 6f 6d 69 7a 65 29 22 29 20 28 68 65	it.preferences.(customize)").(he
8fe0	6c 70 20 3a 69 6d 61 67 65 20 22 68 65 6c 70 22 20 3a 63 6f 6d 6d 61 6e 64 20 28 6c 61 6d 62 64	lp.:image."help".:command.(lambd
9000	61 20 6e 69 6c 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 70 6f 70 75 70 2d 6d 65 6e 75 20	a.nil.(interactive).(popup-menu.
9020	6d 65 6e 75 2d 62 61 72 2d 68 65 6c 70 2d 6d 65 6e 75 29 29 20 3a 68 65 6c 70 20 22 50 6f 70 20	menu-bar-help-menu)).:help."Pop.
9040	75 70 20 74 68 65 20 48 65 6c 70 20 6d 65 6e 75 22 29 20 28 6b 69 6c 6c 2d 62 75 66 66 65 72 20	up.the.Help.menu").(kill-buffer.
9060	3a 63 6f 6d 6d 61 6e 64 20 6b 69 6c 6c 2d 74 68 69 73 2d 62 75 66 66 65 72 20 3a 65 6e 61 62 6c	:command.kill-this-buffer.:enabl
9080	65 20 28 6b 69 6c 6c 2d 74 68 69 73 2d 62 75 66 66 65 72 2d 65 6e 61 62 6c 65 64 2d 70 29 20 3a	e.(kill-this-buffer-enabled-p).:
90a0	68 65 6c 70 20 22 44 69 73 63 61 72 64 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 22 20 3a 69	help."Discard.current.buffer".:i
90c0	6d 61 67 65 20 22 63 6c 6f 73 65 22 29 20 28 65 78 69 74 2d 65 6d 61 63 73 20 3a 69 6d 61 67 65	mage."close").(exit-emacs.:image
90e0	20 22 65 78 69 74 22 20 3a 63 6f 6d 6d 61 6e 64 20 73 61 76 65 2d 62 75 66 66 65 72 73 2d 6b 69	."exit".:command.save-buffers-ki
9100	6c 6c 2d 65 6d 61 63 73 20 3a 68 65 6c 70 20 22 4f 66 66 65 72 20 74 6f 20 73 61 76 65 20 75 6e	ll-emacs.:help."Offer.to.save.un
9120	73 61 76 65 64 20 62 75 66 66 65 72 73 2c 20 74 68 65 6e 20 65 78 69 74 20 45 6d 61 63 73 22 29	saved.buffers,.then.exit.Emacs")
9140	20 28 73 70 65 6c 6c 2d 62 75 66 66 65 72 20 3a 69 6d 61 67 65 20 22 73 70 65 6c 6c 22 20 3a 63	.(spell-buffer.:image."spell".:c
9160	6f 6d 6d 61 6e 64 20 69 73 70 65 6c 6c 2d 62 75 66 66 65 72 20 3a 68 65 6c 70 20 22 43 68 65 63	ommand.ispell-buffer.:help."Chec
9180	6b 20 73 70 65 6c 6c 69 6e 67 20 6f 66 20 73 65 6c 65 63 74 65 64 20 62 75 66 66 65 72 22 29 20	k.spelling.of.selected.buffer").
91a0	28 69 6e 66 6f 20 3a 69 6d 61 67 65 20 22 69 6e 66 6f 22 20 3a 63 6f 6d 6d 61 6e 64 20 69 6e 66	(info.:image."info".:command.inf
91c0	6f 20 3a 68 65 6c 70 20 22 45 6e 74 65 72 20 49 6e 66 6f 2c 20 74 68 65 20 64 6f 63 75 6d 65 6e	o.:help."Enter.Info,.the.documen
91e0	74 61 74 69 6f 6e 20 62 72 6f 77 73 65 72 22 29 29 20 28 23 24 20 2e 20 33 33 39 34 35 29 29 0a	tation.browser")).(#$...33945)).
9200	28 70 72 6f 76 69 64 65 20 27 74 6f 6f 6c 62 61 72 2d 78 29 0a	(provide.'toolbar-x).