| 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 35 37 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 31 33 33 00 20 30 00 00 00 | 0000657.00000000000.014133..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 | 28 64 65 66 69 6e 65 2d 70 61 63 6b 61 67 65 20 22 6c 6f 67 34 65 22 20 22 32 30 32 34 30 31 32 | (define-package."log4e"."2024012 |
| 0420 | 33 2e 31 33 31 33 22 20 22 70 72 6f 76 69 64 65 20 6c 6f 67 67 69 6e 67 20 66 72 61 6d 65 77 6f | 3.1313"."provide.logging.framewo |
| 0440 | 72 6b 20 66 6f 72 20 65 6c 69 73 70 22 20 27 6e 69 6c 20 3a 63 6f 6d 6d 69 74 20 22 36 64 37 31 | rk.for.elisp".'nil.:commit."6d71 |
| 0460 | 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 65 | 462df9bf595d3861bfb328377346acee |
| 0480 | 64 34 32 32 22 20 3a 61 75 74 68 6f 72 73 0a 20 20 27 28 28 22 48 69 72 6f 61 6b 69 20 4f 74 73 | d422".:authors...'(("Hiroaki.Ots |
| 04a0 | 75 22 20 2e 20 22 6f 6f 74 73 75 68 69 72 6f 61 6b 69 40 67 6d 61 69 6c 2e 63 6f 6d 22 29 29 0a | u"..."ootsuhiroaki@gmail.com")). |
| 04c0 | 20 20 3a 6d 61 69 6e 74 61 69 6e 65 72 73 0a 20 20 27 28 28 22 48 69 72 6f 61 6b 69 20 4f 74 73 | ..:maintainers...'(("Hiroaki.Ots |
| 04e0 | 75 22 20 2e 20 22 6f 6f 74 73 75 68 69 72 6f 61 6b 69 40 67 6d 61 69 6c 2e 63 6f 6d 22 29 29 0a | u"..."ootsuhiroaki@gmail.com")). |
| 0500 | 20 20 3a 6d 61 69 6e 74 61 69 6e 65 72 0a 20 20 27 28 22 48 69 72 6f 61 6b 69 20 4f 74 73 75 22 | ..:maintainer...'("Hiroaki.Otsu" |
| 0520 | 20 2e 20 22 6f 6f 74 73 75 68 69 72 6f 61 6b 69 40 67 6d 61 69 6c 2e 63 6f 6d 22 29 0a 20 20 3a | ..."ootsuhiroaki@gmail.com")...: |
| 0540 | 6b 65 79 77 6f 72 64 73 0a 20 20 27 28 22 6c 6f 67 22 29 0a 20 20 3a 75 72 6c 20 22 68 74 74 70 | keywords...'("log")...:url."http |
| 0560 | 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 61 6b 69 32 6f 2f 6c 6f 67 34 65 22 29 0a 3b 3b 20 | s://github.com/aki2o/log4e").;;. |
| 0580 | 4c 6f 63 61 6c 20 56 61 72 69 61 62 6c 65 73 3a 0a 3b 3b 20 6e 6f 2d 62 79 74 65 2d 63 6f 6d 70 | Local.Variables:.;;.no-byte-comp |
| 05a0 | 69 6c 65 3a 20 74 0a 3b 3b 20 45 6e 64 3a 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ile:.t.;;.End:.................. |
| 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 35 35 30 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 33 33 35 37 00 20 30 00 00 00 | 0056550.00000000000.013357..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 56 65 72 73 69 6f 6e 3a 20 30 2e 34 2e 31 0a 0a 3b 3b 20 54 68 69 73 20 70 | g4e.;;.Version:.0.4.1..;;.This.p |
| 08e0 | 72 6f 67 72 61 6d 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3b 20 79 6f 75 20 63 61 6e | rogram.is.free.software;.you.can |
| 0900 | 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 66 79 0a 3b | .redistribute.it.and/or.modify.; |
| 0920 | 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 47 4e 55 20 | ;.it.under.the.terms.of.the.GNU. |
| 0940 | 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 62 6c 69 73 | General.Public.License.as.publis |
| 0960 | 68 65 64 20 62 79 0a 3b 3b 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e | hed.by.;;.the.Free.Software.Foun |
| 0980 | 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 6f 66 20 74 68 65 20 | dation,.either.version.3.of.the. |
| 09a0 | 4c 69 63 65 6e 73 65 2c 20 6f 72 0a 3b 3b 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f 6e 29 20 | License,.or.;;.(at.your.option). |
| 09c0 | 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 | any.later.version...;;.This.file |
| 09e0 | 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 6f 70 65 20 74 68 61 74 | .is.distributed.in.the.hope.that |
| 0a00 | 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b 3b 20 62 75 74 20 57 49 54 48 4f | .it.will.be.useful,.;;.but.WITHO |
| 0a20 | 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 76 65 6e 20 74 68 | UT.ANY.WARRANTY;.without.even.th |
| 0a40 | 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d 45 52 43 48 41 4e | e.implied.warranty.of.;;.MERCHAN |
| 0a60 | 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 50 41 52 54 49 43 | TABILITY.or.FITNESS.FOR.A.PARTIC |
| 0a80 | 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 0a 3b 3b 20 47 4e 55 20 47 65 | ULAR.PURPOSE...See.the.;;.GNU.Ge |
| 0aa0 | 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 | neral.Public.License.for.more.de |
| 0ac0 | 74 61 69 6c 73 2e 0a 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 76 65 20 72 65 63 65 69 | tails...;;.You.should.have.recei |
| 0ae0 | 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 | ved.a.copy.of.the.GNU.General.Pu |
| 0b00 | 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 74 68 20 74 68 69 73 20 | blic.License.;;.along.with.this. |
| 0b20 | 70 72 6f 67 72 61 6d 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 70 3a 2f 2f 77 77 | program...If.not,.see.<http://ww |
| 0b40 | 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 | w.gnu.org/licenses/>...;;;.Comme |
| 0b60 | 6e 74 61 72 79 3a 0a 3b 3b 0a 3b 3b 20 54 68 69 73 20 65 78 74 65 6e 73 69 6f 6e 20 70 72 6f 76 | ntary:.;;.;;.This.extension.prov |
| 0b80 | 69 64 65 73 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 73 70 | ides.logging.framework.for.elisp |
| 0ba0 | 2e 0a 3b 3b 0a 3b 3b 20 46 6f 72 20 64 65 74 61 69 6c 2c 20 73 65 65 20 3c 68 74 74 70 73 3a 2f | ..;;.;;.For.detail,.see.<https:/ |
| 0bc0 | 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 61 6b 69 32 6f 2f 6c 6f 67 34 65 2f 62 6c 6f 62 2f 6d 61 73 | /github.com/aki2o/log4e/blob/mas |
| 0be0 | 74 65 72 2f 52 45 41 44 4d 45 2e 6d 64 3e 0a 3b 3b 0a 3b 3b 20 45 6e 6a 6f 79 21 21 21 0a 0a 3b | ter/README.md>.;;.;;.Enjoy!!!..; |
| 0c00 | 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 63 6c 2d 6c 69 62 29 0a 28 72 65 71 | ;;.Code:..(require.'cl-lib).(req |
| 0c20 | 75 69 72 65 20 27 72 78 29 0a 0a 0a 28 64 65 66 63 6f 6e 73 74 20 6c 6f 67 34 65 2d 6c 6f 67 2d | uire.'rx)...(defconst.log4e-log- |
| 0c40 | 6c 65 76 65 6c 2d 61 6c 69 73 74 20 27 28 28 66 61 74 61 6c 20 2e 20 36 29 0a 20 20 20 20 20 20 | level-alist.'((fatal...6)....... |
| 0c60 | 20 20 20 20 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 65 72 72 | ............................(err |
| 0c80 | 6f 72 20 2e 20 35 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 | or...5)......................... |
| 0ca0 | 20 20 20 20 20 20 20 20 20 20 28 77 61 72 6e 20 20 2e 20 34 29 0a 20 20 20 20 20 20 20 20 20 20 | ..........(warn....4)........... |
| 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 28 69 6e 66 6f 20 20 2e | ........................(info... |
| 0ce0 | 20 33 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 | .3)............................. |
| 0d00 | 20 20 20 20 20 20 28 64 65 62 75 67 20 2e 20 32 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ......(debug...2)............... |
| 0d20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 72 61 63 65 20 2e 20 31 29 29 | ....................(trace...1)) |
| 0d40 | 0a 20 20 22 41 6c 69 73 74 20 6f 66 20 6c 6f 67 20 6c 65 76 65 6c 20 76 61 6c 75 65 2e 22 29 0a | ..."Alist.of.log.level.value."). |
| 0d60 | 0a 28 64 65 66 63 6f 6e 73 74 20 6c 6f 67 34 65 2d 64 65 66 61 75 6c 74 2d 6c 6f 67 67 69 6e 67 | .(defconst.log4e-default-logging |
| 0d80 | 2d 66 75 6e 63 74 69 6f 6e 2d 6e 61 6d 65 2d 61 6c 69 73 74 20 27 28 28 66 61 74 61 6c 20 2e 20 | -function-name-alist.'((fatal... |
| 0da0 | 22 6c 6f 67 2d 66 61 74 61 6c 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | "log-fatal").................... |
| 0dc0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 0de0 | 20 20 20 28 65 72 72 6f 72 20 2e 20 22 6c 6f 67 2d 65 72 72 6f 72 22 29 0a 20 20 20 20 20 20 20 | ...(error..."log-error")........ |
| 0e00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 0e20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 61 72 6e 20 20 2e 20 22 6c 6f 67 2d 77 61 72 | ...............(warn...."log-war |
| 0e40 | 6e 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | n")............................. |
| 0e60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 66 6f 20 | ..........................(info. |
| 0e80 | 20 2e 20 22 6c 6f 67 2d 69 6e 66 6f 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ..."log-info").................. |
| 0ea0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 0ec0 | 20 20 20 20 20 28 64 65 62 75 67 20 2e 20 22 6c 6f 67 2d 64 65 62 75 67 22 29 0a 20 20 20 20 20 | .....(debug..."log-debug")...... |
| 0ee0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 0f00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 72 61 63 65 20 2e 20 22 6c 6f 67 2d 74 | .................(trace..."log-t |
| 0f20 | 72 61 63 65 22 29 29 0a 20 20 22 41 6c 69 73 74 20 6f 66 20 6c 6f 67 67 69 6e 67 20 66 75 6e 63 | race"))..."Alist.of.logging.func |
| 0f40 | 74 69 6f 6e 20 6e 61 6d 65 20 61 74 20 64 65 66 61 75 6c 74 2e 22 29 0a 0a 0a 28 64 65 66 6d 61 | tion.name.at.default.")...(defma |
| 0f60 | 63 72 6f 20 6c 6f 67 34 65 2d 2d 64 65 66 2d 73 79 6d 6d 61 6b 65 72 20 28 73 79 6d 6e 6d 29 0a | cro.log4e--def-symmaker.(symnm). |
| 0f80 | 20 20 60 28 70 72 6f 67 6e 0a 20 20 20 20 20 28 64 65 66 73 75 62 73 74 20 2c 28 69 6e 74 65 72 | ..`(progn......(defsubst.,(inter |
| 0fa0 | 6e 20 28 63 6f 6e 63 61 74 20 22 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 22 20 | n.(concat."log4e--make-symbol-". |
| 0fc0 | 73 79 6d 6e 6d 29 29 20 28 70 72 65 66 69 78 29 0a 20 20 20 20 20 20 20 28 69 6e 74 65 72 6e 20 | symnm)).(prefix)........(intern. |
| 0fe0 | 28 63 6f 6e 63 61 74 20 2c 28 66 6f 72 6d 61 74 20 22 6c 6f 67 34 65 2d 2d 25 73 2d 22 20 73 79 | (concat.,(format."log4e--%s-".sy |
| 1000 | 6d 6e 6d 29 20 70 72 65 66 69 78 29 29 29 29 29 0a 0a 28 6c 6f 67 34 65 2d 2d 64 65 66 2d 73 79 | mnm).prefix)))))..(log4e--def-sy |
| 1020 | 6d 6d 61 6b 65 72 20 22 6c 6f 67 2d 62 75 66 66 65 72 22 29 0a 28 6c 6f 67 34 65 2d 2d 64 65 66 | mmaker."log-buffer").(log4e--def |
| 1040 | 2d 73 79 6d 6d 61 6b 65 72 20 22 6d 73 67 2d 62 75 66 66 65 72 22 29 0a 28 6c 6f 67 34 65 2d 2d | -symmaker."msg-buffer").(log4e-- |
| 1060 | 64 65 66 2d 73 79 6d 6d 61 6b 65 72 20 22 6c 6f 67 2d 74 65 6d 70 6c 61 74 65 22 29 0a 28 6c 6f | def-symmaker."log-template").(lo |
| 1080 | 67 34 65 2d 2d 64 65 66 2d 73 79 6d 6d 61 6b 65 72 20 22 74 69 6d 65 2d 74 65 6d 70 6c 61 74 65 | g4e--def-symmaker."time-template |
| 10a0 | 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 69 6e 2d 6c 65 76 | ").(log4e--def-symmaker."min-lev |
| 10c0 | 65 6c 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 61 78 2d 6c | el").(log4e--def-symmaker."max-l |
| 10e0 | 65 76 65 6c 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 74 6f 67 | evel").(log4e--def-symmaker."tog |
| 1100 | 67 6c 65 2d 6c 6f 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 | gle-logging").(log4e--def-symmak |
| 1120 | 65 72 20 22 74 6f 67 67 6c 65 2d 64 65 62 75 67 67 69 6e 67 22 29 0a 28 6c 6f 67 34 65 2d 2d 64 | er."toggle-debugging").(log4e--d |
| 1140 | 65 66 2d 73 79 6d 6d 61 6b 65 72 20 22 62 75 66 66 65 72 2d 63 6f 64 69 6e 67 2d 73 79 73 74 65 | ef-symmaker."buffer-coding-syste |
| 1160 | 6d 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 61 75 74 68 6f 72 | m").(log4e--def-symmaker."author |
| 1180 | 2d 6d 61 69 6c 2d 61 64 64 72 65 73 73 22 29 0a 0a 28 64 65 66 6d 61 63 72 6f 20 6c 6f 67 34 65 | -mail-address")..(defmacro.log4e |
| 11a0 | 2d 2d 64 65 66 2d 6c 65 76 65 6c 2d 6c 6f 67 67 65 72 20 28 70 72 65 66 69 78 20 73 75 66 66 69 | --def-level-logger.(prefix.suffi |
| 11c0 | 78 20 6c 65 76 65 6c 29 0a 20 20 28 6c 65 74 20 28 28 61 72 67 66 6f 72 6d 20 28 69 66 20 73 75 | x.level)...(let.((argform.(if.su |
| 11e0 | 66 66 69 78 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 28 6d 73 67 20 | ffix......................'(msg. |
| 1200 | 26 72 65 73 74 20 6d 73 67 61 72 67 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | &rest.msgargs).................. |
| 1220 | 20 20 27 28 6c 65 76 65 6c 20 6d 73 67 20 26 72 65 73 74 20 6d 73 67 61 72 67 73 29 29 29 0a 20 | ..'(level.msg.&rest.msgargs))).. |
| 1240 | 20 20 20 20 20 20 20 28 62 75 66 66 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c | .......(buff.(log4e--make-symbol |
| 1260 | 2d 6c 6f 67 2d 62 75 66 66 65 72 20 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 28 6d 73 | -log-buffer.prefix)).........(ms |
| 1280 | 67 62 75 66 66 20 28 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 | gbuff.(log4e--make-symbol-msg-bu |
| 12a0 | 66 66 65 72 20 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 28 63 6f 64 73 79 73 20 28 6c | ffer.prefix)).........(codsys.(l |
| 12c0 | 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 2d | og4e--make-symbol-buffer-coding- |
| 12e0 | 73 79 73 74 65 6d 20 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 28 6c 6f 67 74 6d 70 6c | system.prefix)).........(logtmpl |
| 1300 | 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 74 65 6d 70 6c 61 74 | .(log4e--make-symbol-log-templat |
| 1320 | 65 20 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 28 74 69 6d 65 74 6d 70 6c 20 28 6c 6f | e.prefix)).........(timetmpl.(lo |
| 1340 | 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 65 20 70 | g4e--make-symbol-time-template.p |
| 1360 | 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 28 6d 69 6e 6c 76 6c 20 28 6c 6f 67 34 65 2d 2d | refix)).........(minlvl.(log4e-- |
| 1380 | 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 6d 69 6e 2d 6c 65 76 65 6c 20 70 72 65 66 69 78 29 29 0a 20 | make-symbol-min-level.prefix)).. |
| 13a0 | 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 62 | .......(maxlvl.(log4e--make-symb |
| 13c0 | 6f 6c 2d 6d 61 78 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 6c | ol-max-level.prefix)).........(l |
| 13e0 | 6f 67 67 69 6e 67 2d 70 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 74 6f 67 | ogging-p.(log4e--make-symbol-tog |
| 1400 | 67 6c 65 2d 6c 6f 67 67 69 6e 67 20 70 72 65 66 69 78 29 29 29 0a 20 20 20 20 60 28 70 72 6f 67 | gle-logging.prefix))).....`(prog |
| 1420 | 6e 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 66 75 6e 63 | n.........;;.Define.logging.func |
| 1440 | 74 69 6f 6e 0a 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 | tion........(defun.,(intern.(con |
| 1460 | 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 6f 67 22 | cat.prefix."--".(or.suffix."log" |
| 1480 | 29 29 29 20 2c 61 72 67 66 6f 72 6d 0a 20 20 20 20 20 20 20 20 20 2c 28 66 6f 72 6d 61 74 20 22 | ))).,argform..........,(format." |
| 14a0 | 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 6f 67 2e 0a 25 73 4d | Do.logging.for.%s.level.log..%sM |
| 14c0 | 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 60 66 6f 72 6d 61 74 | SG/MSGARGS.are.passed.to.`format |
| 14e0 | 27 2e 22 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 78 | '."...................(if.suffix |
| 1500 | 20 6c 65 76 65 6c 20 22 61 6e 79 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .level."any")................... |
| 1520 | 28 69 66 20 73 75 66 66 69 78 20 22 22 20 22 4c 45 56 45 4c 20 69 73 20 73 79 6d 62 6f 6c 20 74 | (if.suffix.""."LEVEL.is.symbol.t |
| 1540 | 68 61 74 20 69 73 20 6f 6e 65 20 6f 66 20 74 72 61 63 65 20 64 65 62 75 67 20 69 6e 66 6f 20 77 | hat.is.one.of.trace.debug.info.w |
| 1560 | 61 72 6e 20 65 72 72 6f 72 20 66 61 74 61 6c 2e 5c 6e 22 29 29 0a 20 20 20 20 20 20 20 20 20 28 | arn.error.fatal.\n"))..........( |
| 1580 | 6c 65 74 20 28 28 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 | let.((log4e--current-msg-buffer. |
| 15a0 | 2c 6d 73 67 62 75 66 66 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 2c 28 69 66 20 73 75 66 66 69 | ,msgbuff))............,(if.suffi |
| 15c0 | 78 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 61 70 70 6c 79 20 27 6c 6f 67 34 65 | x.................`(apply.'log4e |
| 15e0 | 2d 2d 6c 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 | --logging.,buff.,codsys.,logtmpl |
| 1600 | 20 2c 74 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 | .,timetmpl.,minlvl.,maxlvl.,logg |
| 1620 | 69 6e 67 2d 70 20 27 2c 6c 65 76 65 6c 20 6d 73 67 20 6d 73 67 61 72 67 73 29 0a 20 20 20 20 20 | ing-p.',level.msg.msgargs)...... |
| 1640 | 20 20 20 20 20 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 | .........`(apply.'log4e--logging |
| 1660 | 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 69 6d 65 74 6d 70 | .,buff.,codsys.,logtmpl.,timetmp |
| 1680 | 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 2d 70 20 6c 65 76 | l.,minlvl.,maxlvl.,logging-p.lev |
| 16a0 | 65 6c 20 6d 73 67 20 6d 73 67 61 72 67 73 29 29 29 29 0a 0a 20 20 20 20 20 20 20 3b 3b 20 44 65 | el.msg.msgargs)))).........;;.De |
| 16c0 | 66 69 6e 65 20 6c 6f 67 67 69 6e 67 20 6d 61 63 72 6f 0a 20 20 20 20 20 20 20 28 64 65 66 6d 61 | fine.logging.macro........(defma |
| 16e0 | 63 72 6f 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 22 | cro.,(intern.(concat.prefix."--" |
| 1700 | 20 28 6f 72 20 73 75 66 66 69 78 20 22 6c 6f 67 22 29 20 22 2a 22 29 29 20 2c 61 72 67 66 6f 72 | .(or.suffix."log")."*")).,argfor |
| 1720 | 6d 0a 20 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 | m..........,(format."Do.logging. |
| 1740 | 66 6f 72 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 | for.%s.level.log..%sMSG/MSGARGS. |
| 1760 | 61 72 65 20 70 61 73 73 65 64 20 74 6f 20 60 66 6f 72 6d 61 74 27 2e 0a 45 76 61 6c 75 61 74 69 | are.passed.to.`format'..Evaluati |
| 1780 | 6f 6e 20 6f 66 20 4d 53 47 41 52 47 53 20 69 73 20 69 6e 76 6f 6b 65 64 20 6f 6e 6c 79 20 69 66 | on.of.MSGARGS.is.invoked.only.if |
| 17a0 | 20 25 73 20 6c 65 76 65 6c 20 6c 6f 67 20 73 68 6f 75 6c 64 20 62 65 20 70 72 69 6e 74 65 64 2e | .%s.level.log.should.be.printed. |
| 17c0 | 22 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 78 20 6c | "...................(if.suffix.l |
| 17e0 | 65 76 65 6c 20 22 61 6e 79 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 | evel."any")...................(i |
| 1800 | 66 20 73 75 66 66 69 78 20 22 22 20 22 4c 45 56 45 4c 20 69 73 20 73 79 6d 62 6f 6c 20 74 68 61 | f.suffix.""."LEVEL.is.symbol.tha |
| 1820 | 74 20 69 73 20 6f 6e 65 20 6f 66 20 74 72 61 63 65 20 64 65 62 75 67 20 69 6e 66 6f 20 77 61 72 | t.is.one.of.trace.debug.info.war |
| 1840 | 6e 20 65 72 72 6f 72 20 66 61 74 61 6c 2e 5c 6e 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | n.error.fatal.\n").............. |
| 1860 | 20 20 20 20 20 28 69 66 20 73 75 66 66 69 78 20 6c 65 76 65 6c 20 22 74 68 65 22 29 29 0a 20 20 | .....(if.suffix.level."the"))... |
| 1880 | 20 20 20 20 20 20 20 28 6c 65 74 20 28 2c 40 28 69 66 20 73 75 66 66 69 78 20 28 6c 69 73 74 20 | .......(let.(,@(if.suffix.(list. |
| 18a0 | 60 28 6c 65 76 65 6c 20 27 2c 6c 65 76 65 6c 29 29 20 27 28 29 29 0a 20 20 20 20 20 20 20 20 20 | `(level.',level)).'()).......... |
| 18c0 | 20 20 20 20 20 20 28 62 75 66 66 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d | ......(buff.(log4e--make-symbol- |
| 18e0 | 6c 6f 67 2d 62 75 66 66 65 72 20 2c 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | log-buffer.,prefix))............ |
| 1900 | 20 20 20 20 28 6d 73 67 62 75 66 66 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c | ....(msgbuff.(log4e--make-symbol |
| 1920 | 2d 6d 73 67 2d 62 75 66 66 65 72 20 2c 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 | -msg-buffer.,prefix))........... |
| 1940 | 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 62 6f 6c | .....(codsys.(log4e--make-symbol |
| 1960 | 2d 62 75 66 66 65 72 2d 63 6f 64 69 6e 67 2d 73 79 73 74 65 6d 20 2c 70 72 65 66 69 78 29 29 0a | -buffer-coding-system.,prefix)). |
| 1980 | 20 20 20 20 20 20 20 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 | ...............(logtmpl.(log4e-- |
| 19a0 | 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 2c 70 72 65 66 69 78 | make-symbol-log-template.,prefix |
| 19c0 | 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 69 6d 65 74 6d 70 6c 20 28 6c 6f 67 | ))................(timetmpl.(log |
| 19e0 | 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 65 20 2c 70 | 4e--make-symbol-time-template.,p |
| 1a00 | 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 69 6e 6c 76 6c 20 28 | refix))................(minlvl.( |
| 1a20 | 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 2c 70 72 | log4e--make-symbol-min-level.,pr |
| 1a40 | 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 78 6c 76 6c 20 28 6c | efix))................(maxlvl.(l |
| 1a60 | 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 2c 70 72 65 | og4e--make-symbol-max-level.,pre |
| 1a80 | 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 67 69 6e 67 2d 70 20 | fix))................(logging-p. |
| 1aa0 | 28 6c 6f 67 34 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 | (log4e--make-symbol-toggle-loggi |
| 1ac0 | 6e 67 20 2c 70 72 65 66 69 78 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 60 28 6c 65 74 20 28 | ng.,prefix)))............`(let.( |
| 1ae0 | 28 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 2c 6d 73 67 62 | (log4e--current-msg-buffer.,msgb |
| 1b00 | 75 66 66 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 2c | uff))...............(when.(and., |
| 1b20 | 6c 6f 67 67 69 6e 67 2d 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | logging-p....................... |
| 1b40 | 20 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 2c 6d 69 6e 6c | ...(log4e--logging-level-p.,minl |
| 1b60 | 76 6c 20 2c 6d 61 78 6c 76 6c 20 27 2c 6c 65 76 65 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | vl.,maxlvl.',level))............ |
| 1b80 | 20 20 20 20 20 28 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 | .....(log4e--logging.,buff.,cods |
| 1ba0 | 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 6e 6c 76 6c 20 2c 6d | ys.,logtmpl.,timetmpl.,minlvl.,m |
| 1bc0 | 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 2c 6d 73 67 20 2c 40 | axlvl.,logging-p.',level.,msg.,@ |
| 1be0 | 6d 73 67 61 72 67 73 29 29 29 29 29 0a 20 20 20 20 20 20 20 0a 20 20 20 20 20 20 20 29 29 29 0a | msgargs)))))................))). |
| 1c00 | 0a 28 64 65 66 73 75 62 73 74 20 6c 6f 67 34 65 2d 2d 6c 6f 67 67 69 6e 67 2d 6c 65 76 65 6c 2d | .(defsubst.log4e--logging-level- |
| 1c20 | 70 20 28 6d 69 6e 6c 65 76 65 6c 20 6d 61 78 6c 65 76 65 6c 20 63 75 72 72 6c 65 76 65 6c 29 0a | p.(minlevel.maxlevel.currlevel). |
| 1c40 | 20 20 28 6c 65 74 20 28 28 6d 69 6e 6c 76 6c 76 61 6c 75 65 20 28 6f 72 20 28 61 73 73 6f 63 2d | ..(let.((minlvlvalue.(or.(assoc- |
| 1c60 | 64 65 66 61 75 6c 74 20 6d 69 6e 6c 65 76 65 6c 20 6c 6f 67 34 65 2d 6c 6f 67 2d 6c 65 76 65 6c | default.minlevel.log4e-log-level |
| 1c80 | 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 20 20 20 20 20 | -alist)......................... |
| 1ca0 | 20 31 29 29 0a 20 20 20 20 20 20 20 20 28 6d 61 78 6c 76 6c 76 61 6c 75 65 20 28 6f 72 20 28 61 | .1)).........(maxlvlvalue.(or.(a |
| 1cc0 | 73 73 6f 63 2d 64 65 66 61 75 6c 74 20 6d 61 78 6c 65 76 65 6c 20 6c 6f 67 34 65 2d 6c 6f 67 2d | ssoc-default.maxlevel.log4e-log- |
| 1ce0 | 6c 65 76 65 6c 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 | level-alist).................... |
| 1d00 | 20 20 20 20 20 20 36 29 29 0a 20 20 20 20 20 20 20 20 28 63 75 72 72 6c 76 6c 76 61 6c 75 65 20 | ......6)).........(currlvlvalue. |
| 1d20 | 28 6f 72 20 28 61 73 73 6f 63 2d 64 65 66 61 75 6c 74 20 63 75 72 72 6c 65 76 65 6c 20 6c 6f 67 | (or.(assoc-default.currlevel.log |
| 1d40 | 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 20 20 20 20 20 20 | 4e-log-level-alist)............. |
| 1d60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 29 29 29 0a 20 20 20 20 28 61 6e 64 20 28 3e 3d 20 | ..............0))).....(and.(>=. |
| 1d80 | 63 75 72 72 6c 76 6c 76 61 6c 75 65 20 6d 69 6e 6c 76 6c 76 61 6c 75 65 29 0a 20 20 20 20 20 20 | currlvlvalue.minlvlvalue)....... |
| 1da0 | 20 20 20 28 3c 3d 20 63 75 72 72 6c 76 6c 76 61 6c 75 65 20 6d 61 78 6c 76 6c 76 61 6c 75 65 29 | ...(<=.currlvlvalue.maxlvlvalue) |
| 1dc0 | 29 29 29 0a 0a 28 64 65 66 73 75 62 73 74 20 6c 6f 67 34 65 2d 2d 67 65 74 2d 6f 72 2d 63 72 65 | )))..(defsubst.log4e--get-or-cre |
| 1de0 | 61 74 65 2d 6c 6f 67 2d 62 75 66 66 65 72 20 28 62 75 66 66 6e 6d 20 26 6f 70 74 69 6f 6e 61 6c | ate-log-buffer.(buffnm.&optional |
| 1e00 | 20 63 6f 64 65 73 79 73 29 0a 20 20 28 6f 72 20 28 67 65 74 2d 62 75 66 66 65 72 20 62 75 66 66 | .codesys)...(or.(get-buffer.buff |
| 1e20 | 6e 6d 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 62 75 66 66 20 28 67 65 74 2d 62 75 66 66 65 | nm).......(let.((buff.(get-buffe |
| 1e40 | 72 2d 63 72 65 61 74 65 20 62 75 66 66 6e 6d 29 29 29 0a 20 20 20 20 20 20 20 20 28 77 69 74 68 | r-create.buffnm))).........(with |
| 1e60 | 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 62 75 66 66 0a 20 20 20 20 20 20 20 20 20 20 28 | -current-buffer.buff...........( |
| 1e80 | 6c 6f 67 34 65 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 63 6f 64 65 | log4e-mode)...........(when.code |
| 1ea0 | 73 79 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 62 75 66 66 65 72 2d 66 69 6c | sys.............(setq.buffer-fil |
| 1ec0 | 65 2d 63 6f 64 69 6e 67 2d 73 79 73 74 65 6d 20 63 6f 64 65 73 79 73 29 29 29 0a 20 20 20 20 20 | e-coding-system.codesys)))...... |
| 1ee0 | 20 20 20 62 75 66 66 29 29 29 0a 0a 28 64 65 66 76 61 72 20 6c 6f 67 34 65 2d 2d 72 65 67 65 78 | ...buff)))..(defvar.log4e--regex |
| 1f00 | 70 2d 6d 73 67 2d 66 6f 72 6d 61 74 0a 20 20 28 72 78 2d 74 6f 2d 73 74 72 69 6e 67 20 60 28 61 | p-msg-format...(rx-to-string.`(a |
| 1f20 | 6e 64 20 22 25 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2a 20 | nd."%".......................(*. |
| 1f40 | 28 61 6e 79 20 22 2b 23 2d 30 22 29 29 20 20 20 20 20 20 20 20 3b 20 66 6c 61 67 73 0a 20 20 20 | (any."+#-0"))........;.flags.... |
| 1f60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2a 20 28 61 6e 79 20 22 30 2d 39 22 | ...................(*.(any."0-9" |
| 1f80 | 29 29 20 20 20 20 20 20 20 20 20 3b 20 77 69 64 74 68 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | )).........;.width.............. |
| 1fa0 | 20 20 20 20 20 20 20 20 20 28 3f 20 22 2e 22 20 28 2b 20 28 61 6e 79 20 22 30 2d 39 22 29 29 29 | .........(?.".".(+.(any."0-9"))) |
| 1fc0 | 20 3b 20 70 72 65 63 69 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .;.precision.................... |
| 1fe0 | 20 20 20 28 61 6e 79 20 22 61 2d 7a 41 2d 5a 22 29 29 29 29 0a 0a 28 64 65 66 73 75 62 73 74 20 | ...(any."a-zA-Z"))))..(defsubst. |
| 2000 | 6c 6f 67 34 65 2d 2d 69 6e 73 65 72 74 2d 6c 6f 67 20 28 6c 6f 67 74 6d 70 6c 20 74 69 6d 65 74 | log4e--insert-log.(logtmpl.timet |
| 2020 | 6d 70 6c 20 6c 65 76 65 6c 20 6d 73 67 20 6d 73 67 61 72 67 73 20 70 72 6f 70 65 72 74 69 7a 65 | mpl.level.msg.msgargs.propertize |
| 2040 | 2d 70 29 0a 20 20 28 6c 65 74 20 28 28 74 69 6d 65 74 65 78 74 20 28 66 6f 72 6d 61 74 2d 74 69 | -p)...(let.((timetext.(format-ti |
| 2060 | 6d 65 2d 73 74 72 69 6e 67 20 74 69 6d 65 74 6d 70 6c 29 29 0a 20 20 20 20 20 20 20 20 28 6c 76 | me-string.timetmpl)).........(lv |
| 2080 | 6c 74 65 78 74 20 28 66 6f 72 6d 61 74 20 22 25 2d 30 35 73 22 20 28 75 70 63 61 73 65 20 28 73 | ltext.(format."%-05s".(upcase.(s |
| 20a0 | 79 6d 62 6f 6c 2d 6e 61 6d 65 20 6c 65 76 65 6c 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 62 75 | ymbol-name.level)))).........(bu |
| 20c0 | 66 66 65 72 2d 72 65 61 64 2d 6f 6e 6c 79 20 6e 69 6c 29 29 0a 20 20 20 20 28 77 68 65 6e 20 70 | ffer-read-only.nil)).....(when.p |
| 20e0 | 72 6f 70 65 72 74 69 7a 65 2d 70 0a 20 20 20 20 20 20 28 70 75 74 2d 74 65 78 74 2d 70 72 6f 70 | ropertize-p.......(put-text-prop |
| 2100 | 65 72 74 79 20 30 20 28 6c 65 6e 67 74 68 20 74 69 6d 65 74 65 78 74 29 20 27 66 61 63 65 20 27 | erty.0.(length.timetext).'face.' |
| 2120 | 66 6f 6e 74 2d 6c 6f 63 6b 2d 64 6f 63 2d 66 61 63 65 20 74 69 6d 65 74 65 78 74 29 0a 20 20 20 | font-lock-doc-face.timetext).... |
| 2140 | 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 20 | ...(put-text-property.0.(length. |
| 2160 | 6c 76 6c 74 65 78 74 29 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 6b 65 79 77 6f 72 | lvltext).'face.'font-lock-keywor |
| 2180 | 64 2d 66 61 63 65 20 6c 76 6c 74 65 78 74 29 29 0a 20 20 20 20 28 6c 65 74 2a 20 28 28 6c 6f 67 | d-face.lvltext)).....(let*.((log |
| 21a0 | 74 65 78 74 20 6c 6f 67 74 6d 70 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 74 65 78 | text.logtmpl)............(logtex |
| 21c0 | 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 25 74 22 | t.(replace-regexp-in-string."%t" |
| 21e0 | 20 74 69 6d 65 74 65 78 74 20 6c 6f 67 74 65 78 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 | .timetext.logtext))............( |
| 2200 | 6c 6f 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 | logtext.(replace-regexp-in-strin |
| 2220 | 67 20 22 25 6c 22 20 6c 76 6c 74 65 78 74 20 6c 6f 67 74 65 78 74 29 29 0a 20 20 20 20 20 20 20 | g."%l".lvltext.logtext))........ |
| 2240 | 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 65 78 70 2d 69 6e 2d | ....(logtext.(replace-regexp-in- |
| 2260 | 73 74 72 69 6e 67 20 22 25 6d 22 20 6d 73 67 20 6c 6f 67 74 65 78 74 29 29 0a 20 20 20 20 20 20 | string."%m".msg.logtext))....... |
| 2280 | 20 20 20 20 20 28 62 65 67 69 6e 20 28 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 20 20 28 69 6e 73 | .....(begin.(point))).......(ins |
| 22a0 | 65 72 74 20 6c 6f 67 74 65 78 74 20 22 5c 6e 22 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 70 72 | ert.logtext."\n").......(when.pr |
| 22c0 | 6f 70 65 72 74 69 7a 65 2d 70 0a 20 20 20 20 20 20 20 20 28 70 75 74 2d 74 65 78 74 2d 70 72 6f | opertize-p.........(put-text-pro |
| 22e0 | 70 65 72 74 79 20 62 65 67 69 6e 20 28 2b 20 62 65 67 69 6e 20 31 29 20 27 6c 6f 67 34 65 2d 2d | perty.begin.(+.begin.1).'log4e-- |
| 2300 | 6c 65 76 65 6c 20 6c 65 76 65 6c 29 29 0a 20 20 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 69 6e 69 | level.level)).......(cl-loop.ini |
| 2320 | 74 69 61 6c 6c 79 20 28 67 6f 74 6f 2d 63 68 61 72 20 62 65 67 69 6e 29 0a 20 20 20 20 20 20 20 | tially.(goto-char.begin)........ |
| 2340 | 20 20 20 20 20 20 20 20 77 68 69 6c 65 20 28 61 6e 64 20 6d 73 67 61 72 67 73 0a 20 20 20 20 20 | ........while.(and.msgargs...... |
| 2360 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 2d 73 65 61 72 63 68 2d | .....................(re-search- |
| 2380 | 66 6f 72 77 61 72 64 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 | forward.log4e--regexp-msg-format |
| 23a0 | 20 6e 69 6c 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 6f 20 28 6c 65 74 2a | .nil.t))................do.(let* |
| 23c0 | 20 28 28 63 75 72 72 74 79 70 65 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f | .((currtype.(match-string-no-pro |
| 23e0 | 70 65 72 74 69 65 73 20 30 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | perties.0))..................... |
| 2400 | 20 20 20 20 20 28 63 75 72 72 61 72 67 20 28 70 6f 70 20 6d 73 67 61 72 67 73 29 29 0a 20 20 20 | .....(currarg.(pop.msgargs)).... |
| 2420 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 61 69 6c 66 6d 74 20 6e | ......................(failfmt.n |
| 2440 | 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 75 | il)..........................(cu |
| 2460 | 72 72 74 65 78 74 20 28 63 6f 6e 64 69 74 69 6f 6e 2d 63 61 73 65 20 65 0a 20 20 20 20 20 20 20 | rrtext.(condition-case.e........ |
| 2480 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 24a0 | 28 66 6f 72 6d 61 74 20 63 75 72 72 74 79 70 65 20 63 75 72 72 61 72 67 29 0a 20 20 20 20 20 20 | (format.currtype.currarg)....... |
| 24c0 | 20 20 20 20 20 20 20 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 | ...............................( |
| 24e0 | 65 72 72 6f 72 20 28 73 65 74 71 20 66 61 69 6c 66 6d 74 20 74 29 0a 20 20 20 20 20 20 20 20 20 | error.(setq.failfmt.t).......... |
| 2500 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 2520 | 20 20 20 28 66 6f 72 6d 61 74 20 22 3d 25 73 3d 22 20 28 65 72 72 6f 72 2d 6d 65 73 73 61 67 65 | ...(format."=%s=".(error-message |
| 2540 | 2d 73 74 72 69 6e 67 20 65 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | -string.e))))))................. |
| 2560 | 20 20 20 20 28 73 61 76 65 2d 6d 61 74 63 68 2d 64 61 74 61 0a 20 20 20 20 20 20 20 20 20 20 20 | ....(save-match-data............ |
| 2580 | 20 20 20 20 20 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 | ...........(when.propertize-p... |
| 25a0 | 20 20 20 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 | ......................(ignore-er |
| 25c0 | 72 6f 72 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | rors...........................( |
| 25e0 | 63 6f 6e 64 20 28 66 61 69 6c 66 6d 74 20 28 70 75 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 | cond.(failfmt.(put-text-property |
| 2600 | 20 30 20 28 6c 65 6e 67 74 68 20 63 75 72 72 74 65 78 74 29 20 27 66 61 63 65 20 27 66 6f 6e 74 | .0.(length.currtext).'face.'font |
| 2620 | 2d 6c 6f 63 6b 2d 77 61 72 6e 69 6e 67 2d 66 61 63 65 20 63 75 72 72 74 65 78 74 29 29 0a 20 20 | -lock-warning-face.currtext))... |
| 2640 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 | ..............................(t |
| 2660 | 20 20 20 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 | .......(put-text-property.0.(len |
| 2680 | 67 74 68 20 63 75 72 72 74 65 78 74 29 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 73 | gth.currtext).'face.'font-lock-s |
| 26a0 | 74 72 69 6e 67 2d 66 61 63 65 20 63 75 72 72 74 65 78 74 29 29 29 29 29 29 0a 20 20 20 20 20 20 | tring-face.currtext))))))....... |
| 26c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 70 6c 61 63 65 2d 6d 61 74 63 68 20 63 75 72 | ..............(replace-match.cur |
| 26e0 | 72 74 65 78 74 20 74 20 74 29 29 29 0a 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 62 65 | rtext.t.t))).......(goto-char.be |
| 2700 | 67 69 6e 29 29 29 29 0a 0a 28 64 65 66 76 61 72 20 6c 6f 67 34 65 2d 2d 63 75 72 72 65 6e 74 2d | gin))))..(defvar.log4e--current- |
| 2720 | 6d 73 67 2d 62 75 66 66 65 72 20 6e 69 6c 29 0a 0a 3b 3b 20 57 65 20 6e 65 65 64 73 20 74 68 69 | msg-buffer.nil)..;;.We.needs.thi |
| 2740 | 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 63 6f | s.signature.be.stay.for.other.co |
| 2760 | 6d 70 69 6c 65 64 20 70 6c 75 67 69 6e 73 20 75 73 69 6e 67 20 6f 6c 64 20 76 65 72 73 69 6f 6e | mpiled.plugins.using.old.version |
| 2780 | 0a 28 64 65 66 75 6e 20 6c 6f 67 34 65 2d 2d 6c 6f 67 67 69 6e 67 20 28 62 75 66 66 6e 6d 20 63 | .(defun.log4e--logging.(buffnm.c |
| 27a0 | 6f 64 73 79 73 20 6c 6f 67 74 6d 70 6c 20 74 69 6d 65 74 6d 70 6c 20 6d 69 6e 6c 65 76 65 6c 20 | odsys.logtmpl.timetmpl.minlevel. |
| 27c0 | 6d 61 78 6c 65 76 65 6c 20 6c 6f 67 67 69 6e 67 2d 70 20 6c 65 76 65 6c 20 6d 73 67 20 26 72 65 | maxlevel.logging-p.level.msg.&re |
| 27e0 | 73 74 20 6d 73 67 61 72 67 73 29 0a 20 20 28 77 68 65 6e 20 28 61 6e 64 20 6c 6f 67 67 69 6e 67 | st.msgargs)...(when.(and.logging |
| 2800 | 2d 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 34 65 2d 2d 6c 6f 67 67 69 6e 67 2d | -p..............(log4e--logging- |
| 2820 | 6c 65 76 65 6c 2d 70 20 6d 69 6e 6c 65 76 65 6c 20 6d 61 78 6c 65 76 65 6c 20 6c 65 76 65 6c 29 | level-p.minlevel.maxlevel.level) |
| 2840 | 29 0a 20 20 20 20 28 73 61 76 65 2d 6d 61 74 63 68 2d 64 61 74 61 0a 20 20 20 20 20 20 28 77 69 | ).....(save-match-data.......(wi |
| 2860 | 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 28 6c 6f 67 34 65 2d 2d 67 65 74 2d 6f 72 | th-current-buffer.(log4e--get-or |
| 2880 | 2d 63 72 65 61 74 65 2d 6c 6f 67 2d 62 75 66 66 65 72 20 62 75 66 66 6e 6d 20 63 6f 64 73 79 73 | -create-log-buffer.buffnm.codsys |
| 28a0 | 29 0a 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 61 78 29 | ).........(goto-char.(point-max) |
| 28c0 | 29 0a 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 62 75 66 66 65 72 2d 72 65 61 64 2d 6f 6e | ).........(let*.((buffer-read-on |
| 28e0 | 6c 79 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 65 67 69 6e 20 28 70 | ly.nil)................(begin.(p |
| 2900 | 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 75 72 72 6c 6f 67 20 28 | oint))................(currlog.( |
| 2920 | 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | progn........................... |
| 2940 | 28 6c 6f 67 34 65 2d 2d 69 6e 73 65 72 74 2d 6c 6f 67 20 6c 6f 67 74 6d 70 6c 20 74 69 6d 65 74 | (log4e--insert-log.logtmpl.timet |
| 2960 | 6d 70 6c 20 6c 65 76 65 6c 20 6d 73 67 20 6d 73 67 61 72 67 73 20 74 29 0a 20 20 20 20 20 20 20 | mpl.level.msg.msgargs.t)........ |
| 2980 | 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 63 68 61 72 20 28 70 | ...................(goto-char.(p |
| 29a0 | 6f 69 6e 74 2d 6d 61 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | oint-max))...................... |
| 29c0 | 20 20 20 20 20 28 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 | .....(buffer-substring-no-proper |
| 29e0 | 74 69 65 73 20 62 65 67 69 6e 20 28 70 6f 69 6e 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 | ties.begin.(point))))........... |
| 2a00 | 20 20 20 20 20 28 6d 73 67 62 75 66 20 28 6f 72 20 28 77 68 65 6e 20 28 61 6e 64 20 6c 6f 67 34 | .....(msgbuf.(or.(when.(and.log4 |
| 2a20 | 65 2d 2d 63 75 72 72 65 6e 74 2d 6d 73 67 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 | e--current-msg-buffer........... |
| 2a40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 | ............................(not |
| 2a60 | 20 28 65 71 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 74 | .(eq.log4e--current-msg-buffer.t |
| 2a80 | 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | )))............................. |
| 2aa0 | 20 28 69 67 6e 6f 72 65 2d 65 72 72 6f 72 73 20 28 67 65 74 2d 62 75 66 66 65 72 20 6c 6f 67 34 | .(ignore-errors.(get-buffer.log4 |
| 2ac0 | 65 2d 2d 63 75 72 72 65 6e 74 2d 6d 73 67 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20 20 20 20 20 | e--current-msg-buffer)))........ |
| 2ae0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6c 6f 67 34 65 2d 2d 63 75 72 72 65 | ....................log4e--curre |
| 2b00 | 6e 74 2d 6d 73 67 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e | nt-msg-buffer)))...........(when |
| 2b20 | 20 6d 73 67 62 75 66 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 73 74 61 6e 64 | .msgbuf.............(let.((stand |
| 2b40 | 61 72 64 2d 6f 75 74 70 75 74 20 28 69 66 20 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 20 6d 73 | ard-output.(if.(buffer-live-p.ms |
| 2b60 | 67 62 75 66 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 | gbuf)........................... |
| 2b80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 6d 73 67 62 75 66 0a 20 20 20 20 20 20 20 20 20 20 20 20 | .............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 73 74 61 6e 64 61 72 | .........................standar |
| 2bc0 | 64 2d 6f 75 74 70 75 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 69 6e 63 | d-output)))...............(princ |
| 2be0 | 20 63 75 72 72 6c 6f 67 29 29 29 29 0a 20 20 20 20 20 20 20 20 6e 69 6c 29 29 29 29 0a 0a 28 64 | .currlog)))).........nil))))..(d |
| 2c00 | 65 66 75 6e 20 6c 6f 67 34 65 2d 2d 67 65 74 2d 63 75 72 72 65 6e 74 2d 6c 6f 67 2d 6c 69 6e 65 | efun.log4e--get-current-log-line |
| 2c20 | 2d 6c 65 76 65 6c 20 28 29 0a 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 | -level.()...(save-excursion..... |
| 2c40 | 28 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 29 0a 20 20 20 20 28 67 65 74 2d 74 65 78 | (beginning-of-line).....(get-tex |
| 2c60 | 74 2d 70 72 6f 70 65 72 74 79 20 28 70 6f 69 6e 74 29 20 27 6c 6f 67 34 65 2d 2d 6c 65 76 65 6c | t-property.(point).'log4e--level |
| 2c80 | 29 29 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 | )))..;;.We.needs.this.signature. |
| 2ca0 | 62 65 20 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 | be.stay.for.other.plugins.compil |
| 2cc0 | 65 64 20 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 | ed.with.this.old.version.(defun. |
| 2ce0 | 6c 6f 67 34 65 2d 2d 63 6c 65 61 72 2d 6c 6f 67 20 28 62 75 66 66 6e 6d 29 0a 20 20 28 77 69 74 | log4e--clear-log.(buffnm)...(wit |
| 2d00 | 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 28 6c 6f 67 34 65 2d 2d 67 65 74 2d 6f 72 2d | h-current-buffer.(log4e--get-or- |
| 2d20 | 63 72 65 61 74 65 2d 6c 6f 67 2d 62 75 66 66 65 72 20 62 75 66 66 6e 6d 29 0a 20 20 20 20 28 73 | create-log-buffer.buffnm).....(s |
| 2d40 | 65 74 71 20 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 28 65 | etq.buffer-read-only.nil).....(e |
| 2d60 | 72 61 73 65 2d 62 75 66 66 65 72 29 29 29 0a 0a 3b 3b 20 57 65 20 6e 65 65 64 73 20 74 68 69 73 | rase-buffer)))..;;.We.needs.this |
| 2d80 | 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 6c 75 | .signature.be.stay.for.other.plu |
| 2da0 | 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 72 73 | gins.compiled.with.this.old.vers |
| 2dc0 | 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 20 28 62 75 66 66 | ion.(defun.log4e--open-log.(buff |
| 2de0 | 6e 6d 29 0a 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 62 | nm)...(let*.((buff.(get-buffer.b |
| 2e00 | 75 66 66 6e 6d 29 29 29 0a 20 20 20 20 28 69 66 20 28 6e 6f 74 20 28 62 75 66 66 65 72 2d 6c 69 | uffnm))).....(if.(not.(buffer-li |
| 2e20 | 76 65 2d 70 20 62 75 66 66 29 29 0a 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 5b 4c | ve-p.buff)).........(message."[L |
| 2e40 | 6f 67 34 45 5d 20 4e 6f 74 20 65 78 69 73 74 20 6c 6f 67 20 62 75 66 66 65 72 2e 22 29 0a 20 20 | og4E].Not.exist.log.buffer.")... |
| 2e60 | 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 62 75 66 66 0a 20 20 | ....(with-current-buffer.buff... |
| 2e80 | 20 20 20 20 20 20 28 73 65 74 71 20 62 75 66 66 65 72 2d 72 65 61 64 2d 6f 6e 6c 79 20 74 29 29 | ......(setq.buffer-read-only.t)) |
| 2ea0 | 0a 20 20 20 20 20 20 28 70 6f 70 2d 74 6f 2d 62 75 66 66 65 72 20 62 75 66 66 29 29 29 29 0a 0a | .......(pop-to-buffer.buff)))).. |
| 2ec0 | 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 73 74 | ;;.We.needs.this.signature.be.st |
| 2ee0 | 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 77 69 | ay.for.other.plugins.compiled.wi |
| 2f00 | 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 34 65 | th.this.old.version.(defun.log4e |
| 2f20 | 2d 2d 6f 70 65 6e 2d 6c 6f 67 2d 69 66 2d 64 65 62 75 67 20 28 62 75 66 66 6e 6d 20 64 62 67 29 | --open-log-if-debug.(buffnm.dbg) |
| 2f40 | 0a 20 20 28 77 68 65 6e 20 64 62 67 0a 20 20 20 20 28 6c 6f 67 34 65 2d 2d 6f 70 65 6e 2d 6c 6f | ...(when.dbg.....(log4e--open-lo |
| 2f60 | 67 20 62 75 66 66 6e 6d 29 29 29 0a 0a 3b 3b 20 28 64 65 66 75 6e 20 6c 6f 67 34 65 2d 2d 73 65 | g.buffnm)))..;;.(defun.log4e--se |
| 2f80 | 6e 64 2d 72 65 70 6f 72 74 2d 69 66 2d 6e 6f 74 2d 64 65 62 75 67 20 28 62 75 66 66 6e 6d 20 64 | nd-report-if-not-debug.(buffnm.d |
| 2fa0 | 62 67 20 61 64 64 72 20 70 72 65 66 69 78 29 0a 3b 3b 20 20 20 28 6c 65 74 2a 20 28 28 62 75 66 | bg.addr.prefix).;;...(let*.((buf |
| 2fc0 | 66 20 28 67 65 74 2d 62 75 66 66 65 72 20 62 75 66 66 6e 6d 29 29 29 0a 3b 3b 20 20 20 20 20 28 | f.(get-buffer.buffnm))).;;.....( |
| 2fe0 | 77 68 65 6e 20 28 61 6e 64 20 28 6e 6f 74 20 64 62 67 29 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 | when.(and.(not.dbg).;;.......... |
| 3000 | 20 20 20 20 20 20 28 73 74 72 69 6e 67 70 20 61 64 64 72 29 0a 3b 3b 20 20 20 20 20 20 20 20 20 | ......(stringp.addr).;;......... |
| 3020 | 20 20 20 20 20 20 20 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 20 62 75 66 66 29 29 0a 3b 3b 20 | .......(buffer-live-p.buff)).;;. |
| 3040 | 20 20 20 20 20 20 28 72 65 70 6f 72 74 65 72 2d 73 75 62 6d 69 74 2d 62 75 67 2d 72 65 70 6f 72 | ......(reporter-submit-bug-repor |
| 3060 | 74 20 61 64 64 72 20 70 72 65 66 69 78 20 6e 69 6c 20 6e 69 6c 20 6e 69 6c 20 6e 69 6c 29 29 29 | t.addr.prefix.nil.nil.nil.nil))) |
| 3080 | 29 0a 0a 0a 28 64 65 66 6d 61 63 72 6f 20 6c 6f 67 34 65 3a 64 65 66 6c 6f 67 67 65 72 20 28 70 | )...(defmacro.log4e:deflogger.(p |
| 30a0 | 72 65 66 69 78 20 6d 73 67 74 6d 70 6c 20 74 69 6d 65 74 6d 70 6c 20 26 6f 70 74 69 6f 6e 61 6c | refix.msgtmpl.timetmpl.&optional |
| 30c0 | 20 6c 6f 67 2d 66 75 6e 63 74 69 6f 6e 2d 6e 61 6d 65 2d 63 75 73 74 6f 6d 2d 61 6c 69 73 74 29 | .log-function-name-custom-alist) |
| 30e0 | 0a 20 20 22 44 65 66 69 6e 65 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 73 20 6f 66 20 6c 6f 67 67 | ..."Define.the.functions.of.logg |
| 3100 | 69 6e 67 20 66 6f 72 20 79 6f 75 72 20 65 6c 69 73 70 2e 0a 0a 53 70 65 63 69 66 69 63 61 74 69 | ing.for.your.elisp...Specificati |
| 3120 | 6f 6e 3a 0a 20 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 66 65 61 74 75 72 65 73 20 61 72 65 20 | on:..The.following.features.are. |
| 3140 | 70 72 6f 76 69 64 65 64 20 62 79 20 65 76 61 6c 75 61 74 69 6e 67 20 74 68 69 73 2e 0a 20 2d 20 | provided.by.evaluating.this...-. |
| 3160 | 64 6f 20 6c 6f 67 67 69 6e 67 20 66 6f 72 20 65 61 63 68 20 6c 6f 67 20 6c 65 76 65 6c 2e 0a 20 | do.logging.for.each.log.level... |
| 3180 | 2d 20 73 65 74 20 6d 61 78 20 61 6e 64 20 6d 69 6e 20 6c 6f 67 20 6c 65 76 65 6c 2e 0a 20 2d 20 | -.set.max.and.min.log.level...-. |
| 31a0 | 73 77 69 74 63 68 20 6c 6f 67 67 69 6e 67 2e 0a 20 2d 20 73 77 69 74 63 68 20 64 65 62 75 67 67 | switch.logging...-.switch.debugg |
| 31c0 | 69 6e 67 2e 0a 20 2d 20 6f 70 65 6e 20 61 6e 64 20 63 6c 65 61 72 20 6c 6f 67 20 62 75 66 66 65 | ing...-.open.and.clear.log.buffe |
| 31e0 | 72 2e 0a 20 2d 20 73 65 6e 64 20 62 75 67 20 72 65 70 6f 72 74 20 66 6f 72 20 79 6f 75 2e 0a 20 | r...-.send.bug.report.for.you... |
| 3200 | 46 6f 72 20 64 65 74 61 69 6c 73 2c 20 73 65 65 20 46 75 6e 63 74 69 6f 6e 73 20 73 65 63 74 69 | For.details,.see.Functions.secti |
| 3220 | 6f 6e 2e 0a 0a 41 72 67 75 6d 65 6e 74 3a 0a 20 2d 20 50 52 45 46 49 58 20 69 73 20 73 74 72 69 | on...Argument:..-.PREFIX.is.stri |
| 3240 | 6e 67 20 61 73 20 79 6f 75 72 20 65 6c 69 73 70 20 70 72 65 66 69 78 2e 0a 20 2d 20 4d 53 47 54 | ng.as.your.elisp.prefix...-.MSGT |
| 3260 | 4d 50 4c 20 69 73 20 73 74 72 69 6e 67 20 61 73 20 66 6f 72 6d 61 74 20 6f 66 20 6c 6f 67 2e 0a | MPL.is.string.as.format.of.log.. |
| 3280 | 20 20 20 2d 20 25 74 20 3a 20 52 65 70 6c 61 63 65 64 20 77 69 74 68 20 74 69 6d 65 20 73 74 72 | ...-.%t.:.Replaced.with.time.str |
| 32a0 | 69 6e 67 2e 20 41 62 6f 75 74 20 69 74 2c 20 73 65 65 20 54 49 4d 45 54 4d 50 4c 20 61 72 67 75 | ing..About.it,.see.TIMETMPL.argu |
| 32c0 | 6d 65 6e 74 2e 0a 20 20 20 2d 20 25 6c 20 3a 20 52 65 70 6c 61 63 65 64 20 77 69 74 68 20 6c 6f | ment.....-.%l.:.Replaced.with.lo |
| 32e0 | 67 20 6c 65 76 65 6c 20 74 68 61 74 27 73 20 54 52 41 43 45 2c 20 44 45 42 55 47 2c 20 49 4e 46 | g.level.that's.TRACE,.DEBUG,.INF |
| 3300 | 4f 2c 20 57 41 52 4e 2c 20 45 52 52 4f 52 2c 20 46 41 54 41 4c 2e 0a 20 20 20 2d 20 25 6d 20 3a | O,.WARN,.ERROR,.FATAL.....-.%m.: |
| 3320 | 20 52 65 70 6c 61 63 65 64 20 77 69 74 68 20 6c 6f 67 20 6d 65 73 73 61 67 65 20 74 68 61 74 20 | .Replaced.with.log.message.that. |
| 3340 | 70 61 73 73 65 64 20 62 79 20 79 6f 75 2e 0a 20 2d 20 54 49 4d 45 54 4d 50 4c 20 69 73 20 73 74 | passed.by.you...-.TIMETMPL.is.st |
| 3360 | 72 69 6e 67 20 61 73 20 66 6f 72 6d 61 74 20 6f 66 20 74 69 6d 65 20 74 68 61 74 27 73 20 70 61 | ring.as.format.of.time.that's.pa |
| 3380 | 73 73 65 64 20 74 6f 20 60 66 6f 72 6d 61 74 2d 74 69 6d 65 2d 73 74 72 69 6e 67 27 2e 0a 20 2d | ssed.to.`format-time-string'...- |
| 33a0 | 20 4c 4f 47 2d 46 55 4e 43 54 49 4f 4e 2d 4e 41 4d 45 2d 43 55 53 54 4f 4d 2d 41 4c 49 53 54 20 | .LOG-FUNCTION-NAME-CUSTOM-ALIST. |
| 33c0 | 69 73 20 61 6c 69 73 74 20 61 73 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 20 6e 61 6d 65 20 6f 66 | is.alist.as.the.function.name.of |
| 33e0 | 20 6c 6f 67 67 69 6e 67 2e 0a 20 20 20 2d 20 49 66 20 74 68 69 73 20 76 61 6c 75 65 20 69 73 20 | .logging.....-.If.this.value.is. |
| 3400 | 6e 69 6c 2c 20 64 65 66 69 6e 65 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 66 75 6e 63 74 69 | nil,.define.the.following.functi |
| 3420 | 6f 6e 73 2e 0a 20 20 20 20 20 20 79 6f 75 72 70 72 65 66 69 78 2d 2d 6c 6f 67 2d 74 72 61 63 65 | ons........yourprefix--log-trace |
| 3440 | 0a 20 20 20 20 20 20 79 6f 75 72 70 72 65 66 69 78 2d 2d 6c 6f 67 2d 64 65 62 75 67 0a 20 20 20 | .......yourprefix--log-debug.... |
| 3460 | 20 20 20 2e 2e 2e 0a 20 20 20 20 20 20 79 6f 75 72 70 72 65 66 69 78 2d 2d 6c 6f 67 2d 66 61 74 | .............yourprefix--log-fat |
| 3480 | 61 6c 0a 20 20 20 2d 20 49 66 20 79 6f 75 20 77 61 6e 74 20 74 6f 20 63 75 73 74 6f 6d 20 74 68 | al....-.If.you.want.to.custom.th |
| 34a0 | 65 20 6e 61 6d 65 20 6f 66 20 74 68 65 6d 2c 20 67 69 76 65 20 6c 69 6b 65 20 74 68 65 20 66 6f | e.name.of.them,.give.like.the.fo |
| 34c0 | 6c 6c 6f 77 69 6e 67 20 76 61 6c 75 65 2e 0a 20 20 20 20 20 20 5c 5c 3d 27 28 28 66 61 74 61 6c | llowing.value........\\='((fatal |
| 34e0 | 20 2e 20 5c 22 66 61 74 61 6c 5c 22 29 0a 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 2e 20 5c | ...\"fatal\").........(error...\ |
| 3500 | 22 65 72 72 6f 72 5c 22 29 0a 20 20 20 20 20 20 20 20 28 77 61 72 6e 20 20 2e 20 5c 22 77 61 72 | "error\").........(warn....\"war |
| 3520 | 6e 5c 22 29 0a 20 20 20 20 20 20 20 20 28 69 6e 66 6f 20 20 2e 20 5c 22 69 6e 66 6f 5c 22 29 0a | n\").........(info....\"info\"). |
| 3540 | 20 20 20 20 20 20 20 20 28 64 65 62 75 67 20 2e 20 5c 22 64 65 62 75 67 5c 22 29 0a 20 20 20 20 | ........(debug...\"debug\")..... |
| 3560 | 20 20 20 20 28 74 72 61 63 65 20 2e 20 5c 22 74 72 61 63 65 5c 22 29 29 0a 20 20 20 20 20 54 68 | ....(trace...\"trace\"))......Th |
| 3580 | 65 6e 2c 20 64 65 66 69 6e 65 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 66 75 6e 63 74 69 6f | en,.define.the.following.functio |
| 35a0 | 6e 73 2e 0a 20 20 20 20 20 20 79 6f 75 72 70 72 65 66 69 78 2d 2d 74 72 61 63 65 0a 20 20 20 20 | ns........yourprefix--trace..... |
| 35c0 | 20 20 79 6f 75 72 70 72 65 66 69 78 2d 2d 64 65 62 75 67 0a 20 20 20 20 20 20 2e 2e 2e 0a 20 20 | ..yourprefix--debug............. |
| 35e0 | 20 20 20 20 79 6f 75 72 70 72 65 66 69 78 2d 2d 66 61 74 61 6c 0a 0a 46 75 6e 63 74 69 6f 6e 73 | ....yourprefix--fatal..Functions |
| 3600 | 3a 0a 20 4c 69 73 74 20 61 6c 6c 20 66 75 6e 63 74 69 6f 6e 73 20 64 65 66 69 6e 65 64 20 62 65 | :..List.all.functions.defined.be |
| 3620 | 6c 6f 77 2e 20 50 52 45 46 49 58 20 69 73 20 79 6f 75 72 20 70 72 65 66 69 78 2e 0a 20 2d 20 50 | low..PREFIX.is.your.prefix...-.P |
| 3640 | 52 45 46 49 58 2d 2d 6c 6f 67 2d 66 61 74 61 6c 20 20 20 20 2e 2e 2e 20 23 31 0a 20 2d 20 50 52 | REFIX--log-fatal........#1..-.PR |
| 3660 | 45 46 49 58 2d 2d 6c 6f 67 2d 65 72 72 6f 72 20 20 20 20 2e 2e 2e 20 23 31 0a 20 2d 20 50 52 45 | EFIX--log-error........#1..-.PRE |
| 3680 | 46 49 58 2d 2d 6c 6f 67 2d 77 61 72 6e 20 20 20 20 20 2e 2e 2e 20 23 31 0a 20 2d 20 50 52 45 46 | FIX--log-warn.........#1..-.PREF |
| 36a0 | 49 58 2d 2d 6c 6f 67 2d 69 6e 66 6f 20 20 20 20 20 2e 2e 2e 20 23 31 0a 20 2d 20 50 52 45 46 49 | IX--log-info.........#1..-.PREFI |
| 36c0 | 58 2d 2d 6c 6f 67 2d 64 65 62 75 67 20 20 20 20 2e 2e 2e 20 23 31 0a 20 2d 20 50 52 45 46 49 58 | X--log-debug........#1..-.PREFIX |
| 36e0 | 2d 2d 6c 6f 67 2d 74 72 61 63 65 20 20 20 20 2e 2e 2e 20 23 31 0a 20 2d 20 50 52 45 46 49 58 2d | --log-trace........#1..-.PREFIX- |
| 3700 | 2d 6c 6f 67 2d 66 61 74 61 6c 2a 20 20 20 2e 2e 2e 20 23 32 0a 20 2d 20 50 52 45 46 49 58 2d 2d | -log-fatal*.......#2..-.PREFIX-- |
| 3720 | 6c 6f 67 2d 65 72 72 6f 72 2a 20 20 20 2e 2e 2e 20 23 32 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c | log-error*.......#2..-.PREFIX--l |
| 3740 | 6f 67 2d 77 61 72 6e 2a 20 20 20 20 2e 2e 2e 20 23 32 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f | og-warn*........#2..-.PREFIX--lo |
| 3760 | 67 2d 69 6e 66 6f 2a 20 20 20 20 2e 2e 2e 20 23 32 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 | g-info*........#2..-.PREFIX--log |
| 3780 | 2d 64 65 62 75 67 2a 20 20 20 2e 2e 2e 20 23 32 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d | -debug*.......#2..-.PREFIX--log- |
| 37a0 | 74 72 61 63 65 2a 20 20 20 2e 2e 2e 20 23 32 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 0a 20 | trace*.......#2..-.PREFIX--log.. |
| 37c0 | 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 73 65 74 2d 6c 65 76 65 6c 0a 20 2d 20 50 52 45 46 49 | -.PREFIX--log-set-level..-.PREFI |
| 37e0 | 58 2d 2d 6c 6f 67 2d 65 6e 61 62 6c 65 2d 6c 6f 67 67 69 6e 67 20 20 20 20 20 20 20 20 20 20 20 | X--log-enable-logging........... |
| 3800 | 20 2e 2e 2e 20 23 33 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 64 69 73 61 62 6c 65 2d 6c | .....#3..-.PREFIX--log-disable-l |
| 3820 | 6f 67 67 69 6e 67 20 20 20 20 20 20 20 20 20 20 20 2e 2e 2e 20 23 33 0a 20 2d 20 50 52 45 46 49 | ogging...............#3..-.PREFI |
| 3840 | 58 2d 2d 6c 6f 67 2d 65 6e 61 62 6c 65 2d 6d 65 73 73 61 67 69 6e 67 20 20 20 20 20 20 20 20 20 | X--log-enable-messaging......... |
| 3860 | 20 2e 2e 2e 20 23 33 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 64 69 73 61 62 6c 65 2d 6d | .....#3..-.PREFIX--log-disable-m |
| 3880 | 65 73 73 61 67 69 6e 67 20 20 20 20 20 20 20 20 20 2e 2e 2e 20 23 33 0a 20 2d 20 50 52 45 46 49 | essaging.............#3..-.PREFI |
| 38a0 | 58 2d 2d 6c 6f 67 2d 65 6e 61 62 6c 65 2d 64 65 62 75 67 67 69 6e 67 20 20 20 20 20 20 20 20 20 | X--log-enable-debugging......... |
| 38c0 | 20 2e 2e 2e 20 23 33 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 64 69 73 61 62 6c 65 2d 64 | .....#3..-.PREFIX--log-disable-d |
| 38e0 | 65 62 75 67 67 69 6e 67 20 20 20 20 20 20 20 20 20 2e 2e 2e 20 23 33 0a 20 2d 20 50 52 45 46 49 | ebugging.............#3..-.PREFI |
| 3900 | 58 2d 2d 6c 6f 67 2d 64 65 62 75 67 67 69 6e 67 2d 70 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f | X--log-debugging-p..-.PREFIX--lo |
| 3920 | 67 2d 73 65 74 2d 63 6f 64 69 6e 67 2d 73 79 73 74 65 6d 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c | g-set-coding-system..-.PREFIX--l |
| 3940 | 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 0a 20 2d 20 50 52 | og-set-author-mail-address..-.PR |
| 3960 | 45 46 49 58 2d 2d 6c 6f 67 2d 63 6c 65 61 72 2d 6c 6f 67 20 20 20 20 20 20 20 20 20 20 20 20 20 | EFIX--log-clear-log............. |
| 3980 | 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 2d 6c | ........#3..-.PREFIX--log-open-l |
| 39a0 | 6f 67 20 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 50 52 | og......................#3..-.PR |
| 39c0 | 45 46 49 58 2d 2d 6c 6f 67 2d 6f 70 65 6e 2d 6c 6f 67 2d 69 66 2d 64 65 62 75 67 0a 0a 20 23 31 | EFIX--log-open-log-if-debug...#1 |
| 39e0 | 20 3a 20 59 6f 75 20 63 61 6e 20 63 75 73 74 6f 6d 69 7a 65 20 74 68 69 73 20 6e 61 6d 65 0a 20 | .:.You.can.customize.this.name.. |
| 3a00 | 23 32 20 3a 20 4e 61 6d 65 20 69 73 20 61 20 23 31 20 6e 61 6d 65 20 2b 20 5c 22 2a 5c 22 0a 20 | #2.:.Name.is.a.#1.name.+.\"*\".. |
| 3a20 | 23 33 20 3a 20 54 68 69 73 20 69 73 20 63 6f 6d 6d 61 6e 64 0a 0a 45 78 61 6d 70 6c 65 3a 0a 3b | #3.:.This.is.command..Example:.; |
| 3a40 | 3b 20 49 66 20 79 6f 75 20 64 65 76 65 6c 6f 70 20 65 6c 69 73 70 20 74 68 61 74 20 68 61 73 20 | ;.If.you.develop.elisp.that.has. |
| 3a60 | 70 72 65 66 69 78 20 5c 22 68 6f 67 65 5c 22 2c 0a 3b 3b 20 77 72 69 74 65 20 61 6e 64 20 65 76 | prefix.\"hoge\",.;;.write.and.ev |
| 3a80 | 61 6c 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 73 65 78 70 20 69 6e 20 79 6f 75 72 20 65 6c | al.the.following.sexp.in.your.el |
| 3aa0 | 69 73 70 20 66 69 6c 65 2e 0a 0a 20 28 72 65 71 75 69 72 65 20 5c 5c 3d 27 6c 6f 67 34 65 29 0a | isp.file....(require.\\='log4e). |
| 3ac0 | 20 28 6c 6f 67 34 65 3a 64 65 66 6c 6f 67 67 65 72 20 5c 22 68 6f 67 65 5c 22 20 5c 22 25 74 20 | .(log4e:deflogger.\"hoge\".\"%t. |
| 3ae0 | 5b 25 6c 5d 20 25 6d 5c 22 20 5c 22 25 48 3a 25 4d 3a 25 53 5c 22 29 0a 0a 3b 3b 20 45 76 61 6c | [%l].%m\".\"%H:%M:%S\")..;;.Eval |
| 3b00 | 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 65 6e 61 62 6c | .the.following..(hoge--log-enabl |
| 3b20 | 65 2d 6c 6f 67 67 69 6e 67 29 0a 0a 3b 3b 20 54 68 65 6e 2c 20 77 72 69 74 65 20 74 68 65 20 66 | e-logging)..;;.Then,.write.the.f |
| 3b40 | 6f 6c 6c 6f 77 69 6e 67 0a 0a 20 28 64 65 66 75 6e 20 68 6f 67 65 2d 64 6f 2d 68 6f 67 65 20 28 | ollowing...(defun.hoge-do-hoge.( |
| 3b60 | 68 6f 67 65 29 0a 20 20 20 28 69 66 20 28 6e 6f 74 20 28 73 74 72 69 6e 67 70 20 68 6f 67 65 29 | hoge)....(if.(not.(stringp.hoge) |
| 3b80 | 29 0a 20 20 20 20 20 20 20 28 68 6f 67 65 2d 2d 6c 6f 67 2d 66 61 74 61 6c 20 5c 22 66 61 69 6c | )........(hoge--log-fatal.\"fail |
| 3ba0 | 65 64 20 64 6f 20 68 6f 67 65 20 3a 20 68 6f 67 65 20 69 73 20 25 73 5c 22 20 68 6f 67 65 29 0a | ed.do.hoge.:.hoge.is.%s\".hoge). |
| 3bc0 | 20 20 20 20 20 28 68 6f 67 65 2d 2d 6c 6f 67 2d 64 65 62 75 67 20 5c 22 73 74 61 72 74 20 64 6f | .....(hoge--log-debug.\"start.do |
| 3be0 | 20 68 6f 67 65 20 61 62 6f 75 74 20 25 73 5c 22 20 68 6f 67 65 29 0a 20 20 20 20 20 28 6d 65 73 | .hoge.about.%s\".hoge)......(mes |
| 3c00 | 73 61 67 65 20 5c 22 68 6f 67 65 21 5c 22 29 0a 20 20 20 20 20 28 68 6f 67 65 2d 2d 6c 6f 67 2d | sage.\"hoge!\")......(hoge--log- |
| 3c20 | 69 6e 66 6f 20 5c 22 64 6f 6e 65 20 68 6f 67 65 20 61 62 6f 75 74 20 25 73 5c 22 20 68 6f 67 65 | info.\"done.hoge.about.%s\".hoge |
| 3c40 | 29 29 29 0a 0a 3b 3b 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 | )))..;;.Eval.the.following..(hog |
| 3c60 | 65 2d 64 6f 2d 68 6f 67 65 20 5c 22 48 4f 47 45 47 45 5c 22 29 0a 0a 3b 3b 20 44 6f 20 4d 2d 78 | e-do-hoge.\"HOGEGE\")..;;.Do.M-x |
| 3c80 | 20 68 6f 67 65 2d 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 | .hoge--log-open-log.;;.Open.the. |
| 3ca0 | 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 6c 6f 67 34 65 2d 68 | buffer.which.name.is.\".*log4e-h |
| 3cc0 | 6f 67 65 2a 5c 22 2e 20 54 68 65 20 62 75 66 66 65 72 20 73 74 72 69 6e 67 20 69 73 20 62 65 6c | oge*\"..The.buffer.string.is.bel |
| 3ce0 | 6f 77 0a 31 32 3a 33 34 3a 35 36 20 5b 49 4e 46 4f 20 5d 20 64 6f 6e 65 20 68 6f 67 65 20 61 62 | ow.12:34:56.[INFO.].done.hoge.ab |
| 3d00 | 6f 75 74 20 48 4f 47 45 47 45 0a 0a 3b 3b 20 45 76 61 6c 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e | out.HOGEGE..;;.Eval.the.followin |
| 3d20 | 67 0a 20 28 68 6f 67 65 2d 2d 6c 6f 67 2d 73 65 74 2d 6c 65 76 65 6c 20 5c 5c 3d 27 74 72 61 63 | g..(hoge--log-set-level.\\='trac |
| 3d40 | 65 29 0a 20 28 68 6f 67 65 2d 64 6f 2d 68 6f 67 65 20 5c 22 46 55 47 41 47 41 5c 22 29 0a 0a 3b | e)..(hoge-do-hoge.\"FUGAGA\")..; |
| 3d60 | 3b 20 44 6f 20 4d 2d 78 20 68 6f 67 65 2d 2d 6c 6f 67 2d 6f 70 65 6e 2d 6c 6f 67 0a 3b 3b 20 4f | ;.Do.M-x.hoge--log-open-log.;;.O |
| 3d80 | 70 65 6e 20 74 68 65 20 62 75 66 66 65 72 2e 20 69 74 73 20 73 74 72 69 6e 67 20 69 73 20 62 65 | pen.the.buffer..its.string.is.be |
| 3da0 | 6c 6f 77 0a 31 32 3a 33 34 3a 35 36 20 5b 49 4e 46 4f 20 5d 20 64 6f 6e 65 20 68 6f 67 65 20 61 | low.12:34:56.[INFO.].done.hoge.a |
| 3dc0 | 62 6f 75 74 20 48 4f 47 45 47 45 0a 31 32 3a 33 35 3a 34 33 20 5b 44 45 42 55 47 5d 20 73 74 61 | bout.HOGEGE.12:35:43.[DEBUG].sta |
| 3de0 | 72 74 20 64 6f 20 68 6f 67 65 20 61 62 6f 75 74 20 46 55 47 41 47 41 0a 31 32 3a 33 35 3a 34 33 | rt.do.hoge.about.FUGAGA.12:35:43 |
| 3e00 | 20 5b 49 4e 46 4f 20 5d 20 64 6f 6e 65 20 68 6f 67 65 20 61 62 6f 75 74 20 46 55 47 41 47 41 0a | .[INFO.].done.hoge.about.FUGAGA. |
| 3e20 | 20 0a 22 0a 20 20 28 64 65 63 6c 61 72 65 20 28 69 6e 64 65 6e 74 20 30 29 29 0a 20 20 28 69 66 | .."...(declare.(indent.0))...(if |
| 3e40 | 20 28 6f 72 20 28 6e 6f 74 20 28 73 74 72 69 6e 67 70 20 70 72 65 66 69 78 29 29 20 20 20 28 73 | .(or.(not.(stringp.prefix))...(s |
| 3e60 | 74 72 69 6e 67 3d 20 70 72 65 66 69 78 20 22 22 29 0a 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 | tring=.prefix."")...........(not |
| 3e80 | 20 28 73 74 72 69 6e 67 70 20 6d 73 67 74 6d 70 6c 29 29 20 20 28 73 74 72 69 6e 67 3d 20 6d 73 | .(stringp.msgtmpl))..(string=.ms |
| 3ea0 | 67 74 6d 70 6c 20 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 | gtmpl."")...........(not.(string |
| 3ec0 | 70 20 74 69 6d 65 74 6d 70 6c 29 29 20 28 73 74 72 69 6e 67 3d 20 74 69 6d 65 74 6d 70 6c 20 22 | p.timetmpl)).(string=.timetmpl." |
| 3ee0 | 22 29 29 0a 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 5b 4c 4f 47 34 45 5d 20 69 6e 76 61 | ")).......(message."[LOG4E].inva |
| 3f00 | 6c 69 64 20 61 72 67 75 6d 65 6e 74 20 6f 66 20 64 65 66 6c 6f 67 67 65 72 22 29 0a 20 20 20 20 | lid.argument.of.deflogger")..... |
| 3f20 | 28 6c 65 74 2a 20 28 28 62 75 66 73 79 6d 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 | (let*.((bufsym.(log4e--make-symb |
| 3f40 | 6f 6c 2d 6c 6f 67 2d 62 75 66 66 65 72 20 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 | ol-log-buffer.prefix)).......... |
| 3f60 | 20 20 28 6d 73 67 62 75 66 73 79 6d 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c | ..(msgbufsym.(log4e--make-symbol |
| 3f80 | 2d 6d 73 67 2d 62 75 66 66 65 72 20 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | -msg-buffer.prefix))............ |
| 3fa0 | 28 6c 6f 67 74 6d 70 6c 73 79 6d 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d | (logtmplsym.(log4e--make-symbol- |
| 3fc0 | 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 20 20 20 20 20 20 20 | log-template.prefix))........... |
| 3fe0 | 20 28 74 69 6d 65 74 6d 70 6c 73 79 6d 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f | .(timetmplsym.(log4e--make-symbo |
| 4000 | 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 20 | l-time-template.prefix))........ |
| 4020 | 20 20 20 20 28 6d 69 6e 6c 76 6c 73 79 6d 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 | ....(minlvlsym.(log4e--make-symb |
| 4040 | 6f 6c 2d 6d 69 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 20 20 | ol-min-level.prefix))........... |
| 4060 | 20 28 6d 61 78 6c 76 6c 73 79 6d 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d | .(maxlvlsym.(log4e--make-symbol- |
| 4080 | 6d 61 78 2d 6c 65 76 65 6c 20 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 74 | max-level.prefix))............(t |
| 40a0 | 67 6c 73 79 6d 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 74 6f 67 67 6c 65 | glsym.(log4e--make-symbol-toggle |
| 40c0 | 2d 6c 6f 67 67 69 6e 67 20 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 64 62 | -logging.prefix))............(db |
| 40e0 | 67 73 79 6d 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 74 6f 67 67 6c 65 2d | gsym.(log4e--make-symbol-toggle- |
| 4100 | 64 65 62 75 67 67 69 6e 67 20 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 | debugging.prefix))............(c |
| 4120 | 6f 64 73 79 73 73 79 6d 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 62 75 66 | odsyssym.(log4e--make-symbol-buf |
| 4140 | 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 29 0a 20 20 20 20 20 | fer-coding-system.prefix))...... |
| 4160 | 20 20 20 20 20 20 28 61 64 64 72 73 79 6d 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 | ......(addrsym.(log4e--make-symb |
| 4180 | 6f 6c 2d 61 75 74 68 6f 72 2d 6d 61 69 6c 2d 61 64 64 72 65 73 73 20 70 72 65 66 69 78 29 29 0a | ol-author-mail-address.prefix)). |
| 41a0 | 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 6e 6d 2d 61 6c 69 73 74 20 28 63 6c 2d 6c 6f 6f | ...........(funcnm-alist.(cl-loo |
| 41c0 | 70 20 77 69 74 68 20 63 75 73 74 6f 6d 2d 61 6c 69 73 74 20 3d 20 28 63 61 72 20 28 63 64 72 20 | p.with.custom-alist.=.(car.(cdr. |
| 41e0 | 6c 6f 67 2d 66 75 6e 63 74 69 6f 6e 2d 6e 61 6d 65 2d 63 75 73 74 6f 6d 2d 61 6c 69 73 74 29 29 | log-function-name-custom-alist)) |
| 4200 | 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 | ................................ |
| 4220 | 20 20 20 66 6f 72 20 6c 76 6c 20 69 6e 20 27 28 66 61 74 61 6c 20 65 72 72 6f 72 20 77 61 72 6e | ...for.lvl.in.'(fatal.error.warn |
| 4240 | 20 69 6e 66 6f 20 64 65 62 75 67 20 74 72 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | .info.debug.trace).............. |
| 4260 | 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 70 61 69 72 | .....................for.lvlpair |
| 4280 | 20 3d 20 28 61 73 73 71 20 6c 76 6c 20 63 75 73 74 6f 6d 2d 61 6c 69 73 74 29 0a 20 20 20 20 20 | .=.(assq.lvl.custom-alist)...... |
| 42a0 | 20 20 20 20 20 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 | .............................for |
| 42c0 | 20 66 6e 61 6d 65 20 3d 20 28 6f 72 20 28 63 64 72 2d 73 61 66 65 20 6c 76 6c 70 61 69 72 29 20 | .fname.=.(or.(cdr-safe.lvlpair). |
| 42e0 | 22 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | "")............................. |
| 4300 | 20 20 20 20 20 20 63 6f 6c 6c 65 63 74 20 28 6f 72 20 28 69 66 20 28 73 74 72 69 6e 67 2d 6d 61 | ......collect.(or.(if.(string-ma |
| 4320 | 74 63 68 20 22 5c 2a 22 20 66 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | tch."\*".fname)................. |
| 4340 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 4360 | 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ..(progn........................ |
| 4380 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 | .............................(me |
| 43a0 | 73 73 61 67 65 20 22 5b 4c 4f 47 34 45 5d 20 69 67 6e 6f 72 65 20 25 73 20 6c 65 76 65 6c 20 6e | ssage."[LOG4E].ignore.%s.level.n |
| 43c0 | 61 6d 65 20 69 6e 20 6c 6f 67 2d 66 75 6e 63 74 69 6f 6e 2d 6e 61 6d 65 2d 63 75 73 74 6f 6d 2d | ame.in.log-function-name-custom- |
| 43e0 | 61 6c 69 73 74 2e 20 63 61 6e 27 74 20 75 73 65 20 27 2a 27 20 66 6f 72 20 74 68 65 20 6e 61 6d | alist..can't.use.'*'.for.the.nam |
| 4400 | 65 2e 22 20 6c 76 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | e.".lvl)........................ |
| 4420 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c | .............................nil |
| 4440 | 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 | )............................... |
| 4460 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6c 76 6c 70 61 69 72 29 0a 20 20 20 20 20 | ..................lvlpair)...... |
| 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 20 20 20 20 20 28 61 73 73 71 20 6c 76 6c 20 6c 6f 67 34 65 2d 64 65 66 61 75 6c 74 | .........(assq.lvl.log4e-default |
| 44c0 | 2d 6c 6f 67 67 69 6e 67 2d 66 75 6e 63 74 69 6f 6e 2d 6e 61 6d 65 2d 61 6c 69 73 74 29 29 29 29 | -logging-function-name-alist)))) |
| 44e0 | 29 0a 20 20 20 20 20 20 60 28 70 72 6f 67 6e 0a 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 44 65 66 | ).......`(progn...........;;.Def |
| 4500 | 69 6e 65 20 76 61 72 69 61 62 6c 65 20 66 6f 72 20 70 72 65 66 69 78 0a 20 20 20 20 20 20 20 20 | ine.variable.for.prefix......... |
| 4520 | 20 28 64 65 66 76 61 72 20 2c 62 75 66 73 79 6d 20 28 66 6f 72 6d 61 74 20 22 20 2a 6c 6f 67 34 | .(defvar.,bufsym.(format.".*log4 |
| 4540 | 65 2d 25 73 2a 22 20 2c 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 76 61 | e-%s*".,prefix))..........(defva |
| 4560 | 72 20 2c 6c 6f 67 74 6d 70 6c 73 79 6d 20 2c 6d 73 67 74 6d 70 6c 29 0a 20 20 20 20 20 20 20 20 | r.,logtmplsym.,msgtmpl)......... |
| 4580 | 20 28 64 65 66 76 61 72 20 2c 74 69 6d 65 74 6d 70 6c 73 79 6d 20 2c 74 69 6d 65 74 6d 70 6c 29 | .(defvar.,timetmplsym.,timetmpl) |
| 45a0 | 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 76 61 72 20 2c 6d 69 6e 6c 76 6c 73 79 6d 20 27 69 6e | ..........(defvar.,minlvlsym.'in |
| 45c0 | 66 6f 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 76 61 72 20 2c 6d 61 78 6c 76 6c 73 79 6d 20 | fo)..........(defvar.,maxlvlsym. |
| 45e0 | 27 66 61 74 61 6c 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 76 61 72 20 2c 74 67 6c 73 79 6d | 'fatal)..........(defvar.,tglsym |
| 4600 | 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 76 61 72 20 2c 6d 73 67 62 75 66 73 79 | .nil)..........(defvar.,msgbufsy |
| 4620 | 6d 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 76 61 72 20 2c 64 62 67 73 79 6d 20 | m.nil)..........(defvar.,dbgsym. |
| 4640 | 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 76 61 72 20 2c 63 6f 64 73 79 73 73 79 6d | nil)..........(defvar.,codsyssym |
| 4660 | 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 76 61 72 20 2c 61 64 64 72 73 79 6d 20 | .nil)..........(defvar.,addrsym. |
| 4680 | 6e 69 6c 29 0a 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 44 65 66 69 6e 65 20 6c 65 76 65 6c 20 73 | nil)...........;;.Define.level.s |
| 46a0 | 65 74 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 | et.function..........(defun.,(in |
| 46c0 | 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 73 65 74 2d 6c | tern.(concat.prefix."--log-set-l |
| 46e0 | 65 76 65 6c 22 29 29 20 28 6d 69 6e 6c 65 76 65 6c 20 26 6f 70 74 69 6f 6e 61 6c 20 6d 61 78 6c | evel")).(minlevel.&optional.maxl |
| 4700 | 65 76 65 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 22 53 65 74 20 72 61 6e 67 65 20 66 6f 72 20 | evel)............"Set.range.for. |
| 4720 | 64 6f 69 6e 67 20 6c 6f 67 67 69 6e 67 2e 0a 0a 4d 49 4e 4c 45 56 45 4c 20 69 73 20 73 79 6d 62 | doing.logging...MINLEVEL.is.symb |
| 4740 | 6f 6c 20 6f 66 20 6c 6f 77 65 73 74 20 6c 65 76 65 6c 20 66 6f 72 20 64 6f 69 6e 67 20 6c 6f 67 | ol.of.lowest.level.for.doing.log |
| 4760 | 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 69 6e 66 6f 2e 0a 4d | ging..its.default.is.\\='info..M |
| 4780 | 41 58 4c 45 56 45 4c 20 69 73 20 73 79 6d 62 6f 6c 20 6f 66 20 68 69 67 68 65 73 74 20 6c 65 76 | AXLEVEL.is.symbol.of.highest.lev |
| 47a0 | 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 75 6c | el.for.doing.logging..its.defaul |
| 47c0 | 74 20 69 73 20 5c 5c 3d 27 66 61 74 61 6c 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 | t.is.\\='fatal."............(set |
| 47e0 | 71 20 2c 6d 69 6e 6c 76 6c 73 79 6d 20 6d 69 6e 6c 65 76 65 6c 29 0a 20 20 20 20 20 20 20 20 20 | q.,minlvlsym.minlevel).......... |
| 4800 | 20 20 28 73 65 74 71 20 2c 6d 61 78 6c 76 6c 73 79 6d 20 6d 61 78 6c 65 76 65 6c 29 29 0a 0a 20 | ..(setq.,maxlvlsym.maxlevel))... |
| 4820 | 20 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 74 6f 67 67 6c 65 | ........;;.Define.logging.toggle |
| 4840 | 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 65 | .function..........(defun.,(inte |
| 4860 | 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 65 6e 61 62 6c 65 2d | rn.(concat.prefix."--log-enable- |
| 4880 | 6c 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 45 6e 61 62 6c 65 | logging")).()............"Enable |
| 48a0 | 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.". |
| 48c0 | 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)........ |
| 48e0 | 20 20 20 20 28 73 65 74 71 20 2c 74 67 6c 73 79 6d 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 | ....(setq.,tglsym.t))..........( |
| 4900 | 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 22 2d | defun.,(intern.(concat.prefix."- |
| 4920 | 2d 6c 6f 67 2d 64 69 73 61 62 6c 65 2d 6c 6f 67 67 69 6e 67 22 29 29 20 28 29 0a 20 20 20 20 20 | -log-disable-logging")).()...... |
| 4940 | 20 20 20 20 20 20 22 44 69 73 61 62 6c 65 20 6c 6f 67 67 69 6e 67 20 62 79 20 6c 6f 67 67 69 6e | ......"Disable.logging.by.loggin |
| 4960 | 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 74 65 72 61 | g.functions."............(intera |
| 4980 | 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 73 79 6d 20 | ctive)............(setq.,tglsym. |
| 49a0 | 6e 69 6c 29 29 0a 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 44 65 66 69 6e 65 20 6d 65 73 73 61 67 | nil))...........;;.Define.messag |
| 49c0 | 69 6e 67 20 74 6f 67 67 6c 65 20 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 28 64 65 | ing.toggle.function..........(de |
| 49e0 | 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 6c | fun.,(intern.(concat.prefix."--l |
| 4a00 | 6f 67 2d 65 6e 61 62 6c 65 2d 6d 65 73 73 61 67 69 6e 67 22 29 29 20 28 26 6f 70 74 69 6f 6e 61 | og-enable-messaging")).(&optiona |
| 4a20 | 6c 20 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 22 45 6e 61 62 6c 65 20 64 75 6d | l.buffer)............"Enable.dum |
| 4a40 | 70 20 74 68 65 20 6c 6f 67 20 69 6e 74 6f 20 6f 74 68 65 72 20 62 75 66 66 65 72 20 62 79 20 6c | p.the.log.into.other.buffer.by.l |
| 4a60 | 6f 67 67 69 6e 67 20 66 75 6e 63 74 69 6f 6e 73 2e 0a 0a 42 55 46 46 45 52 20 69 73 20 61 20 62 | ogging.functions...BUFFER.is.a.b |
| 4a80 | 75 66 66 65 72 20 64 75 6d 70 65 64 20 6c 6f 67 20 69 6e 74 6f 2e 20 6e 69 6c 20 6d 65 61 6e 73 | uffer.dumped.log.into..nil.means |
| 4aa0 | 20 2a 4d 65 73 73 61 67 65 73 2a 20 62 75 66 66 65 72 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 | .*Messages*.buffer."............ |
| 4ac0 | 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 73 65 74 71 20 2c | (interactive)............(setq., |
| 4ae0 | 6d 73 67 62 75 66 73 79 6d 20 28 6f 72 20 62 75 66 66 65 72 20 74 29 29 29 0a 20 20 20 20 20 20 | msgbufsym.(or.buffer.t)))....... |
| 4b00 | 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 |
| 4b20 | 78 20 22 2d 2d 6c 6f 67 2d 64 69 73 61 62 6c 65 2d 6d 65 73 73 61 67 69 6e 67 22 29 29 20 28 29 | x."--log-disable-messaging")).() |
| 4b40 | 0a 20 20 20 20 20 20 20 20 20 20 20 22 44 69 73 61 62 6c 65 20 64 75 6d 70 20 74 68 65 20 6c 6f | ............"Disable.dump.the.lo |
| 4b60 | 67 20 69 6e 74 6f 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 | g.into.other.buffer.by.logging.f |
| 4b80 | 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 74 65 72 61 63 74 69 | unctions."............(interacti |
| 4ba0 | 76 65 29 0a 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 | ve)............(setq.,msgbufsym. |
| 4bc0 | 6e 69 6c 29 29 0a 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 44 65 66 69 6e 65 20 64 65 62 75 67 67 | nil))...........;;.Define.debugg |
| 4be0 | 69 6e 67 20 74 6f 67 67 6c 65 20 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 28 64 65 | ing.toggle.function..........(de |
| 4c00 | 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 6c | fun.,(intern.(concat.prefix."--l |
| 4c20 | 6f 67 2d 65 6e 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 | og-enable-debugging")).()....... |
| 4c40 | 20 20 20 20 20 22 45 6e 61 62 6c 65 20 64 65 62 75 67 67 69 6e 67 20 61 6e 64 20 6c 6f 67 67 69 | ....."Enable.debugging.and.loggi |
| 4c60 | 6e 67 2e 0a 0a 60 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 64 65 62 75 67 67 69 6e 67 2d 70 27 20 77 | ng...`PREFIX--log-debugging-p'.w |
| 4c80 | 69 6c 6c 20 72 65 74 75 72 6e 20 74 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 74 65 72 | ill.return.t."............(inter |
| 4ca0 | 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 73 79 6d | active)............(setq.,tglsym |
| 4cc0 | 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 2c 64 62 67 73 79 6d 20 74 29 29 | .t)............(setq.,dbgsym.t)) |
| 4ce0 | 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 |
| 4d00 | 74 20 70 72 65 66 69 78 20 22 2d 2d 6c 6f 67 2d 64 69 73 61 62 6c 65 2d 64 65 62 75 67 67 69 6e | t.prefix."--log-disable-debuggin |
| 4d20 | 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 20 64 65 62 75 | g")).()............"Disable.debu |
| 4d40 | 67 67 69 6e 67 2e 0a 0a 60 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 64 65 62 75 67 67 69 6e 67 2d 70 | gging...`PREFIX--log-debugging-p |
| 4d60 | 27 20 77 69 6c 6c 20 72 65 74 75 72 6e 20 6e 69 6c 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 28 | '.will.return.nil."............( |
| 4d80 | 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 73 65 74 71 20 2c 64 | interactive)............(setq.,d |
| 4da0 | 62 67 73 79 6d 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 75 6e 20 2c 28 69 6e | bgsym.nil))..........(defun.,(in |
| 4dc0 | 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 65 62 75 67 | tern.(concat.prefix."--log-debug |
| 4de0 | 67 69 6e 67 2d 70 22 29 29 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 2c 64 62 67 73 79 6d 29 | ging-p")).()............,dbgsym) |
| 4e00 | 0a 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 44 65 66 69 6e 65 20 63 6f 64 69 6e 67 20 73 79 73 74 | ...........;;.Define.coding.syst |
| 4e20 | 65 6d 20 73 65 74 20 66 75 6e 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 75 6e 20 2c | em.set.funtion..........(defun., |
| 4e40 | 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 73 65 | (intern.(concat.prefix."--log-se |
| 4e60 | 74 2d 63 6f 64 69 6e 67 2d 73 79 73 74 65 6d 22 29 29 20 28 63 6f 64 69 6e 67 2d 73 79 73 74 65 | t-coding-system")).(coding-syste |
| 4e80 | 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 22 53 65 74 20 63 68 61 72 73 65 74 20 61 6e 64 20 6c | m)............"Set.charset.and.l |
| 4ea0 | 69 6e 65 66 65 65 64 20 6f 66 20 4c 4f 47 2d 42 55 46 46 45 52 2e 0a 0a 43 4f 44 49 4e 47 2d 53 | inefeed.of.LOG-BUFFER...CODING-S |
| 4ec0 | 59 53 54 45 4d 20 69 73 20 73 79 6d 62 6f 6c 20 66 6f 72 20 73 65 74 74 69 6e 67 20 74 6f 20 60 | YSTEM.is.symbol.for.setting.to.` |
| 4ee0 | 62 75 66 66 65 72 2d 66 69 6c 65 2d 63 6f 64 69 6e 67 2d 73 79 73 74 65 6d 27 2e 0a 4c 4f 47 2d | buffer-file-coding-system'..LOG- |
| 4f00 | 42 55 46 46 45 52 20 69 73 20 61 20 62 75 66 66 65 72 20 77 68 69 63 68 20 6e 61 6d 65 20 69 73 | BUFFER.is.a.buffer.which.name.is |
| 4f20 | 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 20 | .\".*log4e-PREFIX*\".".......... |
| 4f40 | 20 20 28 73 65 74 71 20 2c 63 6f 64 73 79 73 73 79 6d 20 63 6f 64 69 6e 67 2d 73 79 73 74 65 6d | ..(setq.,codsyssym.coding-system |
| 4f60 | 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 |
| 4f80 | 6e 65 20 61 75 74 68 6f 72 20 6d 61 69 6c 20 73 65 74 20 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 | ne.author.mail.set.function..... |
| 4fa0 | 20 20 20 20 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 | .....;;..........(defun.,(intern |
| 4fc0 | 20 28 63 6f 6e 63 61 74 20 70 72 65 66 69 78 20 22 2d 2d 6c 6f 67 2d 73 65 74 2d 61 75 74 68 6f | .(concat.prefix."--log-set-autho |
| 4fe0 | 72 2d 6d 61 69 6c 2d 61 64 64 72 65 73 73 22 29 29 20 28 62 65 66 6f 72 65 2d 61 74 6d 61 72 6b | r-mail-address")).(before-atmark |
| 5000 | 20 61 66 74 65 72 2d 61 74 6d 61 72 6b 29 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 20 20 20 | .after-atmark)..........;;...... |
| 5020 | 20 20 20 20 20 20 22 53 65 74 20 6d 61 69 6c 20 61 64 64 72 65 73 73 20 6f 66 20 61 75 74 68 6f | ......"Set.mail.address.of.autho |
| 5040 | 72 20 66 6f 72 20 65 6c 69 73 70 20 74 68 61 74 20 68 61 73 20 50 52 45 46 49 58 2e 20 54 68 69 | r.for.elisp.that.has.PREFIX..Thi |
| 5060 | 73 20 76 61 6c 75 65 20 69 73 20 75 73 65 64 20 53 45 4e 44 2d 52 45 50 4f 52 54 2e 0a 0a 20 20 | s.value.is.used.SEND-REPORT..... |
| 5080 | 20 20 20 20 20 20 20 3b 3b 20 42 45 46 4f 52 45 2d 41 54 4d 41 52 4b 20 69 73 20 73 74 72 69 6e | .......;;.BEFORE-ATMARK.is.strin |
| 50a0 | 67 20 61 73 20 70 61 72 74 20 6f 66 20 6d 61 69 6c 20 61 64 64 72 65 73 73 2e 20 49 66 20 79 6f | g.as.part.of.mail.address..If.yo |
| 50c0 | 75 72 20 61 64 64 72 65 73 73 20 69 73 20 5c 22 68 6f 67 65 40 65 78 61 6d 70 6c 65 2e 63 6f 2e | ur.address.is.\"hoge@example.co. |
| 50e0 | 6a 70 5c 22 2c 20 69 74 20 69 73 20 5c 22 68 6f 67 65 5c 22 2e 0a 20 20 20 20 20 20 20 20 20 3b | jp\",.it.is.\"hoge\"...........; |
| 5100 | 3b 20 41 46 54 45 52 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 | ;.AFTER-ATMARK.is.string.as.part |
| 5120 | 20 6f 66 20 6d 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 | .of.mail.address..If.your.addres |
| 5140 | 73 20 69 73 20 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 | s.is.\"hoge@example.co.jp\",.it. |
| 5160 | 69 73 20 5c 22 65 78 61 6d 70 6c 65 2e 63 6f 2e 6a 70 5c 22 2e 0a 20 20 20 20 20 20 20 20 20 3b | is.\"example.co.jp\"...........; |
| 5180 | 3b 20 53 45 4e 44 2d 52 45 50 4f 52 54 20 69 73 20 60 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 73 65 | ;.SEND-REPORT.is.`PREFIX--log-se |
| 51a0 | 6e 64 2d 72 65 70 6f 72 74 2d 69 66 2d 6e 6f 74 2d 64 65 62 75 67 27 2e 22 0a 20 20 20 20 20 20 | nd-report-if-not-debug'."....... |
| 51c0 | 20 20 20 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 2c 61 64 64 72 73 79 6d 20 | ...;;............(setq.,addrsym. |
| 51e0 | 28 63 6f 6e 63 61 74 20 62 65 66 6f 72 65 2d 61 74 6d 61 72 6b 20 22 40 22 20 61 66 74 65 72 2d | (concat.before-atmark."@".after- |
| 5200 | 61 74 6d 61 72 6b 29 29 29 0a 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 44 65 66 69 6e 65 20 6c 6f | atmark)))...........;;.Define.lo |
| 5220 | 67 20 62 75 66 66 65 72 20 68 61 6e 64 6c 65 20 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 | g.buffer.handle.function........ |
| 5240 | 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 78 | ..(defun.,(intern.(concat.prefix |
| 5260 | 20 22 2d 2d 6c 6f 67 2d 63 6c 65 61 72 2d 6c 6f 67 22 29 29 20 28 29 0a 20 20 20 20 20 20 20 20 | ."--log-clear-log")).()......... |
| 5280 | 20 20 20 22 43 6c 65 61 72 20 62 75 66 66 65 72 20 73 74 72 69 6e 67 20 6f 66 20 62 75 66 66 65 | ..."Clear.buffer.string.of.buffe |
| 52a0 | 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 46 49 58 | r.which.name.is.\".*log4e-PREFIX |
| 52c0 | 2a 5c 22 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 | *\"."............(interactive).. |
| 52e0 | 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 34 65 2d 2d 63 6c 65 61 72 2d 6c 6f 67 20 2c 62 75 66 | ..........(log4e--clear-log.,buf |
| 5300 | 73 79 6d 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 20 28 | sym))..........(defun.,(intern.( |
| 5320 | 63 6f 6e 63 61 74 20 70 72 65 66 69 78 20 22 2d 2d 6c 6f 67 2d 6f 70 65 6e 2d 6c 6f 67 22 29 29 | concat.prefix."--log-open-log")) |
| 5340 | 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 22 4f 70 65 6e 20 62 75 66 66 65 72 20 77 68 69 63 | .()............"Open.buffer.whic |
| 5360 | 68 20 6e 61 6d 65 20 69 73 20 5c 22 20 2a 6c 6f 67 34 65 2d 50 52 45 46 49 58 2a 5c 22 2e 22 0a | h.name.is.\".*log4e-PREFIX*\".". |
| 5380 | 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)........ |
| 53a0 | 20 20 20 20 28 6c 6f 67 34 65 2d 2d 6f 70 65 6e 2d 6c 6f 67 20 2c 62 75 66 73 79 6d 29 29 0a 20 | ....(log4e--open-log.,bufsym)).. |
| 53c0 | 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 74 20 | ........(defun.,(intern.(concat. |
| 53e0 | 70 72 65 66 69 78 20 22 2d 2d 6c 6f 67 2d 6f 70 65 6e 2d 6c 6f 67 2d 69 66 2d 64 65 62 75 67 22 | prefix."--log-open-log-if-debug" |
| 5400 | 29 29 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 22 4f 70 65 6e 20 62 75 66 66 65 72 20 77 68 | )).()............"Open.buffer.wh |
| 5420 | 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 46 49 58 2a 5c 22 20 | ich.name.is.\".*log4e-PREFIX*\". |
| 5440 | 69 66 20 64 65 62 75 67 67 69 6e 67 20 69 73 20 65 6e 61 62 6c 65 64 2e 22 0a 20 20 20 20 20 20 | if.debugging.is.enabled."....... |
| 5460 | 20 20 20 20 20 28 6c 6f 67 34 65 2d 2d 6f 70 65 6e 2d 6c 6f 67 2d 69 66 2d 64 65 62 75 67 20 2c | .....(log4e--open-log-if-debug., |
| 5480 | 62 75 66 73 79 6d 20 2c 64 62 67 73 79 6d 29 29 0a 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 | bufsym.,dbgsym))...........;;... |
| 54a0 | 20 20 20 20 20 20 20 3b 3b 20 44 65 66 69 6e 65 20 72 65 70 6f 72 74 20 73 65 6e 64 20 66 75 6e | .......;;.Define.report.send.fun |
| 54c0 | 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 20 20 20 20 20 20 20 28 64 65 66 75 | ction..........;;..........(defu |
| 54e0 | 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 67 | n.,(intern.(concat.prefix."--log |
| 5500 | 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 22 29 29 20 28 29 0a | -send-report-if-not-debug")).(). |
| 5520 | 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 6e 64 20 62 75 67 | .........;;............"Send.bug |
| 5540 | 20 72 65 70 6f 72 74 20 74 6f 20 61 75 74 68 6f 72 20 69 66 20 64 65 62 75 67 67 69 6e 67 20 69 | .report.to.author.if.debugging.i |
| 5560 | 73 20 64 69 73 61 62 6c 65 64 2e 0a 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 54 68 65 20 61 75 74 | s.disabled............;;.The.aut |
| 5580 | 68 6f 72 20 6d 61 69 6c 61 64 64 72 65 73 73 20 69 73 20 73 65 74 20 62 79 20 60 50 52 45 46 49 | hor.mailaddress.is.set.by.`PREFI |
| 55a0 | 58 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 27 2e | X--log-set-author-mail-address'. |
| 55c0 | 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 41 62 6f 75 74 20 74 68 65 20 77 61 79 20 6f 66 20 73 65 | ..........;;.About.the.way.of.se |
| 55e0 | 6e 64 69 6e 67 20 62 75 67 20 72 65 70 6f 72 74 2c 20 73 65 65 20 60 72 65 70 6f 72 74 65 72 2d | nding.bug.report,.see.`reporter- |
| 5600 | 73 75 62 6d 69 74 2d 62 75 67 2d 72 65 70 6f 72 74 27 2e 22 0a 20 20 20 20 20 20 20 20 20 3b 3b | submit-bug-report'."..........;; |
| 5620 | 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 34 65 2d 2d 73 65 6e 64 2d 72 65 70 6f 72 74 2d | ............(log4e--send-report- |
| 5640 | 69 66 2d 6e 6f 74 2d 64 65 62 75 67 20 2c 62 75 66 73 79 6d 20 2c 64 62 67 73 79 6d 20 2c 61 64 | if-not-debug.,bufsym.,dbgsym.,ad |
| 5660 | 64 72 73 79 6d 20 2c 70 72 65 66 69 78 29 29 0a 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 44 65 66 | drsym.,prefix))...........;;.Def |
| 5680 | 69 6e 65 20 65 61 63 68 20 6c 65 76 65 6c 20 6c 6f 67 67 69 6e 67 20 66 75 6e 63 74 69 6f 6e 0a | ine.each.level.logging.function. |
| 56a0 | 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 6c 6f 67 67 65 | .........(log4e--def-level-logge |
| 56c0 | 72 20 2c 70 72 65 66 69 78 20 6e 69 6c 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 28 6c 6f 67 | r.,prefix.nil.nil)..........(log |
| 56e0 | 34 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 2c 28 61 | 4e--def-level-logger.,prefix.,(a |
| 5700 | 73 73 6f 63 2d 64 65 66 61 75 6c 74 20 27 66 61 74 61 6c 20 66 75 6e 63 6e 6d 2d 61 6c 69 73 74 | ssoc-default.'fatal.funcnm-alist |
| 5720 | 29 20 66 61 74 61 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 | ).fatal)..........(log4e--def-le |
| 5740 | 76 65 6c 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 | vel-logger.,prefix.,(assoc-defau |
| 5760 | 6c 74 20 27 65 72 72 6f 72 20 66 75 6e 63 6e 6d 2d 61 6c 69 73 74 29 20 65 72 72 6f 72 29 0a 20 | lt.'error.funcnm-alist).error).. |
| 5780 | 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 6c 6f 67 67 65 72 | ........(log4e--def-level-logger |
| 57a0 | 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 77 61 72 6e 20 20 | .,prefix.,(assoc-default.'warn.. |
| 57c0 | 66 75 6e 63 6e 6d 2d 61 6c 69 73 74 29 20 77 61 72 6e 29 0a 20 20 20 20 20 20 20 20 20 28 6c 6f | funcnm-alist).warn)..........(lo |
| 57e0 | 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 65 66 69 78 20 2c 28 | g4e--def-level-logger.,prefix.,( |
| 5800 | 61 73 73 6f 63 2d 64 65 66 61 75 6c 74 20 27 69 6e 66 6f 20 20 66 75 6e 63 6e 6d 2d 61 6c 69 73 | assoc-default.'info..funcnm-alis |
| 5820 | 74 29 20 69 6e 66 6f 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 | t).info)..........(log4e--def-le |
| 5840 | 76 65 6c 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 | vel-logger.,prefix.,(assoc-defau |
| 5860 | 6c 74 20 27 64 65 62 75 67 20 66 75 6e 63 6e 6d 2d 61 6c 69 73 74 29 20 64 65 62 75 67 29 0a 20 | lt.'debug.funcnm-alist).debug).. |
| 5880 | 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 6c 6f 67 67 65 72 | ........(log4e--def-level-logger |
| 58a0 | 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 74 72 61 63 65 20 | .,prefix.,(assoc-default.'trace. |
| 58c0 | 66 75 6e 63 6e 6d 2d 61 6c 69 73 74 29 20 74 72 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 0a 20 | funcnm-alist).trace)............ |
| 58e0 | 20 20 20 20 20 20 20 20 29 29 29 29 0a 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 | ........))))...;;;###autoload.(d |
| 5900 | 65 66 69 6e 65 2d 64 65 72 69 76 65 64 2d 6d 6f 64 65 20 6c 6f 67 34 65 2d 6d 6f 64 65 20 76 69 | efine-derived-mode.log4e-mode.vi |
| 5920 | 65 77 2d 6d 6f 64 65 20 22 4c 6f 67 34 45 22 0a 20 20 22 4d 61 6a 6f 72 20 6d 6f 64 65 20 66 6f | ew-mode."Log4E"..."Major.mode.fo |
| 5940 | 72 20 62 72 6f 77 73 69 6e 67 20 61 20 62 75 66 66 65 72 20 6d 61 64 65 20 62 79 20 6c 6f 67 34 | r.browsing.a.buffer.made.by.log4 |
| 5960 | 65 2e 0a 0a 5c 5c 3c 6c 6f 67 34 65 2d 6d 6f 64 65 2d 6d 61 70 3e 0a 5c 5c 7b 6c 6f 67 34 65 2d | e...\\<log4e-mode-map>.\\{log4e- |
| 5980 | 6d 6f 64 65 2d 6d 61 70 7d 22 0a 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6c 6f 67 34 65 2d 6d | mode-map}"...(define-key.log4e-m |
| 59a0 | 6f 64 65 2d 6d 61 70 20 28 6b 62 64 20 22 4a 22 29 20 27 6c 6f 67 34 65 3a 6e 65 78 74 2d 6c 6f | ode-map.(kbd."J").'log4e:next-lo |
| 59c0 | 67 29 0a 20 20 28 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 | g)...(define-key.log4e-mode-map. |
| 59e0 | 28 6b 62 64 20 22 4b 22 29 20 27 6c 6f 67 34 65 3a 70 72 65 76 69 6f 75 73 2d 6c 6f 67 29 29 0a | (kbd."K").'log4e:previous-log)). |
| 5a00 | 0a 28 64 65 66 75 6e 20 6c 6f 67 34 65 3a 6e 65 78 74 2d 6c 6f 67 20 28 29 0a 20 20 22 4d 6f 76 | .(defun.log4e:next-log.()..."Mov |
| 5a20 | 65 20 74 6f 20 73 74 61 72 74 20 6f 66 20 6e 65 78 74 20 6c 6f 67 20 6f 6e 20 6c 6f 67 34 65 2d | e.to.start.of.next.log.on.log4e- |
| 5a40 | 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 2a 20 28 | mode."...(interactive)...(let*.( |
| 5a60 | 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 20 6c 65 | (level)).....(while.(and.(not.le |
| 5a80 | 76 65 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3c 20 28 70 6f 69 6e 74 29 20 | vel).................(<.(point). |
| 5aa0 | 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 0a 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e | (point-max))).......(forward-lin |
| 5ac0 | 65 20 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 65 2d 2d 67 | e.1).......(setq.level.(log4e--g |
| 5ae0 | 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 0a 20 20 20 | et-current-log-line-level))).... |
| 5b00 | 20 6c 65 76 65 6c 29 29 0a 0a 28 64 65 66 75 6e 20 6c 6f 67 34 65 3a 70 72 65 76 69 6f 75 73 2d | .level))..(defun.log4e:previous- |
| 5b20 | 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 70 72 65 76 69 | log.()..."Move.to.start.of.previ |
| 5b40 | 6f 75 73 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 72 | ous.log.on.log4e-mode."...(inter |
| 5b60 | 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 77 | active)...(let*.((level)).....(w |
| 5b80 | 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 20 | hile.(and.(not.level)........... |
| 5ba0 | 20 20 20 20 20 20 28 3e 20 28 70 6f 69 6e 74 29 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 29 0a 20 | ......(>.(point).(point-min))).. |
| 5bc0 | 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 2d 31 29 0a 20 20 20 20 20 20 28 73 65 | .....(forward-line.-1).......(se |
| 5be0 | 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 |
| 5c00 | 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 3b 3b 3b 23 | -line-level))).....level))..;;;# |
| 5c20 | 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 6c 6f 67 34 65 3a 69 6e 73 65 72 74 2d 73 | ##autoload.(defun.log4e:insert-s |
| 5c40 | 74 61 72 74 2d 6c 6f 67 2d 71 75 69 63 6b 6c 79 20 28 29 0a 20 20 22 49 6e 73 65 72 74 20 6c 6f | tart-log-quickly.()..."Insert.lo |
| 5c60 | 67 67 69 6e 67 20 73 74 61 74 6d 65 6e 74 20 66 6f 72 20 74 72 61 63 65 20 6c 65 76 65 6c 20 6c | gging.statment.for.trace.level.l |
| 5c80 | 6f 67 20 61 74 20 73 74 61 72 74 20 6f 66 20 63 75 72 72 65 6e 74 20 66 75 6e 63 74 69 6f 6e 2f | og.at.start.of.current.function/ |
| 5ca0 | 6d 61 63 72 6f 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 2a 20 | macro."...(interactive)...(let*. |
| 5cc0 | 28 28 66 73 74 61 72 74 70 74 20 28 77 68 65 6e 20 28 72 65 2d 73 65 61 72 63 68 2d 62 61 63 6b | ((fstartpt.(when.(re-search-back |
| 5ce0 | 77 61 72 64 20 22 28 5c 5c 28 3f 3a 64 65 66 75 6e 5c 5c 7c 64 65 66 6d 61 63 72 6f 5c 5c 7c 64 | ward."(\\(?:defun\\|defmacro\\|d |
| 5d00 | 65 66 73 75 62 73 74 5c 5c 29 5c 5c 2a 3f 20 2b 5c 5c 28 5b 5e 20 5d 2b 5c 5c 29 20 2b 28 5c 5c | efsubst\\)\\*?.+\\([^.]+\\).+(\\ |
| 5d20 | 28 5b 5e 29 5d 2a 5c 5c 29 29 22 20 6e 69 6c 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | ([^)]*\\))".nil.t).............. |
| 5d40 | 20 20 20 20 20 20 20 20 28 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 6e 63 6e | ........(point)))..........(fncn |
| 5d60 | 6d 20 28 77 68 65 6e 20 66 73 74 61 72 74 70 74 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 2d 6e | m.(when.fstartpt.(match-string-n |
| 5d80 | 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 31 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 61 72 67 74 | o-properties.1)))..........(argt |
| 5da0 | 65 78 74 20 28 77 68 65 6e 20 66 73 74 61 72 74 70 74 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 | ext.(when.fstartpt.(match-string |
| 5dc0 | 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 32 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 70 72 | -no-properties.2)))..........(pr |
| 5de0 | 65 66 69 78 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 | efix.(save-excursion............ |
| 5e00 | 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a | ........(goto-char.(point-min)). |
| 5e20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 77 68 69 6c | ...................(cl-loop.whil |
| 5e40 | 65 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 28 6c 6f 67 34 65 3a 64 65 66 | e.(re-search-forward."(log4e:def |
| 5e60 | 6c 6f 67 67 65 72 5b 20 5c 6e 5d 2b 5c 22 5c 5c 28 5b 5e 5c 22 5d 2b 5c 5c 29 5c 22 22 20 6e 69 | logger[.\n]+\"\\([^\"]+\\)\"".ni |
| 5e80 | 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 20 20 20 20 20 20 | l.t)............................ |
| 5ea0 | 20 66 6f 72 20 70 72 65 66 69 78 20 3d 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 2d 6e 6f 2d 70 | .for.prefix.=.(match-string-no-p |
| 5ec0 | 72 6f 70 65 72 74 69 65 73 20 31 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | roperties.1).................... |
| 5ee0 | 20 20 20 20 20 20 20 20 20 66 6f 72 20 63 75 72 72 66 61 63 65 20 3d 20 28 67 65 74 2d 74 65 78 | .........for.currface.=.(get-tex |
| 5f00 | 74 2d 70 72 6f 70 65 72 74 79 20 28 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 30 29 20 27 | t-property.(match-beginning.0).' |
| 5f20 | 66 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 | face)........................... |
| 5f40 | 20 20 69 66 20 28 6e 6f 74 20 28 65 71 20 63 75 72 72 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 | ..if.(not.(eq.currface.'font-loc |
| 5f60 | 6b 2d 63 6f 6d 6d 65 6e 74 2d 66 61 63 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | k-comment-face))................ |
| 5f80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 74 75 72 6e 20 70 72 65 66 69 78 29 29 29 29 0a 20 | .............return.prefix)))).. |
| 5fa0 | 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 66 73 74 61 72 74 70 74 20 70 72 65 66 69 78 29 0a 20 | ...(when.(and.fstartpt.prefix).. |
| 5fc0 | 20 20 20 20 20 28 6c 65 74 2a 20 28 28 66 6e 63 6e 6d 20 28 72 65 70 6c 61 63 65 2d 72 65 67 65 | .....(let*.((fncnm.(replace-rege |
| 5fe0 | 78 70 2d 69 6e 2d 73 74 72 69 6e 67 20 28 63 6f 6e 63 61 74 20 22 5c 5c 60 22 20 70 72 65 66 69 | xp-in-string.(concat."\\`".prefi |
| 6000 | 78 20 22 5b 5e 61 2d 7a 41 2d 5a 30 2d 39 5d 2b 22 29 20 22 22 20 66 6e 63 6e 6d 29 29 0a 20 20 | x."[^a-zA-Z0-9]+")."".fncnm))... |
| 6020 | 20 20 20 20 20 20 20 20 20 20 20 28 66 6e 63 6e 6d 20 28 72 65 70 6c 61 63 65 2d 72 65 67 65 78 | ...........(fncnm.(replace-regex |
| 6040 | 70 2d 69 6e 2d 73 74 72 69 6e 67 20 22 2d 22 20 22 20 22 20 66 6e 63 6e 6d 29 29 0a 20 20 20 20 | p-in-string."-".".".fncnm))..... |
| 6060 | 20 20 20 20 20 20 20 20 20 28 61 72 67 74 65 78 74 20 28 72 65 70 6c 61 63 65 2d 72 65 67 65 78 | .........(argtext.(replace-regex |
| 6080 | 70 2d 69 6e 2d 73 74 72 69 6e 67 20 22 5c 6e 22 20 22 20 22 20 61 72 67 74 65 78 74 29 29 0a 20 | p-in-string."\n".".".argtext)).. |
| 60a0 | 20 20 20 20 20 20 20 20 20 20 20 20 28 61 72 67 74 65 78 74 20 28 72 65 70 6c 61 63 65 2d 72 65 | ............(argtext.(replace-re |
| 60c0 | 67 65 78 70 2d 69 6e 2d 73 74 72 69 6e 67 20 22 5e 20 2b 22 20 22 22 20 61 72 67 74 65 78 74 29 | gexp-in-string."^.+"."".argtext) |
| 60e0 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 72 67 74 65 78 74 20 28 72 65 70 6c 61 63 65 | )..............(argtext.(replace |
| 6100 | 2d 72 65 67 65 78 70 2d 69 6e 2d 73 74 72 69 6e 67 20 22 20 2b 24 22 20 22 22 20 61 72 67 74 65 | -regexp-in-string.".+$"."".argte |
| 6120 | 78 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 72 67 73 20 28 73 70 6c 69 74 2d 73 | xt))..............(args.(split-s |
| 6140 | 74 72 69 6e 67 20 61 72 67 74 65 78 74 20 22 20 2b 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | tring.argtext.".+"))............ |
| 6160 | 20 20 28 61 72 67 73 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 61 72 67 20 69 6e 20 61 72 67 73 | ..(args.(cl-loop.for.arg.in.args |
| 6180 | 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 69 66 20 | .............................if. |
| 61a0 | 28 61 6e 64 20 28 6e 6f 74 20 28 73 74 72 69 6e 67 3d 20 61 72 67 20 22 22 29 29 0a 20 20 20 20 | (and.(not.(string=.arg.""))..... |
| 61c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 61e0 | 28 6e 6f 74 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 5c 5c 60 26 22 20 61 72 67 29 29 29 | (not.(string-match."\\`&".arg))) |
| 6200 | 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 63 6f 6c | .............................col |
| 6220 | 6c 65 63 74 20 61 72 67 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 74 65 78 74 | lect.arg))..............(logtext |
| 6240 | 20 28 63 6c 2d 6c 6f 6f 70 20 77 69 74 68 20 72 65 74 20 3d 20 28 66 6f 72 6d 61 74 20 22 73 74 | .(cl-loop.with.ret.=.(format."st |
| 6260 | 61 72 74 20 25 73 2e 22 20 66 6e 63 6e 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | art.%s.".fncnm)................. |
| 6280 | 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 20 61 72 67 73 0a 20 | ...............for.arg.in.args.. |
| 62a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 6f | ..............................do |
| 62c0 | 20 28 73 65 74 71 20 72 65 74 20 28 63 6f 6e 63 61 74 20 72 65 74 20 22 20 22 20 61 72 67 20 22 | .(setq.ret.(concat.ret.".".arg." |
| 62e0 | 5b 25 73 5d 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | [%s]"))......................... |
| 6300 | 20 20 20 20 20 20 20 66 69 6e 61 6c 6c 79 20 72 65 74 75 72 6e 20 72 65 74 29 29 0a 20 20 20 20 | .......finally.return.ret))..... |
| 6320 | 20 20 20 20 20 20 20 20 20 28 73 65 78 70 66 6f 72 6d 61 74 20 28 63 6c 2d 6c 6f 6f 70 20 77 69 | .........(sexpformat.(cl-loop.wi |
| 6340 | 74 68 20 72 65 74 20 3d 20 22 28 25 73 2d 2d 6c 6f 67 20 27 74 72 61 63 65 20 5c 22 25 73 5c 22 | th.ret.=."(%s--log.'trace.\"%s\" |
| 6360 | 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | "............................... |
| 6380 | 20 20 20 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 | ....for.arg.in.args............. |
| 63a0 | 20 20 20 20 20 20 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 | ......................do.(setq.r |
| 63c0 | 65 74 20 28 63 6f 6e 63 61 74 20 72 65 74 20 22 20 25 73 22 29 29 0a 20 20 20 20 20 20 20 20 20 | et.(concat.ret.".%s")).......... |
| 63e0 | 20 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 |
| 6400 | 20 72 65 74 75 72 6e 20 28 63 6f 6e 63 61 74 20 72 65 74 20 22 29 22 29 29 29 0a 20 20 20 20 20 | .return.(concat.ret.")")))...... |
| 6420 | 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 74 65 78 74 20 28 61 70 70 6c 79 20 27 66 6f 72 6d | ........(inserttext.(apply.'form |
| 6440 | 61 74 20 73 65 78 70 66 6f 72 6d 61 74 20 70 72 65 66 69 78 20 6c 6f 67 74 65 78 74 20 61 72 67 | at.sexpformat.prefix.logtext.arg |
| 6460 | 73 29 29 29 0a 20 20 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 63 68 61 72 29 0a 20 20 20 20 | s))).........(forward-char)..... |
| 6480 | 20 20 20 20 28 66 6f 72 77 61 72 64 2d 73 65 78 70 20 33 29 0a 20 20 20 20 20 20 20 20 28 77 68 | ....(forward-sexp.3).........(wh |
| 64a0 | 65 6e 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 5c 5c 3d 5b 20 5c 6e 5d 2b | en.(re-search-forward."\\=[.\n]+ |
| 64c0 | 5c 22 22 20 6e 69 6c 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 63 68 | \"".nil.t)...........(forward-ch |
| 64e0 | 61 72 20 2d 31 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 73 65 78 70 29 29 | ar.-1)...........(forward-sexp)) |
| 6500 | 0a 20 20 20 20 20 20 20 20 28 6e 65 77 6c 69 6e 65 2d 61 6e 64 2d 69 6e 64 65 6e 74 29 0a 20 20 | .........(newline-and-indent)... |
| 6520 | 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 69 6e 73 65 72 74 74 65 78 74 29 29 29 29 29 0a 0a 0a | ......(insert.inserttext)))))... |
| 6540 | 28 70 72 6f 76 69 64 65 20 27 6c 6f 67 34 65 29 0a 3b 3b 3b 20 6c 6f 67 34 65 2e 65 6c 20 65 6e | (provide.'log4e).;;;.log4e.el.en |
| 6560 | 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ds.here......................... |
| 6580 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 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: 2fd83be35da0402278c3ef2d16cf1f37071356fb (plain)