summaryrefslogtreecommitdiff
path: root/.localrepo/alert-20250823.650.tar
blob: a86463167b55c028be47ef106fbce450a131a2f2 (plain)
ofshex dumpascii
0000 61 6c 65 72 74 2d 32 30 32 35 30 38 32 33 2e 36 35 30 2f 00 00 00 00 00 00 00 00 00 00 00 00 00 alert-20250823.650/.............
0020 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0040 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0060 00 00 00 00 30 30 30 30 37 35 35 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000755.0000000.0000000.0000
0080 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 32 30 34 30 00 20 35 00 00 00 0000000.00000000000.012040..5...
00a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
00c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
00e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0100 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
0120 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
0140 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
01a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
01c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
01e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0200 61 6c 65 72 74 2d 32 30 32 35 30 38 32 33 2e 36 35 30 2f 61 6c 65 72 74 2d 70 6b 67 2e 65 6c 00 alert-20250823.650/alert-pkg.el.
0220 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0240 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0260 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
0280 30 30 30 30 37 34 31 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 32 35 32 00 20 30 00 00 00 0000741.00000000000.014252..0...
02a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
02c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
02e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0300 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
0320 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
0340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
03a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
03c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
03e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0400 3b 3b 20 2d 2a 2d 20 6e 6f 2d 62 79 74 65 2d 63 6f 6d 70 69 6c 65 3a 20 74 3b 20 6c 65 78 69 63 ;;.-*-.no-byte-compile:.t;.lexic
0420 61 6c 2d 62 69 6e 64 69 6e 67 3a 20 6e 69 6c 20 2d 2a 2d 0a 28 64 65 66 69 6e 65 2d 70 61 63 6b al-binding:.nil.-*-.(define-pack
0440 61 67 65 20 22 61 6c 65 72 74 22 20 22 32 30 32 35 30 38 32 33 2e 36 35 30 22 0a 20 20 22 47 72 age."alert"."20250823.650"..."Gr
0460 6f 77 6c 2d 73 74 79 6c 65 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 73 79 73 74 65 6d 20 66 6f owl-style.notification.system.fo
0480 72 20 45 6d 61 63 73 2e 22 0a 20 20 27 28 28 67 6e 74 70 20 20 20 22 30 2e 31 22 29 0a 20 20 20 r.Emacs."...'((gntp..."0.1")....
04a0 20 28 6c 6f 67 34 65 20 20 22 30 2e 33 2e 30 22 29 0a 20 20 20 20 28 63 6c 2d 6c 69 62 20 22 30 .(log4e.."0.3.0").....(cl-lib."0
04c0 2e 35 22 29 29 0a 20 20 3a 75 72 6c 20 22 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d .5"))...:url."https://github.com
04e0 2f 6a 77 69 65 67 6c 65 79 2f 61 6c 65 72 74 22 0a 20 20 3a 63 6f 6d 6d 69 74 20 22 37 39 66 36 /jwiegley/alert"...:commit."79f6
0500 39 33 36 61 62 34 64 38 35 32 32 37 35 33 30 39 35 39 38 31 31 31 34 33 34 32 39 33 34 37 61 36 936ab4d85227530959811143429347a6
0520 39 37 31 62 22 0a 20 20 3a 72 65 76 64 65 73 63 20 22 37 39 66 36 39 33 36 61 62 34 64 38 22 0a 971b"...:revdesc."79f6936ab4d8".
0540 20 20 3a 6b 65 79 77 6f 72 64 73 20 27 28 22 6e 6f 74 69 66 69 63 61 74 69 6f 6e 22 20 22 65 6d ..:keywords.'("notification"."em
0560 61 63 73 22 20 22 6d 65 73 73 61 67 65 22 29 0a 20 20 3a 61 75 74 68 6f 72 73 20 27 28 28 22 4a acs"."message")...:authors.'(("J
0580 6f 68 6e 20 57 69 65 67 6c 65 79 22 20 2e 20 22 6a 77 69 65 67 6c 65 79 40 67 6d 61 69 6c 2e 63 ohn.Wiegley"..."jwiegley@gmail.c
05a0 6f 6d 22 29 29 0a 20 20 3a 6d 61 69 6e 74 61 69 6e 65 72 73 20 27 28 28 22 4a 6f 68 6e 20 57 69 om"))...:maintainers.'(("John.Wi
05c0 65 67 6c 65 79 22 20 2e 20 22 6a 77 69 65 67 6c 65 79 40 67 6d 61 69 6c 2e 63 6f 6d 22 29 29 29 egley"..."jwiegley@gmail.com")))
05e0 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0600 61 6c 65 72 74 2d 32 30 32 35 30 38 32 33 2e 36 35 30 2f 61 6c 65 72 74 2e 65 6c 00 00 00 00 00 alert-20250823.650/alert.el.....
0620 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0660 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
0680 30 31 34 30 31 30 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 33 34 36 37 00 20 30 00 00 00 0140102.00000000000.013467..0...
06a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
06c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
06e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0700 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
0720 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
0740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
07a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
07c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
07e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0800 3b 3b 3b 20 61 6c 65 72 74 2e 65 6c 20 2d 2d 2d 20 47 72 6f 77 6c 2d 73 74 79 6c 65 20 6e 6f 74 ;;;.alert.el.---.Growl-style.not
0820 69 66 69 63 61 74 69 6f 6e 20 73 79 73 74 65 6d 20 66 6f 72 20 45 6d 61 63 73 20 20 2d 2a 2d 20 ification.system.for.Emacs..-*-.
0840 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 20 74 3b 20 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 lexical-binding:.t;.-*-..;;.Copy
0860 72 69 67 68 74 20 28 43 29 20 32 30 31 31 2d 32 30 31 33 20 4a 6f 68 6e 20 57 69 65 67 6c 65 79 right.(C).2011-2013.John.Wiegley
0880 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 4a 6f 68 6e 20 57 69 65 67 6c 65 79 20 3c 6a 77 69 65 67 ..;;.Author:.John.Wiegley.<jwieg
08a0 6c 65 79 40 67 6d 61 69 6c 2e 63 6f 6d 3e 0a 3b 3b 20 43 72 65 61 74 65 64 3a 20 32 34 20 41 75 ley@gmail.com>.;;.Created:.24.Au
08c0 67 20 32 30 31 31 0a 3b 3b 20 55 70 64 61 74 65 64 3a 20 31 36 20 4d 61 72 20 32 30 31 35 0a 3b g.2011.;;.Updated:.16.Mar.2015.;
08e0 3b 20 50 61 63 6b 61 67 65 2d 56 65 72 73 69 6f 6e 3a 20 32 30 32 35 30 38 32 33 2e 36 35 30 0a ;.Package-Version:.20250823.650.
0900 3b 3b 20 50 61 63 6b 61 67 65 2d 52 65 76 69 73 69 6f 6e 3a 20 37 39 66 36 39 33 36 61 62 34 64 ;;.Package-Revision:.79f6936ab4d
0920 38 0a 3b 3b 20 50 61 63 6b 61 67 65 2d 52 65 71 75 69 72 65 73 3a 20 28 28 67 6e 74 70 20 22 30 8.;;.Package-Requires:.((gntp."0
0940 2e 31 22 29 20 28 6c 6f 67 34 65 20 22 30 2e 33 2e 30 22 29 20 28 63 6c 2d 6c 69 62 20 22 30 2e .1").(log4e."0.3.0").(cl-lib."0.
0960 35 22 29 29 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 65 5")).;;.Keywords:.notification.e
0980 6d 61 63 73 20 6d 65 73 73 61 67 65 0a 3b 3b 20 58 2d 55 52 4c 3a 20 68 74 74 70 73 3a 2f 2f 67 macs.message.;;.X-URL:.https://g
09a0 69 74 68 75 62 2e 63 6f 6d 2f 6a 77 69 65 67 6c 65 79 2f 61 6c 65 72 74 0a 0a 3b 3b 20 54 68 69 ithub.com/jwiegley/alert..;;.Thi
09c0 73 20 70 72 6f 67 72 61 6d 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3b 20 79 6f 75 20 s.program.is.free.software;.you.
09e0 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 0a 3b 3b 20 6d 6f can.redistribute.it.and/or.;;.mo
0a00 64 69 66 79 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 47 dify.it.under.the.terms.of.the.G
0a20 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 0a 3b 3b 20 NU.General.Public.License.as.;;.
0a40 70 75 62 6c 69 73 68 65 64 20 62 79 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 published.by.the.Free.Software.F
0a60 6f 75 6e 64 61 74 69 6f 6e 3b 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 32 2c 20 6f 72 20 oundation;.either.version.2,.or.
0a80 28 61 74 0a 3b 3b 20 79 6f 75 72 20 6f 70 74 69 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 (at.;;.your.option).any.later.ve
0aa0 72 73 69 6f 6e 2e 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 64 69 73 74 72 rsion...;;.This.program.is.distr
0ac0 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c 20 ibuted.in.the.hope.that.it.will.
0ae0 62 65 20 75 73 65 66 75 6c 2c 20 62 75 74 0a 3b 3b 20 57 49 54 48 4f 55 54 20 41 4e 59 20 57 41 be.useful,.but.;;.WITHOUT.ANY.WA
0b00 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 RRANTY;.without.even.the.implied
0b20 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 20 .warranty.of.;;.MERCHANTABILITY.
0b40 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 or.FITNESS.FOR.A.PARTICULAR.PURP
0b60 4f 53 45 2e 20 20 53 65 65 20 74 68 65 20 47 4e 55 0a 3b 3b 20 47 65 6e 65 72 61 6c 20 50 75 62 OSE...See.the.GNU.;;.General.Pub
0b80 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 0a 3b lic.License.for.more.details...;
0ba0 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 ;.You.should.have.received.a.cop
0bc0 79 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 y.of.the.GNU.General.Public.Lice
0be0 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 74 68 20 47 4e 55 20 45 6d 61 63 73 3b 20 73 65 65 nse.;;.along.with.GNU.Emacs;.see
0c00 20 74 68 65 20 66 69 6c 65 20 43 4f 50 59 49 4e 47 2e 20 20 49 66 20 6e 6f 74 2c 20 77 72 69 74 .the.file.COPYING...If.not,.writ
0c20 65 20 74 6f 20 74 68 65 0a 3b 3b 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 e.to.the.;;.Free.Software.Founda
0c40 74 69 6f 6e 2c 20 49 6e 63 2e 2c 20 35 39 20 54 65 6d 70 6c 65 20 50 6c 61 63 65 20 2d 20 53 75 tion,.Inc.,.59.Temple.Place.-.Su
0c60 69 74 65 20 33 33 30 2c 0a 3b 3b 20 42 6f 73 74 6f 6e 2c 20 4d 41 20 30 32 31 31 31 2d 31 33 30 ite.330,.;;.Boston,.MA.02111-130
0c80 37 2c 20 55 53 41 2e 0a 0c 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 20 41 6c 7,.USA....;;;.Commentary:..;;.Al
0ca0 65 72 74 20 69 73 20 61 20 47 72 6f 77 6c 2d 77 6f 72 6b 61 6c 69 6b 65 20 66 6f 72 20 45 6d 61 ert.is.a.Growl-workalike.for.Ema
0cc0 63 73 20 77 68 69 63 68 20 75 73 65 73 20 61 20 63 6f 6d 6d 6f 6e 20 6e 6f 74 69 66 69 63 61 74 cs.which.uses.a.common.notificat
0ce0 69 6f 6e 0a 3b 3b 20 69 6e 74 65 72 66 61 63 65 20 61 6e 64 20 6d 75 6c 74 69 70 6c 65 2c 20 73 ion.;;.interface.and.multiple,.s
0d00 65 6c 65 63 74 61 62 6c 65 20 22 73 74 79 6c 65 73 22 2c 20 77 68 6f 73 65 20 75 73 65 20 69 73 electable."styles",.whose.use.is
0d20 20 66 75 6c 6c 79 0a 3b 3b 20 63 75 73 74 6f 6d 69 7a 61 62 6c 65 20 62 79 20 74 68 65 20 75 73 .fully.;;.customizable.by.the.us
0d40 65 72 2e 0a 3b 3b 0a 3b 3b 20 2a 20 46 6f 72 20 6d 6f 64 75 6c 65 20 77 72 69 74 65 72 73 0a 3b er..;;.;;.*.For.module.writers.;
0d60 3b 0a 3b 3b 20 4a 75 73 74 20 75 73 65 20 60 61 6c 65 72 74 27 20 69 6e 73 74 65 61 64 20 6f 66 ;.;;.Just.use.`alert'.instead.of
0d80 20 60 6d 65 73 73 61 67 65 27 20 61 73 20 66 6f 6c 6c 6f 77 73 3a 0a 3b 3b 0a 3b 3b 20 20 20 28 .`message'.as.follows:.;;.;;...(
0da0 72 65 71 75 69 72 65 20 27 61 6c 65 72 74 29 0a 3b 3b 0a 3b 3b 20 20 20 3b 3b 20 54 68 69 73 20 require.'alert).;;.;;...;;.This.
0dc0 69 73 20 74 68 65 20 6d 6f 73 74 20 62 61 73 69 63 20 66 6f 72 6d 20 75 73 61 67 65 0a 3b 3b 20 is.the.most.basic.form.usage.;;.
0de0 20 20 28 61 6c 65 72 74 20 22 54 68 69 73 20 69 73 20 61 6e 20 61 6c 65 72 74 22 29 0a 3b 3b 0a ..(alert."This.is.an.alert").;;.
0e00 3b 3b 20 20 20 3b 3b 20 59 6f 75 20 63 61 6e 20 61 64 6a 75 73 74 20 74 68 65 20 73 65 76 65 72 ;;...;;.You.can.adjust.the.sever
0e20 69 74 79 20 66 6f 72 20 6d 6f 72 65 20 69 6d 70 6f 72 74 61 6e 74 20 6d 65 73 73 61 67 65 73 0a ity.for.more.important.messages.
0e40 3b 3b 20 20 20 28 61 6c 65 72 74 20 22 54 68 69 73 20 69 73 20 61 6e 20 61 6c 65 72 74 22 20 3a ;;...(alert."This.is.an.alert".:
0e60 73 65 76 65 72 69 74 79 20 27 68 69 67 68 29 0a 3b 3b 0a 3b 3b 20 20 20 3b 3b 20 4f 72 20 64 65 severity.'high).;;.;;...;;.Or.de
0e80 63 72 65 61 73 65 20 69 74 20 66 6f 72 20 70 75 72 65 6c 79 20 69 6e 66 6f 72 6d 61 74 69 76 65 crease.it.for.purely.informative
0ea0 20 6f 6e 65 73 0a 3b 3b 20 20 20 28 61 6c 65 72 74 20 22 54 68 69 73 20 69 73 20 61 6e 20 61 6c .ones.;;...(alert."This.is.an.al
0ec0 65 72 74 22 20 3a 73 65 76 65 72 69 74 79 20 27 74 72 69 76 69 61 6c 29 0a 3b 3b 0a 3b 3b 20 20 ert".:severity.'trivial).;;.;;..
0ee0 20 3b 3b 20 41 6c 65 72 74 73 20 63 61 6e 20 68 61 76 65 20 6f 70 74 69 6f 6e 61 6c 20 74 69 74 .;;.Alerts.can.have.optional.tit
0f00 6c 65 73 2e 20 20 4f 74 68 65 72 77 69 73 65 2c 20 74 68 65 20 74 69 74 6c 65 20 69 73 20 74 68 les...Otherwise,.the.title.is.th
0f20 65 0a 3b 3b 20 20 20 3b 3b 20 62 75 66 66 65 72 2d 6e 61 6d 65 20 6f 66 20 74 68 65 20 28 63 75 e.;;...;;.buffer-name.of.the.(cu
0f40 72 72 65 6e 74 2d 62 75 66 66 65 72 29 20 77 68 65 72 65 20 74 68 65 20 61 6c 65 72 74 20 6f 72 rrent-buffer).where.the.alert.or
0f60 69 67 69 6e 61 74 65 64 2e 0a 3b 3b 20 20 20 28 61 6c 65 72 74 20 22 54 68 69 73 20 69 73 20 61 iginated..;;...(alert."This.is.a
0f80 6e 20 61 6c 65 72 74 22 20 3a 74 69 74 6c 65 20 22 4d 79 20 41 6c 65 72 74 22 29 0a 3b 3b 0a 3b n.alert".:title."My.Alert").;;.;
0fa0 3b 20 20 20 3b 3b 20 46 75 72 74 68 65 72 2c 20 61 6c 65 72 74 73 20 63 61 6e 20 68 61 76 65 20 ;...;;.Further,.alerts.can.have.
0fc0 63 61 74 65 67 6f 72 69 65 73 2e 20 20 54 68 69 73 20 61 6c 6c 6f 77 73 20 75 73 65 72 73 20 74 categories...This.allows.users.t
0fe0 6f 0a 3b 3b 20 20 20 3b 3b 20 73 65 6c 65 63 74 69 76 65 6c 79 20 66 69 6c 74 65 72 20 6f 6e 20 o.;;...;;.selectively.filter.on.
1000 74 68 65 6d 2e 0a 3b 3b 20 20 20 28 61 6c 65 72 74 20 22 54 68 69 73 20 69 73 20 61 6e 20 61 6c them..;;...(alert."This.is.an.al
1020 65 72 74 22 20 3a 74 69 74 6c 65 20 22 4d 79 20 41 6c 65 72 74 22 20 3a 63 61 74 65 67 6f 72 79 ert".:title."My.Alert".:category
1040 20 27 64 65 62 75 67 29 0a 3b 3b 0a 3b 3b 20 2a 20 46 6f 72 20 75 73 65 72 73 0a 3b 3b 0a 3b 3b .'debug).;;.;;.*.For.users.;;.;;
1060 20 46 6f 72 20 74 68 65 20 75 73 65 72 2c 20 74 68 65 72 65 20 61 72 65 20 73 65 76 65 72 61 6c .For.the.user,.there.are.several
1080 20 76 61 72 69 61 62 6c 65 73 20 74 6f 20 63 6f 6e 74 72 6f 6c 20 77 68 65 6e 20 61 6e 64 20 68 .variables.to.control.when.and.h
10a0 6f 77 20 61 6c 65 72 74 73 0a 3b 3b 20 61 72 65 20 70 72 65 73 65 6e 74 65 64 2e 20 20 42 79 20 ow.alerts.;;.are.presented...By.
10c0 64 65 66 61 75 6c 74 2c 20 74 68 65 79 20 61 70 70 65 61 72 20 69 6e 20 74 68 65 20 6d 69 6e 69 default,.they.appear.in.the.mini
10e0 62 75 66 66 65 72 20 6d 75 63 68 20 74 68 65 20 73 61 6d 65 0a 3b 3b 20 61 73 20 61 20 6e 6f 72 buffer.much.the.same.;;.as.a.nor
1100 6d 61 6c 20 45 6d 61 63 73 20 6d 65 73 73 61 67 65 2e 20 20 42 75 74 20 74 68 65 72 65 20 61 72 mal.Emacs.message...But.there.ar
1120 65 20 6d 61 6e 79 20 6d 6f 72 65 20 70 6f 73 73 69 62 69 6c 69 74 69 65 73 3a 0a 3b 3b 0a 3b 3b e.many.more.possibilities:.;;.;;
1140 20 20 20 60 61 6c 65 72 74 2d 66 61 64 65 2d 74 69 6d 65 27 0a 3b 3b 20 20 20 20 20 4e 6f 72 6d ...`alert-fade-time'.;;.....Norm
1160 61 6c 6c 79 20 61 6c 65 72 74 73 20 64 69 73 61 70 70 65 61 72 20 61 66 74 65 72 20 74 68 69 73 ally.alerts.disappear.after.this
1180 20 6d 61 6e 79 20 73 65 63 6f 6e 64 73 2c 20 69 66 20 74 68 65 20 73 74 79 6c 65 0a 3b 3b 20 20 .many.seconds,.if.the.style.;;..
11a0 20 20 20 73 75 70 70 6f 72 74 73 20 69 74 2e 20 20 54 68 65 20 64 65 66 61 75 6c 74 20 69 73 20 ...supports.it...The.default.is.
11c0 35 20 73 65 63 6f 6e 64 73 2e 0a 3b 3b 0a 3b 3b 20 20 20 60 61 6c 65 72 74 2d 64 65 66 61 75 6c 5.seconds..;;.;;...`alert-defaul
11e0 74 2d 73 74 79 6c 65 27 0a 3b 3b 20 20 20 20 20 50 69 63 6b 20 74 68 65 20 73 74 79 6c 65 20 74 t-style'.;;.....Pick.the.style.t
1200 6f 20 75 73 65 20 69 66 20 6e 6f 20 6f 74 68 65 72 20 63 6f 6e 66 69 67 20 72 75 6c 65 20 6d 61 o.use.if.no.other.config.rule.ma
1220 74 63 68 65 73 2e 20 20 54 68 65 0a 3b 3b 20 20 20 20 20 64 65 66 61 75 6c 74 20 69 73 20 60 6d tches...The.;;.....default.is.`m
1240 65 73 73 61 67 65 27 2c 20 62 75 74 20 60 67 72 6f 77 6c 27 20 77 6f 72 6b 73 20 77 65 6c 6c 20 essage',.but.`growl'.works.well.
1260 74 6f 6f 2e 0a 3b 3b 0a 3b 3b 20 20 20 60 61 6c 65 72 74 2d 72 65 76 65 61 6c 2d 69 64 6c 65 2d too..;;.;;...`alert-reveal-idle-
1280 74 69 6d 65 27 0a 3b 3b 20 20 20 20 20 49 66 20 61 20 63 6f 6e 66 69 67 20 72 75 6c 65 20 63 68 time'.;;.....If.a.config.rule.ch
12a0 6f 6f 73 65 20 74 6f 20 6d 61 74 63 68 20 6f 6e 20 60 69 64 6c 65 27 2c 20 74 68 69 73 20 69 73 oose.to.match.on.`idle',.this.is
12c0 20 68 6f 77 20 6d 61 6e 79 0a 3b 3b 20 20 20 20 20 73 65 63 6f 6e 64 73 20 69 64 6c 65 20 74 68 .how.many.;;.....seconds.idle.th
12e0 65 20 75 73 65 72 20 68 61 73 20 74 6f 20 62 65 2e 20 20 44 65 66 61 75 6c 74 73 20 74 6f 20 35 e.user.has.to.be...Defaults.to.5
1300 20 73 6f 20 74 68 61 74 20 75 73 65 72 73 0a 3b 3b 20 20 20 20 20 64 6f 6e 27 74 20 6d 69 73 73 .so.that.users.;;.....don't.miss
1320 20 61 6e 79 20 61 6c 65 72 74 73 2c 20 62 75 74 20 31 32 30 20 69 73 20 61 6c 73 6f 20 67 6f 6f .any.alerts,.but.120.is.also.goo
1340 64 2e 0a 3b 3b 0a 3b 3b 20 20 20 60 61 6c 65 72 74 2d 70 65 72 73 69 73 74 2d 69 64 6c 65 2d 74 d..;;.;;...`alert-persist-idle-t
1360 69 6d 65 27 0a 3b 3b 20 20 20 20 20 41 66 74 65 72 20 74 68 69 73 20 6d 61 6e 79 20 69 64 6c 65 ime'.;;.....After.this.many.idle
1380 20 73 65 63 6f 6e 64 73 2c 20 61 6c 65 72 74 73 20 77 69 6c 6c 20 62 65 63 6f 6d 65 20 73 74 69 .seconds,.alerts.will.become.sti
13a0 63 6b 79 2c 20 61 6e 64 20 6e 6f 74 0a 3b 3b 20 20 20 20 20 66 61 64 65 20 61 77 61 79 20 6d 6f cky,.and.not.;;.....fade.away.mo
13c0 72 65 2e 20 20 54 68 65 20 64 65 66 61 75 6c 74 20 69 73 20 31 35 20 6d 69 6e 75 74 65 73 2e 0a re...The.default.is.15.minutes..
13e0 3b 3b 0a 3b 3b 20 20 20 60 61 6c 65 72 74 2d 6c 6f 67 2d 6d 65 73 73 61 67 65 73 27 0a 3b 3b 20 ;;.;;...`alert-log-messages'.;;.
1400 20 20 20 20 42 79 20 64 65 66 61 75 6c 74 2c 20 61 6c 6c 20 61 6c 65 72 74 73 20 61 72 65 20 6c ....By.default,.all.alerts.are.l
1420 6f 67 67 65 64 20 74 6f 20 2a 41 6c 65 72 74 73 2a 20 28 61 6e 64 20 74 6f 20 2a 4d 65 73 73 61 ogged.to.*Alerts*.(and.to.*Messa
1440 67 65 73 2a 2c 0a 3b 3b 20 20 20 20 20 69 66 20 74 68 65 20 60 6d 65 73 73 61 67 65 27 20 73 74 ges*,.;;.....if.the.`message'.st
1460 79 6c 65 20 69 73 20 62 65 69 6e 67 20 75 73 65 64 29 2e 20 20 53 65 74 20 74 6f 20 6e 69 6c 20 yle.is.being.used)...Set.to.nil.
1480 74 6f 20 64 69 73 61 62 6c 65 2e 0a 3b 3b 0a 3b 3b 20 20 20 60 61 6c 65 72 74 2d 68 69 64 65 2d to.disable..;;.;;...`alert-hide-
14a0 61 6c 6c 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 27 0a 3b 3b 20 20 20 20 20 57 61 6e 74 20 61 all-notifications'.;;.....Want.a
14c0 6c 65 72 74 73 20 6f 66 66 20 65 6e 74 69 72 65 6c 79 3f 20 20 54 68 65 79 20 73 74 69 6c 6c 20 lerts.off.entirely?..They.still.
14e0 67 65 74 20 6c 6f 67 67 65 64 2c 20 68 6f 77 65 76 65 72 2c 20 75 6e 6c 65 73 73 0a 3b 3b 20 20 get.logged,.however,.unless.;;..
1500 20 20 20 79 6f 75 27 76 65 20 74 75 72 6e 65 64 20 74 68 61 74 20 6f 66 66 20 74 6f 6f 2e 0a 3b ...you've.turned.that.off.too..;
1520 3b 0a 3b 3b 20 20 20 60 61 6c 65 72 74 2d 75 73 65 72 2d 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e ;.;;...`alert-user-configuration
1540 27 0a 3b 3b 20 20 20 20 20 54 68 69 73 20 76 61 72 69 61 62 6c 65 20 6c 65 74 73 20 79 6f 75 20 '.;;.....This.variable.lets.you.
1560 63 6f 6e 74 72 6f 6c 20 65 78 61 63 74 6c 79 20 68 6f 77 20 61 6e 64 20 77 68 65 6e 20 61 20 70 control.exactly.how.and.when.a.p
1580 61 72 74 69 63 75 6c 61 72 0a 3b 3b 20 20 20 20 20 61 6c 65 72 74 2c 20 61 20 63 6c 61 73 73 20 articular.;;.....alert,.a.class.
15a0 6f 66 20 61 6c 65 72 74 73 2c 20 6f 72 20 61 6c 6c 20 61 6c 65 72 74 73 2c 20 67 65 74 20 72 65 of.alerts,.or.all.alerts,.get.re
15c0 70 6f 72 74 65 64 20 2d 2d 20 6f 72 20 69 66 20 61 74 0a 3b 3b 20 20 20 20 20 61 6c 6c 2e 20 20 ported.--.or.if.at.;;.....all...
15e0 55 73 65 20 74 68 69 73 20 74 6f 20 6d 61 6b 65 20 73 6f 6d 65 20 61 6c 65 72 74 73 20 75 73 65 Use.this.to.make.some.alerts.use
1600 20 47 72 6f 77 6c 2c 20 77 68 69 6c 65 20 6f 74 68 65 72 73 20 61 72 65 0a 3b 3b 20 20 20 20 20 .Growl,.while.others.are.;;.....
1620 63 6f 6d 70 6c 65 74 65 6c 79 20 73 69 6c 65 6e 74 2e 0a 3b 3b 0a 3b 3b 20 2a 20 50 72 6f 67 72 completely.silent..;;.;;.*.Progr
1640 61 6d 6d 61 74 69 63 61 6c 6c 79 20 61 64 64 69 6e 67 20 72 75 6c 65 73 0a 3b 3b 0a 3b 3b 20 55 ammatically.adding.rules.;;.;;.U
1660 73 65 72 73 20 63 61 6e 20 61 6c 73 6f 20 70 72 6f 67 72 61 6d 6d 61 74 69 63 61 6c 6c 79 20 61 sers.can.also.programmatically.a
1680 64 64 20 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e 20 72 75 6c 65 73 2c 20 69 6e 20 61 64 64 69 74 dd.configuration.rules,.in.addit
16a0 69 6f 6e 20 74 6f 0a 3b 3b 20 63 75 73 74 6f 6d 69 7a 69 6e 67 20 60 61 6c 65 72 74 2d 75 73 65 ion.to.;;.customizing.`alert-use
16c0 72 2d 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e 27 2e 20 20 48 65 72 65 20 69 73 20 6f 6e 65 20 74 r-configuration'...Here.is.one.t
16e0 68 61 74 20 74 68 65 20 61 75 74 68 6f 72 0a 3b 3b 20 63 75 72 72 65 6e 74 6c 79 20 75 73 65 73 hat.the.author.;;.currently.uses
1700 20 77 69 74 68 20 45 52 43 2c 20 73 6f 20 74 68 61 74 20 74 68 65 20 66 72 69 6e 67 65 20 67 65 .with.ERC,.so.that.the.fringe.ge
1720 74 73 20 63 6f 6c 6f 72 65 64 20 77 68 65 6e 65 76 65 72 20 70 65 6f 70 6c 65 0a 3b 3b 20 63 68 ts.colored.whenever.people.;;.ch
1740 61 74 20 6f 6e 20 42 69 74 6c 42 65 65 3a 0a 3b 3b 0a 3b 3b 20 20 28 61 6c 65 72 74 2d 61 64 64 at.on.BitlBee:.;;.;;..(alert-add
1760 2d 72 75 6c 65 20 3a 73 74 61 74 75 73 20 20 20 27 28 62 75 72 69 65 64 20 76 69 73 69 62 6c 65 -rule.:status...'(buried.visible
1780 20 69 64 6c 65 29 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 65 76 65 .idle).;;..................:seve
17a0 72 69 74 79 20 27 28 6d 6f 64 65 72 61 74 65 20 68 69 67 68 20 75 72 67 65 6e 74 29 0a 3b 3b 20 rity.'(moderate.high.urgent).;;.
17c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6d 6f 64 65 20 20 20 20 20 27 65 72 63 2d .................:mode.....'erc-
17e0 6d 6f 64 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 70 72 65 64 69 63 mode.;;..................:predic
1800 61 74 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 28 6c 61 6d 62 64 ate.;;..................#'(lambd
1820 61 20 28 69 6e 66 6f 29 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 a.(info).;;.....................
1840 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 28 63 6f 6e 63 61 74 20 22 5c 5c 60 5b 5e 26 5d 2e .(string-match.(concat."\\`[^&].
1860 2a 40 42 69 74 6c 42 65 65 5c 5c 27 22 29 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 *@BitlBee\\'").;;...............
1880 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 72 63 2d 66 6f 72 6d 61 74 .....................(erc-format
18a0 2d 74 61 72 67 65 74 2d 61 6e 64 2f 6f 72 2d 6e 65 74 77 6f 72 6b 29 29 29 0a 3b 3b 20 20 20 20 -target-and/or-network))).;;....
18c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 70 65 72 73 69 73 74 65 6e 74 0a 3b 3b 20 20 20 20 ..............:persistent.;;....
18e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 28 6c 61 6d 62 64 61 20 28 69 6e 66 6f 29 0a 3b ..............#'(lambda.(info).;
1900 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 49 66 20 74 68 65 ;......................;;.If.the
1920 20 62 75 66 66 65 72 20 69 73 20 62 75 72 69 65 64 2c 20 6f 72 20 74 68 65 20 75 73 65 72 20 68 .buffer.is.buried,.or.the.user.h
1940 61 73 20 62 65 65 6e 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 as.been.;;......................
1960 3b 3b 20 69 64 6c 65 20 66 6f 72 20 60 61 6c 65 72 74 2d 72 65 76 65 61 6c 2d 69 64 6c 65 2d 74 ;;.idle.for.`alert-reveal-idle-t
1980 69 6d 65 27 20 73 65 63 6f 6e 64 73 2c 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ime'.seconds,.;;................
19a0 20 20 20 20 20 20 3b 3b 20 6d 61 6b 65 20 74 68 69 73 20 61 6c 65 72 74 20 70 65 72 73 69 73 74 ......;;.make.this.alert.persist
19c0 65 6e 74 2e 20 20 4e 6f 72 6d 61 6c 6c 79 2c 20 61 6c 65 72 74 73 0a 3b 3b 20 20 20 20 20 20 20 ent...Normally,.alerts.;;.......
19e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 62 65 63 6f 6d 65 20 70 65 72 73 69 73 74 ...............;;.become.persist
1a00 65 6e 74 20 61 66 74 65 72 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ent.after.;;....................
1a20 20 20 3b 3b 20 60 61 6c 65 72 74 2d 70 65 72 73 69 73 74 2d 69 64 6c 65 2d 74 69 6d 65 27 20 73 ..;;.`alert-persist-idle-time'.s
1a40 65 63 6f 6e 64 73 2e 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 econds..;;......................
1a60 28 6d 65 6d 71 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 73 74 61 74 75 73 29 20 27 (memq.(plist-get.info.:status).'
1a80 28 62 75 72 69 65 64 20 69 64 6c 65 29 29 29 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (buried.idle))).;;..............
1aa0 20 20 20 20 3a 73 74 79 6c 65 20 27 66 72 69 6e 67 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 ....:style.'fringe.;;...........
1ac0 20 20 20 20 20 20 20 3a 63 6f 6e 74 69 6e 75 65 20 74 29 0a 3b 3b 0a 3b 3b 20 2a 20 42 75 69 6c .......:continue.t).;;.;;.*.Buil
1ae0 74 69 6e 20 61 6c 65 72 74 20 73 74 79 6c 65 73 0a 3b 3b 0a 3b 3b 20 54 68 65 72 65 20 61 72 65 tin.alert.styles.;;.;;.There.are
1b00 20 73 65 76 65 72 61 6c 20 62 75 69 6c 74 69 6e 20 73 74 79 6c 65 73 2c 20 61 6e 64 20 69 74 20 .several.builtin.styles,.and.it.
1b20 69 73 20 74 72 69 76 69 61 6c 20 74 6f 20 63 72 65 61 74 65 20 6e 65 77 20 6f 6e 65 73 2e 0a 3b is.trivial.to.create.new.ones..;
1b40 3b 20 54 68 65 20 62 75 69 6c 74 69 6e 73 20 61 72 65 3a 0a 3b 3b 0a 3b 3b 20 20 20 66 72 69 6e ;.The.builtins.are:.;;.;;...frin
1b60 67 65 20 20 20 20 20 20 20 20 2d 20 43 68 61 6e 67 65 73 20 74 68 65 20 63 75 72 72 65 6e 74 20 ge........-.Changes.the.current.
1b80 66 72 61 6d 65 27 73 20 66 72 69 6e 67 65 20 62 61 63 6b 67 72 6f 75 6e 64 20 63 6f 6c 6f 72 0a frame's.fringe.background.color.
1ba0 3b 3b 20 20 20 6d 6f 64 65 2d 6c 69 6e 65 20 20 20 20 20 2d 20 43 68 61 6e 67 65 73 20 74 68 65 ;;...mode-line.....-.Changes.the
1bc0 20 63 75 72 72 65 6e 74 20 66 72 61 6d 65 27 73 20 6d 6f 64 65 2d 6c 69 6e 65 20 62 61 63 6b 67 .current.frame's.mode-line.backg
1be0 72 6f 75 6e 64 20 63 6f 6c 6f 72 0a 3b 3b 20 20 20 67 6e 74 70 20 20 20 20 20 20 20 20 20 20 2d round.color.;;...gntp..........-
1c00 20 55 73 65 73 20 67 6e 74 70 2c 20 69 74 20 72 65 71 75 69 72 65 73 20 67 6e 74 70 2e 65 6c 20 .Uses.gntp,.it.requires.gntp.el.
1c20 28 73 65 65 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 74 65 6b 61 69 2f 67 6e (see.https://github.com/tekai/gn
1c40 74 70 2e 65 6c 29 0a 3b 3b 20 20 20 67 72 6f 77 6c 20 20 20 20 20 20 20 20 20 2d 20 55 73 65 73 tp.el).;;...growl.........-.Uses
1c60 20 47 72 6f 77 6c 20 6f 6e 20 4f 53 20 58 2c 20 69 66 20 67 72 6f 77 6c 6e 6f 74 69 66 79 20 69 .Growl.on.OS.X,.if.growlnotify.i
1c80 73 20 6f 6e 20 74 68 65 20 50 41 54 48 0a 3b 3b 20 20 20 69 67 6e 6f 72 65 20 20 20 20 20 20 20 s.on.the.PATH.;;...ignore.......
1ca0 20 2d 20 49 67 6e 6f 72 65 73 20 74 68 65 20 61 6c 65 72 74 20 65 6e 74 69 72 65 6c 79 0a 3b 3b .-.Ignores.the.alert.entirely.;;
1cc0 20 20 20 6c 69 62 6e 6f 74 69 66 79 20 20 20 20 20 2d 20 55 73 65 73 20 6c 69 62 6e 6f 74 69 66 ...libnotify.....-.Uses.libnotif
1ce0 79 20 69 66 20 6e 6f 74 69 66 79 2d 73 65 6e 64 20 69 73 20 6f 6e 20 74 68 65 20 50 41 54 48 0a y.if.notify-send.is.on.the.PATH.
1d00 3b 3b 20 20 20 6c 6f 67 20 20 20 20 20 20 20 20 20 20 20 2d 20 4c 6f 67 73 20 74 68 65 20 61 6c ;;...log...........-.Logs.the.al
1d20 65 72 74 20 74 65 78 74 20 74 6f 20 2a 41 6c 65 72 74 73 2a 2c 20 77 69 74 68 20 61 20 74 69 6d ert.text.to.*Alerts*,.with.a.tim
1d40 65 73 74 61 6d 70 0a 3b 3b 20 20 20 6d 65 73 73 61 67 65 20 20 20 20 20 20 20 2d 20 55 73 65 73 estamp.;;...message.......-.Uses
1d60 20 74 68 65 20 45 6d 61 63 73 20 60 6d 65 73 73 61 67 65 27 20 66 61 63 69 6c 69 74 79 0a 3b 3b .the.Emacs.`message'.facility.;;
1d80 20 20 20 6d 6f 6d 65 6e 74 61 72 79 20 20 20 20 20 2d 20 55 73 65 73 20 74 68 65 20 45 6d 61 63 ...momentary.....-.Uses.the.Emac
1da0 73 20 60 6d 6f 6d 65 6e 74 61 72 79 2d 73 74 72 69 6e 67 2d 64 69 73 70 6c 61 79 27 20 66 61 63 s.`momentary-string-display'.fac
1dc0 69 6c 69 74 79 0a 3b 3b 20 20 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 2d 20 55 73 65 73 20 ility.;;...notifications.-.Uses.
1de0 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 6c 69 62 72 61 72 79 20 76 69 61 20 44 2d 42 75 73 0a notifications.library.via.D-Bus.
1e00 3b 3b 20 20 20 6e 6f 74 69 66 69 65 72 20 20 20 20 20 20 2d 20 55 73 65 73 20 74 65 72 6d 69 6e ;;...notifier......-.Uses.termin
1e20 61 6c 2d 6e 6f 74 69 66 69 65 72 20 6f 6e 20 4f 53 20 58 2c 20 69 66 20 69 74 20 69 73 20 6f 6e al-notifier.on.OS.X,.if.it.is.on
1e40 20 74 68 65 20 50 41 54 48 0a 3b 3b 20 20 20 6f 73 78 2d 6e 6f 74 69 66 69 65 72 20 20 2d 20 4e .the.PATH.;;...osx-notifier..-.N
1e60 61 74 69 76 65 20 4f 53 58 20 6e 6f 74 69 66 69 65 72 20 75 73 69 6e 67 20 41 70 70 6c 65 53 63 ative.OSX.notifier.using.AppleSc
1e80 72 69 70 74 0a 3b 3b 20 20 20 74 6f 61 73 74 65 72 20 20 20 20 20 20 20 2d 20 55 73 65 20 74 68 ript.;;...toaster.......-.Use.th
1ea0 65 20 74 6f 61 73 74 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 73 79 73 74 65 6d 0a 3b 3b 20 20 e.toast.notification.system.;;..
1ec0 20 78 31 31 20 20 20 20 20 20 20 20 20 20 20 2d 20 43 68 61 6e 67 65 73 20 74 68 65 20 75 72 67 .x11...........-.Changes.the.urg
1ee0 65 6e 63 79 20 70 72 6f 70 65 72 74 79 20 6f 66 20 74 68 65 20 77 69 6e 64 6f 77 20 69 6e 20 74 ency.property.of.the.window.in.t
1f00 68 65 20 58 20 57 69 6e 64 6f 77 20 53 79 73 74 65 6d 0a 3b 3b 20 20 20 74 65 72 6d 75 78 20 20 he.X.Window.System.;;...termux..
1f20 20 20 20 20 20 20 2d 20 55 73 65 20 74 65 72 6d 75 78 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 ......-.Use.termux-notification.
1f40 66 72 6f 6d 20 74 68 65 20 54 65 72 6d 75 78 20 41 50 49 0a 3b 3b 0a 3b 3b 20 2a 20 44 65 66 69 from.the.Termux.API.;;.;;.*.Defi
1f60 6e 69 6e 67 20 6e 65 77 20 73 74 79 6c 65 73 0a 3b 3b 0a 3b 3b 20 54 6f 20 63 72 65 61 74 65 20 ning.new.styles.;;.;;.To.create.
1f80 61 20 6e 65 77 20 73 74 79 6c 65 2c 20 79 6f 75 20 6e 65 65 64 20 74 6f 20 61 74 20 6c 65 61 73 a.new.style,.you.need.to.at.leas
1fa0 74 20 77 72 69 74 65 20 61 20 22 6e 6f 74 69 66 69 65 72 22 2c 20 77 68 69 63 68 20 69 73 0a 3b t.write.a."notifier",.which.is.;
1fc0 3b 20 61 20 66 75 6e 63 74 69 6f 6e 20 74 68 61 74 20 72 65 63 65 69 76 65 73 20 74 68 65 20 64 ;.a.function.that.receives.the.d
1fe0 65 74 61 69 6c 73 20 6f 66 20 74 68 65 20 61 6c 65 72 74 2e 20 20 54 68 65 73 65 20 64 65 74 61 etails.of.the.alert...These.deta
2000 69 6c 73 20 61 72 65 0a 3b 3b 20 67 69 76 65 6e 20 69 6e 20 61 20 70 6c 69 73 74 20 77 68 69 63 ils.are.;;.given.in.a.plist.whic
2020 68 20 75 73 65 73 20 76 61 72 69 6f 75 73 20 6b 65 79 77 6f 72 64 20 74 6f 20 69 64 65 6e 74 69 h.uses.various.keyword.to.identi
2040 66 79 20 74 68 65 20 70 61 72 74 73 20 6f 66 20 74 68 65 0a 3b 3b 20 61 6c 65 72 74 2e 20 20 48 fy.the.parts.of.the.;;.alert...H
2060 65 72 65 20 69 73 20 61 20 70 72 6f 74 6f 74 79 70 69 63 61 6c 20 73 74 79 6c 65 20 64 65 66 69 ere.is.a.prototypical.style.defi
2080 6e 69 74 69 6f 6e 3a 0a 3b 3b 0a 3b 3b 20 20 28 61 6c 65 72 74 2d 64 65 66 69 6e 65 2d 73 74 79 nition:.;;.;;..(alert-define-sty
20a0 6c 65 20 27 73 74 79 6c 65 2d 6e 61 6d 65 20 3a 74 69 74 6c 65 20 22 4d 79 20 53 74 79 6c 65 27 le.'style-name.:title."My.Style'
20c0 73 20 74 69 74 6c 65 22 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 s.title".;;.....................
20e0 20 3a 6e 6f 74 69 66 69 65 72 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .:notifier.;;...................
2100 20 20 20 28 6c 61 6d 62 64 61 20 28 69 6e 66 6f 29 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 ...(lambda.(info).;;............
2120 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 54 68 65 20 6d 65 73 73 61 67 65 20 74 65 78 74 20 ............;;.The.message.text.
2140 69 73 20 3a 6d 65 73 73 61 67 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 is.:message.;;..................
2160 20 20 20 20 20 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 6d 65 73 73 61 67 65 29 0a ......(plist-get.info.:message).
2180 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 54 68 65 ;;........................;;.The
21a0 20 3a 74 69 74 6c 65 20 6f 66 20 74 68 65 20 61 6c 65 72 74 0a 3b 3b 20 20 20 20 20 20 20 20 20 .:title.of.the.alert.;;.........
21c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a ...............(plist-get.info.:
21e0 74 69 74 6c 65 29 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 title).;;.......................
2200 20 3b 3b 20 54 68 65 20 3a 63 61 74 65 67 6f 72 79 20 6f 66 20 74 68 65 20 61 6c 65 72 74 0a 3b .;;.The.:category.of.the.alert.;
2220 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6c 69 73 74 2d ;........................(plist-
2240 67 65 74 20 69 6e 66 6f 20 3a 63 61 74 65 67 6f 72 79 29 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 get.info.:category).;;..........
2260 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 54 68 65 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 ..............;;.The.major-mode.
2280 74 68 69 73 20 61 6c 65 72 74 20 72 65 6c 61 74 65 73 20 74 6f 0a 3b 3b 20 20 20 20 20 20 20 20 this.alert.relates.to.;;........
22a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 ................(plist-get.info.
22c0 3a 6d 6f 64 65 29 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 :mode).;;.......................
22e0 20 3b 3b 20 54 68 65 20 62 75 66 66 65 72 20 74 68 65 20 61 6c 65 72 74 20 72 65 6c 61 74 65 73 .;;.The.buffer.the.alert.relates
2300 20 74 6f 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 .to.;;........................(p
2320 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 62 75 66 66 65 72 29 0a 3b 3b 20 20 20 20 20 20 20 list-get.info.:buffer).;;.......
2340 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 53 65 76 65 72 69 74 79 20 6f 66 20 .................;;.Severity.of.
2360 74 68 65 20 61 6c 65 72 74 2e 20 20 49 74 20 69 73 20 6f 6e 65 20 6f 66 3a 0a 3b 3b 20 20 20 20 the.alert...It.is.one.of:.;;....
2380 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 60 75 72 67 65 6e 74 ....................;;...`urgent
23a0 27 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 20 '.;;........................;;..
23c0 20 60 68 69 67 68 27 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .`high'.;;......................
23e0 20 20 3b 3b 20 20 20 60 6d 6f 64 65 72 61 74 65 27 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 ..;;...`moderate'.;;............
2400 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 60 6e 6f 72 6d 61 6c 27 0a 3b 3b 20 20 20 20 ............;;...`normal'.;;....
2420 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 60 6c 6f 77 27 0a 3b ....................;;...`low'.;
2440 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 60 74 ;........................;;...`t
2460 72 69 76 69 61 6c 27 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 rivial'.;;......................
2480 20 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 73 65 76 65 72 69 74 79 29 0a 3b 3b 20 ..(plist-get.info.:severity).;;.
24a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 57 68 65 74 68 65 .......................;;.Whethe
24c0 72 20 74 68 69 73 20 61 6c 65 72 74 20 73 68 6f 75 6c 64 20 70 65 72 73 69 73 74 2c 20 6f 72 20 r.this.alert.should.persist,.or.
24e0 66 61 64 65 20 61 77 61 79 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 fade.away.;;....................
2500 20 20 20 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 70 65 72 73 69 73 74 65 6e 74 29 ....(plist-get.info.:persistent)
2520 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 44 61 .;;........................;;.Da
2540 74 61 20 77 68 69 63 68 20 77 61 73 20 70 61 73 73 65 64 20 74 6f 20 60 61 6c 65 72 74 27 2e 20 ta.which.was.passed.to.`alert'..
2560 20 43 61 6e 20 62 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .Can.be.;;......................
2580 20 20 3b 3b 20 61 6e 79 74 68 69 6e 67 2e 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..;;.anything..;;...............
25a0 20 20 20 20 20 20 20 20 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 64 61 74 61 29 29 .........(plist-get.info.:data))
25c0 0a 3b 3b 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 52 .;;.;;......................;;.R
25e0 65 6d 6f 76 65 72 73 20 61 72 65 20 6f 70 74 69 6f 6e 61 6c 2e 20 20 54 68 65 69 72 20 6a 6f 62 emovers.are.optional...Their.job
2600 20 69 73 20 74 6f 20 72 65 6d 6f 76 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .is.to.remove.;;................
2620 20 20 20 20 20 20 3b 3b 20 74 68 65 20 76 69 73 75 61 6c 20 6f 72 20 61 75 64 69 74 6f 72 79 20 ......;;.the.visual.or.auditory.
2640 65 66 66 65 63 74 20 6f 66 20 74 68 65 20 61 6c 65 72 74 2e 0a 3b 3b 20 20 20 20 20 20 20 20 20 effect.of.the.alert..;;.........
2660 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 6d 6f 76 65 72 0a 3b 3b 20 20 20 20 20 20 20 20 .............:remover.;;........
2680 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 69 6e 66 6f 29 0a 3b 3b 20 ..............(lambda.(info).;;.
26a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 49 74 20 69 73 20 .......................;;.It.is.
26c0 74 68 65 20 73 61 6d 65 20 70 72 6f 70 65 72 74 79 20 6c 69 73 74 20 74 68 61 74 20 77 61 73 20 the.same.property.list.that.was.
26e0 70 61 73 73 65 64 20 74 6f 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 passed.to.;;....................
2700 20 20 20 20 3b 3b 20 74 68 65 20 6e 6f 74 69 66 69 65 72 20 66 75 6e 63 74 69 6f 6e 2e 0a 3b 3b ....;;.the.notifier.function..;;
2720 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 29 0a 3b 3b 0a 3b 3b ........................)).;;.;;
2740 20 59 6f 75 20 63 61 6e 20 74 65 73 74 20 61 20 73 70 65 63 69 66 69 63 20 73 74 79 6c 65 20 77 .You.can.test.a.specific.style.w
2760 69 74 68 20 73 6f 6d 65 74 68 69 6e 67 20 6c 69 6b 65 20 74 68 69 73 3a 0a 3b 3b 0a 3b 3b 20 28 ith.something.like.this:.;;.;;.(
2780 6c 65 74 20 28 28 61 6c 65 72 74 2d 75 73 65 72 2d 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e 20 27 let.((alert-user-configuration.'
27a0 28 28 28 28 3a 73 65 76 65 72 69 74 79 20 68 69 67 68 29 29 20 6d 6f 6d 65 6e 74 61 72 79 20 6e ((((:severity.high)).momentary.n
27c0 69 6c 29 29 29 29 0a 3b 3b 20 20 20 28 61 6c 65 72 74 20 22 53 61 6d 65 20 62 75 66 66 65 72 20 il)))).;;...(alert."Same.buffer.
27e0 6d 6f 6d 65 6e 74 61 72 79 20 61 6c 65 72 74 22 20 3a 74 69 74 6c 65 20 22 4d 79 20 41 6c 65 72 momentary.alert".:title."My.Aler
2800 74 22 20 3a 73 65 76 65 72 69 74 79 20 27 68 69 67 68 29 0a 3b 3b 20 20 20 28 61 6c 65 72 74 20 t".:severity.'high).;;...(alert.
2820 22 54 68 69 73 20 69 73 20 61 20 6d 6f 6d 65 6e 74 61 72 79 20 61 6c 65 72 74 20 69 6e 20 61 6e "This.is.a.momentary.alert.in.an
2840 6f 74 68 65 72 20 76 69 73 69 62 6c 65 20 62 75 66 66 65 72 22 20 3a 74 69 74 6c 65 20 22 4d 79 other.visible.buffer".:title."My
2860 20 41 6c 65 72 74 22 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 3a 73 65 76 65 72 69 74 79 20 27 68 .Alert".;;..........:severity.'h
2880 69 67 68 20 3a 62 75 66 66 65 72 20 28 6f 74 68 65 72 2d 62 75 66 66 65 72 20 28 63 75 72 72 65 igh.:buffer.(other-buffer.(curre
28a0 6e 74 2d 62 75 66 66 65 72 29 20 74 29 29 29 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71 nt-buffer).t)))..;;;.Code:..(req
28c0 75 69 72 65 20 27 63 6c 2d 6c 69 62 29 0a 28 72 65 71 75 69 72 65 20 27 67 6e 74 70 20 6e 69 6c uire.'cl-lib).(require.'gntp.nil
28e0 20 74 29 0a 28 65 76 61 6c 2d 77 68 65 6e 2d 63 6f 6d 70 69 6c 65 0a 20 20 3b 3b 20 69 66 20 6e .t).(eval-when-compile...;;.if.n
2900 6f 74 20 61 76 61 69 6c 61 62 6c 65 2c 20 73 69 6c 65 6e 63 65 20 74 68 65 20 62 79 74 65 20 63 ot.available,.silence.the.byte.c
2920 6f 6d 70 69 6c 65 72 0a 20 20 28 64 65 66 76 61 72 20 67 6e 74 70 2d 73 65 72 76 65 72 29 29 0a ompiler...(defvar.gntp-server)).
2940 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 67 6e 74 70 2d 6e 6f 74 69 66 79 20 22 67 (declare-function.gntp-notify."g
2960 6e 74 70 22 29 0a 28 72 65 71 75 69 72 65 20 27 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 20 6e 69 ntp").(require.'notifications.ni
2980 6c 20 74 29 0a 28 72 65 71 75 69 72 65 20 27 6c 6f 67 34 65 20 6e 69 6c 20 74 29 0a 0a 3b 3b 20 l.t).(require.'log4e.nil.t)..;;.
29a0 73 68 75 74 20 75 70 20 74 68 65 20 62 79 74 65 20 63 6f 6d 70 69 6c 65 72 0a 28 64 65 63 6c 61 shut.up.the.byte.compiler.(decla
29c0 72 65 2d 66 75 6e 63 74 69 6f 6e 20 61 6c 65 72 74 2d 67 6e 74 70 2d 6e 6f 74 69 66 79 20 22 61 re-function.alert-gntp-notify."a
29e0 6c 65 72 74 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 61 6c 65 72 74 2d 6e lert").(declare-function.alert-n
2a00 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 6e 6f 74 69 66 79 20 22 61 6c 65 72 74 22 29 0a 0a 28 64 otifications-notify."alert")..(d
2a20 65 66 67 72 6f 75 70 20 61 6c 65 72 74 20 6e 69 6c 0a 20 20 22 4e 6f 74 69 66 69 63 61 74 69 6f efgroup.alert.nil..."Notificatio
2a40 6e 20 73 79 73 74 65 6d 20 66 6f 72 20 45 6d 61 63 73 20 73 69 6d 69 6c 61 72 20 74 6f 20 47 72 n.system.for.Emacs.similar.to.Gr
2a60 6f 77 6c 22 0a 20 20 3a 67 72 6f 75 70 20 27 65 6d 61 63 73 29 0a 0c 0a 28 64 65 66 63 75 73 74 owl"...:group.'emacs)...(defcust
2a80 6f 6d 20 61 6c 65 72 74 2d 73 65 76 65 72 69 74 79 2d 66 61 63 65 73 0a 20 20 27 28 28 75 72 67 om.alert-severity-faces...'((urg
2aa0 65 6e 74 20 20 20 2e 20 61 6c 65 72 74 2d 75 72 67 65 6e 74 2d 66 61 63 65 29 0a 20 20 20 20 28 ent.....alert-urgent-face).....(
2ac0 68 69 67 68 20 20 20 20 20 2e 20 61 6c 65 72 74 2d 68 69 67 68 2d 66 61 63 65 29 0a 20 20 20 20 high.......alert-high-face).....
2ae0 28 6d 6f 64 65 72 61 74 65 20 2e 20 61 6c 65 72 74 2d 6d 6f 64 65 72 61 74 65 2d 66 61 63 65 29 (moderate...alert-moderate-face)
2b00 0a 20 20 20 20 28 6e 6f 72 6d 61 6c 20 20 20 2e 20 61 6c 65 72 74 2d 6e 6f 72 6d 61 6c 2d 66 61 .....(normal.....alert-normal-fa
2b20 63 65 29 0a 20 20 20 20 28 6c 6f 77 20 20 20 20 20 20 2e 20 61 6c 65 72 74 2d 6c 6f 77 2d 66 61 ce).....(low........alert-low-fa
2b40 63 65 29 0a 20 20 20 20 28 74 72 69 76 69 61 6c 20 20 2e 20 61 6c 65 72 74 2d 74 72 69 76 69 61 ce).....(trivial....alert-trivia
2b60 6c 2d 66 61 63 65 29 29 0a 20 20 22 46 61 63 65 73 20 61 73 73 6f 63 69 61 74 65 64 20 62 79 20 l-face))..."Faces.associated.by.
2b80 64 65 66 61 75 6c 74 20 77 69 74 68 20 61 6c 65 72 74 20 73 65 76 65 72 69 74 69 65 73 2e 22 0a default.with.alert.severities.".
2ba0 20 20 3a 74 79 70 65 20 27 28 61 6c 69 73 74 20 3a 6b 65 79 2d 74 79 70 65 20 73 79 6d 62 6f 6c ..:type.'(alist.:key-type.symbol
2bc0 20 3a 76 61 6c 75 65 2d 74 79 70 65 20 63 6f 6c 6f 72 29 0a 20 20 3a 67 72 6f 75 70 20 27 61 6c .:value-type.color)...:group.'al
2be0 65 72 74 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 61 6c 65 72 74 2d 73 65 76 65 72 69 74 79 2d ert)..(defcustom.alert-severity-
2c00 63 6f 6c 6f 72 73 0a 20 20 27 28 28 75 72 67 65 6e 74 20 20 20 2e 20 22 72 65 64 22 29 0a 20 20 colors...'((urgent....."red")...
2c20 20 20 28 68 69 67 68 20 20 20 20 20 2e 20 22 6f 72 61 6e 67 65 22 29 0a 20 20 20 20 28 6d 6f 64 ..(high......."orange").....(mod
2c40 65 72 61 74 65 20 2e 20 22 79 65 6c 6c 6f 77 22 29 0a 20 20 20 20 28 6e 6f 72 6d 61 6c 20 20 20 erate..."yellow").....(normal...
2c60 2e 20 22 67 72 65 65 6e 22 29 0a 20 20 20 20 28 6c 6f 77 20 20 20 20 20 20 2e 20 22 62 6c 75 65 .."green").....(low........"blue
2c80 22 29 0a 20 20 20 20 28 74 72 69 76 69 61 6c 20 20 2e 20 22 70 75 72 70 6c 65 22 29 29 0a 20 20 ").....(trivial...."purple"))...
2ca0 22 43 6f 6c 6f 72 73 20 61 73 73 6f 63 69 61 74 65 64 20 62 79 20 64 65 66 61 75 6c 74 20 77 69 "Colors.associated.by.default.wi
2cc0 74 68 20 61 6c 65 72 74 20 73 65 76 65 72 69 74 69 65 73 2e 0a 54 68 69 73 20 69 73 20 75 73 65 th.alert.severities..This.is.use
2ce0 64 20 62 79 20 73 74 79 6c 65 73 20 65 78 74 65 72 6e 61 6c 20 74 6f 20 45 6d 61 63 73 20 74 68 d.by.styles.external.to.Emacs.th
2d00 61 74 20 64 6f 6e 27 74 20 75 6e 64 65 72 73 74 61 6e 64 20 66 61 63 65 73 2e 22 0a 20 20 3a 74 at.don't.understand.faces."...:t
2d20 79 70 65 20 27 28 61 6c 69 73 74 20 3a 6b 65 79 2d 74 79 70 65 20 73 79 6d 62 6f 6c 20 3a 76 61 ype.'(alist.:key-type.symbol.:va
2d40 6c 75 65 2d 74 79 70 65 20 63 6f 6c 6f 72 29 0a 20 20 3a 67 72 6f 75 70 20 27 61 6c 65 72 74 29 lue-type.color)...:group.'alert)
2d60 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 61 6c 65 72 74 2d 6c 6f 67 2d 73 65 76 65 72 69 74 79 2d ..(defcustom.alert-log-severity-
2d80 66 75 6e 63 74 69 6f 6e 73 0a 20 20 27 28 28 75 72 67 65 6e 74 20 20 20 2e 20 61 6c 65 72 74 2d functions...'((urgent.....alert-
2da0 2d 6c 6f 67 2d 66 61 74 61 6c 29 0a 20 20 20 20 28 68 69 67 68 20 20 20 20 20 2e 20 61 6c 65 72 -log-fatal).....(high.......aler
2dc0 74 2d 2d 6c 6f 67 2d 65 72 72 6f 72 29 0a 20 20 20 20 28 6d 6f 64 65 72 61 74 65 20 2e 20 61 6c t--log-error).....(moderate...al
2de0 65 72 74 2d 2d 6c 6f 67 2d 77 61 72 6e 29 0a 20 20 20 20 28 6e 6f 72 6d 61 6c 20 20 20 2e 20 61 ert--log-warn).....(normal.....a
2e00 6c 65 72 74 2d 2d 6c 6f 67 2d 69 6e 66 6f 29 0a 20 20 20 20 28 6c 6f 77 20 20 20 20 20 20 2e 20 lert--log-info).....(low........
2e20 61 6c 65 72 74 2d 2d 6c 6f 67 2d 64 65 62 75 67 29 0a 20 20 20 20 28 74 72 69 76 69 61 6c 20 20 alert--log-debug).....(trivial..
2e40 2e 20 61 6c 65 72 74 2d 2d 6c 6f 67 2d 74 72 61 63 65 29 29 0a 20 20 22 4c 6f 67 34 65 20 6c 6f ..alert--log-trace))..."Log4e.lo
2e60 67 67 69 6e 67 20 66 75 6e 63 74 69 6f 6e 73 2e 22 0a 20 20 3a 74 79 70 65 20 27 28 61 6c 69 73 gging.functions."...:type.'(alis
2e80 74 20 3a 6b 65 79 2d 74 79 70 65 20 73 79 6d 62 6f 6c 20 3a 76 61 6c 75 65 2d 74 79 70 65 20 63 t.:key-type.symbol.:value-type.c
2ea0 6f 6c 6f 72 29 0a 20 20 3a 67 72 6f 75 70 20 27 61 6c 65 72 74 29 0a 0a 28 64 65 66 63 75 73 74 olor)...:group.'alert)..(defcust
2ec0 6f 6d 20 61 6c 65 72 74 2d 6c 6f 67 2d 6c 65 76 65 6c 0a 20 20 27 6e 6f 72 6d 61 6c 0a 20 20 22 om.alert-log-level...'normal..."
2ee0 4d 69 6e 69 6d 75 6d 20 6c 65 76 65 6c 20 6f 66 20 6d 65 73 73 61 67 65 73 20 74 6f 20 6c 6f 67 Minimum.level.of.messages.to.log
2f00 2e 22 0a 20 20 3a 74 79 70 65 20 27 73 79 6d 62 6f 6c 0a 20 20 3a 67 72 6f 75 70 20 27 61 6c 65 ."...:type.'symbol...:group.'ale
2f20 72 74 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 61 6c 65 72 74 2d 72 65 76 65 61 6c 2d 69 64 6c rt)..(defcustom.alert-reveal-idl
2f40 65 2d 74 69 6d 65 20 31 35 0a 20 20 22 49 66 20 69 64 6c 65 20 74 68 69 73 20 6d 61 6e 79 20 73 e-time.15..."If.idle.this.many.s
2f60 65 63 6f 6e 64 73 2c 20 72 75 6c 65 73 20 77 69 6c 6c 20 6d 61 74 63 68 20 74 68 65 20 60 69 64 econds,.rules.will.match.the.`id
2f80 6c 65 27 20 70 72 6f 70 65 72 74 79 2e 22 0a 20 20 3a 74 79 70 65 20 27 69 6e 74 65 67 65 72 0a le'.property."...:type.'integer.
2fa0 20 20 3a 67 72 6f 75 70 20 27 61 6c 65 72 74 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 61 6c 65 ..:group.'alert)..(defcustom.ale
2fc0 72 74 2d 70 65 72 73 69 73 74 2d 69 64 6c 65 2d 74 69 6d 65 20 39 30 30 0a 20 20 22 49 66 20 69 rt-persist-idle-time.900..."If.i
2fe0 64 6c 65 20 74 68 69 73 20 6d 61 6e 79 20 73 65 63 6f 6e 64 73 2c 20 61 6c 6c 20 61 6c 65 72 74 dle.this.many.seconds,.all.alert
3000 73 20 62 65 63 6f 6d 65 20 70 65 72 73 69 73 74 65 6e 74 2e 0a 54 68 69 73 20 63 61 6e 20 62 65 s.become.persistent..This.can.be
3020 20 6f 76 65 72 72 69 64 64 65 6e 20 77 69 74 68 20 74 68 65 20 4e 65 76 65 72 20 50 65 72 73 69 .overridden.with.the.Never.Persi
3040 73 74 20 6f 70 74 69 6f 6e 20 28 3a 6e 65 76 65 72 2d 70 65 72 73 69 73 74 29 2e 22 0a 20 20 3a st.option.(:never-persist)."...:
3060 74 79 70 65 20 27 69 6e 74 65 67 65 72 0a 20 20 3a 67 72 6f 75 70 20 27 61 6c 65 72 74 29 0a 0a type.'integer...:group.'alert)..
3080 28 64 65 66 63 75 73 74 6f 6d 20 61 6c 65 72 74 2d 66 61 64 65 2d 74 69 6d 65 20 35 0a 20 20 22 (defcustom.alert-fade-time.5..."
30a0 49 66 20 6e 6f 74 20 69 64 6c 65 2c 20 61 6c 65 72 74 73 20 64 69 73 61 70 70 65 61 72 20 61 66 If.not.idle,.alerts.disappear.af
30c0 74 65 72 20 74 68 69 73 20 6d 61 6e 79 20 73 65 63 6f 6e 64 73 2e 0a 54 68 65 20 61 6d 6f 75 6e ter.this.many.seconds..The.amoun
30e0 74 20 6f 66 20 69 64 6c 65 20 74 69 6d 65 20 69 73 20 67 6f 76 65 72 6e 65 64 20 62 79 20 60 61 t.of.idle.time.is.governed.by.`a
3100 6c 65 72 74 2d 70 65 72 73 69 73 74 2d 69 64 6c 65 2d 74 69 6d 65 27 2e 22 0a 20 20 3a 74 79 70 lert-persist-idle-time'."...:typ
3120 65 20 27 69 6e 74 65 67 65 72 0a 20 20 3a 67 72 6f 75 70 20 27 61 6c 65 72 74 29 0a 0a 28 64 65 e.'integer...:group.'alert)..(de
3140 66 63 75 73 74 6f 6d 20 61 6c 65 72 74 2d 68 69 64 65 2d 61 6c 6c 2d 6e 6f 74 69 66 69 63 61 74 fcustom.alert-hide-all-notificat
3160 69 6f 6e 73 20 6e 69 6c 0a 20 20 22 49 66 20 6e 6f 6e 2d 6e 69 6c 2c 20 6e 6f 20 61 6c 65 72 74 ions.nil..."If.non-nil,.no.alert
3180 73 20 61 72 65 20 65 76 65 72 20 73 68 6f 77 6e 20 74 6f 20 74 68 65 20 75 73 65 72 2e 22 0a 20 s.are.ever.shown.to.the.user."..
31a0 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 0a 20 20 3a 67 72 6f 75 70 20 27 61 6c 65 72 74 29 .:type.'boolean...:group.'alert)
31c0 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 61 6c 65 72 74 2d 6c 6f 67 2d 6d 65 73 73 61 67 65 73 20 ..(defcustom.alert-log-messages.
31e0 74 0a 20 20 22 49 66 20 6e 6f 6e 2d 6e 69 6c 2c 20 61 6c 6c 20 61 6c 65 72 74 73 20 61 72 65 20 t..."If.non-nil,.all.alerts.are.
3200 6c 6f 67 67 65 64 20 74 6f 20 74 68 65 20 2a 41 6c 65 72 74 73 2a 20 62 75 66 66 65 72 2e 22 0a logged.to.the.*Alerts*.buffer.".
3220 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 0a 20 20 3a 67 72 6f 75 70 20 27 61 6c 65 72 74 ..:type.'boolean...:group.'alert
3240 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 61 6c 65 72 74 2d 64 65 66 61 75 6c 74 2d 69 63 6f 6e )..(defcustom.alert-default-icon
3260 0a 20 20 28 63 6f 6e 63 61 74 20 64 61 74 61 2d 64 69 72 65 63 74 6f 72 79 0a 20 20 20 20 20 20 ...(concat.data-directory.......
3280 20 20 20 20 22 69 6d 61 67 65 73 2f 69 63 6f 6e 73 2f 68 69 63 6f 6c 6f 72 2f 73 63 61 6c 61 62 ...."images/icons/hicolor/scalab
32a0 6c 65 2f 61 70 70 73 2f 65 6d 61 63 73 2e 73 76 67 22 29 0a 20 20 22 46 69 6c 65 6e 61 6d 65 20 le/apps/emacs.svg")..."Filename.
32c0 6f 66 20 64 65 66 61 75 6c 74 20 69 63 6f 6e 20 74 6f 20 73 68 6f 77 20 66 6f 72 20 6c 69 62 6e of.default.icon.to.show.for.libn
32e0 6f 74 69 66 79 2d 61 6c 65 72 74 73 2e 22 0a 20 20 3a 74 79 70 65 20 27 73 74 72 69 6e 67 0a 20 otify-alerts."...:type.'string..
3300 20 3a 67 72 6f 75 70 20 27 61 6c 65 72 74 29 0a 0a 28 64 65 66 76 61 72 20 61 6c 65 72 74 2d 73 .:group.'alert)..(defvar.alert-s
3320 74 79 6c 65 73 20 6e 69 6c 29 0a 0a 28 64 65 66 75 6e 20 61 6c 65 72 74 2d 73 74 79 6c 65 73 2d tyles.nil)..(defun.alert-styles-
3340 72 61 64 69 6f 2d 74 79 70 65 20 28 77 69 64 67 65 74 2d 6e 61 6d 65 29 0a 20 20 28 61 70 70 65 radio-type.(widget-name)...(appe
3360 6e 64 0a 20 20 20 28 6c 69 73 74 20 77 69 64 67 65 74 2d 6e 61 6d 65 20 3a 74 61 67 20 22 53 74 nd....(list.widget-name.:tag."St
3380 79 6c 65 22 29 0a 20 20 20 28 6d 61 70 63 61 72 20 23 27 28 6c 61 6d 62 64 61 20 28 73 74 79 6c yle")....(mapcar.#'(lambda.(styl
33a0 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 27 63 6f 6e 73 74 0a 20 e)................(list.'const..
33c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 61 67 20 28 6f 72 20 28 70 6c ....................:tag.(or.(pl
33e0 69 73 74 2d 67 65 74 20 28 63 64 72 20 73 74 79 6c 65 29 20 3a 74 69 74 6c 65 29 0a 20 20 20 20 ist-get.(cdr.style).:title).....
3400 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 79 6d 62 6f ..........................(symbo
3420 6c 2d 6e 61 6d 65 20 28 63 61 72 20 73 74 79 6c 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 l-name.(car.style)))............
3440 20 20 20 20 20 20 20 20 20 20 28 63 61 72 20 73 74 79 6c 65 29 29 29 0a 20 20 20 20 20 20 20 20 ..........(car.style))).........
3460 20 20 20 28 73 65 74 71 20 61 6c 65 72 74 2d 73 74 79 6c 65 73 0a 20 20 20 20 20 20 20 20 20 20 ...(setq.alert-styles...........
3480 20 20 20 20 20 20 20 28 73 6f 72 74 20 61 6c 65 72 74 2d 73 74 79 6c 65 73 0a 20 20 20 20 20 20 .......(sort.alert-styles.......
34a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 28 6c 61 6d 62 64 61 20 28 6c 20 72 29 .................#'(lambda.(l.r)
34c0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 ............................(str
34e0 69 6e 67 3c 20 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 28 63 61 72 20 6c 29 29 0a 20 20 20 20 20 ing<.(symbol-name.(car.l))......
3500 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ...............................(
3520 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 28 63 61 72 20 72 29 29 29 29 29 29 29 29 29 0a 0a 28 64 65 symbol-name.(car.r)))))))))..(de
3540 66 63 75 73 74 6f 6d 20 61 6c 65 72 74 2d 64 65 66 61 75 6c 74 2d 73 74 79 6c 65 20 27 6d 65 73 fcustom.alert-default-style.'mes
3560 73 61 67 65 0a 20 20 22 54 68 65 20 73 74 79 6c 65 20 74 6f 20 75 73 65 20 69 66 20 6e 6f 20 72 sage..."The.style.to.use.if.no.r
3580 75 6c 65 73 20 6d 61 74 63 68 20 69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 63 6f 6e 66 69 67 ules.match.in.the.current.config
35a0 75 72 61 74 69 6f 6e 2e 0a 49 66 20 61 20 63 6f 6e 66 69 67 75 72 65 64 20 72 75 6c 65 20 64 6f uration..If.a.configured.rule.do
35c0 65 73 20 6d 61 74 63 68 20 61 6e 20 61 6c 65 72 74 2c 20 74 68 69 73 20 73 74 79 6c 65 20 69 73 es.match.an.alert,.this.style.is
35e0 20 6e 6f 74 20 75 73 65 64 3b 0a 69 74 20 69 73 20 73 74 72 69 63 74 6c 79 20 61 20 66 61 6c 6c .not.used;.it.is.strictly.a.fall
3600 62 61 63 6b 2e 22 0a 20 20 3a 74 79 70 65 20 28 61 6c 65 72 74 2d 73 74 79 6c 65 73 2d 72 61 64 back."...:type.(alert-styles-rad
3620 69 6f 2d 74 79 70 65 20 27 72 61 64 69 6f 29 0a 20 20 3a 67 72 6f 75 70 20 27 61 6c 65 72 74 29 io-type.'radio)...:group.'alert)
3640 0a 0a 28 64 65 66 75 6e 20 61 6c 65 72 74 2d 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e 2d 74 79 70 ..(defun.alert-configuration-typ
3660 65 20 28 29 0a 20 20 28 6c 69 73 74 20 27 72 65 70 65 61 74 0a 20 20 20 20 20 20 20 20 28 6c 69 e.()...(list.'repeat.........(li
3680 73 74 0a 20 20 20 20 20 20 20 20 20 27 6c 69 73 74 20 3a 74 61 67 20 22 53 65 6c 65 63 74 20 73 st..........'list.:tag."Select.s
36a0 74 79 6c 65 20 69 66 20 61 6c 65 72 74 20 6d 61 74 63 68 65 73 20 73 65 6c 65 63 74 6f 72 22 0a tyle.if.alert.matches.selector".
36c0 20 20 20 20 20 20 20 20 20 27 28 72 65 70 65 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 3a 74 61 .........'(repeat............:ta
36e0 67 20 22 53 65 6c 65 63 74 6f 72 22 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 68 6f 69 63 65 0a g."Selector"............(choice.
3700 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 3a 74 61 67 20 22 53 65 76 65 72 69 74 79 ............(cons.:tag."Severity
3720 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 66 6f 72 6d "...................(const.:form
3740 61 74 20 22 22 20 3a 73 65 76 65 72 69 74 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 at."".:severity)................
3760 20 20 20 28 73 65 74 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 55 72 67 65 6e 74 22 20 75 72 67 ...(set.(const.:tag."Urgent".urg
3780 65 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e ent)........................(con
37a0 73 74 20 3a 74 61 67 20 22 48 69 67 68 22 20 68 69 67 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 st.:tag."High".high)............
37c0 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 4d 6f 64 65 72 61 74 ............(const.:tag."Moderat
37e0 65 22 20 6d 6f 64 65 72 61 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e".moderate)....................
3800 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 4e 6f 72 6d 61 6c 22 20 6e 6f 72 6d 61 6c 29 ....(const.:tag."Normal".normal)
3820 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a ........................(const.:
3840 74 61 67 20 22 4c 6f 77 22 20 6c 6f 77 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 tag."Low".low)..................
3860 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 54 72 69 76 69 61 6c 22 20 74 72 69 76 ......(const.:tag."Trivial".triv
3880 69 61 6c 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 3a 74 61 67 20 22 55 ial))).............(cons.:tag."U
38a0 73 65 72 20 53 74 61 74 75 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 ser.Status"...................(c
38c0 6f 6e 73 74 20 3a 66 6f 72 6d 61 74 20 22 22 20 3a 73 74 61 74 75 73 29 0a 20 20 20 20 20 20 20 onst.:format."".:status)........
38e0 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 42 75 66 ...........(set.(const.:tag."Buf
3900 66 65 72 20 6e 6f 74 20 76 69 73 69 62 6c 65 22 20 62 75 72 69 65 64 29 0a 20 20 20 20 20 20 20 fer.not.visible".buried)........
3920 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 42 75 66 ................(const.:tag."Buf
3940 66 65 72 20 76 69 73 69 62 6c 65 22 20 76 69 73 69 62 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 fer.visible".visible)...........
3960 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 42 75 66 66 65 72 .............(const.:tag."Buffer
3980 20 73 65 6c 65 63 74 65 64 22 20 73 65 6c 65 63 74 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 .selected".selected)............
39a0 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 42 75 66 66 65 72 20 ............(const.:tag."Buffer.
39c0 73 65 6c 65 63 74 65 64 2c 20 75 73 65 72 20 69 64 6c 65 22 20 69 64 6c 65 29 29 29 0a 20 20 20 selected,.user.idle".idle)))....
39e0 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 3a 74 61 67 20 22 4d 61 6a 6f 72 20 4d 6f 64 65 22 .........(cons.:tag."Major.Mode"
3a00 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 66 6f 72 6d 61 ...................(const.:forma
3a20 74 20 22 22 20 3a 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 t."".:mode)...................re
3a40 67 65 78 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 3a 74 61 67 20 22 43 61 gexp).............(cons.:tag."Ca
3a60 74 65 67 6f 72 79 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 tegory"...................(const
3a80 20 3a 66 6f 72 6d 61 74 20 22 22 20 3a 63 61 74 65 67 6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 .:format."".:category)..........
3aa0 20 20 20 20 20 20 20 20 20 72 65 67 65 78 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f .........regexp).............(co
3ac0 6e 73 20 3a 74 61 67 20 22 54 69 74 6c 65 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ns.:tag."Title".................
3ae0 20 20 28 63 6f 6e 73 74 20 3a 66 6f 72 6d 61 74 20 22 22 20 3a 74 69 74 6c 65 29 0a 20 20 20 20 ..(const.:format."".:title).....
3b00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 67 65 78 70 29 0a 20 20 20 20 20 20 20 20 20 20 ..............regexp)...........
3b20 20 20 28 63 6f 6e 73 20 3a 74 61 67 20 22 4d 65 73 73 61 67 65 22 0a 20 20 20 20 20 20 20 20 20 ..(cons.:tag."Message"..........
3b40 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 66 6f 72 6d 61 74 20 22 22 20 3a 6d 65 73 73 .........(const.:format."".:mess
3b60 61 67 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 67 65 78 70 29 0a 20 age)...................regexp)..
3b80 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 3a 74 61 67 20 22 50 72 65 64 69 63 61 74 65 ...........(cons.:tag."Predicate
3ba0 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 66 6f 72 6d "...................(const.:form
3bc0 61 74 20 22 22 20 3a 70 72 65 64 69 63 61 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 at."".:predicate)...............
3be0 20 20 20 20 66 75 6e 63 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 ....function).............(cons.
3c00 3a 74 61 67 20 22 49 63 6f 6e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 :tag."Icon"...................(c
3c20 6f 6e 73 74 20 3a 66 6f 72 6d 61 74 20 22 22 20 3a 69 63 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 onst.:format."".:icon)..........
3c40 20 20 20 20 20 20 20 20 20 72 65 67 65 78 70 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 61 6c 65 .........regexp)))..........(ale
3c60 72 74 2d 73 74 79 6c 65 73 2d 72 61 64 69 6f 2d 74 79 70 65 20 27 63 68 6f 69 63 65 29 0a 20 20 rt-styles-radio-type.'choice)...
3c80 20 20 20 20 20 20 20 27 28 73 65 74 20 3a 74 61 67 20 22 4f 70 74 69 6f 6e 73 22 0a 20 20 20 20 .......'(set.:tag."Options".....
3ca0 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 3a 74 61 67 20 22 4d 61 6b 65 20 61 6c 65 72 ...........(cons.:tag."Make.aler
3cc0 74 20 70 65 72 73 69 73 74 65 6e 74 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 t.persistent"...................
3ce0 20 20 20 28 63 6f 6e 73 74 20 3a 66 6f 72 6d 61 74 20 22 22 20 3a 70 65 72 73 69 73 74 65 6e 74 ...(const.:format."".:persistent
3d00 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 68 6f 69 63 65 20 3a )......................(choice.:
3d20 76 61 6c 75 65 20 74 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 59 65 73 22 20 74 29 0a 20 20 20 value.t.(const.:tag."Yes".t)....
3d40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 74 ..........................(funct
3d60 69 6f 6e 20 3a 74 61 67 20 22 50 72 65 64 69 63 61 74 65 22 29 29 29 0a 20 20 20 20 20 20 20 20 ion.:tag."Predicate"))).........
3d80 20 20 20 20 20 20 20 28 63 6f 6e 73 20 3a 74 61 67 20 22 4e 65 76 65 72 20 70 65 72 73 69 73 74 .......(cons.:tag."Never.persist
3da0 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 66 "......................(const.:f
3dc0 6f 72 6d 61 74 20 22 22 20 3a 6e 65 76 65 72 2d 70 65 72 73 69 73 74 29 0a 20 20 20 20 20 20 20 ormat."".:never-persist)........
3de0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 68 6f 69 63 65 20 3a 76 61 6c 75 65 20 74 20 28 ..............(choice.:value.t.(
3e00 63 6f 6e 73 74 20 3a 74 61 67 20 22 59 65 73 22 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 const.:tag."Yes".t).............
3e20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 74 69 6f 6e 20 3a 74 61 67 20 .................(function.:tag.
3e40 22 50 72 65 64 69 63 61 74 65 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 "Predicate")))................(c
3e60 6f 6e 73 20 3a 74 61 67 20 22 43 6f 6e 74 69 6e 75 65 20 74 6f 20 6e 65 78 74 20 72 75 6c 65 22 ons.:tag."Continue.to.next.rule"
3e80 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 66 6f ......................(const.:fo
3ea0 72 6d 61 74 20 22 22 20 3a 63 6f 6e 74 69 6e 75 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 rmat."".:continue)..............
3ec0 20 20 20 20 20 20 20 20 28 63 68 6f 69 63 65 20 3a 76 61 6c 75 65 20 74 20 28 63 6f 6e 73 74 20 ........(choice.:value.t.(const.
3ee0 3a 74 61 67 20 22 59 65 73 22 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 :tag."Yes".t)...................
3f00 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 74 69 6f 6e 20 3a 74 61 67 20 22 50 72 65 64 69 ...........(function.:tag."Predi
3f20 63 61 74 65 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 28 6c 69 73 74 20 cate")))................;;(list.
3f40 3a 74 61 67 20 22 43 68 61 6e 67 65 20 53 65 76 65 72 69 74 79 22 0a 20 20 20 20 20 20 20 20 20 :tag."Change.Severity"..........
3f60 20 20 20 20 20 20 3b 3b 20 20 20 20 20 20 28 72 61 64 69 6f 20 3a 74 61 67 20 22 46 72 6f 6d 22 ......;;......(radio.:tag."From"
3f80 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ................;;.............(
3fa0 63 6f 6e 73 74 20 3a 74 61 67 20 22 55 72 67 65 6e 74 22 20 75 72 67 65 6e 74 29 0a 20 20 20 20 const.:tag."Urgent".urgent).....
3fc0 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 ...........;;.............(const
3fe0 20 3a 74 61 67 20 22 48 69 67 68 22 20 68 69 67 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 .:tag."High".high)..............
4000 20 20 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 4d 6f ..;;.............(const.:tag."Mo
4020 64 65 72 61 74 65 22 20 6d 6f 64 65 72 61 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 derate".moderate)...............
4040 20 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 4e 6f 72 .;;.............(const.:tag."Nor
4060 6d 61 6c 22 20 6e 6f 72 6d 61 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 20 mal".normal)................;;..
4080 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 4c 6f 77 22 20 6c 6f 77 ...........(const.:tag."Low".low
40a0 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 )................;;.............
40c0 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 54 72 69 76 69 61 6c 22 20 74 72 69 76 69 61 6c 29 29 0a (const.:tag."Trivial".trivial)).
40e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 20 20 20 28 72 61 64 69 6f 20 3a 74 ...............;;......(radio.:t
4100 61 67 20 22 54 6f 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 20 20 20 20 ag."To"................;;.......
4120 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 55 72 67 65 6e 74 22 20 75 72 67 65 6e ......(const.:tag."Urgent".urgen
4140 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 t)................;;............
4160 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 48 69 67 68 22 20 68 69 67 68 29 0a 20 20 20 20 20 20 .(const.:tag."High".high).......
4180 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a .........;;.............(const.:
41a0 74 61 67 20 22 4d 6f 64 65 72 61 74 65 22 20 6d 6f 64 65 72 61 74 65 29 0a 20 20 20 20 20 20 20 tag."Moderate".moderate)........
41c0 20 20 20 20 20 20 20 20 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 ........;;.............(const.:t
41e0 61 67 20 22 4e 6f 72 6d 61 6c 22 20 6e 6f 72 6d 61 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 ag."Normal".normal).............
4200 20 20 20 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 4c ...;;.............(const.:tag."L
4220 6f 77 22 20 6c 6f 77 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 20 20 20 ow".low)................;;......
4240 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 54 72 69 76 69 61 6c 22 20 74 72 69 .......(const.:tag."Trivial".tri
4260 76 69 61 6c 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 29 29 29 0a 0a 28 64 65 vial)))................))))..(de
4280 66 63 75 73 74 6f 6d 20 61 6c 65 72 74 2d 75 73 65 72 2d 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e fcustom.alert-user-configuration
42a0 20 6e 69 6c 0a 20 20 22 52 75 6c 65 73 20 74 68 61 74 20 64 65 74 65 72 6d 69 6e 65 20 68 6f 77 .nil..."Rules.that.determine.how
42c0 20 61 6e 64 20 77 68 65 6e 20 61 6c 65 72 74 73 20 67 65 74 20 64 69 73 70 6c 61 79 65 64 2e 22 .and.when.alerts.get.displayed."
42e0 0a 20 20 3a 74 79 70 65 20 28 61 6c 65 72 74 2d 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e 2d 74 79 ...:type.(alert-configuration-ty
4300 70 65 29 0a 20 20 3a 67 72 6f 75 70 20 27 61 6c 65 72 74 29 0a 0a 28 64 65 66 76 61 72 20 61 6c pe)...:group.'alert)..(defvar.al
4320 65 72 74 2d 69 6e 74 65 72 6e 61 6c 2d 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e 20 6e 69 6c 0a 20 ert-internal-configuration.nil..
4340 20 22 52 75 6c 65 73 20 61 64 64 65 64 20 62 79 20 60 61 6c 65 72 74 2d 61 64 64 2d 72 75 6c 65 ."Rules.added.by.`alert-add-rule
4360 27 2e 0a 46 6f 72 20 75 73 65 72 20 63 75 73 74 6f 6d 69 7a 61 74 69 6f 6e 2c 20 73 65 65 20 60 '..For.user.customization,.see.`
4380 61 6c 65 72 74 2d 75 73 65 72 2d 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e 27 2e 22 29 0a 0c 0a 28 alert-user-configuration'.")...(
43a0 64 65 66 66 61 63 65 20 61 6c 65 72 74 2d 75 72 67 65 6e 74 2d 66 61 63 65 0a 20 20 27 28 28 74 defface.alert-urgent-face...'((t
43c0 20 28 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 52 65 64 22 20 3a 62 6f 6c 64 20 74 29 29 29 0a 20 .(:foreground."Red".:bold.t)))..
43e0 20 22 55 72 67 65 6e 74 20 61 6c 65 72 74 20 66 61 63 65 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 ."Urgent.alert.face."...:group.'
4400 61 6c 65 72 74 29 0a 0a 28 64 65 66 66 61 63 65 20 61 6c 65 72 74 2d 68 69 67 68 2d 66 61 63 65 alert)..(defface.alert-high-face
4420 0a 20 20 27 28 28 74 20 28 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 44 61 72 6b 20 4f 72 61 6e 67 ...'((t.(:foreground."Dark.Orang
4440 65 22 20 3a 62 6f 6c 64 20 74 29 29 29 0a 20 20 22 48 69 67 68 20 61 6c 65 72 74 20 66 61 63 65 e".:bold.t)))..."High.alert.face
4460 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 61 6c 65 72 74 29 0a 0a 28 64 65 66 66 61 63 65 20 61 6c ."...:group.'alert)..(defface.al
4480 65 72 74 2d 6d 6f 64 65 72 61 74 65 2d 66 61 63 65 0a 20 20 27 28 28 74 20 28 3a 66 6f 72 65 67 ert-moderate-face...'((t.(:foreg
44a0 72 6f 75 6e 64 20 22 47 6f 6c 64 22 20 3a 62 6f 6c 64 20 74 29 29 29 0a 20 20 22 4d 6f 64 65 72 round."Gold".:bold.t)))..."Moder
44c0 61 74 65 20 61 6c 65 72 74 20 66 61 63 65 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 61 6c 65 72 74 ate.alert.face."...:group.'alert
44e0 29 0a 0a 28 64 65 66 66 61 63 65 20 61 6c 65 72 74 2d 6e 6f 72 6d 61 6c 2d 66 61 63 65 0a 20 20 )..(defface.alert-normal-face...
4500 27 28 28 74 29 29 0a 20 20 22 4e 6f 72 6d 61 6c 20 61 6c 65 72 74 20 66 61 63 65 2e 22 0a 20 20 '((t))..."Normal.alert.face."...
4520 3a 67 72 6f 75 70 20 27 61 6c 65 72 74 29 0a 0a 28 64 65 66 66 61 63 65 20 61 6c 65 72 74 2d 6c :group.'alert)..(defface.alert-l
4540 6f 77 2d 66 61 63 65 0a 20 20 27 28 28 74 20 28 3a 66 6f 72 65 67 72 6f 75 6e 64 20 22 44 61 72 ow-face...'((t.(:foreground."Dar
4560 6b 20 42 6c 75 65 22 29 29 29 0a 20 20 22 4c 6f 77 20 61 6c 65 72 74 20 66 61 63 65 2e 22 0a 20 k.Blue")))..."Low.alert.face."..
4580 20 3a 67 72 6f 75 70 20 27 61 6c 65 72 74 29 0a 0a 28 64 65 66 66 61 63 65 20 61 6c 65 72 74 2d .:group.'alert)..(defface.alert-
45a0 74 72 69 76 69 61 6c 2d 66 61 63 65 0a 20 20 27 28 28 74 20 28 3a 66 6f 72 65 67 72 6f 75 6e 64 trivial-face...'((t.(:foreground
45c0 20 22 44 61 72 6b 20 56 69 6f 6c 65 74 22 29 29 29 0a 20 20 22 54 72 69 76 69 61 6c 20 61 6c 65 ."Dark.Violet")))..."Trivial.ale
45e0 72 74 20 66 61 63 65 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 61 6c 65 72 74 29 0a 0c 0a 28 64 65 rt.face."...:group.'alert)...(de
4600 66 75 6e 20 61 6c 65 72 74 2d 64 65 66 69 6e 65 2d 73 74 79 6c 65 20 28 6e 61 6d 65 20 26 72 65 fun.alert-define-style.(name.&re
4620 73 74 20 70 6c 69 73 74 29 0a 20 20 22 44 65 66 69 6e 65 20 61 20 6e 65 77 20 73 74 79 6c 65 20 st.plist)..."Define.a.new.style.
4640 66 6f 72 20 6e 6f 74 69 66 79 69 6e 67 20 74 68 65 20 75 73 65 72 20 6f 66 20 61 6c 65 72 74 20 for.notifying.the.user.of.alert.
4660 6d 65 73 73 61 67 65 73 2e 0a 54 6f 20 63 72 65 61 74 65 20 61 20 6e 65 77 20 73 74 79 6c 65 2c messages..To.create.a.new.style,
4680 20 79 6f 75 20 6e 65 65 64 20 74 6f 20 61 74 20 6c 65 61 73 74 20 77 72 69 74 65 20 61 20 5c 22 .you.need.to.at.least.write.a.\"
46a0 6e 6f 74 69 66 69 65 72 5c 22 2c 0a 77 68 69 63 68 20 69 73 20 61 20 66 75 6e 63 74 69 6f 6e 20 notifier\",.which.is.a.function.
46c0 74 68 61 74 20 72 65 63 65 69 76 65 73 20 74 68 65 20 64 65 74 61 69 6c 73 20 6f 66 20 74 68 65 that.receives.the.details.of.the
46e0 20 61 6c 65 72 74 2e 0a 54 68 65 73 65 20 64 65 74 61 69 6c 73 20 61 72 65 20 67 69 76 65 6e 20 .alert..These.details.are.given.
4700 69 6e 20 61 20 70 6c 69 73 74 20 77 68 69 63 68 20 75 73 65 73 20 76 61 72 69 6f 75 73 20 6b 65 in.a.plist.which.uses.various.ke
4720 79 77 6f 72 64 20 74 6f 0a 69 64 65 6e 74 69 66 79 20 74 68 65 20 70 61 72 74 73 20 6f 66 20 74 yword.to.identify.the.parts.of.t
4740 68 65 20 61 6c 65 72 74 2e 20 20 48 65 72 65 20 69 73 20 61 20 70 72 6f 74 6f 74 79 70 69 63 61 he.alert...Here.is.a.prototypica
4760 6c 20 73 74 79 6c 65 0a 64 65 66 69 6e 69 74 69 6f 6e 3a 0a 0a 5c 28 61 6c 65 72 74 2d 64 65 66 l.style.definition:..\(alert-def
4780 69 6e 65 2d 73 74 79 6c 65 20 27 73 74 79 6c 65 2d 6e 61 6d 65 20 3a 74 69 74 6c 65 20 5c 22 4d ine-style.'style-name.:title.\"M
47a0 79 20 53 74 79 6c 65 27 73 20 74 69 74 6c 65 5c 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 y.Style's.title\"...............
47c0 20 20 20 20 20 20 3a 6e 6f 74 69 66 69 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ......:notifier.................
47e0 20 20 20 20 28 6c 61 6d 62 64 61 20 28 69 6e 66 6f 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ....(lambda.(info)..............
4800 20 20 20 20 20 20 20 20 20 3b 3b 20 54 68 65 20 6d 65 73 73 61 67 65 20 74 65 78 74 20 69 73 20 .........;;.The.message.text.is.
4820 3a 6d 65 73 73 61 67 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 :message.......................(
4840 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 6d 65 73 73 61 67 65 29 0a 20 20 20 20 20 20 20 plist-get.info.:message)........
4860 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 54 68 65 20 3a 74 69 74 6c 65 20 6f 66 20 ...............;;.The.:title.of.
4880 74 68 65 20 61 6c 65 72 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 the.alert.......................
48a0 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 74 69 74 6c 65 29 0a 20 20 20 20 20 20 20 20 (plist-get.info.:title).........
48c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 54 68 65 20 3a 63 61 74 65 67 6f 72 79 20 6f ..............;;.The.:category.o
48e0 66 20 74 68 65 20 61 6c 65 72 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 f.the.alert.....................
4900 20 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 63 61 74 65 67 6f 72 79 29 0a 20 20 20 ..(plist-get.info.:category)....
4920 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 54 68 65 20 6d 61 6a 6f 72 2d ...................;;.The.major-
4940 6d 6f 64 65 20 74 68 69 73 20 61 6c 65 72 74 20 72 65 6c 61 74 65 73 20 74 6f 0a 20 20 20 20 20 mode.this.alert.relates.to......
4960 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f .................(plist-get.info
4980 20 3a 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b .:mode).......................;;
49a0 20 54 68 65 20 62 75 66 66 65 72 20 74 68 65 20 61 6c 65 72 74 20 72 65 6c 61 74 65 73 20 74 6f .The.buffer.the.alert.relates.to
49c0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6c 69 73 74 2d 67 65 .......................(plist-ge
49e0 74 20 69 6e 66 6f 20 3a 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 t.info.:buffer).................
4a00 20 20 20 20 20 20 3b 3b 20 53 65 76 65 72 69 74 79 20 6f 66 20 74 68 65 20 61 6c 65 72 74 2e 20 ......;;.Severity.of.the.alert..
4a20 20 49 74 20 69 73 20 6f 6e 65 20 6f 66 3a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .It.is.one.of:..................
4a40 20 20 20 20 20 3b 3b 20 20 20 60 75 72 67 65 6e 74 27 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 .....;;...`urgent'..............
4a60 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 60 68 69 67 68 27 0a 20 20 20 20 20 20 20 20 20 20 20 .........;;...`high'............
4a80 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 60 6d 6f 64 65 72 61 74 65 27 0a 20 20 20 20 20 ...........;;...`moderate'......
4aa0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 60 6e 6f 72 6d 61 6c 27 0a 20 .................;;...`normal'..
4ac0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 60 6c 6f 77 27 0a .....................;;...`low'.
4ae0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 60 74 72 69 76 ......................;;...`triv
4b00 69 61 6c 27 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6c 69 73 ial'.......................(plis
4b20 74 2d 67 65 74 20 69 6e 66 6f 20 3a 73 65 76 65 72 69 74 79 29 0a 20 20 20 20 20 20 20 20 20 20 t-get.info.:severity)...........
4b40 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 57 68 65 74 68 65 72 20 74 68 69 73 20 61 6c 65 72 ............;;.Whether.this.aler
4b60 74 20 73 68 6f 75 6c 64 20 70 65 72 73 69 73 74 2c 20 6f 72 20 66 61 64 65 20 61 77 61 79 0a 20 t.should.persist,.or.fade.away..
4b80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6c 69 73 74 2d 67 65 74 20 .....................(plist-get.
4ba0 69 6e 66 6f 20 3a 70 65 72 73 69 73 74 65 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 info.:persistent)...............
4bc0 20 20 20 20 20 20 20 20 3b 3b 20 44 61 74 61 20 77 68 69 63 68 20 77 61 73 20 70 61 73 73 65 64 ........;;.Data.which.was.passed
4be0 20 74 6f 20 60 61 6c 65 72 74 27 2e 20 20 43 61 6e 20 62 65 0a 20 20 20 20 20 20 20 20 20 20 20 .to.`alert'...Can.be............
4c00 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 61 6e 79 74 68 69 6e 67 2e 0a 20 20 20 20 20 20 20 20 ...........;;.anything..........
4c20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 64 ..............(plist-get.info.:d
4c40 61 74 61 29 29 0a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 52 65 ata))......................;;.Re
4c60 6d 6f 76 65 72 73 20 61 72 65 20 6f 70 74 69 6f 6e 61 6c 2e 20 20 54 68 65 69 72 20 6a 6f 62 20 movers.are.optional...Their.job.
4c80 69 73 20 74 6f 20 72 65 6d 6f 76 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 is.to.remove....................
4ca0 20 3b 3b 20 74 68 65 20 76 69 73 75 61 6c 20 6f 72 20 61 75 64 69 74 6f 72 79 20 65 66 66 65 63 .;;.the.visual.or.auditory.effec
4cc0 74 20 6f 66 20 74 68 65 20 61 6c 65 72 74 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 t.of.the.alert..................
4ce0 20 20 20 20 3a 72 65 6d 6f 76 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ....:remover....................
4d00 20 28 6c 61 6d 62 64 61 20 28 69 6e 66 6f 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .(lambda.(info).................
4d20 20 20 20 20 20 20 3b 3b 20 49 74 20 69 73 20 74 68 65 20 73 61 6d 65 20 70 72 6f 70 65 72 74 79 ......;;.It.is.the.same.property
4d40 20 6c 69 73 74 20 74 68 61 74 20 77 61 73 20 70 61 73 73 65 64 20 74 6f 0a 20 20 20 20 20 20 20 .list.that.was.passed.to........
4d60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 74 68 65 20 6e 6f 74 69 66 69 65 72 20 66 ...............;;.the.notifier.f
4d80 75 6e 63 74 69 6f 6e 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 unction........................)
4da0 29 22 0a 20 20 28 61 64 64 2d 74 6f 2d 6c 69 73 74 20 27 61 6c 65 72 74 2d 73 74 79 6c 65 73 20 )"...(add-to-list.'alert-styles.
4dc0 28 63 6f 6e 73 20 6e 61 6d 65 20 70 6c 69 73 74 29 29 0a 20 20 28 70 75 74 20 27 61 6c 65 72 74 (cons.name.plist))...(put.'alert
4de0 2d 75 73 65 72 2d 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e 20 27 63 75 73 74 6f 6d 2d 74 79 70 65 -user-configuration.'custom-type
4e00 20 28 61 6c 65 72 74 2d 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e 2d 74 79 70 65 29 29 0a 20 20 28 .(alert-configuration-type))...(
4e20 70 75 74 20 27 61 6c 65 72 74 2d 64 65 66 69 6e 65 2d 73 74 79 6c 65 20 27 63 75 73 74 6f 6d 2d put.'alert-define-style.'custom-
4e40 74 79 70 65 20 28 61 6c 65 72 74 2d 73 74 79 6c 65 73 2d 72 61 64 69 6f 2d 74 79 70 65 20 27 72 type.(alert-styles-radio-type.'r
4e60 61 64 69 6f 29 29 29 0a 0a 28 61 6c 65 72 74 2d 64 65 66 69 6e 65 2d 73 74 79 6c 65 20 27 69 67 adio)))..(alert-define-style.'ig
4e80 6e 6f 72 65 20 3a 74 69 74 6c 65 20 22 49 67 6e 6f 72 65 20 41 6c 65 72 74 22 0a 20 20 20 20 20 nore.:title."Ignore.Alert"......
4ea0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6e 6f 74 69 66 69 65 72 20 23 27 69 67 6e 6f 72 ...............:notifier.#'ignor
4ec0 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 6d 6f 76 65 72 20 23 e.....................:remover.#
4ee0 27 69 67 6e 6f 72 65 29 0a 0c 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 63 6c 2d 64 65 'ignore)...;;;###autoload.(cl-de
4f00 66 75 6e 20 61 6c 65 72 74 2d 61 64 64 2d 72 75 6c 65 20 28 26 6b 65 79 20 73 65 76 65 72 69 74 fun.alert-add-rule.(&key.severit
4f20 79 20 73 74 61 74 75 73 20 6d 6f 64 65 20 63 61 74 65 67 6f 72 79 20 74 69 74 6c 65 0a 20 20 20 y.status.mode.category.title....
4f40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6d 65 73 73 ............................mess
4f60 61 67 65 20 70 72 65 64 69 63 61 74 65 20 69 63 6f 6e 20 28 73 74 79 6c 65 20 61 6c 65 72 74 2d age.predicate.icon.(style.alert-
4f80 64 65 66 61 75 6c 74 2d 73 74 79 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 default-style)..................
4fa0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 65 72 73 69 73 74 65 6e 74 20 63 6f 6e 74 69 6e 75 ..............persistent.continu
4fc0 65 20 6e 65 76 65 72 2d 70 65 72 73 69 73 74 20 61 70 70 65 6e 64 29 0a 20 20 22 50 72 6f 67 72 e.never-persist.append)..."Progr
4fe0 61 6d 6d 61 74 69 63 61 6c 6c 79 20 61 64 64 20 61 6e 20 61 6c 65 72 74 20 63 6f 6e 66 69 67 75 ammatically.add.an.alert.configu
5000 72 61 74 69 6f 6e 20 72 75 6c 65 2e 0a 0a 4e 6f 72 6d 61 6c 6c 79 2c 20 75 73 65 72 73 20 73 68 ration.rule...Normally,.users.sh
5020 6f 75 6c 64 20 63 75 73 74 6f 69 6d 7a 65 20 60 61 6c 65 72 74 2d 75 73 65 72 2d 63 6f 6e 66 69 ould.custoimze.`alert-user-confi
5040 67 75 72 61 74 69 6f 6e 27 2e 0a 54 68 69 73 20 66 61 63 69 6c 69 74 79 20 69 73 20 66 6f 72 20 guration'..This.facility.is.for.
5060 6d 6f 64 75 6c 65 20 77 72 69 74 65 72 73 20 61 6e 64 20 75 73 65 72 73 20 74 68 61 74 20 6e 65 module.writers.and.users.that.ne
5080 65 64 20 74 6f 20 64 6f 0a 74 68 69 6e 67 73 20 74 68 65 20 4c 69 73 70 20 77 61 79 2e 0a 0a 48 ed.to.do.things.the.Lisp.way...H
50a0 65 72 65 20 69 73 20 61 20 72 75 6c 65 20 74 68 65 20 61 75 74 68 6f 72 20 63 75 72 72 65 6e 74 ere.is.a.rule.the.author.current
50c0 6c 79 20 75 73 65 73 20 77 69 74 68 20 45 52 43 2c 20 73 6f 20 74 68 61 74 20 74 68 65 0a 66 72 ly.uses.with.ERC,.so.that.the.fr
50e0 69 6e 67 65 20 67 65 74 73 20 63 6f 6c 6f 72 65 64 20 77 68 65 6e 65 76 65 72 20 70 65 6f 70 6c inge.gets.colored.whenever.peopl
5100 65 20 63 68 61 74 20 6f 6e 20 42 69 74 6c 42 65 65 3a 0a 0a 5c 28 61 6c 65 72 74 2d 61 64 64 2d e.chat.on.BitlBee:..\(alert-add-
5120 72 75 6c 65 20 3a 73 74 61 74 75 73 20 20 20 5c 5c 3d 27 28 62 75 72 69 65 64 20 76 69 73 69 62 rule.:status...\\='(buried.visib
5140 6c 65 20 69 64 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 65 76 65 72 69 le.idle).................:severi
5160 74 79 20 5c 5c 3d 27 28 6d 6f 64 65 72 61 74 65 20 68 69 67 68 20 75 72 67 65 6e 74 29 0a 20 20 ty.\\='(moderate.high.urgent)...
5180 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6d 6f 64 65 20 20 20 20 20 5c 5c 3d 27 65 72 63 2d ..............:mode.....\\='erc-
51a0 6d 6f 64 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 70 72 65 64 69 63 61 74 65 0a mode.................:predicate.
51c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 5c 5c 3d 27 28 6c 61 6d 62 64 61 20 28 69 6e ................#\\='(lambda.(in
51e0 66 6f 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 2d fo).....................(string-
5200 6d 61 74 63 68 20 28 63 6f 6e 63 61 74 20 5c 22 5c 5c 5c 5c 60 5b 5e 26 5d 2e 2a 40 42 69 74 6c match.(concat.\"\\\\`[^&].*@Bitl
5220 42 65 65 5c 5c 5c 5c 5c 5c 3d 27 5c 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 Bee\\\\\\='\")..................
5240 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 72 63 2d 66 6f 72 6d 61 74 2d 74 61 72 .................(erc-format-tar
5260 67 65 74 2d 61 6e 64 2f 6f 72 2d 6e 65 74 77 6f 72 6b 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 get-and/or-network)))...........
5280 20 20 20 20 20 20 3a 70 65 72 73 69 73 74 65 6e 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ......:persistent...............
52a0 20 20 23 5c 5c 3d 27 28 6c 61 6d 62 64 61 20 28 69 6e 66 6f 29 0a 20 20 20 20 20 20 20 20 20 20 ..#\\='(lambda.(info)...........
52c0 20 20 20 20 20 20 20 20 20 20 3b 3b 20 49 66 20 74 68 65 20 62 75 66 66 65 72 20 69 73 20 62 75 ..........;;.If.the.buffer.is.bu
52e0 72 69 65 64 2c 20 6f 72 20 74 68 65 20 75 73 65 72 20 68 61 73 20 62 65 65 6e 0a 20 20 20 20 20 ried,.or.the.user.has.been......
5300 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 69 64 6c 65 20 66 6f 72 20 60 61 6c 65 72 ...............;;.idle.for.`aler
5320 74 2d 72 65 76 65 61 6c 2d 69 64 6c 65 2d 74 69 6d 65 27 20 73 65 63 6f 6e 64 73 2c 0a 20 20 20 t-reveal-idle-time'.seconds,....
5340 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6d 61 6b 65 20 74 68 69 73 20 61 6c .................;;.make.this.al
5360 65 72 74 20 70 65 72 73 69 73 74 65 6e 74 2e 20 20 4e 6f 72 6d 61 6c 6c 79 2c 20 61 6c 65 72 74 ert.persistent...Normally,.alert
5380 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 62 65 63 6f 6d 65 20 s.....................;;.become.
53a0 70 65 72 73 69 73 74 65 6e 74 20 61 66 74 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 persistent.after................
53c0 20 20 20 20 20 3b 3b 20 60 61 6c 65 72 74 2d 70 65 72 73 69 73 74 2d 69 64 6c 65 2d 74 69 6d 65 .....;;.`alert-persist-idle-time
53e0 27 20 73 65 63 6f 6e 64 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 '.seconds......................(
5400 6d 65 6d 71 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 73 74 61 74 75 73 29 20 5c 5c memq.(plist-get.info.:status).\\
5420 3d 27 28 62 75 72 69 65 64 20 69 64 6c 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ='(buried.idle)))...............
5440 20 20 3a 73 74 79 6c 65 20 5c 5c 3d 27 66 72 69 6e 67 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 ..:style.\\='fringe.............
5460 20 20 20 20 3a 63 6f 6e 74 69 6e 75 65 20 74 29 22 0a 20 20 28 6c 65 74 20 28 28 72 75 6c 65 20 ....:continue.t)"...(let.((rule.
5480 28 6c 69 73 74 20 28 6c 69 73 74 20 74 29 20 73 74 79 6c 65 20 28 6c 69 73 74 20 74 29 29 29 29 (list.(list.t).style.(list.t))))
54a0 0a 20 20 20 20 28 69 66 20 73 65 76 65 72 69 74 79 0a 20 20 20 20 20 20 20 20 28 6e 63 6f 6e 63 .....(if.severity.........(nconc
54c0 20 28 6e 74 68 20 30 20 72 75 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 .(nth.0.rule)................(li
54e0 73 74 20 28 63 6f 6e 73 20 3a 73 65 76 65 72 69 74 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 st.(cons.:severity..............
5500 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 6c 69 73 74 70 20 73 65 76 65 72 69 74 ..............(if.(listp.severit
5520 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 y)..............................
5540 20 20 73 65 76 65 72 69 74 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..severity......................
5560 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 73 65 76 65 72 69 74 79 29 29 29 29 29 29 0a 20 20 20 ........(list.severity))))))....
5580 20 28 69 66 20 73 74 61 74 75 73 0a 20 20 20 20 20 20 20 20 28 6e 63 6f 6e 63 20 28 6e 74 68 20 .(if.status.........(nconc.(nth.
55a0 30 20 72 75 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 28 63 6f 0.rule)................(list.(co
55c0 6e 73 20 3a 73 74 61 74 75 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ns.:status......................
55e0 20 20 20 20 20 20 28 69 66 20 28 6c 69 73 74 70 20 73 74 61 74 75 73 29 0a 20 20 20 20 20 20 20 ......(if.(listp.status)........
5600 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 74 61 74 75 73 0a 20 ........................status..
5620 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 ............................(lis
5640 74 20 73 74 61 74 75 73 29 29 29 29 29 29 0a 20 20 20 20 28 69 66 20 6d 6f 64 65 0a 20 20 20 20 t.status)))))).....(if.mode.....
5660 20 20 20 20 28 6e 63 6f 6e 63 20 28 6e 74 68 20 30 20 72 75 6c 65 29 0a 20 20 20 20 20 20 20 20 ....(nconc.(nth.0.rule).........
5680 20 20 20 20 20 20 20 28 6c 69 73 74 20 28 63 6f 6e 73 20 3a 6d 6f 64 65 0a 20 20 20 20 20 20 20 .......(list.(cons.:mode........
56a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 73 74 72 69 6e 67 70 ....................(if.(stringp
56c0 20 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .mode)..........................
56e0 20 20 20 20 20 20 6d 6f 64 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ......mode......................
5700 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 22 5c 5c 60 22 20 28 73 79 6d 62 6f 6c 2d 6e 61 ........(concat."\\`".(symbol-na
5720 6d 65 20 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 me.mode)........................
5740 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 5c 5c 27 22 29 29 29 29 29 29 0a 20 20 20 20 28 69 .............."\\'")))))).....(i
5760 66 20 63 61 74 65 67 6f 72 79 0a 20 20 20 20 20 20 20 20 28 6e 63 6f 6e 63 20 28 6e 74 68 20 30 f.category.........(nconc.(nth.0
5780 20 72 75 6c 65 29 20 28 6c 69 73 74 20 28 63 6f 6e 73 20 3a 63 61 74 65 67 6f 72 79 20 63 61 74 .rule).(list.(cons.:category.cat
57a0 65 67 6f 72 79 29 29 29 29 0a 20 20 20 20 28 69 66 20 74 69 74 6c 65 0a 20 20 20 20 20 20 20 20 egory)))).....(if.title.........
57c0 28 6e 63 6f 6e 63 20 28 6e 74 68 20 30 20 72 75 6c 65 29 20 28 6c 69 73 74 20 28 63 6f 6e 73 20 (nconc.(nth.0.rule).(list.(cons.
57e0 3a 74 69 74 6c 65 20 74 69 74 6c 65 29 29 29 29 0a 20 20 20 20 28 69 66 20 6d 65 73 73 61 67 65 :title.title)))).....(if.message
5800 0a 20 20 20 20 20 20 20 20 28 6e 63 6f 6e 63 20 28 6e 74 68 20 30 20 72 75 6c 65 29 20 28 6c 69 .........(nconc.(nth.0.rule).(li
5820 73 74 20 28 63 6f 6e 73 20 3a 6d 65 73 73 61 67 65 20 6d 65 73 73 61 67 65 29 29 29 29 0a 20 20 st.(cons.:message.message))))...
5840 20 20 28 69 66 20 70 72 65 64 69 63 61 74 65 0a 20 20 20 20 20 20 20 20 28 6e 63 6f 6e 63 20 28 ..(if.predicate.........(nconc.(
5860 6e 74 68 20 30 20 72 75 6c 65 29 20 28 6c 69 73 74 20 28 63 6f 6e 73 20 3a 70 72 65 64 69 63 61 nth.0.rule).(list.(cons.:predica
5880 74 65 20 70 72 65 64 69 63 61 74 65 29 29 29 29 0a 20 20 20 20 28 69 66 20 69 63 6f 6e 0a 20 20 te.predicate)))).....(if.icon...
58a0 20 20 20 20 20 20 28 6e 63 6f 6e 63 20 28 6e 74 68 20 30 20 72 75 6c 65 29 20 28 6c 69 73 74 20 ......(nconc.(nth.0.rule).(list.
58c0 28 63 6f 6e 73 20 3a 69 63 6f 6e 20 69 63 6f 6e 29 29 29 29 0a 20 20 20 20 28 73 65 74 63 61 72 (cons.:icon.icon)))).....(setcar
58e0 20 72 75 6c 65 20 28 63 64 72 20 28 6e 74 68 20 30 20 72 75 6c 65 29 29 29 0a 0a 20 20 20 20 28 .rule.(cdr.(nth.0.rule)))......(
5900 69 66 20 70 65 72 73 69 73 74 65 6e 74 0a 20 20 20 20 20 20 20 20 28 6e 63 6f 6e 63 20 28 6e 74 if.persistent.........(nconc.(nt
5920 68 20 32 20 72 75 6c 65 29 20 28 6c 69 73 74 20 28 63 6f 6e 73 20 3a 70 65 72 73 69 73 74 65 6e h.2.rule).(list.(cons.:persisten
5940 74 20 70 65 72 73 69 73 74 65 6e 74 29 29 29 29 0a 20 20 20 20 28 69 66 20 6e 65 76 65 72 2d 70 t.persistent)))).....(if.never-p
5960 65 72 73 69 73 74 0a 20 20 20 20 20 20 20 20 28 6e 63 6f 6e 63 20 28 6e 74 68 20 32 20 72 75 6c ersist.........(nconc.(nth.2.rul
5980 65 29 20 28 6c 69 73 74 20 28 63 6f 6e 73 20 3a 6e 65 76 65 72 2d 70 65 72 73 69 73 74 20 6e 65 e).(list.(cons.:never-persist.ne
59a0 76 65 72 2d 70 65 72 73 69 73 74 29 29 29 29 0a 20 20 20 20 28 69 66 20 63 6f 6e 74 69 6e 75 65 ver-persist)))).....(if.continue
59c0 0a 20 20 20 20 20 20 20 20 28 6e 63 6f 6e 63 20 28 6e 74 68 20 32 20 72 75 6c 65 29 20 28 6c 69 .........(nconc.(nth.2.rule).(li
59e0 73 74 20 28 63 6f 6e 73 20 3a 63 6f 6e 74 69 6e 75 65 20 63 6f 6e 74 69 6e 75 65 29 29 29 29 0a st.(cons.:continue.continue)))).
5a00 20 20 20 20 28 73 65 74 63 64 72 20 28 63 64 72 20 72 75 6c 65 29 20 28 6c 69 73 74 20 28 63 64 ....(setcdr.(cdr.rule).(list.(cd
5a20 72 20 28 6e 74 68 20 32 20 72 75 6c 65 29 29 29 29 0a 0a 20 20 20 20 28 69 66 20 28 6e 75 6c 6c r.(nth.2.rule))))......(if.(null
5a40 20 61 6c 65 72 74 2d 69 6e 74 65 72 6e 61 6c 2d 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e 29 0a 20 .alert-internal-configuration)..
5a60 20 20 20 20 20 20 20 28 73 65 74 71 20 61 6c 65 72 74 2d 69 6e 74 65 72 6e 61 6c 2d 63 6f 6e 66 .......(setq.alert-internal-conf
5a80 69 67 75 72 61 74 69 6f 6e 20 28 6c 69 73 74 20 72 75 6c 65 29 29 0a 20 20 20 20 20 20 28 69 66 iguration.(list.rule)).......(if
5aa0 20 61 70 70 65 6e 64 0a 20 20 20 20 20 20 20 20 20 20 28 6e 63 6f 6e 63 20 61 6c 65 72 74 2d 69 .append...........(nconc.alert-i
5ac0 6e 74 65 72 6e 61 6c 2d 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e 20 28 6c 69 73 74 20 72 75 6c 65 nternal-configuration.(list.rule
5ae0 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 61 6c 65 72 74 2d 69 6e 74 65 72 6e 61 6c 2d )).........(setq.alert-internal-
5b00 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e configuration...............(con
5b20 73 20 72 75 6c 65 20 61 6c 65 72 74 2d 69 6e 74 65 72 6e 61 6c 2d 63 6f 6e 66 69 67 75 72 61 74 s.rule.alert-internal-configurat
5b40 69 6f 6e 29 29 29 29 0a 0a 20 20 20 20 72 75 6c 65 29 29 0a 0c 0a 28 61 6c 65 72 74 2d 64 65 66 ion))))......rule))...(alert-def
5b60 69 6e 65 2d 73 74 79 6c 65 20 27 69 67 6e 6f 72 65 20 3a 74 69 74 6c 65 20 22 44 6f 6e 27 74 20 ine-style.'ignore.:title."Don't.
5b80 64 69 73 70 6c 61 79 20 61 6c 65 72 74 73 22 29 0a 0c 0a 28 64 65 66 75 6e 20 61 6c 65 72 74 2d display.alerts")...(defun.alert-
5ba0 6c 6f 67 2d 6e 6f 74 69 66 79 20 28 69 6e 66 6f 29 0a 20 20 28 6c 65 74 2a 20 28 28 6d 65 73 20 log-notify.(info)...(let*.((mes.
5bc0 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 6d 65 73 73 61 67 65 29 29 0a 20 20 20 20 20 (plist-get.info.:message))......
5be0 20 20 20 20 28 73 65 76 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 73 65 76 65 72 69 ....(sev.(plist-get.info.:severi
5c00 74 79 29 29 0a 20 20 20 20 20 20 20 20 20 28 6c 65 6e 20 28 6c 65 6e 67 74 68 20 6d 65 73 29 29 ty))..........(len.(length.mes))
5c20 0a 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 20 28 63 64 72 20 28 61 73 73 6f 63 20 73 65 76 20 ..........(func.(cdr.(assoc.sev.
5c40 61 6c 65 72 74 2d 6c 6f 67 2d 73 65 76 65 72 69 74 79 2d 66 75 6e 63 74 69 6f 6e 73 29 29 29 29 alert-log-severity-functions))))
5c60 0a 20 20 20 20 28 69 66 20 28 6e 6f 74 20 28 66 65 61 74 75 72 65 70 20 27 6c 6f 67 34 65 29 29 .....(if.(not.(featurep.'log4e))
5c80 0a 20 20 20 20 20 20 20 20 28 61 6c 65 72 74 2d 6c 65 67 61 63 79 2d 6c 6f 67 2d 6e 6f 74 69 66 .........(alert-legacy-log-notif
5ca0 79 20 6d 65 73 20 73 65 76 20 6c 65 6e 29 0a 20 20 20 20 20 20 3b 3b 20 77 68 65 6e 20 77 65 20 y.mes.sev.len).......;;.when.we.
5cc0 67 65 74 20 68 65 72 65 20 79 6f 75 20 62 65 74 74 65 72 20 62 65 20 75 73 69 6e 67 20 6c 6f 67 get.here.you.better.be.using.log
5ce0 34 65 20 6f 72 20 68 61 76 65 20 79 6f 75 72 20 6c 6f 67 67 69 6e 67 0a 20 20 20 20 20 20 3b 3b 4e.or.have.your.logging.......;;
5d00 20 66 75 6e 63 74 69 6f 6e 73 20 64 65 66 69 6e 65 64 0a 20 20 20 20 20 20 28 75 6e 6c 65 73 73 .functions.defined.......(unless
5d20 20 28 66 62 6f 75 6e 64 70 20 66 75 6e 63 29 0a 09 28 77 68 65 6e 20 28 66 62 6f 75 6e 64 70 20 .(fboundp.func)..(when.(fboundp.
5d40 27 6c 6f 67 34 65 3a 64 65 66 6c 6f 67 67 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 'log4e:deflogger)...........(log
5d60 34 65 3a 64 65 66 6c 6f 67 67 65 72 20 22 61 6c 65 72 74 22 20 22 25 74 20 5b 25 6c 5d 20 25 6d 4e:deflogger."alert"."%t.[%l].%m
5d80 22 20 22 25 48 3a 25 4d 3a 25 53 22 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 66 "."%H:%M:%S")...........(when.(f
5da0 75 6e 63 74 69 6f 6e 70 20 27 61 6c 65 72 74 2d 2d 6c 6f 67 2d 73 65 74 2d 6c 65 76 65 6c 29 0a unctionp.'alert--log-set-level).
5dc0 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6c 65 72 74 2d 2d 6c 6f 67 2d 73 65 74 2d 6c 65 76 65 ............(alert--log-set-leve
5de0 6c 20 61 6c 65 72 74 2d 6c 6f 67 2d 6c 65 76 65 6c 29 29 29 0a 09 28 61 6c 65 72 74 2d 2d 6c 6f l.alert-log-level)))..(alert--lo
5e00 67 2d 65 6e 61 62 6c 65 2d 6c 6f 67 67 69 6e 67 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 g-enable-logging)).......(when.(
5e20 66 62 6f 75 6e 64 70 20 66 75 6e 63 29 0a 20 20 20 20 20 20 20 20 28 61 70 70 6c 79 20 66 75 6e fboundp.func).........(apply.fun
5e40 63 20 28 6c 69 73 74 20 6d 65 73 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 61 6c 65 72 74 2d c.(list.mes))))))..(defun.alert-
5e60 6c 65 67 61 63 79 2d 6c 6f 67 2d 6e 6f 74 69 66 79 20 28 6d 65 73 20 73 65 76 20 6c 65 6e 29 0a legacy-log-notify.(mes.sev.len).
5e80 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 28 67 65 ..(with-current-buffer.......(ge
5ea0 74 2d 62 75 66 66 65 72 2d 63 72 65 61 74 65 20 22 2a 41 6c 65 72 74 73 2a 22 29 0a 20 20 20 20 t-buffer-create."*Alerts*").....
5ec0 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 20 20 20 20 28 69 6e 73 (goto-char.(point-max)).....(ins
5ee0 65 72 74 20 28 66 6f 72 6d 61 74 2d 74 69 6d 65 2d 73 74 72 69 6e 67 20 22 25 48 3a 25 4d 20 25 ert.(format-time-string."%H:%M.%
5f00 70 20 2d 20 22 29 29 0a 20 20 20 20 28 69 6e 73 65 72 74 20 6d 65 73 29 0a 20 20 20 20 28 73 65 p.-.")).....(insert.mes).....(se
5f20 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 69 65 73 20 28 2d 20 28 70 6f 69 6e 74 29 20 6c 65 6e t-text-properties.(-.(point).len
5f40 29 20 28 70 6f 69 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ).(point).......................
5f60 20 20 20 28 6c 69 73 74 20 27 66 61 63 65 20 28 63 64 72 20 28 61 73 73 71 20 73 65 76 0a 20 20 ...(list.'face.(cdr.(assq.sev...
5f80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
5fa0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 6c 65 72 74 2d 73 65 76 65 72 69 74 79 2d 66 61 63 ..............alert-severity-fac
5fc0 65 73 29 29 29 29 0a 20 20 20 20 28 69 6e 73 65 72 74 20 3f 5c 6e 29 29 29 0a 0a 28 64 65 66 75 es)))).....(insert.?\n)))..(defu
5fe0 6e 20 61 6c 65 72 74 2d 6c 6f 67 2d 63 6c 65 61 72 20 28 69 6e 66 6f 29 0a 20 20 28 69 66 20 28 n.alert-log-clear.(info)...(if.(
6000 66 75 6e 63 74 69 6f 6e 70 20 27 61 6c 65 72 74 2d 2d 6c 6f 67 2d 63 6c 65 61 72 2d 6c 6f 67 29 functionp.'alert--log-clear-log)
6020 0a 20 20 20 20 20 20 28 61 6c 65 72 74 2d 2d 6c 6f 67 2d 63 6c 65 61 72 2d 6c 6f 67 29 0a 20 20 .......(alert--log-clear-log)...
6040 20 20 28 69 66 20 28 62 75 66 66 65 72 70 20 22 2a 41 6c 65 72 74 73 2a 22 29 0a 20 20 20 20 20 ..(if.(bufferp."*Alerts*")......
6060 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 ...(with-current-buffer.........
6080 20 20 20 20 28 67 65 74 2d 62 75 66 66 65 72 2d 63 72 65 61 74 65 20 22 2a 41 6c 65 72 74 73 2a ....(get-buffer-create."*Alerts*
60a0 22 29 0a 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d ")...........(goto-char.(point-m
60c0 61 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 66 6f 72 6d 61 74 2d 74 ax))...........(insert.(format-t
60e0 69 6d 65 2d 73 74 72 69 6e 67 20 22 25 48 3a 25 4d 20 25 70 20 2d 20 22 29 0a 20 20 20 20 20 20 ime-string."%H:%M.%p.-.").......
6100 20 20 20 20 20 20 20 20 20 20 20 20 22 43 6c 65 61 72 3a 20 22 20 28 70 6c 69 73 74 2d 67 65 74 ............"Clear:.".(plist-get
6120 20 69 6e 66 6f 20 3a 6d 65 73 73 61 67 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .info.:message).................
6140 20 20 3f 5c 6e 29 29 29 29 29 0a 0a 28 61 6c 65 72 74 2d 64 65 66 69 6e 65 2d 73 74 79 6c 65 20 ..?\n)))))..(alert-define-style.
6160 27 6c 6f 67 20 3a 74 69 74 6c 65 20 22 4c 6f 67 20 74 6f 20 2a 41 6c 65 72 74 73 2a 20 62 75 66 'log.:title."Log.to.*Alerts*.buf
6180 66 65 72 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6e 6f 74 69 66 69 fer".....................:notifi
61a0 65 72 20 23 27 61 6c 65 72 74 2d 6c 6f 67 2d 6e 6f 74 69 66 79 0a 20 20 20 20 20 20 20 20 20 20 er.#'alert-log-notify...........
61c0 20 20 20 20 20 20 20 20 20 20 3b 3b 3a 72 65 6d 6f 76 65 72 20 23 27 61 6c 65 72 74 2d 6c 6f 67 ..........;;:remover.#'alert-log
61e0 2d 63 6c 65 61 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 0a 0c 0a 28 -clear.....................)...(
6200 64 65 66 75 6e 20 61 6c 65 72 74 2d 6d 65 73 73 61 67 65 2d 6e 6f 74 69 66 79 20 28 69 6e 66 6f defun.alert-message-notify.(info
6220 29 0a 20 20 3b 3b 20 74 68 65 20 6d 65 73 73 61 67 65 20 74 65 78 74 20 6d 69 67 68 74 20 63 6f )...;;.the.message.text.might.co
6240 6e 74 61 69 6e 20 60 25 27 20 61 6e 64 20 77 65 20 64 6f 6e 27 74 20 77 61 6e 74 20 74 68 65 6d ntain.`%'.and.we.don't.want.them
6260 20 74 6f 20 62 65 0a 20 20 3b 3b 20 69 6e 74 65 72 70 72 65 74 65 64 20 61 73 20 66 6f 72 6d 61 .to.be...;;.interpreted.as.forma
6280 74 20 73 70 65 63 69 66 69 65 72 73 3a 0a 20 20 28 6d 65 73 73 61 67 65 20 22 25 73 22 20 28 70 t.specifiers:...(message."%s".(p
62a0 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 6d 65 73 73 61 67 65 29 29 0a 20 20 3b 3b 28 69 66 list-get.info.:message))...;;(if
62c0 20 28 6d 65 6d 71 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 73 65 76 65 72 69 74 79 .(memq.(plist-get.info.:severity
62e0 29 20 27 28 68 69 67 68 20 75 72 67 65 6e 63 79 29 29 0a 20 20 3b 3b 20 20 20 20 28 64 69 6e 67 ).'(high.urgency))...;;....(ding
6300 29 29 0a 20 20 29 0a 0a 28 64 65 66 75 6e 20 61 6c 65 72 74 2d 6d 65 73 73 61 67 65 2d 72 65 6d ))...)..(defun.alert-message-rem
6320 6f 76 65 20 28 5f 69 6e 66 6f 29 0a 20 20 28 6d 65 73 73 61 67 65 20 22 22 29 29 0a 0a 28 61 6c ove.(_info)...(message.""))..(al
6340 65 72 74 2d 64 65 66 69 6e 65 2d 73 74 79 6c 65 20 27 6d 65 73 73 61 67 65 20 3a 74 69 74 6c 65 ert-define-style.'message.:title
6360 20 22 44 69 73 70 6c 61 79 20 6d 65 73 73 61 67 65 20 69 6e 20 6d 69 6e 69 62 75 66 66 65 72 22 ."Display.message.in.minibuffer"
6380 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6e 6f 74 69 66 69 65 72 20 23 .....................:notifier.#
63a0 27 61 6c 65 72 74 2d 6d 65 73 73 61 67 65 2d 6e 6f 74 69 66 79 0a 20 20 20 20 20 20 20 20 20 20 'alert-message-notify...........
63c0 20 20 20 20 20 20 20 20 20 20 3a 72 65 6d 6f 76 65 72 20 23 27 61 6c 65 72 74 2d 6d 65 73 73 61 ..........:remover.#'alert-messa
63e0 67 65 2d 72 65 6d 6f 76 65 29 0a 0c 0a 28 64 65 66 75 6e 20 61 6c 65 72 74 2d 6d 6f 6d 65 6e 74 ge-remove)...(defun.alert-moment
6400 61 72 79 2d 6e 6f 74 69 66 79 20 28 69 6e 66 6f 29 0a 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 ary-notify.(info)...(save-excurs
6420 69 6f 6e 0a 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 28 6f 72 ion.....(with-current-buffer.(or
6440 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 62 75 66 66 65 72 29 20 28 63 75 72 72 65 .(plist-get.info.:buffer).(curre
6460 6e 74 2d 62 75 66 66 65 72 29 29 0a 20 20 20 20 20 20 28 6d 6f 6d 65 6e 74 61 72 79 2d 73 74 72 nt-buffer)).......(momentary-str
6480 69 6e 67 2d 64 69 73 70 6c 61 79 0a 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 3a 20 ing-display........(format."%s:.
64a0 25 73 20 28 25 73 2f 25 73 2f 25 73 29 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f %s.(%s/%s/%s)"................(o
64c0 72 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 74 69 74 6c 65 29 20 22 75 6e 74 69 74 r.(plist-get.info.:title)."untit
64e0 6c 65 64 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 70 6c 69 73 74 2d led")................(or.(plist-
6500 67 65 74 20 69 6e 66 6f 20 3a 6d 65 73 73 61 67 65 29 20 22 6e 6f 20 6d 65 73 73 61 67 65 22 29 get.info.:message)."no.message")
6520 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 70 6c 69 73 74 2d 67 65 74 20 69 ................(or.(plist-get.i
6540 6e 66 6f 20 3a 73 65 76 65 72 69 74 79 29 20 22 6e 6f 20 70 72 69 6f 72 69 74 79 22 29 0a 20 20 nfo.:severity)."no.priority")...
6560 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f .............(or.(plist-get.info
6580 20 3a 63 61 74 65 67 6f 72 79 29 20 22 6e 6f 20 63 61 74 65 67 6f 72 79 22 29 0a 20 20 20 20 20 .:category)."no.category")......
65a0 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 6d ..........(or.(plist-get.info.:m
65c0 6f 64 65 29 20 22 6e 6f 20 6d 6f 64 65 22 29 29 0a 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 ode)."no.mode"))........(progn..
65e0 20 20 20 20 20 20 20 20 28 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 29 0a 20 20 20 20 ........(beginning-of-line).....
6600 20 20 20 20 20 28 70 6f 69 6e 74 29 29 29 29 29 29 0a 0a 28 61 6c 65 72 74 2d 64 65 66 69 6e 65 .....(point))))))..(alert-define
6620 2d 73 74 79 6c 65 20 27 6d 6f 6d 65 6e 74 61 72 79 20 3a 74 69 74 6c 65 20 22 44 69 73 70 6c 61 -style.'momentary.:title."Displa
6640 79 20 6d 65 73 73 61 67 65 20 6d 6f 6d 65 6e 74 61 72 69 6c 79 20 69 6e 20 62 75 66 66 65 72 22 y.message.momentarily.in.buffer"
6660 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6e 6f 74 69 66 69 65 72 20 23 .....................:notifier.#
6680 27 61 6c 65 72 74 2d 6d 6f 6d 65 6e 74 61 72 79 2d 6e 6f 74 69 66 79 0a 20 20 20 20 20 20 20 20 'alert-momentary-notify.........
66a0 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 65 78 70 6c 69 63 69 74 6c 79 2c 20 77 65 20 64 6f ............;;.explicitly,.we.do
66c0 6e 27 74 20 6e 65 65 64 20 61 20 72 65 6d 6f 76 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 n't.need.a.remover..............
66e0 20 20 20 20 20 20 20 3a 72 65 6d 6f 76 65 72 20 23 27 69 67 6e 6f 72 65 29 0a 0c 0a 28 63 6f 70 .......:remover.#'ignore)...(cop
6700 79 2d 66 61 63 65 20 27 66 72 69 6e 67 65 20 27 61 6c 65 72 74 2d 73 61 76 65 64 2d 66 72 69 6e y-face.'fringe.'alert-saved-frin
6720 67 65 2d 66 61 63 65 29 0a 0a 28 64 65 66 75 6e 20 61 6c 65 72 74 2d 66 72 69 6e 67 65 2d 6e 6f ge-face)..(defun.alert-fringe-no
6740 74 69 66 79 20 28 69 6e 66 6f 29 0a 20 20 28 73 65 74 2d 66 61 63 65 2d 62 61 63 6b 67 72 6f 75 tify.(info)...(set-face-backgrou
6760 6e 64 20 27 66 72 69 6e 67 65 20 28 63 64 72 20 28 61 73 73 71 20 28 70 6c 69 73 74 2d 67 65 74 nd.'fringe.(cdr.(assq.(plist-get
6780 20 69 6e 66 6f 20 3a 73 65 76 65 72 69 74 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .info.:severity)................
67a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 6c 65 72 74 ...........................alert
67c0 2d 73 65 76 65 72 69 74 79 2d 63 6f 6c 6f 72 73 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 61 6c 65 -severity-colors))))..(defun.ale
67e0 72 74 2d 66 72 69 6e 67 65 2d 72 65 73 74 6f 72 65 20 28 5f 69 6e 66 6f 29 0a 20 20 28 63 6f 70 rt-fringe-restore.(_info)...(cop
6800 79 2d 66 61 63 65 20 27 61 6c 65 72 74 2d 73 61 76 65 64 2d 66 72 69 6e 67 65 2d 66 61 63 65 20 y-face.'alert-saved-fringe-face.
6820 27 66 72 69 6e 67 65 29 29 0a 0a 28 61 6c 65 72 74 2d 64 65 66 69 6e 65 2d 73 74 79 6c 65 20 27 'fringe))..(alert-define-style.'
6840 66 72 69 6e 67 65 20 3a 74 69 74 6c 65 20 22 43 68 61 6e 67 65 20 74 68 65 20 66 72 69 6e 67 65 fringe.:title."Change.the.fringe
6860 20 63 6f 6c 6f 72 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6e 6f 74 .color".....................:not
6880 69 66 69 65 72 20 23 27 61 6c 65 72 74 2d 66 72 69 6e 67 65 2d 6e 6f 74 69 66 79 0a 20 20 20 20 ifier.#'alert-fringe-notify.....
68a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 6d 6f 76 65 72 20 23 27 61 6c 65 72 74 ................:remover.#'alert
68c0 2d 66 72 69 6e 67 65 2d 72 65 73 74 6f 72 65 29 0a 0c 0a 28 63 6f 70 79 2d 66 61 63 65 20 27 6d -fringe-restore)...(copy-face.'m
68e0 6f 64 65 2d 6c 69 6e 65 20 27 61 6c 65 72 74 2d 73 61 76 65 64 2d 6d 6f 64 65 2d 6c 69 6e 65 2d ode-line.'alert-saved-mode-line-
6900 66 61 63 65 29 0a 28 64 65 66 75 6e 20 61 6c 65 72 74 2d 6d 6f 64 65 2d 6c 69 6e 65 2d 6e 6f 74 face).(defun.alert-mode-line-not
6920 69 66 79 20 28 69 6e 66 6f 29 0a 20 20 28 73 65 74 2d 66 61 63 65 2d 62 61 63 6b 67 72 6f 75 6e ify.(info)...(set-face-backgroun
6940 64 20 27 6d 6f 64 65 2d 6c 69 6e 65 20 28 63 64 72 20 28 61 73 73 71 20 28 70 6c 69 73 74 2d 67 d.'mode-line.(cdr.(assq.(plist-g
6960 65 74 20 69 6e 66 6f 20 3a 73 65 76 65 72 69 74 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 et.info.:severity)..............
6980 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
69a0 61 6c 65 72 74 2d 73 65 76 65 72 69 74 79 2d 63 6f 6c 6f 72 73 29 29 29 0a 20 20 28 73 65 74 2d alert-severity-colors)))...(set-
69c0 66 61 63 65 2d 66 6f 72 65 67 72 6f 75 6e 64 20 27 6d 6f 64 65 2d 6c 69 6e 65 20 22 77 68 69 74 face-foreground.'mode-line."whit
69e0 65 22 29 29 0a 0a 28 64 65 66 75 6e 20 61 6c 65 72 74 2d 6d 6f 64 65 2d 6c 69 6e 65 2d 72 65 73 e"))..(defun.alert-mode-line-res
6a00 74 6f 72 65 20 28 5f 69 6e 66 6f 29 0a 20 20 28 63 6f 70 79 2d 66 61 63 65 20 27 61 6c 65 72 74 tore.(_info)...(copy-face.'alert
6a20 2d 73 61 76 65 64 2d 6d 6f 64 65 2d 6c 69 6e 65 2d 66 61 63 65 20 27 6d 6f 64 65 2d 6c 69 6e 65 -saved-mode-line-face.'mode-line
6a40 29 29 0a 0a 28 61 6c 65 72 74 2d 64 65 66 69 6e 65 2d 73 74 79 6c 65 20 27 6d 6f 64 65 2d 6c 69 ))..(alert-define-style.'mode-li
6a60 6e 65 20 3a 74 69 74 6c 65 20 22 43 68 61 6e 67 65 20 74 68 65 20 6d 6f 64 65 2d 6c 69 6e 65 20 ne.:title."Change.the.mode-line.
6a80 63 6f 6c 6f 72 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6e 6f 74 69 color".....................:noti
6aa0 66 69 65 72 20 23 27 61 6c 65 72 74 2d 6d 6f 64 65 2d 6c 69 6e 65 2d 6e 6f 74 69 66 79 0a 20 20 fier.#'alert-mode-line-notify...
6ac0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 6d 6f 76 65 72 20 23 27 61 6c 65 ..................:remover.#'ale
6ae0 72 74 2d 6d 6f 64 65 2d 6c 69 6e 65 2d 72 65 73 74 6f 72 65 29 0a 0a 0c 0a 0a 28 64 65 66 63 75 rt-mode-line-restore).....(defcu
6b00 73 74 6f 6d 20 61 6c 65 72 74 2d 67 72 6f 77 6c 2d 63 6f 6d 6d 61 6e 64 20 28 65 78 65 63 75 74 stom.alert-growl-command.(execut
6b20 61 62 6c 65 2d 66 69 6e 64 20 22 67 72 6f 77 6c 6e 6f 74 69 66 79 22 29 0a 20 20 22 50 61 74 68 able-find."growlnotify")..."Path
6b40 20 74 6f 20 74 68 65 20 67 72 6f 77 6c 6e 6f 74 69 66 79 20 63 6f 6d 6d 61 6e 64 2e 0a 54 68 69 .to.the.growlnotify.command..Thi
6b60 73 20 69 73 20 66 6f 75 6e 64 20 69 6e 20 74 68 65 20 47 72 6f 77 6c 20 45 78 74 72 61 73 3a 20 s.is.found.in.the.Growl.Extras:.
6b80 68 74 74 70 3a 2f 2f 67 72 6f 77 6c 2e 69 6e 66 6f 2f 65 78 74 72 61 73 2e 70 68 70 2e 22 0a 20 http://growl.info/extras.php."..
6ba0 20 3a 74 79 70 65 20 27 66 69 6c 65 0a 20 20 3a 67 72 6f 75 70 20 27 61 6c 65 72 74 29 0a 0a 28 .:type.'file...:group.'alert)..(
6bc0 64 65 66 63 75 73 74 6f 6d 20 61 6c 65 72 74 2d 67 72 6f 77 6c 2d 70 72 69 6f 72 69 74 69 65 73 defcustom.alert-growl-priorities
6be0 0a 20 20 27 28 28 75 72 67 65 6e 74 20 20 20 2e 20 32 29 0a 20 20 20 20 28 68 69 67 68 20 20 20 ...'((urgent.....2).....(high...
6c00 20 20 2e 20 32 29 0a 20 20 20 20 28 6d 6f 64 65 72 61 74 65 20 2e 20 31 29 0a 20 20 20 20 28 6e ....2).....(moderate...1).....(n
6c20 6f 72 6d 61 6c 20 20 20 2e 20 30 29 0a 20 20 20 20 28 6c 6f 77 20 20 20 20 20 20 2e 20 2d 31 29 ormal.....0).....(low........-1)
6c40 0a 20 20 20 20 28 74 72 69 76 69 61 6c 20 20 2e 20 2d 32 29 29 0a 20 20 22 41 20 6d 61 70 70 69 .....(trivial....-2))..."A.mappi
6c60 6e 67 20 6f 66 20 61 6c 65 72 74 20 73 65 76 65 72 69 74 69 65 73 20 6f 6e 74 6f 20 47 72 6f 77 ng.of.alert.severities.onto.Grow
6c80 6c 20 70 72 69 6f 72 69 74 79 20 76 61 6c 75 65 73 2e 22 0a 20 20 3a 74 79 70 65 20 27 28 61 6c l.priority.values."...:type.'(al
6ca0 69 73 74 20 3a 6b 65 79 2d 74 79 70 65 20 73 79 6d 62 6f 6c 20 3a 76 61 6c 75 65 2d 74 79 70 65 ist.:key-type.symbol.:value-type
6cc0 20 69 6e 74 65 67 65 72 29 0a 20 20 3a 67 72 6f 75 70 20 27 61 6c 65 72 74 29 0a 0a 28 64 65 66 .integer)...:group.'alert)..(def
6ce0 73 75 62 73 74 20 61 6c 65 72 74 2d 65 6e 63 6f 64 65 2d 73 74 72 69 6e 67 20 28 73 74 72 29 0a subst.alert-encode-string.(str).
6d00 20 20 28 65 6e 63 6f 64 65 2d 63 6f 64 69 6e 67 2d 73 74 72 69 6e 67 20 73 74 72 20 28 6b 65 79 ..(encode-coding-string.str.(key
6d20 62 6f 61 72 64 2d 63 6f 64 69 6e 67 2d 73 79 73 74 65 6d 29 29 29 0a 0a 28 64 65 66 75 6e 20 61 board-coding-system)))..(defun.a
6d40 6c 65 72 74 2d 67 72 6f 77 6c 2d 6e 6f 74 69 66 79 20 28 69 6e 66 6f 29 0a 20 20 28 69 66 20 61 lert-growl-notify.(info)...(if.a
6d60 6c 65 72 74 2d 67 72 6f 77 6c 2d 63 6f 6d 6d 61 6e 64 0a 20 20 20 20 20 20 28 6c 65 74 2a 20 28 lert-growl-command.......(let*.(
6d80 28 74 69 74 6c 65 20 28 61 6c 65 72 74 2d 65 6e 63 6f 64 65 2d 73 74 72 69 6e 67 20 28 70 6c 69 (title.(alert-encode-string.(pli
6da0 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 74 69 74 6c 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 st-get.info.:title)))...........
6dc0 20 20 20 28 70 72 69 6f 72 69 74 79 20 28 6e 75 6d 62 65 72 2d 74 6f 2d 73 74 72 69 6e 67 0a 20 ...(priority.(number-to-string..
6de0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 64 72 20 28 61 73 73 .......................(cdr.(ass
6e00 71 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 73 65 76 65 72 69 74 79 29 0a 20 20 20 q.(plist-get.info.:severity)....
6e20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
6e40 61 6c 65 72 74 2d 67 72 6f 77 6c 2d 70 72 69 6f 72 69 74 69 65 73 29 29 29 29 0a 20 20 20 20 20 alert-growl-priorities))))......
6e60 20 20 20 20 20 20 20 20 28 61 72 67 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d ........(args...............(cl-
6e80 63 61 73 65 20 73 79 73 74 65 6d 2d 74 79 70 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 case.system-type................
6ea0 20 28 77 69 6e 64 6f 77 73 2d 6e 74 20 28 6d 61 70 63 61 72 0a 20 20 20 20 20 20 20 20 20 20 20 .(windows-nt.(mapcar............
6ec0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 6c 73 74 29 20 ..................(lambda.(lst).
6ee0 28 61 70 70 6c 79 20 23 27 63 6f 6e 63 61 74 20 6c 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 (apply.#'concat.lst))...........
6f00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 0a 20 20 20 20 20 20 20 20 20 20 ...................`(...........
6f20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 68 74 74 70 3a 2f 2f 77 .....................;;.http://w
6f40 77 77 2e 67 72 6f 77 6c 66 6f 72 77 69 6e 64 6f 77 73 2e 63 6f 6d 2f 67 66 77 2f 68 65 6c 70 2f ww.growlforwindows.com/gfw/help/
6f60 67 72 6f 77 6c 6e 6f 74 69 66 79 2e 61 73 70 78 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 growlnotify.aspx................
6f80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 22 2f 69 3a 22 20 2c 28 66 69 6c 65 2d 74 72 ................("/i:".,(file-tr
6fa0 75 65 6e 61 6d 65 20 28 63 6f 6e 63 61 74 20 69 6e 76 6f 63 61 74 69 6f 6e 2d 64 69 72 65 63 74 uename.(concat.invocation-direct
6fc0 6f 72 79 20 22 2e 2e 2f 73 68 61 72 65 2f 69 63 6f 6e 73 2f 68 69 63 6f 6c 6f 72 2f 34 38 78 34 ory."../share/icons/hicolor/48x4
6fe0 38 2f 61 70 70 73 2f 65 6d 61 63 73 2e 70 6e 67 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 8/apps/emacs.png")))............
7000 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 22 2f 74 3a 22 20 2c 74 69 74 6c ....................("/t:".,titl
7020 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e)..............................
7040 20 20 28 22 2f 70 3a 22 20 2c 70 72 69 6f 72 69 74 79 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 ..("/p:".,priority))))..........
7060 20 20 20 20 20 20 20 28 74 20 28 6c 69 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .......(t.(list.................
7080 20 20 20 20 22 2d 2d 61 70 70 49 63 6f 6e 22 20 20 22 45 6d 61 63 73 22 0a 20 20 20 20 20 20 20 ...."--appIcon".."Emacs"........
70a0 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2d 2d 6e 61 6d 65 22 20 20 20 20 20 22 45 6d 61 63 73 ............."--name"....."Emacs
70c0 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2d 2d 74 69 74 6c 65 22 20 "....................."--title".
70e0 20 20 20 74 69 74 6c 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2d 2d ...title....................."--
7100 70 72 69 6f 72 69 74 79 22 20 70 72 69 6f 72 69 74 79 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 priority".priority))))).........
7120 28 69 66 20 28 61 6e 64 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 70 65 72 73 69 73 (if.(and.(plist-get.info.:persis
7140 74 65 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 70 6c 69 tent)..................(not.(pli
7160 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 6e 65 76 65 72 2d 70 65 72 73 69 73 74 29 29 29 0a 20 20 st-get.info.:never-persist)))...
7180 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 63 61 73 65 20 73 79 73 74 65 6d 2d 74 79 70 65 0a 20 ..........(cl-case.system-type..
71a0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 6e 64 6f 77 73 2d 6e 74 20 28 6e 63 6f 6e 63 20 .............(windows-nt.(nconc.
71c0 61 72 67 73 20 28 6c 69 73 74 20 22 2f 73 3a 74 72 75 65 22 29 29 29 0a 20 20 20 20 20 20 20 20 args.(list."/s:true"))).........
71e0 20 20 20 20 20 20 28 74 20 28 6e 63 6f 6e 63 20 61 72 67 73 20 28 6c 69 73 74 20 22 2d 2d 73 74 ......(t.(nconc.args.(list."--st
7200 69 63 6b 79 22 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 6d 65 73 73 61 67 icky"))))).........(let.((messag
7220 65 20 28 61 6c 65 72 74 2d 65 6e 63 6f 64 65 2d 73 74 72 69 6e 67 20 28 70 6c 69 73 74 2d 67 65 e.(alert-encode-string.(plist-ge
7240 74 20 69 6e 66 6f 20 3a 6d 65 73 73 61 67 65 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 t.info.:message))))...........(c
7260 6c 2d 63 61 73 65 20 73 79 73 74 65 6d 2d 74 79 70 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 l-case.system-type.............(
7280 77 69 6e 64 6f 77 73 2d 6e 74 20 28 6e 63 6f 6e 63 20 61 72 67 73 20 28 6c 69 73 74 20 6d 65 73 windows-nt.(nconc.args.(list.mes
72a0 73 61 67 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 74 20 28 6e 63 6f 6e 63 20 61 72 sage))).............(t.(nconc.ar
72c0 67 73 20 28 6c 69 73 74 20 22 2d 2d 6d 65 73 73 61 67 65 22 20 6d 65 73 73 61 67 65 29 29 29 29 gs.(list."--message".message))))
72e0 29 0a 20 20 20 20 20 20 20 20 28 61 70 70 6c 79 20 23 27 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 ).........(apply.#'call-process.
7300 61 6c 65 72 74 2d 67 72 6f 77 6c 2d 63 6f 6d 6d 61 6e 64 20 6e 69 6c 20 6e 69 6c 20 6e 69 6c 20 alert-growl-command.nil.nil.nil.
7320 61 72 67 73 29 29 0a 20 20 20 20 28 61 6c 65 72 74 2d 6d 65 73 73 61 67 65 2d 6e 6f 74 69 66 79 args)).....(alert-message-notify
7340 20 69 6e 66 6f 29 29 29 0a 0a 28 61 6c 65 72 74 2d 64 65 66 69 6e 65 2d 73 74 79 6c 65 20 27 67 .info)))..(alert-define-style.'g
7360 72 6f 77 6c 20 3a 74 69 74 6c 65 20 22 4e 6f 74 69 66 79 20 75 73 69 6e 67 20 47 72 6f 77 6c 22 rowl.:title."Notify.using.Growl"
7380 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6e 6f 74 69 66 69 65 72 20 23 .....................:notifier.#
73a0 27 61 6c 65 72 74 2d 67 72 6f 77 6c 2d 6e 6f 74 69 66 79 29 0a 0a 0c 0a 28 64 65 66 63 75 73 74 'alert-growl-notify)....(defcust
73c0 6f 6d 20 61 6c 65 72 74 2d 6c 69 62 6e 6f 74 69 66 79 2d 63 6f 6d 6d 61 6e 64 20 28 65 78 65 63 om.alert-libnotify-command.(exec
73e0 75 74 61 62 6c 65 2d 66 69 6e 64 20 22 6e 6f 74 69 66 79 2d 73 65 6e 64 22 29 0a 20 20 22 50 61 utable-find."notify-send")..."Pa
7400 74 68 20 74 6f 20 74 68 65 20 6e 6f 74 69 66 79 2d 73 65 6e 64 20 63 6f 6d 6d 61 6e 64 2e 0a 54 th.to.the.notify-send.command..T
7420 68 69 73 20 69 73 20 66 6f 75 6e 64 20 69 6e 20 74 68 65 20 6c 69 62 6e 6f 74 69 66 79 2d 62 69 his.is.found.in.the.libnotify-bi
7440 6e 20 70 61 63 6b 61 67 65 20 69 6e 20 44 65 62 69 61 6e 20 62 61 73 65 64 0a 73 79 73 74 65 6d n.package.in.Debian.based.system
7460 73 2e 22 0a 20 20 3a 74 79 70 65 20 27 66 69 6c 65 0a 20 20 3a 67 72 6f 75 70 20 27 61 6c 65 72 s."...:type.'file...:group.'aler
7480 74 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 61 6c 65 72 74 2d 6c 69 62 6e 6f 74 69 66 79 2d 61 t)..(defcustom.alert-libnotify-a
74a0 64 64 69 74 69 6f 6e 61 6c 2d 61 72 67 73 0a 20 20 6e 69 6c 0a 20 20 22 41 64 64 69 74 69 6f 6e dditional-args...nil..."Addition
74c0 61 6c 20 61 72 67 73 20 74 6f 20 70 61 73 73 20 74 6f 20 6e 6f 74 69 66 79 2d 73 65 6e 64 2e 0a al.args.to.pass.to.notify-send..
74e0 4d 75 73 74 20 62 65 20 61 20 6c 69 73 74 20 6f 66 20 73 74 72 69 6e 67 73 2e 22 0a 20 20 3a 74 Must.be.a.list.of.strings."...:t
7500 79 70 65 20 27 28 72 65 70 65 61 74 20 73 74 72 69 6e 67 29 0a 20 20 3a 67 72 6f 75 70 20 27 61 ype.'(repeat.string)...:group.'a
7520 6c 65 72 74 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 61 6c 65 72 74 2d 6c 69 62 6e 6f 74 69 66 lert)..(defcustom.alert-libnotif
7540 79 2d 70 72 69 6f 72 69 74 69 65 73 0a 20 20 27 28 28 75 72 67 65 6e 74 20 20 20 2e 20 63 72 69 y-priorities...'((urgent.....cri
7560 74 69 63 61 6c 29 0a 20 20 20 20 28 68 69 67 68 20 20 20 20 20 2e 20 63 72 69 74 69 63 61 6c 29 tical).....(high.......critical)
7580 0a 20 20 20 20 28 6d 6f 64 65 72 61 74 65 20 2e 20 6e 6f 72 6d 61 6c 29 0a 20 20 20 20 28 6e 6f .....(moderate...normal).....(no
75a0 72 6d 61 6c 20 20 20 2e 20 6e 6f 72 6d 61 6c 29 0a 20 20 20 20 28 6c 6f 77 20 20 20 20 20 20 2e rmal.....normal).....(low.......
75c0 20 6c 6f 77 29 0a 20 20 20 20 28 74 72 69 76 69 61 6c 20 20 2e 20 6c 6f 77 29 29 0a 20 20 22 41 .low).....(trivial....low))..."A
75e0 20 6d 61 70 70 69 6e 67 20 6f 66 20 61 6c 65 72 74 20 73 65 76 65 72 69 74 69 65 73 20 6f 6e 74 .mapping.of.alert.severities.ont
7600 6f 20 6c 69 62 6e 6f 74 69 66 79 20 70 72 69 6f 72 69 74 79 20 76 61 6c 75 65 73 2e 22 0a 20 20 o.libnotify.priority.values."...
7620 3a 74 79 70 65 20 27 28 61 6c 69 73 74 20 3a 6b 65 79 2d 74 79 70 65 20 73 79 6d 62 6f 6c 20 3a :type.'(alist.:key-type.symbol.:
7640 76 61 6c 75 65 2d 74 79 70 65 20 73 79 6d 62 6f 6c 29 0a 20 20 3a 67 72 6f 75 70 20 27 61 6c 65 value-type.symbol)...:group.'ale
7660 72 74 29 0a 0a 28 64 65 66 75 6e 20 61 6c 65 72 74 2d 6c 69 62 6e 6f 74 69 66 79 2d 6e 6f 74 69 rt)..(defun.alert-libnotify-noti
7680 66 79 20 28 69 6e 66 6f 29 0a 20 20 22 53 65 6e 64 20 49 4e 46 4f 20 75 73 69 6e 67 20 6e 6f 74 fy.(info)..."Send.INFO.using.not
76a0 69 66 79 2d 73 65 6e 64 2e 0a 48 61 6e 64 6c 65 73 20 3a 49 43 4f 4e 2c 20 3a 43 41 54 45 47 4f ify-send..Handles.:ICON,.:CATEGO
76c0 52 59 2c 20 3a 53 45 56 45 52 49 54 59 2c 20 3a 50 45 52 53 49 53 54 45 4e 54 2c 20 3a 4e 45 56 RY,.:SEVERITY,.:PERSISTENT,.:NEV
76e0 45 52 2d 50 45 52 53 49 53 54 2c 20 3a 54 49 54 4c 45 0a 61 6e 64 20 3a 4d 45 53 53 41 47 45 20 ER-PERSIST,.:TITLE.and.:MESSAGE.
7700 6b 65 79 77 6f 72 64 73 20 66 72 6f 6d 20 74 68 65 20 49 4e 46 4f 20 70 6c 69 73 74 2e 20 20 3a keywords.from.the.INFO.plist...:
7720 43 41 54 45 47 4f 52 59 20 63 61 6e 20 62 65 0a 70 61 73 73 65 64 20 61 73 20 61 20 73 69 6e 67 CATEGORY.can.be.passed.as.a.sing
7740 6c 65 20 73 79 6d 62 6f 6c 2c 20 61 20 73 74 72 69 6e 67 20 6f 72 20 61 20 6c 69 73 74 20 6f 66 le.symbol,.a.string.or.a.list.of
7760 20 73 79 6d 62 6f 6c 73 20 6f 72 0a 73 74 72 69 6e 67 73 2e 22 0a 20 20 28 69 66 20 61 6c 65 72 .symbols.or.strings."...(if.aler
7780 74 2d 6c 69 62 6e 6f 74 69 66 79 2d 63 6f 6d 6d 61 6e 64 0a 20 20 20 20 20 20 28 6c 65 74 2a 20 t-libnotify-command.......(let*.
77a0 28 28 61 72 67 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 70 70 65 6e 64 0a 20 20 20 ((args...............(append....
77c0 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 22 2d 2d 69 63 6f 6e 22 20 20 20 20 20 28 ............(list."--icon".....(
77e0 6f 72 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 69 63 6f 6e 29 0a 20 20 20 20 20 20 or.(plist-get.info.:icon).......
7800 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
7820 61 6c 65 72 74 2d 64 65 66 61 75 6c 74 2d 69 63 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 alert-default-icon).............
7840 20 20 20 20 20 20 20 20 20 22 2d 2d 61 70 70 2d 6e 61 6d 65 22 20 22 45 6d 61 63 73 22 0a 20 20 ........."--app-name"."Emacs"...
7860 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2d 2d 75 72 67 65 6e 63 79 22 20 20 ..................."--urgency"..
7880 28 6c 65 74 20 28 28 75 72 67 65 6e 63 79 20 28 63 64 72 20 28 61 73 73 71 0a 20 20 20 20 20 20 (let.((urgency.(cdr.(assq.......
78a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
78c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f .................(plist-get.info
78e0 20 3a 73 65 76 65 72 69 74 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .:severity).....................
7900 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
7920 20 20 20 61 6c 65 72 74 2d 6c 69 62 6e 6f 74 69 66 79 2d 70 72 69 6f 72 69 74 69 65 73 29 29 29 ...alert-libnotify-priorities)))
7940 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 )...............................
7960 20 20 20 20 20 20 28 69 66 20 75 72 67 65 6e 63 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ......(if.urgency...............
7980 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 79 6d 62 6f ..........................(symbo
79a0 6c 2d 6e 61 6d 65 20 75 72 67 65 6e 63 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 l-name.urgency).................
79c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 6e 6f 72 6d 61 6c 22 29 29 ......................"normal"))
79e0 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 70 79 2d 74 72 65 65 20 61 6c 65 72 )................(copy-tree.aler
7a00 74 2d 6c 69 62 6e 6f 74 69 66 79 2d 61 64 64 69 74 69 6f 6e 61 6c 2d 61 72 67 73 29 29 29 0a 20 t-libnotify-additional-args)))..
7a20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 74 65 67 6f 72 79 20 28 70 6c 69 73 74 2d 67 65 74 ............(category.(plist-get
7a40 20 69 6e 66 6f 20 3a 63 61 74 65 67 6f 72 79 29 29 29 0a 20 20 20 20 20 20 20 20 28 6e 63 6f 6e .info.:category))).........(ncon
7a60 63 20 61 72 67 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 22 2d 2d 65 c.args................(list."--e
7a80 78 70 69 72 65 2d 74 69 6d 65 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 xpire-time".....................
7aa0 20 28 6e 75 6d 62 65 72 2d 74 6f 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 .(number-to-string..............
7ac0 20 20 20 20 20 20 20 20 20 28 2a 20 31 30 30 30 20 3b 20 6e 6f 74 69 66 79 2d 73 65 6e 64 20 74 .........(*.1000.;.notify-send.t
7ae0 61 6b 65 73 20 6d 73 65 63 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 akes.msecs......................
7b00 20 20 20 20 28 69 66 20 28 61 6e 64 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 70 65 ....(if.(and.(plist-get.info.:pe
7b20 72 73 69 73 74 65 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 rsistent).......................
7b40 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f ............(not.(plist-get.info
7b60 20 3a 6e 65 76 65 72 2d 70 65 72 73 69 73 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 .:never-persist)))..............
7b80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 20 3b 20 30 20 69 6e 64 69 63 61 74 65 73 20 ................0.;.0.indicates.
7ba0 70 65 72 73 69 73 74 65 6e 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 persistence.....................
7bc0 20 20 20 20 20 20 20 61 6c 65 72 74 2d 66 61 64 65 2d 74 69 6d 65 29 29 29 29 29 0a 20 20 20 20 .......alert-fade-time))))).....
7be0 20 20 20 20 28 77 68 65 6e 20 63 61 74 65 67 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 28 6e 63 ....(when.category...........(nc
7c00 6f 6e 63 20 61 72 67 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 onc.args..................(list.
7c20 22 2d 2d 63 61 74 65 67 6f 72 79 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 "--category"....................
7c40 20 20 20 20 28 63 6f 6e 64 20 28 28 73 79 6d 62 6f 6c 70 20 63 61 74 65 67 6f 72 79 29 0a 20 20 ....(cond.((symbolp.category)...
7c60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 79 6d ............................(sym
7c80 62 6f 6c 2d 6e 61 6d 65 20 63 61 74 65 67 6f 72 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 bol-name.category)).............
7ca0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 73 74 72 69 6e 67 70 20 63 61 74 65 67 .................((stringp.categ
7cc0 6f 72 79 29 20 63 61 74 65 67 6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ory).category)..................
7ce0 20 20 20 20 20 20 20 20 20 20 20 20 28 28 6c 69 73 74 70 20 63 61 74 65 67 6f 72 79 29 0a 20 20 ............((listp.category)...
7d00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 ............................(map
7d20 63 6f 6e 63 61 74 20 28 69 66 20 28 73 79 6d 62 6f 6c 70 20 28 63 61 72 20 63 61 74 65 67 6f 72 concat.(if.(symbolp.(car.categor
7d40 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 y)).............................
7d60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 73 79 6d 62 6f 6c 2d 6e 61 6d 65 0a 20 .................#'symbol-name..
7d80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
7da0 20 20 20 20 20 20 20 20 20 20 23 27 69 64 65 6e 74 69 74 79 29 0a 20 20 20 20 20 20 20 20 20 20 ..........#'identity)...........
7dc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 ...............................c
7de0 61 74 65 67 6f 72 79 20 22 2c 22 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 6e 63 6f 6e 63 ategory.",")))))).........(nconc
7e00 20 61 72 67 73 20 28 6c 69 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .args.(list.....................
7e20 20 28 61 6c 65 72 74 2d 65 6e 63 6f 64 65 2d 73 74 72 69 6e 67 20 28 70 6c 69 73 74 2d 67 65 74 .(alert-encode-string.(plist-get
7e40 20 69 6e 66 6f 20 3a 74 69 74 6c 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .info.:title))..................
7e60 20 20 20 20 28 61 6c 65 72 74 2d 65 6e 63 6f 64 65 2d 73 74 72 69 6e 67 20 28 70 6c 69 73 74 2d ....(alert-encode-string.(plist-
7e80 67 65 74 20 69 6e 66 6f 20 3a 6d 65 73 73 61 67 65 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 61 get.info.:message)))).........(a
7ea0 70 70 6c 79 20 23 27 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 61 6c 65 72 74 2d 6c 69 62 6e 6f 74 pply.#'call-process.alert-libnot
7ec0 69 66 79 2d 63 6f 6d 6d 61 6e 64 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ify-command.nil................(
7ee0 6c 69 73 74 20 28 67 65 74 2d 62 75 66 66 65 72 2d 63 72 65 61 74 65 20 22 20 2a 6c 69 62 6e 6f list.(get-buffer-create.".*libno
7f00 74 69 66 79 20 6f 75 74 70 75 74 2a 22 29 20 74 29 20 6e 69 6c 20 61 72 67 73 29 29 0a 20 20 20 tify.output*").t).nil.args))....
7f20 20 28 61 6c 65 72 74 2d 6d 65 73 73 61 67 65 2d 6e 6f 74 69 66 79 20 69 6e 66 6f 29 29 29 0a 0a .(alert-message-notify.info)))..
7f40 28 61 6c 65 72 74 2d 64 65 66 69 6e 65 2d 73 74 79 6c 65 20 27 6c 69 62 6e 6f 74 69 66 79 20 3a (alert-define-style.'libnotify.:
7f60 74 69 74 6c 65 20 22 4e 6f 74 69 66 79 20 75 73 69 6e 67 20 6c 69 62 6e 6f 74 69 66 79 22 0a 20 title."Notify.using.libnotify"..
7f80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6e 6f 74 69 66 69 65 72 20 23 27 61 ...................:notifier.#'a
7fa0 6c 65 72 74 2d 6c 69 62 6e 6f 74 69 66 79 2d 6e 6f 74 69 66 79 29 0a 0a 0c 0a 28 64 65 66 63 75 lert-libnotify-notify)....(defcu
7fc0 73 74 6f 6d 20 61 6c 65 72 74 2d 67 6e 74 70 2d 69 63 6f 6e 0a 20 20 22 68 74 74 70 3a 2f 2f 63 stom.alert-gntp-icon..."http://c
7fe0 76 73 2e 73 61 76 61 6e 6e 61 68 2e 67 6e 75 2e 6f 72 67 2f 76 69 65 77 76 63 2f 2a 63 68 65 63 vs.savannah.gnu.org/viewvc/*chec
8000 6b 6f 75 74 2a 2f 65 6d 61 63 73 2f 65 6d 61 63 73 2f 65 74 63 2f 69 6d 61 67 65 73 2f 69 63 6f kout*/emacs/emacs/etc/images/ico
8020 6e 73 2f 68 69 63 6f 6c 6f 72 2f 34 38 78 34 38 2f 61 70 70 73 2f 65 6d 61 63 73 2e 70 6e 67 22 ns/hicolor/48x48/apps/emacs.png"
8040 0a 20 20 22 49 63 6f 6e 20 66 69 6c 65 20 75 73 69 6e 67 20 67 6e 74 70 2e 22 0a 20 20 3a 74 79 ..."Icon.file.using.gntp."...:ty
8060 70 65 20 27 73 74 72 69 6e 67 0a 20 20 3a 67 72 6f 75 70 20 27 61 6c 65 72 74 29 0a 0a 28 77 68 pe.'string...:group.'alert)..(wh
8080 65 6e 20 28 66 65 61 74 75 72 65 70 20 27 67 6e 74 70 29 0a 20 20 28 64 65 66 75 6e 20 61 6c 65 en.(featurep.'gntp)...(defun.ale
80a0 72 74 2d 67 6e 74 70 2d 6e 6f 74 69 66 79 20 28 69 6e 66 6f 29 0a 20 20 20 20 28 67 6e 74 70 2d rt-gntp-notify.(info).....(gntp-
80c0 6e 6f 74 69 66 79 20 27 61 6c 65 72 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 notify.'alert..................(
80e0 61 6c 65 72 74 2d 65 6e 63 6f 64 65 2d 73 74 72 69 6e 67 20 28 70 6c 69 73 74 2d 67 65 74 20 69 alert-encode-string.(plist-get.i
8100 6e 66 6f 20 3a 74 69 74 6c 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 nfo.:title))..................(a
8120 6c 65 72 74 2d 65 6e 63 6f 64 65 2d 73 74 72 69 6e 67 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e lert-encode-string.(plist-get.in
8140 66 6f 20 3a 6d 65 73 73 61 67 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 67 fo.:message))..................g
8160 6e 74 70 2d 73 65 72 76 65 72 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ntp-server.nil..................
8180 28 6e 75 6d 62 65 72 2d 74 6f 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (number-to-string...............
81a0 20 20 20 20 28 63 64 72 20 28 61 73 73 71 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a ....(cdr.(assq.(plist-get.info.:
81c0 73 65 76 65 72 69 74 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 severity).......................
81e0 20 20 20 20 20 20 20 61 6c 65 72 74 2d 67 72 6f 77 6c 2d 70 72 69 6f 72 69 74 69 65 73 29 29 29 .......alert-growl-priorities)))
8200 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 65 71 20 28 70 6c 69 73 74 ..................(if.(eq.(plist
8220 2d 67 65 74 20 69 6e 66 6f 20 3a 69 63 6f 6e 29 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 -get.info.:icon).nil)...........
8240 20 20 20 20 20 20 20 20 20 20 20 61 6c 65 72 74 2d 67 6e 74 70 2d 69 63 6f 6e 0a 20 20 20 20 20 ...........alert-gntp-icon......
8260 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 69 ..............(plist-get.info.:i
8280 63 6f 6e 29 29 29 0a 20 20 20 20 28 61 6c 65 72 74 2d 6d 65 73 73 61 67 65 2d 6e 6f 74 69 66 79 con))).....(alert-message-notify
82a0 20 69 6e 66 6f 29 29 0a 0a 20 20 28 61 6c 65 72 74 2d 64 65 66 69 6e 65 2d 73 74 79 6c 65 20 27 .info))....(alert-define-style.'
82c0 67 6e 74 70 20 3a 74 69 74 6c 65 20 22 4e 6f 74 69 66 79 20 75 73 69 6e 67 20 67 6e 74 70 22 0a gntp.:title."Notify.using.gntp".
82e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6e 6f 74 69 66 69 65 72 20 ......................:notifier.
8300 23 27 61 6c 65 72 74 2d 67 6e 74 70 2d 6e 6f 74 69 66 79 29 29 0a 0a 0c 0a 28 64 65 66 63 75 73 #'alert-gntp-notify))....(defcus
8320 74 6f 6d 20 61 6c 65 72 74 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 70 72 69 6f 72 69 74 69 tom.alert-notifications-prioriti
8340 65 73 0a 20 20 27 28 28 75 72 67 65 6e 74 20 20 20 2e 20 63 72 69 74 69 63 61 6c 29 0a 20 20 20 es...'((urgent.....critical)....
8360 20 28 68 69 67 68 20 20 20 20 20 2e 20 63 72 69 74 69 63 61 6c 29 0a 20 20 20 20 28 6d 6f 64 65 .(high.......critical).....(mode
8380 72 61 74 65 20 2e 20 6e 6f 72 6d 61 6c 29 0a 20 20 20 20 28 6e 6f 72 6d 61 6c 20 20 20 2e 20 6e rate...normal).....(normal.....n
83a0 6f 72 6d 61 6c 29 0a 20 20 20 20 28 6c 6f 77 20 20 20 20 20 20 2e 20 6c 6f 77 29 0a 20 20 20 20 ormal).....(low........low).....
83c0 28 74 72 69 76 69 61 6c 20 20 2e 20 6c 6f 77 29 29 0a 20 20 22 41 20 6d 61 70 70 69 6e 67 20 6f (trivial....low))..."A.mapping.o
83e0 66 20 61 6c 65 72 74 20 73 65 76 65 72 69 74 69 65 73 20 6f 6e 74 6f 20 47 72 6f 77 6c 20 70 72 f.alert.severities.onto.Growl.pr
8400 69 6f 72 69 74 79 20 76 61 6c 75 65 73 2e 22 0a 20 20 3a 74 79 70 65 20 27 28 61 6c 69 73 74 20 iority.values."...:type.'(alist.
8420 3a 6b 65 79 2d 74 79 70 65 20 73 79 6d 62 6f 6c 20 3a 76 61 6c 75 65 2d 74 79 70 65 20 73 79 6d :key-type.symbol.:value-type.sym
8440 62 6f 6c 29 0a 20 20 3a 67 72 6f 75 70 20 27 61 6c 65 72 74 29 0a 0a 28 64 65 66 76 61 72 20 61 bol)...:group.'alert)..(defvar.a
8460 6c 65 72 74 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 69 64 73 20 28 6d 61 6b 65 2d 68 61 73 lert-notifications-ids.(make-has
8480 68 2d 74 61 62 6c 65 20 3a 74 65 73 74 20 23 27 65 71 75 61 6c 29 0a 20 20 22 49 6e 74 65 72 6e h-table.:test.#'equal)..."Intern
84a0 61 6c 20 73 74 6f 72 65 20 6f 66 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 69 64 73 20 72 65 74 al.store.of.notification.ids.ret
84c0 75 72 6e 65 64 20 62 79 20 74 68 65 20 60 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 27 20 62 61 63 urned.by.the.`notifications'.bac
84e0 6b 65 6e 64 2e 0a 55 73 65 64 20 66 6f 72 20 72 65 70 6c 61 63 69 6e 67 20 6e 6f 74 69 66 69 63 kend..Used.for.replacing.notific
8500 61 74 69 6f 6e 73 20 77 69 74 68 20 74 68 65 20 73 61 6d 65 20 69 64 2e 20 20 54 68 65 20 6b 65 ations.with.the.same.id...The.ke
8520 79 20 69 73 0a 74 68 65 20 76 61 6c 75 65 20 6f 66 20 74 68 65 20 3a 69 64 20 6b 65 79 77 6f 72 y.is.the.value.of.the.:id.keywor
8540 64 20 74 6f 20 60 61 6c 65 72 74 27 2e 20 20 41 6e 20 69 64 20 69 73 20 6f 6e 6c 79 20 73 74 6f d.to.`alert'...An.id.is.only.sto
8560 72 65 64 0a 68 65 72 65 20 69 66 20 74 68 65 72 65 20 60 61 6c 65 72 74 27 20 77 61 73 20 63 61 red.here.if.there.`alert'.was.ca
8580 6c 6c 65 64 20 77 69 74 68 20 61 6e 20 3a 69 64 20 6b 65 79 77 6f 72 64 20 61 6e 64 20 68 61 6e lled.with.an.:id.keyword.and.han
85a0 64 6c 65 64 0a 62 79 20 74 68 65 20 60 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 27 20 73 74 79 6c dled.by.the.`notifications'.styl
85c0 65 2e 22 29 0a 0a 28 77 68 65 6e 20 28 66 65 61 74 75 72 65 70 20 27 6e 6f 74 69 66 69 63 61 74 e.")..(when.(featurep.'notificat
85e0 69 6f 6e 73 29 0a 20 20 28 64 65 66 75 6e 20 61 6c 65 72 74 2d 6e 6f 74 69 66 69 63 61 74 69 6f ions)...(defun.alert-notificatio
8600 6e 73 2d 6e 6f 74 69 66 79 20 28 69 6e 66 6f 29 0a 20 20 20 20 22 53 68 6f 77 20 74 68 65 20 61 ns-notify.(info)....."Show.the.a
8620 6c 65 72 74 20 64 65 66 69 6e 65 64 20 62 79 20 49 4e 46 4f 20 77 69 74 68 20 60 6e 6f 74 69 66 lert.defined.by.INFO.with.`notif
8640 69 63 61 74 69 6f 6e 73 2d 6e 6f 74 69 66 79 27 2e 22 0a 20 20 20 20 28 6c 65 74 20 28 28 69 64 ications-notify'.".....(let.((id
8660 20 28 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 6e 6f 74 69 66 79 20 3a 74 69 74 6c 65 20 28 70 .(notifications-notify.:title.(p
8680 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 74 69 74 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 list-get.info.:title)...........
86a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 62 6f 64 79 20 ..........................:body.
86c0 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 6d 65 73 73 61 67 65 29 0a 20 20 20 20 20 .(plist-get.info.:message)......
86e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a ...............................:
8700 61 70 70 2d 69 63 6f 6e 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 69 63 6f 6e 29 0a app-icon.(plist-get.info.:icon).
8720 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
8740 20 20 20 20 3a 74 69 6d 65 6f 75 74 20 28 69 66 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f ....:timeout.(if.(plist-get.info
8760 20 3a 70 65 72 73 69 73 74 65 6e 74 29 20 30 20 2d 31 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 .:persistent).0.-1).............
8780 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 70 6c 61 63 65 ........................:replace
87a0 73 2d 69 64 20 28 67 65 74 68 61 73 68 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 69 s-id.(gethash.(plist-get.info.:i
87c0 64 29 20 61 6c 65 72 74 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 69 64 73 29 0a 20 20 20 20 d).alert-notifications-ids).....
87e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
8800 3a 75 72 67 65 6e 63 79 20 28 63 64 72 20 28 61 73 73 71 20 28 70 6c 69 73 74 2d 67 65 74 20 69 :urgency.(cdr.(assq.(plist-get.i
8820 6e 66 6f 20 3a 73 65 76 65 72 69 74 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 nfo.:severity)..................
8840 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
8860 20 20 20 20 20 20 20 61 6c 65 72 74 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 70 72 69 6f 72 .......alert-notifications-prior
8880 69 74 69 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ities)).........................
88a0 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 73 20 27 28 22 64 65 66 61 75 6c 74 22 ............:actions.'("default"
88c0 20 22 4f 70 65 6e 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 62 75 66 66 65 72 22 29 0a 20 20 ."Open.corresponding.buffer")...
88e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
8900 20 20 3a 6f 6e 2d 61 63 74 69 6f 6e 20 28 6c 61 6d 62 64 61 20 28 69 64 20 61 63 74 69 6f 6e 29 ..:on-action.(lambda.(id.action)
8920 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
8940 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 73 74 72 69 6e 67 3d ..................(when.(string=
8960 20 61 63 74 69 6f 6e 20 22 64 65 66 61 75 6c 74 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 .action."default")..............
8980 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
89a0 20 20 20 20 20 20 28 73 77 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 20 28 70 6c 69 73 74 2d 67 ......(switch-to-buffer.(plist-g
89c0 65 74 20 69 6e 66 6f 20 3a 62 75 66 66 65 72 29 29 29 29 29 29 29 0a 20 20 20 20 20 20 28 77 68 et.info.:buffer))))))).......(wh
89e0 65 6e 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 69 64 29 0a 20 20 20 20 20 20 20 20 en.(plist-get.info.:id).........
8a00 28 70 75 74 68 61 73 68 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 69 64 29 20 69 64 (puthash.(plist-get.info.:id).id
8a20 20 61 6c 65 72 74 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 69 64 73 29 29 29 0a 20 20 20 20 .alert-notifications-ids))).....
8a40 28 61 6c 65 72 74 2d 6d 65 73 73 61 67 65 2d 6e 6f 74 69 66 79 20 69 6e 66 6f 29 29 0a 0a 20 20 (alert-message-notify.info))....
8a60 28 64 65 66 75 6e 20 61 6c 65 72 74 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 72 65 6d 6f 76 (defun.alert-notifications-remov
8a80 65 20 28 69 6e 66 6f 29 0a 20 20 20 20 22 52 65 6d 6f 76 65 20 74 68 65 20 60 6e 6f 74 69 66 69 e.(info)....."Remove.the.`notifi
8aa0 63 61 74 69 6f 6e 73 2d 6e 6f 74 69 66 79 27 20 6d 65 73 73 61 67 65 20 62 61 73 65 64 20 6f 6e cations-notify'.message.based.on
8ac0 20 49 4e 46 4f 20 3a 69 64 2e 22 0a 20 20 20 20 28 6c 65 74 20 28 28 69 64 20 28 61 6e 64 20 28 .INFO.:id.".....(let.((id.(and.(
8ae0 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 plist-get.info.:id).............
8b00 20 20 20 20 20 20 20 28 67 65 74 68 61 73 68 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 .......(gethash.(plist-get.info.
8b20 3a 69 64 29 20 61 6c 65 72 74 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 69 64 73 29 29 29 29 :id).alert-notifications-ids))))
8b40 0a 20 20 20 20 20 20 28 77 68 65 6e 20 69 64 0a 20 20 20 20 20 20 20 20 28 6e 6f 74 69 66 69 63 .......(when.id.........(notific
8b60 61 74 69 6f 6e 73 2d 63 6c 6f 73 65 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 69 64 29 0a 20 20 ations-close-notification.id)...
8b80 20 20 20 20 20 20 28 72 65 6d 68 61 73 68 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a ......(remhash.(plist-get.info.:
8ba0 69 64 29 20 61 6c 65 72 74 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d 69 64 73 29 29 29 29 0a id).alert-notifications-ids)))).
8bc0 0a 20 20 28 61 6c 65 72 74 2d 64 65 66 69 6e 65 2d 73 74 79 6c 65 20 27 6e 6f 74 69 66 69 63 61 ...(alert-define-style.'notifica
8be0 74 69 6f 6e 73 20 3a 74 69 74 6c 65 20 22 4e 6f 74 69 66 79 20 75 73 69 6e 67 20 6e 6f 74 69 66 tions.:title."Notify.using.notif
8c00 69 63 61 74 69 6f 6e 73 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ications".......................
8c20 3a 6e 6f 74 69 66 69 65 72 20 23 27 61 6c 65 72 74 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 73 2d :notifier.#'alert-notifications-
8c40 6e 6f 74 69 66 79 29 29 0a 0a 0c 0a 28 64 65 66 63 75 73 74 6f 6d 20 61 6c 65 72 74 2d 6e 6f 74 notify))....(defcustom.alert-not
8c60 69 66 69 65 72 2d 63 6f 6d 6d 61 6e 64 20 28 65 78 65 63 75 74 61 62 6c 65 2d 66 69 6e 64 20 22 ifier-command.(executable-find."
8c80 74 65 72 6d 69 6e 61 6c 2d 6e 6f 74 69 66 69 65 72 22 29 0a 20 20 22 50 61 74 68 20 74 6f 20 74 terminal-notifier")..."Path.to.t
8ca0 68 65 20 74 65 72 6d 69 6e 61 6c 2d 6e 6f 74 69 66 69 65 72 20 63 6f 6d 6d 61 6e 64 2e 0a 46 72 he.terminal-notifier.command..Fr
8cc0 6f 6d 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 6a 75 6c 69 65 6e 58 58 2f 74 om.https://github.com/julienXX/t
8ce0 65 72 6d 69 6e 61 6c 2d 6e 6f 74 69 66 69 65 72 2e 22 0a 20 20 3a 74 79 70 65 20 27 66 69 6c 65 erminal-notifier."...:type.'file
8d00 0a 20 20 3a 67 72 6f 75 70 20 27 61 6c 65 72 74 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 61 6c ...:group.'alert)..(defcustom.al
8d20 65 72 74 2d 6e 6f 74 69 66 69 65 72 2d 64 65 66 61 75 6c 74 2d 69 63 6f 6e 0a 20 20 28 63 6f 6e ert-notifier-default-icon...(con
8d40 63 61 74 20 64 61 74 61 2d 64 69 72 65 63 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 22 69 6d cat.data-directory..........."im
8d60 61 67 65 73 2f 69 63 6f 6e 73 2f 68 69 63 6f 6c 6f 72 2f 31 32 38 78 31 32 38 2f 61 70 70 73 2f ages/icons/hicolor/128x128/apps/
8d80 65 6d 61 63 73 2e 70 6e 67 22 29 0a 20 20 22 46 69 6c 65 6e 61 6d 65 20 6f 66 20 64 65 66 61 75 emacs.png")..."Filename.of.defau
8da0 6c 74 20 69 63 6f 6e 20 74 6f 20 73 68 6f 77 20 66 6f 72 20 74 65 72 6d 69 6e 61 6c 2d 6e 6f 74 lt.icon.to.show.for.terminal-not
8dc0 69 66 69 65 72 20 61 6c 65 72 74 73 2e 22 0a 20 20 3a 74 79 70 65 20 27 73 74 72 69 6e 67 0a 20 ifier.alerts."...:type.'string..
8de0 20 3a 67 72 6f 75 70 20 27 61 6c 65 72 74 29 0a 0a 28 64 65 66 75 6e 20 61 6c 65 72 74 2d 6e 6f .:group.'alert)..(defun.alert-no
8e00 74 69 66 69 65 72 2d 6e 6f 74 69 66 79 20 28 69 6e 66 6f 29 0a 20 20 28 69 66 20 61 6c 65 72 74 tifier-notify.(info)...(if.alert
8e20 2d 6e 6f 74 69 66 69 65 72 2d 63 6f 6d 6d 61 6e 64 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 61 -notifier-command.......(let.((a
8e40 72 67 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 22 2d 74 69 74 6c 65 22 20 rgs..............(list."-title".
8e60 20 20 28 61 6c 65 72 74 2d 65 6e 63 6f 64 65 2d 73 74 72 69 6e 67 20 28 70 6c 69 73 74 2d 67 65 ..(alert-encode-string.(plist-ge
8e80 74 20 69 6e 66 6f 20 3a 74 69 74 6c 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 t.info.:title)).................
8ea0 20 20 20 22 2d 61 70 70 49 63 6f 6e 22 20 28 6f 72 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 ..."-appIcon".(or.(plist-get.inf
8ec0 6f 20 3a 69 63 6f 6e 29 20 61 6c 65 72 74 2d 6e 6f 74 69 66 69 65 72 2d 64 65 66 61 75 6c 74 2d o.:icon).alert-notifier-default-
8ee0 69 63 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2d 6d 65 73 73 61 icon)...................."-messa
8f00 67 65 22 20 28 61 6c 65 72 74 2d 65 6e 63 6f 64 65 2d 73 74 72 69 6e 67 20 28 70 6c 69 73 74 2d ge".(alert-encode-string.(plist-
8f20 67 65 74 20 69 6e 66 6f 20 3a 6d 65 73 73 61 67 65 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 get.info.:message))))).........(
8f40 61 70 70 6c 79 20 23 27 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 61 6c 65 72 74 2d 6e 6f 74 69 66 apply.#'call-process.alert-notif
8f60 69 65 72 2d 63 6f 6d 6d 61 6e 64 20 6e 69 6c 20 6e 69 6c 20 6e 69 6c 20 61 72 67 73 29 29 0a 20 ier-command.nil.nil.nil.args))..
8f80 20 20 20 28 61 6c 65 72 74 2d 6d 65 73 73 61 67 65 2d 6e 6f 74 69 66 79 20 69 6e 66 6f 29 29 29 ...(alert-message-notify.info)))
8fa0 0a 0a 28 61 6c 65 72 74 2d 64 65 66 69 6e 65 2d 73 74 79 6c 65 20 27 6e 6f 74 69 66 69 65 72 20 ..(alert-define-style.'notifier.
8fc0 3a 74 69 74 6c 65 20 22 4e 6f 74 69 66 79 20 75 73 69 6e 67 20 74 65 72 6d 69 6e 61 6c 2d 6e 6f :title."Notify.using.terminal-no
8fe0 74 69 66 69 65 72 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6e 6f 74 tifier".....................:not
9000 69 66 69 65 72 20 23 27 61 6c 65 72 74 2d 6e 6f 74 69 66 69 65 72 2d 6e 6f 74 69 66 79 29 0a 0a ifier.#'alert-notifier-notify)..
9020 28 64 65 66 75 6e 20 61 6c 65 72 74 2d 6f 73 78 2d 6e 6f 74 69 66 69 65 72 2d 6e 6f 74 69 66 79 (defun.alert-osx-notifier-notify
9040 20 28 69 6e 66 6f 29 0a 20 20 28 61 70 70 6c 79 20 23 27 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 .(info)...(apply.#'call-process.
9060 22 6f 73 61 73 63 72 69 70 74 22 20 6e 69 6c 20 6e 69 6c 20 6e 69 6c 20 22 2d 65 22 0a 20 20 20 "osascript".nil.nil.nil."-e"....
9080 20 20 20 20 20 20 28 6c 69 73 74 20 28 66 6f 72 6d 61 74 20 22 64 69 73 70 6c 61 79 20 6e 6f 74 ......(list.(format."display.not
90a0 69 66 69 63 61 74 69 6f 6e 20 25 53 20 77 69 74 68 20 74 69 74 6c 65 20 25 53 22 0a 20 20 20 20 ification.%S.with.title.%S".....
90c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e ...................(plist-get.in
90e0 66 6f 20 3a 6d 65 73 73 61 67 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 fo.:message)....................
9100 20 20 20 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 74 69 74 6c 65 29 29 29 29 0a 20 ....(plist-get.info.:title))))..
9120 20 28 61 6c 65 72 74 2d 6d 65 73 73 61 67 65 2d 6e 6f 74 69 66 79 20 69 6e 66 6f 29 29 0a 0a 28 .(alert-message-notify.info))..(
9140 77 68 65 6e 20 28 66 62 6f 75 6e 64 70 20 27 64 6f 2d 61 70 70 6c 65 73 63 72 69 70 74 29 0a 20 when.(fboundp.'do-applescript)..
9160 20 3b 3b 20 55 73 65 20 62 75 69 6c 74 2d 69 6e 20 41 70 70 6c 65 53 63 72 69 70 74 20 73 75 70 .;;.Use.built-in.AppleScript.sup
9180 70 6f 72 74 20 77 68 65 6e 20 70 6f 73 73 69 62 6c 65 2e 0a 20 20 28 64 65 66 75 6e 20 61 6c 65 port.when.possible....(defun.ale
91a0 72 74 2d 6f 73 78 2d 6e 6f 74 69 66 69 65 72 2d 6e 6f 74 69 66 79 20 28 69 6e 66 6f 29 0a 20 20 rt-osx-notifier-notify.(info)...
91c0 20 20 28 64 6f 2d 61 70 70 6c 65 73 63 72 69 70 74 20 28 66 6f 72 6d 61 74 20 22 64 69 73 70 6c ..(do-applescript.(format."displ
91e0 61 79 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 25 53 20 77 69 74 68 20 74 69 74 6c 65 20 25 53 ay.notification.%S.with.title.%S
9200 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 ".............................(p
9220 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 6d 65 73 73 61 67 65 29 0a 20 20 20 20 20 20 20 20 list-get.info.:message).........
9240 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6c 69 73 74 2d 67 65 74 20 69 ....................(plist-get.i
9260 6e 66 6f 20 3a 74 69 74 6c 65 29 29 29 0a 20 20 20 20 28 61 6c 65 72 74 2d 6d 65 73 73 61 67 65 nfo.:title))).....(alert-message
9280 2d 6e 6f 74 69 66 79 20 69 6e 66 6f 29 29 29 0a 0a 28 61 6c 65 72 74 2d 64 65 66 69 6e 65 2d 73 -notify.info)))..(alert-define-s
92a0 74 79 6c 65 20 27 6f 73 78 2d 6e 6f 74 69 66 69 65 72 20 3a 74 69 74 6c 65 20 22 4e 6f 74 69 66 tyle.'osx-notifier.:title."Notif
92c0 79 20 75 73 69 6e 67 20 6e 61 74 69 76 65 20 4f 53 58 20 6e 6f 74 69 66 69 63 61 74 69 6f 6e 22 y.using.native.OSX.notification"
92e0 20 3a 6e 6f 74 69 66 69 65 72 20 23 27 61 6c 65 72 74 2d 6f 73 78 2d 6e 6f 74 69 66 69 65 72 2d .:notifier.#'alert-osx-notifier-
9300 6e 6f 74 69 66 79 29 0a 0a 28 64 65 66 75 6e 20 61 6c 65 72 74 2d 66 72 61 6d 65 2d 6e 6f 74 69 notify)..(defun.alert-frame-noti
9320 66 79 20 28 69 6e 66 6f 29 0a 20 20 28 6c 65 74 20 28 28 62 75 66 20 28 70 6c 69 73 74 2d 67 65 fy.(info)...(let.((buf.(plist-ge
9340 74 20 69 6e 66 6f 20 3a 62 75 66 66 65 72 29 29 29 0a 20 20 20 20 28 69 66 20 28 65 71 20 28 61 t.info.:buffer))).....(if.(eq.(a
9360 6c 65 72 74 2d 62 75 66 66 65 72 2d 73 74 61 74 75 73 20 62 75 66 29 20 27 62 75 72 69 65 64 29 lert-buffer-status.buf).'buried)
9380 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 63 75 72 72 65 6e 74 2d 66 72 61 6d 65 20 28 73 .........(let.((current-frame.(s
93a0 65 6c 65 63 74 65 64 2d 66 72 61 6d 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 elected-frame)))...........(with
93c0 2d 73 65 6c 65 63 74 65 64 2d 66 72 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d -selected-frame...............(m
93e0 61 6b 65 2d 66 72 61 6d 65 20 27 28 28 77 69 64 74 68 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ake-frame.'((width..............
9400 20 20 2e 20 38 30 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ....80).........................
9420 20 20 20 20 28 68 65 69 67 68 74 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 20 32 30 29 0a ....(height.................20).
9440 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 6f 70 ............................(top
9460 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 20 2d 31 29 0a 20 20 20 20 20 20 20 20 ....................-1).........
9480 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 66 74 20 20 20 20 20 20 20 ....................(left.......
94a0 20 20 20 20 20 20 20 20 20 20 2e 20 30 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ............0)..................
94c0 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 66 74 2d 66 72 69 6e 67 65 20 20 20 20 20 20 20 20 20 ...........(left-fringe.........
94e0 20 2e 20 30 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ...0)...........................
9500 20 20 28 72 69 67 68 74 2d 66 72 69 6e 67 65 20 20 20 20 20 20 20 20 20 2e 20 30 29 0a 20 20 20 ..(right-fringe...........0)....
9520 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 6f 6f 6c 2d 62 .........................(tool-b
9540 61 72 2d 6c 69 6e 65 73 20 20 20 20 20 20 20 2e 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 ar-lines.........nil)...........
9560 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 6e 75 2d 62 61 72 2d 6c 69 6e 65 ..................(menu-bar-line
9580 73 20 20 20 20 20 20 20 2e 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 s.........nil)..................
95a0 20 20 20 20 20 20 20 20 20 20 20 28 76 65 72 74 69 63 61 6c 2d 73 63 72 6f 6c 6c 2d 62 61 72 73 ...........(vertical-scroll-bars
95c0 20 2e 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ...nil).........................
95e0 20 20 20 20 28 75 6e 73 70 6c 69 74 74 61 62 6c 65 20 20 20 20 20 20 20 20 20 2e 20 74 29 0a 20 ....(unsplittable...........t)..
9600 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 68 61 73 2d ...........................(has-
9620 6d 6f 64 65 6c 69 6e 65 2d 70 20 20 20 20 20 20 20 2e 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 modeline-p.........nil).........
9640 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 69 6e 69 62 75 66 66 65 72 20 ....................(minibuffer.
9660 20 20 20 20 20 20 20 20 20 20 2e 20 6e 69 6c 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 ............nil))).............(
9680 73 77 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 20 62 75 66 29 0a 20 20 20 20 20 20 20 20 20 20 switch-to-buffer.buf)...........
96a0 20 20 3b 3b 28 73 65 74 20 28 6d 61 6b 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 20 27 6d ..;;(set.(make-local-variable.'m
96c0 6f 64 65 2d 6c 69 6e 65 2d 66 6f 72 6d 61 74 29 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 ode-line-format).nil)...........
96e0 20 20 28 6e 63 6f 6e 63 20 69 6e 66 6f 20 28 6c 69 73 74 20 3a 66 72 61 6d 65 20 28 73 65 6c 65 ..(nconc.info.(list.:frame.(sele
9700 63 74 65 64 2d 66 72 61 6d 65 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 6c 65 63 74 cted-frame))))...........(select
9720 2d 66 72 61 6d 65 20 63 75 72 72 65 6e 74 2d 66 72 61 6d 65 29 29 29 29 29 0a 0a 28 64 65 66 75 -frame.current-frame)))))..(defu
9740 6e 20 61 6c 65 72 74 2d 66 72 61 6d 65 2d 72 65 6d 6f 76 65 20 28 69 6e 66 6f 29 0a 20 20 28 75 n.alert-frame-remove.(info)...(u
9760 6e 6c 65 73 73 20 28 65 71 20 74 68 69 73 2d 63 6f 6d 6d 61 6e 64 20 27 68 61 6e 64 6c 65 2d 73 nless.(eq.this-command.'handle-s
9780 77 69 74 63 68 2d 66 72 61 6d 65 29 0a 20 20 20 20 28 64 65 6c 65 74 65 2d 66 72 61 6d 65 20 28 witch-frame).....(delete-frame.(
97a0 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 66 72 61 6d 65 29 20 74 29 29 29 0a 0a 3b 3b 20 plist-get.info.:frame).t)))..;;.
97c0 54 68 69 73 20 63 6f 64 65 20 77 61 73 20 6b 69 6e 64 6c 79 20 62 6f 72 72 6f 77 65 64 20 66 72 This.code.was.kindly.borrowed.fr
97e0 6f 6d 20 41 72 6e 65 20 42 61 62 65 6e 68 61 75 73 65 72 68 65 69 64 65 3a 0a 3b 3b 20 68 74 74 om.Arne.Babenhauserheide:.;;.htt
9800 70 3a 2f 2f 77 77 77 2e 64 72 61 6b 65 74 6f 2e 64 65 2f 70 72 6f 6a 2f 62 61 62 63 6f 72 65 2f p://www.draketo.de/proj/babcore/
9820 23 73 65 63 2d 33 2d 31 34 2d 32 0a 28 64 65 66 75 6e 20 78 2d 75 72 67 65 6e 63 79 2d 68 69 6e #sec-3-14-2.(defun.x-urgency-hin
9840 74 20 28 66 72 61 6d 65 20 61 72 67 20 26 6f 70 74 69 6f 6e 61 6c 20 73 6f 75 72 63 65 29 0a 20 t.(frame.arg.&optional.source)..
9860 20 22 53 65 74 20 74 68 65 20 78 2d 75 72 67 65 6e 63 79 20 68 69 6e 74 20 66 6f 72 20 46 52 41 ."Set.the.x-urgency.hint.for.FRA
9880 4d 45 20 74 6f 20 41 52 47 2e 0a 0a 2d 20 49 66 20 61 72 67 20 69 73 20 6e 69 6c 2c 20 75 6e 73 ME.to.ARG...-.If.arg.is.nil,.uns
98a0 65 74 20 74 68 65 20 75 72 67 65 6e 63 79 2e 0a 2d 20 49 66 20 61 72 67 20 69 73 20 61 6e 79 20 et.the.urgency..-.If.arg.is.any.
98c0 6f 74 68 65 72 20 76 61 6c 75 65 2c 20 73 65 74 20 74 68 65 20 75 72 67 65 6e 63 79 2e 0a 0a 49 other.value,.set.the.urgency...I
98e0 66 20 79 6f 75 20 75 6e 73 65 74 20 74 68 65 20 75 72 67 65 6e 63 79 2c 20 79 6f 75 20 73 74 69 f.you.unset.the.urgency,.you.sti
9900 6c 6c 20 68 61 76 65 20 74 6f 20 76 69 73 69 74 20 74 68 65 20 66 72 61 6d 65 20 74 6f 20 6d 61 ll.have.to.visit.the.frame.to.ma
9920 6b 65 20 74 68 65 20 75 72 67 65 6e 63 79 0a 73 65 74 74 69 6e 67 20 64 69 73 61 70 70 65 61 72 ke.the.urgency.setting.disappear
9940 20 28 61 74 20 6c 65 61 73 74 20 69 6e 20 4b 44 45 29 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 77 .(at.least.in.KDE)."...(let*.((w
9960 6d 2d 68 69 6e 74 73 20 28 61 70 70 65 6e 64 20 28 78 2d 77 69 6e 64 6f 77 2d 70 72 6f 70 65 72 m-hints.(append.(x-window-proper
9980 74 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 ty............................."
99a0 57 4d 5f 48 49 4e 54 53 22 20 66 72 61 6d 65 20 22 57 4d 5f 48 49 4e 54 53 22 0a 20 20 20 20 20 WM_HINTS".frame."WM_HINTS"......
99c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 6f 75 72 63 65 20 6e 69 .......................source.ni
99e0 6c 20 74 29 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 6c 61 67 73 20 28 63 61 72 20 l.t).nil))..........(flags.(car.
9a00 77 6d 2d 68 69 6e 74 73 29 29 29 0a 20 20 20 20 28 73 65 74 63 61 72 20 77 6d 2d 68 69 6e 74 73 wm-hints))).....(setcar.wm-hints
9a20 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 61 72 67 0a 20 20 20 20 20 20 20 20 20 20 20 .............(if.arg............
9a40 20 20 20 20 20 28 6c 6f 67 69 6f 72 20 66 6c 61 67 73 20 23 78 30 30 30 30 30 31 30 30 29 0a 20 .....(logior.flags.#x00000100)..
9a60 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 61 6e 64 20 66 6c 61 67 73 20 23 78 31 66 66 .............(logand.flags.#x1ff
9a80 66 66 65 66 66 29 29 29 0a 20 20 20 20 28 78 2d 63 68 61 6e 67 65 2d 77 69 6e 64 6f 77 2d 70 72 ffeff))).....(x-change-window-pr
9aa0 6f 70 65 72 74 79 20 22 57 4d 5f 48 49 4e 54 53 22 20 77 6d 2d 68 69 6e 74 73 20 66 72 61 6d 65 operty."WM_HINTS".wm-hints.frame
9ac0 20 22 57 4d 5f 48 49 4e 54 53 22 20 33 32 20 74 29 29 29 0a 0a 28 64 65 66 75 6e 20 78 2d 75 72 ."WM_HINTS".32.t)))..(defun.x-ur
9ae0 67 65 6e 74 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 29 0a 20 20 22 4d 61 72 6b 20 74 68 65 gent.(&optional.arg)..."Mark.the
9b00 20 63 75 72 72 65 6e 74 20 45 6d 61 63 73 20 66 72 61 6d 65 20 61 73 20 72 65 71 75 69 72 69 6e .current.Emacs.frame.as.requirin
9b20 67 20 75 72 67 65 6e 74 20 61 74 74 65 6e 74 69 6f 6e 2e 0a 0a 57 69 74 68 20 6e 6f 6e 2d 6e 69 g.urgent.attention...With.non-ni
9b40 6c 20 41 52 47 2c 20 72 65 6d 6f 76 65 20 74 68 65 20 75 72 67 65 6e 63 79 20 66 6c 61 67 20 28 l.ARG,.remove.the.urgency.flag.(
9b60 77 68 69 63 68 20 6d 69 67 68 74 20 6f 72 20 6d 69 67 68 74 0a 6e 6f 74 20 63 68 61 6e 67 65 20 which.might.or.might.not.change.
9b80 64 69 73 70 6c 61 79 2c 20 64 65 70 65 6e 64 69 6e 67 20 6f 6e 20 74 68 65 20 77 69 6e 64 6f 77 display,.depending.on.the.window
9ba0 20 6d 61 6e 61 67 65 72 29 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 50 22 29 0a .manager)."...(interactive."P").
9bc0 20 20 28 6c 65 74 20 28 28 66 72 61 6d 65 20 28 63 61 72 20 28 63 61 72 20 28 63 64 72 20 28 63 ..(let.((frame.(car.(car.(cdr.(c
9be0 75 72 72 65 6e 74 2d 66 72 61 6d 65 2d 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e 29 29 29 29 29 29 urrent-frame-configuration))))))
9c00 0a 20 20 20 20 28 78 2d 75 72 67 65 6e 63 79 2d 68 69 6e 74 20 66 72 61 6d 65 20 28 6e 6f 74 20 .....(x-urgency-hint.frame.(not.
9c20 61 72 67 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 61 6c 65 72 74 2d 78 31 31 2d 6e 6f 74 69 66 79 arg))))..(defun.alert-x11-notify
9c40 20 28 5f 69 6e 66 6f 29 0a 20 20 22 43 61 6c 6c 20 60 78 2d 75 72 67 65 6e 74 27 2e 22 0a 20 20 .(_info)..."Call.`x-urgent'."...
9c60 28 78 2d 75 72 67 65 6e 74 29 29 0a 0a 28 61 6c 65 72 74 2d 64 65 66 69 6e 65 2d 73 74 79 6c 65 (x-urgent))..(alert-define-style
9c80 20 27 78 31 31 20 3a 74 69 74 6c 65 20 22 53 65 74 20 74 68 65 20 58 31 31 20 77 69 6e 64 6f 77 .'x11.:title."Set.the.X11.window
9ca0 20 70 72 6f 70 65 72 74 79 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a .property".....................:
9cc0 6e 6f 74 69 66 69 65 72 20 23 27 61 6c 65 72 74 2d 78 31 31 2d 6e 6f 74 69 66 79 29 0a 0a 0a 28 notifier.#'alert-x11-notify)...(
9ce0 64 65 66 63 75 73 74 6f 6d 20 61 6c 65 72 74 2d 74 6f 61 73 74 65 72 2d 64 65 66 61 75 6c 74 2d defcustom.alert-toaster-default-
9d00 69 63 6f 6e 0a 20 20 28 6c 65 74 20 28 28 65 78 65 63 2d 62 69 6e 20 28 65 78 65 63 75 74 61 62 icon...(let.((exec-bin.(executab
9d20 6c 65 2d 66 69 6e 64 20 22 65 6d 61 63 73 2e 65 78 65 22 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 le-find."emacs.exe"))).....(cond
9d40 20 28 65 78 65 63 2d 62 69 6e 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 28 66 .(exec-bin............(concat.(f
9d60 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 65 78 65 63 2d 62 69 6e 29 20 22 2e 2e ile-name-directory.exec-bin)."..
9d80 2f 73 68 61 72 65 2f 69 63 6f 6e 73 2f 68 69 63 6f 6c 6f 72 2f 31 32 38 78 31 32 38 2f 61 70 70 /share/icons/hicolor/128x128/app
9da0 73 2f 65 6d 61 63 73 2e 70 6e 67 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 74 20 6e 69 6c 29 s/emacs.png"))...........(t.nil)
9dc0 29 29 0a 20 20 22 49 63 6f 6e 20 66 69 6c 65 20 75 73 69 6e 67 20 74 6f 61 73 74 65 72 2e 22 0a ))..."Icon.file.using.toaster.".
9de0 20 20 3a 74 79 70 65 20 27 73 74 72 69 6e 67 0a 20 20 3a 67 72 6f 75 70 20 27 61 6c 65 72 74 0a ..:type.'string...:group.'alert.
9e00 20 20 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 61 6c 65 72 74 2d 74 6f 61 73 74 65 72 2d 63 6f ..)..(defcustom.alert-toaster-co
9e20 6d 6d 61 6e 64 20 28 65 78 65 63 75 74 61 62 6c 65 2d 66 69 6e 64 20 22 74 6f 61 73 74 22 29 0a mmand.(executable-find."toast").
9e40 20 20 22 50 61 74 68 20 74 6f 20 74 68 65 20 74 6f 61 73 74 20 63 6f 6d 6d 61 6e 64 2e 0a 54 68 .."Path.to.the.toast.command..Th
9e60 69 73 20 69 73 20 66 6f 75 6e 64 20 61 74 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f is.is.found.at.https://github.co
9e80 6d 2f 6e 65 6c 73 2d 6f 2f 74 6f 61 73 74 65 72 2e 22 0a 20 20 3a 74 79 70 65 20 27 66 69 6c 65 m/nels-o/toaster."...:type.'file
9ea0 0a 20 20 3a 67 72 6f 75 70 20 27 61 6c 65 72 74 0a 20 20 29 0a 0a 28 64 65 66 75 6e 20 61 6c 65 ...:group.'alert...)..(defun.ale
9ec0 72 74 2d 74 6f 61 73 74 65 72 2d 6e 6f 74 69 66 79 20 28 69 6e 66 6f 29 0a 20 20 28 69 66 20 61 rt-toaster-notify.(info)...(if.a
9ee0 6c 65 72 74 2d 74 6f 61 73 74 65 72 2d 63 6f 6d 6d 61 6e 64 0a 20 20 20 20 20 20 28 6c 65 74 20 lert-toaster-command.......(let.
9f00 28 28 61 72 67 73 20 28 6c 69 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ((args.(list....................
9f20 22 2d 74 22 20 28 61 6c 65 72 74 2d 65 6e 63 6f 64 65 2d 73 74 72 69 6e 67 20 28 70 6c 69 73 74 "-t".(alert-encode-string.(plist
9f40 2d 67 65 74 20 69 6e 66 6f 20 3a 74 69 74 6c 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 -get.info.:title))..............
9f60 20 20 20 20 20 20 22 2d 6d 22 20 28 61 6c 65 72 74 2d 65 6e 63 6f 64 65 2d 73 74 72 69 6e 67 20 ......"-m".(alert-encode-string.
9f80 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 6d 65 73 73 61 67 65 29 29 0a 20 20 20 20 20 (plist-get.info.:message))......
9fa0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2d 70 22 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d .............."-p".(expand-file-
9fc0 6e 61 6d 65 20 28 6f 72 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 69 63 6f 6e 29 20 name.(or.(plist-get.info.:icon).
9fe0 61 6c 65 72 74 2d 74 6f 61 73 74 65 72 2d 64 65 66 61 75 6c 74 2d 69 63 6f 6e 29 29 0a 20 20 20 alert-toaster-default-icon))....
a000 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 29 29 0a 20 20 20 20 20 20 20 20 28 61 70 70 ................))).........(app
a020 6c 79 20 23 27 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 61 6c 65 72 74 2d 74 6f 61 73 74 65 72 2d ly.#'call-process.alert-toaster-
a040 63 6f 6d 6d 61 6e 64 20 6e 69 6c 20 6e 69 6c 20 6e 69 6c 20 61 72 67 73 29 29 0a 20 20 20 20 28 command.nil.nil.nil.args)).....(
a060 61 6c 65 72 74 2d 6d 65 73 73 61 67 65 2d 6e 6f 74 69 66 79 20 69 6e 66 6f 29 29 29 0a 0a 28 61 alert-message-notify.info)))..(a
a080 6c 65 72 74 2d 64 65 66 69 6e 65 2d 73 74 79 6c 65 20 27 74 6f 61 73 74 65 72 20 3a 74 69 74 6c lert-define-style.'toaster.:titl
a0a0 65 20 22 4e 6f 74 69 66 79 20 75 73 69 6e 67 20 54 6f 61 73 74 65 72 22 0a 20 20 20 20 20 20 20 e."Notify.using.Toaster"........
a0c0 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6e 6f 74 69 66 69 65 72 20 23 27 61 6c 65 72 74 2d 74 .............:notifier.#'alert-t
a0e0 6f 61 73 74 65 72 2d 6e 6f 74 69 66 79 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 61 6c 65 72 74 oaster-notify)..(defcustom.alert
a100 2d 74 65 72 6d 75 78 2d 63 6f 6d 6d 61 6e 64 20 28 65 78 65 63 75 74 61 62 6c 65 2d 66 69 6e 64 -termux-command.(executable-find
a120 20 22 74 65 72 6d 75 78 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 22 29 0a 20 20 22 50 61 74 68 20 ."termux-notification")..."Path.
a140 74 6f 20 74 68 65 20 74 65 72 6d 75 78 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 63 6f 6d 6d 61 to.the.termux-notification.comma
a160 6e 64 2e 0a 54 68 69 73 20 69 73 20 66 6f 75 6e 64 20 69 6e 20 74 68 65 20 74 65 72 6d 75 78 2d nd..This.is.found.in.the.termux-
a180 61 70 69 20 70 61 63 6b 61 67 65 2c 20 61 6e 64 20 69 74 20 72 65 71 75 69 72 65 73 20 74 68 65 api.package,.and.it.requires.the
a1a0 20 54 65 72 6d 75 78 0a 41 50 49 20 61 64 64 6f 6e 20 61 70 70 20 74 6f 20 62 65 20 69 6e 73 74 .Termux.API.addon.app.to.be.inst
a1c0 61 6c 6c 65 64 2e 22 0a 20 20 3a 74 79 70 65 20 27 66 69 6c 65 0a 20 20 3a 67 72 6f 75 70 20 27 alled."...:type.'file...:group.'
a1e0 61 6c 65 72 74 29 0a 0a 28 64 65 66 75 6e 20 61 6c 65 72 74 2d 74 65 72 6d 75 78 2d 6e 6f 74 69 alert)..(defun.alert-termux-noti
a200 66 79 20 28 69 6e 66 6f 29 0a 20 20 22 53 65 6e 64 20 49 4e 46 4f 20 75 73 69 6e 67 20 74 65 72 fy.(info)..."Send.INFO.using.ter
a220 6d 75 78 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 2e 0a 48 61 6e 64 6c 65 73 20 3a 54 49 54 4c 45 mux-notification..Handles.:TITLE
a240 20 61 6e 64 20 3a 4d 45 53 53 41 47 45 20 6b 65 79 77 6f 72 64 73 20 66 72 6f 6d 20 74 68 65 0a .and.:MESSAGE.keywords.from.the.
a260 49 4e 46 4f 20 70 6c 69 73 74 2e 22 0a 20 20 28 69 66 20 61 6c 65 72 74 2d 74 65 72 6d 75 78 2d INFO.plist."...(if.alert-termux-
a280 63 6f 6d 6d 61 6e 64 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 61 72 67 73 20 28 6e 63 6f 6e 63 command.......(let.((args.(nconc
a2a0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 70 6c 69 73 74 ....................(when.(plist
a2c0 2d 67 65 74 20 69 6e 66 6f 20 3a 74 69 74 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -get.info.:title)...............
a2e0 20 20 20 20 20 20 20 28 6c 69 73 74 20 22 2d 74 22 20 28 61 6c 65 72 74 2d 65 6e 63 6f 64 65 2d .......(list."-t".(alert-encode-
a300 73 74 72 69 6e 67 20 28 70 6c 69 73 74 2d 67 65 74 20 69 6e 66 6f 20 3a 74 69 74 6c 65 29 29 29 string.(plist-get.info.:title)))
a320 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 22 2d 63 22 20 )....................(list."-c".
a340 28 61 6c 65 72 74 2d 65 6e 63 6f 64 65 2d 73 74 72 69 6e 67 20 28 70 6c 69 73 74 2d 67 65 74 20 (alert-encode-string.(plist-get.
a360 69 6e 66 6f 20 3a 6d 65 73 73 61 67 65 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 61 70 70 info.:message)))))).........(app
a380 6c 79 20 23 27 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 61 6c 65 72 74 2d 74 65 72 6d 75 78 2d 63 ly.#'call-process.alert-termux-c
a3a0 6f 6d 6d 61 6e 64 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 ommand.nil................(list.
a3c0 28 67 65 74 2d 62 75 66 66 65 72 2d 63 72 65 61 74 65 20 22 20 2a 74 65 72 6d 75 78 2d 6e 6f 74 (get-buffer-create.".*termux-not
a3e0 69 66 69 63 61 74 69 6f 6e 20 6f 75 74 70 75 74 2a 22 29 20 74 29 0a 20 20 20 20 20 20 20 20 20 ification.output*").t)..........
a400 20 20 20 20 20 20 6e 69 6c 20 61 72 67 73 29 29 0a 20 20 20 20 28 61 6c 65 72 74 2d 6d 65 73 73 ......nil.args)).....(alert-mess
a420 61 67 65 2d 6e 6f 74 69 66 79 20 69 6e 66 6f 29 29 29 0a 0a 28 61 6c 65 72 74 2d 64 65 66 69 6e age-notify.info)))..(alert-defin
a440 65 2d 73 74 79 6c 65 20 27 74 65 72 6d 75 78 20 3a 74 69 74 6c 65 20 22 4e 6f 74 69 66 79 20 75 e-style.'termux.:title."Notify.u
a460 73 69 6e 67 20 74 65 72 6d 75 78 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 sing.termux"....................
a480 20 3a 6e 6f 74 69 66 69 65 72 20 23 27 61 6c 65 72 74 2d 74 65 72 6d 75 78 2d 6e 6f 74 69 66 79 .:notifier.#'alert-termux-notify
a4a0 29 0a 0a 3b 3b 20 6a 77 77 20 28 32 30 31 31 2d 30 38 2d 32 35 29 3a 20 4e 6f 74 20 71 75 69 74 )..;;.jww.(2011-08-25):.Not.quit
a4c0 65 20 77 6f 72 6b 69 6e 67 20 79 65 74 0a 3b 3b 28 61 6c 65 72 74 2d 64 65 66 69 6e 65 2d 73 74 e.working.yet.;;(alert-define-st
a4e0 79 6c 65 20 27 66 72 61 6d 65 20 3a 74 69 74 6c 65 20 22 50 6f 70 75 70 20 62 75 66 66 65 72 20 yle.'frame.:title."Popup.buffer.
a500 69 6e 20 61 20 66 72 61 6d 65 22 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 in.a.frame".;;..................
a520 20 20 3a 6e 6f 74 69 66 69 65 72 20 23 27 61 6c 65 72 74 2d 66 72 61 6d 65 2d 6e 6f 74 69 66 79 ..:notifier.#'alert-frame-notify
a540 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 6d 6f 76 65 72 20 .;;....................:remover.
a560 23 27 61 6c 65 72 74 2d 66 72 61 6d 65 2d 72 65 6d 6f 76 65 29 0a 0c 0a 28 64 65 66 75 6e 20 61 #'alert-frame-remove)...(defun.a
a580 6c 65 72 74 2d 62 75 66 66 65 72 2d 73 74 61 74 75 73 20 28 26 6f 70 74 69 6f 6e 61 6c 20 62 75 lert-buffer-status.(&optional.bu
a5a0 66 66 65 72 29 0a 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 28 6f 72 ffer)...(with-current-buffer.(or
a5c0 20 62 75 66 66 65 72 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 0a 20 20 20 20 28 6c .buffer.(current-buffer)).....(l
a5e0 65 74 20 28 28 77 69 6e 64 20 28 67 65 74 2d 62 75 66 66 65 72 2d 77 69 6e 64 6f 77 29 29 29 0a et.((wind.(get-buffer-window))).
a600 20 20 20 20 20 20 28 69 66 20 77 69 6e 64 0a 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 65 71 ......(if.wind...........(if.(eq
a620 20 77 69 6e 64 20 28 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 29 29 0a 20 20 20 20 20 20 20 .wind.(selected-window))........
a640 20 20 20 20 20 20 20 28 69 66 20 28 61 6e 64 20 28 63 75 72 72 65 6e 74 2d 69 64 6c 65 2d 74 69 .......(if.(and.(current-idle-ti
a660 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3e 20 28 66 me)........................(>.(f
a680 6c 6f 61 74 2d 74 69 6d 65 20 28 63 75 72 72 65 6e 74 2d 69 64 6c 65 2d 74 69 6d 65 29 29 0a 20 loat-time.(current-idle-time))..
a6a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 6c 65 72 74 2d 72 .........................alert-r
a6c0 65 76 65 61 6c 2d 69 64 6c 65 2d 74 69 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 eveal-idle-time))...............
a6e0 20 20 20 20 27 69 64 6c 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 73 65 6c 65 63 ....'idle.................'selec
a700 74 65 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 27 76 69 73 69 62 6c 65 29 0a 20 20 20 20 20 ted).............'visible)......
a720 20 20 20 27 62 75 72 69 65 64 29 29 29 29 0a 0a 28 64 65 66 76 61 72 20 61 6c 65 72 74 2d 61 63 ...'buried))))..(defvar.alert-ac
a740 74 69 76 65 2d 61 6c 65 72 74 73 20 6e 69 6c 29 0a 0a 28 64 65 66 75 6e 20 61 6c 65 72 74 2d 72 tive-alerts.nil)..(defun.alert-r
a760 65 6d 6f 76 65 2d 77 68 65 6e 2d 61 63 74 69 76 65 20 28 72 65 6d 6f 76 65 72 20 69 6e 66 6f 29 emove-when-active.(remover.info)
a780 0a 20 20 28 6c 65 74 20 28 28 69 64 6c 65 2d 74 69 6d 65 20 28 61 6e 64 20 28 63 75 72 72 65 6e ...(let.((idle-time.(and.(curren
a7a0 74 2d 69 64 6c 65 2d 74 69 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 t-idle-time)....................
a7c0 20 20 20 20 20 28 66 6c 6f 61 74 2d 74 69 6d 65 20 28 63 75 72 72 65 6e 74 2d 69 64 6c 65 2d 74 .....(float-time.(current-idle-t
a7e0 69 6d 65 29 29 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 28 28 61 6e 64 20 69 64 ime))))).....(cond......((and.id
a800 6c 65 2d 74 69 6d 65 20 28 3e 20 69 64 6c 65 2d 74 69 6d 65 20 61 6c 65 72 74 2d 70 65 72 73 69 le-time.(>.idle-time.alert-persi
a820 73 74 2d 69 64 6c 65 2d 74 69 6d 65 29 29 29 0a 20 20 20 20 20 28 28 61 6e 64 20 69 64 6c 65 2d st-idle-time)))......((and.idle-
a840 74 69 6d 65 20 28 3e 20 69 64 6c 65 2d 74 69 6d 65 20 61 6c 65 72 74 2d 72 65 76 65 61 6c 2d 69 time.(>.idle-time.alert-reveal-i
a860 64 6c 65 2d 74 69 6d 65 29 29 0a 20 20 20 20 20 20 28 72 75 6e 2d 77 69 74 68 2d 74 69 6d 65 72 dle-time)).......(run-with-timer
a880 20 61 6c 65 72 74 2d 66 61 64 65 2d 74 69 6d 65 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 .alert-fade-time.nil............
a8a0 20 20 20 20 20 20 20 20 20 20 20 23 27 61 6c 65 72 74 2d 72 65 6d 6f 76 65 2d 77 68 65 6e 2d 61 ...........#'alert-remove-when-a
a8c0 63 74 69 76 65 20 72 65 6d 6f 76 65 72 20 69 6e 66 6f 29 29 0a 20 20 20 20 20 28 74 0a 20 20 20 ctive.remover.info))......(t....
a8e0 20 20 20 28 66 75 6e 63 61 6c 6c 20 72 65 6d 6f 76 65 72 20 69 6e 66 6f 29 29 29 29 29 0a 0a 28 ...(funcall.remover.info)))))..(
a900 64 65 66 75 6e 20 61 6c 65 72 74 2d 72 65 6d 6f 76 65 2d 6f 6e 2d 63 6f 6d 6d 61 6e 64 20 28 29 defun.alert-remove-on-command.()
a920 0a 20 20 28 6c 65 74 20 28 74 6f 2d 64 65 6c 65 74 65 29 0a 20 20 20 20 28 64 6f 6c 69 73 74 20 ...(let.(to-delete).....(dolist.
a940 28 61 6c 65 72 74 20 61 6c 65 72 74 2d 61 63 74 69 76 65 2d 61 6c 65 72 74 73 29 0a 20 20 20 20 (alert.alert-active-alerts).....
a960 20 20 28 77 68 65 6e 20 28 65 71 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 20 28 6e 74 ..(when.(eq.(current-buffer).(nt
a980 68 20 30 20 61 6c 65 72 74 29 29 0a 20 20 20 20 20 20 20 20 28 70 75 73 68 20 61 6c 65 72 74 20 h.0.alert)).........(push.alert.
a9a0 74 6f 2d 64 65 6c 65 74 65 29 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 6e 74 68 20 32 20 61 6c to-delete).........(if.(nth.2.al
a9c0 65 72 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 28 6e 74 68 20 32 ert).............(funcall.(nth.2
a9e0 20 61 6c 65 72 74 29 20 28 6e 74 68 20 31 20 61 6c 65 72 74 29 29 29 29 29 0a 20 20 20 20 28 64 .alert).(nth.1.alert))))).....(d
aa00 6f 6c 69 73 74 20 28 61 6c 65 72 74 20 74 6f 2d 64 65 6c 65 74 65 29 0a 20 20 20 20 20 20 28 73 olist.(alert.to-delete).......(s
aa20 65 74 71 20 61 6c 65 72 74 2d 61 63 74 69 76 65 2d 61 6c 65 72 74 73 20 28 64 65 6c 71 20 61 6c etq.alert-active-alerts.(delq.al
aa40 65 72 74 20 61 6c 65 72 74 2d 61 63 74 69 76 65 2d 61 6c 65 72 74 73 29 29 29 29 29 0a 0c 0a 28 ert.alert-active-alerts)))))...(
aa60 64 65 66 75 6e 20 61 6c 65 72 74 2d 73 65 6e 64 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 0a 20 20 defun.alert-send-notification...
aa80 20 20 28 61 6c 65 72 74 2d 62 75 66 66 65 72 20 69 6e 66 6f 20 73 74 79 6c 65 2d 64 65 66 20 26 ..(alert-buffer.info.style-def.&
aaa0 6f 70 74 69 6f 6e 61 6c 20 70 65 72 73 69 73 74 20 6e 65 76 65 72 2d 70 65 72 29 0a 20 20 28 6c optional.persist.never-per)...(l
aac0 65 74 20 28 28 6e 6f 74 69 66 69 65 72 20 28 70 6c 69 73 74 2d 67 65 74 20 73 74 79 6c 65 2d 64 et.((notifier.(plist-get.style-d
aae0 65 66 20 3a 6e 6f 74 69 66 69 65 72 29 29 29 0a 20 20 20 20 28 69 66 20 6e 6f 74 69 66 69 65 72 ef.:notifier))).....(if.notifier
ab00 0a 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 6e 6f 74 69 66 69 65 72 20 69 6e 66 6f 29 .........(funcall.notifier.info)
ab20 29 29 0a 20 20 28 6c 65 74 20 28 28 72 65 6d 6f 76 65 72 20 28 70 6c 69 73 74 2d 67 65 74 20 73 ))...(let.((remover.(plist-get.s
ab40 74 79 6c 65 2d 64 65 66 20 3a 72 65 6d 6f 76 65 72 29 29 29 0a 20 20 20 20 28 61 64 64 2d 74 6f tyle-def.:remover))).....(add-to
ab60 2d 6c 69 73 74 20 27 61 6c 65 72 74 2d 61 63 74 69 76 65 2d 61 6c 65 72 74 73 20 28 6c 69 73 74 -list.'alert-active-alerts.(list
ab80 20 61 6c 65 72 74 2d 62 75 66 66 65 72 20 69 6e 66 6f 20 72 65 6d 6f 76 65 72 29 29 0a 20 20 20 .alert-buffer.info.remover))....
aba0 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 61 6c 65 72 74 2d 62 75 66 66 .(with-current-buffer.alert-buff
abc0 65 72 0a 20 20 20 20 20 20 28 61 64 64 2d 68 6f 6f 6b 20 27 70 6f 73 74 2d 63 6f 6d 6d 61 6e 64 er.......(add-hook.'post-command
abe0 2d 68 6f 6f 6b 20 23 27 61 6c 65 72 74 2d 72 65 6d 6f 76 65 2d 6f 6e 2d 63 6f 6d 6d 61 6e 64 20 -hook.#'alert-remove-on-command.
ac00 6e 69 6c 20 74 29 29 0a 20 20 20 20 28 69 66 20 28 61 6e 64 20 72 65 6d 6f 76 65 72 20 28 6f 72 nil.t)).....(if.(and.remover.(or
ac20 20 28 6e 6f 74 20 70 65 72 73 69 73 74 29 20 6e 65 76 65 72 2d 70 65 72 29 29 0a 20 20 20 20 20 .(not.persist).never-per))......
ac40 20 20 20 28 72 75 6e 2d 77 69 74 68 2d 74 69 6d 65 72 20 61 6c 65 72 74 2d 66 61 64 65 2d 74 69 ...(run-with-timer.alert-fade-ti
ac60 6d 65 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 me.nil.........................#
ac80 27 61 6c 65 72 74 2d 72 65 6d 6f 76 65 2d 77 68 65 6e 2d 61 63 74 69 76 65 0a 20 20 20 20 20 20 'alert-remove-when-active.......
aca0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 6d 6f 76 65 72 20 69 6e 66 6f 29 29 ..................remover.info))
acc0 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 63 6c 2d 64 65 66 75 6e 20 61 6c 65 ))..;;;###autoload.(cl-defun.ale
ace0 72 74 20 28 6d 65 73 73 61 67 65 20 26 6b 65 79 20 28 73 65 76 65 72 69 74 79 20 27 6e 6f 72 6d rt.(message.&key.(severity.'norm
ad00 61 6c 29 20 74 69 74 6c 65 20 69 63 6f 6e 20 63 61 74 65 67 6f 72 79 0a 20 20 20 20 20 20 20 20 al).title.icon.category.........
ad20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 75 66 66 65 72 20 6d 6f 64 65 20 64 61 74 .................buffer.mode.dat
ad40 61 20 73 74 79 6c 65 20 70 65 72 73 69 73 74 65 6e 74 20 6e 65 76 65 72 2d 70 65 72 73 69 73 74 a.style.persistent.never-persist
ad60 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 64 29 0a 20 20 ..........................id)...
ad80 22 41 6c 65 72 74 20 74 68 65 20 75 73 65 72 20 74 68 61 74 20 73 6f 6d 65 74 68 69 6e 67 20 68 "Alert.the.user.that.something.h
ada0 61 73 20 68 61 70 70 65 6e 65 64 2e 0a 4d 45 53 53 41 47 45 20 69 73 20 77 68 61 74 20 74 68 65 as.happened..MESSAGE.is.what.the
adc0 20 75 73 65 72 20 77 69 6c 6c 20 73 65 65 2e 20 20 59 6f 75 20 6d 61 79 20 61 6c 73 6f 20 75 73 .user.will.see...You.may.also.us
ade0 65 20 6b 65 79 77 6f 72 64 0a 61 72 67 75 6d 65 6e 74 73 20 74 6f 20 73 70 65 63 69 66 79 20 61 e.keyword.arguments.to.specify.a
ae00 64 64 69 74 69 6f 6e 61 6c 20 64 65 74 61 69 6c 73 2e 20 20 48 65 72 65 20 69 73 20 61 20 66 75 dditional.details...Here.is.a.fu
ae20 6c 6c 20 65 78 61 6d 70 6c 65 3a 0a 0a 5c 28 61 6c 65 72 74 20 5c 22 54 68 69 73 20 69 73 20 61 ll.example:..\(alert.\"This.is.a
ae40 20 6d 65 73 73 61 67 65 5c 22 0a 20 20 20 20 20 20 20 3a 73 65 76 65 72 69 74 79 20 5c 5c 3d 27 .message\"........:severity.\\='
ae60 68 69 67 68 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 54 68 65 20 64 65 66 61 75 6c 74 20 73 high............;;.The.default.s
ae80 65 76 65 72 69 74 79 20 69 73 20 60 6e 6f 72 6d 61 6c 27 0a 20 20 20 20 20 20 20 3a 74 69 74 6c everity.is.`normal'........:titl
aea0 65 20 5c 22 54 69 74 6c 65 5c 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 41 6e 20 6f e.\"Title\"..............;;.An.o
aec0 70 74 69 6f 6e 61 6c 20 74 69 74 6c 65 0a 20 20 20 20 20 20 20 3a 63 61 74 65 67 6f 72 79 20 5c ptional.title........:category.\
aee0 5c 3d 27 65 78 61 6d 70 6c 65 20 20 20 20 20 20 20 20 20 3b 3b 20 41 20 73 79 6d 62 6f 6c 20 74 \='example.........;;.A.symbol.t
af00 6f 20 69 64 65 6e 74 69 66 79 20 74 68 65 20 6d 65 73 73 61 67 65 0a 20 20 20 20 20 20 20 3a 6d o.identify.the.message........:m
af20 6f 64 65 20 5c 5c 3d 27 74 65 78 74 2d 6d 6f 64 65 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 4e ode.\\='text-mode...........;;.N
af40 6f 72 6d 61 6c 6c 79 20 64 65 74 65 72 6d 69 6e 65 64 20 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 ormally.determined.automatically
af60 0a 20 20 20 20 20 20 20 3a 62 75 66 66 65 72 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 ........:buffer.(current-buffer)
af80 20 20 20 20 20 20 3b 3b 20 54 68 69 73 20 69 73 20 74 68 65 20 64 65 66 61 75 6c 74 0a 20 20 20 ......;;.This.is.the.default....
afa0 20 20 20 20 3a 64 61 74 61 20 6e 69 6c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ....:data.nil...................
afc0 20 20 3b 3b 20 55 6e 75 73 65 64 20 62 79 20 61 6c 65 72 74 2e 65 6c 20 69 74 73 65 6c 66 0a 20 ..;;.Unused.by.alert.el.itself..
afe0 20 20 20 20 20 20 3a 70 65 72 73 69 73 74 65 6e 74 20 6e 69 6c 20 20 20 20 20 20 20 20 20 20 20 ......:persistent.nil...........
b000 20 20 20 20 3b 3b 20 46 6f 72 63 65 20 74 68 65 20 61 6c 65 72 74 20 74 6f 20 62 65 20 70 65 72 ....;;.Force.the.alert.to.be.per
b020 73 69 73 74 65 6e 74 3b 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 sistent;........................
b040 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 69 74 20 69 73 20 62 65 73 74 20 6e 6f 74 20 ..............;;.it.is.best.not.
b060 74 6f 20 75 73 65 20 74 68 69 73 0a 20 20 20 20 20 20 20 3a 6e 65 76 65 72 2d 70 65 72 73 69 73 to.use.this........:never-persis
b080 74 20 6e 69 6c 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 46 6f 72 63 65 20 74 68 69 73 20 61 t.nil............;;.Force.this.a
b0a0 6c 65 72 74 20 74 6f 20 6e 65 76 65 72 20 70 65 72 73 69 73 74 0a 20 20 20 20 20 20 20 3a 69 64 lert.to.never.persist........:id
b0c0 20 5c 5c 3d 27 6d 79 2d 69 64 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 55 73 .\\='my-id)................;;.Us
b0e0 65 64 20 74 6f 20 72 65 70 6c 61 63 65 20 70 72 65 76 69 6f 75 73 20 6d 65 73 73 61 67 65 20 6f ed.to.replace.previous.message.o
b100 66 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 f...............................
b120 20 20 20 20 20 20 20 3b 3b 20 74 68 65 20 73 61 6d 65 20 69 64 20 69 6e 20 73 74 79 6c 65 73 20 .......;;.the.same.id.in.styles.
b140 74 68 61 74 20 73 75 70 70 6f 72 74 20 69 74 0a 20 20 20 20 20 20 20 3a 73 74 79 6c 65 20 5c 5c that.support.it........:style.\\
b160 3d 27 66 72 69 6e 67 65 29 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 46 6f 72 63 65 20 61 20 ='fringe)............;;.Force.a.
b180 67 69 76 65 6e 20 73 74 79 6c 65 20 74 6f 20 62 65 20 75 73 65 64 3b 0a 20 20 20 20 20 20 20 20 given.style.to.be.used;.........
b1a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 .............................;;.
b1c0 74 68 69 73 20 69 73 20 6f 6e 6c 79 20 66 6f 72 20 64 65 62 75 67 67 69 6e 67 21 0a 20 20 20 20 this.is.only.for.debugging!.....
b1e0 20 20 20 3a 69 63 6f 6e 20 5c 5c 3d 5c 22 6d 61 69 6c 2d 6d 65 73 73 61 67 65 2d 6e 65 77 5c 22 ...:icon.\\=\"mail-message-new\"
b200 20 3b 3b 20 69 66 20 73 74 79 6c 65 20 73 75 70 70 6f 72 74 73 20 69 63 6f 6e 20 74 68 65 6e 20 .;;.if.style.supports.icon.then.
b220 61 64 64 20 69 63 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 add.icon........................
b240 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6e 61 6d 65 20 6f 72 20 70 61 74 68 20 68 65 ..............;;.name.or.path.he
b260 72 65 0a 0a 49 66 20 6e 6f 20 3a 74 69 74 6c 65 20 69 73 20 67 69 76 65 6e 2c 20 74 68 65 20 62 re..If.no.:title.is.given,.the.b
b280 75 66 66 65 72 2d 6e 61 6d 65 20 6f 66 20 3a 62 75 66 66 65 72 20 69 73 20 75 73 65 64 2e 20 20 uffer-name.of.:buffer.is.used...
b2a0 49 66 0a 3a 62 75 66 66 65 72 20 69 73 20 6e 69 6c 2c 20 69 74 20 69 73 20 74 68 65 20 63 75 72 If.:buffer.is.nil,.it.is.the.cur
b2c0 72 65 6e 74 20 62 75 66 66 65 72 20 61 74 20 74 68 65 20 70 6f 69 6e 74 20 6f 66 20 63 61 6c 6c rent.buffer.at.the.point.of.call
b2e0 2e 0a 0a 3a 64 61 74 61 20 69 73 20 61 6e 20 6f 70 61 71 75 65 20 76 61 6c 75 65 20 77 68 69 63 ...:data.is.an.opaque.value.whic
b300 68 20 6d 6f 64 75 6c 65 73 20 63 61 6e 20 70 61 73 73 20 74 68 72 6f 75 67 68 20 74 6f 20 74 68 h.modules.can.pass.through.to.th
b320 65 69 72 0a 6f 77 6e 20 73 74 79 6c 65 73 20 69 66 20 74 68 65 79 20 77 69 73 68 2e 0a 0a 48 65 eir.own.styles.if.they.wish...He
b340 72 65 20 61 72 65 20 73 6f 6d 65 20 6d 6f 72 65 20 74 79 70 69 63 61 6c 20 65 78 61 6d 70 6c 65 re.are.some.more.typical.example
b360 73 20 6f 66 20 75 73 61 67 65 3a 0a 0a 20 20 3b 3b 20 54 68 69 73 20 69 73 20 74 68 65 20 6d 6f s.of.usage:....;;.This.is.the.mo
b380 73 74 20 62 61 73 69 63 20 66 6f 72 6d 20 75 73 61 67 65 0a 20 20 28 61 6c 65 72 74 20 5c 22 54 st.basic.form.usage...(alert.\"T
b3a0 68 69 73 20 69 73 20 61 6e 20 61 6c 65 72 74 5c 22 29 0a 0a 20 20 3b 3b 20 59 6f 75 20 63 61 6e his.is.an.alert\")....;;.You.can
b3c0 20 61 64 6a 75 73 74 20 74 68 65 20 73 65 76 65 72 69 74 79 20 66 6f 72 20 6d 6f 72 65 20 69 6d .adjust.the.severity.for.more.im
b3e0 70 6f 72 74 61 6e 74 20 6d 65 73 73 61 67 65 73 0a 20 20 28 61 6c 65 72 74 20 5c 22 54 68 69 73 portant.messages...(alert.\"This
b400 20 69 73 20 61 6e 20 61 6c 65 72 74 5c 22 20 3a 73 65 76 65 72 69 74 79 20 5c 5c 3d 27 68 69 67 .is.an.alert\".:severity.\\='hig
b420 68 29 0a 0a 20 20 3b 3b 20 4f 72 20 64 65 63 72 65 61 73 65 20 69 74 20 66 6f 72 20 70 75 72 65 h)....;;.Or.decrease.it.for.pure
b440 6c 79 20 69 6e 66 6f 72 6d 61 74 69 76 65 20 6f 6e 65 73 0a 20 20 28 61 6c 65 72 74 20 5c 22 54 ly.informative.ones...(alert.\"T
b460 68 69 73 20 69 73 20 61 6e 20 61 6c 65 72 74 5c 22 20 3a 73 65 76 65 72 69 74 79 20 5c 5c 3d 27 his.is.an.alert\".:severity.\\='
b480 74 72 69 76 69 61 6c 29 0a 0a 20 20 3b 3b 20 41 6c 65 72 74 73 20 63 61 6e 20 68 61 76 65 20 6f trivial)....;;.Alerts.can.have.o
b4a0 70 74 69 6f 6e 61 6c 20 74 69 74 6c 65 73 2e 20 20 4f 74 68 65 72 77 69 73 65 2c 20 74 68 65 20 ptional.titles...Otherwise,.the.
b4c0 74 69 74 6c 65 20 69 73 20 74 68 65 0a 20 20 3b 3b 20 62 75 66 66 65 72 2d 6e 61 6d 65 20 6f 66 title.is.the...;;.buffer-name.of
b4e0 20 74 68 65 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 20 77 68 65 72 65 20 74 68 65 20 .the.(current-buffer).where.the.
b500 61 6c 65 72 74 20 6f 72 69 67 69 6e 61 74 65 64 2e 0a 20 20 28 61 6c 65 72 74 20 5c 22 54 68 69 alert.originated....(alert.\"Thi
b520 73 20 69 73 20 61 6e 20 61 6c 65 72 74 5c 22 20 3a 74 69 74 6c 65 20 5c 22 4d 79 20 41 6c 65 72 s.is.an.alert\".:title.\"My.Aler
b540 74 5c 22 29 0a 0a 20 20 3b 3b 20 46 75 72 74 68 65 72 2c 20 61 6c 65 72 74 73 20 63 61 6e 20 68 t\")....;;.Further,.alerts.can.h
b560 61 76 65 20 63 61 74 65 67 6f 72 69 65 73 2e 20 20 54 68 69 73 20 61 6c 6c 6f 77 73 20 75 73 65 ave.categories...This.allows.use
b580 72 73 20 74 6f 0a 20 20 3b 3b 20 73 65 6c 65 63 74 69 76 65 6c 79 20 66 69 6c 74 65 72 20 6f 6e rs.to...;;.selectively.filter.on
b5a0 20 74 68 65 6d 2e 0a 20 20 28 61 6c 65 72 74 20 5c 22 54 68 69 73 20 69 73 20 61 6e 20 61 6c 65 .them....(alert.\"This.is.an.ale
b5c0 72 74 5c 22 20 3a 74 69 74 6c 65 20 5c 22 4d 79 20 41 6c 65 72 74 5c 22 0a 20 20 20 20 20 20 20 rt\".:title.\"My.Alert\"........
b5e0 20 20 3a 63 61 74 65 67 6f 72 79 20 5c 5c 3d 27 73 6f 6d 65 2d 63 61 74 65 67 6f 72 79 2d 6f 72 ..:category.\\='some-category-or
b600 2d 6f 74 68 65 72 29 22 0a 20 20 28 63 6c 2d 64 65 73 74 72 75 63 74 75 72 69 6e 67 2d 62 69 6e -other)"...(cl-destructuring-bin
b620 64 0a 20 20 20 20 20 20 28 61 6c 65 72 74 2d 62 75 66 66 65 72 20 63 75 72 72 65 6e 74 2d 6d 61 d.......(alert-buffer.current-ma
b640 6a 6f 72 2d 6d 6f 64 65 20 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 2d 73 74 61 74 75 73 0a 20 jor-mode.current-buffer-status..
b660 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 75 72 72 65 6e 74 2d 62 75 66 66 65 ...................current-buffe
b680 72 2d 6e 61 6d 65 29 0a 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 r-name).......(with-current-buff
b6a0 65 72 20 28 6f 72 20 62 75 66 66 65 72 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 0a er.(or.buffer.(current-buffer)).
b6c0 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 0a 20 ........(list.(current-buffer)..
b6e0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 6d 6f 64 65 20 6d 61 6a 6f 72 2d 6d 6f 64 65 .............(or.mode.major-mode
b700 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6c 65 72 74 2d 62 75 66 66 65 72 2d 73 74 )...............(alert-buffer-st
b720 61 74 75 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 2d 6e 61 6d 65 atus)...............(buffer-name
b740 29 29 29 0a 0a 20 20 20 20 28 6c 65 74 20 28 28 62 61 73 65 2d 69 6e 66 6f 20 28 6c 69 73 74 20 )))......(let.((base-info.(list.
b760 3a 6d 65 73 73 61 67 65 20 6d 65 73 73 61 67 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 :message.message................
b780 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 69 74 6c 65 20 28 6f 72 20 74 69 74 6c 65 20 63 75 72 ............:title.(or.title.cur
b7a0 72 65 6e 74 2d 62 75 66 66 65 72 2d 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 rent-buffer-name)...............
b7c0 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 63 6f 6e 20 69 63 6f 6e 0a 20 20 20 20 20 20 20 20 .............:icon.icon.........
b7e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 65 76 65 72 69 74 79 20 73 65 76 ...................:severity.sev
b800 65 72 69 74 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 erity...........................
b820 20 3a 63 61 74 65 67 6f 72 79 20 63 61 74 65 67 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 .:category.category.............
b840 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 62 75 66 66 65 72 20 61 6c 65 72 74 2d 62 75 66 ...............:buffer.alert-buf
b860 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a fer............................:
b880 70 65 72 73 69 73 74 65 6e 74 20 70 65 72 73 69 73 74 65 6e 74 0a 20 20 20 20 20 20 20 20 20 20 persistent.persistent...........
b8a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6d 6f 64 65 20 63 75 72 72 65 6e 74 2d 6d .................:mode.current-m
b8c0 61 6a 6f 72 2d 6d 6f 64 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ajor-mode.......................
b8e0 20 20 20 20 20 3a 69 64 20 69 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .....:id.id.....................
b900 20 20 20 20 20 20 20 3a 64 61 74 61 20 64 61 74 61 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .......:data.data...............
b920 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 70 65 72 73 69 73 74 65 6e 74 20 70 65 72 73 69 73 74 .............:persistent.persist
b940 65 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 6d 61 74 63 68 65 64 29 0a 0a 20 20 20 20 20 20 ent))...........matched)........
b960 28 69 66 20 61 6c 65 72 74 2d 6c 6f 67 2d 6d 65 73 73 61 67 65 73 0a 20 20 20 20 20 20 20 20 20 (if.alert-log-messages..........
b980 20 28 61 6c 65 72 74 2d 6c 6f 67 2d 6e 6f 74 69 66 79 20 62 61 73 65 2d 69 6e 66 6f 29 29 0a 0a .(alert-log-notify.base-info))..
b9a0 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 61 6c 65 72 74 2d 68 69 64 65 2d 61 6c 6c 2d 6e 6f 74 ......(unless.alert-hide-all-not
b9c0 69 66 69 63 61 74 69 6f 6e 73 0a 20 20 20 20 20 20 20 20 28 63 61 74 63 68 20 27 66 69 6e 69 73 ifications.........(catch.'finis
b9e0 68 0a 20 20 20 20 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 63 6f 6e 66 69 67 20 28 6f 72 20 h...........(dolist.(config.(or.
ba00 28 61 70 70 65 6e 64 20 61 6c 65 72 74 2d 75 73 65 72 2d 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e (append.alert-user-configuration
ba20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
ba40 20 20 20 20 20 20 20 61 6c 65 72 74 2d 69 6e 74 65 72 6e 61 6c 2d 63 6f 6e 66 69 67 75 72 61 74 .......alert-internal-configurat
ba60 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ion)............................
ba80 20 20 20 28 77 68 65 6e 20 73 74 79 6c 65 20 27 28 6e 69 6c 29 29 29 29 0a 20 20 20 20 20 20 20 ...(when.style.'(nil))))........
baa0 20 20 20 20 20 28 6c 65 74 2a 20 28 28 73 74 79 6c 65 2d 64 65 66 20 28 63 64 72 20 28 61 73 73 .....(let*.((style-def.(cdr.(ass
bac0 71 20 28 6f 72 20 73 74 79 6c 65 20 28 6e 74 68 20 31 20 63 6f 6e 66 69 67 29 29 0a 20 20 20 20 q.(or.style.(nth.1.config)).....
bae0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
bb00 20 20 20 20 20 61 6c 65 72 74 2d 73 74 79 6c 65 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 .....alert-styles)))............
bb20 20 20 20 20 20 20 20 20 28 6f 70 74 69 6f 6e 73 20 28 6e 74 68 20 32 20 63 6f 6e 66 69 67 29 29 ........(options.(nth.2.config))
bb40 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 65 72 73 69 73 74 2d 70 20 28 ....................(persist-p.(
bb60 6f 72 20 70 65 72 73 69 73 74 65 6e 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 or.persistent...................
bb80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 64 72 20 28 61 73 73 71 20 3a 70 65 72 73 ................(cdr.(assq.:pers
bba0 69 73 74 65 6e 74 20 6f 70 74 69 6f 6e 73 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 istent.options))))..............
bbc0 20 20 20 20 20 20 28 70 65 72 73 69 73 74 20 28 69 66 20 28 66 75 6e 63 74 69 6f 6e 70 20 70 65 ......(persist.(if.(functionp.pe
bbe0 72 73 69 73 74 2d 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 rsist-p)........................
bc00 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 70 65 72 73 69 73 74 2d 70 20 62 61 73 65 .........(funcall.persist-p.base
bc20 2d 69 6e 66 6f 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -info)..........................
bc40 20 20 20 20 20 70 65 72 73 69 73 74 2d 70 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .....persist-p))................
bc60 20 20 20 20 28 6e 65 76 65 72 2d 70 65 72 73 69 73 74 2d 70 0a 20 20 20 20 20 20 20 20 20 20 20 ....(never-persist-p............
bc80 20 20 20 20 20 20 20 20 20 28 6f 72 20 6e 65 76 65 72 2d 70 65 72 73 69 73 74 0a 20 20 20 20 20 .........(or.never-persist......
bca0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 64 72 20 28 61 73 73 71 20 3a 6e ...................(cdr.(assq.:n
bcc0 65 76 65 72 2d 70 65 72 73 69 73 74 20 6f 70 74 69 6f 6e 73 29 29 29 29 0a 20 20 20 20 20 20 20 ever-persist.options))))........
bce0 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 65 76 65 72 2d 70 65 72 20 28 69 66 20 28 66 75 6e 63 ............(never-per.(if.(func
bd00 74 69 6f 6e 70 20 6e 65 76 65 72 2d 70 65 72 73 69 73 74 2d 70 29 0a 20 20 20 20 20 20 20 20 20 tionp.never-persist-p)..........
bd20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c .........................(funcal
bd40 6c 20 6e 65 76 65 72 2d 70 65 72 73 69 73 74 2d 70 20 62 61 73 65 2d 69 6e 66 6f 29 0a 20 20 20 l.never-persist-p.base-info)....
bd60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 65 76 .............................nev
bd80 65 72 2d 70 65 72 73 69 73 74 2d 70 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 er-persist-p))..................
bda0 20 20 28 63 6f 6e 74 69 6e 75 65 20 28 63 64 72 20 28 61 73 73 71 20 3a 63 6f 6e 74 69 6e 75 65 ..(continue.(cdr.(assq.:continue
bdc0 20 6f 70 74 69 6f 6e 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 .options)))....................i
bde0 6e 66 6f 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 69 6e 66 6f 20 28 69 nfo)...............(setq.info.(i
be00 66 20 28 6e 6f 74 20 28 6d 65 6d 71 20 3a 70 65 72 73 69 73 74 65 6e 74 20 62 61 73 65 2d 69 6e f.(not.(memq.:persistent.base-in
be20 66 6f 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 fo))............................
be40 20 20 28 61 70 70 65 6e 64 20 62 61 73 65 2d 69 6e 66 6f 20 28 6c 69 73 74 20 3a 70 65 72 73 69 ..(append.base-info.(list.:persi
be60 73 74 65 6e 74 20 70 65 72 73 69 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 stent.persist)).................
be80 20 20 20 20 20 20 20 20 20 20 20 62 61 73 65 2d 69 6e 66 6f 29 0a 20 20 20 20 20 20 20 20 20 20 ...........base-info)...........
bea0 20 20 20 20 20 20 20 20 20 20 69 6e 66 6f 20 28 69 66 20 28 6e 6f 74 20 28 6d 65 6d 71 20 3a 6e ..........info.(if.(not.(memq.:n
bec0 65 76 65 72 2d 70 65 72 73 69 73 74 20 69 6e 66 6f 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 ever-persist.info)).............
bee0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 70 70 65 6e 64 20 69 6e 66 6f 20 28 6c .................(append.info.(l
bf00 69 73 74 20 3a 6e 65 76 65 72 2d 70 65 72 73 69 73 74 20 6e 65 76 65 72 2d 70 65 72 29 29 0a 20 ist.:never-persist.never-per))..
bf20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 6e 66 6f 29 29 ..........................info))
bf40 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 0a 20 20 20 20 20 20 20 20 20 20 20 ...............(when............
bf60 20 20 20 20 20 20 20 28 6f 72 20 73 74 79 6c 65 20 20 20 20 20 20 20 20 20 20 20 3b 20 3a 73 74 .......(or.style...........;.:st
bf80 79 6c 65 20 61 6c 77 61 79 73 20 22 6d 61 74 63 68 65 73 22 2c 20 66 6f 72 20 74 65 73 74 69 6e yle.always."matches",.for.testin
bfa0 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 0a 20 20 20 g.......................(not....
bfc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 6d 71 0a 20 20 20 20 20 20 ....................(memq.......
bfe0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 ..................nil...........
c000 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 0a 20 20 20 20 20 20 20 20 20 20 ..............(mapcar...........
c020 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 28 6c 61 6d 62 64 61 20 28 63 6f 6e 64 69 74 ...............#'(lambda.(condit
c040 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ion)............................
c060 20 20 28 63 6c 2d 63 61 73 65 20 28 63 61 72 20 63 6f 6e 64 69 74 69 6f 6e 29 0a 20 20 20 20 20 ..(cl-case.(car.condition)......
c080 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3a 73 65 76 65 ..........................(:seve
c0a0 72 69 74 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 rity............................
c0c0 20 20 20 20 20 28 6d 65 6d 71 20 73 65 76 65 72 69 74 79 20 28 63 64 72 20 63 6f 6e 64 69 74 69 .....(memq.severity.(cdr.conditi
c0e0 6f 6e 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 on)))...........................
c100 20 20 20 20 20 28 3a 73 74 61 74 75 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .....(:status...................
c120 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 6d 71 20 63 75 72 72 65 6e 74 2d 62 75 66 66 ..............(memq.current-buff
c140 65 72 2d 73 74 61 74 75 73 20 28 63 64 72 20 63 6f 6e 64 69 74 69 6f 6e 29 29 29 0a 20 20 20 20 er-status.(cdr.condition))).....
c160 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3a 6d 6f 64 ...........................(:mod
c180 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e...............................
c1a0 20 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..(string-match.................
c1c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 64 72 20 63 6f 6e 64 69 74 69 6f 6e 29 .................(cdr.condition)
c1e0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
c200 20 20 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 63 75 72 72 65 6e 74 2d 6d 61 6a 6f 72 2d 6d 6f 64 ..(symbol-name.current-major-mod
c220 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e)))............................
c240 20 20 20 20 28 3a 63 61 74 65 67 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ....(:category..................
c260 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 63 61 74 65 67 6f 72 79 20 28 73 74 ...............(and.category.(st
c280 72 69 6e 67 2d 6d 61 74 63 68 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ring-match......................
c2a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 64 72 20 63 ..........................(cdr.c
c2c0 6f 6e 64 69 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ondition).......................
c2e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 73 74 .........................(if.(st
c300 72 69 6e 67 70 20 63 61 74 65 67 6f 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ringp.category).................
c320 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
c340 20 20 20 63 61 74 65 67 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ...category.....................
c360 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 79 .............................(sy
c380 6d 62 6f 6c 2d 6e 61 6d 65 20 63 61 74 65 67 6f 72 79 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 mbol-name.category))))).........
c3a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3a 74 69 74 6c 65 0a 20 .......................(:title..
c3c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ...............................(
c3e0 61 6e 64 20 74 69 74 6c 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 and.title.......................
c400 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 28 63 64 ...............(string-match.(cd
c420 72 20 63 6f 6e 64 69 74 69 6f 6e 29 20 74 69 74 6c 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 r.condition).title)))...........
c440 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3a 6d 65 73 73 61 67 65 0a 20 .....................(:message..
c460 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ...............................(
c480 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 28 63 64 72 20 63 6f 6e 64 69 74 69 6f 6e 29 20 6d 65 73 string-match.(cdr.condition).mes
c4a0 73 61 67 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 sage))..........................
c4c0 20 20 20 20 20 20 28 3a 70 72 65 64 69 63 61 74 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ......(:predicate...............
c4e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 28 63 64 72 20 ..................(funcall.(cdr.
c500 63 6f 6e 64 69 74 69 6f 6e 29 20 69 6e 66 6f 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 condition).info))...............
c520 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3a 69 63 6f 6e 0a 20 20 20 20 20 20 20 20 .................(:icon.........
c540 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 2d ........................(string-
c560 6d 61 74 63 68 20 28 63 64 72 20 63 6f 6e 64 69 74 69 6f 6e 29 20 69 63 6f 6e 29 29 29 29 0a 20 match.(cdr.condition).icon))))..
c580 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 74 68 20 30 20 63 ........................(nth.0.c
c5a0 6f 6e 66 69 67 29 29 29 29 29 0a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6c 65 onfig)))))..................(ale
c5c0 72 74 2d 73 65 6e 64 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 61 6c 65 72 74 2d 62 75 66 66 65 rt-send-notification.alert-buffe
c5e0 72 20 69 6e 66 6f 20 73 74 79 6c 65 2d 64 65 66 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 r.info.style-def................
c600 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 65 72 73 69 73 ..........................persis
c620 74 20 6e 65 76 65 72 2d 70 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 t.never-per).................(se
c640 74 71 20 6d 61 74 63 68 65 64 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 tq.matched.t).................(i
c660 66 20 28 6f 72 20 73 74 79 6c 65 20 28 6e 6f 74 20 28 69 66 20 28 66 75 6e 63 74 69 6f 6e 70 20 f.(or.style.(not.(if.(functionp.
c680 63 6f 6e 74 69 6e 75 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 continue).......................
c6a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 63 6f 6e 74 69 6e .................(funcall.contin
c6c0 75 65 20 69 6e 66 6f 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ue.info)........................
c6e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 6e 74 69 6e 75 65 29 29 29 0a 20 20 20 20 20 20 ..............continue))).......
c700 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 68 72 6f 77 20 27 66 69 6e 69 73 68 20 74 29 29 ..............(throw.'finish.t))
c720 29 29 29 29 29 0a 0a 20 20 20 20 20 20 28 69 66 20 28 61 6e 64 20 28 6e 6f 74 20 6d 61 74 63 68 )))))........(if.(and.(not.match
c740 65 64 29 20 61 6c 65 72 74 2d 64 65 66 61 75 6c 74 2d 73 74 79 6c 65 29 0a 20 20 20 20 20 20 20 ed).alert-default-style)........
c760 20 20 20 28 61 6c 65 72 74 2d 73 65 6e 64 2d 6e 6f 74 69 66 69 63 61 74 69 6f 6e 20 61 6c 65 72 ...(alert-send-notification.aler
c780 74 2d 62 75 66 66 65 72 20 62 61 73 65 2d 69 6e 66 6f 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 t-buffer.base-info..............
c7a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 64 72 20 28 61 73 73 71 ......................(cdr.(assq
c7c0 20 61 6c 65 72 74 2d 64 65 66 61 75 6c 74 2d 73 74 79 6c 65 0a 20 20 20 20 20 20 20 20 20 20 20 .alert-default-style............
c7e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
c800 20 20 20 61 6c 65 72 74 2d 73 74 79 6c 65 73 29 29 29 29 29 29 29 0a 0c 0a 28 70 72 6f 76 69 64 ...alert-styles)))))))...(provid
c820 65 20 27 61 6c 65 72 74 29 0a 0a 3b 3b 3b 20 61 6c 65 72 74 2e 65 6c 20 65 6e 64 73 20 68 65 72 e.'alert)..;;;.alert.el.ends.her
c840 65 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 e...............................
c860 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c880 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c8a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c8c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c8e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c900 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c920 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c940 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c960 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c980 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c9a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c9c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
c9e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ca00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ca20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ca40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ca60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ca80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
caa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cac0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cae0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cb00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cb20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cb40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cb60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cb80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cba0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cbc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cbe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cc00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cc20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cc40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cc60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cc80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cca0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ccc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cce0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cd00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cd20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cd40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cd60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cd80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cda0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cdc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cde0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ce00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ce20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ce40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ce60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ce80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cea0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cec0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cee0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cf00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cf20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cf40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cf60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cf80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cfa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cfc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
cfe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d000 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d020 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d040 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d060 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d080 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d0a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d0c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d0e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d100 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d120 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d140 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d1a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d1c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d1e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d200 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d220 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d240 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d260 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d280 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d2a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d2c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d2e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d300 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d320 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d3a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d3c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d3e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d400 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d420 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d440 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d460 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d480 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d4a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d4c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d4e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d500 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d520 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d540 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d560 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d580 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d5a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d5c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d5e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d600 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d620 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d660 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d680 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d6a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d6c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d6e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d700 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d720 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d7a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d7c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d7e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d800 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d820 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d840 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d860 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d880 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d8a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d8c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d8e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d900 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d920 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d940 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d960 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d980 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d9a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d9c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
d9e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
da00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
da20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
da40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
da60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
da80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
daa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dac0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dae0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
db00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
db20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
db40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
db60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
db80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dba0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dbc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dbe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dc00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dc20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dc40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dc60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dc80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dca0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dcc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dce0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dd00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dd20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dd40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dd60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dd80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dda0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ddc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dde0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
de00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
de20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
de40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
de60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
de80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dea0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dec0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dee0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
df00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
df20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
df40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
df60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
df80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dfa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dfc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
dfe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e000 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e020 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e040 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e060 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e080 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e0a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e0c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e0e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e100 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e120 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e140 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e1a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e1c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e1e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e200 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e220 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e240 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e260 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e280 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e2a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e2c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e2e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e300 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e320 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e3a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e3c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e3e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e400 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e420 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e440 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e460 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e480 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e4a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e4c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e4e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e500 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e520 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e540 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e560 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e580 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e5a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e5c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e5e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e600 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e620 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e660 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e680 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e6a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e6c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e6e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e700 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e720 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e7a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e7c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e7e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e800 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e820 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e840 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e860 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e880 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e8a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e8c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e8e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e900 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e920 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e940 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e960 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e980 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e9a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e9c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
e9e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ea00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ea20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ea40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ea60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ea80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
eaa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
eac0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
eae0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
eb00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
eb20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
eb40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
eb60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
eb80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
eba0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ebc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ebe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ec00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ec20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ec40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ec60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ec80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
eca0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ecc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ece0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ed00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ed20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ed40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ed60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ed80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
eda0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
edc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ede0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ee00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ee20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ee40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ee60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ee80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
eea0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
eec0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
eee0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ef00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ef20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ef40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ef60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
ef80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
efa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
efc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
efe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................