| ofs | hex dump | ascii |
|---|---|---|
| 0000 | 6c 6f 67 34 65 2d 32 30 32 34 30 31 32 33 2e 31 33 31 33 2f 00 00 00 00 00 00 00 00 00 00 00 00 | log4e-20240123.1313/............ |
| 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 31 30 00 20 35 00 00 00 | 0000000.00000000000.012010..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 | 6c 6f 67 34 65 2d 32 30 32 34 30 31 32 33 2e 31 33 31 33 2f 6c 6f 67 34 65 2d 70 6b 67 2e 65 6c | log4e-20240123.1313/log4e-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 36 31 37 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 31 32 37 00 20 30 00 00 00 | 0000617.00000000000.014127..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 6c 6f 67 34 65 22 20 22 32 30 32 34 30 31 32 33 2e 31 33 31 33 22 0a 20 20 22 50 | age."log4e"."20240123.1313"..."P |
| 0460 | 72 6f 76 69 64 65 20 6c 6f 67 67 69 6e 67 20 66 72 61 6d 65 77 6f 72 6b 20 66 6f 72 20 65 6c 69 | rovide.logging.framework.for.eli |
| 0480 | 73 70 2e 22 0a 20 20 28 29 0a 20 20 3a 75 72 6c 20 22 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 | sp."...()...:url."https://github |
| 04a0 | 2e 63 6f 6d 2f 61 6b 69 32 6f 2f 6c 6f 67 34 65 22 0a 20 20 3a 63 6f 6d 6d 69 74 20 22 36 64 37 | .com/aki2o/log4e"...:commit."6d7 |
| 04c0 | 31 34 36 32 64 66 39 62 66 35 39 35 64 33 38 36 31 62 66 62 33 32 38 33 37 37 33 34 36 61 63 65 | 1462df9bf595d3861bfb328377346ace |
| 04e0 | 65 64 34 32 32 22 0a 20 20 3a 72 65 76 64 65 73 63 20 22 36 64 37 31 34 36 32 64 66 39 62 66 22 | ed422"...:revdesc."6d71462df9bf" |
| 0500 | 0a 20 20 3a 6b 65 79 77 6f 72 64 73 20 27 28 22 6c 6f 67 22 29 0a 20 20 3a 61 75 74 68 6f 72 73 | ...:keywords.'("log")...:authors |
| 0520 | 20 27 28 28 22 48 69 72 6f 61 6b 69 20 4f 74 73 75 22 20 2e 20 22 6f 6f 74 73 75 68 69 72 6f 61 | .'(("Hiroaki.Otsu"..."ootsuhiroa |
| 0540 | 6b 69 40 67 6d 61 69 6c 2e 63 6f 6d 22 29 29 0a 20 20 3a 6d 61 69 6e 74 61 69 6e 65 72 73 20 27 | ki@gmail.com"))...:maintainers.' |
| 0560 | 28 28 22 48 69 72 6f 61 6b 69 20 4f 74 73 75 22 20 2e 20 22 6f 6f 74 73 75 68 69 72 6f 61 6b 69 | (("Hiroaki.Otsu"..."ootsuhiroaki |
| 0580 | 40 67 6d 61 69 6c 2e 63 6f 6d 22 29 29 29 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | @gmail.com"))).................. |
| 05a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 05c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 05e0 | 00 00 00 00 00 00 00 00 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 | 6c 6f 67 34 65 2d 32 30 32 34 30 31 32 33 2e 31 33 31 33 2f 6c 6f 67 34 65 2e 65 6c 00 00 00 00 | log4e-20240123.1313/log4e.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 30 35 36 36 33 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 33 33 36 30 00 20 30 00 00 00 | 0056632.00000000000.013360..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 6c 6f 67 34 65 2e 65 6c 20 2d 2d 2d 20 70 72 6f 76 69 64 65 20 6c 6f 67 67 69 6e 67 | ;;;.log4e.el.---.provide.logging |
| 0820 | 20 66 72 61 6d 65 77 6f 72 6b 20 66 6f 72 20 65 6c 69 73 70 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 | .framework.for.elisp..;;.Copyrig |
| 0840 | 68 74 20 28 43 29 20 32 30 31 33 20 20 48 69 72 6f 61 6b 69 20 4f 74 73 75 0a 0a 3b 3b 20 41 75 | ht.(C).2013..Hiroaki.Otsu..;;.Au |
| 0860 | 74 68 6f 72 3a 20 48 69 72 6f 61 6b 69 20 4f 74 73 75 20 3c 6f 6f 74 73 75 68 69 72 6f 61 6b 69 | thor:.Hiroaki.Otsu.<ootsuhiroaki |
| 0880 | 40 67 6d 61 69 6c 2e 63 6f 6d 3e 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 6c 6f 67 0a 3b 3b 20 | @gmail.com>.;;.Keywords:.log.;;. |
| 08a0 | 55 52 4c 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 61 6b 69 32 6f 2f 6c 6f | URL:.https://github.com/aki2o/lo |
| 08c0 | 67 34 65 0a 3b 3b 20 50 61 63 6b 61 67 65 2d 56 65 72 73 69 6f 6e 3a 20 32 30 32 34 30 31 32 33 | g4e.;;.Package-Version:.20240123 |
| 08e0 | 2e 31 33 31 33 0a 3b 3b 20 50 61 63 6b 61 67 65 2d 52 65 76 69 73 69 6f 6e 3a 20 36 64 37 31 34 | .1313.;;.Package-Revision:.6d714 |
| 0900 | 36 32 64 66 39 62 66 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 66 72 65 65 | 62df9bf..;;.This.program.is.free |
| 0920 | 20 73 6f 66 74 77 61 72 65 3b 20 79 6f 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 | .software;.you.can.redistribute. |
| 0940 | 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 66 79 0a 3b 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 | it.and/or.modify.;;.it.under.the |
| 0960 | 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 | .terms.of.the.GNU.General.Public |
| 0980 | 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 62 6c 69 73 68 65 64 20 62 79 0a 3b 3b 20 74 68 65 20 | .License.as.published.by.;;.the. |
| 09a0 | 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 | Free.Software.Foundation,.either |
| 09c0 | 20 76 65 72 73 69 6f 6e 20 33 20 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 2c 20 6f 72 0a 3b 3b | .version.3.of.the.License,.or.;; |
| 09e0 | 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 | .(at.your.option).any.later.vers |
| 0a00 | 69 6f 6e 2e 0a 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 64 69 73 74 72 69 62 75 74 65 | ion...;;.This.file.is.distribute |
| 0a20 | 64 20 69 6e 20 74 68 65 20 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 | d.in.the.hope.that.it.will.be.us |
| 0a40 | 65 66 75 6c 2c 0a 3b 3b 20 62 75 74 20 57 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 | eful,.;;.but.WITHOUT.ANY.WARRANT |
| 0a60 | 59 3b 20 77 69 74 68 6f 75 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 | Y;.without.even.the.implied.warr |
| 0a80 | 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 | anty.of.;;.MERCHANTABILITY.or.FI |
| 0aa0 | 54 4e 45 53 53 20 46 4f 52 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 | TNESS.FOR.A.PARTICULAR.PURPOSE.. |
| 0ac0 | 20 53 65 65 20 74 68 65 0a 3b 3b 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c | .See.the.;;.GNU.General.Public.L |
| 0ae0 | 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 3b 20 59 6f 75 | icense.for.more.details...;;.You |
| 0b00 | 20 73 68 6f 75 6c 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 | .should.have.received.a.copy.of. |
| 0b20 | 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b | the.GNU.General.Public.License.; |
| 0b40 | 3b 20 61 6c 6f 6e 67 20 77 69 74 68 20 74 68 69 73 20 70 72 6f 67 72 61 6d 2e 20 20 49 66 20 6e | ;.along.with.this.program...If.n |
| 0b60 | 6f 74 2c 20 73 65 65 20 3c 68 74 74 70 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 | ot,.see.<http://www.gnu.org/lice |
| 0b80 | 6e 73 65 73 2f 3e 2e 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 3b 3b 0a 3b 3b 20 54 | nses/>...;;;.Commentary:.;;.;;.T |
| 0ba0 | 68 69 73 20 65 78 74 65 6e 73 69 6f 6e 20 70 72 6f 76 69 64 65 73 20 6c 6f 67 67 69 6e 67 20 66 | his.extension.provides.logging.f |
| 0bc0 | 72 61 6d 65 77 6f 72 6b 20 66 6f 72 20 65 6c 69 73 70 2e 0a 3b 3b 0a 3b 3b 20 46 6f 72 20 64 65 | ramework.for.elisp..;;.;;.For.de |
| 0be0 | 74 61 69 6c 2c 20 73 65 65 20 3c 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 61 6b | tail,.see.<https://github.com/ak |
| 0c00 | 69 32 6f 2f 6c 6f 67 34 65 2f 62 6c 6f 62 2f 6d 61 73 74 65 72 2f 52 45 41 44 4d 45 2e 6d 64 3e | i2o/log4e/blob/master/README.md> |
| 0c20 | 0a 3b 3b 0a 3b 3b 20 45 6e 6a 6f 79 21 21 21 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71 | .;;.;;.Enjoy!!!..;;;.Code:..(req |
| 0c40 | 75 69 72 65 20 27 63 6c 2d 6c 69 62 29 0a 28 72 65 71 75 69 72 65 20 27 72 78 29 0a 0a 0a 28 64 | uire.'cl-lib).(require.'rx)...(d |
| 0c60 | 65 66 63 6f 6e 73 74 20 6c 6f 67 34 65 2d 6c 6f 67 2d 6c 65 76 65 6c 2d 61 6c 69 73 74 20 27 28 | efconst.log4e-log-level-alist.'( |
| 0c80 | 28 66 61 74 61 6c 20 2e 20 36 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | (fatal...6)..................... |
| 0ca0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 2e 20 35 29 0a 20 20 20 20 20 20 | ..............(error...5)....... |
| 0cc0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 61 72 | ............................(war |
| 0ce0 | 6e 20 20 2e 20 34 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 | n....4)......................... |
| 0d00 | 20 20 20 20 20 20 20 20 20 20 28 69 6e 66 6f 20 20 2e 20 33 29 0a 20 20 20 20 20 20 20 20 20 20 | ..........(info....3)........... |
| 0d20 | 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 64 65 62 75 67 20 2e | ........................(debug.. |
| 0d40 | 20 32 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 | .2)............................. |
| 0d60 | 20 20 20 20 20 20 28 74 72 61 63 65 20 2e 20 31 29 29 0a 20 20 22 41 6c 69 73 74 20 6f 66 20 6c | ......(trace...1))..."Alist.of.l |
| 0d80 | 6f 67 20 6c 65 76 65 6c 20 76 61 6c 75 65 2e 22 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 6c 6f 67 | og.level.value.")..(defconst.log |
| 0da0 | 34 65 2d 64 65 66 61 75 6c 74 2d 6c 6f 67 67 69 6e 67 2d 66 75 6e 63 74 69 6f 6e 2d 6e 61 6d 65 | 4e-default-logging-function-name |
| 0dc0 | 2d 61 6c 69 73 74 20 27 28 28 66 61 74 61 6c 20 2e 20 22 6c 6f 67 2d 66 61 74 61 6c 22 29 0a 20 | -alist.'((fatal..."log-fatal").. |
| 0de0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 0e00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 2e 20 22 6c | .....................(error..."l |
| 0e20 | 6f 67 2d 65 72 72 6f 72 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | og-error")...................... |
| 0e40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 0e60 | 20 28 77 61 72 6e 20 20 2e 20 22 6c 6f 67 2d 77 61 72 6e 22 29 0a 20 20 20 20 20 20 20 20 20 20 | .(warn...."log-warn")........... |
| 0e80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 0ea0 | 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 66 6f 20 20 2e 20 22 6c 6f 67 2d 69 6e 66 6f 22 29 | ............(info...."log-info") |
| 0ec0 | 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 | ................................ |
| 0ee0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 62 75 67 20 2e 20 | .......................(debug... |
| 0f00 | 22 6c 6f 67 2d 64 65 62 75 67 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | "log-debug").................... |
| 0f20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 0f40 | 20 20 20 28 74 72 61 63 65 20 2e 20 22 6c 6f 67 2d 74 72 61 63 65 22 29 29 0a 20 20 22 41 6c 69 | ...(trace..."log-trace"))..."Ali |
| 0f60 | 73 74 20 6f 66 20 6c 6f 67 67 69 6e 67 20 66 75 6e 63 74 69 6f 6e 20 6e 61 6d 65 20 61 74 20 64 | st.of.logging.function.name.at.d |
| 0f80 | 65 66 61 75 6c 74 2e 22 29 0a 0a 0a 28 64 65 66 6d 61 63 72 6f 20 6c 6f 67 34 65 2d 2d 64 65 66 | efault.")...(defmacro.log4e--def |
| 0fa0 | 2d 73 79 6d 6d 61 6b 65 72 20 28 73 79 6d 6e 6d 29 0a 20 20 60 28 70 72 6f 67 6e 0a 20 20 20 20 | -symmaker.(symnm)...`(progn..... |
| 0fc0 | 20 28 64 65 66 73 75 62 73 74 20 2c 28 69 6e 74 65 72 6e 20 28 63 6f 6e 63 61 74 20 22 6c 6f 67 | .(defsubst.,(intern.(concat."log |
| 0fe0 | 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 22 20 73 79 6d 6e 6d 29 29 20 28 70 72 65 66 69 | 4e--make-symbol-".symnm)).(prefi |
| 1000 | 78 29 0a 20 20 20 20 20 20 20 28 69 6e 74 65 72 6e 20 28 63 6f 6e 63 61 74 20 2c 28 66 6f 72 6d | x)........(intern.(concat.,(form |
| 1020 | 61 74 20 22 6c 6f 67 34 65 2d 2d 25 73 2d 22 20 73 79 6d 6e 6d 29 20 70 72 65 66 69 78 29 29 29 | at."log4e--%s-".symnm).prefix))) |
| 1040 | 29 29 0a 0a 28 6c 6f 67 34 65 2d 2d 64 65 66 2d 73 79 6d 6d 61 6b 65 72 20 22 6c 6f 67 2d 62 75 | ))..(log4e--def-symmaker."log-bu |
| 1060 | 66 66 65 72 22 29 0a 28 6c 6f 67 34 65 2d 2d 64 65 66 2d 73 79 6d 6d 61 6b 65 72 20 22 6d 73 67 | ffer").(log4e--def-symmaker."msg |
| 1080 | 2d 62 75 66 66 65 72 22 29 0a 28 6c 6f 67 34 65 2d 2d 64 65 66 2d 73 79 6d 6d 61 6b 65 72 20 22 | -buffer").(log4e--def-symmaker." |
| 10a0 | 6c 6f 67 2d 74 65 6d 70 6c 61 74 65 22 29 0a 28 6c 6f 67 34 65 2d 2d 64 65 66 2d 73 79 6d 6d 61 | log-template").(log4e--def-symma |
| 10c0 | 6b 65 72 20 22 74 69 6d 65 2d 74 65 6d 70 6c 61 74 65 22 29 0a 28 6c 6f 67 34 65 2d 2d 64 65 66 | ker."time-template").(log4e--def |
| 10e0 | 2d 73 79 6d 6d 61 6b 65 72 20 22 6d 69 6e 2d 6c 65 76 65 6c 22 29 0a 28 6c 6f 67 34 65 2d 2d 64 | -symmaker."min-level").(log4e--d |
| 1100 | 65 66 2d 73 79 6d 6d 61 6b 65 72 20 22 6d 61 78 2d 6c 65 76 65 6c 22 29 0a 28 6c 6f 67 34 65 2d | ef-symmaker."max-level").(log4e- |
| 1120 | 2d 64 65 66 2d 73 79 6d 6d 61 6b 65 72 20 22 74 6f 67 67 6c 65 2d 6c 6f 67 67 69 6e 67 22 29 0a | -def-symmaker."toggle-logging"). |
| 1140 | 28 6c 6f 67 34 65 2d 2d 64 65 66 2d 73 79 6d 6d 61 6b 65 72 20 22 74 6f 67 67 6c 65 2d 64 65 62 | (log4e--def-symmaker."toggle-deb |
| 1160 | 75 67 67 69 6e 67 22 29 0a 28 6c 6f 67 34 65 2d 2d 64 65 66 2d 73 79 6d 6d 61 6b 65 72 20 22 62 | ugging").(log4e--def-symmaker."b |
| 1180 | 75 66 66 65 72 2d 63 6f 64 69 6e 67 2d 73 79 73 74 65 6d 22 29 0a 28 6c 6f 67 34 65 2d 2d 64 65 | uffer-coding-system").(log4e--de |
| 11a0 | 66 2d 73 79 6d 6d 61 6b 65 72 20 22 61 75 74 68 6f 72 2d 6d 61 69 6c 2d 61 64 64 72 65 73 73 22 | f-symmaker."author-mail-address" |
| 11c0 | 29 0a 0a 28 64 65 66 6d 61 63 72 6f 20 6c 6f 67 34 65 2d 2d 64 65 66 2d 6c 65 76 65 6c 2d 6c 6f | )..(defmacro.log4e--def-level-lo |
| 11e0 | 67 67 65 72 20 28 70 72 65 66 69 78 20 73 75 66 66 69 78 20 6c 65 76 65 6c 29 0a 20 20 28 6c 65 | gger.(prefix.suffix.level)...(le |
| 1200 | 74 20 28 28 61 72 67 66 6f 72 6d 20 28 69 66 20 73 75 66 66 69 78 0a 20 20 20 20 20 20 20 20 20 | t.((argform.(if.suffix.......... |
| 1220 | 20 20 20 20 20 20 20 20 20 20 20 20 27 28 6d 73 67 20 26 72 65 73 74 20 6d 73 67 61 72 67 73 29 | ............'(msg.&rest.msgargs) |
| 1240 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 28 6c 65 76 65 6c 20 6d 73 67 20 | ....................'(level.msg. |
| 1260 | 26 72 65 73 74 20 6d 73 67 61 72 67 73 29 29 29 0a 20 20 20 20 20 20 20 20 28 62 75 66 66 20 28 | &rest.msgargs))).........(buff.( |
| 1280 | 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 6c 6f 67 2d 62 75 66 66 65 72 20 70 72 | log4e--make-symbol-log-buffer.pr |
| 12a0 | 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 28 6d 73 67 62 75 66 66 20 28 6c 6f 67 34 65 2d 2d | efix)).........(msgbuff.(log4e-- |
| 12c0 | 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 6d 73 67 2d 62 75 66 66 65 72 20 70 72 65 66 69 78 29 29 0a | make-symbol-msg-buffer.prefix)). |
| 12e0 | 20 20 20 20 20 20 20 20 28 63 6f 64 73 79 73 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d | ........(codsys.(log4e--make-sym |
| 1300 | 62 6f 6c 2d 62 75 66 66 65 72 2d 63 6f 64 69 6e 67 2d 73 79 73 74 65 6d 20 70 72 65 66 69 78 29 | bol-buffer-coding-system.prefix) |
| 1320 | 29 0a 20 20 20 20 20 20 20 20 28 6c 6f 67 74 6d 70 6c 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d | ).........(logtmpl.(log4e--make- |
| 1340 | 73 79 6d 62 6f 6c 2d 6c 6f 67 2d 74 65 6d 70 6c 61 74 65 20 70 72 65 66 69 78 29 29 0a 20 20 20 | symbol-log-template.prefix)).... |
| 1360 | 20 20 20 20 20 28 74 69 6d 65 74 6d 70 6c 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 | .....(timetmpl.(log4e--make-symb |
| 1380 | 6f 6c 2d 74 69 6d 65 2d 74 65 6d 70 6c 61 74 65 20 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 | ol-time-template.prefix))....... |
| 13a0 | 20 20 28 6d 69 6e 6c 76 6c 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 6d 69 | ..(minlvl.(log4e--make-symbol-mi |
| 13c0 | 6e 2d 6c 65 76 65 6c 20 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 28 6d 61 78 6c 76 6c | n-level.prefix)).........(maxlvl |
| 13e0 | 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 6d 61 78 2d 6c 65 76 65 6c 20 70 | .(log4e--make-symbol-max-level.p |
| 1400 | 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 28 6c 6f 67 67 69 6e 67 2d 70 20 28 6c 6f 67 34 | refix)).........(logging-p.(log4 |
| 1420 | 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 74 6f 67 67 6c 65 2d 6c 6f 67 67 69 6e 67 20 70 72 | e--make-symbol-toggle-logging.pr |
| 1440 | 65 66 69 78 29 29 29 0a 20 20 20 20 60 28 70 72 6f 67 6e 0a 0a 20 20 20 20 20 20 20 3b 3b 20 44 | efix))).....`(progn.........;;.D |
| 1460 | 65 66 69 6e 65 20 6c 6f 67 67 69 6e 67 20 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 28 64 | efine.logging.function........(d |
| 1480 | 65 66 75 6e 20 2c 28 69 6e 74 65 72 6e 20 28 63 6f 6e 63 61 74 20 70 72 65 66 69 78 20 22 2d 2d | efun.,(intern.(concat.prefix."-- |
| 14a0 | 22 20 28 6f 72 20 73 75 66 66 69 78 20 22 6c 6f 67 22 29 29 29 20 2c 61 72 67 66 6f 72 6d 0a 20 | ".(or.suffix."log"))).,argform.. |
| 14c0 | 20 20 20 20 20 20 20 20 2c 28 66 6f 72 6d 61 74 20 22 44 6f 20 6c 6f 67 67 69 6e 67 20 66 6f 72 | ........,(format."Do.logging.for |
| 14e0 | 20 25 73 20 6c 65 76 65 6c 20 6c 6f 67 2e 0a 25 73 4d 53 47 2f 4d 53 47 41 52 47 53 20 61 72 65 | .%s.level.log..%sMSG/MSGARGS.are |
| 1500 | 20 70 61 73 73 65 64 20 74 6f 20 60 66 6f 72 6d 61 74 27 2e 22 0a 20 20 20 20 20 20 20 20 20 20 | .passed.to.`format'."........... |
| 1520 | 20 20 20 20 20 20 20 20 28 69 66 20 73 75 66 66 69 78 20 6c 65 76 65 6c 20 22 61 6e 79 22 29 0a | ........(if.suffix.level."any"). |
| 1540 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 73 75 66 66 69 78 20 22 22 20 | ..................(if.suffix."". |
| 1560 | 22 4c 45 56 45 4c 20 69 73 20 73 79 6d 62 6f 6c 20 74 68 61 74 20 69 73 20 6f 6e 65 20 6f 66 20 | "LEVEL.is.symbol.that.is.one.of. |
| 1580 | 74 72 61 63 65 20 64 65 62 75 67 20 69 6e 66 6f 20 77 61 72 6e 20 65 72 72 6f 72 20 66 61 74 61 | trace.debug.info.warn.error.fata |
| 15a0 | 6c 2e 5c 6e 22 29 29 0a 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 6c 6f 67 34 65 2d 2d 63 | l.\n"))..........(let.((log4e--c |
| 15c0 | 75 72 72 65 6e 74 2d 6d 73 67 2d 62 75 66 66 65 72 20 2c 6d 73 67 62 75 66 66 29 29 0a 20 20 20 | urrent-msg-buffer.,msgbuff)).... |
| 15e0 | 20 20 20 20 20 20 20 20 2c 28 69 66 20 73 75 66 66 69 78 0a 20 20 20 20 20 20 20 20 20 20 20 20 | ........,(if.suffix............. |
| 1600 | 20 20 20 20 60 28 61 70 70 6c 79 20 27 6c 6f 67 34 65 2d 2d 6c 6f 67 67 69 6e 67 20 2c 62 75 66 | ....`(apply.'log4e--logging.,buf |
| 1620 | 66 20 2c 63 6f 64 73 79 73 20 2c 6c 6f 67 74 6d 70 6c 20 2c 74 69 6d 65 74 6d 70 6c 20 2c 6d 69 | f.,codsys.,logtmpl.,timetmpl.,mi |
| 1640 | 6e 6c 76 6c 20 2c 6d 61 78 6c 76 6c 20 2c 6c 6f 67 67 69 6e 67 2d 70 20 27 2c 6c 65 76 65 6c 20 | nlvl.,maxlvl.,logging-p.',level. |
| 1660 | 6d 73 67 20 6d 73 67 61 72 67 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 61 70 70 | msg.msgargs)...............`(app |
| 1680 | 6c 79 20 27 6c 6f 67 34 65 2d 2d 6c 6f 67 67 69 6e 67 20 2c 62 75 66 66 20 2c 63 6f 64 73 79 73 | ly.'log4e--logging.,buff.,codsys |
| 16a0 | 20 2c 6c 6f 67 74 6d 70 6c 20 2c 74 69 6d 65 74 6d 70 6c 20 2c 6d 69 6e 6c 76 6c 20 2c 6d 61 78 | .,logtmpl.,timetmpl.,minlvl.,max |
| 16c0 | 6c 76 6c 20 2c 6c 6f 67 67 69 6e 67 2d 70 20 6c 65 76 65 6c 20 6d 73 67 20 6d 73 67 61 72 67 73 | lvl.,logging-p.level.msg.msgargs |
| 16e0 | 29 29 29 29 0a 0a 20 20 20 20 20 20 20 3b 3b 20 44 65 66 69 6e 65 20 6c 6f 67 67 69 6e 67 20 6d | )))).........;;.Define.logging.m |
| 1700 | 61 63 72 6f 0a 20 20 20 20 20 20 20 28 64 65 66 6d 61 63 72 6f 20 2c 28 69 6e 74 65 72 6e 20 28 | acro........(defmacro.,(intern.( |
| 1720 | 63 6f 6e 63 61 74 20 70 72 65 66 69 78 20 22 2d 2d 22 20 28 6f 72 20 73 75 66 66 69 78 20 22 6c | concat.prefix."--".(or.suffix."l |
| 1740 | 6f 67 22 29 20 22 2a 22 29 29 20 2c 61 72 67 66 6f 72 6d 0a 20 20 20 20 20 20 20 20 20 2c 28 66 | og")."*")).,argform..........,(f |
| 1760 | 6f 72 6d 61 74 20 22 44 6f 20 6c 6f 67 67 69 6e 67 20 66 6f 72 20 25 73 20 6c 65 76 65 6c 20 6c | ormat."Do.logging.for.%s.level.l |
| 1780 | 6f 67 2e 0a 25 73 4d 53 47 2f 4d 53 47 41 52 47 53 20 61 72 65 20 70 61 73 73 65 64 20 74 6f 20 | og..%sMSG/MSGARGS.are.passed.to. |
| 17a0 | 60 66 6f 72 6d 61 74 27 2e 0a 45 76 61 6c 75 61 74 69 6f 6e 20 6f 66 20 4d 53 47 41 52 47 53 20 | `format'..Evaluation.of.MSGARGS. |
| 17c0 | 69 73 20 69 6e 76 6f 6b 65 64 20 6f 6e 6c 79 20 69 66 20 25 73 20 6c 65 76 65 6c 20 6c 6f 67 20 | is.invoked.only.if.%s.level.log. |
| 17e0 | 73 68 6f 75 6c 64 20 62 65 20 70 72 69 6e 74 65 64 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 | should.be.printed."............. |
| 1800 | 20 20 20 20 20 20 28 69 66 20 73 75 66 66 69 78 20 6c 65 76 65 6c 20 22 61 6e 79 22 29 0a 20 20 | ......(if.suffix.level."any")... |
| 1820 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 73 75 66 66 69 78 20 22 22 20 22 4c | ................(if.suffix.""."L |
| 1840 | 45 56 45 4c 20 69 73 20 73 79 6d 62 6f 6c 20 74 68 61 74 20 69 73 20 6f 6e 65 20 6f 66 20 74 72 | EVEL.is.symbol.that.is.one.of.tr |
| 1860 | 61 63 65 20 64 65 62 75 67 20 69 6e 66 6f 20 77 61 72 6e 20 65 72 72 6f 72 20 66 61 74 61 6c 2e | ace.debug.info.warn.error.fatal. |
| 1880 | 5c 6e 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 73 75 66 66 69 | \n")...................(if.suffi |
| 18a0 | 78 20 6c 65 76 65 6c 20 22 74 68 65 22 29 29 0a 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 2c | x.level."the"))..........(let.(, |
| 18c0 | 40 28 69 66 20 73 75 66 66 69 78 20 28 6c 69 73 74 20 60 28 6c 65 76 65 6c 20 27 2c 6c 65 76 65 | @(if.suffix.(list.`(level.',leve |
| 18e0 | 6c 29 29 20 27 28 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 75 66 66 20 28 6c | l)).'())................(buff.(l |
| 1900 | 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 6c 6f 67 2d 62 75 66 66 65 72 20 2c 70 72 | og4e--make-symbol-log-buffer.,pr |
| 1920 | 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 73 67 62 75 66 66 20 28 | efix))................(msgbuff.( |
| 1940 | 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 6d 73 67 2d 62 75 66 66 65 72 20 2c 70 | log4e--make-symbol-msg-buffer.,p |
| 1960 | 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 64 73 79 73 20 28 | refix))................(codsys.( |
| 1980 | 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 62 75 66 66 65 72 2d 63 6f 64 69 6e 67 | log4e--make-symbol-buffer-coding |
| 19a0 | 2d 73 79 73 74 65 6d 20 2c 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | -system.,prefix))............... |
| 19c0 | 20 28 6c 6f 67 74 6d 70 6c 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 6c 6f | .(logtmpl.(log4e--make-symbol-lo |
| 19e0 | 67 2d 74 65 6d 70 6c 61 74 65 20 2c 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | g-template.,prefix))............ |
| 1a00 | 20 20 20 20 28 74 69 6d 65 74 6d 70 6c 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f | ....(timetmpl.(log4e--make-symbo |
| 1a20 | 6c 2d 74 69 6d 65 2d 74 65 6d 70 6c 61 74 65 20 2c 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 | l-time-template.,prefix))....... |
| 1a40 | 20 20 20 20 20 20 20 20 20 28 6d 69 6e 6c 76 6c 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 | .........(minlvl.(log4e--make-sy |
| 1a60 | 6d 62 6f 6c 2d 6d 69 6e 2d 6c 65 76 65 6c 20 2c 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 | mbol-min-level.,prefix))........ |
| 1a80 | 20 20 20 20 20 20 20 20 28 6d 61 78 6c 76 6c 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d | ........(maxlvl.(log4e--make-sym |
| 1aa0 | 62 6f 6c 2d 6d 61 78 2d 6c 65 76 65 6c 20 2c 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 | bol-max-level.,prefix))......... |
| 1ac0 | 20 20 20 20 20 20 20 28 6c 6f 67 67 69 6e 67 2d 70 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 | .......(logging-p.(log4e--make-s |
| 1ae0 | 79 6d 62 6f 6c 2d 74 6f 67 67 6c 65 2d 6c 6f 67 67 69 6e 67 20 2c 70 72 65 66 69 78 29 29 29 0a | ymbol-toggle-logging.,prefix))). |
| 1b00 | 20 20 20 20 20 20 20 20 20 20 20 60 28 6c 65 74 20 28 28 6c 6f 67 34 65 2d 2d 63 75 72 72 65 6e | ...........`(let.((log4e--curren |
| 1b20 | 74 2d 6d 73 67 2d 62 75 66 66 65 72 20 2c 6d 73 67 62 75 66 66 29 29 0a 20 20 20 20 20 20 20 20 | t-msg-buffer.,msgbuff))......... |
| 1b40 | 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 2c 6c 6f 67 67 69 6e 67 2d 70 0a 20 20 20 20 | ......(when.(and.,logging-p..... |
| 1b60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 34 65 2d 2d 6c 6f 67 | .....................(log4e--log |
| 1b80 | 67 69 6e 67 2d 6c 65 76 65 6c 2d 70 20 2c 6d 69 6e 6c 76 6c 20 2c 6d 61 78 6c 76 6c 20 27 2c 6c | ging-level-p.,minlvl.,maxlvl.',l |
| 1ba0 | 65 76 65 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 34 65 2d 2d 6c | evel)).................(log4e--l |
| 1bc0 | 6f 67 67 69 6e 67 20 2c 62 75 66 66 20 2c 63 6f 64 73 79 73 20 2c 6c 6f 67 74 6d 70 6c 20 2c 74 | ogging.,buff.,codsys.,logtmpl.,t |
| 1be0 | 69 6d 65 74 6d 70 6c 20 2c 6d 69 6e 6c 76 6c 20 2c 6d 61 78 6c 76 6c 20 2c 6c 6f 67 67 69 6e 67 | imetmpl.,minlvl.,maxlvl.,logging |
| 1c00 | 2d 70 20 27 2c 6c 65 76 65 6c 20 2c 6d 73 67 20 2c 40 6d 73 67 61 72 67 73 29 29 29 29 29 0a 20 | -p.',level.,msg.,@msgargs))))).. |
| 1c20 | 20 20 20 20 20 20 0a 20 20 20 20 20 20 20 29 29 29 0a 0a 28 64 65 66 73 75 62 73 74 20 6c 6f 67 | ..............)))..(defsubst.log |
| 1c40 | 34 65 2d 2d 6c 6f 67 67 69 6e 67 2d 6c 65 76 65 6c 2d 70 20 28 6d 69 6e 6c 65 76 65 6c 20 6d 61 | 4e--logging-level-p.(minlevel.ma |
| 1c60 | 78 6c 65 76 65 6c 20 63 75 72 72 6c 65 76 65 6c 29 0a 20 20 28 6c 65 74 20 28 28 6d 69 6e 6c 76 | xlevel.currlevel)...(let.((minlv |
| 1c80 | 6c 76 61 6c 75 65 20 28 6f 72 20 28 61 73 73 6f 63 2d 64 65 66 61 75 6c 74 20 6d 69 6e 6c 65 76 | lvalue.(or.(assoc-default.minlev |
| 1ca0 | 65 6c 20 6c 6f 67 34 65 2d 6c 6f 67 2d 6c 65 76 65 6c 2d 61 6c 69 73 74 29 0a 20 20 20 20 20 20 | el.log4e-log-level-alist)....... |
| 1cc0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 29 29 0a 20 20 20 20 20 20 20 20 28 | ...................1)).........( |
| 1ce0 | 6d 61 78 6c 76 6c 76 61 6c 75 65 20 28 6f 72 20 28 61 73 73 6f 63 2d 64 65 66 61 75 6c 74 20 6d | maxlvlvalue.(or.(assoc-default.m |
| 1d00 | 61 78 6c 65 76 65 6c 20 6c 6f 67 34 65 2d 6c 6f 67 2d 6c 65 76 65 6c 2d 61 6c 69 73 74 29 0a 20 | axlevel.log4e-log-level-alist).. |
| 1d20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 36 29 29 0a 20 20 20 20 | ........................6))..... |
| 1d40 | 20 20 20 20 28 63 75 72 72 6c 76 6c 76 61 6c 75 65 20 28 6f 72 20 28 61 73 73 6f 63 2d 64 65 66 | ....(currlvlvalue.(or.(assoc-def |
| 1d60 | 61 75 6c 74 20 63 75 72 72 6c 65 76 65 6c 20 6c 6f 67 34 65 2d 6c 6f 67 2d 6c 65 76 65 6c 2d 61 | ault.currlevel.log4e-log-level-a |
| 1d80 | 6c 69 73 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 20 20 20 | list)........................... |
| 1da0 | 30 29 29 29 0a 20 20 20 20 28 61 6e 64 20 28 3e 3d 20 63 75 72 72 6c 76 6c 76 61 6c 75 65 20 6d | 0))).....(and.(>=.currlvlvalue.m |
| 1dc0 | 69 6e 6c 76 6c 76 61 6c 75 65 29 0a 20 20 20 20 20 20 20 20 20 28 3c 3d 20 63 75 72 72 6c 76 6c | inlvlvalue)..........(<=.currlvl |
| 1de0 | 76 61 6c 75 65 20 6d 61 78 6c 76 6c 76 61 6c 75 65 29 29 29 29 0a 0a 28 64 65 66 73 75 62 73 74 | value.maxlvlvalue))))..(defsubst |
| 1e00 | 20 6c 6f 67 34 65 2d 2d 67 65 74 2d 6f 72 2d 63 72 65 61 74 65 2d 6c 6f 67 2d 62 75 66 66 65 72 | .log4e--get-or-create-log-buffer |
| 1e20 | 20 28 62 75 66 66 6e 6d 20 26 6f 70 74 69 6f 6e 61 6c 20 63 6f 64 65 73 79 73 29 0a 20 20 28 6f | .(buffnm.&optional.codesys)...(o |
| 1e40 | 72 20 28 67 65 74 2d 62 75 66 66 65 72 20 62 75 66 66 6e 6d 29 0a 20 20 20 20 20 20 28 6c 65 74 | r.(get-buffer.buffnm).......(let |
| 1e60 | 20 28 28 62 75 66 66 20 28 67 65 74 2d 62 75 66 66 65 72 2d 63 72 65 61 74 65 20 62 75 66 66 6e | .((buff.(get-buffer-create.buffn |
| 1e80 | 6d 29 29 29 0a 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 | m))).........(with-current-buffe |
| 1ea0 | 72 20 62 75 66 66 0a 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 34 65 2d 6d 6f 64 65 29 0a 20 20 | r.buff...........(log4e-mode)... |
| 1ec0 | 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 63 6f 64 65 73 79 73 0a 20 20 20 20 20 20 20 20 20 20 | ........(when.codesys........... |
| 1ee0 | 20 20 28 73 65 74 71 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 63 6f 64 69 6e 67 2d 73 79 73 74 65 | ..(setq.buffer-file-coding-syste |
| 1f00 | 6d 20 63 6f 64 65 73 79 73 29 29 29 0a 20 20 20 20 20 20 20 20 62 75 66 66 29 29 29 0a 0a 28 64 | m.codesys))).........buff)))..(d |
| 1f20 | 65 66 76 61 72 20 6c 6f 67 34 65 2d 2d 72 65 67 65 78 70 2d 6d 73 67 2d 66 6f 72 6d 61 74 0a 20 | efvar.log4e--regexp-msg-format.. |
| 1f40 | 20 28 72 78 2d 74 6f 2d 73 74 72 69 6e 67 20 60 28 61 6e 64 20 22 25 22 0a 20 20 20 20 20 20 20 | .(rx-to-string.`(and."%"........ |
| 1f60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2a 20 28 61 6e 79 20 22 2b 23 2d 30 22 29 29 20 | ...............(*.(any."+#-0")). |
| 1f80 | 20 20 20 20 20 20 20 3b 20 66 6c 61 67 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .......;.flags.................. |
| 1fa0 | 20 20 20 20 20 28 2a 20 28 61 6e 79 20 22 30 2d 39 22 29 29 20 20 20 20 20 20 20 20 20 3b 20 77 | .....(*.(any."0-9")).........;.w |
| 1fc0 | 69 64 74 68 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3f 20 22 2e | idth.......................(?.". |
| 1fe0 | 22 20 28 2b 20 28 61 6e 79 20 22 30 2d 39 22 29 29 29 20 3b 20 70 72 65 63 69 73 69 6f 6e 0a 20 | ".(+.(any."0-9"))).;.precision.. |
| 2000 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 79 20 22 61 2d 7a 41 2d | .....................(any."a-zA- |
| 2020 | 5a 22 29 29 29 29 0a 0a 28 64 65 66 73 75 62 73 74 20 6c 6f 67 34 65 2d 2d 69 6e 73 65 72 74 2d | Z"))))..(defsubst.log4e--insert- |
| 2040 | 6c 6f 67 20 28 6c 6f 67 74 6d 70 6c 20 74 69 6d 65 74 6d 70 6c 20 6c 65 76 65 6c 20 6d 73 67 20 | log.(logtmpl.timetmpl.level.msg. |
| 2060 | 6d 73 67 61 72 67 73 20 70 72 6f 70 65 72 74 69 7a 65 2d 70 29 0a 20 20 28 6c 65 74 20 28 28 74 | msgargs.propertize-p)...(let.((t |
| 2080 | 69 6d 65 74 65 78 74 20 28 66 6f 72 6d 61 74 2d 74 69 6d 65 2d 73 74 72 69 6e 67 20 74 69 6d 65 | imetext.(format-time-string.time |
| 20a0 | 74 6d 70 6c 29 29 0a 20 20 20 20 20 20 20 20 28 6c 76 6c 74 65 78 74 20 28 66 6f 72 6d 61 74 20 | tmpl)).........(lvltext.(format. |
| 20c0 | 22 25 2d 30 35 73 22 20 28 75 70 63 61 73 65 20 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 6c 65 76 | "%-05s".(upcase.(symbol-name.lev |
| 20e0 | 65 6c 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 2d 72 65 61 64 2d 6f 6e 6c 79 | el)))).........(buffer-read-only |
| 2100 | 20 6e 69 6c 29 29 0a 20 20 20 20 28 77 68 65 6e 20 70 72 6f 70 65 72 74 69 7a 65 2d 70 0a 20 20 | .nil)).....(when.propertize-p... |
| 2120 | 20 20 20 20 28 70 75 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 28 6c 65 6e 67 74 68 | ....(put-text-property.0.(length |
| 2140 | 20 74 69 6d 65 74 65 78 74 29 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 64 6f 63 2d | .timetext).'face.'font-lock-doc- |
| 2160 | 66 61 63 65 20 74 69 6d 65 74 65 78 74 29 0a 20 20 20 20 20 20 28 70 75 74 2d 74 65 78 74 2d 70 | face.timetext).......(put-text-p |
| 2180 | 72 6f 70 65 72 74 79 20 30 20 28 6c 65 6e 67 74 68 20 6c 76 6c 74 65 78 74 29 20 27 66 61 63 65 | roperty.0.(length.lvltext).'face |
| 21a0 | 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 6b 65 79 77 6f 72 64 2d 66 61 63 65 20 6c 76 6c 74 65 78 74 | .'font-lock-keyword-face.lvltext |
| 21c0 | 29 29 0a 20 20 20 20 28 6c 65 74 2a 20 28 28 6c 6f 67 74 65 78 74 20 6c 6f 67 74 6d 70 6c 29 0a | )).....(let*.((logtext.logtmpl). |
| 21e0 | 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 74 65 78 74 20 28 72 65 70 6c 61 63 65 2d 72 65 67 | ...........(logtext.(replace-reg |
| 2200 | 65 78 70 2d 69 6e 2d 73 74 72 69 6e 67 20 22 25 74 22 20 74 69 6d 65 74 65 78 74 20 6c 6f 67 74 | exp-in-string."%t".timetext.logt |
| 2220 | 65 78 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 74 65 78 74 20 28 72 65 70 6c 61 | ext))............(logtext.(repla |
| 2240 | 63 65 2d 72 65 67 65 78 70 2d 69 6e 2d 73 74 72 69 6e 67 20 22 25 6c 22 20 6c 76 6c 74 65 78 74 | ce-regexp-in-string."%l".lvltext |
| 2260 | 20 6c 6f 67 74 65 78 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 74 65 78 74 20 28 | .logtext))............(logtext.( |
| 2280 | 72 65 70 6c 61 63 65 2d 72 65 67 65 78 70 2d 69 6e 2d 73 74 72 69 6e 67 20 22 25 6d 22 20 6d 73 | replace-regexp-in-string."%m".ms |
| 22a0 | 67 20 6c 6f 67 74 65 78 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 62 65 67 69 6e 20 28 70 | g.logtext))............(begin.(p |
| 22c0 | 6f 69 6e 74 29 29 29 0a 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 6c 6f 67 74 65 78 74 20 22 5c | oint))).......(insert.logtext."\ |
| 22e0 | 6e 22 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 70 72 6f 70 65 72 74 69 7a 65 2d 70 0a 20 20 20 | n").......(when.propertize-p.... |
| 2300 | 20 20 20 20 20 28 70 75 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 62 65 67 69 6e 20 28 2b | .....(put-text-property.begin.(+ |
| 2320 | 20 62 65 67 69 6e 20 31 29 20 27 6c 6f 67 34 65 2d 2d 6c 65 76 65 6c 20 6c 65 76 65 6c 29 29 0a | .begin.1).'log4e--level.level)). |
| 2340 | 20 20 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 69 6e 69 74 69 61 6c 6c 79 20 28 67 6f 74 6f 2d 63 | ......(cl-loop.initially.(goto-c |
| 2360 | 68 61 72 20 62 65 67 69 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 68 69 6c 65 20 | har.begin)................while. |
| 2380 | 28 61 6e 64 20 6d 73 67 61 72 67 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | (and.msgargs.................... |
| 23a0 | 20 20 20 20 20 20 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 6c 6f 67 34 65 2d | .......(re-search-forward.log4e- |
| 23c0 | 2d 72 65 67 65 78 70 2d 6d 73 67 2d 66 6f 72 6d 61 74 20 6e 69 6c 20 74 29 29 0a 20 20 20 20 20 | -regexp-msg-format.nil.t))...... |
| 23e0 | 20 20 20 20 20 20 20 20 20 20 64 6f 20 28 6c 65 74 2a 20 28 28 63 75 72 72 74 79 70 65 20 28 6d | ..........do.(let*.((currtype.(m |
| 2400 | 61 74 63 68 2d 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 30 29 29 0a 20 20 | atch-string-no-properties.0))... |
| 2420 | 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 75 72 72 61 72 67 20 | .......................(currarg. |
| 2440 | 28 70 6f 70 20 6d 73 67 61 72 67 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | (pop.msgargs)).................. |
| 2460 | 20 20 20 20 20 20 20 20 28 66 61 69 6c 66 6d 74 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 | ........(failfmt.nil)........... |
| 2480 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 75 72 72 74 65 78 74 20 28 63 6f 6e 64 69 74 | ...............(currtext.(condit |
| 24a0 | 69 6f 6e 2d 63 61 73 65 20 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ion-case.e...................... |
| 24c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 63 75 72 72 74 79 | ..................(format.currty |
| 24e0 | 70 65 20 63 75 72 72 61 72 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | pe.currarg)..................... |
| 2500 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 28 73 65 74 71 20 66 61 | .................(error.(setq.fa |
| 2520 | 69 6c 66 6d 74 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ilfmt.t)........................ |
| 2540 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 3d 25 | .....................(format."=% |
| 2560 | 73 3d 22 20 28 65 72 72 6f 72 2d 6d 65 73 73 61 67 65 2d 73 74 72 69 6e 67 20 65 29 29 29 29 29 | s=".(error-message-string.e))))) |
| 2580 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 61 76 65 2d 6d 61 74 63 | ).....................(save-matc |
| 25a0 | 68 2d 64 61 74 61 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 | h-data.......................(wh |
| 25c0 | 65 6e 20 70 72 6f 70 65 72 74 69 7a 65 2d 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | en.propertize-p................. |
| 25e0 | 20 20 20 20 20 20 20 20 28 69 67 6e 6f 72 65 2d 65 72 72 6f 72 73 0a 20 20 20 20 20 20 20 20 20 | ........(ignore-errors.......... |
| 2600 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 66 61 69 6c 66 6d 74 20 | .................(cond.(failfmt. |
| 2620 | 28 70 75 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 28 6c 65 6e 67 74 68 20 63 75 72 | (put-text-property.0.(length.cur |
| 2640 | 72 74 65 78 74 29 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 77 61 72 6e 69 6e 67 2d | rtext).'face.'font-lock-warning- |
| 2660 | 66 61 63 65 20 63 75 72 72 74 65 78 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | face.currtext))................. |
| 2680 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 20 20 20 20 20 20 20 28 70 75 74 2d 74 65 | ................(t.......(put-te |
| 26a0 | 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 28 6c 65 6e 67 74 68 20 63 75 72 72 74 65 78 74 29 20 | xt-property.0.(length.currtext). |
| 26c0 | 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 73 74 72 69 6e 67 2d 66 61 63 65 20 63 75 72 | 'face.'font-lock-string-face.cur |
| 26e0 | 72 74 65 78 74 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | rtext))))))..................... |
| 2700 | 28 72 65 70 6c 61 63 65 2d 6d 61 74 63 68 20 63 75 72 72 74 65 78 74 20 74 20 74 29 29 29 0a 20 | (replace-match.currtext.t.t))).. |
| 2720 | 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 62 65 67 69 6e 29 29 29 29 0a 0a 28 64 65 66 76 | .....(goto-char.begin))))..(defv |
| 2740 | 61 72 20 6c 6f 67 34 65 2d 2d 63 75 72 72 65 6e 74 2d 6d 73 67 2d 62 75 66 66 65 72 20 6e 69 6c | ar.log4e--current-msg-buffer.nil |
| 2760 | 29 0a 0a 3b 3b 20 57 65 20 6e 65 65 64 73 20 74 68 69 73 20 73 69 67 6e 61 74 75 72 65 20 62 65 | )..;;.We.needs.this.signature.be |
| 2780 | 20 73 74 61 79 20 66 6f 72 20 6f 74 68 65 72 20 63 6f 6d 70 69 6c 65 64 20 70 6c 75 67 69 6e 73 | .stay.for.other.compiled.plugins |
| 27a0 | 20 75 73 69 6e 67 20 6f 6c 64 20 76 65 72 73 69 6f 6e 0a 28 64 65 66 75 6e 20 6c 6f 67 34 65 2d | .using.old.version.(defun.log4e- |
| 27c0 | 2d 6c 6f 67 67 69 6e 67 20 28 62 75 66 66 6e 6d 20 63 6f 64 73 79 73 20 6c 6f 67 74 6d 70 6c 20 | -logging.(buffnm.codsys.logtmpl. |
| 27e0 | 74 69 6d 65 74 6d 70 6c 20 6d 69 6e 6c 65 76 65 6c 20 6d 61 78 6c 65 76 65 6c 20 6c 6f 67 67 69 | timetmpl.minlevel.maxlevel.loggi |
| 2800 | 6e 67 2d 70 20 6c 65 76 65 6c 20 6d 73 67 20 26 72 65 73 74 20 6d 73 67 61 72 67 73 29 0a 20 20 | ng-p.level.msg.&rest.msgargs)... |
| 2820 | 28 77 68 65 6e 20 28 61 6e 64 20 6c 6f 67 67 69 6e 67 2d 70 0a 20 20 20 20 20 20 20 20 20 20 20 | (when.(and.logging-p............ |
| 2840 | 20 20 28 6c 6f 67 34 65 2d 2d 6c 6f 67 67 69 6e 67 2d 6c 65 76 65 6c 2d 70 20 6d 69 6e 6c 65 76 | ..(log4e--logging-level-p.minlev |
| 2860 | 65 6c 20 6d 61 78 6c 65 76 65 6c 20 6c 65 76 65 6c 29 29 0a 20 20 20 20 28 73 61 76 65 2d 6d 61 | el.maxlevel.level)).....(save-ma |
| 2880 | 74 63 68 2d 64 61 74 61 0a 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 | tch-data.......(with-current-buf |
| 28a0 | 66 65 72 20 28 6c 6f 67 34 65 2d 2d 67 65 74 2d 6f 72 2d 63 72 65 61 74 65 2d 6c 6f 67 2d 62 75 | fer.(log4e--get-or-create-log-bu |
| 28c0 | 66 66 65 72 20 62 75 66 66 6e 6d 20 63 6f 64 73 79 73 29 0a 20 20 20 20 20 20 20 20 28 67 6f 74 | ffer.buffnm.codsys).........(got |
| 28e0 | 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 20 20 20 20 20 20 20 20 28 6c 65 74 | o-char.(point-max)).........(let |
| 2900 | 2a 20 28 28 62 75 66 66 65 72 2d 72 65 61 64 2d 6f 6e 6c 79 20 6e 69 6c 29 0a 20 20 20 20 20 20 | *.((buffer-read-only.nil)....... |
| 2920 | 20 20 20 20 20 20 20 20 20 28 62 65 67 69 6e 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 | .........(begin.(point))........ |
| 2940 | 20 20 20 20 20 20 20 20 28 63 75 72 72 6c 6f 67 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 | ........(currlog.(progn......... |
| 2960 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 34 65 2d 2d 69 6e 73 65 72 74 | ..................(log4e--insert |
| 2980 | 2d 6c 6f 67 20 6c 6f 67 74 6d 70 6c 20 74 69 6d 65 74 6d 70 6c 20 6c 65 76 65 6c 20 6d 73 67 20 | -log.logtmpl.timetmpl.level.msg. |
| 29a0 | 6d 73 67 61 72 67 73 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | msgargs.t)...................... |
| 29c0 | 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 20 20 20 | .....(goto-char.(point-max)).... |
| 29e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 2d 73 | .......................(buffer-s |
| 2a00 | 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 62 65 67 69 6e 20 28 70 6f | ubstring-no-properties.begin.(po |
| 2a20 | 69 6e 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 73 67 62 75 66 20 28 | int))))................(msgbuf.( |
| 2a40 | 6f 72 20 28 77 68 65 6e 20 28 61 6e 64 20 6c 6f 67 34 65 2d 2d 63 75 72 72 65 6e 74 2d 6d 73 67 | or.(when.(and.log4e--current-msg |
| 2a60 | 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | -buffer......................... |
| 2a80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 65 71 20 6c 6f 67 34 65 2d 2d 63 75 | ..............(not.(eq.log4e--cu |
| 2aa0 | 72 72 65 6e 74 2d 6d 73 67 2d 62 75 66 66 65 72 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 | rrent-msg-buffer.t)))........... |
| 2ac0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 67 6e 6f 72 65 2d 65 72 72 6f 72 | ...................(ignore-error |
| 2ae0 | 73 20 28 67 65 74 2d 62 75 66 66 65 72 20 6c 6f 67 34 65 2d 2d 63 75 72 72 65 6e 74 2d 6d 73 67 | s.(get-buffer.log4e--current-msg |
| 2b00 | 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | -buffer)))...................... |
| 2b20 | 20 20 20 20 20 20 6c 6f 67 34 65 2d 2d 63 75 72 72 65 6e 74 2d 6d 73 67 2d 62 75 66 66 65 72 29 | ......log4e--current-msg-buffer) |
| 2b40 | 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 6d 73 67 62 75 66 0a 20 20 20 20 20 20 | ))...........(when.msgbuf....... |
| 2b60 | 20 20 20 20 20 20 28 6c 65 74 20 28 28 73 74 61 6e 64 61 72 64 2d 6f 75 74 70 75 74 20 28 69 66 | ......(let.((standard-output.(if |
| 2b80 | 20 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 20 6d 73 67 62 75 66 29 0a 20 20 20 20 20 20 20 20 | .(buffer-live-p.msgbuf)......... |
| 2ba0 | 20 20 20 20 20 20 20 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 | ...............................m |
| 2bc0 | 73 67 62 75 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 | sgbuf........................... |
| 2be0 | 20 20 20 20 20 20 20 20 20 20 20 73 74 61 6e 64 61 72 64 2d 6f 75 74 70 75 74 29 29 29 0a 20 20 | ...........standard-output)))... |
| 2c00 | 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 69 6e 63 20 63 75 72 72 6c 6f 67 29 29 29 29 0a 20 | ............(princ.currlog)))).. |
| 2c20 | 20 20 20 20 20 20 20 6e 69 6c 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 6c 6f 67 34 65 2d 2d 67 65 | .......nil))))..(defun.log4e--ge |
| 2c40 | 74 2d 63 75 72 72 65 6e 74 2d 6c 6f 67 2d 6c 69 6e 65 2d 6c 65 76 65 6c 20 28 29 0a 20 20 28 73 | t-current-log-line-level.()...(s |
| 2c60 | 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 28 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d | ave-excursion.....(beginning-of- |
| 2c80 | 6c 69 6e 65 29 0a 20 20 20 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 28 70 6f | line).....(get-text-property.(po |
| 2ca0 | 69 6e 74 29 20 27 6c 6f 67 34 65 2d 2d 6c 65 76 65 6c 29 29 29 0a 0a 3b 3b 20 57 65 20 6e 65 65 | int).'log4e--level)))..;;.We.nee |
| 2cc0 | 64 73 20 74 68 69 73 20 73 69 67 6e 61 74 75 72 65 20 62 65 20 73 74 61 79 20 66 6f 72 20 6f 74 | ds.this.signature.be.stay.for.ot |
| 2ce0 | 68 65 72 20 70 6c 75 67 69 6e 73 20 63 6f 6d 70 69 6c 65 64 20 77 69 74 68 20 74 68 69 73 20 6f | her.plugins.compiled.with.this.o |
| 2d00 | 6c 64 20 76 65 72 73 69 6f 6e 0a 28 64 65 66 75 6e 20 6c 6f 67 34 65 2d 2d 63 6c 65 61 72 2d 6c | ld.version.(defun.log4e--clear-l |
| 2d20 | 6f 67 20 28 62 75 66 66 6e 6d 29 0a 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 | og.(buffnm)...(with-current-buff |
| 2d40 | 65 72 20 28 6c 6f 67 34 65 2d 2d 67 65 74 2d 6f 72 2d 63 72 65 61 74 65 2d 6c 6f 67 2d 62 75 66 | er.(log4e--get-or-create-log-buf |
| 2d60 | 66 65 72 20 62 75 66 66 6e 6d 29 0a 20 20 20 20 28 73 65 74 71 20 62 75 66 66 65 72 2d 72 65 61 | fer.buffnm).....(setq.buffer-rea |
| 2d80 | 64 2d 6f 6e 6c 79 20 6e 69 6c 29 0a 20 20 20 20 28 65 72 61 73 65 2d 62 75 66 66 65 72 29 29 29 | d-only.nil).....(erase-buffer))) |
| 2da0 | 0a 0a 3b 3b 20 57 65 20 6e 65 65 64 73 20 74 68 69 73 20 73 69 67 6e 61 74 75 72 65 20 62 65 20 | ..;;.We.needs.this.signature.be. |
| 2dc0 | 73 74 61 79 20 66 6f 72 20 6f 74 68 65 72 20 70 6c 75 67 69 6e 73 20 63 6f 6d 70 69 6c 65 64 20 | stay.for.other.plugins.compiled. |
| 2de0 | 77 69 74 68 20 74 68 69 73 20 6f 6c 64 20 76 65 72 73 69 6f 6e 0a 28 64 65 66 75 6e 20 6c 6f 67 | with.this.old.version.(defun.log |
| 2e00 | 34 65 2d 2d 6f 70 65 6e 2d 6c 6f 67 20 28 62 75 66 66 6e 6d 29 0a 20 20 28 6c 65 74 2a 20 28 28 | 4e--open-log.(buffnm)...(let*.(( |
| 2e20 | 62 75 66 66 20 28 67 65 74 2d 62 75 66 66 65 72 20 62 75 66 66 6e 6d 29 29 29 0a 20 20 20 20 28 | buff.(get-buffer.buffnm))).....( |
| 2e40 | 69 66 20 28 6e 6f 74 20 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 20 62 75 66 66 29 29 0a 20 20 | if.(not.(buffer-live-p.buff))... |
| 2e60 | 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 5b 4c 6f 67 34 45 5d 20 4e 6f 74 20 65 78 69 73 | ......(message."[Log4E].Not.exis |
| 2e80 | 74 20 6c 6f 67 20 62 75 66 66 65 72 2e 22 29 0a 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 | t.log.buffer.").......(with-curr |
| 2ea0 | 65 6e 74 2d 62 75 66 66 65 72 20 62 75 66 66 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 62 75 | ent-buffer.buff.........(setq.bu |
| 2ec0 | 66 66 65 72 2d 72 65 61 64 2d 6f 6e 6c 79 20 74 29 29 0a 20 20 20 20 20 20 28 70 6f 70 2d 74 6f | ffer-read-only.t)).......(pop-to |
| 2ee0 | 2d 62 75 66 66 65 72 20 62 75 66 66 29 29 29 29 0a 0a 3b 3b 20 57 65 20 6e 65 65 64 73 20 74 68 | -buffer.buff))))..;;.We.needs.th |
| 2f00 | 69 73 20 73 69 67 6e 61 74 75 72 65 20 62 65 20 73 74 61 79 20 66 6f 72 20 6f 74 68 65 72 20 70 | is.signature.be.stay.for.other.p |
| 2f20 | 6c 75 67 69 6e 73 20 63 6f 6d 70 69 6c 65 64 20 77 69 74 68 20 74 68 69 73 20 6f 6c 64 20 76 65 | lugins.compiled.with.this.old.ve |
| 2f40 | 72 73 69 6f 6e 0a 28 64 65 66 75 6e 20 6c 6f 67 34 65 2d 2d 6f 70 65 6e 2d 6c 6f 67 2d 69 66 2d | rsion.(defun.log4e--open-log-if- |
| 2f60 | 64 65 62 75 67 20 28 62 75 66 66 6e 6d 20 64 62 67 29 0a 20 20 28 77 68 65 6e 20 64 62 67 0a 20 | debug.(buffnm.dbg)...(when.dbg.. |
| 2f80 | 20 20 20 28 6c 6f 67 34 65 2d 2d 6f 70 65 6e 2d 6c 6f 67 20 62 75 66 66 6e 6d 29 29 29 0a 0a 3b | ...(log4e--open-log.buffnm)))..; |
| 2fa0 | 3b 20 28 64 65 66 75 6e 20 6c 6f 67 34 65 2d 2d 73 65 6e 64 2d 72 65 70 6f 72 74 2d 69 66 2d 6e | ;.(defun.log4e--send-report-if-n |
| 2fc0 | 6f 74 2d 64 65 62 75 67 20 28 62 75 66 66 6e 6d 20 64 62 67 20 61 64 64 72 20 70 72 65 66 69 78 | ot-debug.(buffnm.dbg.addr.prefix |
| 2fe0 | 29 0a 3b 3b 20 20 20 28 6c 65 74 2a 20 28 28 62 75 66 66 20 28 67 65 74 2d 62 75 66 66 65 72 20 | ).;;...(let*.((buff.(get-buffer. |
| 3000 | 62 75 66 66 6e 6d 29 29 29 0a 3b 3b 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 6e 6f 74 | buffnm))).;;.....(when.(and.(not |
| 3020 | 20 64 62 67 29 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 70 | .dbg).;;................(stringp |
| 3040 | 20 61 64 64 72 29 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 | .addr).;;................(buffer |
| 3060 | 2d 6c 69 76 65 2d 70 20 62 75 66 66 29 29 0a 3b 3b 20 20 20 20 20 20 20 28 72 65 70 6f 72 74 65 | -live-p.buff)).;;.......(reporte |
| 3080 | 72 2d 73 75 62 6d 69 74 2d 62 75 67 2d 72 65 70 6f 72 74 20 61 64 64 72 20 70 72 65 66 69 78 20 | r-submit-bug-report.addr.prefix. |
| 30a0 | 6e 69 6c 20 6e 69 6c 20 6e 69 6c 20 6e 69 6c 29 29 29 29 0a 0a 0a 28 64 65 66 6d 61 63 72 6f 20 | nil.nil.nil.nil))))...(defmacro. |
| 30c0 | 6c 6f 67 34 65 3a 64 65 66 6c 6f 67 67 65 72 20 28 70 72 65 66 69 78 20 6d 73 67 74 6d 70 6c 20 | log4e:deflogger.(prefix.msgtmpl. |
| 30e0 | 74 69 6d 65 74 6d 70 6c 20 26 6f 70 74 69 6f 6e 61 6c 20 6c 6f 67 2d 66 75 6e 63 74 69 6f 6e 2d | timetmpl.&optional.log-function- |
| 3100 | 6e 61 6d 65 2d 63 75 73 74 6f 6d 2d 61 6c 69 73 74 29 0a 20 20 22 44 65 66 69 6e 65 20 74 68 65 | name-custom-alist)..."Define.the |
| 3120 | 20 66 75 6e 63 74 69 6f 6e 73 20 6f 66 20 6c 6f 67 67 69 6e 67 20 66 6f 72 20 79 6f 75 72 20 65 | .functions.of.logging.for.your.e |
| 3140 | 6c 69 73 70 2e 0a 0a 53 70 65 63 69 66 69 63 61 74 69 6f 6e 3a 0a 20 54 68 65 20 66 6f 6c 6c 6f | lisp...Specification:..The.follo |
| 3160 | 77 69 6e 67 20 66 65 61 74 75 72 65 73 20 61 72 65 20 70 72 6f 76 69 64 65 64 20 62 79 20 65 76 | wing.features.are.provided.by.ev |
| 3180 | 61 6c 75 61 74 69 6e 67 20 74 68 69 73 2e 0a 20 2d 20 64 6f 20 6c 6f 67 67 69 6e 67 20 66 6f 72 | aluating.this...-.do.logging.for |
| 31a0 | 20 65 61 63 68 20 6c 6f 67 20 6c 65 76 65 6c 2e 0a 20 2d 20 73 65 74 20 6d 61 78 20 61 6e 64 20 | .each.log.level...-.set.max.and. |
| 31c0 | 6d 69 6e 20 6c 6f 67 20 6c 65 76 65 6c 2e 0a 20 2d 20 73 77 69 74 63 68 20 6c 6f 67 67 69 6e 67 | min.log.level...-.switch.logging |
| 31e0 | 2e 0a 20 2d 20 73 77 69 74 63 68 20 64 65 62 75 67 67 69 6e 67 2e 0a 20 2d 20 6f 70 65 6e 20 61 | ...-.switch.debugging...-.open.a |
| 3200 | 6e 64 20 63 6c 65 61 72 20 6c 6f 67 20 62 75 66 66 65 72 2e 0a 20 2d 20 73 65 6e 64 20 62 75 67 | nd.clear.log.buffer...-.send.bug |
| 3220 | 20 72 65 70 6f 72 74 20 66 6f 72 20 79 6f 75 2e 0a 20 46 6f 72 20 64 65 74 61 69 6c 73 2c 20 73 | .report.for.you...For.details,.s |
| 3240 | 65 65 20 46 75 6e 63 74 69 6f 6e 73 20 73 65 63 74 69 6f 6e 2e 0a 0a 41 72 67 75 6d 65 6e 74 3a | ee.Functions.section...Argument: |
| 3260 | 0a 20 2d 20 50 52 45 46 49 58 20 69 73 20 73 74 72 69 6e 67 20 61 73 20 79 6f 75 72 20 65 6c 69 | ..-.PREFIX.is.string.as.your.eli |
| 3280 | 73 70 20 70 72 65 66 69 78 2e 0a 20 2d 20 4d 53 47 54 4d 50 4c 20 69 73 20 73 74 72 69 6e 67 20 | sp.prefix...-.MSGTMPL.is.string. |
| 32a0 | 61 73 20 66 6f 72 6d 61 74 20 6f 66 20 6c 6f 67 2e 0a 20 20 20 2d 20 25 74 20 3a 20 52 65 70 6c | as.format.of.log.....-.%t.:.Repl |
| 32c0 | 61 63 65 64 20 77 69 74 68 20 74 69 6d 65 20 73 74 72 69 6e 67 2e 20 41 62 6f 75 74 20 69 74 2c | aced.with.time.string..About.it, |
| 32e0 | 20 73 65 65 20 54 49 4d 45 54 4d 50 4c 20 61 72 67 75 6d 65 6e 74 2e 0a 20 20 20 2d 20 25 6c 20 | .see.TIMETMPL.argument.....-.%l. |
| 3300 | 3a 20 52 65 70 6c 61 63 65 64 20 77 69 74 68 20 6c 6f 67 20 6c 65 76 65 6c 20 74 68 61 74 27 73 | :.Replaced.with.log.level.that's |
| 3320 | 20 54 52 41 43 45 2c 20 44 45 42 55 47 2c 20 49 4e 46 4f 2c 20 57 41 52 4e 2c 20 45 52 52 4f 52 | .TRACE,.DEBUG,.INFO,.WARN,.ERROR |
| 3340 | 2c 20 46 41 54 41 4c 2e 0a 20 20 20 2d 20 25 6d 20 3a 20 52 65 70 6c 61 63 65 64 20 77 69 74 68 | ,.FATAL.....-.%m.:.Replaced.with |
| 3360 | 20 6c 6f 67 20 6d 65 73 73 61 67 65 20 74 68 61 74 20 70 61 73 73 65 64 20 62 79 20 79 6f 75 2e | .log.message.that.passed.by.you. |
| 3380 | 0a 20 2d 20 54 49 4d 45 54 4d 50 4c 20 69 73 20 73 74 72 69 6e 67 20 61 73 20 66 6f 72 6d 61 74 | ..-.TIMETMPL.is.string.as.format |
| 33a0 | 20 6f 66 20 74 69 6d 65 20 74 68 61 74 27 73 20 70 61 73 73 65 64 20 74 6f 20 60 66 6f 72 6d 61 | .of.time.that's.passed.to.`forma |
| 33c0 | 74 2d 74 69 6d 65 2d 73 74 72 69 6e 67 27 2e 0a 20 2d 20 4c 4f 47 2d 46 55 4e 43 54 49 4f 4e 2d | t-time-string'...-.LOG-FUNCTION- |
| 33e0 | 4e 41 4d 45 2d 43 55 53 54 4f 4d 2d 41 4c 49 53 54 20 69 73 20 61 6c 69 73 74 20 61 73 20 74 68 | NAME-CUSTOM-ALIST.is.alist.as.th |
| 3400 | 65 20 66 75 6e 63 74 69 6f 6e 20 6e 61 6d 65 20 6f 66 20 6c 6f 67 67 69 6e 67 2e 0a 20 20 20 2d | e.function.name.of.logging.....- |
| 3420 | 20 49 66 20 74 68 69 73 20 76 61 6c 75 65 20 69 73 20 6e 69 6c 2c 20 64 65 66 69 6e 65 20 74 68 | .If.this.value.is.nil,.define.th |
| 3440 | 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 66 75 6e 63 74 69 6f 6e 73 2e 0a 20 20 20 20 20 20 79 6f 75 | e.following.functions........you |
| 3460 | 72 70 72 65 66 69 78 2d 2d 6c 6f 67 2d 74 72 61 63 65 0a 20 20 20 20 20 20 79 6f 75 72 70 72 65 | rprefix--log-trace.......yourpre |
| 3480 | 66 69 78 2d 2d 6c 6f 67 2d 64 65 62 75 67 0a 20 20 20 20 20 20 2e 2e 2e 0a 20 20 20 20 20 20 79 | fix--log-debug.................y |
| 34a0 | 6f 75 72 70 72 65 66 69 78 2d 2d 6c 6f 67 2d 66 61 74 61 6c 0a 20 20 20 2d 20 49 66 20 79 6f 75 | ourprefix--log-fatal....-.If.you |
| 34c0 | 20 77 61 6e 74 20 74 6f 20 63 75 73 74 6f 6d 20 74 68 65 20 6e 61 6d 65 20 6f 66 20 74 68 65 6d | .want.to.custom.the.name.of.them |
| 34e0 | 2c 20 67 69 76 65 20 6c 69 6b 65 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 76 61 6c 75 65 2e | ,.give.like.the.following.value. |
| 3500 | 0a 20 20 20 20 20 20 5c 5c 3d 27 28 28 66 61 74 61 6c 20 2e 20 5c 22 66 61 74 61 6c 5c 22 29 0a | .......\\='((fatal...\"fatal\"). |
| 3520 | 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 2e 20 5c 22 65 72 72 6f 72 5c 22 29 0a 20 20 20 20 | ........(error...\"error\")..... |
| 3540 | 20 20 20 20 28 77 61 72 6e 20 20 2e 20 5c 22 77 61 72 6e 5c 22 29 0a 20 20 20 20 20 20 20 20 28 | ....(warn....\"warn\").........( |
| 3560 | 69 6e 66 6f 20 20 2e 20 5c 22 69 6e 66 6f 5c 22 29 0a 20 20 20 20 20 20 20 20 28 64 65 62 75 67 | info....\"info\").........(debug |
| 3580 | 20 2e 20 5c 22 64 65 62 75 67 5c 22 29 0a 20 20 20 20 20 20 20 20 28 74 72 61 63 65 20 2e 20 5c | ...\"debug\").........(trace...\ |
| 35a0 | 22 74 72 61 63 65 5c 22 29 29 0a 20 20 20 20 20 54 68 65 6e 2c 20 64 65 66 69 6e 65 20 74 68 65 | "trace\"))......Then,.define.the |
| 35c0 | 20 66 6f 6c 6c 6f 77 69 6e 67 20 66 75 6e 63 74 69 6f 6e 73 2e 0a 20 20 20 20 20 20 79 6f 75 72 | .following.functions........your |
| 35e0 | 70 72 65 66 69 78 2d 2d 74 72 61 63 65 0a 20 20 20 20 20 20 79 6f 75 72 70 72 65 66 69 78 2d 2d | prefix--trace.......yourprefix-- |
| 3600 | 64 65 62 75 67 0a 20 20 20 20 20 20 2e 2e 2e 0a 20 20 20 20 20 20 79 6f 75 72 70 72 65 66 69 78 | debug.................yourprefix |
| 3620 | 2d 2d 66 61 74 61 6c 0a 0a 46 75 6e 63 74 69 6f 6e 73 3a 0a 20 4c 69 73 74 20 61 6c 6c 20 66 75 | --fatal..Functions:..List.all.fu |
| 3640 | 6e 63 74 69 6f 6e 73 20 64 65 66 69 6e 65 64 20 62 65 6c 6f 77 2e 20 50 52 45 46 49 58 20 69 73 | nctions.defined.below..PREFIX.is |
| 3660 | 20 79 6f 75 72 20 70 72 65 66 69 78 2e 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 66 61 74 | .your.prefix...-.PREFIX--log-fat |
| 3680 | 61 6c 20 20 20 20 2e 2e 2e 20 23 31 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 65 72 72 6f | al........#1..-.PREFIX--log-erro |
| 36a0 | 72 20 20 20 20 2e 2e 2e 20 23 31 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 77 61 72 6e 20 | r........#1..-.PREFIX--log-warn. |
| 36c0 | 20 20 20 20 2e 2e 2e 20 23 31 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 69 6e 66 6f 20 20 | ........#1..-.PREFIX--log-info.. |
| 36e0 | 20 20 20 2e 2e 2e 20 23 31 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 64 65 62 75 67 20 20 | .......#1..-.PREFIX--log-debug.. |
| 3700 | 20 20 2e 2e 2e 20 23 31 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 74 72 61 63 65 20 20 20 | ......#1..-.PREFIX--log-trace... |
| 3720 | 20 2e 2e 2e 20 23 31 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 66 61 74 61 6c 2a 20 20 20 | .....#1..-.PREFIX--log-fatal*... |
| 3740 | 2e 2e 2e 20 23 32 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 65 72 72 6f 72 2a 20 20 20 2e | ....#2..-.PREFIX--log-error*.... |
| 3760 | 2e 2e 20 23 32 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 77 61 72 6e 2a 20 20 20 20 2e 2e | ...#2..-.PREFIX--log-warn*...... |
| 3780 | 2e 20 23 32 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 69 6e 66 6f 2a 20 20 20 20 2e 2e 2e | ..#2..-.PREFIX--log-info*....... |
| 37a0 | 20 23 32 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 64 65 62 75 67 2a 20 20 20 2e 2e 2e 20 | .#2..-.PREFIX--log-debug*....... |
| 37c0 | 23 32 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 74 72 61 63 65 2a 20 20 20 2e 2e 2e 20 23 | #2..-.PREFIX--log-trace*.......# |
| 37e0 | 32 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d | 2..-.PREFIX--log..-.PREFIX--log- |
| 3800 | 73 65 74 2d 6c 65 76 65 6c 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 65 6e 61 62 6c 65 2d | set-level..-.PREFIX--log-enable- |
| 3820 | 6c 6f 67 67 69 6e 67 20 20 20 20 20 20 20 20 20 20 20 20 2e 2e 2e 20 23 33 0a 20 2d 20 50 52 45 | logging................#3..-.PRE |
| 3840 | 46 49 58 2d 2d 6c 6f 67 2d 64 69 73 61 62 6c 65 2d 6c 6f 67 67 69 6e 67 20 20 20 20 20 20 20 20 | FIX--log-disable-logging........ |
| 3860 | 20 20 20 2e 2e 2e 20 23 33 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 65 6e 61 62 6c 65 2d | .......#3..-.PREFIX--log-enable- |
| 3880 | 6d 65 73 73 61 67 69 6e 67 20 20 20 20 20 20 20 20 20 20 2e 2e 2e 20 23 33 0a 20 2d 20 50 52 45 | messaging..............#3..-.PRE |
| 38a0 | 46 49 58 2d 2d 6c 6f 67 2d 64 69 73 61 62 6c 65 2d 6d 65 73 73 61 67 69 6e 67 20 20 20 20 20 20 | FIX--log-disable-messaging...... |
| 38c0 | 20 20 20 2e 2e 2e 20 23 33 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 65 6e 61 62 6c 65 2d | .......#3..-.PREFIX--log-enable- |
| 38e0 | 64 65 62 75 67 67 69 6e 67 20 20 20 20 20 20 20 20 20 20 2e 2e 2e 20 23 33 0a 20 2d 20 50 52 45 | debugging..............#3..-.PRE |
| 3900 | 46 49 58 2d 2d 6c 6f 67 2d 64 69 73 61 62 6c 65 2d 64 65 62 75 67 67 69 6e 67 20 20 20 20 20 20 | FIX--log-disable-debugging...... |
| 3920 | 20 20 20 2e 2e 2e 20 23 33 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 64 65 62 75 67 67 69 | .......#3..-.PREFIX--log-debuggi |
| 3940 | 6e 67 2d 70 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 73 65 74 2d 63 6f 64 69 6e 67 2d 73 | ng-p..-.PREFIX--log-set-coding-s |
| 3960 | 79 73 74 65 6d 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 73 65 74 2d 61 75 74 68 6f 72 2d | ystem..-.PREFIX--log-set-author- |
| 3980 | 6d 61 69 6c 2d 61 64 64 72 65 73 73 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 63 6c 65 61 | mail-address..-.PREFIX--log-clea |
| 39a0 | 72 2d 6c 6f 67 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 2e 2e 20 23 33 0a 20 2d 20 | r-log.....................#3..-. |
| 39c0 | 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 6f 70 65 6e 2d 6c 6f 67 20 20 20 20 20 20 20 20 20 20 20 20 | PREFIX--log-open-log............ |
| 39e0 | 20 20 20 20 20 20 2e 2e 2e 20 23 33 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 6f 70 65 6e | ..........#3..-.PREFIX--log-open |
| 3a00 | 2d 6c 6f 67 2d 69 66 2d 64 65 62 75 67 0a 0a 20 23 31 20 3a 20 59 6f 75 20 63 61 6e 20 63 75 73 | -log-if-debug...#1.:.You.can.cus |
| 3a20 | 74 6f 6d 69 7a 65 20 74 68 69 73 20 6e 61 6d 65 0a 20 23 32 20 3a 20 4e 61 6d 65 20 69 73 20 61 | tomize.this.name..#2.:.Name.is.a |
| 3a40 | 20 23 31 20 6e 61 6d 65 20 2b 20 5c 22 2a 5c 22 0a 20 23 33 20 3a 20 54 68 69 73 20 69 73 20 63 | .#1.name.+.\"*\"..#3.:.This.is.c |
| 3a60 | 6f 6d 6d 61 6e 64 0a 0a 45 78 61 6d 70 6c 65 3a 0a 3b 3b 20 49 66 20 79 6f 75 20 64 65 76 65 6c | ommand..Example:.;;.If.you.devel |
| 3a80 | 6f 70 20 65 6c 69 73 70 20 74 68 61 74 20 68 61 73 20 70 72 65 66 69 78 20 5c 22 68 6f 67 65 5c | op.elisp.that.has.prefix.\"hoge\ |
| 3aa0 | 22 2c 0a 3b 3b 20 77 72 69 74 65 20 61 6e 64 20 65 76 61 6c 20 74 68 65 20 66 6f 6c 6c 6f 77 69 | ",.;;.write.and.eval.the.followi |
| 3ac0 | 6e 67 20 73 65 78 70 20 69 6e 20 79 6f 75 72 20 65 6c 69 73 70 20 66 69 6c 65 2e 0a 0a 20 28 72 | ng.sexp.in.your.elisp.file....(r |
| 3ae0 | 65 71 75 69 72 65 20 5c 5c 3d 27 6c 6f 67 34 65 29 0a 20 28 6c 6f 67 34 65 3a 64 65 66 6c 6f 67 | equire.\\='log4e)..(log4e:deflog |
| 3b00 | 67 65 72 20 5c 22 68 6f 67 65 5c 22 20 5c 22 25 74 20 5b 25 6c 5d 20 25 6d 5c 22 20 5c 22 25 48 | ger.\"hoge\".\"%t.[%l].%m\".\"%H |
| 3b20 | 3a 25 4d 3a 25 53 5c 22 29 0a 0a 3b 3b 20 45 76 61 6c 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 | :%M:%S\")..;;.Eval.the.following |
| 3b40 | 0a 20 28 68 6f 67 65 2d 2d 6c 6f 67 2d 65 6e 61 62 6c 65 2d 6c 6f 67 67 69 6e 67 29 0a 0a 3b 3b | ..(hoge--log-enable-logging)..;; |
| 3b60 | 20 54 68 65 6e 2c 20 77 72 69 74 65 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 0a 0a 20 28 64 65 | .Then,.write.the.following...(de |
| 3b80 | 66 75 6e 20 68 6f 67 65 2d 64 6f 2d 68 6f 67 65 20 28 68 6f 67 65 29 0a 20 20 20 28 69 66 20 28 | fun.hoge-do-hoge.(hoge)....(if.( |
| 3ba0 | 6e 6f 74 20 28 73 74 72 69 6e 67 70 20 68 6f 67 65 29 29 0a 20 20 20 20 20 20 20 28 68 6f 67 65 | not.(stringp.hoge))........(hoge |
| 3bc0 | 2d 2d 6c 6f 67 2d 66 61 74 61 6c 20 5c 22 66 61 69 6c 65 64 20 64 6f 20 68 6f 67 65 20 3a 20 68 | --log-fatal.\"failed.do.hoge.:.h |
| 3be0 | 6f 67 65 20 69 73 20 25 73 5c 22 20 68 6f 67 65 29 0a 20 20 20 20 20 28 68 6f 67 65 2d 2d 6c 6f | oge.is.%s\".hoge)......(hoge--lo |
| 3c00 | 67 2d 64 65 62 75 67 20 5c 22 73 74 61 72 74 20 64 6f 20 68 6f 67 65 20 61 62 6f 75 74 20 25 73 | g-debug.\"start.do.hoge.about.%s |
| 3c20 | 5c 22 20 68 6f 67 65 29 0a 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 5c 22 68 6f 67 65 21 5c 22 | \".hoge)......(message.\"hoge!\" |
| 3c40 | 29 0a 20 20 20 20 20 28 68 6f 67 65 2d 2d 6c 6f 67 2d 69 6e 66 6f 20 5c 22 64 6f 6e 65 20 68 6f | )......(hoge--log-info.\"done.ho |
| 3c60 | 67 65 20 61 62 6f 75 74 20 25 73 5c 22 20 68 6f 67 65 29 29 29 0a 0a 3b 3b 20 45 76 61 6c 20 74 | ge.about.%s\".hoge)))..;;.Eval.t |
| 3c80 | 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 0a 20 28 68 6f 67 65 2d 64 6f 2d 68 6f 67 65 20 5c 22 48 4f | he.following..(hoge-do-hoge.\"HO |
| 3ca0 | 47 45 47 45 5c 22 29 0a 0a 3b 3b 20 44 6f 20 4d 2d 78 20 68 6f 67 65 2d 2d 6c 6f 67 2d 6f 70 65 | GEGE\")..;;.Do.M-x.hoge--log-ope |
| 3cc0 | 6e 2d 6c 6f 67 0a 3b 3b 20 4f 70 65 6e 20 74 68 65 20 62 75 66 66 65 72 20 77 68 69 63 68 20 6e | n-log.;;.Open.the.buffer.which.n |
| 3ce0 | 61 6d 65 20 69 73 20 5c 22 20 2a 6c 6f 67 34 65 2d 68 6f 67 65 2a 5c 22 2e 20 54 68 65 20 62 75 | ame.is.\".*log4e-hoge*\"..The.bu |
| 3d00 | 66 66 65 72 20 73 74 72 69 6e 67 20 69 73 20 62 65 6c 6f 77 0a 31 32 3a 33 34 3a 35 36 20 5b 49 | ffer.string.is.below.12:34:56.[I |
| 3d20 | 4e 46 4f 20 5d 20 64 6f 6e 65 20 68 6f 67 65 20 61 62 6f 75 74 20 48 4f 47 45 47 45 0a 0a 3b 3b | NFO.].done.hoge.about.HOGEGE..;; |
| 3d40 | 20 45 76 61 6c 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 0a 20 28 68 6f 67 65 2d 2d 6c 6f 67 2d | .Eval.the.following..(hoge--log- |
| 3d60 | 73 65 74 2d 6c 65 76 65 6c 20 5c 5c 3d 27 74 72 61 63 65 29 0a 20 28 68 6f 67 65 2d 64 6f 2d 68 | set-level.\\='trace)..(hoge-do-h |
| 3d80 | 6f 67 65 20 5c 22 46 55 47 41 47 41 5c 22 29 0a 0a 3b 3b 20 44 6f 20 4d 2d 78 20 68 6f 67 65 2d | oge.\"FUGAGA\")..;;.Do.M-x.hoge- |
| 3da0 | 2d 6c 6f 67 2d 6f 70 65 6e 2d 6c 6f 67 0a 3b 3b 20 4f 70 65 6e 20 74 68 65 20 62 75 66 66 65 72 | -log-open-log.;;.Open.the.buffer |
| 3dc0 | 2e 20 69 74 73 20 73 74 72 69 6e 67 20 69 73 20 62 65 6c 6f 77 0a 31 32 3a 33 34 3a 35 36 20 5b | ..its.string.is.below.12:34:56.[ |
| 3de0 | 49 4e 46 4f 20 5d 20 64 6f 6e 65 20 68 6f 67 65 20 61 62 6f 75 74 20 48 4f 47 45 47 45 0a 31 32 | INFO.].done.hoge.about.HOGEGE.12 |
| 3e00 | 3a 33 35 3a 34 33 20 5b 44 45 42 55 47 5d 20 73 74 61 72 74 20 64 6f 20 68 6f 67 65 20 61 62 6f | :35:43.[DEBUG].start.do.hoge.abo |
| 3e20 | 75 74 20 46 55 47 41 47 41 0a 31 32 3a 33 35 3a 34 33 20 5b 49 4e 46 4f 20 5d 20 64 6f 6e 65 20 | ut.FUGAGA.12:35:43.[INFO.].done. |
| 3e40 | 68 6f 67 65 20 61 62 6f 75 74 20 46 55 47 41 47 41 0a 20 0a 22 0a 20 20 28 64 65 63 6c 61 72 65 | hoge.about.FUGAGA..."...(declare |
| 3e60 | 20 28 69 6e 64 65 6e 74 20 30 29 29 0a 20 20 28 69 66 20 28 6f 72 20 28 6e 6f 74 20 28 73 74 72 | .(indent.0))...(if.(or.(not.(str |
| 3e80 | 69 6e 67 70 20 70 72 65 66 69 78 29 29 20 20 20 28 73 74 72 69 6e 67 3d 20 70 72 65 66 69 78 20 | ingp.prefix))...(string=.prefix. |
| 3ea0 | 22 22 29 0a 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 73 74 72 69 6e 67 70 20 6d 73 67 74 | "")...........(not.(stringp.msgt |
| 3ec0 | 6d 70 6c 29 29 20 20 28 73 74 72 69 6e 67 3d 20 6d 73 67 74 6d 70 6c 20 22 22 29 0a 20 20 20 20 | mpl))..(string=.msgtmpl."")..... |
| 3ee0 | 20 20 20 20 20 20 28 6e 6f 74 20 28 73 74 72 69 6e 67 70 20 74 69 6d 65 74 6d 70 6c 29 29 20 28 | ......(not.(stringp.timetmpl)).( |
| 3f00 | 73 74 72 69 6e 67 3d 20 74 69 6d 65 74 6d 70 6c 20 22 22 29 29 0a 20 20 20 20 20 20 28 6d 65 73 | string=.timetmpl."")).......(mes |
| 3f20 | 73 61 67 65 20 22 5b 4c 4f 47 34 45 5d 20 69 6e 76 61 6c 69 64 20 61 72 67 75 6d 65 6e 74 20 6f | sage."[LOG4E].invalid.argument.o |
| 3f40 | 66 20 64 65 66 6c 6f 67 67 65 72 22 29 0a 20 20 20 20 28 6c 65 74 2a 20 28 28 62 75 66 73 79 6d | f.deflogger").....(let*.((bufsym |
| 3f60 | 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 6c 6f 67 2d 62 75 66 66 65 72 20 | .(log4e--make-symbol-log-buffer. |
| 3f80 | 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6d 73 67 62 75 66 73 79 6d 20 28 | prefix))............(msgbufsym.( |
| 3fa0 | 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 6d 73 67 2d 62 75 66 66 65 72 20 70 72 | log4e--make-symbol-msg-buffer.pr |
| 3fc0 | 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 74 6d 70 6c 73 79 6d 20 28 6c | efix))............(logtmplsym.(l |
| 3fe0 | 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 6c 6f 67 2d 74 65 6d 70 6c 61 74 65 20 70 | og4e--make-symbol-log-template.p |
| 4000 | 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 74 69 6d 65 74 6d 70 6c 73 79 6d 20 | refix))............(timetmplsym. |
| 4020 | 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 74 69 6d 65 2d 74 65 6d 70 6c 61 74 | (log4e--make-symbol-time-templat |
| 4040 | 65 20 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6d 69 6e 6c 76 6c 73 79 6d | e.prefix))............(minlvlsym |
| 4060 | 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 6d 69 6e 2d 6c 65 76 65 6c 20 70 | .(log4e--make-symbol-min-level.p |
| 4080 | 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 78 6c 76 6c 73 79 6d 20 28 6c | refix))............(maxlvlsym.(l |
| 40a0 | 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 6d 61 78 2d 6c 65 76 65 6c 20 70 72 65 66 | og4e--make-symbol-max-level.pref |
| 40c0 | 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 74 67 6c 73 79 6d 20 28 6c 6f 67 34 65 2d 2d | ix))............(tglsym.(log4e-- |
| 40e0 | 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 74 6f 67 67 6c 65 2d 6c 6f 67 67 69 6e 67 20 70 72 65 66 69 | make-symbol-toggle-logging.prefi |
| 4100 | 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 64 62 67 73 79 6d 20 28 6c 6f 67 34 65 2d 2d 6d | x))............(dbgsym.(log4e--m |
| 4120 | 61 6b 65 2d 73 79 6d 62 6f 6c 2d 74 6f 67 67 6c 65 2d 64 65 62 75 67 67 69 6e 67 20 70 72 65 66 | ake-symbol-toggle-debugging.pref |
| 4140 | 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 64 73 79 73 73 79 6d 20 28 6c 6f 67 34 | ix))............(codsyssym.(log4 |
| 4160 | 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 62 75 66 66 65 72 2d 63 6f 64 69 6e 67 2d 73 79 73 | e--make-symbol-buffer-coding-sys |
| 4180 | 74 65 6d 20 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 61 64 64 72 73 79 6d | tem.prefix))............(addrsym |
| 41a0 | 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 61 75 74 68 6f 72 2d 6d 61 69 6c | .(log4e--make-symbol-author-mail |
| 41c0 | 2d 61 64 64 72 65 73 73 20 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 66 75 | -address.prefix))............(fu |
| 41e0 | 6e 63 6e 6d 2d 61 6c 69 73 74 20 28 63 6c 2d 6c 6f 6f 70 20 77 69 74 68 20 63 75 73 74 6f 6d 2d | ncnm-alist.(cl-loop.with.custom- |
| 4200 | 61 6c 69 73 74 20 3d 20 28 63 61 72 20 28 63 64 72 20 6c 6f 67 2d 66 75 6e 63 74 69 6f 6e 2d 6e | alist.=.(car.(cdr.log-function-n |
| 4220 | 61 6d 65 2d 63 75 73 74 6f 6d 2d 61 6c 69 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | ame-custom-alist)).............. |
| 4240 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 6c 76 6c 20 69 6e 20 | .....................for.lvl.in. |
| 4260 | 27 28 66 61 74 61 6c 20 65 72 72 6f 72 20 77 61 72 6e 20 69 6e 66 6f 20 64 65 62 75 67 20 74 72 | '(fatal.error.warn.info.debug.tr |
| 4280 | 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ace)............................ |
| 42a0 | 20 20 20 20 20 20 20 66 6f 72 20 6c 76 6c 70 61 69 72 20 3d 20 28 61 73 73 71 20 6c 76 6c 20 63 | .......for.lvlpair.=.(assq.lvl.c |
| 42c0 | 75 73 74 6f 6d 2d 61 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ustom-alist).................... |
| 42e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 66 6e 61 6d 65 20 3d 20 28 6f 72 20 28 | ...............for.fname.=.(or.( |
| 4300 | 63 64 72 2d 73 61 66 65 20 6c 76 6c 70 61 69 72 29 20 22 22 29 0a 20 20 20 20 20 20 20 20 20 20 | cdr-safe.lvlpair)."")........... |
| 4320 | 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 6f 6c 6c 65 63 74 20 | ........................collect. |
| 4340 | 28 6f 72 20 28 69 66 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 5c 2a 22 20 66 6e 61 6d 65 | (or.(if.(string-match."\*".fname |
| 4360 | 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 | )............................... |
| 4380 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 | ....................(progn...... |
| 43a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 43c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 5b 4c 4f 47 34 45 5d | ...............(message."[LOG4E] |
| 43e0 | 20 69 67 6e 6f 72 65 20 25 73 20 6c 65 76 65 6c 20 6e 61 6d 65 20 69 6e 20 6c 6f 67 2d 66 75 6e | .ignore.%s.level.name.in.log-fun |
| 4400 | 63 74 69 6f 6e 2d 6e 61 6d 65 2d 63 75 73 74 6f 6d 2d 61 6c 69 73 74 2e 20 63 61 6e 27 74 20 75 | ction-name-custom-alist..can't.u |
| 4420 | 73 65 20 27 2a 27 20 66 6f 72 20 74 68 65 20 6e 61 6d 65 2e 22 20 6c 76 6c 29 0a 20 20 20 20 20 | se.'*'.for.the.name.".lvl)...... |
| 4440 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 4460 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | ...............nil)............. |
| 4480 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 44a0 | 20 20 20 20 6c 76 6c 70 61 69 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ....lvlpair).................... |
| 44c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 73 73 71 | ...........................(assq |
| 44e0 | 20 6c 76 6c 20 6c 6f 67 34 65 2d 64 65 66 61 75 6c 74 2d 6c 6f 67 67 69 6e 67 2d 66 75 6e 63 74 | .lvl.log4e-default-logging-funct |
| 4500 | 69 6f 6e 2d 6e 61 6d 65 2d 61 6c 69 73 74 29 29 29 29 29 0a 20 20 20 20 20 20 60 28 70 72 6f 67 | ion-name-alist))))).......`(prog |
| 4520 | 6e 0a 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 44 65 66 69 6e 65 20 76 61 72 69 61 62 6c 65 20 66 | n...........;;.Define.variable.f |
| 4540 | 6f 72 20 70 72 65 66 69 78 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 76 61 72 20 2c 62 75 66 73 | or.prefix..........(defvar.,bufs |
| 4560 | 79 6d 20 28 66 6f 72 6d 61 74 20 22 20 2a 6c 6f 67 34 65 2d 25 73 2a 22 20 2c 70 72 65 66 69 78 | ym.(format.".*log4e-%s*".,prefix |
| 4580 | 29 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 76 61 72 20 2c 6c 6f 67 74 6d 70 6c 73 79 6d 20 | ))..........(defvar.,logtmplsym. |
| 45a0 | 2c 6d 73 67 74 6d 70 6c 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 76 61 72 20 2c 74 69 6d 65 | ,msgtmpl)..........(defvar.,time |
| 45c0 | 74 6d 70 6c 73 79 6d 20 2c 74 69 6d 65 74 6d 70 6c 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 | tmplsym.,timetmpl)..........(def |
| 45e0 | 76 61 72 20 2c 6d 69 6e 6c 76 6c 73 79 6d 20 27 69 6e 66 6f 29 0a 20 20 20 20 20 20 20 20 20 28 | var.,minlvlsym.'info)..........( |
| 4600 | 64 65 66 76 61 72 20 2c 6d 61 78 6c 76 6c 73 79 6d 20 27 66 61 74 61 6c 29 0a 20 20 20 20 20 20 | defvar.,maxlvlsym.'fatal)....... |
| 4620 | 20 20 20 28 64 65 66 76 61 72 20 2c 74 67 6c 73 79 6d 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 | ...(defvar.,tglsym.nil)......... |
| 4640 | 20 28 64 65 66 76 61 72 20 2c 6d 73 67 62 75 66 73 79 6d 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 | .(defvar.,msgbufsym.nil)........ |
| 4660 | 20 20 28 64 65 66 76 61 72 20 2c 64 62 67 73 79 6d 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 | ..(defvar.,dbgsym.nil).......... |
| 4680 | 28 64 65 66 76 61 72 20 2c 63 6f 64 73 79 73 73 79 6d 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 | (defvar.,codsyssym.nil)......... |
| 46a0 | 20 28 64 65 66 76 61 72 20 2c 61 64 64 72 73 79 6d 20 6e 69 6c 29 0a 0a 20 20 20 20 20 20 20 20 | .(defvar.,addrsym.nil).......... |
| 46c0 | 20 3b 3b 20 44 65 66 69 6e 65 20 6c 65 76 65 6c 20 73 65 74 20 66 75 6e 63 74 69 6f 6e 0a 20 20 | .;;.Define.level.set.function... |
| 46e0 | 20 20 20 20 20 20 20 28 64 65 66 75 6e 20 2c 28 69 6e 74 65 72 6e 20 28 63 6f 6e 63 61 74 20 70 | .......(defun.,(intern.(concat.p |
| 4700 | 72 65 66 69 78 20 22 2d 2d 6c 6f 67 2d 73 65 74 2d 6c 65 76 65 6c 22 29 29 20 28 6d 69 6e 6c 65 | refix."--log-set-level")).(minle |
| 4720 | 76 65 6c 20 26 6f 70 74 69 6f 6e 61 6c 20 6d 61 78 6c 65 76 65 6c 29 0a 20 20 20 20 20 20 20 20 | vel.&optional.maxlevel)......... |
| 4740 | 20 20 20 22 53 65 74 20 72 61 6e 67 65 20 66 6f 72 20 64 6f 69 6e 67 20 6c 6f 67 67 69 6e 67 2e | ..."Set.range.for.doing.logging. |
| 4760 | 0a 0a 4d 49 4e 4c 45 56 45 4c 20 69 73 20 73 79 6d 62 6f 6c 20 6f 66 20 6c 6f 77 65 73 74 20 6c | ..MINLEVEL.is.symbol.of.lowest.l |
| 4780 | 65 76 65 6c 20 66 6f 72 20 64 6f 69 6e 67 20 6c 6f 67 67 69 6e 67 2e 20 69 74 73 20 64 65 66 61 | evel.for.doing.logging..its.defa |
| 47a0 | 75 6c 74 20 69 73 20 5c 5c 3d 27 69 6e 66 6f 2e 0a 4d 41 58 4c 45 56 45 4c 20 69 73 20 73 79 6d | ult.is.\\='info..MAXLEVEL.is.sym |
| 47c0 | 62 6f 6c 20 6f 66 20 68 69 67 68 65 73 74 20 6c 65 76 65 6c 20 66 6f 72 20 64 6f 69 6e 67 20 6c | bol.of.highest.level.for.doing.l |
| 47e0 | 6f 67 67 69 6e 67 2e 20 69 74 73 20 64 65 66 61 75 6c 74 20 69 73 20 5c 5c 3d 27 66 61 74 61 6c | ogging..its.default.is.\\='fatal |
| 4800 | 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 2c 6d 69 6e 6c 76 6c 73 79 6d 20 6d | ."............(setq.,minlvlsym.m |
| 4820 | 69 6e 6c 65 76 65 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 2c 6d 61 78 6c 76 | inlevel)............(setq.,maxlv |
| 4840 | 6c 73 79 6d 20 6d 61 78 6c 65 76 65 6c 29 29 0a 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 44 65 66 | lsym.maxlevel))...........;;.Def |
| 4860 | 69 6e 65 20 6c 6f 67 67 69 6e 67 20 74 6f 67 67 6c 65 20 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 | ine.logging.toggle.function..... |
| 4880 | 20 20 20 20 20 28 64 65 66 75 6e 20 2c 28 69 6e 74 65 72 6e 20 28 63 6f 6e 63 61 74 20 70 72 65 | .....(defun.,(intern.(concat.pre |
| 48a0 | 66 69 78 20 22 2d 2d 6c 6f 67 2d 65 6e 61 62 6c 65 2d 6c 6f 67 67 69 6e 67 22 29 29 20 28 29 0a | fix."--log-enable-logging")).(). |
| 48c0 | 20 20 20 20 20 20 20 20 20 20 20 22 45 6e 61 62 6c 65 20 6c 6f 67 67 69 6e 67 20 62 79 20 6c 6f | ..........."Enable.logging.by.lo |
| 48e0 | 67 67 69 6e 67 20 66 75 6e 63 74 69 6f 6e 73 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 6e | gging.functions."............(in |
| 4900 | 74 65 72 61 63 74 69 76 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 2c 74 67 6c | teractive)............(setq.,tgl |
| 4920 | 73 79 6d 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 75 6e 20 2c 28 69 6e 74 65 72 6e | sym.t))..........(defun.,(intern |
| 4940 | 20 28 63 6f 6e 63 61 74 20 70 72 65 66 69 78 20 22 2d 2d 6c 6f 67 2d 64 69 73 61 62 6c 65 2d 6c | .(concat.prefix."--log-disable-l |
| 4960 | 6f 67 67 69 6e 67 22 29 29 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 22 44 69 73 61 62 6c 65 | ogging")).()............"Disable |
| 4980 | 20 6c 6f 67 67 69 6e 67 20 62 79 20 6c 6f 67 67 69 6e 67 20 66 75 6e 63 74 69 6f 6e 73 2e 22 0a | .logging.by.logging.functions.". |
| 49a0 | 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 20 20 20 20 20 | ...........(interactive)........ |
| 49c0 | 20 20 20 20 28 73 65 74 71 20 2c 74 67 6c 73 79 6d 20 6e 69 6c 29 29 0a 0a 20 20 20 20 20 20 20 | ....(setq.,tglsym.nil))......... |
| 49e0 | 20 20 3b 3b 20 44 65 66 69 6e 65 20 6d 65 73 73 61 67 69 6e 67 20 74 6f 67 67 6c 65 20 66 75 6e | ..;;.Define.messaging.toggle.fun |
| 4a00 | 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 75 6e 20 2c 28 69 6e 74 65 72 6e 20 28 | ction..........(defun.,(intern.( |
| 4a20 | 63 6f 6e 63 61 74 20 70 72 65 66 69 78 20 22 2d 2d 6c 6f 67 2d 65 6e 61 62 6c 65 2d 6d 65 73 73 | concat.prefix."--log-enable-mess |
| 4a40 | 61 67 69 6e 67 22 29 29 20 28 26 6f 70 74 69 6f 6e 61 6c 20 62 75 66 66 65 72 29 0a 20 20 20 20 | aging")).(&optional.buffer)..... |
| 4a60 | 20 20 20 20 20 20 20 22 45 6e 61 62 6c 65 20 64 75 6d 70 20 74 68 65 20 6c 6f 67 20 69 6e 74 6f | ......."Enable.dump.the.log.into |
| 4a80 | 20 6f 74 68 65 72 20 62 75 66 66 65 72 20 62 79 20 6c 6f 67 67 69 6e 67 20 66 75 6e 63 74 69 6f | .other.buffer.by.logging.functio |
| 4aa0 | 6e 73 2e 0a 0a 42 55 46 46 45 52 20 69 73 20 61 20 62 75 66 66 65 72 20 64 75 6d 70 65 64 20 6c | ns...BUFFER.is.a.buffer.dumped.l |
| 4ac0 | 6f 67 20 69 6e 74 6f 2e 20 6e 69 6c 20 6d 65 61 6e 73 20 2a 4d 65 73 73 61 67 65 73 2a 20 62 75 | og.into..nil.means.*Messages*.bu |
| 4ae0 | 66 66 65 72 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a | ffer."............(interactive). |
| 4b00 | 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 2c 6d 73 67 62 75 66 73 79 6d 20 28 6f 72 20 | ...........(setq.,msgbufsym.(or. |
| 4b20 | 62 75 66 66 65 72 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 75 6e 20 2c 28 69 6e | buffer.t)))..........(defun.,(in |
| 4b40 | 74 65 72 6e 20 28 63 6f 6e 63 61 74 20 70 72 65 66 69 78 20 22 2d 2d 6c 6f 67 2d 64 69 73 61 62 | tern.(concat.prefix."--log-disab |
| 4b60 | 6c 65 2d 6d 65 73 73 61 67 69 6e 67 22 29 29 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 22 44 | le-messaging")).()............"D |
| 4b80 | 69 73 61 62 6c 65 20 64 75 6d 70 20 74 68 65 20 6c 6f 67 20 69 6e 74 6f 20 6f 74 68 65 72 20 62 | isable.dump.the.log.into.other.b |
| 4ba0 | 75 66 66 65 72 20 62 79 20 6c 6f 67 67 69 6e 67 20 66 75 6e 63 74 69 6f 6e 73 2e 22 0a 20 20 20 | uffer.by.logging.functions.".... |
| 4bc0 | 20 20 20 20 20 20 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 20 20 20 20 20 20 20 20 | ........(interactive)........... |
| 4be0 | 20 28 73 65 74 71 20 2c 6d 73 67 62 75 66 73 79 6d 20 6e 69 6c 29 29 0a 0a 20 20 20 20 20 20 20 | .(setq.,msgbufsym.nil))......... |
| 4c00 | 20 20 3b 3b 20 44 65 66 69 6e 65 20 64 65 62 75 67 67 69 6e 67 20 74 6f 67 67 6c 65 20 66 75 6e | ..;;.Define.debugging.toggle.fun |
| 4c20 | 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 75 6e 20 2c 28 69 6e 74 65 72 6e 20 28 | ction..........(defun.,(intern.( |
| 4c40 | 63 6f 6e 63 61 74 20 70 72 65 66 69 78 20 22 2d 2d 6c 6f 67 2d 65 6e 61 62 6c 65 2d 64 65 62 75 | concat.prefix."--log-enable-debu |
| 4c60 | 67 67 69 6e 67 22 29 29 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 22 45 6e 61 62 6c 65 20 64 | gging")).()............"Enable.d |
| 4c80 | 65 62 75 67 67 69 6e 67 20 61 6e 64 20 6c 6f 67 67 69 6e 67 2e 0a 0a 60 50 52 45 46 49 58 2d 2d | ebugging.and.logging...`PREFIX-- |
| 4ca0 | 6c 6f 67 2d 64 65 62 75 67 67 69 6e 67 2d 70 27 20 77 69 6c 6c 20 72 65 74 75 72 6e 20 74 2e 22 | log-debugging-p'.will.return.t." |
| 4cc0 | 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 20 20 20 20 | ............(interactive)....... |
| 4ce0 | 20 20 20 20 20 28 73 65 74 71 20 2c 74 67 6c 73 79 6d 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 | .....(setq.,tglsym.t)........... |
| 4d00 | 20 28 73 65 74 71 20 2c 64 62 67 73 79 6d 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 | .(setq.,dbgsym.t))..........(def |
| 4d20 | 75 6e 20 2c 28 69 6e 74 65 72 6e 20 28 63 6f 6e 63 61 74 20 70 72 65 66 69 78 20 22 2d 2d 6c 6f | un.,(intern.(concat.prefix."--lo |
| 4d40 | 67 2d 64 69 73 61 62 6c 65 2d 64 65 62 75 67 67 69 6e 67 22 29 29 20 28 29 0a 20 20 20 20 20 20 | g-disable-debugging")).()....... |
| 4d60 | 20 20 20 20 20 22 44 69 73 61 62 6c 65 20 64 65 62 75 67 67 69 6e 67 2e 0a 0a 60 50 52 45 46 49 | ....."Disable.debugging...`PREFI |
| 4d80 | 58 2d 2d 6c 6f 67 2d 64 65 62 75 67 67 69 6e 67 2d 70 27 20 77 69 6c 6c 20 72 65 74 75 72 6e 20 | X--log-debugging-p'.will.return. |
| 4da0 | 6e 69 6c 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 | nil."............(interactive).. |
| 4dc0 | 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 2c 64 62 67 73 79 6d 20 6e 69 6c 29 29 0a 20 20 | ..........(setq.,dbgsym.nil))... |
| 4de0 | 20 20 20 20 20 20 20 28 64 65 66 75 6e 20 2c 28 69 6e 74 65 72 6e 20 28 63 6f 6e 63 61 74 20 70 | .......(defun.,(intern.(concat.p |
| 4e00 | 72 65 66 69 78 20 22 2d 2d 6c 6f 67 2d 64 65 62 75 67 67 69 6e 67 2d 70 22 29 29 20 28 29 0a 20 | refix."--log-debugging-p")).().. |
| 4e20 | 20 20 20 20 20 20 20 20 20 20 2c 64 62 67 73 79 6d 29 0a 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 | ..........,dbgsym)...........;;. |
| 4e40 | 44 65 66 69 6e 65 20 63 6f 64 69 6e 67 20 73 79 73 74 65 6d 20 73 65 74 20 66 75 6e 74 69 6f 6e | Define.coding.system.set.funtion |
| 4e60 | 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 75 6e 20 2c 28 69 6e 74 65 72 6e 20 28 63 6f 6e 63 61 | ..........(defun.,(intern.(conca |
| 4e80 | 74 20 70 72 65 66 69 78 20 22 2d 2d 6c 6f 67 2d 73 65 74 2d 63 6f 64 69 6e 67 2d 73 79 73 74 65 | t.prefix."--log-set-coding-syste |
| 4ea0 | 6d 22 29 29 20 28 63 6f 64 69 6e 67 2d 73 79 73 74 65 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 | m")).(coding-system)............ |
| 4ec0 | 22 53 65 74 20 63 68 61 72 73 65 74 20 61 6e 64 20 6c 69 6e 65 66 65 65 64 20 6f 66 20 4c 4f 47 | "Set.charset.and.linefeed.of.LOG |
| 4ee0 | 2d 42 55 46 46 45 52 2e 0a 0a 43 4f 44 49 4e 47 2d 53 59 53 54 45 4d 20 69 73 20 73 79 6d 62 6f | -BUFFER...CODING-SYSTEM.is.symbo |
| 4f00 | 6c 20 66 6f 72 20 73 65 74 74 69 6e 67 20 74 6f 20 60 62 75 66 66 65 72 2d 66 69 6c 65 2d 63 6f | l.for.setting.to.`buffer-file-co |
| 4f20 | 64 69 6e 67 2d 73 79 73 74 65 6d 27 2e 0a 4c 4f 47 2d 42 55 46 46 45 52 20 69 73 20 61 20 62 75 | ding-system'..LOG-BUFFER.is.a.bu |
| 4f40 | 66 66 65 72 20 77 68 69 63 68 20 6e 61 6d 65 20 69 73 20 5c 22 20 2a 6c 6f 67 34 65 2d 50 52 45 | ffer.which.name.is.\".*log4e-PRE |
| 4f60 | 46 49 58 2a 5c 22 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 2c 63 6f 64 73 79 | FIX*\"."............(setq.,codsy |
| 4f80 | 73 73 79 6d 20 63 6f 64 69 6e 67 2d 73 79 73 74 65 6d 29 29 0a 0a 20 20 20 20 20 20 20 20 20 3b | ssym.coding-system))...........; |
| 4fa0 | 3b 20 20 20 20 20 20 20 20 20 20 3b 3b 20 44 65 66 69 6e 65 20 61 75 74 68 6f 72 20 6d 61 69 6c | ;..........;;.Define.author.mail |
| 4fc0 | 20 73 65 74 20 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 20 20 20 20 | .set.function..........;;....... |
| 4fe0 | 20 20 20 28 64 65 66 75 6e 20 2c 28 69 6e 74 65 72 6e 20 28 63 6f 6e 63 61 74 20 70 72 65 66 69 | ...(defun.,(intern.(concat.prefi |
| 5000 | 78 20 22 2d 2d 6c 6f 67 2d 73 65 74 2d 61 75 74 68 6f 72 2d 6d 61 69 6c 2d 61 64 64 72 65 73 73 | x."--log-set-author-mail-address |
| 5020 | 22 29 29 20 28 62 65 66 6f 72 65 2d 61 74 6d 61 72 6b 20 61 66 74 65 72 2d 61 74 6d 61 72 6b 29 | ")).(before-atmark.after-atmark) |
| 5040 | 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 22 53 65 74 20 6d 61 69 | ..........;;............"Set.mai |
| 5060 | 6c 20 61 64 64 72 65 73 73 20 6f 66 20 61 75 74 68 6f 72 20 66 6f 72 20 65 6c 69 73 70 20 74 68 | l.address.of.author.for.elisp.th |
| 5080 | 61 74 20 68 61 73 20 50 52 45 46 49 58 2e 20 54 68 69 73 20 76 61 6c 75 65 20 69 73 20 75 73 65 | at.has.PREFIX..This.value.is.use |
| 50a0 | 64 20 53 45 4e 44 2d 52 45 50 4f 52 54 2e 0a 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 42 45 46 4f | d.SEND-REPORT............;;.BEFO |
| 50c0 | 52 45 2d 41 54 4d 41 52 4b 20 69 73 20 73 74 72 69 6e 67 20 61 73 20 70 61 72 74 20 6f 66 20 6d | RE-ATMARK.is.string.as.part.of.m |
| 50e0 | 61 69 6c 20 61 64 64 72 65 73 73 2e 20 49 66 20 79 6f 75 72 20 61 64 64 72 65 73 73 20 69 73 20 | ail.address..If.your.address.is. |
| 5100 | 5c 22 68 6f 67 65 40 65 78 61 6d 70 6c 65 2e 63 6f 2e 6a 70 5c 22 2c 20 69 74 20 69 73 20 5c 22 | \"hoge@example.co.jp\",.it.is.\" |
| 5120 | 68 6f 67 65 5c 22 2e 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 41 46 54 45 52 2d 41 54 4d 41 52 4b | hoge\"...........;;.AFTER-ATMARK |
| 5140 | 20 69 73 20 73 74 72 69 6e 67 20 61 73 20 70 61 72 74 20 6f 66 20 6d 61 69 6c 20 61 64 64 72 65 | .is.string.as.part.of.mail.addre |
| 5160 | 73 73 2e 20 49 66 20 79 6f 75 72 20 61 64 64 72 65 73 73 20 69 73 20 5c 22 68 6f 67 65 40 65 78 | ss..If.your.address.is.\"hoge@ex |
| 5180 | 61 6d 70 6c 65 2e 63 6f 2e 6a 70 5c 22 2c 20 69 74 20 69 73 20 5c 22 65 78 61 6d 70 6c 65 2e 63 | ample.co.jp\",.it.is.\"example.c |
| 51a0 | 6f 2e 6a 70 5c 22 2e 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 53 45 4e 44 2d 52 45 50 4f 52 54 20 | o.jp\"...........;;.SEND-REPORT. |
| 51c0 | 69 73 20 60 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 73 65 6e 64 2d 72 65 70 6f 72 74 2d 69 66 2d 6e | is.`PREFIX--log-send-report-if-n |
| 51e0 | 6f 74 2d 64 65 62 75 67 27 2e 22 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 20 20 20 20 20 20 | ot-debug'."..........;;......... |
| 5200 | 20 20 20 28 73 65 74 71 20 2c 61 64 64 72 73 79 6d 20 28 63 6f 6e 63 61 74 20 62 65 66 6f 72 65 | ...(setq.,addrsym.(concat.before |
| 5220 | 2d 61 74 6d 61 72 6b 20 22 40 22 20 61 66 74 65 72 2d 61 74 6d 61 72 6b 29 29 29 0a 0a 20 20 20 | -atmark."@".after-atmark)))..... |
| 5240 | 20 20 20 20 20 20 3b 3b 20 44 65 66 69 6e 65 20 6c 6f 67 20 62 75 66 66 65 72 20 68 61 6e 64 6c | ......;;.Define.log.buffer.handl |
| 5260 | 65 20 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 75 6e 20 2c 28 69 6e 74 | e.function..........(defun.,(int |
| 5280 | 65 72 6e 20 28 63 6f 6e 63 61 74 20 70 72 65 66 69 78 20 22 2d 2d 6c 6f 67 2d 63 6c 65 61 72 2d | ern.(concat.prefix."--log-clear- |
| 52a0 | 6c 6f 67 22 29 29 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 22 43 6c 65 61 72 20 62 75 66 66 | log")).()............"Clear.buff |
| 52c0 | 65 72 20 73 74 72 69 6e 67 20 6f 66 20 62 75 66 66 65 72 20 77 68 69 63 68 20 6e 61 6d 65 20 69 | er.string.of.buffer.which.name.i |
| 52e0 | 73 20 5c 22 20 2a 6c 6f 67 34 65 2d 50 52 45 46 49 58 2a 5c 22 2e 22 0a 20 20 20 20 20 20 20 20 | s.\".*log4e-PREFIX*\"."......... |
| 5300 | 20 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 | ...(interactive)............(log |
| 5320 | 34 65 2d 2d 63 6c 65 61 72 2d 6c 6f 67 20 2c 62 75 66 73 79 6d 29 29 0a 20 20 20 20 20 20 20 20 | 4e--clear-log.,bufsym))......... |
| 5340 | 20 28 64 65 66 75 6e 20 2c 28 69 6e 74 65 72 6e 20 28 63 6f 6e 63 61 74 20 70 72 65 66 69 78 20 | .(defun.,(intern.(concat.prefix. |
| 5360 | 22 2d 2d 6c 6f 67 2d 6f 70 65 6e 2d 6c 6f 67 22 29 29 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 | "--log-open-log")).()........... |
| 5380 | 20 22 4f 70 65 6e 20 62 75 66 66 65 72 20 77 68 69 63 68 20 6e 61 6d 65 20 69 73 20 5c 22 20 2a | ."Open.buffer.which.name.is.\".* |
| 53a0 | 6c 6f 67 34 65 2d 50 52 45 46 49 58 2a 5c 22 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 6e | log4e-PREFIX*\"."............(in |
| 53c0 | 74 65 72 61 63 74 69 76 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 34 65 2d 2d 6f 70 | teractive)............(log4e--op |
| 53e0 | 65 6e 2d 6c 6f 67 20 2c 62 75 66 73 79 6d 29 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 75 6e | en-log.,bufsym))..........(defun |
| 5400 | 20 2c 28 69 6e 74 65 72 6e 20 28 63 6f 6e 63 61 74 20 70 72 65 66 69 78 20 22 2d 2d 6c 6f 67 2d | .,(intern.(concat.prefix."--log- |
| 5420 | 6f 70 65 6e 2d 6c 6f 67 2d 69 66 2d 64 65 62 75 67 22 29 29 20 28 29 0a 20 20 20 20 20 20 20 20 | open-log-if-debug")).()......... |
| 5440 | 20 20 20 22 4f 70 65 6e 20 62 75 66 66 65 72 20 77 68 69 63 68 20 6e 61 6d 65 20 69 73 20 5c 22 | ..."Open.buffer.which.name.is.\" |
| 5460 | 20 2a 6c 6f 67 34 65 2d 50 52 45 46 49 58 2a 5c 22 20 69 66 20 64 65 62 75 67 67 69 6e 67 20 69 | .*log4e-PREFIX*\".if.debugging.i |
| 5480 | 73 20 65 6e 61 62 6c 65 64 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 34 65 2d 2d 6f | s.enabled."............(log4e--o |
| 54a0 | 70 65 6e 2d 6c 6f 67 2d 69 66 2d 64 65 62 75 67 20 2c 62 75 66 73 79 6d 20 2c 64 62 67 73 79 6d | pen-log-if-debug.,bufsym.,dbgsym |
| 54c0 | 29 29 0a 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 20 20 20 20 20 20 20 3b 3b 20 44 65 66 69 | ))...........;;..........;;.Defi |
| 54e0 | 6e 65 20 72 65 70 6f 72 74 20 73 65 6e 64 20 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 | ne.report.send.function......... |
| 5500 | 20 3b 3b 20 20 20 20 20 20 20 20 20 20 28 64 65 66 75 6e 20 2c 28 69 6e 74 65 72 6e 20 28 63 6f | .;;..........(defun.,(intern.(co |
| 5520 | 6e 63 61 74 20 70 72 65 66 69 78 20 22 2d 2d 6c 6f 67 2d 73 65 6e 64 2d 72 65 70 6f 72 74 2d 69 | ncat.prefix."--log-send-report-i |
| 5540 | 66 2d 6e 6f 74 2d 64 65 62 75 67 22 29 29 20 28 29 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 | f-not-debug")).()..........;;... |
| 5560 | 20 20 20 20 20 20 20 20 20 22 53 65 6e 64 20 62 75 67 20 72 65 70 6f 72 74 20 74 6f 20 61 75 74 | ........."Send.bug.report.to.aut |
| 5580 | 68 6f 72 20 69 66 20 64 65 62 75 67 67 69 6e 67 20 69 73 20 64 69 73 61 62 6c 65 64 2e 0a 0a 20 | hor.if.debugging.is.disabled.... |
| 55a0 | 20 20 20 20 20 20 20 20 3b 3b 20 54 68 65 20 61 75 74 68 6f 72 20 6d 61 69 6c 61 64 64 72 65 73 | ........;;.The.author.mailaddres |
| 55c0 | 73 20 69 73 20 73 65 74 20 62 79 20 60 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 73 65 74 2d 61 75 74 | s.is.set.by.`PREFIX--log-set-aut |
| 55e0 | 68 6f 72 2d 6d 61 69 6c 2d 61 64 64 72 65 73 73 27 2e 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 41 | hor-mail-address'...........;;.A |
| 5600 | 62 6f 75 74 20 74 68 65 20 77 61 79 20 6f 66 20 73 65 6e 64 69 6e 67 20 62 75 67 20 72 65 70 6f | bout.the.way.of.sending.bug.repo |
| 5620 | 72 74 2c 20 73 65 65 20 60 72 65 70 6f 72 74 65 72 2d 73 75 62 6d 69 74 2d 62 75 67 2d 72 65 70 | rt,.see.`reporter-submit-bug-rep |
| 5640 | 6f 72 74 27 2e 22 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 28 6c | ort'."..........;;............(l |
| 5660 | 6f 67 34 65 2d 2d 73 65 6e 64 2d 72 65 70 6f 72 74 2d 69 66 2d 6e 6f 74 2d 64 65 62 75 67 20 2c | og4e--send-report-if-not-debug., |
| 5680 | 62 75 66 73 79 6d 20 2c 64 62 67 73 79 6d 20 2c 61 64 64 72 73 79 6d 20 2c 70 72 65 66 69 78 29 | bufsym.,dbgsym.,addrsym.,prefix) |
| 56a0 | 29 0a 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 44 65 66 69 6e 65 20 65 61 63 68 20 6c 65 76 65 6c | )...........;;.Define.each.level |
| 56c0 | 20 6c 6f 67 67 69 6e 67 20 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 28 6c 6f 67 34 | .logging.function..........(log4 |
| 56e0 | 65 2d 2d 64 65 66 2d 6c 65 76 65 6c 2d 6c 6f 67 67 65 72 20 2c 70 72 65 66 69 78 20 6e 69 6c 20 | e--def-level-logger.,prefix.nil. |
| 5700 | 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 28 6c 6f 67 34 65 2d 2d 64 65 66 2d 6c 65 76 65 6c 2d | nil)..........(log4e--def-level- |
| 5720 | 6c 6f 67 67 65 72 20 2c 70 72 65 66 69 78 20 2c 28 61 73 73 6f 63 2d 64 65 66 61 75 6c 74 20 27 | logger.,prefix.,(assoc-default.' |
| 5740 | 66 61 74 61 6c 20 66 75 6e 63 6e 6d 2d 61 6c 69 73 74 29 20 66 61 74 61 6c 29 0a 20 20 20 20 20 | fatal.funcnm-alist).fatal)...... |
| 5760 | 20 20 20 20 28 6c 6f 67 34 65 2d 2d 64 65 66 2d 6c 65 76 65 6c 2d 6c 6f 67 67 65 72 20 2c 70 72 | ....(log4e--def-level-logger.,pr |
| 5780 | 65 66 69 78 20 2c 28 61 73 73 6f 63 2d 64 65 66 61 75 6c 74 20 27 65 72 72 6f 72 20 66 75 6e 63 | efix.,(assoc-default.'error.func |
| 57a0 | 6e 6d 2d 61 6c 69 73 74 29 20 65 72 72 6f 72 29 0a 20 20 20 20 20 20 20 20 20 28 6c 6f 67 34 65 | nm-alist).error)..........(log4e |
| 57c0 | 2d 2d 64 65 66 2d 6c 65 76 65 6c 2d 6c 6f 67 67 65 72 20 2c 70 72 65 66 69 78 20 2c 28 61 73 73 | --def-level-logger.,prefix.,(ass |
| 57e0 | 6f 63 2d 64 65 66 61 75 6c 74 20 27 77 61 72 6e 20 20 66 75 6e 63 6e 6d 2d 61 6c 69 73 74 29 20 | oc-default.'warn..funcnm-alist). |
| 5800 | 77 61 72 6e 29 0a 20 20 20 20 20 20 20 20 20 28 6c 6f 67 34 65 2d 2d 64 65 66 2d 6c 65 76 65 6c | warn)..........(log4e--def-level |
| 5820 | 2d 6c 6f 67 67 65 72 20 2c 70 72 65 66 69 78 20 2c 28 61 73 73 6f 63 2d 64 65 66 61 75 6c 74 20 | -logger.,prefix.,(assoc-default. |
| 5840 | 27 69 6e 66 6f 20 20 66 75 6e 63 6e 6d 2d 61 6c 69 73 74 29 20 69 6e 66 6f 29 0a 20 20 20 20 20 | 'info..funcnm-alist).info)...... |
| 5860 | 20 20 20 20 28 6c 6f 67 34 65 2d 2d 64 65 66 2d 6c 65 76 65 6c 2d 6c 6f 67 67 65 72 20 2c 70 72 | ....(log4e--def-level-logger.,pr |
| 5880 | 65 66 69 78 20 2c 28 61 73 73 6f 63 2d 64 65 66 61 75 6c 74 20 27 64 65 62 75 67 20 66 75 6e 63 | efix.,(assoc-default.'debug.func |
| 58a0 | 6e 6d 2d 61 6c 69 73 74 29 20 64 65 62 75 67 29 0a 20 20 20 20 20 20 20 20 20 28 6c 6f 67 34 65 | nm-alist).debug)..........(log4e |
| 58c0 | 2d 2d 64 65 66 2d 6c 65 76 65 6c 2d 6c 6f 67 67 65 72 20 2c 70 72 65 66 69 78 20 2c 28 61 73 73 | --def-level-logger.,prefix.,(ass |
| 58e0 | 6f 63 2d 64 65 66 61 75 6c 74 20 27 74 72 61 63 65 20 66 75 6e 63 6e 6d 2d 61 6c 69 73 74 29 20 | oc-default.'trace.funcnm-alist). |
| 5900 | 74 72 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 0a 20 20 20 20 20 20 20 20 20 29 29 29 29 0a 0a | trace)....................)))).. |
| 5920 | 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 69 6e 65 2d 64 65 72 69 76 65 64 2d | .;;;###autoload.(define-derived- |
| 5940 | 6d 6f 64 65 20 6c 6f 67 34 65 2d 6d 6f 64 65 20 76 69 65 77 2d 6d 6f 64 65 20 22 4c 6f 67 34 45 | mode.log4e-mode.view-mode."Log4E |
| 5960 | 22 0a 20 20 22 4d 61 6a 6f 72 20 6d 6f 64 65 20 66 6f 72 20 62 72 6f 77 73 69 6e 67 20 61 20 62 | "..."Major.mode.for.browsing.a.b |
| 5980 | 75 66 66 65 72 20 6d 61 64 65 20 62 79 20 6c 6f 67 34 65 2e 0a 0a 5c 5c 3c 6c 6f 67 34 65 2d 6d | uffer.made.by.log4e...\\<log4e-m |
| 59a0 | 6f 64 65 2d 6d 61 70 3e 0a 5c 5c 7b 6c 6f 67 34 65 2d 6d 6f 64 65 2d 6d 61 70 7d 22 0a 20 20 28 | ode-map>.\\{log4e-mode-map}"...( |
| 59c0 | 64 65 66 69 6e 65 2d 6b 65 79 20 6c 6f 67 34 65 2d 6d 6f 64 65 2d 6d 61 70 20 28 6b 62 64 20 22 | define-key.log4e-mode-map.(kbd." |
| 59e0 | 4a 22 29 20 27 6c 6f 67 34 65 3a 6e 65 78 74 2d 6c 6f 67 29 0a 20 20 28 64 65 66 69 6e 65 2d 6b | J").'log4e:next-log)...(define-k |
| 5a00 | 65 79 20 6c 6f 67 34 65 2d 6d 6f 64 65 2d 6d 61 70 20 28 6b 62 64 20 22 4b 22 29 20 27 6c 6f 67 | ey.log4e-mode-map.(kbd."K").'log |
| 5a20 | 34 65 3a 70 72 65 76 69 6f 75 73 2d 6c 6f 67 29 29 0a 0a 28 64 65 66 75 6e 20 6c 6f 67 34 65 3a | 4e:previous-log))..(defun.log4e: |
| 5a40 | 6e 65 78 74 2d 6c 6f 67 20 28 29 0a 20 20 22 4d 6f 76 65 20 74 6f 20 73 74 61 72 74 20 6f 66 20 | next-log.()..."Move.to.start.of. |
| 5a60 | 6e 65 78 74 20 6c 6f 67 20 6f 6e 20 6c 6f 67 34 65 2d 6d 6f 64 65 2e 22 0a 20 20 28 69 6e 74 65 | next.log.on.log4e-mode."...(inte |
| 5a80 | 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 2a 20 28 28 6c 65 76 65 6c 29 29 0a 20 20 20 20 28 | ractive)...(let*.((level)).....( |
| 5aa0 | 77 68 69 6c 65 20 28 61 6e 64 20 28 6e 6f 74 20 6c 65 76 65 6c 29 0a 20 20 20 20 20 20 20 20 20 | while.(and.(not.level).......... |
| 5ac0 | 20 20 20 20 20 20 20 28 3c 20 28 70 6f 69 6e 74 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 0a | .......(<.(point).(point-max))). |
| 5ae0 | 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 31 29 0a 20 20 20 20 20 20 28 73 65 | ......(forward-line.1).......(se |
| 5b00 | 74 71 20 6c 65 76 65 6c 20 28 6c 6f 67 34 65 2d 2d 67 65 74 2d 63 75 72 72 65 6e 74 2d 6c 6f 67 | tq.level.(log4e--get-current-log |
| 5b20 | 2d 6c 69 6e 65 2d 6c 65 76 65 6c 29 29 29 0a 20 20 20 20 6c 65 76 65 6c 29 29 0a 0a 28 64 65 66 | -line-level))).....level))..(def |
| 5b40 | 75 6e 20 6c 6f 67 34 65 3a 70 72 65 76 69 6f 75 73 2d 6c 6f 67 20 28 29 0a 20 20 22 4d 6f 76 65 | un.log4e:previous-log.()..."Move |
| 5b60 | 20 74 6f 20 73 74 61 72 74 20 6f 66 20 70 72 65 76 69 6f 75 73 20 6c 6f 67 20 6f 6e 20 6c 6f 67 | .to.start.of.previous.log.on.log |
| 5b80 | 34 65 2d 6d 6f 64 65 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 | 4e-mode."...(interactive)...(let |
| 5ba0 | 2a 20 28 28 6c 65 76 65 6c 29 29 0a 20 20 20 20 28 77 68 69 6c 65 20 28 61 6e 64 20 28 6e 6f 74 | *.((level)).....(while.(and.(not |
| 5bc0 | 20 6c 65 76 65 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3e 20 28 70 6f 69 6e | .level).................(>.(poin |
| 5be0 | 74 29 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 29 0a 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d | t).(point-min))).......(forward- |
| 5c00 | 6c 69 6e 65 20 2d 31 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 6c 65 76 65 6c 20 28 6c 6f 67 34 | line.-1).......(setq.level.(log4 |
| 5c20 | 65 2d 2d 67 65 74 2d 63 75 72 72 65 6e 74 2d 6c 6f 67 2d 6c 69 6e 65 2d 6c 65 76 65 6c 29 29 29 | e--get-current-log-line-level))) |
| 5c40 | 0a 20 20 20 20 6c 65 76 65 6c 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 | .....level))..;;;###autoload.(de |
| 5c60 | 66 75 6e 20 6c 6f 67 34 65 3a 69 6e 73 65 72 74 2d 73 74 61 72 74 2d 6c 6f 67 2d 71 75 69 63 6b | fun.log4e:insert-start-log-quick |
| 5c80 | 6c 79 20 28 29 0a 20 20 22 49 6e 73 65 72 74 20 6c 6f 67 67 69 6e 67 20 73 74 61 74 6d 65 6e 74 | ly.()..."Insert.logging.statment |
| 5ca0 | 20 66 6f 72 20 74 72 61 63 65 20 6c 65 76 65 6c 20 6c 6f 67 20 61 74 20 73 74 61 72 74 20 6f 66 | .for.trace.level.log.at.start.of |
| 5cc0 | 20 63 75 72 72 65 6e 74 20 66 75 6e 63 74 69 6f 6e 2f 6d 61 63 72 6f 2e 22 0a 20 20 28 69 6e 74 | .current.function/macro."...(int |
| 5ce0 | 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 2a 20 28 28 66 73 74 61 72 74 70 74 20 28 77 68 | eractive)...(let*.((fstartpt.(wh |
| 5d00 | 65 6e 20 28 72 65 2d 73 65 61 72 63 68 2d 62 61 63 6b 77 61 72 64 20 22 28 5c 5c 28 3f 3a 64 65 | en.(re-search-backward."(\\(?:de |
| 5d20 | 66 75 6e 5c 5c 7c 64 65 66 6d 61 63 72 6f 5c 5c 7c 64 65 66 73 75 62 73 74 5c 5c 29 5c 5c 2a 3f | fun\\|defmacro\\|defsubst\\)\\*? |
| 5d40 | 20 2b 5c 5c 28 5b 5e 20 5d 2b 5c 5c 29 20 2b 28 5c 5c 28 5b 5e 29 5d 2a 5c 5c 29 29 22 20 6e 69 | .+\\([^.]+\\).+(\\([^)]*\\))".ni |
| 5d60 | 6c 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6f 69 6e 74 | l.t)......................(point |
| 5d80 | 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 6e 63 6e 6d 20 28 77 68 65 6e 20 66 73 74 61 72 74 | )))..........(fncnm.(when.fstart |
| 5da0 | 70 74 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 31 | pt.(match-string-no-properties.1 |
| 5dc0 | 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 61 72 67 74 65 78 74 20 28 77 68 65 6e 20 66 73 74 61 | )))..........(argtext.(when.fsta |
| 5de0 | 72 74 70 74 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 | rtpt.(match-string-no-properties |
| 5e00 | 20 32 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 70 72 65 66 69 78 20 28 73 61 76 65 2d 65 78 63 | .2)))..........(prefix.(save-exc |
| 5e20 | 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d | ursion....................(goto- |
| 5e40 | 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | char.(point-min))............... |
| 5e60 | 20 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 77 68 69 6c 65 20 28 72 65 2d 73 65 61 72 63 68 2d 66 | .....(cl-loop.while.(re-search-f |
| 5e80 | 6f 72 77 61 72 64 20 22 28 6c 6f 67 34 65 3a 64 65 66 6c 6f 67 67 65 72 5b 20 5c 6e 5d 2b 5c 22 | orward."(log4e:deflogger[.\n]+\" |
| 5ea0 | 5c 5c 28 5b 5e 5c 22 5d 2b 5c 5c 29 5c 22 22 20 6e 69 6c 20 74 29 0a 20 20 20 20 20 20 20 20 20 | \\([^\"]+\\)\"".nil.t).......... |
| 5ec0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 70 72 65 66 69 78 20 3d 20 | ...................for.prefix.=. |
| 5ee0 | 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 31 29 0a 20 | (match-string-no-properties.1).. |
| 5f00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 63 | ...........................for.c |
| 5f20 | 75 72 72 66 61 63 65 20 3d 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 28 6d 61 | urrface.=.(get-text-property.(ma |
| 5f40 | 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 30 29 20 27 66 61 63 65 29 0a 20 20 20 20 20 20 20 20 | tch-beginning.0).'face)......... |
| 5f60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 66 20 28 6e 6f 74 20 28 65 71 20 | ....................if.(not.(eq. |
| 5f80 | 63 75 72 72 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 63 6f 6d 6d 65 6e 74 2d 66 61 63 65 | currface.'font-lock-comment-face |
| 5fa0 | 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 72 | )).............................r |
| 5fc0 | 65 74 75 72 6e 20 70 72 65 66 69 78 29 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 | eturn.prefix)))).....(when.(and. |
| 5fe0 | 66 73 74 61 72 74 70 74 20 70 72 65 66 69 78 29 0a 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 66 | fstartpt.prefix).......(let*.((f |
| 6000 | 6e 63 6e 6d 20 28 72 65 70 6c 61 63 65 2d 72 65 67 65 78 70 2d 69 6e 2d 73 74 72 69 6e 67 20 28 | ncnm.(replace-regexp-in-string.( |
| 6020 | 63 6f 6e 63 61 74 20 22 5c 5c 60 22 20 70 72 65 66 69 78 20 22 5b 5e 61 2d 7a 41 2d 5a 30 2d 39 | concat."\\`".prefix."[^a-zA-Z0-9 |
| 6040 | 5d 2b 22 29 20 22 22 20 66 6e 63 6e 6d 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6e | ]+")."".fncnm))..............(fn |
| 6060 | 63 6e 6d 20 28 72 65 70 6c 61 63 65 2d 72 65 67 65 78 70 2d 69 6e 2d 73 74 72 69 6e 67 20 22 2d | cnm.(replace-regexp-in-string."- |
| 6080 | 22 20 22 20 22 20 66 6e 63 6e 6d 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 72 67 74 | ".".".fncnm))..............(argt |
| 60a0 | 65 78 74 20 28 72 65 70 6c 61 63 65 2d 72 65 67 65 78 70 2d 69 6e 2d 73 74 72 69 6e 67 20 22 5c | ext.(replace-regexp-in-string."\ |
| 60c0 | 6e 22 20 22 20 22 20 61 72 67 74 65 78 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 | n".".".argtext))..............(a |
| 60e0 | 72 67 74 65 78 74 20 28 72 65 70 6c 61 63 65 2d 72 65 67 65 78 70 2d 69 6e 2d 73 74 72 69 6e 67 | rgtext.(replace-regexp-in-string |
| 6100 | 20 22 5e 20 2b 22 20 22 22 20 61 72 67 74 65 78 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | ."^.+"."".argtext))............. |
| 6120 | 20 28 61 72 67 74 65 78 74 20 28 72 65 70 6c 61 63 65 2d 72 65 67 65 78 70 2d 69 6e 2d 73 74 72 | .(argtext.(replace-regexp-in-str |
| 6140 | 69 6e 67 20 22 20 2b 24 22 20 22 22 20 61 72 67 74 65 78 74 29 29 0a 20 20 20 20 20 20 20 20 20 | ing.".+$"."".argtext)).......... |
| 6160 | 20 20 20 20 28 61 72 67 73 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 61 72 67 74 65 78 74 20 | ....(args.(split-string.argtext. |
| 6180 | 22 20 2b 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 72 67 73 20 28 63 6c 2d 6c 6f | ".+"))..............(args.(cl-lo |
| 61a0 | 6f 70 20 66 6f 72 20 61 72 67 20 69 6e 20 61 72 67 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | op.for.arg.in.args.............. |
| 61c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 66 20 28 61 6e 64 20 28 6e 6f 74 20 28 73 74 72 | ...............if.(and.(not.(str |
| 61e0 | 69 6e 67 3d 20 61 72 67 20 22 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ing=.arg.""))................... |
| 6200 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 73 74 72 69 6e 67 2d 6d | ..................(not.(string-m |
| 6220 | 61 74 63 68 20 22 5c 5c 60 26 22 20 61 72 67 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | atch."\\`&".arg))).............. |
| 6240 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 6c 6c 65 63 74 20 61 72 67 29 29 0a 20 20 20 | ...............collect.arg)).... |
| 6260 | 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 74 65 78 74 20 28 63 6c 2d 6c 6f 6f 70 20 77 69 74 68 | ..........(logtext.(cl-loop.with |
| 6280 | 20 72 65 74 20 3d 20 28 66 6f 72 6d 61 74 20 22 73 74 61 72 74 20 25 73 2e 22 20 66 6e 63 6e 6d | .ret.=.(format."start.%s.".fncnm |
| 62a0 | 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 | )............................... |
| 62c0 | 20 66 6f 72 20 61 72 67 20 69 6e 20 61 72 67 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .for.arg.in.args................ |
| 62e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 6f 20 28 73 65 74 71 20 72 65 74 20 28 63 6f | ................do.(setq.ret.(co |
| 6300 | 6e 63 61 74 20 72 65 74 20 22 20 22 20 61 72 67 20 22 5b 25 73 5d 22 29 29 0a 20 20 20 20 20 20 | ncat.ret.".".arg."[%s]"))....... |
| 6320 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 69 6e 61 6c 6c 79 | .........................finally |
| 6340 | 20 72 65 74 75 72 6e 20 72 65 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 78 70 | .return.ret))..............(sexp |
| 6360 | 66 6f 72 6d 61 74 20 28 63 6c 2d 6c 6f 6f 70 20 77 69 74 68 20 72 65 74 20 3d 20 22 28 25 73 2d | format.(cl-loop.with.ret.=."(%s- |
| 6380 | 2d 6c 6f 67 20 27 74 72 61 63 65 20 5c 22 25 73 5c 22 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 | -log.'trace.\"%s\""............. |
| 63a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 61 72 67 20 69 6e | ......................for.arg.in |
| 63c0 | 20 61 72 67 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .args........................... |
| 63e0 | 20 20 20 20 20 20 20 20 64 6f 20 28 73 65 74 71 20 72 65 74 20 28 63 6f 6e 63 61 74 20 72 65 74 | ........do.(setq.ret.(concat.ret |
| 6400 | 20 22 20 25 73 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .".%s"))........................ |
| 6420 | 20 20 20 20 20 20 20 20 20 20 20 66 69 6e 61 6c 6c 79 20 72 65 74 75 72 6e 20 28 63 6f 6e 63 61 | ...........finally.return.(conca |
| 6440 | 74 20 72 65 74 20 22 29 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 | t.ret.")")))..............(inser |
| 6460 | 74 74 65 78 74 20 28 61 70 70 6c 79 20 27 66 6f 72 6d 61 74 20 73 65 78 70 66 6f 72 6d 61 74 20 | ttext.(apply.'format.sexpformat. |
| 6480 | 70 72 65 66 69 78 20 6c 6f 67 74 65 78 74 20 61 72 67 73 29 29 29 0a 20 20 20 20 20 20 20 20 28 | prefix.logtext.args))).........( |
| 64a0 | 66 6f 72 77 61 72 64 2d 63 68 61 72 29 0a 20 20 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 73 | forward-char).........(forward-s |
| 64c0 | 65 78 70 20 33 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 72 65 2d 73 65 61 72 63 68 2d | exp.3).........(when.(re-search- |
| 64e0 | 66 6f 72 77 61 72 64 20 22 5c 5c 3d 5b 20 5c 6e 5d 2b 5c 22 22 20 6e 69 6c 20 74 29 0a 20 20 20 | forward."\\=[.\n]+\"".nil.t).... |
| 6500 | 20 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 63 68 61 72 20 2d 31 29 0a 20 20 20 20 20 20 20 | .......(forward-char.-1)........ |
| 6520 | 20 20 20 28 66 6f 72 77 61 72 64 2d 73 65 78 70 29 29 0a 20 20 20 20 20 20 20 20 28 6e 65 77 6c | ...(forward-sexp)).........(newl |
| 6540 | 69 6e 65 2d 61 6e 64 2d 69 6e 64 65 6e 74 29 0a 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 | ine-and-indent).........(insert. |
| 6560 | 69 6e 73 65 72 74 74 65 78 74 29 29 29 29 29 0a 0a 0a 28 70 72 6f 76 69 64 65 20 27 6c 6f 67 34 | inserttext)))))...(provide.'log4 |
| 6580 | 65 29 0a 3b 3b 3b 20 6c 6f 67 34 65 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 | e).;;;.log4e.el.ends.here....... |
| 65a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 65c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 65e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6600 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6620 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6640 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6660 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6680 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 66a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 66c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 66e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6700 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6720 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6740 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6760 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6780 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 67a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 67c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 67e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6800 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6820 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6840 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6860 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6880 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 68a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 68c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 68e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6900 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6920 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6940 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6960 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6980 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 69a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 69c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 69e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6a00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6a20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6a40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6a60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6a80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6aa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6ac0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6ae0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6b00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6b20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6b40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6b60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6b80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6ba0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6bc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6be0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6c00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6c20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6c40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6c60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6c80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6ca0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6cc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6ce0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6d00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6d20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6d40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6d60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6d80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6da0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6dc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6de0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6e00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6e20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6e40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6e60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6e80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6ea0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6ec0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6ee0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6f00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6f20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6f40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6f60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6f80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6fa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6fc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 6fe0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7000 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7020 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7040 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7060 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7080 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 70a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 70c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 70e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7100 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7120 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7140 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7160 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7180 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 71a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 71c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 71e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7200 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7220 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7240 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7260 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7280 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 72a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 72c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 72e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7300 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7320 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7340 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7360 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7380 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 73a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 73c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 73e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7400 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7420 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7440 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7460 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7480 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 74a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 74c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 74e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7500 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7520 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7540 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7560 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7580 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 75a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 75c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 75e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7600 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7620 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7640 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7660 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7680 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 76a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 76c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 76e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7700 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7720 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7740 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7760 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 7780 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 77a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 77c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 77e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
 |
index : dotemacs.git | |
| my Emacs configuration | Craig Jennings |
| summaryrefslogtreecommitdiff |
blob: 45fe8e720e33ed031954134d84d767dec67e4be3 (plain)