| ofs | hex dump | ascii |
|---|
| 0000 | 70 6f 73 2d 74 69 70 2d 32 30 32 34 30 32 30 39 2e 38 33 37 2f 00 00 00 00 00 00 00 00 00 00 00 | pos-tip-20240209.837/........... |
| 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 33 33 30 00 20 35 00 00 00 | 0000000.00000000000.012330..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 | 70 6f 73 2d 74 69 70 2d 32 30 32 34 30 32 30 39 2e 38 33 37 2f 70 6f 73 2d 74 69 70 2d 70 6b 67 | pos-tip-20240209.837/pos-tip-pkg |
| 0220 | 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .el............................. |
| 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 34 32 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 30 32 32 00 20 30 00 00 00 | 0000422.00000000000.015022..0... |
| 02a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 02c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 02e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0300 | 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .ustar...root................... |
| 0320 | 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .........root................... |
| 0340 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0360 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0380 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 03a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 03c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 03e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0400 | 3b 3b 20 2d 2a 2d 20 6e 6f 2d 62 79 74 65 2d 63 6f 6d 70 69 6c 65 3a 20 74 3b 20 6c 65 78 69 63 | ;;.-*-.no-byte-compile:.t;.lexic |
| 0420 | 61 6c 2d 62 69 6e 64 69 6e 67 3a 20 6e 69 6c 20 2d 2a 2d 0a 28 64 65 66 69 6e 65 2d 70 61 63 6b | al-binding:.nil.-*-.(define-pack |
| 0440 | 61 67 65 20 22 70 6f 73 2d 74 69 70 22 20 22 32 30 32 34 30 32 30 39 2e 38 33 37 22 0a 20 20 22 | age."pos-tip"."20240209.837"..." |
| 0460 | 53 68 6f 77 20 74 6f 6f 6c 74 69 70 20 61 74 20 70 6f 69 6e 74 2e 22 0a 20 20 28 29 0a 20 20 3a | Show.tooltip.at.point."...()...: |
| 0480 | 75 72 6c 20 22 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 70 69 74 6b 61 6c 69 2f | url."https://github.com/pitkali/ |
| 04a0 | 70 6f 73 2d 74 69 70 22 0a 20 20 3a 63 6f 6d 6d 69 74 20 22 34 38 38 39 65 30 38 63 66 39 30 37 | pos-tip"...:commit."4889e08cf907 |
| 04c0 | 37 63 38 35 38 39 65 61 36 66 65 61 34 65 32 63 65 35 35 38 36 31 34 64 66 63 64 65 22 0a 20 20 | 7c8589ea6fea4e2ce558614dfcde"... |
| 04e0 | 3a 72 65 76 64 65 73 63 20 22 34 38 38 39 65 30 38 63 66 39 30 37 22 0a 20 20 3a 6b 65 79 77 6f | :revdesc."4889e08cf907"...:keywo |
| 0500 | 72 64 73 20 27 28 22 74 6f 6f 6c 74 69 70 22 29 29 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | rds.'("tooltip"))............... |
| 0520 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0540 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0560 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0580 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 05a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 05c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 05e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0600 | 70 6f 73 2d 74 69 70 2d 32 30 32 34 30 32 30 39 2e 38 33 37 2f 70 6f 73 2d 74 69 70 2e 65 6c 00 | pos-tip-20240209.837/pos-tip.el. |
| 0620 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0640 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0660 | 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 | ....0000644.0000000.0000000.0000 |
| 0680 | 30 31 30 36 30 37 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 32 35 33 00 20 30 00 00 00 | 0106072.00000000000.014253..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 70 6f 73 2d 74 69 70 2e 65 6c 20 2d 2d 2d 20 53 68 6f 77 20 74 6f 6f 6c 74 69 70 20 | ;;;.pos-tip.el.---.Show.tooltip. |
| 0820 | 61 74 20 70 6f 69 6e 74 20 2d 2a 2d 20 63 6f 64 69 6e 67 3a 20 75 74 66 2d 38 20 2d 2a 2d 0a 0a | at.point.-*-.coding:.utf-8.-*-.. |
| 0840 | 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 30 20 53 2e 20 49 72 69 65 0a 0a 3b | ;;.Copyright.(C).2010.S..Irie..; |
| 0860 | 3b 20 41 75 74 68 6f 72 3a 20 53 2e 20 49 72 69 65 0a 3b 3b 20 4d 61 69 6e 74 61 69 6e 65 72 3a | ;.Author:.S..Irie.;;.Maintainer: |
| 0880 | 20 53 2e 20 49 72 69 65 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 54 6f 6f 6c 74 69 70 0a 0a 3b | .S..Irie.;;.Keywords:.Tooltip..; |
| 08a0 | 3b 20 50 61 63 6b 61 67 65 2d 56 65 72 73 69 6f 6e 3a 20 32 30 32 34 30 32 30 39 2e 38 33 37 0a | ;.Package-Version:.20240209.837. |
| 08c0 | 3b 3b 20 50 61 63 6b 61 67 65 2d 52 65 76 69 73 69 6f 6e 3a 20 34 38 38 39 65 30 38 63 66 39 30 | ;;.Package-Revision:.4889e08cf90 |
| 08e0 | 37 0a 0a 28 64 65 66 63 6f 6e 73 74 20 70 6f 73 2d 74 69 70 2d 76 65 72 73 69 6f 6e 20 22 30 2e | 7..(defconst.pos-tip-version."0. |
| 0900 | 34 2e 37 22 29 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 66 72 65 65 20 73 | 4.7")..;;.This.program.is.free.s |
| 0920 | 6f 66 74 77 61 72 65 3b 20 79 6f 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 | oftware;.you.can.redistribute.it |
| 0940 | 20 61 6e 64 2f 6f 72 0a 3b 3b 20 6d 6f 64 69 66 79 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 | .and/or.;;.modify.it.under.the.t |
| 0960 | 65 72 6d 73 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c | erms.of.the.GNU.General.Public.L |
| 0980 | 69 63 65 6e 73 65 20 61 73 0a 3b 3b 20 70 75 62 6c 69 73 68 65 64 20 62 79 20 74 68 65 20 46 72 | icense.as.;;.published.by.the.Fr |
| 09a0 | 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 3b 20 65 69 74 68 65 72 20 76 | ee.Software.Foundation;.either.v |
| 09c0 | 65 72 73 69 6f 6e 20 32 2c 20 6f 72 0a 3b 3b 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f 6e 29 | ersion.2,.or.;;.(at.your.option) |
| 09e0 | 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 0a 3b 3b 20 49 74 20 69 73 20 64 69 | .any.later.version...;;.It.is.di |
| 0a00 | 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 20 69 74 20 77 69 | stributed.in.the.hope.that.it.wi |
| 0a20 | 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 20 62 75 74 20 57 49 54 48 4f 55 54 0a 3b 3b 20 41 4e 59 | ll.be.useful,.but.WITHOUT.;;.ANY |
| 0a40 | 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 65 20 69 6d 70 6c | .WARRANTY;.without.even.the.impl |
| 0a60 | 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 0a | ied.warranty.of.MERCHANTABILITY. |
| 0a80 | 3b 3b 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 | ;;.or.FITNESS.FOR.A.PARTICULAR.P |
| 0aa0 | 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 | URPOSE...See.the.GNU.General.Pub |
| 0ac0 | 6c 69 63 0a 3b 3b 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e | lic.;;.License.for.more.details. |
| 0ae0 | 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 76 65 64 20 61 20 | ..;;.You.should.have.received.a. |
| 0b00 | 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 62 6c 69 63 0a 3b | copy.of.the.GNU.General.Public.; |
| 0b20 | 3b 20 4c 69 63 65 6e 73 65 20 61 6c 6f 6e 67 20 77 69 74 68 20 74 68 69 73 20 70 72 6f 67 72 61 | ;.License.along.with.this.progra |
| 0b40 | 6d 3b 20 69 66 20 6e 6f 74 2c 20 77 72 69 74 65 20 74 6f 20 74 68 65 20 46 72 65 65 0a 3b 3b 20 | m;.if.not,.write.to.the.Free.;;. |
| 0b60 | 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 49 6e 63 2e 2c 20 35 31 20 46 72 | Software.Foundation,.Inc.,.51.Fr |
| 0b80 | 61 6e 6b 6c 69 6e 20 53 74 2c 20 46 69 66 74 68 20 46 6c 6f 6f 72 2c 20 42 6f 73 74 6f 6e 2c 0a | anklin.St,.Fifth.Floor,.Boston,. |
| 0ba0 | 3b 3b 20 4d 41 20 20 30 32 31 31 30 2d 31 33 30 31 20 55 53 41 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 | ;;.MA..02110-1301.USA..;;;.Comme |
| 0bc0 | 6e 74 61 72 79 3a 0a 0a 3b 3b 20 54 68 65 20 73 74 61 6e 64 61 72 64 20 6c 69 62 72 61 72 79 20 | ntary:..;;.The.standard.library. |
| 0be0 | 74 6f 6f 6c 74 69 70 2e 65 6c 20 70 72 6f 76 69 64 65 73 20 74 68 65 20 66 75 6e 63 74 69 6f 6e | tooltip.el.provides.the.function |
| 0c00 | 20 66 6f 72 20 64 69 73 70 6c 61 79 69 6e 67 0a 3b 3b 20 61 20 74 6f 6f 6c 74 69 70 20 61 74 20 | .for.displaying.;;.a.tooltip.at. |
| 0c20 | 6d 6f 75 73 65 20 70 6f 73 69 74 69 6f 6e 20 77 68 69 63 68 20 61 6c 6c 6f 77 73 20 75 73 65 72 | mouse.position.which.allows.user |
| 0c40 | 73 20 74 6f 20 65 61 73 69 6c 79 20 73 68 6f 77 20 69 74 2e 0a 3b 3b 20 48 6f 77 65 76 65 72 2c | s.to.easily.show.it..;;.However, |
| 0c60 | 20 6c 6f 63 61 74 69 6e 67 20 74 6f 6f 6c 74 69 70 20 61 74 20 61 72 62 69 74 72 61 72 79 20 62 | .locating.tooltip.at.arbitrary.b |
| 0c80 | 75 66 66 65 72 20 70 6f 73 69 74 69 6f 6e 20 69 6e 20 77 69 6e 64 6f 77 0a 3b 3b 20 69 73 20 6e | uffer.position.in.window.;;.is.n |
| 0ca0 | 6f 74 20 65 61 73 79 2e 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 70 72 6f 76 69 64 65 73 20 73 | ot.easy..This.program.provides.s |
| 0cc0 | 75 63 68 20 66 75 6e 63 74 69 6f 6e 20 74 6f 20 62 65 20 75 73 65 64 20 62 79 20 6f 74 68 65 72 | uch.function.to.be.used.by.other |
| 0ce0 | 0a 3b 3b 20 66 72 6f 6e 74 65 6e 64 20 70 72 6f 67 72 61 6d 73 2e 0a 0a 3b 3b 20 54 68 69 73 20 | .;;.frontend.programs...;;.This. |
| 0d00 | 70 72 6f 67 72 61 6d 20 69 73 20 74 65 73 74 65 64 20 6f 6e 20 47 4e 55 20 45 6d 61 63 73 20 32 | program.is.tested.on.GNU.Emacs.2 |
| 0d20 | 32 2c 20 32 33 20 75 6e 64 65 72 20 58 20 77 69 6e 64 6f 77 20 73 79 73 74 65 6d 20 61 6e 64 0a | 2,.23.under.X.window.system.and. |
| 0d40 | 3b 3b 20 45 6d 61 63 73 20 32 33 20 66 6f 72 20 4d 53 2d 57 69 6e 64 6f 77 73 2e 0a 0a 3b 3b 0a | ;;.Emacs.23.for.MS-Windows...;;. |
| 0d60 | 3b 3b 20 49 6e 73 74 61 6c 6c 61 74 69 6f 6e 3a 0a 3b 3b 0a 3b 3b 20 46 69 72 73 74 2c 20 73 61 | ;;.Installation:.;;.;;.First,.sa |
| 0d80 | 76 65 20 74 68 69 73 20 66 69 6c 65 20 61 73 20 70 6f 73 2d 74 69 70 2e 65 6c 20 61 6e 64 20 62 | ve.this.file.as.pos-tip.el.and.b |
| 0da0 | 79 74 65 2d 63 6f 6d 70 69 6c 65 20 69 6e 0a 3b 3b 20 61 20 64 69 72 65 63 74 6f 72 79 20 74 68 | yte-compile.in.;;.a.directory.th |
| 0dc0 | 61 74 20 69 73 20 6c 69 73 74 65 64 20 69 6e 20 6c 6f 61 64 2d 70 61 74 68 2e 0a 3b 3b 0a 3b 3b | at.is.listed.in.load-path..;;.;; |
| 0de0 | 20 50 75 74 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 69 6e 20 79 6f 75 72 20 2e 65 6d 61 63 | .Put.the.following.in.your..emac |
| 0e00 | 73 20 66 69 6c 65 3a 0a 3b 3b 0a 3b 3b 20 20 20 28 72 65 71 75 69 72 65 20 27 70 6f 73 2d 74 69 | s.file:.;;.;;...(require.'pos-ti |
| 0e20 | 70 29 0a 3b 3b 0a 3b 3b 20 54 6f 20 75 73 65 20 74 68 65 20 66 75 6c 6c 20 66 65 61 74 75 72 65 | p).;;.;;.To.use.the.full.feature |
| 0e40 | 73 20 6f 66 20 74 68 69 73 20 70 72 6f 67 72 61 6d 20 6f 6e 20 4d 53 2d 57 69 6e 64 6f 77 73 2c | s.of.this.program.on.MS-Windows, |
| 0e60 | 0a 3b 3b 20 70 75 74 20 74 68 65 20 61 64 64 69 74 69 6f 6e 61 6c 20 73 65 74 74 69 6e 67 20 69 | .;;.put.the.additional.setting.i |
| 0e80 | 6e 20 2e 65 6d 61 63 73 20 66 69 6c 65 3a 0a 3b 3b 0a 3b 3b 20 20 20 28 70 6f 73 2d 74 69 70 2d | n..emacs.file:.;;.;;...(pos-tip- |
| 0ea0 | 77 33 32 2d 6d 61 78 2d 77 69 64 74 68 2d 68 65 69 67 68 74 29 20 20 20 3b 20 4d 61 78 69 6d 69 | w32-max-width-height)...;.Maximi |
| 0ec0 | 7a 65 20 66 72 61 6d 65 20 74 65 6d 70 6f 72 61 72 69 6c 79 0a 3b 3b 0a 3b 3b 20 6f 72 0a 3b 3b | ze.frame.temporarily.;;.;;.or.;; |
| 0ee0 | 0a 3b 3b 20 20 20 28 70 6f 73 2d 74 69 70 2d 77 33 32 2d 6d 61 78 2d 77 69 64 74 68 2d 68 65 69 | .;;...(pos-tip-w32-max-width-hei |
| 0f00 | 67 68 74 20 74 29 20 3b 20 4b 65 65 70 20 66 72 61 6d 65 20 6d 61 78 69 6d 69 7a 65 64 0a 0a 3b | ght.t).;.Keep.frame.maximized..; |
| 0f20 | 3b 0a 3b 3b 20 45 78 61 6d 70 6c 65 73 3a 0a 3b 3b 0a 3b 3b 20 57 65 20 63 61 6e 20 64 69 73 70 | ;.;;.Examples:.;;.;;.We.can.disp |
| 0f40 | 6c 61 79 20 61 20 74 6f 6f 6c 74 69 70 20 61 74 20 74 68 65 20 63 75 72 72 65 6e 74 20 70 6f 73 | lay.a.tooltip.at.the.current.pos |
| 0f60 | 69 74 69 6f 6e 20 62 79 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 3a 0a 3b 3b 0a 3b 3b 20 20 20 | ition.by.the.following:.;;.;;... |
| 0f80 | 28 70 6f 73 2d 74 69 70 2d 73 68 6f 77 20 22 66 6f 6f 20 62 61 72 22 29 0a 3b 3b 0a 3b 3b 20 49 | (pos-tip-show."foo.bar").;;.;;.I |
| 0fa0 | 66 20 79 6f 75 27 64 20 6c 69 6b 65 20 74 6f 20 73 70 65 63 69 66 79 20 74 68 65 20 74 6f 6f 6c | f.you'd.like.to.specify.the.tool |
| 0fc0 | 74 69 70 20 63 6f 6c 6f 72 2c 20 75 73 65 20 61 6e 20 65 78 70 72 65 73 73 69 6f 6e 20 61 73 3a | tip.color,.use.an.expression.as: |
| 0fe0 | 0a 3b 3b 0a 3b 3b 20 20 20 28 70 6f 73 2d 74 69 70 2d 73 68 6f 77 20 22 66 6f 6f 20 62 61 72 22 | .;;.;;...(pos-tip-show."foo.bar" |
| 1000 | 20 27 28 22 77 68 69 74 65 22 20 2e 20 22 72 65 64 22 29 29 0a 3b 3b 0a 3b 3b 20 48 65 72 65 2c | .'("white"..."red")).;;.;;.Here, |
| 1020 | 20 22 77 68 69 74 65 22 20 61 6e 64 20 22 72 65 64 22 20 61 72 65 20 74 68 65 20 66 6f 72 65 67 | ."white".and."red".are.the.foreg |
| 1040 | 72 6f 75 6e 64 20 63 6f 6c 6f 72 20 61 6e 64 20 62 61 63 6b 67 72 6f 75 6e 64 0a 3b 3b 20 63 6f | round.color.and.background.;;.co |
| 1060 | 6c 6f 72 2c 20 72 65 73 70 65 63 74 69 76 65 6c 79 2e 0a 0a 0a 3b 3b 3b 20 48 69 73 74 6f 72 79 | lor,.respectively....;;;.History |
| 1080 | 3a 0a 3b 3b 20 32 30 32 33 2d 30 37 2d 32 31 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 56 61 72 | :.;;.2023-07-21.;;.........*.Var |
| 10a0 | 69 6f 75 73 20 62 75 67 20 66 69 78 65 73 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 53 65 74 74 | ious.bug.fixes.;;.........*.Sett |
| 10c0 | 69 6e 67 73 20 77 65 72 65 20 63 68 61 6e 67 65 64 20 74 6f 20 75 73 65 20 64 65 66 63 75 73 74 | ings.were.changed.to.use.defcust |
| 10e0 | 6f 6d 2e 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 34 2e 37 0a 3b | om..;;.........*.Version.0.4.7.; |
| 1100 | 3b 0a 3b 3b 20 32 30 31 33 2d 30 37 2d 31 36 20 20 50 2e 20 4b 61 6c 69 6e 6f 77 73 6b 69 0a 3b | ;.;;.2013-07-16..P..Kalinowski.; |
| 1120 | 3b 20 20 20 20 20 20 20 20 20 2a 20 41 64 6a 75 73 74 65 64 20 60 70 6f 73 2d 74 69 70 2d 73 68 | ;.........*.Adjusted.`pos-tip-sh |
| 1140 | 6f 77 27 20 74 6f 20 63 6f 72 72 65 63 74 6c 79 20 73 65 74 20 74 6f 6f 6c 74 69 70 20 74 65 78 | ow'.to.correctly.set.tooltip.tex |
| 1160 | 74 20 66 6f 72 65 67 72 6f 75 6e 64 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 63 6f 6c 6f 72 20 | t.foreground.;;...........color. |
| 1180 | 77 68 65 6e 20 75 73 69 6e 67 20 63 75 73 74 6f 6d 20 63 6f 6c 6f 72 20 74 68 65 6d 65 73 2e 0a | when.using.custom.color.themes.. |
| 11a0 | 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 34 2e 36 0a 3b 3b 0a 3b 3b | ;;.........*.Version.0.4.6.;;.;; |
| 11c0 | 20 32 30 31 30 2d 30 39 2d 32 37 20 20 53 2e 20 49 72 69 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 | .2010-09-27..S..Irie.;;......... |
| 11e0 | 2a 20 53 69 6d 70 6c 69 66 69 65 64 20 69 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 60 | *.Simplified.implementation.of.` |
| 1200 | 70 6f 73 2d 74 69 70 2d 77 69 6e 64 6f 77 2d 73 79 73 74 65 6d 27 0a 3b 3b 20 20 20 20 20 20 20 | pos-tip-window-system'.;;....... |
| 1220 | 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 34 2e 35 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d 30 38 2d | ..*.Version.0.4.5.;;.;;.2010-08- |
| 1240 | 32 30 20 20 53 2e 20 49 72 69 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 43 68 61 6e 67 65 64 | 20..S..Irie.;;.........*.Changed |
| 1260 | 20 74 6f 20 75 73 65 20 60 77 69 6e 64 6f 77 2d 6c 69 6e 65 2d 68 65 69 67 68 74 27 20 74 6f 20 | .to.use.`window-line-height'.to. |
| 1280 | 63 61 6c 63 75 6c 61 74 65 20 74 6f 6f 6c 74 69 70 20 70 6f 73 69 74 69 6f 6e 0a 3b 3b 20 20 20 | calculate.tooltip.position.;;... |
| 12a0 | 20 20 20 20 20 20 2a 20 43 68 61 6e 67 65 64 20 60 70 6f 73 2d 74 69 70 2d 73 74 72 69 6e 67 2d | ......*.Changed.`pos-tip-string- |
| 12c0 | 77 69 64 74 68 2d 68 65 69 67 68 74 27 20 74 6f 20 69 67 6e 6f 72 65 20 6c 61 73 74 20 65 6d 70 | width-height'.to.ignore.last.emp |
| 12e0 | 74 79 20 6c 69 6e 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 34 | ty.line.;;.........*.Version.0.4 |
| 1300 | 2e 34 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d 30 37 2d 32 35 20 20 53 2e 20 49 72 69 65 0a 3b 3b 20 | .4.;;.;;.2010-07-25..S..Irie.;;. |
| 1320 | 20 20 20 20 20 20 20 20 2a 20 42 75 67 20 66 69 78 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 56 | ........*.Bug.fix.;;.........*.V |
| 1340 | 65 72 73 69 6f 6e 20 30 2e 34 2e 33 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d 30 36 2d 30 39 20 20 53 | ersion.0.4.3.;;.;;.2010-06-09..S |
| 1360 | 2e 20 49 72 69 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 42 75 67 20 66 69 78 0a 3b 3b 20 20 | ..Irie.;;.........*.Bug.fix.;;.. |
| 1380 | 20 20 20 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 34 2e 32 0a 3b 3b 0a 3b 3b 20 32 30 31 | .......*.Version.0.4.2.;;.;;.201 |
| 13a0 | 30 2d 30 36 2d 30 34 20 20 53 2e 20 49 72 69 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 41 64 | 0-06-04..S..Irie.;;.........*.Ad |
| 13c0 | 64 65 64 20 73 75 70 70 6f 72 74 20 66 6f 72 20 74 65 78 74 2d 73 63 61 6c 65 2d 6d 6f 64 65 0a | ded.support.for.text-scale-mode. |
| 13e0 | 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 34 2e 31 0a 3b 3b 0a 3b 3b | ;;.........*.Version.0.4.1.;;.;; |
| 1400 | 20 32 30 31 30 2d 30 35 2d 30 34 20 20 53 2e 20 49 72 69 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 | .2010-05-04..S..Irie.;;......... |
| 1420 | 2a 20 41 64 64 65 64 20 66 75 6e 63 74 69 6f 6e 73 3a 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 | *.Added.functions:.;;........... |
| 1440 | 20 20 60 70 6f 73 2d 74 69 70 2d 78 2d 64 69 73 70 6c 61 79 2d 77 69 64 74 68 27 2c 20 60 70 6f | ..`pos-tip-x-display-width',.`po |
| 1460 | 73 2d 74 69 70 2d 78 2d 64 69 73 70 6c 61 79 2d 68 65 69 67 68 74 27 0a 3b 3b 20 20 20 20 20 20 | s-tip-x-display-height'.;;...... |
| 1480 | 20 20 20 20 20 20 20 60 70 6f 73 2d 74 69 70 2d 6e 6f 72 6d 61 6c 69 7a 65 2d 6e 61 74 6e 75 6d | .......`pos-tip-normalize-natnum |
| 14a0 | 27 2c 20 60 70 6f 73 2d 74 69 70 2d 66 72 61 6d 65 2d 72 65 6c 61 74 69 76 65 2d 70 6f 73 69 74 | ',.`pos-tip-frame-relative-posit |
| 14c0 | 69 6f 6e 27 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 46 69 78 65 64 20 74 68 65 20 73 75 70 70 | ion'.;;.........*.Fixed.the.supp |
| 14e0 | 6f 72 74 73 20 66 6f 72 20 6d 75 6c 74 69 2d 64 69 73 70 6c 61 79 73 20 61 6e 64 20 6d 75 6c 74 | orts.for.multi-displays.and.mult |
| 1500 | 69 2d 66 72 61 6d 65 73 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e | i-frames.;;.........*.Version.0. |
| 1520 | 34 2e 30 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d 30 34 2d 32 39 20 20 53 2e 20 49 72 69 65 0a 3b 3b | 4.0.;;.;;.2010-04-29..S..Irie.;; |
| 1540 | 20 20 20 20 20 20 20 20 20 2a 20 4d 6f 64 69 66 69 65 64 20 74 6f 20 61 76 6f 69 64 20 62 79 74 | .........*.Modified.to.avoid.byt |
| 1560 | 65 2d 63 6f 6d 70 69 6c 65 20 77 61 72 6e 69 6e 67 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 42 | e-compile.warning.;;.........*.B |
| 1580 | 75 67 20 66 69 78 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 33 2e | ug.fix.;;.........*.Version.0.3. |
| 15a0 | 36 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d 30 34 2d 32 39 20 20 53 2e 20 49 72 69 65 0a 3b 3b 20 20 | 6.;;.;;.2010-04-29..S..Irie.;;.. |
| 15c0 | 20 20 20 20 20 20 20 2a 20 52 65 6e 61 6d 65 64 20 61 72 67 75 6d 65 6e 74 20 4d 41 58 2d 48 45 | .......*.Renamed.argument.MAX-HE |
| 15e0 | 49 47 48 54 20 6f 66 20 60 70 6f 73 2d 74 69 70 2d 66 69 6c 6c 2d 73 74 72 69 6e 67 27 20 74 6f | IGHT.of.`pos-tip-fill-string'.to |
| 1600 | 20 4d 41 58 2d 52 4f 57 53 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 4d 6f 64 69 66 69 65 64 20 | .MAX-ROWS.;;.........*.Modified. |
| 1620 | 6f 6c 64 20 46 53 46 20 61 64 64 72 65 73 73 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 56 65 72 | old.FSF.address.;;.........*.Ver |
| 1640 | 73 69 6f 6e 20 30 2e 33 2e 35 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d 30 34 2d 32 39 20 20 53 2e 20 | sion.0.3.5.;;.;;.2010-04-29..S.. |
| 1660 | 49 72 69 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 4d 6f 64 69 66 69 65 64 20 60 70 6f 73 2d | Irie.;;.........*.Modified.`pos- |
| 1680 | 74 69 70 2d 73 68 6f 77 27 20 74 6f 20 74 72 75 6e 63 61 74 65 20 73 74 72 69 6e 67 20 65 78 63 | tip-show'.to.truncate.string.exc |
| 16a0 | 65 65 64 69 6e 67 20 64 69 73 70 6c 61 79 20 73 69 7a 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a | eeding.display.size.;;.........* |
| 16c0 | 20 41 64 64 65 64 20 66 75 6e 63 74 69 6f 6e 20 60 70 6f 73 2d 74 69 70 2d 74 72 75 6e 63 61 74 | .Added.function.`pos-tip-truncat |
| 16e0 | 65 2d 73 74 72 69 6e 67 27 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 41 64 64 65 64 20 6f 70 74 | e-string'.;;.........*.Added.opt |
| 1700 | 69 6f 6e 61 6c 20 61 72 67 75 6d 65 6e 74 20 4d 41 58 2d 52 4f 57 53 20 74 6f 20 60 70 6f 73 2d | ional.argument.MAX-ROWS.to.`pos- |
| 1720 | 74 69 70 2d 73 70 6c 69 74 2d 73 74 72 69 6e 67 27 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 41 | tip-split-string'.;;.........*.A |
| 1740 | 64 64 65 64 20 6f 70 74 69 6f 6e 61 6c 20 61 72 67 75 6d 65 6e 74 20 4d 41 58 2d 48 45 49 47 48 | dded.optional.argument.MAX-HEIGH |
| 1760 | 54 20 74 6f 20 60 70 6f 73 2d 74 69 70 2d 66 69 6c 6c 2d 73 74 72 69 6e 67 27 0a 3b 3b 20 20 20 | T.to.`pos-tip-fill-string'.;;... |
| 1780 | 20 20 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 33 2e 34 0a 3b 3b 0a 3b 3b 20 32 30 31 30 | ......*.Version.0.3.4.;;.;;.2010 |
| 17a0 | 2d 30 34 2d 31 36 20 20 53 2e 20 49 72 69 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 43 68 61 | -04-16..S..Irie.;;.........*.Cha |
| 17c0 | 6e 67 65 64 20 60 70 6f 73 2d 74 69 70 2d 73 68 6f 77 27 20 6e 6f 74 20 74 6f 20 66 69 6c 6c 20 | nged.`pos-tip-show'.not.to.fill. |
| 17e0 | 70 61 72 61 67 72 61 70 68 20 75 6e 6c 65 73 73 20 65 78 63 65 65 64 69 6e 67 20 57 49 44 54 48 | paragraph.unless.exceeding.WIDTH |
| 1800 | 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 33 2e 33 0a 3b 3b 0a 3b | .;;.........*.Version.0.3.3.;;.; |
| 1820 | 3b 20 32 30 31 30 2d 30 34 2d 30 38 20 20 53 2e 20 49 72 69 65 0a 3b 3b 20 20 20 20 20 20 20 20 | ;.2010-04-08..S..Irie.;;........ |
| 1840 | 20 2a 20 42 75 67 20 66 69 78 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 | .*.Bug.fix.;;.........*.Version. |
| 1860 | 30 2e 33 2e 32 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d 30 33 2d 33 31 20 20 53 2e 20 49 72 69 65 0a | 0.3.2.;;.;;.2010-03-31..S..Irie. |
| 1880 | 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 42 75 67 20 66 69 78 0a 3b 3b 20 20 20 20 20 20 20 20 20 | ;;.........*.Bug.fix.;;......... |
| 18a0 | 2a 20 56 65 72 73 69 6f 6e 20 30 2e 33 2e 31 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d 30 33 2d 33 30 | *.Version.0.3.1.;;.;;.2010-03-30 |
| 18c0 | 20 20 53 2e 20 49 72 69 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 41 64 64 65 64 20 73 75 70 | ..S..Irie.;;.........*.Added.sup |
| 18e0 | 70 6f 72 74 20 66 6f 72 20 4d 53 2d 57 69 6e 64 6f 77 73 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a | port.for.MS-Windows.;;.........* |
| 1900 | 20 41 64 64 65 64 20 6f 70 74 69 6f 6e 20 60 70 6f 73 2d 74 69 70 2d 75 73 65 2d 72 65 6c 61 74 | .Added.option.`pos-tip-use-relat |
| 1920 | 69 76 65 2d 63 6f 6f 72 64 69 6e 61 74 65 73 27 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 42 75 | ive-coordinates'.;;.........*.Bu |
| 1940 | 67 20 66 69 78 65 73 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 33 | g.fixes.;;.........*.Version.0.3 |
| 1960 | 2e 30 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d 30 33 2d 32 33 20 20 53 2e 20 49 72 69 65 0a 3b 3b 20 | .0.;;.;;.2010-03-23..S..Irie.;;. |
| 1980 | 20 20 20 20 20 20 20 20 2a 20 43 68 61 6e 67 65 64 20 61 72 67 75 6d 65 6e 74 20 57 4f 52 44 2d | ........*.Changed.argument.WORD- |
| 19a0 | 57 52 41 50 20 74 6f 20 4a 55 53 54 49 46 59 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 41 64 64 | WRAP.to.JUSTIFY.;;.........*.Add |
| 19c0 | 65 64 20 6f 70 74 69 6f 6e 61 6c 20 61 72 67 75 6d 65 6e 74 20 53 51 55 45 45 5a 45 0a 3b 3b 20 | ed.optional.argument.SQUEEZE.;;. |
| 19e0 | 20 20 20 20 20 20 20 20 2a 20 41 64 64 65 64 20 66 75 6e 63 74 69 6f 6e 20 60 70 6f 73 2d 74 69 | ........*.Added.function.`pos-ti |
| 1a00 | 70 2d 66 69 6c 6c 2d 73 74 72 69 6e 67 27 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 41 64 64 65 | p-fill-string'.;;.........*.Adde |
| 1a20 | 64 20 6f 70 74 69 6f 6e 20 60 70 6f 73 2d 74 69 70 2d 74 61 62 2d 77 69 64 74 68 27 20 75 73 65 | d.option.`pos-tip-tab-width'.use |
| 1a40 | 64 20 74 6f 20 65 78 70 61 6e 64 20 74 61 62 20 63 68 61 72 61 63 74 65 72 73 0a 3b 3b 20 20 20 | d.to.expand.tab.characters.;;... |
| 1a60 | 20 20 20 20 20 20 2a 20 42 75 67 20 66 69 78 65 73 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 56 | ......*.Bug.fixes.;;.........*.V |
| 1a80 | 65 72 73 69 6f 6e 20 30 2e 32 2e 30 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d 30 33 2d 32 32 20 20 53 | ersion.0.2.0.;;.;;.2010-03-22..S |
| 1aa0 | 2e 20 49 72 69 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 41 64 64 65 64 20 6f 70 74 69 6f 6e | ..Irie.;;.........*.Added.option |
| 1ac0 | 61 6c 20 61 72 67 75 6d 65 6e 74 20 57 4f 52 44 2d 57 52 41 50 20 74 6f 20 60 70 6f 73 2d 74 69 | al.argument.WORD-WRAP.to.`pos-ti |
| 1ae0 | 70 2d 73 70 6c 69 74 2d 73 74 72 69 6e 67 27 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 43 68 61 | p-split-string'.;;.........*.Cha |
| 1b00 | 6e 67 65 64 20 60 70 6f 73 2d 74 69 70 2d 73 68 6f 77 27 20 74 6f 20 70 65 72 66 6f 72 6d 20 77 | nged.`pos-tip-show'.to.perform.w |
| 1b20 | 6f 72 64 20 77 72 61 70 20 6f 72 20 6b 69 6e 73 6f 6b 75 20 73 68 6f 72 69 0a 3b 3b 20 20 20 20 | ord.wrap.or.kinsoku.shori.;;.... |
| 1b40 | 20 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 31 2e 38 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d | .....*.Version.0.1.8.;;.;;.2010- |
| 1b60 | 30 33 2d 32 30 20 20 53 2e 20 49 72 69 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 41 64 64 65 | 03-20..S..Irie.;;.........*.Adde |
| 1b80 | 64 20 6f 70 74 69 6f 6e 61 6c 20 61 72 67 75 6d 65 6e 74 20 44 59 0a 3b 3b 20 20 20 20 20 20 20 | d.optional.argument.DY.;;....... |
| 1ba0 | 20 20 2a 20 42 75 67 20 66 69 78 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 4d 6f 64 69 66 69 65 | ..*.Bug.fix.;;.........*.Modifie |
| 1bc0 | 64 20 64 6f 63 73 74 72 69 6e 67 73 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 56 65 72 73 69 6f | d.docstrings.;;.........*.Versio |
| 1be0 | 6e 20 30 2e 31 2e 37 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d 30 33 2d 31 38 20 20 53 2e 20 49 72 69 | n.0.1.7.;;.;;.2010-03-18..S..Iri |
| 1c00 | 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 41 64 64 65 64 2f 6d 6f 64 69 66 69 65 64 20 64 6f | e.;;.........*.Added/modified.do |
| 1c20 | 63 73 74 72 69 6e 67 73 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 43 68 61 6e 67 65 64 20 77 6f | cstrings.;;.........*.Changed.wo |
| 1c40 | 72 6b 69 6e 67 20 62 75 66 66 65 72 20 6e 61 6d 65 20 74 6f 20 22 20 2a 78 77 69 6e 69 6e 66 6f | rking.buffer.name.to.".*xwininfo |
| 1c60 | 2a 22 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 31 2e 36 0a 3b 3b | *".;;.........*.Version.0.1.6.;; |
| 1c80 | 0a 3b 3b 20 32 30 31 30 2d 30 33 2d 31 37 20 20 53 2e 20 49 72 69 65 0a 3b 3b 20 20 20 20 20 20 | .;;.2010-03-17..S..Irie.;;...... |
| 1ca0 | 20 20 20 2a 20 46 69 78 65 64 20 74 79 70 6f 73 20 69 6e 20 64 6f 63 73 74 72 69 6e 67 73 0a 3b | ...*.Fixed.typos.in.docstrings.; |
| 1cc0 | 3b 20 20 20 20 20 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 31 2e 35 0a 3b 3b 0a 3b 3b 20 | ;.........*.Version.0.1.5.;;.;;. |
| 1ce0 | 32 30 31 30 2d 30 33 2d 31 36 20 20 53 2e 20 49 72 69 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a | 2010-03-16..S..Irie.;;.........* |
| 1d00 | 20 41 64 64 65 64 20 73 75 70 70 6f 72 74 20 66 6f 72 20 6d 75 6c 74 69 2d 64 69 73 70 6c 61 79 | .Added.support.for.multi-display |
| 1d20 | 20 65 6e 76 69 72 6f 6e 6d 65 6e 74 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 42 75 67 20 66 69 | .environment.;;.........*.Bug.fi |
| 1d40 | 78 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 31 2e 34 0a 3b 3b 0a | x.;;.........*.Version.0.1.4.;;. |
| 1d60 | 3b 3b 20 32 30 31 30 2d 30 33 2d 31 36 20 20 53 2e 20 49 72 69 65 0a 3b 3b 20 20 20 20 20 20 20 | ;;.2010-03-16..S..Irie.;;....... |
| 1d80 | 20 20 2a 20 42 75 67 20 66 69 78 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 43 68 61 6e 67 65 64 | ..*.Bug.fix.;;.........*.Changed |
| 1da0 | 20 63 61 6c 63 75 6c 61 74 69 6f 6e 20 66 6f 72 20 60 78 2d 6d 61 78 2d 74 6f 6f 6c 74 69 70 2d | .calculation.for.`x-max-tooltip- |
| 1dc0 | 73 69 7a 65 27 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 4d 6f 64 69 66 69 65 64 20 64 6f 63 73 | size'.;;.........*.Modified.docs |
| 1de0 | 74 72 69 6e 67 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 31 2e 33 | tring.;;.........*.Version.0.1.3 |
| 1e00 | 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d 30 33 2d 31 31 20 20 53 2e 20 49 72 69 65 0a 3b 3b 20 20 20 | .;;.;;.2010-03-11..S..Irie.;;... |
| 1e20 | 20 20 20 20 20 20 2a 20 4d 6f 64 69 66 69 65 64 20 63 6f 6d 6d 65 6e 74 61 72 79 0a 3b 3b 20 20 | ......*.Modified.commentary.;;.. |
| 1e40 | 20 20 20 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 31 2e 32 0a 3b 3b 0a 3b 3b 20 32 30 31 | .......*.Version.0.1.2.;;.;;.201 |
| 1e60 | 30 2d 30 33 2d 31 31 20 20 53 2e 20 49 72 69 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 52 65 | 0-03-11..S..Irie.;;.........*.Re |
| 1e80 | 2d 69 6d 70 6c 65 6d 65 6e 74 65 64 20 60 70 6f 73 2d 74 69 70 2d 73 74 72 69 6e 67 2d 77 69 64 | -implemented.`pos-tip-string-wid |
| 1ea0 | 74 68 2d 68 65 69 67 68 74 27 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 41 64 64 65 64 20 69 6e | th-height'.;;.........*.Added.in |
| 1ec0 | 64 69 63 61 74 6f 72 20 76 61 72 69 61 62 6c 65 20 60 70 6f 73 2d 74 69 70 2d 75 70 70 65 72 73 | dicator.variable.`pos-tip-uppers |
| 1ee0 | 69 64 65 2d 70 27 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 31 2e | ide-p'.;;.........*.Version.0.1. |
| 1f00 | 31 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d 30 33 2d 30 39 20 20 53 2e 20 49 72 69 65 0a 3b 3b 20 20 | 1.;;.;;.2010-03-09..S..Irie.;;.. |
| 1f20 | 20 20 20 20 20 20 20 2a 20 52 65 2d 69 6d 70 6c 65 6d 65 6e 74 65 64 20 60 70 6f 73 2d 74 69 70 | .......*.Re-implemented.`pos-tip |
| 1f40 | 2d 73 68 6f 77 27 20 28 2a 69 6e 63 6f 6d 70 61 74 69 62 6c 79 20 63 68 61 6e 67 65 64 2a 29 0a | -show'.(*incompatibly.changed*). |
| 1f60 | 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 2d 20 55 73 65 20 66 72 61 6d 65 20 64 65 66 61 75 | ;;.............-.Use.frame.defau |
| 1f80 | 6c 74 20 66 6f 6e 74 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 2d 20 41 75 74 6f 6d 61 74 | lt.font.;;.............-.Automat |
| 1fa0 | 69 63 61 6c 6c 79 20 63 61 6c 63 75 6c 61 74 65 20 74 6f 6f 6c 74 69 70 20 70 69 78 65 6c 20 73 | ically.calculate.tooltip.pixel.s |
| 1fc0 | 69 7a 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 2d 20 41 64 64 65 64 20 6f 70 74 69 6f | ize.;;.............-.Added.optio |
| 1fe0 | 6e 61 6c 20 61 72 67 75 6d 65 6e 74 73 3a 20 54 49 50 2d 43 4f 4c 4f 52 2c 20 4d 41 58 2d 57 49 | nal.arguments:.TIP-COLOR,.MAX-WI |
| 2000 | 44 54 48 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 41 64 64 65 64 20 75 74 69 6c 69 74 79 20 66 | DTH.;;.........*.Added.utility.f |
| 2020 | 75 6e 63 74 69 6f 6e 73 3a 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 60 70 6f 73 2d 74 69 | unctions:.;;.............`pos-ti |
| 2040 | 70 2d 73 70 6c 69 74 2d 73 74 72 69 6e 67 27 2c 20 60 70 6f 73 2d 74 69 70 2d 73 74 72 69 6e 67 | p-split-string',.`pos-tip-string |
| 2060 | 2d 77 69 64 74 68 2d 68 65 69 67 68 74 27 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 42 75 67 20 | -width-height'.;;.........*.Bug. |
| 2080 | 66 69 78 65 73 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 31 2e 30 | fixes.;;.........*.Version.0.1.0 |
| 20a0 | 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d 30 33 2d 30 38 20 20 53 2e 20 49 72 69 65 0a 3b 3b 20 20 20 | .;;.;;.2010-03-08..S..Irie.;;... |
| 20c0 | 20 20 20 20 20 20 2a 20 41 64 64 65 64 20 6f 70 74 69 6f 6e 61 6c 20 61 72 67 75 6d 65 6e 74 20 | ......*.Added.optional.argument. |
| 20e0 | 44 58 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 30 2e 34 0a 3b 3b | DX.;;.........*.Version.0.0.4.;; |
| 2100 | 0a 3b 3b 20 32 30 31 30 2d 30 33 2d 30 38 20 20 53 2e 20 49 72 69 65 0a 3b 3b 20 20 20 20 20 20 | .;;.2010-03-08..S..Irie.;;...... |
| 2120 | 20 20 20 2a 20 42 75 67 20 66 69 78 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 56 65 72 73 69 6f | ...*.Bug.fix.;;.........*.Versio |
| 2140 | 6e 20 30 2e 30 2e 33 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d 30 33 2d 30 38 20 20 53 2e 20 49 72 69 | n.0.0.3.;;.;;.2010-03-08..S..Iri |
| 2160 | 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 4d 6f 64 69 66 69 65 64 20 74 6f 20 6d 6f 76 65 20 | e.;;.........*.Modified.to.move. |
| 2180 | 6f 75 74 20 6d 6f 75 73 65 20 70 6f 69 6e 74 65 72 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 56 | out.mouse.pointer.;;.........*.V |
| 21a0 | 65 72 73 69 6f 6e 20 30 2e 30 2e 32 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d 30 33 2d 30 37 20 20 53 | ersion.0.0.2.;;.;;.2010-03-07..S |
| 21c0 | 2e 20 49 72 69 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 46 69 72 73 74 20 72 65 6c 65 61 73 | ..Irie.;;.........*.First.releas |
| 21e0 | 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 30 2e 31 0a 0a 3b 3b | e.;;.........*.Version.0.0.1..;; |
| 2200 | 20 54 6f 44 6f 3a 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b | .ToDo:..;;;.Code:.;;;;;;;;;;;;;; |
| 2220 | 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| 2240 | 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 0a 3b 3b 20 53 65 74 74 | ;;;;;;;;;;;;;;;;;;;;;;;;.;;.Sett |
| 2260 | 69 6e 67 73 0a 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b | ings.;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| 2280 | 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| 22a0 | 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 0a 0a 28 64 65 66 67 72 6f 75 70 20 70 6f 73 2d 74 69 70 20 6e | ;;;;;;;;;;;..(defgroup.pos-tip.n |
| 22c0 | 69 6c 0a 20 20 22 53 68 6f 77 20 74 6f 6f 6c 74 69 70 20 61 74 20 70 6f 69 6e 74 22 0a 20 20 3a | il..."Show.tooltip.at.point"...: |
| 22e0 | 67 72 6f 75 70 20 27 66 61 63 65 73 0a 20 20 3a 70 72 65 66 69 78 20 22 70 6f 73 2d 74 69 70 2d | group.'faces...:prefix."pos-tip- |
| 2300 | 22 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 70 6f 73 2d 74 69 70 2d 62 6f 72 64 65 72 2d 77 69 | ")..(defcustom.pos-tip-border-wi |
| 2320 | 64 74 68 20 31 0a 20 20 22 4f 75 74 65 72 20 62 6f 72 64 65 72 20 77 69 64 74 68 20 6f 66 20 70 | dth.1..."Outer.border.width.of.p |
| 2340 | 6f 73 2d 74 69 70 27 73 20 74 6f 6f 6c 74 69 70 2e 22 0a 20 20 3a 74 79 70 65 20 27 69 6e 74 65 | os-tip's.tooltip."...:type.'inte |
| 2360 | 67 65 72 0a 20 20 3a 67 72 6f 75 70 20 27 70 6f 73 2d 74 69 70 29 0a 0a 28 64 65 66 63 75 73 74 | ger...:group.'pos-tip)..(defcust |
| 2380 | 6f 6d 20 70 6f 73 2d 74 69 70 2d 69 6e 74 65 72 6e 61 6c 2d 62 6f 72 64 65 72 2d 77 69 64 74 68 | om.pos-tip-internal-border-width |
| 23a0 | 20 32 0a 20 20 22 54 65 78 74 20 6d 61 72 67 69 6e 20 6f 66 20 70 6f 73 2d 74 69 70 27 73 20 74 | .2..."Text.margin.of.pos-tip's.t |
| 23c0 | 6f 6f 6c 74 69 70 2e 22 0a 20 20 3a 74 79 70 65 20 27 69 6e 74 65 67 65 72 0a 20 20 3a 67 72 6f | ooltip."...:type.'integer...:gro |
| 23e0 | 75 70 20 27 70 6f 73 2d 74 69 70 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 70 6f 73 2d 74 69 70 | up.'pos-tip)..(defcustom.pos-tip |
| 2400 | 2d 66 6f 72 65 67 72 6f 75 6e 64 2d 63 6f 6c 6f 72 20 6e 69 6c 0a 20 20 22 44 65 66 61 75 6c 74 | -foreground-color.nil..."Default |
| 2420 | 20 66 6f 72 65 67 72 6f 75 6e 64 20 63 6f 6c 6f 72 20 6f 66 20 70 6f 73 2d 74 69 70 27 73 20 74 | .foreground.color.of.pos-tip's.t |
| 2440 | 6f 6f 6c 74 69 70 2e 0a 57 68 65 6e 20 60 6e 69 6c 27 2c 20 6c 6f 6f 6b 20 75 70 20 74 68 65 20 | ooltip..When.`nil',.look.up.the. |
| 2460 | 66 6f 72 65 67 72 6f 75 6e 64 20 63 6f 6c 6f 72 20 6f 66 20 74 68 65 20 60 74 6f 6f 6c 74 69 70 | foreground.color.of.the.`tooltip |
| 2480 | 27 20 66 61 63 65 2e 22 0a 20 20 3a 74 79 70 65 20 27 28 63 68 6f 69 63 65 20 28 63 6f 6e 73 74 | '.face."...:type.'(choice.(const |
| 24a0 | 20 3a 74 61 67 20 22 44 65 66 61 75 6c 74 22 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 | .:tag."Default".nil)............ |
| 24c0 | 20 20 20 20 20 20 73 74 72 69 6e 67 29 0a 20 20 3a 67 72 6f 75 70 20 27 70 6f 73 2d 74 69 70 29 | ......string)...:group.'pos-tip) |
| 24e0 | 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 70 6f 73 2d 74 69 70 2d 62 61 63 6b 67 72 6f 75 6e 64 2d | ..(defcustom.pos-tip-background- |
| 2500 | 63 6f 6c 6f 72 20 6e 69 6c 0a 20 20 22 44 65 66 61 75 6c 74 20 62 61 63 6b 67 72 6f 75 6e 64 20 | color.nil..."Default.background. |
| 2520 | 63 6f 6c 6f 72 20 6f 66 20 70 6f 73 2d 74 69 70 27 73 20 74 6f 6f 6c 74 69 70 2e 0a 57 68 65 6e | color.of.pos-tip's.tooltip..When |
| 2540 | 20 60 6e 69 6c 27 2c 20 6c 6f 6f 6b 20 75 70 20 74 68 65 20 62 61 63 6b 67 72 6f 75 6e 64 20 63 | .`nil',.look.up.the.background.c |
| 2560 | 6f 6c 6f 72 20 6f 66 20 74 68 65 20 60 74 6f 6f 6c 74 69 70 27 20 66 61 63 65 2e 22 0a 20 20 3a | olor.of.the.`tooltip'.face."...: |
| 2580 | 74 79 70 65 20 27 28 63 68 6f 69 63 65 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 44 65 66 61 75 | type.'(choice.(const.:tag."Defau |
| 25a0 | 6c 74 22 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 74 72 69 6e 67 | lt".nil)..................string |
| 25c0 | 29 0a 20 20 3a 67 72 6f 75 70 20 27 70 6f 73 2d 74 69 70 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d | )...:group.'pos-tip)..(defcustom |
| 25e0 | 20 70 6f 73 2d 74 69 70 2d 74 61 62 2d 77 69 64 74 68 20 6e 69 6c 0a 20 20 22 54 61 62 20 77 69 | .pos-tip-tab-width.nil..."Tab.wi |
| 2600 | 64 74 68 20 75 73 65 64 20 66 6f 72 20 60 70 6f 73 2d 74 69 70 2d 73 70 6c 69 74 2d 73 74 72 69 | dth.used.for.`pos-tip-split-stri |
| 2620 | 6e 67 27 20 61 6e 64 20 60 70 6f 73 2d 74 69 70 2d 66 69 6c 6c 2d 73 74 72 69 6e 67 27 0a 74 6f | ng'.and.`pos-tip-fill-string'.to |
| 2640 | 20 65 78 70 61 6e 64 20 74 61 62 20 63 68 61 72 61 63 74 65 72 73 2e 20 6e 69 6c 20 6d 65 61 6e | .expand.tab.characters..nil.mean |
| 2660 | 73 20 75 73 65 20 64 65 66 61 75 6c 74 20 76 61 6c 75 65 20 6f 66 20 60 74 61 62 2d 77 69 64 74 | s.use.default.value.of.`tab-widt |
| 2680 | 68 27 2e 22 0a 20 20 3a 74 79 70 65 20 27 28 63 68 6f 69 63 65 20 28 63 6f 6e 73 74 20 3a 74 61 | h'."...:type.'(choice.(const.:ta |
| 26a0 | 67 20 22 44 65 66 61 75 6c 74 22 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | g."Default".nil)................ |
| 26c0 | 20 20 69 6e 74 65 67 65 72 29 0a 20 20 3a 67 72 6f 75 70 20 27 70 6f 73 2d 74 69 70 29 0a 0a 28 | ..integer)...:group.'pos-tip)..( |
| 26e0 | 64 65 66 63 75 73 74 6f 6d 20 70 6f 73 2d 74 69 70 2d 75 73 65 2d 72 65 6c 61 74 69 76 65 2d 63 | defcustom.pos-tip-use-relative-c |
| 2700 | 6f 6f 72 64 69 6e 61 74 65 73 20 6e 69 6c 0a 20 20 22 4e 6f 6e 2d 6e 69 6c 20 6d 65 61 6e 73 20 | oordinates.nil..."Non-nil.means. |
| 2720 | 74 6f 6f 6c 74 69 70 20 6c 6f 63 61 74 69 6f 6e 20 69 73 20 63 61 6c 63 75 6c 61 74 65 64 20 61 | tooltip.location.is.calculated.a |
| 2740 | 73 20 61 20 63 6f 6f 72 64 69 6e 61 74 65 73 0a 72 65 6c 61 74 69 76 65 20 74 6f 20 74 68 65 20 | s.a.coordinates.relative.to.the. |
| 2760 | 74 6f 70 20 6c 65 66 74 20 63 6f 72 6e 65 72 20 6f 66 20 66 72 61 6d 65 2e 20 49 6e 20 74 68 69 | top.left.corner.of.frame..In.thi |
| 2780 | 73 20 63 61 73 65 20 74 68 65 20 74 6f 6f 6c 74 69 70 0a 77 69 6c 6c 20 61 6c 77 61 79 73 20 62 | s.case.the.tooltip.will.always.b |
| 27a0 | 65 20 64 69 73 70 6c 61 79 65 64 20 77 69 74 68 69 6e 20 74 68 65 20 66 72 61 6d 65 2e 0a 0a 4e | e.displayed.within.the.frame...N |
| 27c0 | 6f 74 65 20 74 68 61 74 20 74 68 69 73 20 76 61 72 69 61 62 6c 65 20 69 73 20 61 75 74 6f 6d 61 | ote.that.this.variable.is.automa |
| 27e0 | 74 69 63 61 6c 6c 79 20 73 65 74 20 74 6f 20 6e 6f 6e 2d 6e 69 6c 20 69 66 20 61 62 73 6f 6c 75 | tically.set.to.non-nil.if.absolu |
| 2800 | 74 65 0a 63 6f 6f 72 64 69 6e 61 74 65 73 20 63 61 6e 27 74 20 62 65 20 6f 62 74 61 69 6e 65 64 | te.coordinates.can't.be.obtained |
| 2820 | 20 62 79 20 60 70 6f 73 2d 74 69 70 2d 63 6f 6d 70 75 74 65 2d 70 69 78 65 6c 2d 70 6f 73 69 74 | .by.`pos-tip-compute-pixel-posit |
| 2840 | 69 6f 6e 27 2e 22 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 0a 20 20 3a 67 72 6f 75 70 | ion'."...:type.'boolean...:group |
| 2860 | 20 27 70 6f 73 2d 74 69 70 29 0a 0a 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b | .'pos-tip)..;;;;;;;;;;;;;;;;;;;; |
| 2880 | 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| 28a0 | 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 0a 3b 3b 20 46 75 6e 63 74 69 6f 6e 73 0a | ;;;;;;;;;;;;;;;;;;.;;.Functions. |
| 28c0 | 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| 28e0 | 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| 2900 | 3b 3b 3b 3b 3b 3b 0a 0a 28 64 65 66 75 6e 20 70 6f 73 2d 74 69 70 2d 77 69 6e 64 6f 77 2d 73 79 | ;;;;;;..(defun.pos-tip-window-sy |
| 2920 | 73 74 65 6d 20 28 26 6f 70 74 69 6f 6e 61 6c 20 66 72 61 6d 65 29 0a 20 20 22 54 68 65 20 6e 61 | stem.(&optional.frame)..."The.na |
| 2940 | 6d 65 20 6f 66 20 74 68 65 20 77 69 6e 64 6f 77 20 73 79 73 74 65 6d 20 74 68 61 74 20 46 52 41 | me.of.the.window.system.that.FRA |
| 2960 | 4d 45 20 69 73 20 64 69 73 70 6c 61 79 69 6e 67 20 74 68 72 6f 75 67 68 2e 0a 54 68 65 20 76 61 | ME.is.displaying.through..The.va |
| 2980 | 6c 75 65 20 69 73 20 61 20 73 79 6d 62 6f 6c 2d 2d 2d 66 6f 72 20 69 6e 73 74 61 6e 63 65 2c 20 | lue.is.a.symbol---for.instance,. |
| 29a0 | 60 78 27 20 66 6f 72 20 58 20 77 69 6e 64 6f 77 73 2e 0a 54 68 65 20 76 61 6c 75 65 20 69 73 20 | `x'.for.X.windows..The.value.is. |
| 29c0 | 6e 69 6c 20 69 66 20 45 6d 61 63 73 20 69 73 20 75 73 69 6e 67 20 61 20 74 65 78 74 2d 6f 6e 6c | nil.if.Emacs.is.using.a.text-onl |
| 29e0 | 79 20 74 65 72 6d 69 6e 61 6c 2e 0a 0a 46 52 41 4d 45 20 64 65 66 61 75 6c 74 73 20 74 6f 20 74 | y.terminal...FRAME.defaults.to.t |
| 2a00 | 68 65 20 63 75 72 72 65 6e 74 6c 79 20 73 65 6c 65 63 74 65 64 20 66 72 61 6d 65 2e 22 0a 20 20 | he.currently.selected.frame."... |
| 2a20 | 28 6c 65 74 20 28 28 74 79 70 65 20 28 66 72 61 6d 65 70 20 28 6f 72 20 66 72 61 6d 65 20 28 73 | (let.((type.(framep.(or.frame.(s |
| 2a40 | 65 6c 65 63 74 65 64 2d 66 72 61 6d 65 29 29 29 29 29 0a 20 20 20 20 28 69 66 20 74 79 70 65 0a | elected-frame))))).....(if.type. |
| 2a60 | 09 28 61 6e 64 20 28 6e 6f 74 20 28 65 71 20 74 79 70 65 20 74 29 29 0a 09 20 20 20 20 20 74 79 | .(and.(not.(eq.type.t)).......ty |
| 2a80 | 70 65 29 0a 20 20 20 20 20 20 28 73 69 67 6e 61 6c 20 27 77 72 6f 6e 67 2d 74 79 70 65 2d 61 72 | pe).......(signal.'wrong-type-ar |
| 2aa0 | 67 75 6d 65 6e 74 20 28 6c 69 73 74 20 27 66 72 61 6d 65 70 20 66 72 61 6d 65 29 29 29 29 29 0a | gument.(list.'framep.frame))))). |
| 2ac0 | 0a 28 64 65 66 75 6e 20 70 6f 73 2d 74 69 70 2d 6e 6f 72 6d 61 6c 69 7a 65 2d 6e 61 74 6e 75 6d | .(defun.pos-tip-normalize-natnum |
| 2ae0 | 20 28 6f 62 6a 65 63 74 20 26 6f 70 74 69 6f 6e 61 6c 20 6e 29 0a 20 20 22 52 65 74 75 72 6e 20 | .(object.&optional.n)..."Return. |
| 2b00 | 61 20 4e 74 68 20 70 6f 77 65 72 20 6f 66 20 32 20 69 66 20 4f 42 4a 45 43 54 20 69 73 20 61 20 | a.Nth.power.of.2.if.OBJECT.is.a. |
| 2b20 | 70 6f 73 69 74 69 76 65 20 69 6e 74 65 67 65 72 2e 0a 4f 74 68 65 72 77 69 73 65 20 72 65 74 75 | positive.integer..Otherwise.retu |
| 2b40 | 72 6e 20 30 2e 20 4f 6d 69 74 74 69 6e 67 20 4e 20 6d 65 61 6e 73 20 72 65 74 75 72 6e 20 31 20 | rn.0..Omitting.N.means.return.1. |
| 2b60 | 66 6f 72 20 61 20 70 6f 73 69 74 69 76 65 20 69 6e 74 65 67 65 72 2e 22 0a 20 20 28 61 73 68 20 | for.a.positive.integer."...(ash. |
| 2b80 | 28 69 66 20 28 61 6e 64 20 28 6e 61 74 6e 75 6d 70 20 6f 62 6a 65 63 74 29 20 28 3e 20 6f 62 6a | (if.(and.(natnump.object).(>.obj |
| 2ba0 | 65 63 74 20 30 29 29 20 31 20 30 29 0a 20 20 20 20 20 20 20 28 6f 72 20 6e 20 30 29 29 29 0a 0a | ect.0)).1.0)........(or.n.0))).. |
| 2bc0 | 28 64 65 66 76 61 72 20 70 6f 73 2d 74 69 70 2d 73 61 76 65 64 2d 66 72 61 6d 65 2d 63 6f 6f 72 | (defvar.pos-tip-saved-frame-coor |
| 2be0 | 64 69 6e 61 74 65 73 20 27 28 30 20 2e 20 30 29 0a 20 20 22 54 68 65 20 6c 61 74 65 73 74 20 72 | dinates.'(0...0)..."The.latest.r |
| 2c00 | 65 73 75 6c 74 20 6f 66 20 60 70 6f 73 2d 74 69 70 2d 66 72 61 6d 65 2d 74 6f 70 2d 6c 65 66 74 | esult.of.`pos-tip-frame-top-left |
| 2c20 | 2d 63 6f 6f 72 64 69 6e 61 74 65 73 27 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 70 6f 73 2d 74 69 | -coordinates'.")..(defvar.pos-ti |
| 2c40 | 70 2d 66 72 61 6d 65 2d 6f 66 66 73 65 74 20 6e 69 6c 0a 20 20 22 54 68 65 20 6c 61 74 65 73 74 | p-frame-offset.nil..."The.latest |
| 2c60 | 20 72 65 73 75 6c 74 20 6f 66 20 60 70 6f 73 2d 74 69 70 2d 63 61 6c 69 62 72 61 74 65 2d 66 72 | .result.of.`pos-tip-calibrate-fr |
| 2c80 | 61 6d 65 2d 6f 66 66 73 65 74 27 2e 20 54 68 69 73 20 76 61 6c 75 65 0a 69 73 20 75 73 65 64 20 | ame-offset'..This.value.is.used. |
| 2ca0 | 66 6f 72 20 6e 6f 6e 2d 58 20 67 72 61 70 68 69 63 61 6c 20 65 6e 76 69 72 6f 6e 6d 65 6e 74 2e | for.non-X.graphical.environment. |
| 2cc0 | 22 29 0a 0a 28 64 65 66 76 61 72 20 70 6f 73 2d 74 69 70 2d 66 72 61 6d 65 2d 6f 66 66 73 65 74 | ")..(defvar.pos-tip-frame-offset |
| 2ce0 | 2d 61 72 72 61 79 20 5b 6e 69 6c 20 6e 69 6c 20 6e 69 6c 20 6e 69 6c 5d 0a 20 20 22 41 72 72 61 | -array.[nil.nil.nil.nil]..."Arra |
| 2d00 | 79 20 6f 66 20 74 68 65 20 72 65 73 75 6c 74 73 20 6f 66 20 60 70 6f 73 2d 74 69 70 2d 63 61 6c | y.of.the.results.of.`pos-tip-cal |
| 2d20 | 69 62 72 61 74 65 2d 66 72 61 6d 65 2d 6f 66 66 73 65 74 27 2e 20 54 68 65 79 20 61 72 65 0a 72 | ibrate-frame-offset'..They.are.r |
| 2d40 | 65 63 6f 72 64 65 64 20 6f 6e 6c 79 20 77 68 65 6e 20 60 70 6f 73 2d 74 69 70 2d 66 72 61 6d 65 | ecorded.only.when.`pos-tip-frame |
| 2d60 | 2d 74 6f 70 2d 6c 65 66 74 2d 63 6f 6f 72 64 69 6e 61 74 65 73 27 20 69 73 20 63 61 6c 6c 65 64 | -top-left-coordinates'.is.called |
| 2d80 | 20 66 6f 72 20 61 0a 6e 6f 6e 2d 58 20 62 75 74 20 67 72 61 70 68 69 63 61 6c 20 66 72 61 6d 65 | .for.a.non-X.but.graphical.frame |
| 2da0 | 2e 0a 0a 54 68 65 20 32 6e 64 20 61 6e 64 20 34 74 68 20 65 6c 65 6d 65 6e 74 73 20 61 72 65 20 | ...The.2nd.and.4th.elements.are. |
| 2dc0 | 74 68 65 20 76 61 6c 75 65 73 20 66 6f 72 20 66 72 61 6d 65 73 20 68 61 76 69 6e 67 20 61 20 6d | the.values.for.frames.having.a.m |
| 2de0 | 65 6e 75 20 62 61 72 2e 0a 54 68 65 20 33 72 64 20 61 6e 64 20 34 74 68 20 65 6c 65 6d 65 6e 74 | enu.bar..The.3rd.and.4th.element |
| 2e00 | 73 20 61 72 65 20 74 68 65 20 76 61 6c 75 65 73 20 66 6f 72 20 66 72 61 6d 65 73 20 68 61 76 69 | s.are.the.values.for.frames.havi |
| 2e20 | 6e 67 20 61 20 74 6f 6f 6c 20 62 61 72 2e 22 29 0a 0a 28 64 65 66 75 6e 20 70 6f 73 2d 74 69 70 | ng.a.tool.bar.")..(defun.pos-tip |
| 2e40 | 2d 66 72 61 6d 65 2d 74 6f 70 2d 6c 65 66 74 2d 63 6f 6f 72 64 69 6e 61 74 65 73 20 28 26 6f 70 | -frame-top-left-coordinates.(&op |
| 2e60 | 74 69 6f 6e 61 6c 20 66 72 61 6d 65 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 70 69 78 65 | tional.frame)..."Return.the.pixe |
| 2e80 | 6c 20 63 6f 6f 72 64 69 6e 61 74 65 73 20 6f 66 20 46 52 41 4d 45 20 61 73 20 61 20 63 6f 6e 73 | l.coordinates.of.FRAME.as.a.cons |
| 2ea0 | 20 63 65 6c 6c 20 28 4c 45 46 54 20 2e 20 54 4f 50 29 2c 0a 77 68 69 63 68 20 61 72 65 20 72 65 | .cell.(LEFT...TOP),.which.are.re |
| 2ec0 | 6c 61 74 69 76 65 20 74 6f 20 74 6f 70 20 6c 65 66 74 20 63 6f 72 6e 65 72 20 6f 66 20 73 63 72 | lative.to.top.left.corner.of.scr |
| 2ee0 | 65 65 6e 2e 0a 0a 52 65 74 75 72 6e 20 6e 69 6c 20 69 66 20 66 61 69 6c 69 6e 67 20 74 6f 20 61 | een...Return.nil.if.failing.to.a |
| 2f00 | 63 71 75 69 72 65 20 74 68 65 20 63 6f 6f 72 64 69 6e 61 74 65 73 2e 0a 0a 49 66 20 46 52 41 4d | cquire.the.coordinates...If.FRAM |
| 2f20 | 45 20 69 73 20 6f 6d 69 74 74 65 64 2c 20 75 73 65 20 73 65 6c 65 63 74 65 64 2d 66 72 61 6d 65 | E.is.omitted,.use.selected-frame |
| 2f40 | 2e 0a 0a 55 73 65 72 73 20 63 61 6e 20 61 6c 73 6f 20 67 65 74 20 74 68 65 20 66 72 61 6d 65 20 | ...Users.can.also.get.the.frame. |
| 2f60 | 63 6f 6f 72 64 69 6e 61 74 65 73 20 62 79 20 72 65 66 65 72 72 69 6e 67 20 74 68 65 20 76 61 72 | coordinates.by.referring.the.var |
| 2f80 | 69 61 62 6c 65 0a 60 70 6f 73 2d 74 69 70 2d 73 61 76 65 64 2d 66 72 61 6d 65 2d 63 6f 6f 72 64 | iable.`pos-tip-saved-frame-coord |
| 2fa0 | 69 6e 61 74 65 73 27 20 6a 75 73 74 20 61 66 74 65 72 20 63 61 6c 6c 69 6e 67 20 74 68 69 73 20 | inates'.just.after.calling.this. |
| 2fc0 | 66 75 6e 63 74 69 6f 6e 2e 22 0a 20 20 28 6c 65 74 20 28 28 77 69 6e 73 79 73 20 28 70 6f 73 2d | function."...(let.((winsys.(pos- |
| 2fe0 | 74 69 70 2d 77 69 6e 64 6f 77 2d 73 79 73 74 65 6d 20 66 72 61 6d 65 29 29 29 0a 20 20 20 20 28 | tip-window-system.frame))).....( |
| 3000 | 63 6f 6e 64 0a 20 20 20 20 20 28 28 6e 75 6c 6c 20 77 69 6e 73 79 73 29 0a 20 20 20 20 20 20 28 | cond......((null.winsys).......( |
| 3020 | 65 72 72 6f 72 20 22 74 65 78 74 2d 6f 6e 6c 79 20 66 72 61 6d 65 3a 20 25 53 22 20 66 72 61 6d | error."text-only.frame:.%S".fram |
| 3040 | 65 29 29 0a 20 20 20 20 20 28 28 65 71 20 77 69 6e 73 79 73 20 27 78 29 0a 20 20 20 20 20 20 28 | e))......((eq.winsys.'x).......( |
| 3060 | 63 6f 6e 64 69 74 69 6f 6e 2d 63 61 73 65 20 6e 69 6c 0a 09 20 20 28 77 69 74 68 2d 63 75 72 72 | condition-case.nil....(with-curr |
| 3080 | 65 6e 74 2d 62 75 66 66 65 72 20 28 67 65 74 2d 62 75 66 66 65 72 2d 63 72 65 61 74 65 20 22 20 | ent-buffer.(get-buffer-create.". |
| 30a0 | 2a 78 77 69 6e 69 6e 66 6f 2a 22 29 0a 09 20 20 20 20 28 6c 65 74 20 28 28 63 61 73 65 2d 66 6f | *xwininfo*")......(let.((case-fo |
| 30c0 | 6c 64 2d 73 65 61 72 63 68 20 6e 69 6c 29 29 0a 09 20 20 20 20 20 20 28 62 75 66 66 65 72 2d 64 | ld-search.nil))........(buffer-d |
| 30e0 | 69 73 61 62 6c 65 2d 75 6e 64 6f 29 0a 09 20 20 20 20 20 20 28 65 72 61 73 65 2d 62 75 66 66 65 | isable-undo)........(erase-buffe |
| 3100 | 72 29 0a 09 20 20 20 20 20 20 28 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 73 68 65 6c 6c 2d 66 69 | r)........(call-process.shell-fi |
| 3120 | 6c 65 2d 6e 61 6d 65 20 6e 69 6c 20 74 20 6e 69 6c 20 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e 64 2d | le-name.nil.t.nil.shell-command- |
| 3140 | 73 77 69 74 63 68 0a 09 09 09 20 20 20 20 28 66 6f 72 6d 61 74 20 22 78 77 69 6e 69 6e 66 6f 20 | switch........(format."xwininfo. |
| 3160 | 2d 64 69 73 70 6c 61 79 20 25 73 20 2d 69 64 20 25 73 22 0a 09 09 09 09 20 20 20 20 28 66 72 61 | -display.%s.-id.%s".........(fra |
| 3180 | 6d 65 2d 70 61 72 61 6d 65 74 65 72 20 66 72 61 6d 65 20 27 64 69 73 70 6c 61 79 29 0a 09 09 09 | me-parameter.frame.'display).... |
| 31a0 | 09 20 20 20 20 28 66 72 61 6d 65 2d 70 61 72 61 6d 65 74 65 72 20 66 72 61 6d 65 20 27 77 69 6e | .....(frame-parameter.frame.'win |
| 31c0 | 64 6f 77 2d 69 64 29 29 29 0a 09 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 | dow-id)))........(goto-char.(poi |
| 31e0 | 6e 74 2d 6d 69 6e 29 29 0a 09 20 20 20 20 20 20 28 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 | nt-min))........(search-forward. |
| 3200 | 22 5c 6e 20 20 41 62 73 6f 6c 75 74 65 22 29 0a 09 20 20 20 20 20 20 28 73 65 74 71 20 70 6f 73 | "\n..Absolute")........(setq.pos |
| 3220 | 2d 74 69 70 2d 73 61 76 65 64 2d 66 72 61 6d 65 2d 63 6f 6f 72 64 69 6e 61 74 65 73 0a 09 09 20 | -tip-saved-frame-coordinates.... |
| 3240 | 20 20 20 28 63 6f 6e 73 20 28 73 74 72 69 6e 67 2d 74 6f 2d 6e 75 6d 62 65 72 20 28 62 75 66 66 | ...(cons.(string-to-number.(buff |
| 3260 | 65 72 2d 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 0a 09 09 09 09 09 | er-substring-no-properties...... |
| 3280 | 20 20 20 20 20 28 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 58 3a 20 22 29 0a 09 09 09 09 | .....(search-forward."X:.")..... |
| 32a0 | 09 20 20 20 20 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 29 29 29 0a 09 09 09 20 | ......(line-end-position)))..... |
| 32c0 | 20 28 73 74 72 69 6e 67 2d 74 6f 2d 6e 75 6d 62 65 72 20 28 62 75 66 66 65 72 2d 73 75 62 73 74 | .(string-to-number.(buffer-subst |
| 32e0 | 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 0a 09 09 09 09 09 20 20 20 20 20 28 73 65 | ring-no-properties...........(se |
| 3300 | 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 59 3a 20 22 29 0a 09 09 09 09 09 20 20 20 20 20 28 6c | arch-forward."Y:.")...........(l |
| 3320 | 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 29 29 29 29 29 29 29 0a 09 28 65 72 72 6f 72 20 | ine-end-position)))))))..(error. |
| 3340 | 6e 69 6c 29 29 29 0a 20 20 20 20 20 28 74 0a 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 69 6e 64 | nil)))......(t.......(let*.((ind |
| 3360 | 65 78 20 28 2b 20 28 70 6f 73 2d 74 69 70 2d 6e 6f 72 6d 61 6c 69 7a 65 2d 6e 61 74 6e 75 6d 0a | ex.(+.(pos-tip-normalize-natnum. |
| 3380 | 09 09 09 28 66 72 61 6d 65 2d 70 61 72 61 6d 65 74 65 72 20 66 72 61 6d 65 20 27 6d 65 6e 75 2d | ...(frame-parameter.frame.'menu- |
| 33a0 | 62 61 72 2d 6c 69 6e 65 73 29 20 30 29 0a 09 09 20 20 20 20 20 20 20 28 70 6f 73 2d 74 69 70 2d | bar-lines).0)..........(pos-tip- |
| 33c0 | 6e 6f 72 6d 61 6c 69 7a 65 2d 6e 61 74 6e 75 6d 0a 09 09 09 28 66 72 61 6d 65 2d 70 61 72 61 6d | normalize-natnum....(frame-param |
| 33e0 | 65 74 65 72 20 66 72 61 6d 65 20 27 74 6f 6f 6c 2d 62 61 72 2d 6c 69 6e 65 73 29 20 31 29 29 29 | eter.frame.'tool-bar-lines).1))) |
| 3400 | 0a 09 20 20 20 20 20 28 6f 66 66 73 65 74 20 28 6f 72 20 28 61 72 65 66 20 70 6f 73 2d 74 69 70 | .......(offset.(or.(aref.pos-tip |
| 3420 | 2d 66 72 61 6d 65 2d 6f 66 66 73 65 74 2d 61 72 72 61 79 20 69 6e 64 65 78 29 0a 09 09 09 20 28 | -frame-offset-array.index).....( |
| 3440 | 61 73 65 74 20 70 6f 73 2d 74 69 70 2d 66 72 61 6d 65 2d 6f 66 66 73 65 74 2d 61 72 72 61 79 20 | aset.pos-tip-frame-offset-array. |
| 3460 | 69 6e 64 65 78 0a 09 09 09 20 20 20 20 20 20 20 28 70 6f 73 2d 74 69 70 2d 63 61 6c 69 62 72 61 | index...........(pos-tip-calibra |
| 3480 | 74 65 2d 66 72 61 6d 65 2d 6f 66 66 73 65 74 20 66 72 61 6d 65 29 29 29 29 29 0a 09 28 69 66 20 | te-frame-offset.frame)))))..(if. |
| 34a0 | 6f 66 66 73 65 74 0a 09 20 20 20 20 28 73 65 74 71 20 70 6f 73 2d 74 69 70 2d 73 61 76 65 64 2d | offset......(setq.pos-tip-saved- |
| 34c0 | 66 72 61 6d 65 2d 63 6f 6f 72 64 69 6e 61 74 65 73 0a 09 09 20 20 28 63 6f 6e 73 20 28 2b 20 28 | frame-coordinates.....(cons.(+.( |
| 34e0 | 65 76 61 6c 20 28 66 72 61 6d 65 2d 70 61 72 61 6d 65 74 65 72 20 66 72 61 6d 65 20 27 6c 65 66 | eval.(frame-parameter.frame.'lef |
| 3500 | 74 29 29 0a 09 09 09 20 20 20 28 63 61 72 20 6f 66 66 73 65 74 29 29 0a 09 09 09 28 2b 20 28 65 | t)).......(car.offset))....(+.(e |
| 3520 | 76 61 6c 20 28 66 72 61 6d 65 2d 70 61 72 61 6d 65 74 65 72 20 66 72 61 6d 65 20 27 74 6f 70 29 | val.(frame-parameter.frame.'top) |
| 3540 | 29 0a 09 09 09 20 20 20 28 63 64 72 20 6f 66 66 73 65 74 29 29 29 29 29 29 29 29 29 29 0a 0a 28 | ).......(cdr.offset))))))))))..( |
| 3560 | 64 65 66 75 6e 20 70 6f 73 2d 74 69 70 2d 66 72 61 6d 65 2d 72 65 6c 61 74 69 76 65 2d 70 6f 73 | defun.pos-tip-frame-relative-pos |
| 3580 | 69 74 69 6f 6e 0a 20 20 28 66 72 61 6d 65 31 20 66 72 61 6d 65 32 20 26 6f 70 74 69 6f 6e 61 6c | ition...(frame1.frame2.&optional |
| 35a0 | 20 77 33 32 2d 66 72 61 6d 65 20 66 72 61 6d 65 2d 63 6f 6f 72 64 31 20 66 72 61 6d 65 2d 63 6f | .w32-frame.frame-coord1.frame-co |
| 35c0 | 6f 72 64 32 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 70 69 78 65 6c 20 63 6f 6f 72 64 69 | ord2)..."Return.the.pixel.coordi |
| 35e0 | 6e 61 74 65 73 20 6f 66 20 46 52 41 4d 45 31 20 72 65 6c 61 74 69 76 65 20 74 6f 20 46 52 41 4d | nates.of.FRAME1.relative.to.FRAM |
| 3600 | 45 32 0a 61 73 20 61 20 63 6f 6e 73 20 63 65 6c 6c 20 28 4c 45 46 54 20 2e 20 54 4f 50 29 2e 0a | E2.as.a.cons.cell.(LEFT...TOP).. |
| 3620 | 0a 57 33 32 2d 46 52 41 4d 45 20 6e 6f 6e 2d 6e 69 6c 20 6d 65 61 6e 73 20 62 6f 74 68 20 6f 66 | .W32-FRAME.non-nil.means.both.of |
| 3640 | 20 66 72 61 6d 65 73 20 61 72 65 20 75 6e 64 65 72 20 60 77 33 32 27 20 77 69 6e 64 6f 77 20 73 | .frames.are.under.`w32'.window.s |
| 3660 | 79 73 74 65 6d 2e 0a 0a 46 52 41 4d 45 2d 43 4f 4f 52 44 31 20 61 6e 64 20 46 52 41 4d 45 2d 43 | ystem...FRAME-COORD1.and.FRAME-C |
| 3680 | 4f 4f 52 44 32 2c 20 69 66 20 67 69 76 65 6e 2c 20 73 70 65 63 69 66 79 20 74 68 65 20 61 62 73 | OORD2,.if.given,.specify.the.abs |
| 36a0 | 6f 6c 75 74 65 0a 63 6f 6f 72 64 69 6e 61 74 65 73 20 6f 66 20 46 52 41 4d 45 31 20 61 6e 64 20 | olute.coordinates.of.FRAME1.and. |
| 36c0 | 46 52 41 4d 45 32 2c 20 72 65 73 70 65 63 74 69 76 65 6c 79 2c 20 77 68 69 63 68 20 6d 61 6b 65 | FRAME2,.respectively,.which.make |
| 36e0 | 20 74 68 65 0a 63 61 6c 63 75 6c 61 74 69 6f 6e 73 20 66 61 73 74 65 72 20 69 66 20 74 68 65 20 | .the.calculations.faster.if.the. |
| 3700 | 66 72 61 6d 65 73 20 68 61 76 65 20 64 69 66 66 65 72 65 6e 74 20 68 65 69 67 68 74 73 20 6f 66 | frames.have.different.heights.of |
| 3720 | 20 6d 65 6e 75 20 62 61 72 73 0a 61 6e 64 20 74 6f 6f 6c 20 62 61 72 73 2e 22 0a 20 20 28 69 66 | .menu.bars.and.tool.bars."...(if |
| 3740 | 20 28 61 6e 64 20 28 65 71 20 28 70 6f 73 2d 74 69 70 2d 6e 6f 72 6d 61 6c 69 7a 65 2d 6e 61 74 | .(and.(eq.(pos-tip-normalize-nat |
| 3760 | 6e 75 6d 0a 09 09 28 66 72 61 6d 65 2d 70 61 72 61 6d 65 74 65 72 20 66 72 61 6d 65 31 20 27 6d | num...(frame-parameter.frame1.'m |
| 3780 | 65 6e 75 2d 62 61 72 2d 6c 69 6e 65 73 29 29 0a 09 20 20 20 20 20 20 20 28 70 6f 73 2d 74 69 70 | enu-bar-lines)).........(pos-tip |
| 37a0 | 2d 6e 6f 72 6d 61 6c 69 7a 65 2d 6e 61 74 6e 75 6d 0a 09 09 28 66 72 61 6d 65 2d 70 61 72 61 6d | -normalize-natnum...(frame-param |
| 37c0 | 65 74 65 72 20 66 72 61 6d 65 32 20 27 6d 65 6e 75 2d 62 61 72 2d 6c 69 6e 65 73 29 29 29 0a 09 | eter.frame2.'menu-bar-lines))).. |
| 37e0 | 20 20 20 28 6f 72 20 77 33 32 2d 66 72 61 6d 65 0a 09 20 20 20 20 20 20 20 28 65 71 20 28 70 6f | ...(or.w32-frame.........(eq.(po |
| 3800 | 73 2d 74 69 70 2d 6e 6f 72 6d 61 6c 69 7a 65 2d 6e 61 74 6e 75 6d 0a 09 09 20 20 20 20 28 66 72 | s-tip-normalize-natnum.......(fr |
| 3820 | 61 6d 65 2d 70 61 72 61 6d 65 74 65 72 20 66 72 61 6d 65 31 20 27 74 6f 6f 6c 2d 62 61 72 2d 6c | ame-parameter.frame1.'tool-bar-l |
| 3840 | 69 6e 65 73 29 29 0a 09 09 20 20 20 28 70 6f 73 2d 74 69 70 2d 6e 6f 72 6d 61 6c 69 7a 65 2d 6e | ines))......(pos-tip-normalize-n |
| 3860 | 61 74 6e 75 6d 0a 09 09 20 20 20 20 28 66 72 61 6d 65 2d 70 61 72 61 6d 65 74 65 72 20 66 72 61 | atnum.......(frame-parameter.fra |
| 3880 | 6d 65 32 20 27 74 6f 6f 6c 2d 62 61 72 2d 6c 69 6e 65 73 29 29 29 29 29 0a 20 20 20 20 20 20 28 | me2.'tool-bar-lines))))).......( |
| 38a0 | 63 6f 6e 73 20 28 2d 20 28 65 76 61 6c 20 28 66 72 61 6d 65 2d 70 61 72 61 6d 65 74 65 72 20 66 | cons.(-.(eval.(frame-parameter.f |
| 38c0 | 72 61 6d 65 31 20 27 6c 65 66 74 29 29 0a 09 20 20 20 20 20 20 20 28 65 76 61 6c 20 28 66 72 61 | rame1.'left)).........(eval.(fra |
| 38e0 | 6d 65 2d 70 61 72 61 6d 65 74 65 72 20 66 72 61 6d 65 32 20 27 6c 65 66 74 29 29 29 0a 09 20 20 | me-parameter.frame2.'left))).... |
| 3900 | 20 20 28 2d 20 28 65 76 61 6c 20 28 66 72 61 6d 65 2d 70 61 72 61 6d 65 74 65 72 20 66 72 61 6d | ..(-.(eval.(frame-parameter.fram |
| 3920 | 65 31 20 27 74 6f 70 29 29 0a 09 20 20 20 20 20 20 20 28 65 76 61 6c 20 28 66 72 61 6d 65 2d 70 | e1.'top)).........(eval.(frame-p |
| 3940 | 61 72 61 6d 65 74 65 72 20 66 72 61 6d 65 32 20 27 74 6f 70 29 29 29 29 0a 20 20 20 20 28 75 6e | arameter.frame2.'top)))).....(un |
| 3960 | 6c 65 73 73 20 66 72 61 6d 65 2d 63 6f 6f 72 64 31 0a 20 20 20 20 20 20 28 73 65 74 71 20 66 72 | less.frame-coord1.......(setq.fr |
| 3980 | 61 6d 65 2d 63 6f 6f 72 64 31 20 28 6c 65 74 20 28 70 6f 73 2d 74 69 70 2d 73 61 76 65 64 2d 66 | ame-coord1.(let.(pos-tip-saved-f |
| 39a0 | 72 61 6d 65 2d 63 6f 6f 72 64 69 6e 61 74 65 73 29 0a 09 09 09 20 20 20 28 70 6f 73 2d 74 69 70 | rame-coordinates).......(pos-tip |
| 39c0 | 2d 66 72 61 6d 65 2d 74 6f 70 2d 6c 65 66 74 2d 63 6f 6f 72 64 69 6e 61 74 65 73 20 66 72 61 6d | -frame-top-left-coordinates.fram |
| 39e0 | 65 31 29 29 29 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 66 72 61 6d 65 2d 63 6f 6f 72 64 32 0a | e1)))).....(unless.frame-coord2. |
| 3a00 | 20 20 20 20 20 20 28 73 65 74 71 20 66 72 61 6d 65 2d 63 6f 6f 72 64 32 20 28 6c 65 74 20 28 70 | ......(setq.frame-coord2.(let.(p |
| 3a20 | 6f 73 2d 74 69 70 2d 73 61 76 65 64 2d 66 72 61 6d 65 2d 63 6f 6f 72 64 69 6e 61 74 65 73 29 0a | os-tip-saved-frame-coordinates). |
| 3a40 | 09 09 09 20 20 20 28 70 6f 73 2d 74 69 70 2d 66 72 61 6d 65 2d 74 6f 70 2d 6c 65 66 74 2d 63 6f | ......(pos-tip-frame-top-left-co |
| 3a60 | 6f 72 64 69 6e 61 74 65 73 20 66 72 61 6d 65 32 29 29 29 29 0a 20 20 20 20 28 63 6f 6e 73 20 28 | ordinates.frame2)))).....(cons.( |
| 3a80 | 2d 20 28 63 61 72 20 66 72 61 6d 65 2d 63 6f 6f 72 64 31 29 20 28 63 61 72 20 66 72 61 6d 65 2d | -.(car.frame-coord1).(car.frame- |
| 3aa0 | 63 6f 6f 72 64 32 29 29 0a 09 20 20 28 2d 20 28 63 64 72 20 66 72 61 6d 65 2d 63 6f 6f 72 64 31 | coord2))....(-.(cdr.frame-coord1 |
| 3ac0 | 29 20 28 63 64 72 20 66 72 61 6d 65 2d 63 6f 6f 72 64 32 29 29 29 29 29 0a 0a 28 64 65 66 76 61 | ).(cdr.frame-coord2)))))..(defva |
| 3ae0 | 72 20 70 6f 73 2d 74 69 70 2d 75 70 70 65 72 73 69 64 65 2d 70 20 6e 69 6c 0a 20 20 22 4e 6f 6e | r.pos-tip-upperside-p.nil..."Non |
| 3b00 | 2d 6e 69 6c 20 69 6e 64 69 63 61 74 65 73 20 74 68 65 20 6c 61 74 65 73 74 20 72 65 73 75 6c 74 | -nil.indicates.the.latest.result |
| 3b20 | 20 6f 66 20 60 70 6f 73 2d 74 69 70 2d 63 6f 6d 70 75 74 65 2d 70 69 78 65 6c 2d 70 6f 73 69 74 | .of.`pos-tip-compute-pixel-posit |
| 3b40 | 69 6f 6e 27 0a 77 61 73 20 75 70 70 65 72 20 74 68 61 6e 20 74 68 65 20 6c 6f 63 61 74 69 6f 6e | ion'.was.upper.than.the.location |
| 3b60 | 20 73 70 65 63 69 66 69 65 64 20 62 79 20 74 68 65 20 61 72 67 75 6d 65 6e 74 73 2e 22 29 0a 0a | .specified.by.the.arguments.").. |
| 3b80 | 28 64 65 66 76 61 72 20 70 6f 73 2d 74 69 70 2d 77 33 32 2d 73 61 76 65 64 2d 6d 61 78 2d 77 69 | (defvar.pos-tip-w32-saved-max-wi |
| 3ba0 | 64 74 68 2d 68 65 69 67 68 74 20 6e 69 6c 0a 20 20 22 44 69 73 70 6c 61 79 20 70 69 78 65 6c 20 | dth-height.nil..."Display.pixel. |
| 3bc0 | 73 69 7a 65 20 65 66 66 65 63 74 69 76 65 20 66 6f 72 20 73 68 6f 77 69 6e 67 20 74 6f 6f 6c 74 | size.effective.for.showing.toolt |
| 3be0 | 69 70 20 69 6e 20 4d 53 2d 57 69 6e 64 6f 77 73 20 64 65 73 6b 74 6f 70 2e 0a 54 68 69 73 20 64 | ip.in.MS-Windows.desktop..This.d |
| 3c00 | 6f 65 73 6e 27 74 20 69 6e 63 6c 75 64 65 20 74 68 65 20 74 61 73 6b 62 61 72 20 61 72 65 61 2c | oesn't.include.the.taskbar.area, |
| 3c20 | 20 73 6f 20 69 73 6e 27 74 20 73 61 6d 65 20 61 73 20 61 63 74 75 61 6c 20 64 69 73 70 6c 61 79 | .so.isn't.same.as.actual.display |
| 3c40 | 20 73 69 7a 65 2e 22 29 0a 0a 28 64 65 66 75 6e 20 70 6f 73 2d 74 69 70 2d 63 6f 6d 70 75 74 65 | .size.")..(defun.pos-tip-compute |
| 3c60 | 2d 70 69 78 65 6c 2d 70 6f 73 69 74 69 6f 6e 0a 20 20 28 26 6f 70 74 69 6f 6e 61 6c 20 70 6f 73 | -pixel-position...(&optional.pos |
| 3c80 | 20 77 69 6e 64 6f 77 20 70 69 78 65 6c 2d 77 69 64 74 68 20 70 69 78 65 6c 2d 68 65 69 67 68 74 | .window.pixel-width.pixel-height |
| 3ca0 | 20 66 72 61 6d 65 2d 63 6f 6f 72 64 69 6e 61 74 65 73 20 64 78 20 64 79 29 0a 20 20 22 52 65 74 | .frame-coordinates.dx.dy)..."Ret |
| 3cc0 | 75 72 6e 20 70 69 78 65 6c 20 70 6f 73 69 74 69 6f 6e 20 6f 66 20 50 4f 53 20 69 6e 20 57 49 4e | urn.pixel.position.of.POS.in.WIN |
| 3ce0 | 44 4f 57 20 6c 69 6b 65 20 28 58 20 2e 20 59 29 2c 20 77 68 69 63 68 20 69 6e 64 69 63 61 74 65 | DOW.like.(X...Y),.which.indicate |
| 3d00 | 73 0a 74 68 65 20 61 62 73 6f 6c 75 74 65 20 6f 72 20 72 65 6c 61 74 69 76 65 20 63 6f 6f 72 64 | s.the.absolute.or.relative.coord |
| 3d20 | 69 6e 61 74 65 73 20 6f 66 20 62 6f 74 74 6f 6d 20 6c 65 66 74 20 63 6f 72 6e 65 72 20 6f 66 20 | inates.of.bottom.left.corner.of. |
| 3d40 | 74 68 65 20 6f 62 6a 65 63 74 2e 0a 0a 4f 6d 69 74 74 69 6e 67 20 50 4f 53 20 61 6e 64 20 57 49 | the.object...Omitting.POS.and.WI |
| 3d60 | 4e 44 4f 57 20 6d 65 61 6e 73 20 75 73 65 20 63 75 72 72 65 6e 74 20 70 6f 73 69 74 69 6f 6e 20 | NDOW.means.use.current.position. |
| 3d80 | 61 6e 64 20 73 65 6c 65 63 74 65 64 20 77 69 6e 64 6f 77 2c 0a 72 65 73 70 65 63 74 69 76 65 6c | and.selected.window,.respectivel |
| 3da0 | 79 2e 0a 0a 49 66 20 50 49 58 45 4c 2d 57 49 44 54 48 20 61 6e 64 20 50 49 58 45 4c 2d 48 45 49 | y...If.PIXEL-WIDTH.and.PIXEL-HEI |
| 3dc0 | 47 48 54 20 61 72 65 20 67 69 76 65 6e 2c 20 74 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 61 73 73 | GHT.are.given,.this.function.ass |
| 3de0 | 75 6d 65 73 20 74 68 65 73 65 0a 76 61 6c 75 65 73 20 61 73 20 74 68 65 20 73 69 7a 65 20 6f 66 | umes.these.values.as.the.size.of |
| 3e00 | 20 73 6d 61 6c 6c 20 77 69 6e 64 6f 77 20 6c 69 6b 65 20 74 6f 6f 6c 74 69 70 20 77 68 69 63 68 | .small.window.like.tooltip.which |
| 3e20 | 20 69 73 20 6c 6f 63 61 74 65 64 20 61 72 6f 75 6e 64 20 74 68 65 0a 6f 62 6a 65 63 74 20 61 74 | .is.located.around.the.object.at |
| 3e40 | 20 50 4f 53 2e 20 54 68 65 73 65 20 76 61 6c 75 65 73 20 61 72 65 20 75 73 65 64 20 74 6f 20 61 | .POS..These.values.are.used.to.a |
| 3e60 | 64 6a 75 73 74 20 74 68 65 20 6c 6f 63 61 74 69 6f 6e 20 69 6e 20 6f 72 64 65 72 20 74 68 61 74 | djust.the.location.in.order.that |
| 3e80 | 0a 74 68 65 20 74 6f 6f 6c 74 69 70 20 77 6f 6e 27 74 20 64 69 73 61 70 70 65 61 72 20 62 79 20 | .the.tooltip.won't.disappear.by. |
| 3ea0 | 73 74 69 63 6b 69 6e 67 20 6f 75 74 20 6f 66 20 74 68 65 20 64 69 73 70 6c 61 79 2e 20 42 79 20 | sticking.out.of.the.display..By. |
| 3ec0 | 72 65 66 65 72 72 69 6e 67 0a 74 68 65 20 76 61 72 69 61 62 6c 65 20 60 70 6f 73 2d 74 69 70 2d | referring.the.variable.`pos-tip- |
| 3ee0 | 75 70 70 65 72 73 69 64 65 2d 70 27 20 61 66 74 65 72 20 63 61 6c 6c 69 6e 67 20 74 68 69 73 20 | upperside-p'.after.calling.this. |
| 3f00 | 66 75 6e 63 74 69 6f 6e 2c 20 75 73 65 72 20 63 61 6e 0a 65 78 61 6d 69 6e 65 20 77 68 65 74 68 | function,.user.can.examine.wheth |
| 3f20 | 65 72 20 74 68 65 20 74 6f 6f 6c 74 69 70 20 77 69 6c 6c 20 62 65 20 6c 6f 63 61 74 65 64 20 61 | er.the.tooltip.will.be.located.a |
| 3f40 | 62 6f 76 65 20 74 68 65 20 73 70 65 63 69 66 69 65 64 20 70 6f 73 69 74 69 6f 6e 2e 0a 0a 49 66 | bove.the.specified.position...If |
| 3f60 | 20 46 52 41 4d 45 2d 43 4f 4f 52 44 49 4e 41 54 45 53 20 69 73 20 6f 6d 69 74 74 65 64 20 6f 72 | .FRAME-COORDINATES.is.omitted.or |
| 3f80 | 20 6e 69 6c 2c 20 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 6f 62 74 61 69 6e 20 74 68 65 20 61 | .nil,.automatically.obtain.the.a |
| 3fa0 | 62 73 6f 6c 75 74 65 0a 63 6f 6f 72 64 69 6e 61 74 65 73 20 6f 66 20 74 68 65 20 74 6f 70 20 6c | bsolute.coordinates.of.the.top.l |
| 3fc0 | 65 66 74 20 63 6f 72 6e 65 72 20 6f 66 20 66 72 61 6d 65 20 77 68 69 63 68 20 57 49 4e 44 4f 57 | eft.corner.of.frame.which.WINDOW |
| 3fe0 | 20 69 73 20 6f 6e 2e 20 48 65 72 65 2c 0a 60 74 6f 70 20 6c 65 66 74 20 63 6f 72 6e 65 72 20 6f | .is.on..Here,.`top.left.corner.o |
| 4000 | 66 20 66 72 61 6d 65 27 20 72 65 70 72 65 73 65 6e 74 73 20 74 68 65 20 6f 72 69 67 69 6e 20 6f | f.frame'.represents.the.origin.o |
| 4020 | 66 20 60 77 69 6e 64 6f 77 2d 70 69 78 65 6c 2d 65 64 67 65 73 27 0a 61 6e 64 20 69 74 73 20 63 | f.`window-pixel-edges'.and.its.c |
| 4040 | 6f 6f 72 64 69 6e 61 74 65 73 20 61 72 65 20 65 73 73 65 6e 74 69 61 6c 20 66 6f 72 20 63 61 6c | oordinates.are.essential.for.cal |
| 4060 | 63 75 6c 61 74 69 6e 67 20 74 68 65 20 72 65 74 75 72 6e 20 76 61 6c 75 65 20 61 73 0a 61 62 73 | culating.the.return.value.as.abs |
| 4080 | 6f 6c 75 74 65 20 63 6f 6f 72 64 69 6e 61 74 65 73 2e 20 49 66 20 61 20 63 6f 6e 73 20 63 65 6c | olute.coordinates..If.a.cons.cel |
| 40a0 | 6c 20 6c 69 6b 65 20 28 4c 45 46 54 20 2e 20 54 4f 50 29 2c 20 73 70 65 63 69 66 69 65 73 20 74 | l.like.(LEFT...TOP),.specifies.t |
| 40c0 | 68 65 0a 66 72 61 6d 65 20 61 62 73 6f 6c 75 74 65 20 6c 6f 63 61 74 69 6f 6e 20 61 6e 64 20 6d | he.frame.absolute.location.and.m |
| 40e0 | 61 6b 65 73 20 74 68 65 20 63 61 6c 63 75 6c 61 74 69 6f 6e 20 73 6c 69 67 68 74 6c 79 20 66 61 | akes.the.calculation.slightly.fa |
| 4100 | 73 74 65 72 2c 20 62 75 74 20 63 61 6e 0a 62 65 20 75 73 65 64 20 6f 6e 6c 79 20 77 68 65 6e 20 | ster,.but.can.be.used.only.when. |
| 4120 | 69 74 27 73 20 63 6c 65 61 72 20 74 68 61 74 20 66 72 61 6d 65 20 69 73 20 69 6e 20 74 68 65 20 | it's.clear.that.frame.is.in.the. |
| 4140 | 73 70 65 63 69 66 69 65 64 20 70 6f 73 69 74 69 6f 6e 2e 20 55 73 65 72 73 0a 63 61 6e 20 67 65 | specified.position..Users.can.ge |
| 4160 | 74 20 74 68 65 20 6c 61 74 65 73 74 20 76 61 6c 75 65 73 20 6f 66 20 66 72 61 6d 65 20 63 6f 6f | t.the.latest.values.of.frame.coo |
| 4180 | 72 64 69 6e 61 74 65 73 20 66 6f 72 20 75 73 69 6e 67 20 69 6e 20 74 68 65 20 6e 65 78 74 20 63 | rdinates.for.using.in.the.next.c |
| 41a0 | 61 6c 6c 0a 62 79 20 72 65 66 65 72 72 69 6e 67 20 74 68 65 20 76 61 72 69 61 62 6c 65 20 60 70 | all.by.referring.the.variable.`p |
| 41c0 | 6f 73 2d 74 69 70 2d 73 61 76 65 64 2d 66 72 61 6d 65 2d 63 6f 6f 72 64 69 6e 61 74 65 73 27 20 | os-tip-saved-frame-coordinates'. |
| 41e0 | 6a 75 73 74 20 61 66 74 65 72 0a 63 61 6c 6c 69 6e 67 20 74 68 69 73 20 66 75 6e 63 74 69 6f 6e | just.after.calling.this.function |
| 4200 | 2e 20 4f 74 68 65 72 77 69 73 65 2c 20 46 52 41 4d 45 2d 43 4f 4f 52 44 49 4e 41 54 45 53 20 60 | ..Otherwise,.FRAME-COORDINATES.` |
| 4220 | 72 65 6c 61 74 69 76 65 27 20 6d 65 61 6e 73 20 72 65 74 75 72 6e 0a 70 69 78 65 6c 20 63 6f 6f | relative'.means.return.pixel.coo |
| 4240 | 72 64 69 6e 61 74 65 73 20 6f 66 20 74 68 65 20 6f 62 6a 65 63 74 20 72 65 6c 61 74 69 76 65 20 | rdinates.of.the.object.relative. |
| 4260 | 74 6f 20 74 68 65 20 74 6f 70 20 6c 65 66 74 20 63 6f 72 6e 65 72 20 6f 66 20 74 68 65 20 66 72 | to.the.top.left.corner.of.the.fr |
| 4280 | 61 6d 65 2e 0a 54 68 69 73 20 69 73 20 74 68 65 20 73 61 6d 65 20 65 66 66 65 63 74 20 61 73 20 | ame..This.is.the.same.effect.as. |
| 42a0 | 60 70 6f 73 2d 74 69 70 2d 75 73 65 2d 72 65 6c 61 74 69 76 65 2d 63 6f 6f 72 64 69 6e 61 74 65 | `pos-tip-use-relative-coordinate |
| 42c0 | 73 27 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2e 0a 0a 44 58 20 73 70 65 63 69 66 69 65 73 20 68 6f 72 | s'.is.non-nil...DX.specifies.hor |
| 42e0 | 69 7a 6f 6e 74 61 6c 20 6f 66 66 73 65 74 20 69 6e 20 70 69 78 65 6c 2e 0a 0a 44 59 20 73 70 65 | izontal.offset.in.pixel...DY.spe |
| 4300 | 63 69 66 69 65 73 20 76 65 72 74 69 63 61 6c 20 6f 66 66 73 65 74 20 69 6e 20 70 69 78 65 6c 2e | cifies.vertical.offset.in.pixel. |
| 4320 | 20 54 68 69 73 20 6d 61 6b 65 73 20 74 68 65 20 63 61 6c 63 75 6c 61 74 69 6f 6e 73 20 64 6f 6e | .This.makes.the.calculations.don |
| 4340 | 65 0a 77 69 74 68 6f 75 74 20 63 6f 6e 73 69 64 65 72 69 6e 67 20 74 68 65 20 68 65 69 67 68 74 | e.without.considering.the.height |
| 4360 | 20 6f 66 20 6f 62 6a 65 63 74 20 61 74 20 50 4f 53 2c 20 73 6f 20 74 68 65 20 6f 62 6a 65 63 74 | .of.object.at.POS,.so.the.object |
| 4380 | 20 6d 69 67 68 74 20 62 65 0a 68 69 64 64 65 6e 20 62 79 20 74 68 65 20 74 6f 6f 6c 74 69 70 2e | .might.be.hidden.by.the.tooltip. |
| 43a0 | 22 0a 20 20 28 6c 65 74 2a 20 28 28 66 72 61 6d 65 20 28 77 69 6e 64 6f 77 2d 66 72 61 6d 65 20 | "...(let*.((frame.(window-frame. |
| 43c0 | 28 6f 72 20 77 69 6e 64 6f 77 20 28 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 29 29 29 29 0a | (or.window.(selected-window)))). |
| 43e0 | 09 20 28 77 33 32 2d 66 72 61 6d 65 20 28 65 71 20 28 70 6f 73 2d 74 69 70 2d 77 69 6e 64 6f 77 | ..(w32-frame.(eq.(pos-tip-window |
| 4400 | 2d 73 79 73 74 65 6d 20 66 72 61 6d 65 29 20 27 77 33 32 29 29 0a 09 20 28 72 65 6c 61 74 69 76 | -system.frame).'w32))...(relativ |
| 4420 | 65 20 28 6f 72 20 70 6f 73 2d 74 69 70 2d 75 73 65 2d 72 65 6c 61 74 69 76 65 2d 63 6f 6f 72 64 | e.(or.pos-tip-use-relative-coord |
| 4440 | 69 6e 61 74 65 73 0a 09 09 20 20 20 20 20 20 20 28 65 71 20 66 72 61 6d 65 2d 63 6f 6f 72 64 69 | inates..........(eq.frame-coordi |
| 4460 | 6e 61 74 65 73 20 27 72 65 6c 61 74 69 76 65 29 0a 09 09 20 20 20 20 20 20 20 28 61 6e 64 20 77 | nates.'relative)..........(and.w |
| 4480 | 33 32 2d 66 72 61 6d 65 0a 09 09 09 20 20 20 20 28 6e 75 6c 6c 20 70 6f 73 2d 74 69 70 2d 77 33 | 32-frame........(null.pos-tip-w3 |
| 44a0 | 32 2d 73 61 76 65 64 2d 6d 61 78 2d 77 69 64 74 68 2d 68 65 69 67 68 74 29 29 29 29 0a 09 20 28 | 2-saved-max-width-height))))...( |
| 44c0 | 66 72 61 6d 65 2d 63 6f 6f 72 64 20 28 6f 72 20 28 61 6e 64 20 72 65 6c 61 74 69 76 65 20 27 28 | frame-coord.(or.(and.relative.'( |
| 44e0 | 30 20 2e 20 30 29 29 0a 09 09 09 20 20 66 72 61 6d 65 2d 63 6f 6f 72 64 69 6e 61 74 65 73 0a 09 | 0...0))......frame-coordinates.. |
| 4500 | 09 09 20 20 28 70 6f 73 2d 74 69 70 2d 66 72 61 6d 65 2d 74 6f 70 2d 6c 65 66 74 2d 63 6f 6f 72 | ....(pos-tip-frame-top-left-coor |
| 4520 | 64 69 6e 61 74 65 73 20 66 72 61 6d 65 29 0a 09 09 09 20 20 28 70 72 6f 67 6e 0a 09 09 09 20 20 | dinates.frame)......(progn...... |
| 4540 | 20 20 28 73 65 74 71 20 72 65 6c 61 74 69 76 65 20 74 0a 09 09 09 09 20 20 70 6f 73 2d 74 69 70 | ..(setq.relative.t.......pos-tip |
| 4560 | 2d 75 73 65 2d 72 65 6c 61 74 69 76 65 2d 63 6f 6f 72 64 69 6e 61 74 65 73 20 74 29 0a 09 09 09 | -use-relative-coordinates.t).... |
| 4580 | 20 20 27 28 30 20 2e 20 30 29 29 29 29 0a 09 20 28 70 6f 73 6e 20 28 70 6f 73 6e 2d 61 74 2d 70 | ..'(0...0))))...(posn.(posn-at-p |
| 45a0 | 6f 69 6e 74 20 28 6f 72 20 70 6f 73 20 28 77 69 6e 64 6f 77 2d 70 6f 69 6e 74 20 77 69 6e 64 6f | oint.(or.pos.(window-point.windo |
| 45c0 | 77 29 29 20 77 69 6e 64 6f 77 29 29 0a 09 20 28 6c 69 6e 65 20 28 63 64 72 20 28 70 6f 73 6e 2d | w)).window))...(line.(cdr.(posn- |
| 45e0 | 61 63 74 75 61 6c 2d 63 6f 6c 2d 72 6f 77 20 70 6f 73 6e 29 29 29 0a 09 20 28 6c 69 6e 65 2d 68 | actual-col-row.posn)))...(line-h |
| 4600 | 65 69 67 68 74 20 28 61 6e 64 20 6c 69 6e 65 0a 09 09 09 20 20 20 28 6f 72 20 28 77 69 6e 64 6f | eight.(and.line.......(or.(windo |
| 4620 | 77 2d 6c 69 6e 65 2d 68 65 69 67 68 74 20 6c 69 6e 65 20 77 69 6e 64 6f 77 29 0a 09 09 09 20 20 | w-line-height.line.window)...... |
| 4640 | 20 20 20 20 20 28 61 6e 64 20 28 72 65 64 69 73 70 6c 61 79 20 74 29 0a 09 09 09 09 20 20 20 20 | .....(and.(redisplay.t)......... |
| 4660 | 28 77 69 6e 64 6f 77 2d 6c 69 6e 65 2d 68 65 69 67 68 74 20 6c 69 6e 65 20 77 69 6e 64 6f 77 29 | (window-line-height.line.window) |
| 4680 | 29 29 29 29 0a 09 20 28 78 2d 79 20 28 6f 72 20 28 70 6f 73 6e 2d 78 2d 79 20 70 6f 73 6e 29 0a | ))))...(x-y.(or.(posn-x-y.posn). |
| 46a0 | 09 09 20 20 28 6c 65 74 20 28 28 67 65 6f 6d 20 28 70 6f 73 2d 76 69 73 69 62 6c 65 2d 69 6e 2d | ....(let.((geom.(pos-visible-in- |
| 46c0 | 77 69 6e 64 6f 77 2d 70 0a 09 09 09 20 20 20 20 20 20 20 28 6f 72 20 70 6f 73 20 28 77 69 6e 64 | window-p...........(or.pos.(wind |
| 46e0 | 6f 77 2d 70 6f 69 6e 74 20 77 69 6e 64 6f 77 29 29 20 77 69 6e 64 6f 77 20 74 29 29 29 0a 09 09 | ow-point.window)).window.t)))... |
| 4700 | 20 20 20 20 28 61 6e 64 20 67 65 6f 6d 20 28 63 6f 6e 73 20 28 63 61 72 20 67 65 6f 6d 29 20 28 | ....(and.geom.(cons.(car.geom).( |
| 4720 | 63 61 64 72 20 67 65 6f 6d 29 29 29 29 0a 09 09 20 20 27 28 30 20 2e 20 30 29 29 29 0a 09 20 28 | cadr.geom)))).....'(0...0)))...( |
| 4740 | 78 20 28 2b 20 28 63 61 72 20 66 72 61 6d 65 2d 63 6f 6f 72 64 29 0a 09 20 20 20 20 20 20 20 28 | x.(+.(car.frame-coord).........( |
| 4760 | 63 61 72 20 28 77 69 6e 64 6f 77 2d 69 6e 73 69 64 65 2d 70 69 78 65 6c 2d 65 64 67 65 73 20 77 | car.(window-inside-pixel-edges.w |
| 4780 | 69 6e 64 6f 77 29 29 0a 09 20 20 20 20 20 20 20 28 63 61 72 20 78 2d 79 29 0a 09 20 20 20 20 20 | indow)).........(car.x-y)....... |
| 47a0 | 20 20 28 6f 72 20 64 78 20 30 29 29 29 0a 09 20 28 79 30 20 28 2b 20 28 63 64 72 20 66 72 61 6d | ..(or.dx.0)))...(y0.(+.(cdr.fram |
| 47c0 | 65 2d 63 6f 6f 72 64 29 0a 09 09 28 63 61 64 72 20 28 77 69 6e 64 6f 77 2d 70 69 78 65 6c 2d 65 | e-coord)...(cadr.(window-pixel-e |
| 47e0 | 64 67 65 73 20 77 69 6e 64 6f 77 29 29 0a 09 09 28 6f 72 20 28 6e 74 68 20 32 20 6c 69 6e 65 2d | dges.window))...(or.(nth.2.line- |
| 4800 | 68 65 69 67 68 74 29 20 28 63 64 72 20 78 2d 79 29 29 29 29 0a 09 20 28 79 20 28 2b 20 79 30 0a | height).(cdr.x-y))))...(y.(+.y0. |
| 4820 | 09 20 20 20 20 20 20 20 28 6f 72 20 64 79 0a 09 09 20 20 20 28 63 61 72 20 6c 69 6e 65 2d 68 65 | ........(or.dy......(car.line-he |
| 4840 | 69 67 68 74 29 0a 09 09 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 | ight)......(with-current-buffer. |
| 4860 | 28 77 69 6e 64 6f 77 2d 62 75 66 66 65 72 20 77 69 6e 64 6f 77 29 0a 09 09 20 20 20 20 20 28 63 | (window-buffer.window)........(c |
| 4880 | 6f 6e 64 0a 09 09 20 20 20 20 20 20 3b 3b 20 60 70 6f 73 6e 2d 6f 62 6a 65 63 74 2d 77 69 64 74 | ond.........;;.`posn-object-widt |
| 48a0 | 68 2d 68 65 69 67 68 74 27 20 72 65 74 75 72 6e 73 20 61 6e 20 69 6e 63 6f 72 72 65 63 74 20 76 | h-height'.returns.an.incorrect.v |
| 48c0 | 61 6c 75 65 0a 09 09 20 20 20 20 20 20 3b 3b 20 77 68 65 6e 20 74 68 65 20 68 65 61 64 65 72 20 | alue.........;;.when.the.header. |
| 48e0 | 6c 69 6e 65 20 69 73 20 64 69 73 70 6c 61 79 65 64 20 28 45 6d 61 63 73 20 62 75 67 20 23 34 34 | line.is.displayed.(Emacs.bug.#44 |
| 4900 | 32 36 29 2e 0a 09 09 20 20 20 20 20 20 28 28 61 6e 64 20 70 6f 73 6e 0a 09 09 09 20 20 20 20 28 | 26)..........((and.posn........( |
| 4920 | 6e 75 6c 6c 20 68 65 61 64 65 72 2d 6c 69 6e 65 2d 66 6f 72 6d 61 74 29 29 0a 09 09 20 20 20 20 | null.header-line-format))....... |
| 4940 | 20 20 20 28 63 64 72 20 28 70 6f 73 6e 2d 6f 62 6a 65 63 74 2d 77 69 64 74 68 2d 68 65 69 67 68 | ...(cdr.(posn-object-width-heigh |
| 4960 | 74 20 70 6f 73 6e 29 29 29 0a 09 09 20 20 20 20 20 20 28 28 61 6e 64 20 28 62 6f 75 6e 64 2d 61 | t.posn))).........((and.(bound-a |
| 4980 | 6e 64 2d 74 72 75 65 2d 70 20 74 65 78 74 2d 73 63 61 6c 65 2d 6d 6f 64 65 29 0a 09 09 09 20 20 | nd-true-p.text-scale-mode)...... |
| 49a0 | 20 20 28 6e 6f 74 20 28 7a 65 72 6f 70 20 28 77 69 74 68 2d 6e 6f 2d 77 61 72 6e 69 6e 67 73 0a | ..(not.(zerop.(with-no-warnings. |
| 49c0 | 09 09 09 09 09 20 20 74 65 78 74 2d 73 63 61 6c 65 2d 6d 6f 64 65 2d 61 6d 6f 75 6e 74 29 29 29 | .......text-scale-mode-amount))) |
| 49e0 | 29 0a 09 09 20 20 20 20 20 20 20 28 72 6f 75 6e 64 20 28 2a 20 28 66 72 61 6d 65 2d 63 68 61 72 | )..........(round.(*.(frame-char |
| 4a00 | 2d 68 65 69 67 68 74 20 66 72 61 6d 65 29 0a 09 09 09 09 20 28 77 69 74 68 2d 6e 6f 2d 77 61 72 | -height.frame)......(with-no-war |
| 4a20 | 6e 69 6e 67 73 0a 09 09 09 09 20 20 20 28 65 78 70 74 20 74 65 78 74 2d 73 63 61 6c 65 2d 6d 6f | nings........(expt.text-scale-mo |
| 4a40 | 64 65 2d 73 74 65 70 0a 09 09 09 09 09 20 74 65 78 74 2d 73 63 61 6c 65 2d 6d 6f 64 65 2d 61 6d | de-step.......text-scale-mode-am |
| 4a60 | 6f 75 6e 74 29 29 29 29 29 0a 09 09 20 20 20 20 20 20 28 74 0a 09 09 20 20 20 20 20 20 20 28 66 | ount))))).........(t..........(f |
| 4a80 | 72 61 6d 65 2d 63 68 61 72 2d 68 65 69 67 68 74 20 66 72 61 6d 65 29 29 29 29 29 29 29 0a 09 20 | rame-char-height.frame)))))))... |
| 4aa0 | 78 6d 61 78 20 79 6d 61 78 29 0a 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 28 72 65 6c 61 74 | xmax.ymax).....(cond......(relat |
| 4ac0 | 69 76 65 0a 20 20 20 20 20 20 28 73 65 74 71 20 78 6d 61 78 20 28 66 72 61 6d 65 2d 70 69 78 65 | ive.......(setq.xmax.(frame-pixe |
| 4ae0 | 6c 2d 77 69 64 74 68 20 66 72 61 6d 65 29 0a 09 20 20 20 20 79 6d 61 78 20 28 66 72 61 6d 65 2d | l-width.frame)......ymax.(frame- |
| 4b00 | 70 69 78 65 6c 2d 68 65 69 67 68 74 20 66 72 61 6d 65 29 29 29 0a 20 20 20 20 20 28 77 33 32 2d | pixel-height.frame)))......(w32- |
| 4b20 | 66 72 61 6d 65 0a 20 20 20 20 20 20 28 73 65 74 71 20 78 6d 61 78 20 28 63 61 72 20 70 6f 73 2d | frame.......(setq.xmax.(car.pos- |
| 4b40 | 74 69 70 2d 77 33 32 2d 73 61 76 65 64 2d 6d 61 78 2d 77 69 64 74 68 2d 68 65 69 67 68 74 29 0a | tip-w32-saved-max-width-height). |
| 4b60 | 09 20 20 20 20 79 6d 61 78 20 28 63 64 72 20 70 6f 73 2d 74 69 70 2d 77 33 32 2d 73 61 76 65 64 | .....ymax.(cdr.pos-tip-w32-saved |
| 4b80 | 2d 6d 61 78 2d 77 69 64 74 68 2d 68 65 69 67 68 74 29 29 29 0a 20 20 20 20 20 28 74 0a 20 20 20 | -max-width-height)))......(t.... |
| 4ba0 | 20 20 20 28 73 65 74 71 20 78 6d 61 78 20 28 78 2d 64 69 73 70 6c 61 79 2d 70 69 78 65 6c 2d 77 | ...(setq.xmax.(x-display-pixel-w |
| 4bc0 | 69 64 74 68 20 66 72 61 6d 65 29 0a 09 20 20 20 20 79 6d 61 78 20 28 78 2d 64 69 73 70 6c 61 79 | idth.frame)......ymax.(x-display |
| 4be0 | 2d 70 69 78 65 6c 2d 68 65 69 67 68 74 20 66 72 61 6d 65 29 29 29 29 0a 20 20 20 20 28 73 65 74 | -pixel-height.frame)))).....(set |
| 4c00 | 71 20 70 6f 73 2d 74 69 70 2d 75 70 70 65 72 73 69 64 65 2d 70 20 28 3e 20 28 2b 20 79 20 28 6f | q.pos-tip-upperside-p.(>.(+.y.(o |
| 4c20 | 72 20 70 69 78 65 6c 2d 68 65 69 67 68 74 20 30 29 29 0a 09 09 09 09 20 79 6d 61 78 29 29 0a 20 | r.pixel-height.0))......ymax)).. |
| 4c40 | 20 20 20 28 63 6f 6e 73 20 28 6d 61 78 20 30 20 28 6d 69 6e 20 78 20 28 2d 20 78 6d 61 78 20 28 | ...(cons.(max.0.(min.x.(-.xmax.( |
| 4c60 | 6f 72 20 70 69 78 65 6c 2d 77 69 64 74 68 20 30 29 29 29 29 0a 09 20 20 28 6d 61 78 20 30 20 28 | or.pixel-width.0))))....(max.0.( |
| 4c80 | 69 66 20 70 6f 73 2d 74 69 70 2d 75 70 70 65 72 73 69 64 65 2d 70 0a 09 09 20 20 20 20 20 28 2d | if.pos-tip-upperside-p........(- |
| 4ca0 | 20 28 69 66 20 64 79 20 79 6d 61 78 20 79 30 29 20 28 6f 72 20 70 69 78 65 6c 2d 68 65 69 67 68 | .(if.dy.ymax.y0).(or.pixel-heigh |
| 4cc0 | 74 20 30 29 29 0a 09 09 20 20 20 79 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 6f 73 2d 74 69 | t.0))......y)))))..(defun.pos-ti |
| 4ce0 | 70 2d 63 61 6e 63 65 6c 2d 74 69 6d 65 72 20 28 29 0a 20 20 22 43 61 6e 63 65 6c 20 74 69 6d 65 | p-cancel-timer.()..."Cancel.time |
| 4d00 | 6f 75 74 20 6f 66 20 74 6f 6f 6c 74 69 70 2e 22 0a 20 20 28 6d 61 70 63 20 28 6c 61 6d 62 64 61 | out.of.tooltip."...(mapc.(lambda |
| 4d20 | 20 28 74 69 6d 65 72 29 0a 09 20 20 28 69 66 20 28 65 71 20 28 61 72 65 66 20 74 69 6d 65 72 20 | .(timer)....(if.(eq.(aref.timer. |
| 4d40 | 35 29 20 27 78 2d 68 69 64 65 2d 74 69 70 29 0a 09 20 20 20 20 20 20 28 63 61 6e 63 65 6c 2d 74 | 5).'x-hide-tip)........(cancel-t |
| 4d60 | 69 6d 65 72 20 74 69 6d 65 72 29 29 29 0a 09 74 69 6d 65 72 2d 6c 69 73 74 29 29 0a 0a 28 64 65 | imer.timer)))..timer-list))..(de |
| 4d80 | 66 75 6e 20 70 6f 73 2d 74 69 70 2d 61 76 6f 69 64 2d 6d 6f 75 73 65 20 28 6c 65 66 74 20 72 69 | fun.pos-tip-avoid-mouse.(left.ri |
| 4da0 | 67 68 74 20 74 6f 70 20 62 6f 74 74 6f 6d 20 26 6f 70 74 69 6f 6e 61 6c 20 66 72 61 6d 65 29 0a | ght.top.bottom.&optional.frame). |
| 4dc0 | 20 20 22 4d 6f 76 65 20 6f 75 74 20 6d 6f 75 73 65 20 70 6f 69 6e 74 65 72 20 69 66 20 69 74 20 | .."Move.out.mouse.pointer.if.it. |
| 4de0 | 69 73 20 69 6e 73 69 64 65 20 72 65 67 69 6f 6e 20 28 4c 45 46 54 20 52 49 47 48 54 20 54 4f 50 | is.inside.region.(LEFT.RIGHT.TOP |
| 4e00 | 20 42 4f 54 54 4f 4d 29 0a 69 6e 20 46 52 41 4d 45 2e 20 52 65 74 75 72 6e 20 6e 65 77 20 6d 6f | .BOTTOM).in.FRAME..Return.new.mo |
| 4e20 | 75 73 65 20 70 6f 73 69 74 69 6f 6e 20 6c 69 6b 65 20 28 46 52 41 4d 45 20 2e 20 28 58 20 2e 20 | use.position.like.(FRAME...(X... |
| 4e40 | 59 29 29 2e 22 0a 20 20 28 75 6e 6c 65 73 73 20 66 72 61 6d 65 0a 20 20 20 20 28 73 65 74 71 20 | Y))."...(unless.frame.....(setq. |
| 4e60 | 66 72 61 6d 65 20 28 73 65 6c 65 63 74 65 64 2d 66 72 61 6d 65 29 29 29 0a 20 20 28 6c 65 74 2a | frame.(selected-frame)))...(let* |
| 4e80 | 20 28 28 6d 70 6f 73 20 28 77 69 74 68 2d 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 20 28 66 | .((mpos.(with-selected-window.(f |
| 4ea0 | 72 61 6d 65 2d 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 20 66 72 61 6d 65 29 0a 09 09 20 28 | rame-selected-window.frame)....( |
| 4ec0 | 6d 6f 75 73 65 2d 70 69 78 65 6c 2d 70 6f 73 69 74 69 6f 6e 29 29 29 0a 09 20 28 6d 66 72 61 6d | mouse-pixel-position)))...(mfram |
| 4ee0 | 65 20 28 70 6f 70 20 6d 70 6f 73 29 29 0a 09 20 28 6d 78 20 28 63 61 72 20 6d 70 6f 73 29 29 0a | e.(pop.mpos))...(mx.(car.mpos)). |
| 4f00 | 09 20 28 6d 79 20 28 63 64 72 20 6d 70 6f 73 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 61 6e | ..(my.(cdr.mpos))).....(when.(an |
| 4f20 | 64 20 28 65 71 20 6d 66 72 61 6d 65 20 66 72 61 6d 65 29 0a 09 20 20 20 20 20 20 20 28 6e 75 6d | d.(eq.mframe.frame).........(num |
| 4f40 | 62 65 72 70 20 6d 78 29 29 0a 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 6c 61 72 67 65 2d 6e 75 | berp.mx)).......(let*.((large-nu |
| 4f60 | 6d 62 65 72 20 28 2b 20 28 66 72 61 6d 65 2d 70 69 78 65 6c 2d 77 69 64 74 68 20 66 72 61 6d 65 | mber.(+.(frame-pixel-width.frame |
| 4f80 | 29 20 28 66 72 61 6d 65 2d 70 69 78 65 6c 2d 68 65 69 67 68 74 20 66 72 61 6d 65 29 29 29 0a 09 | ).(frame-pixel-height.frame))).. |
| 4fa0 | 20 20 20 20 20 28 64 6c 20 28 69 66 20 28 3e 20 6c 65 66 74 20 32 29 0a 09 09 20 20 20 20 20 28 | .....(dl.(if.(>.left.2)........( |
| 4fc0 | 31 2b 20 28 2d 20 6d 78 20 6c 65 66 74 29 29 0a 09 09 20 20 20 6c 61 72 67 65 2d 6e 75 6d 62 65 | 1+.(-.mx.left))......large-numbe |
| 4fe0 | 72 29 29 0a 09 20 20 20 20 20 28 64 72 20 28 69 66 20 28 3c 20 28 31 2b 20 72 69 67 68 74 29 20 | r)).......(dr.(if.(<.(1+.right). |
| 5000 | 28 66 72 61 6d 65 2d 70 69 78 65 6c 2d 77 69 64 74 68 20 66 72 61 6d 65 29 29 0a 09 09 20 20 20 | (frame-pixel-width.frame))...... |
| 5020 | 20 20 28 2d 20 72 69 67 68 74 20 6d 78 29 0a 09 09 20 20 20 6c 61 72 67 65 2d 6e 75 6d 62 65 72 | ..(-.right.mx)......large-number |
| 5040 | 29 29 0a 09 20 20 20 20 20 28 64 74 20 28 69 66 20 28 3e 20 74 6f 70 20 32 29 0a 09 09 20 20 20 | )).......(dt.(if.(>.top.2)...... |
| 5060 | 20 20 28 31 2b 20 28 2d 20 6d 79 20 74 6f 70 29 29 0a 09 09 20 20 20 6c 61 72 67 65 2d 6e 75 6d | ..(1+.(-.my.top))......large-num |
| 5080 | 62 65 72 29 29 0a 09 20 20 20 20 20 28 64 62 20 28 69 66 20 28 3c 20 28 31 2b 20 62 6f 74 74 6f | ber)).......(db.(if.(<.(1+.botto |
| 50a0 | 6d 29 20 28 66 72 61 6d 65 2d 70 69 78 65 6c 2d 68 65 69 67 68 74 20 66 72 61 6d 65 29 29 0a 09 | m).(frame-pixel-height.frame)).. |
| 50c0 | 09 20 20 20 20 20 28 2d 20 62 6f 74 74 6f 6d 20 6d 79 29 0a 09 09 20 20 20 6c 61 72 67 65 2d 6e | ......(-.bottom.my)......large-n |
| 50e0 | 75 6d 62 65 72 29 29 0a 09 20 20 20 20 20 28 64 20 28 6d 69 6e 20 64 6c 20 64 72 20 64 74 20 64 | umber)).......(d.(min.dl.dr.dt.d |
| 5100 | 62 29 29 29 0a 09 28 77 68 65 6e 20 28 3e 20 64 20 2d 32 29 0a 09 20 20 28 63 6f 6e 64 0a 09 20 | b)))..(when.(>.d.-2)....(cond... |
| 5120 | 20 20 28 28 3d 20 64 20 64 6c 29 0a 09 20 20 20 20 28 73 65 74 71 20 6d 78 20 28 2d 20 6c 65 66 | ..((=.d.dl)......(setq.mx.(-.lef |
| 5140 | 74 20 32 29 29 29 0a 09 20 20 20 28 28 3d 20 64 20 64 72 29 0a 09 20 20 20 20 28 73 65 74 71 20 | t.2))).....((=.d.dr)......(setq. |
| 5160 | 6d 78 20 28 31 2b 20 72 69 67 68 74 29 29 29 0a 09 20 20 20 28 28 3d 20 64 20 64 74 29 0a 09 20 | mx.(1+.right))).....((=.d.dt)... |
| 5180 | 20 20 20 28 73 65 74 71 20 6d 79 20 28 2d 20 74 6f 70 20 32 29 29 29 0a 09 20 20 20 28 74 0a 09 | ...(setq.my.(-.top.2))).....(t.. |
| 51a0 | 20 20 20 20 28 73 65 74 71 20 6d 79 20 28 31 2b 20 62 6f 74 74 6f 6d 29 29 29 29 0a 09 20 20 28 | ....(setq.my.(1+.bottom))))....( |
| 51c0 | 73 65 74 2d 6d 6f 75 73 65 2d 70 69 78 65 6c 2d 70 6f 73 69 74 69 6f 6e 20 66 72 61 6d 65 20 6d | set-mouse-pixel-position.frame.m |
| 51e0 | 78 20 6d 79 29 0a 09 20 20 28 73 69 74 2d 66 6f 72 20 30 2e 30 30 30 31 29 29 29 29 0a 20 20 20 | x.my)....(sit-for.0.0001)))).... |
| 5200 | 20 28 63 6f 6e 73 20 6d 66 72 61 6d 65 20 28 61 6e 64 20 6d 70 6f 73 20 28 63 6f 6e 73 20 6d 78 | .(cons.mframe.(and.mpos.(cons.mx |
| 5220 | 20 6d 79 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 6f 73 2d 74 69 70 2d 63 6f 6d 70 75 74 65 | .my)))))..(defun.pos-tip-compute |
| 5240 | 2d 66 6f 72 65 67 72 6f 75 6e 64 2d 63 6f 6c 6f 72 20 28 74 69 70 2d 63 6f 6c 6f 72 29 0a 20 20 | -foreground-color.(tip-color)... |
| 5260 | 22 43 6f 6d 70 75 74 65 20 74 68 65 20 66 6f 72 65 67 72 6f 75 6e 64 20 63 6f 6c 6f 72 20 74 6f | "Compute.the.foreground.color.to |
| 5280 | 20 75 73 65 20 66 6f 72 20 74 6f 6f 6c 74 69 70 2e 0a 0a 54 49 50 2d 43 4f 4c 4f 52 20 69 73 20 | .use.for.tooltip...TIP-COLOR.is. |
| 52a0 | 61 20 66 61 63 65 20 6f 72 20 61 20 63 6f 6e 73 20 63 65 6c 6c 20 6c 69 6b 65 20 28 46 4f 52 45 | a.face.or.a.cons.cell.like.(FORE |
| 52c0 | 47 52 4f 55 4e 44 2d 43 4f 4c 4f 52 20 2e 20 42 41 43 4b 47 52 4f 55 4e 44 2d 43 4f 4c 4f 52 29 | GROUND-COLOR...BACKGROUND-COLOR) |
| 52e0 | 2e 0a 49 66 20 69 74 20 69 73 20 6e 69 6c 2c 20 75 73 65 20 60 70 6f 73 2d 74 69 70 2d 66 6f 72 | ..If.it.is.nil,.use.`pos-tip-for |
| 5300 | 65 67 72 6f 75 6e 64 2d 63 6f 6c 6f 72 27 20 6f 72 20 74 68 65 20 66 6f 72 65 67 72 6f 75 6e 64 | eground-color'.or.the.foreground |
| 5320 | 20 63 6f 6c 6f 72 20 6f 66 20 74 68 65 0a 60 74 6f 6f 6c 74 69 70 27 20 66 61 63 65 2e 22 0a 20 | .color.of.the.`tooltip'.face.".. |
| 5340 | 20 28 6f 72 20 28 61 6e 64 20 28 66 61 63 65 70 20 74 69 70 2d 63 6f 6c 6f 72 29 0a 20 20 20 20 | .(or.(and.(facep.tip-color)..... |
| 5360 | 20 20 20 20 20 20 20 28 66 61 63 65 2d 61 74 74 72 69 62 75 74 65 20 74 69 70 2d 63 6f 6c 6f 72 | .......(face-attribute.tip-color |
| 5380 | 20 3a 66 6f 72 65 67 72 6f 75 6e 64 29 29 0a 20 20 20 20 20 20 28 63 61 72 2d 73 61 66 65 20 74 | .:foreground)).......(car-safe.t |
| 53a0 | 69 70 2d 63 6f 6c 6f 72 29 0a 20 20 20 20 20 20 70 6f 73 2d 74 69 70 2d 66 6f 72 65 67 72 6f 75 | ip-color).......pos-tip-foregrou |
| 53c0 | 6e 64 2d 63 6f 6c 6f 72 0a 20 20 20 20 20 20 28 66 61 63 65 2d 66 6f 72 65 67 72 6f 75 6e 64 20 | nd-color.......(face-foreground. |
| 53e0 | 27 74 6f 6f 6c 74 69 70 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 6f 73 2d 74 69 70 2d 63 6f 6d 70 | 'tooltip)))..(defun.pos-tip-comp |
| 5400 | 75 74 65 2d 62 61 63 6b 67 72 6f 75 6e 64 2d 63 6f 6c 6f 72 20 28 74 69 70 2d 63 6f 6c 6f 72 29 | ute-background-color.(tip-color) |
| 5420 | 0a 20 20 22 43 6f 6d 70 75 74 65 20 74 68 65 20 62 61 63 6b 67 72 6f 75 6e 64 20 63 6f 6c 6f 72 | ..."Compute.the.background.color |
| 5440 | 20 74 6f 20 75 73 65 20 66 6f 72 20 74 6f 6f 6c 74 69 70 2e 0a 0a 54 49 50 2d 43 4f 4c 4f 52 20 | .to.use.for.tooltip...TIP-COLOR. |
| 5460 | 69 73 20 61 20 66 61 63 65 20 6f 72 20 61 20 63 6f 6e 73 20 63 65 6c 6c 20 6c 69 6b 65 20 28 46 | is.a.face.or.a.cons.cell.like.(F |
| 5480 | 4f 52 45 47 52 4f 55 4e 44 2d 43 4f 4c 4f 52 20 2e 20 42 41 43 4b 47 52 4f 55 4e 44 2d 43 4f 4c | OREGROUND-COLOR...BACKGROUND-COL |
| 54a0 | 4f 52 29 2e 0a 49 66 20 69 74 20 69 73 20 6e 69 6c 2c 20 75 73 65 20 60 70 6f 73 2d 74 69 70 2d | OR)..If.it.is.nil,.use.`pos-tip- |
| 54c0 | 62 61 63 6b 67 72 6f 75 6e 64 2d 63 6f 6c 6f 72 27 20 6f 72 20 74 68 65 20 62 61 63 6b 67 72 6f | background-color'.or.the.backgro |
| 54e0 | 75 6e 64 20 63 6f 6c 6f 72 20 6f 66 20 74 68 65 0a 60 74 6f 6f 6c 74 69 70 27 20 66 61 63 65 2e | und.color.of.the.`tooltip'.face. |
| 5500 | 22 0a 20 20 28 6f 72 20 28 61 6e 64 20 28 66 61 63 65 70 20 74 69 70 2d 63 6f 6c 6f 72 29 0a 20 | "...(or.(and.(facep.tip-color).. |
| 5520 | 20 20 20 20 20 20 20 20 20 20 28 66 61 63 65 2d 61 74 74 72 69 62 75 74 65 20 74 69 70 2d 63 6f | ..........(face-attribute.tip-co |
| 5540 | 6c 6f 72 20 3a 62 61 63 6b 67 72 6f 75 6e 64 29 29 0a 20 20 20 20 20 20 28 63 64 72 2d 73 61 66 | lor.:background)).......(cdr-saf |
| 5560 | 65 20 74 69 70 2d 63 6f 6c 6f 72 29 0a 20 20 20 20 20 20 70 6f 73 2d 74 69 70 2d 62 61 63 6b 67 | e.tip-color).......pos-tip-backg |
| 5580 | 72 6f 75 6e 64 2d 63 6f 6c 6f 72 0a 20 20 20 20 20 20 28 66 61 63 65 2d 62 61 63 6b 67 72 6f 75 | round-color.......(face-backgrou |
| 55a0 | 6e 64 20 27 74 6f 6f 6c 74 69 70 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 6f 73 2d 74 69 70 2d 73 | nd.'tooltip)))..(defun.pos-tip-s |
| 55c0 | 68 6f 77 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 7a 65 0a 20 20 28 73 74 72 69 6e 67 20 26 6f 70 74 | how-no-propertize...(string.&opt |
| 55e0 | 69 6f 6e 61 6c 20 74 69 70 2d 63 6f 6c 6f 72 20 70 6f 73 20 77 69 6e 64 6f 77 20 74 69 6d 65 6f | ional.tip-color.pos.window.timeo |
| 5600 | 75 74 20 70 69 78 65 6c 2d 77 69 64 74 68 20 70 69 78 65 6c 2d 68 65 69 67 68 74 20 66 72 61 6d | ut.pixel-width.pixel-height.fram |
| 5620 | 65 2d 63 6f 6f 72 64 69 6e 61 74 65 73 20 64 78 20 64 79 29 0a 20 20 22 53 68 6f 77 20 53 54 52 | e-coordinates.dx.dy)..."Show.STR |
| 5640 | 49 4e 47 20 69 6e 20 61 20 74 6f 6f 6c 74 69 70 20 61 74 20 50 4f 53 20 69 6e 20 57 49 4e 44 4f | ING.in.a.tooltip.at.POS.in.WINDO |
| 5660 | 57 2e 0a 41 6e 61 6c 6f 67 6f 75 73 20 74 6f 20 60 70 6f 73 2d 74 69 70 2d 73 68 6f 77 27 20 65 | W..Analogous.to.`pos-tip-show'.e |
| 5680 | 78 63 65 70 74 20 64 6f 6e 27 74 20 70 72 6f 70 65 72 74 69 7a 65 20 53 54 52 49 4e 47 20 62 79 | xcept.don't.propertize.STRING.by |
| 56a0 | 20 60 70 6f 73 2d 74 69 70 27 20 66 61 63 65 2e 0a 0a 50 49 58 45 4c 2d 57 49 44 54 48 20 61 6e | .`pos-tip'.face...PIXEL-WIDTH.an |
| 56c0 | 64 20 50 49 58 45 4c 2d 48 45 49 47 48 54 20 73 70 65 63 69 66 79 20 74 68 65 20 73 69 7a 65 20 | d.PIXEL-HEIGHT.specify.the.size. |
| 56e0 | 6f 66 20 74 6f 6f 6c 74 69 70 2c 20 69 66 20 67 69 76 65 6e 2e 20 54 68 65 73 65 0a 61 72 65 20 | of.tooltip,.if.given..These.are. |
| 5700 | 75 73 65 64 20 74 6f 20 61 64 6a 75 73 74 20 74 68 65 20 74 6f 6f 6c 74 69 70 20 70 6f 73 69 74 | used.to.adjust.the.tooltip.posit |
| 5720 | 69 6f 6e 20 69 6e 20 6f 72 64 65 72 20 74 68 61 74 20 69 74 20 64 6f 65 73 6e 27 74 20 64 69 73 | ion.in.order.that.it.doesn't.dis |
| 5740 | 61 70 70 65 61 72 20 62 79 0a 73 74 69 63 6b 69 6e 67 20 6f 75 74 20 6f 66 20 74 68 65 20 64 69 | appear.by.sticking.out.of.the.di |
| 5760 | 73 70 6c 61 79 2c 20 61 6e 64 20 61 6c 73 6f 20 75 73 65 64 20 74 6f 20 70 72 65 76 65 6e 74 20 | splay,.and.also.used.to.prevent. |
| 5780 | 69 74 20 66 72 6f 6d 20 76 61 6e 69 73 68 69 6e 67 20 62 79 0a 6f 76 65 72 6c 61 70 70 69 6e 67 | it.from.vanishing.by.overlapping |
| 57a0 | 20 77 69 74 68 20 6d 6f 75 73 65 20 70 6f 69 6e 74 65 72 2e 0a 0a 4e 6f 74 65 20 74 68 61 74 20 | .with.mouse.pointer...Note.that. |
| 57c0 | 74 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 74 73 65 6c 66 20 64 6f 65 73 6e 27 74 20 63 61 6c | this.function.itself.doesn't.cal |
| 57e0 | 63 75 6c 61 74 65 20 74 6f 6f 6c 74 69 70 20 73 69 7a 65 20 62 65 63 61 75 73 65 20 74 68 65 0a | culate.tooltip.size.because.the. |
| 5800 | 63 68 61 72 61 63 74 65 72 20 77 69 64 74 68 20 61 6e 64 20 68 65 69 67 68 74 20 73 70 65 63 69 | character.width.and.height.speci |
| 5820 | 66 69 65 64 20 62 79 20 66 61 63 65 73 20 61 72 65 20 75 6e 6b 6e 6f 77 6e 2e 20 53 6f 20 75 73 | fied.by.faces.are.unknown..So.us |
| 5840 | 65 72 73 20 73 68 6f 75 6c 64 0a 63 61 6c 63 75 6c 61 74 65 20 50 49 58 45 4c 2d 57 49 44 54 48 | ers.should.calculate.PIXEL-WIDTH |
| 5860 | 20 61 6e 64 20 50 49 58 45 4c 2d 48 45 49 47 48 54 20 62 79 20 75 73 69 6e 67 20 60 70 6f 73 2d | .and.PIXEL-HEIGHT.by.using.`pos- |
| 5880 | 74 69 70 2d 74 6f 6f 6c 74 69 70 2d 77 69 64 74 68 27 20 61 6e 64 0a 60 70 6f 73 2d 74 69 70 2d | tip-tooltip-width'.and.`pos-tip- |
| 58a0 | 74 6f 6f 6c 74 69 70 2d 68 65 69 67 68 74 27 2c 20 6f 72 20 75 73 65 20 60 70 6f 73 2d 74 69 70 | tooltip-height',.or.use.`pos-tip |
| 58c0 | 2d 73 68 6f 77 27 20 69 6e 73 74 65 61 64 2c 20 77 68 69 63 68 20 63 61 6e 0a 61 75 74 6f 6d 61 | -show'.instead,.which.can.automa |
| 58e0 | 74 69 63 61 6c 6c 79 20 63 61 6c 63 75 6c 61 74 65 20 74 6f 6f 6c 74 69 70 20 73 69 7a 65 2e 0a | tically.calculate.tooltip.size.. |
| 5900 | 0a 53 65 65 20 60 70 6f 73 2d 74 69 70 2d 73 68 6f 77 27 20 66 6f 72 20 64 65 74 61 69 6c 73 2e | .See.`pos-tip-show'.for.details. |
| 5920 | 0a 0a 45 78 61 6d 70 6c 65 3a 0a 0a 5c 28 64 65 66 66 61 63 65 20 6d 79 2d 74 6f 6f 6c 74 69 70 | ..Example:..\(defface.my-tooltip |
| 5940 | 0a 20 20 5c 5c 3d 27 28 28 74 0a 20 20 20 20 20 3a 62 61 63 6b 67 72 6f 75 6e 64 20 5c 22 67 72 | ...\\='((t......:background.\"gr |
| 5960 | 61 79 38 35 5c 22 0a 20 20 20 20 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 5c 22 62 6c 61 63 6b 5c | ay85\"......:foreground.\"black\ |
| 5980 | 22 0a 20 20 20 20 20 3a 69 6e 68 65 72 69 74 20 76 61 72 69 61 62 6c 65 2d 70 69 74 63 68 29 29 | "......:inherit.variable-pitch)) |
| 59a0 | 0a 20 20 5c 22 46 61 63 65 20 66 6f 72 20 6d 79 20 74 6f 6f 6c 74 69 70 2e 5c 22 29 0a 0a 5c 28 | ...\"Face.for.my.tooltip.\")..\( |
| 59c0 | 64 65 66 66 61 63 65 20 6d 79 2d 74 6f 6f 6c 74 69 70 2d 68 69 67 68 6c 69 67 68 74 0a 20 20 5c | defface.my-tooltip-highlight...\ |
| 59e0 | 5c 3d 27 28 28 74 0a 20 20 20 20 20 3a 62 61 63 6b 67 72 6f 75 6e 64 20 5c 22 62 6c 75 65 5c 22 | \='((t......:background.\"blue\" |
| 5a00 | 0a 20 20 20 20 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 5c 22 77 68 69 74 65 5c 22 0a 20 20 20 20 | ......:foreground.\"white\"..... |
| 5a20 | 20 3a 69 6e 68 65 72 69 74 20 6d 79 2d 74 6f 6f 6c 74 69 70 29 29 0a 20 20 5c 22 46 61 63 65 20 | .:inherit.my-tooltip))...\"Face. |
| 5a40 | 66 6f 72 20 6d 79 20 74 6f 6f 6c 74 69 70 20 68 69 67 68 6c 69 67 68 74 65 64 2e 5c 22 29 0a 0a | for.my.tooltip.highlighted.\").. |
| 5a60 | 5c 28 6c 65 74 20 28 28 73 74 72 20 28 70 72 6f 70 65 72 74 69 7a 65 20 5c 22 20 66 6f 6f 20 5c | \(let.((str.(propertize.\".foo.\ |
| 5a80 | 5c 6e 20 62 61 72 20 5c 5c 6e 20 62 61 7a 20 5c 22 20 5c 5c 3d 27 66 61 63 65 20 5c 5c 3d 27 6d | \n.bar.\\n.baz.\".\\='face.\\='m |
| 5aa0 | 79 2d 74 6f 6f 6c 74 69 70 29 29 29 0a 20 20 28 70 75 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 | y-tooltip)))...(put-text-propert |
| 5ac0 | 79 20 36 20 31 31 20 5c 5c 3d 27 66 61 63 65 20 5c 5c 3d 27 6d 79 2d 74 6f 6f 6c 74 69 70 2d 68 | y.6.11.\\='face.\\='my-tooltip-h |
| 5ae0 | 69 67 68 6c 69 67 68 74 20 73 74 72 29 0a 20 20 28 70 6f 73 2d 74 69 70 2d 73 68 6f 77 2d 6e 6f | ighlight.str)...(pos-tip-show-no |
| 5b00 | 2d 70 72 6f 70 65 72 74 69 7a 65 20 73 74 72 20 5c 5c 3d 27 6d 79 2d 74 6f 6f 6c 74 69 70 29 29 | -propertize.str.\\='my-tooltip)) |
| 5b20 | 22 0a 20 20 28 75 6e 6c 65 73 73 20 77 69 6e 64 6f 77 0a 20 20 20 20 28 73 65 74 71 20 77 69 6e | "...(unless.window.....(setq.win |
| 5b40 | 64 6f 77 20 28 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 29 29 29 0a 20 20 28 6c 65 74 2a 20 | dow.(selected-window)))...(let*. |
| 5b60 | 28 28 66 72 61 6d 65 20 28 77 69 6e 64 6f 77 2d 66 72 61 6d 65 20 77 69 6e 64 6f 77 29 29 0a 09 | ((frame.(window-frame.window)).. |
| 5b80 | 20 28 77 69 6e 73 79 73 20 28 70 6f 73 2d 74 69 70 2d 77 69 6e 64 6f 77 2d 73 79 73 74 65 6d 20 | .(winsys.(pos-tip-window-system. |
| 5ba0 | 66 72 61 6d 65 29 29 0a 09 20 28 78 2d 66 72 61 6d 65 20 28 65 71 20 77 69 6e 73 79 73 20 27 78 | frame))...(x-frame.(eq.winsys.'x |
| 5bc0 | 29 29 0a 09 20 28 77 33 32 2d 66 72 61 6d 65 20 28 65 71 20 77 69 6e 73 79 73 20 27 77 33 32 29 | ))...(w32-frame.(eq.winsys.'w32) |
| 5be0 | 29 0a 09 20 28 72 65 6c 61 74 69 76 65 20 28 6f 72 20 70 6f 73 2d 74 69 70 2d 75 73 65 2d 72 65 | )...(relative.(or.pos-tip-use-re |
| 5c00 | 6c 61 74 69 76 65 2d 63 6f 6f 72 64 69 6e 61 74 65 73 0a 09 09 20 20 20 20 20 20 20 28 65 71 20 | lative-coordinates..........(eq. |
| 5c20 | 66 72 61 6d 65 2d 63 6f 6f 72 64 69 6e 61 74 65 73 20 27 72 65 6c 61 74 69 76 65 29 0a 09 09 20 | frame-coordinates.'relative).... |
| 5c40 | 20 20 20 20 20 20 28 61 6e 64 20 77 33 32 2d 66 72 61 6d 65 0a 09 09 09 20 20 20 20 28 6e 75 6c | ......(and.w32-frame........(nul |
| 5c60 | 6c 20 70 6f 73 2d 74 69 70 2d 77 33 32 2d 73 61 76 65 64 2d 6d 61 78 2d 77 69 64 74 68 2d 68 65 | l.pos-tip-w32-saved-max-width-he |
| 5c80 | 69 67 68 74 29 29 29 29 0a 09 20 28 78 2d 79 20 28 70 72 6f 67 31 0a 09 09 20 20 28 70 6f 73 2d | ight))))...(x-y.(prog1.....(pos- |
| 5ca0 | 74 69 70 2d 63 6f 6d 70 75 74 65 2d 70 69 78 65 6c 2d 70 6f 73 69 74 69 6f 6e 20 70 6f 73 20 77 | tip-compute-pixel-position.pos.w |
| 5cc0 | 69 6e 64 6f 77 0a 09 09 09 09 09 09 20 20 70 69 78 65 6c 2d 77 69 64 74 68 20 70 69 78 65 6c 2d | indow.........pixel-width.pixel- |
| 5ce0 | 68 65 69 67 68 74 0a 09 09 09 09 09 09 20 20 66 72 61 6d 65 2d 63 6f 6f 72 64 69 6e 61 74 65 73 | height.........frame-coordinates |
| 5d00 | 20 64 78 20 64 79 29 0a 09 09 28 69 66 20 70 6f 73 2d 74 69 70 2d 75 73 65 2d 72 65 6c 61 74 69 | .dx.dy)...(if.pos-tip-use-relati |
| 5d20 | 76 65 2d 63 6f 6f 72 64 69 6e 61 74 65 73 0a 09 09 20 20 20 20 28 73 65 74 71 20 72 65 6c 61 74 | ve-coordinates.......(setq.relat |
| 5d40 | 69 76 65 20 74 29 29 29 29 0a 09 20 28 61 78 20 28 63 61 72 20 78 2d 79 29 29 0a 09 20 28 61 79 | ive.t))))...(ax.(car.x-y))...(ay |
| 5d60 | 20 28 63 64 72 20 78 2d 79 29 29 0a 09 20 28 72 78 20 28 69 66 20 72 65 6c 61 74 69 76 65 20 61 | .(cdr.x-y))...(rx.(if.relative.a |
| 5d80 | 78 20 28 2d 20 61 78 20 28 63 61 72 20 70 6f 73 2d 74 69 70 2d 73 61 76 65 64 2d 66 72 61 6d 65 | x.(-.ax.(car.pos-tip-saved-frame |
| 5da0 | 2d 63 6f 6f 72 64 69 6e 61 74 65 73 29 29 29 29 0a 09 20 28 72 79 20 28 69 66 20 72 65 6c 61 74 | -coordinates))))...(ry.(if.relat |
| 5dc0 | 69 76 65 20 61 79 20 28 2d 20 61 79 20 28 63 64 72 20 70 6f 73 2d 74 69 70 2d 73 61 76 65 64 2d | ive.ay.(-.ay.(cdr.pos-tip-saved- |
| 5de0 | 66 72 61 6d 65 2d 63 6f 6f 72 64 69 6e 61 74 65 73 29 29 29 29 0a 09 20 28 72 65 74 76 61 6c 20 | frame-coordinates))))...(retval. |
| 5e00 | 28 63 6f 6e 73 20 72 78 20 72 79 29 29 0a 09 20 28 66 67 20 28 70 6f 73 2d 74 69 70 2d 63 6f 6d | (cons.rx.ry))...(fg.(pos-tip-com |
| 5e20 | 70 75 74 65 2d 66 6f 72 65 67 72 6f 75 6e 64 2d 63 6f 6c 6f 72 20 74 69 70 2d 63 6f 6c 6f 72 29 | pute-foreground-color.tip-color) |
| 5e40 | 29 0a 09 20 28 62 67 20 28 70 6f 73 2d 74 69 70 2d 63 6f 6d 70 75 74 65 2d 62 61 63 6b 67 72 6f | )...(bg.(pos-tip-compute-backgro |
| 5e60 | 75 6e 64 2d 63 6f 6c 6f 72 20 74 69 70 2d 63 6f 6c 6f 72 29 29 0a 09 20 28 75 73 65 2d 64 78 64 | und-color.tip-color))...(use-dxd |
| 5e80 | 79 20 28 6f 72 20 72 65 6c 61 74 69 76 65 0a 09 09 20 20 20 20 20 20 20 28 6e 6f 74 20 78 2d 66 | y.(or.relative..........(not.x-f |
| 5ea0 | 72 61 6d 65 29 29 29 0a 09 20 28 73 70 61 63 69 6e 67 20 28 66 72 61 6d 65 2d 70 61 72 61 6d 65 | rame)))...(spacing.(frame-parame |
| 5ec0 | 74 65 72 20 66 72 61 6d 65 20 27 6c 69 6e 65 2d 73 70 61 63 69 6e 67 29 29 0a 09 20 28 62 6f 72 | ter.frame.'line-spacing))...(bor |
| 5ee0 | 64 65 72 20 28 61 73 68 20 28 2b 20 70 6f 73 2d 74 69 70 2d 62 6f 72 64 65 72 2d 77 69 64 74 68 | der.(ash.(+.pos-tip-border-width |
| 5f00 | 0a 09 09 09 20 70 6f 73 2d 74 69 70 2d 69 6e 74 65 72 6e 61 6c 2d 62 6f 72 64 65 72 2d 77 69 64 | .....pos-tip-internal-border-wid |
| 5f20 | 74 68 29 0a 09 09 20 20 20 20 20 20 31 29 29 0a 09 20 28 78 2d 6d 61 78 2d 74 6f 6f 6c 74 69 70 | th).........1))...(x-max-tooltip |
| 5f40 | 2d 73 69 7a 65 0a 09 20 20 28 63 6f 6e 73 20 28 2b 20 28 69 66 20 78 2d 66 72 61 6d 65 20 31 20 | -size....(cons.(+.(if.x-frame.1. |
| 5f60 | 30 29 0a 09 09 20 20 20 28 2f 20 28 2d 20 28 6f 72 20 70 69 78 65 6c 2d 77 69 64 74 68 0a 09 09 | 0)......(/.(-.(or.pixel-width... |
| 5f80 | 09 20 20 20 20 20 28 63 6f 6e 64 0a 09 09 09 20 20 20 20 20 20 28 72 65 6c 61 74 69 76 65 0a 09 | ......(cond..........(relative.. |
| 5fa0 | 09 09 20 20 20 20 20 20 20 28 66 72 61 6d 65 2d 70 69 78 65 6c 2d 77 69 64 74 68 20 66 72 61 6d | .........(frame-pixel-width.fram |
| 5fc0 | 65 29 29 0a 09 09 09 20 20 20 20 20 20 28 77 33 32 2d 66 72 61 6d 65 0a 09 09 09 20 20 20 20 20 | e))..........(w32-frame......... |
| 5fe0 | 20 20 28 63 61 72 20 70 6f 73 2d 74 69 70 2d 77 33 32 2d 73 61 76 65 64 2d 6d 61 78 2d 77 69 64 | ..(car.pos-tip-w32-saved-max-wid |
| 6000 | 74 68 2d 68 65 69 67 68 74 29 29 0a 09 09 09 20 20 20 20 20 20 28 74 0a 09 09 09 20 20 20 20 20 | th-height))..........(t......... |
| 6020 | 20 20 28 78 2d 64 69 73 70 6c 61 79 2d 70 69 78 65 6c 2d 77 69 64 74 68 20 66 72 61 6d 65 29 29 | ..(x-display-pixel-width.frame)) |
| 6040 | 29 29 0a 09 09 09 20 62 6f 72 64 65 72 29 0a 09 09 20 20 20 20 20 20 28 66 72 61 6d 65 2d 63 68 | )).....border).........(frame-ch |
| 6060 | 61 72 2d 77 69 64 74 68 20 66 72 61 6d 65 29 29 29 0a 09 09 3b 3b 20 49 6e 20 63 61 73 65 20 6f | ar-width.frame)))...;;.In.case.o |
| 6080 | 66 20 6e 6f 6e 2d 7a 65 72 6f 20 6c 69 6e 65 20 73 70 61 63 69 6e 67 2c 20 70 69 78 65 6c 2d 68 | f.non-zero.line.spacing,.pixel-h |
| 60a0 | 65 69 67 68 74 20 77 69 6c 6c 20 69 6e 63 6c 75 64 65 20 73 6f 6d 65 0a 09 09 3b 3b 20 65 78 74 | eight.will.include.some...;;.ext |
| 60c0 | 72 61 20 73 70 61 63 65 2c 20 61 73 20 72 65 71 75 69 72 65 64 20 74 6f 20 64 69 73 70 6c 61 79 | ra.space,.as.required.to.display |
| 60e0 | 20 74 68 65 20 74 6f 6f 6c 74 69 70 2c 20 62 75 74 20 63 68 61 72 20 68 65 69 67 68 74 0a 09 09 | .the.tooltip,.but.char.height... |
| 6100 | 3b 3b 20 77 69 6c 6c 20 6e 6f 74 2e 20 48 6f 77 65 76 65 72 2c 20 69 74 20 73 65 65 6d 73 20 74 | ;;.will.not..However,.it.seems.t |
| 6120 | 68 61 74 20 78 2d 73 68 6f 77 2d 74 69 70 20 77 69 6c 6c 20 75 73 65 20 63 68 61 72 20 68 65 69 | hat.x-show-tip.will.use.char.hei |
| 6140 | 67 68 74 0a 09 09 3b 3b 20 74 6f 20 63 6f 6e 76 65 72 74 20 6d 61 78 69 6d 75 6d 20 72 6f 77 20 | ght...;;.to.convert.maximum.row. |
| 6160 | 63 6f 75 6e 74 20 69 6e 74 6f 20 6d 61 78 69 6d 75 6d 20 74 6f 6f 6c 74 69 70 20 68 65 69 67 68 | count.into.maximum.tooltip.heigh |
| 6180 | 74 2c 20 73 6f 20 77 65 0a 09 09 3b 3b 20 6e 65 65 64 20 74 6f 20 72 6f 75 6e 64 20 75 70 20 74 | t,.so.we...;;.need.to.round.up.t |
| 61a0 | 68 65 20 72 6f 77 20 63 6f 75 6e 74 20 74 6f 20 61 6c 6c 6f 77 20 74 68 65 20 6c 61 73 74 20 6c | he.row.count.to.allow.the.last.l |
| 61c0 | 69 6e 65 20 74 6f 20 62 65 0a 09 09 3b 3b 20 73 68 6f 77 6e 2e 0a 09 09 28 63 65 69 6c 69 6e 67 | ine.to.be...;;.shown....(ceiling |
| 61e0 | 20 28 2f 20 28 2d 20 28 6f 72 20 70 69 78 65 6c 2d 68 65 69 67 68 74 0a 09 09 09 09 20 20 20 28 | .(/.(-.(or.pixel-height........( |
| 6200 | 78 2d 64 69 73 70 6c 61 79 2d 70 69 78 65 6c 2d 68 65 69 67 68 74 20 66 72 61 6d 65 29 29 0a 09 | x-display-pixel-height.frame)).. |
| 6220 | 09 09 20 20 20 20 20 20 20 62 6f 72 64 65 72 29 0a 09 09 09 20 20 20 20 28 66 6c 6f 61 74 20 28 | .........border)........(float.( |
| 6240 | 66 72 61 6d 65 2d 63 68 61 72 2d 68 65 69 67 68 74 20 66 72 61 6d 65 29 29 29 29 29 29 0a 09 20 | frame-char-height.frame))))))... |
| 6260 | 28 78 2d 67 74 6b 2d 75 73 65 2d 73 79 73 74 65 6d 2d 74 6f 6f 6c 74 69 70 73 20 6e 69 6c 29 20 | (x-gtk-use-system-tooltips.nil). |
| 6280 | 3b 20 44 6f 6e 27 74 20 75 73 65 20 47 74 6b 2b 20 74 6f 6f 6c 74 69 70 20 69 6e 20 45 6d 61 63 | ;.Don't.use.Gtk+.tooltip.in.Emac |
| 62a0 | 73 20 32 34 0a 09 20 28 6d 70 6f 73 20 28 77 69 74 68 2d 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 | s.24...(mpos.(with-selected-wind |
| 62c0 | 6f 77 20 77 69 6e 64 6f 77 20 28 6d 6f 75 73 65 2d 70 69 78 65 6c 2d 70 6f 73 69 74 69 6f 6e 29 | ow.window.(mouse-pixel-position) |
| 62e0 | 29 29 0a 09 20 28 6d 66 72 61 6d 65 20 28 63 61 72 20 6d 70 6f 73 29 29 0a 09 20 64 65 66 61 75 | ))...(mframe.(car.mpos))...defau |
| 6300 | 6c 74 2d 66 72 61 6d 65 2d 61 6c 69 73 74 29 0a 20 20 20 20 28 69 66 20 28 6f 72 20 72 65 6c 61 | lt-frame-alist).....(if.(or.rela |
| 6320 | 74 69 76 65 0a 09 20 20 20 20 28 61 6e 64 20 75 73 65 2d 64 78 64 79 0a 09 09 20 28 6e 75 6c 6c | tive......(and.use-dxdy....(null |
| 6340 | 20 28 63 61 64 72 20 6d 70 6f 73 29 29 29 29 0a 09 28 75 6e 6c 65 73 73 20 28 61 6e 64 20 28 63 | .(cadr.mpos))))..(unless.(and.(c |
| 6360 | 61 64 72 20 6d 70 6f 73 29 0a 09 09 20 20 20 20 20 28 65 71 20 6d 66 72 61 6d 65 20 66 72 61 6d | adr.mpos)........(eq.mframe.fram |
| 6380 | 65 29 29 0a 09 20 20 28 6c 65 74 2a 20 28 28 65 64 67 65 73 20 28 77 69 6e 64 6f 77 2d 69 6e 73 | e))....(let*.((edges.(window-ins |
| 63a0 | 69 64 65 2d 70 69 78 65 6c 2d 65 64 67 65 73 20 28 63 61 64 72 20 28 77 69 6e 64 6f 77 2d 6c 69 | ide-pixel-edges.(cadr.(window-li |
| 63c0 | 73 74 20 66 72 61 6d 65 29 29 29 29 0a 09 09 20 28 6d 78 20 28 61 73 68 20 28 2b 20 28 70 6f 70 | st.frame))))....(mx.(ash.(+.(pop |
| 63e0 | 20 65 64 67 65 73 29 20 28 63 61 64 72 20 65 64 67 65 73 29 29 20 2d 31 29 29 0a 09 09 20 28 6d | .edges).(cadr.edges)).-1))....(m |
| 6400 | 79 20 28 61 73 68 20 28 2b 20 28 70 6f 70 20 65 64 67 65 73 29 20 28 63 61 64 72 20 65 64 67 65 | y.(ash.(+.(pop.edges).(cadr.edge |
| 6420 | 73 29 29 20 2d 31 29 29 29 0a 09 20 20 20 20 28 73 65 74 71 20 6d 66 72 61 6d 65 20 66 72 61 6d | s)).-1)))......(setq.mframe.fram |
| 6440 | 65 29 0a 09 20 20 20 20 28 73 65 74 2d 6d 6f 75 73 65 2d 70 69 78 65 6c 2d 70 6f 73 69 74 69 6f | e)......(set-mouse-pixel-positio |
| 6460 | 6e 20 6d 66 72 61 6d 65 20 6d 78 20 6d 79 29 0a 09 20 20 20 20 28 73 69 74 2d 66 6f 72 20 30 2e | n.mframe.mx.my)......(sit-for.0. |
| 6480 | 30 30 30 31 29 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 63 61 64 72 20 6d | 0001))).......(when.(and.(cadr.m |
| 64a0 | 70 6f 73 29 0a 09 09 20 28 6e 6f 74 20 28 65 71 20 6d 66 72 61 6d 65 20 66 72 61 6d 65 29 29 29 | pos)....(not.(eq.mframe.frame))) |
| 64c0 | 0a 09 28 6c 65 74 20 28 28 72 65 6c 2d 63 6f 6f 72 64 20 28 70 6f 73 2d 74 69 70 2d 66 72 61 6d | ..(let.((rel-coord.(pos-tip-fram |
| 64e0 | 65 2d 72 65 6c 61 74 69 76 65 2d 70 6f 73 69 74 69 6f 6e 20 66 72 61 6d 65 20 6d 66 72 61 6d 65 | e-relative-position.frame.mframe |
| 6500 | 20 77 33 32 2d 66 72 61 6d 65 0a 09 09 09 09 09 09 09 20 20 66 72 61 6d 65 2d 63 6f 6f 72 64 69 | .w32-frame..........frame-coordi |
| 6520 | 6e 61 74 65 73 29 29 29 0a 09 20 20 28 73 65 74 71 20 72 78 20 28 2b 20 72 78 20 28 63 61 72 20 | nates)))....(setq.rx.(+.rx.(car. |
| 6540 | 72 65 6c 2d 63 6f 6f 72 64 29 29 0a 09 09 72 79 20 28 2b 20 72 79 20 28 63 64 72 20 72 65 6c 2d | rel-coord))...ry.(+.ry.(cdr.rel- |
| 6560 | 63 6f 6f 72 64 29 29 29 29 29 29 0a 20 20 20 20 28 61 6e 64 20 70 69 78 65 6c 2d 77 69 64 74 68 | coord)))))).....(and.pixel-width |
| 6580 | 20 70 69 78 65 6c 2d 68 65 69 67 68 74 0a 09 20 28 73 65 74 71 20 6d 70 6f 73 20 28 70 6f 73 2d | .pixel-height...(setq.mpos.(pos- |
| 65a0 | 74 69 70 2d 61 76 6f 69 64 2d 6d 6f 75 73 65 20 72 78 20 28 2b 20 72 78 20 70 69 78 65 6c 2d 77 | tip-avoid-mouse.rx.(+.rx.pixel-w |
| 65c0 | 69 64 74 68 0a 09 09 09 09 09 20 20 20 20 20 20 20 28 69 66 20 77 33 32 2d 66 72 61 6d 65 20 33 | idth.............(if.w32-frame.3 |
| 65e0 | 20 30 29 29 0a 09 09 09 09 09 20 72 79 20 28 2b 20 72 79 20 70 69 78 65 6c 2d 68 65 69 67 68 74 | .0)).......ry.(+.ry.pixel-height |
| 6600 | 29 0a 09 09 09 09 09 20 6d 66 72 61 6d 65 29 29 29 0a 20 20 20 20 28 78 2d 73 68 6f 77 2d 74 69 | ).......mframe))).....(x-show-ti |
| 6620 | 70 20 73 74 72 69 6e 67 20 6d 66 72 61 6d 65 0a 09 09 60 28 28 62 6f 72 64 65 72 2d 77 69 64 74 | p.string.mframe...`((border-widt |
| 6640 | 68 20 2e 20 2c 70 6f 73 2d 74 69 70 2d 62 6f 72 64 65 72 2d 77 69 64 74 68 29 0a 09 09 20 20 28 | h...,pos-tip-border-width).....( |
| 6660 | 69 6e 74 65 72 6e 61 6c 2d 62 6f 72 64 65 72 2d 77 69 64 74 68 20 2e 20 2c 70 6f 73 2d 74 69 70 | internal-border-width...,pos-tip |
| 6680 | 2d 69 6e 74 65 72 6e 61 6c 2d 62 6f 72 64 65 72 2d 77 69 64 74 68 29 0a 09 09 20 20 2c 40 28 61 | -internal-border-width).....,@(a |
| 66a0 | 6e 64 20 28 6e 6f 74 20 75 73 65 2d 64 78 64 79 29 20 60 28 28 6c 65 66 74 20 2e 20 2c 61 78 29 | nd.(not.use-dxdy).`((left...,ax) |
| 66c0 | 0a 09 09 09 09 09 20 20 28 74 6f 70 20 2e 20 2c 61 79 29 29 29 0a 09 09 20 20 28 66 6f 6e 74 20 | ........(top...,ay))).....(font. |
| 66e0 | 2e 20 2c 28 66 72 61 6d 65 2d 70 61 72 61 6d 65 74 65 72 20 66 72 61 6d 65 20 27 66 6f 6e 74 29 | ..,(frame-parameter.frame.'font) |
| 6700 | 29 0a 09 09 20 20 2c 40 28 61 6e 64 20 73 70 61 63 69 6e 67 20 60 28 28 6c 69 6e 65 2d 73 70 61 | ).....,@(and.spacing.`((line-spa |
| 6720 | 63 69 6e 67 20 2e 20 2c 73 70 61 63 69 6e 67 29 29 29 0a 09 09 20 20 2c 40 28 61 6e 64 20 28 73 | cing...,spacing))).....,@(and.(s |
| 6740 | 74 72 69 6e 67 70 20 66 67 29 20 60 28 28 66 6f 72 65 67 72 6f 75 6e 64 2d 63 6f 6c 6f 72 20 2e | tringp.fg).`((foreground-color.. |
| 6760 | 20 2c 66 67 29 29 29 0a 09 09 20 20 2c 40 28 61 6e 64 20 28 73 74 72 69 6e 67 70 20 62 67 29 20 | .,fg))).....,@(and.(stringp.bg). |
| 6780 | 60 28 28 62 61 63 6b 67 72 6f 75 6e 64 2d 63 6f 6c 6f 72 20 2e 20 2c 62 67 29 29 29 29 0a 09 09 | `((background-color...,bg))))... |
| 67a0 | 28 61 6e 64 20 74 69 6d 65 6f 75 74 20 28 3e 20 74 69 6d 65 6f 75 74 20 30 29 20 74 69 6d 65 6f | (and.timeout.(>.timeout.0).timeo |
| 67c0 | 75 74 29 0a 09 09 28 61 6e 64 20 75 73 65 2d 64 78 64 79 20 28 2d 20 72 78 20 28 63 61 64 72 20 | ut)...(and.use-dxdy.(-.rx.(cadr. |
| 67e0 | 6d 70 6f 73 29 29 29 0a 09 09 28 61 6e 64 20 75 73 65 2d 64 78 64 79 20 28 2d 20 72 79 20 28 63 | mpos)))...(and.use-dxdy.(-.ry.(c |
| 6800 | 64 64 72 20 6d 70 6f 73 29 29 29 29 0a 20 20 20 20 28 69 66 20 28 61 6e 64 20 74 69 6d 65 6f 75 | ddr.mpos)))).....(if.(and.timeou |
| 6820 | 74 20 28 3c 3d 20 74 69 6d 65 6f 75 74 20 30 29 29 0a 09 28 70 6f 73 2d 74 69 70 2d 63 61 6e 63 | t.(<=.timeout.0))..(pos-tip-canc |
| 6840 | 65 6c 2d 74 69 6d 65 72 29 29 0a 20 20 20 20 72 65 74 76 61 6c 29 29 0a 0a 28 64 65 66 75 6e 20 | el-timer)).....retval))..(defun. |
| 6860 | 70 6f 73 2d 74 69 70 2d 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 28 73 74 72 69 6e 67 20 26 6f 70 | pos-tip-split-string.(string.&op |
| 6880 | 74 69 6f 6e 61 6c 20 77 69 64 74 68 20 6d 61 72 67 69 6e 20 6a 75 73 74 69 66 79 20 73 71 75 65 | tional.width.margin.justify.sque |
| 68a0 | 65 7a 65 20 6d 61 78 2d 72 6f 77 73 29 0a 20 20 22 53 70 6c 69 74 20 53 54 52 49 4e 47 20 69 6e | eze.max-rows)..."Split.STRING.in |
| 68c0 | 74 6f 20 66 69 78 65 64 20 77 69 64 74 68 20 73 74 72 69 6e 67 73 2e 20 52 65 74 75 72 6e 20 61 | to.fixed.width.strings..Return.a |
| 68e0 | 20 6c 69 73 74 20 6f 66 20 74 68 65 73 65 20 73 74 72 69 6e 67 73 2e 0a 0a 57 49 44 54 48 20 73 | .list.of.these.strings...WIDTH.s |
| 6900 | 70 65 63 69 66 69 65 73 20 74 68 65 20 77 69 64 74 68 20 6f 66 20 66 69 6c 6c 69 6e 67 20 65 61 | pecifies.the.width.of.filling.ea |
| 6920 | 63 68 20 70 61 72 61 67 72 61 70 68 2e 20 57 49 44 54 48 20 6e 69 6c 20 6d 65 61 6e 73 20 75 73 | ch.paragraph..WIDTH.nil.means.us |
| 6940 | 65 0a 74 68 65 20 77 69 64 74 68 20 6f 66 20 63 75 72 72 65 6e 74 6c 79 20 73 65 6c 65 63 74 65 | e.the.width.of.currently.selecte |
| 6960 | 64 20 66 72 61 6d 65 2e 20 4e 6f 74 65 20 74 68 61 74 20 74 68 69 73 20 66 75 6e 63 74 69 6f 6e | d.frame..Note.that.this.function |
| 6980 | 20 64 6f 65 73 6e 27 74 20 61 64 64 20 61 6e 79 0a 70 61 64 64 69 6e 67 20 63 68 61 72 61 63 74 | .doesn't.add.any.padding.charact |
| 69a0 | 65 72 73 20 61 74 20 74 68 65 20 65 6e 64 20 6f 66 20 65 61 63 68 20 72 6f 77 2e 0a 0a 4d 41 52 | ers.at.the.end.of.each.row...MAR |
| 69c0 | 47 49 4e 2c 20 69 66 20 6e 6f 6e 2d 6e 69 6c 2c 20 73 70 65 63 69 66 69 65 73 20 6c 65 66 74 20 | GIN,.if.non-nil,.specifies.left. |
| 69e0 | 6d 61 72 67 69 6e 20 77 69 64 74 68 20 77 68 69 63 68 20 69 73 20 74 68 65 20 6e 75 6d 62 65 72 | margin.width.which.is.the.number |
| 6a00 | 20 6f 66 20 73 70 65 63 65 0a 63 68 61 72 61 63 74 65 72 73 20 74 6f 20 61 64 64 20 61 74 20 74 | .of.spece.characters.to.add.at.t |
| 6a20 | 68 65 20 62 65 67 69 6e 6e 69 6e 67 20 6f 66 20 65 61 63 68 20 72 6f 77 2e 0a 0a 54 68 65 20 6f | he.beginning.of.each.row...The.o |
| 6a40 | 70 74 69 6f 6e 61 6c 20 66 6f 75 72 74 68 20 61 72 67 75 6d 65 6e 74 20 4a 55 53 54 49 46 59 20 | ptional.fourth.argument.JUSTIFY. |
| 6a60 | 73 70 65 63 69 66 69 65 73 20 77 68 69 63 68 20 6b 69 6e 64 20 6f 66 20 6a 75 73 74 69 66 69 63 | specifies.which.kind.of.justific |
| 6a80 | 61 74 69 6f 6e 0a 74 6f 20 64 6f 3a 20 60 66 75 6c 6c 27 2c 20 60 6c 65 66 74 27 2c 20 60 72 69 | ation.to.do:.`full',.`left',.`ri |
| 6aa0 | 67 68 74 27 2c 20 60 63 65 6e 74 65 72 27 2c 20 6f 72 20 60 6e 6f 6e 65 27 2e 20 41 20 76 61 6c | ght',.`center',.or.`none'..A.val |
| 6ac0 | 75 65 20 6f 66 20 74 20 6d 65 61 6e 73 20 68 61 6e 64 6c 65 0a 65 61 63 68 20 70 61 72 61 67 72 | ue.of.t.means.handle.each.paragr |
| 6ae0 | 61 70 68 20 61 73 20 73 70 65 63 69 66 69 65 64 20 62 79 20 69 74 73 20 74 65 78 74 20 70 72 6f | aph.as.specified.by.its.text.pro |
| 6b00 | 70 65 72 74 69 65 73 2e 20 4f 6d 69 74 74 69 6e 67 20 4a 55 53 54 49 46 59 20 6d 65 61 6e 73 0a | perties..Omitting.JUSTIFY.means. |
| 6b20 | 64 6f 6e 27 74 20 70 65 72 66 6f 72 6d 20 6a 75 73 74 69 66 69 63 61 74 69 6f 6e 2c 20 77 6f 72 | don't.perform.justification,.wor |
| 6b40 | 64 20 77 72 61 70 20 61 6e 64 20 6b 69 6e 73 6f 6b 75 20 73 68 6f 72 69 20 28 e7 a6 81 e5 89 87 | d.wrap.and.kinsoku.shori.(...... |
| 6b60 | e5 87 a6 e7 90 86 29 2e 0a 0a 53 51 55 45 45 5a 45 20 6e 69 6c 20 6d 65 61 6e 73 20 6c 65 61 76 | ......)...SQUEEZE.nil.means.leav |
| 6b80 | 65 20 77 68 69 74 65 73 70 61 63 65 73 20 6f 74 68 65 72 20 74 68 61 6e 20 6c 69 6e 65 20 62 72 | e.whitespaces.other.than.line.br |
| 6ba0 | 65 61 6b 73 20 75 6e 74 6f 75 63 68 65 64 2e 0a 0a 4d 41 58 2d 52 4f 57 53 2c 20 69 66 20 67 69 | eaks.untouched...MAX-ROWS,.if.gi |
| 6bc0 | 76 65 6e 2c 20 73 70 65 63 69 66 69 65 73 20 6d 61 78 69 6d 75 6d 20 6e 75 6d 62 65 72 20 6f 66 | ven,.specifies.maximum.number.of |
| 6be0 | 20 65 6c 65 6d 65 6e 74 73 20 6f 66 20 72 65 74 75 72 6e 20 76 61 6c 75 65 2e 0a 54 68 65 20 65 | .elements.of.return.value..The.e |
| 6c00 | 6c 65 6d 65 6e 74 73 20 65 78 63 65 65 64 69 6e 67 20 74 68 69 73 20 6e 75 6d 62 65 72 20 61 72 | lements.exceeding.this.number.ar |
| 6c20 | 65 20 64 69 73 63 61 72 64 65 64 2e 22 0a 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 | e.discarded."...(with-temp-buffe |
| 6c40 | 72 0a 20 20 20 20 28 6c 65 74 2a 20 28 28 74 61 62 2d 77 69 64 74 68 20 28 6f 72 20 70 6f 73 2d | r.....(let*.((tab-width.(or.pos- |
| 6c60 | 74 69 70 2d 74 61 62 2d 77 69 64 74 68 20 74 61 62 2d 77 69 64 74 68 29 29 0a 09 20 20 20 28 66 | tip-tab-width.tab-width)).....(f |
| 6c80 | 69 6c 6c 2d 63 6f 6c 75 6d 6e 20 28 6f 72 20 77 69 64 74 68 20 28 66 72 61 6d 65 2d 77 69 64 74 | ill-column.(or.width.(frame-widt |
| 6ca0 | 68 29 29 29 0a 09 20 20 20 28 6c 65 66 74 2d 6d 61 72 67 69 6e 20 28 6f 72 20 6d 61 72 67 69 6e | h))).....(left-margin.(or.margin |
| 6cc0 | 20 30 29 29 0a 09 20 20 20 28 6b 69 6e 73 6f 6b 75 2d 6c 69 6d 69 74 20 31 29 0a 09 20 20 20 69 | .0)).....(kinsoku-limit.1).....i |
| 6ce0 | 6e 64 65 6e 74 2d 74 61 62 73 2d 6d 6f 64 65 0a 09 20 20 20 72 6f 77 20 72 6f 77 73 29 0a 20 20 | ndent-tabs-mode.....row.rows)... |
| 6d00 | 20 20 20 20 28 69 6e 73 65 72 74 20 73 74 72 69 6e 67 29 0a 20 20 20 20 20 20 28 75 6e 74 61 62 | ....(insert.string).......(untab |
| 6d20 | 69 66 79 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 20 20 20 | ify.(point-min).(point-max)).... |
| 6d40 | 20 20 20 28 69 66 20 6a 75 73 74 69 66 79 0a 09 20 20 28 66 69 6c 6c 2d 72 65 67 69 6f 6e 20 28 | ...(if.justify....(fill-region.( |
| 6d60 | 70 6f 69 6e 74 2d 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 20 6a 75 73 74 69 66 79 20 28 | point-min).(point-max).justify.( |
| 6d80 | 6e 6f 74 20 73 71 75 65 65 7a 65 29 29 0a 09 28 73 65 74 71 20 6d 61 72 67 69 6e 20 28 6d 61 6b | not.squeeze))..(setq.margin.(mak |
| 6da0 | 65 2d 73 74 72 69 6e 67 20 6c 65 66 74 2d 6d 61 72 67 69 6e 20 3f 5c 73 29 29 29 0a 20 20 20 20 | e-string.left-margin.?\s)))..... |
| 6dc0 | 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 20 20 20 20 20 20 | ..(goto-char.(point-min))....... |
| 6de0 | 28 77 68 69 6c 65 20 28 70 72 6f 67 32 0a 09 09 20 28 6c 65 74 20 28 28 6c 69 6e 65 20 28 62 75 | (while.(prog2....(let.((line.(bu |
| 6e00 | 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 0a 09 09 09 20 20 20 20 20 20 28 70 6f 69 6e 74 29 20 | ffer-substring..........(point). |
| 6e20 | 28 70 72 6f 67 6e 20 28 65 6e 64 2d 6f 66 2d 6c 69 6e 65 29 20 28 70 6f 69 6e 74 29 29 29 29 29 | (progn.(end-of-line).(point))))) |
| 6e40 | 0a 09 09 20 20 20 28 69 66 20 6a 75 73 74 69 66 79 0a 09 09 20 20 20 20 20 20 20 28 70 75 73 68 | ......(if.justify..........(push |
| 6e60 | 20 6c 69 6e 65 20 72 6f 77 73 29 0a 09 09 20 20 20 20 20 28 77 68 69 6c 65 20 28 70 72 6f 67 6e | .line.rows)........(while.(progn |
| 6e80 | 0a 09 09 09 20 20 20 20 20 20 28 73 65 74 71 20 6c 69 6e 65 20 28 63 6f 6e 63 61 74 20 6d 61 72 | ..........(setq.line.(concat.mar |
| 6ea0 | 67 69 6e 20 6c 69 6e 65 29 0a 09 09 09 09 20 20 20 20 72 6f 77 20 28 74 72 75 6e 63 61 74 65 2d | gin.line).........row.(truncate- |
| 6ec0 | 73 74 72 69 6e 67 2d 74 6f 2d 77 69 64 74 68 20 6c 69 6e 65 20 66 69 6c 6c 2d 63 6f 6c 75 6d 6e | string-to-width.line.fill-column |
| 6ee0 | 29 29 0a 09 09 09 20 20 20 20 20 20 28 70 75 73 68 20 72 6f 77 20 72 6f 77 73 29 0a 09 09 09 20 | ))..........(push.row.rows)..... |
| 6f00 | 20 20 20 20 20 28 69 66 20 28 6e 6f 74 20 28 3d 20 28 6c 65 6e 67 74 68 20 72 6f 77 29 20 28 6c | .....(if.(not.(=.(length.row).(l |
| 6f20 | 65 6e 67 74 68 20 6c 69 6e 65 29 29 29 0a 09 09 09 09 20 20 28 73 65 74 71 20 6c 69 6e 65 20 28 | ength.line))).......(setq.line.( |
| 6f40 | 73 75 62 73 74 72 69 6e 67 20 6c 69 6e 65 20 28 6c 65 6e 67 74 68 20 72 6f 77 29 29 29 29 29 29 | substring.line.(length.row)))))) |
| 6f60 | 29 29 0a 09 09 20 28 3c 20 28 70 6f 69 6e 74 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 09 20 | ))....(<.(point).(point-max))... |
| 6f80 | 20 20 20 20 20 20 28 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 20 32 29 29 29 0a 20 20 | ......(beginning-of-line.2)))... |
| 6fa0 | 20 20 20 20 28 6e 72 65 76 65 72 73 65 20 28 69 66 20 6d 61 78 2d 72 6f 77 73 0a 09 09 20 20 20 | ....(nreverse.(if.max-rows...... |
| 6fc0 | 20 28 6c 61 73 74 20 72 6f 77 73 20 6d 61 78 2d 72 6f 77 73 29 0a 09 09 20 20 72 6f 77 73 29 29 | .(last.rows.max-rows).....rows)) |
| 6fe0 | 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 6f 73 2d 74 69 70 2d 66 69 6c 6c 2d 73 74 72 69 6e 67 20 | )))..(defun.pos-tip-fill-string. |
| 7000 | 28 73 74 72 69 6e 67 20 26 6f 70 74 69 6f 6e 61 6c 20 77 69 64 74 68 20 6d 61 72 67 69 6e 20 6a | (string.&optional.width.margin.j |
| 7020 | 75 73 74 69 66 79 20 73 71 75 65 65 7a 65 20 6d 61 78 2d 72 6f 77 73 29 0a 20 20 22 46 69 6c 6c | ustify.squeeze.max-rows)..."Fill |
| 7040 | 20 65 61 63 68 20 6f 66 20 74 68 65 20 70 61 72 61 67 72 61 70 68 73 20 69 6e 20 53 54 52 49 4e | .each.of.the.paragraphs.in.STRIN |
| 7060 | 47 2e 0a 0a 57 49 44 54 48 20 73 70 65 63 69 66 69 65 73 20 74 68 65 20 77 69 64 74 68 20 6f 66 | G...WIDTH.specifies.the.width.of |
| 7080 | 20 66 69 6c 6c 69 6e 67 20 65 61 63 68 20 70 61 72 61 67 72 61 70 68 2e 20 57 49 44 54 48 20 6e | .filling.each.paragraph..WIDTH.n |
| 70a0 | 69 6c 20 6d 65 61 6e 73 20 75 73 65 0a 74 68 65 20 77 69 64 74 68 20 6f 66 20 63 75 72 72 65 6e | il.means.use.the.width.of.curren |
| 70c0 | 74 6c 79 20 73 65 6c 65 63 74 65 64 20 66 72 61 6d 65 2e 20 4e 6f 74 65 20 74 68 61 74 20 74 68 | tly.selected.frame..Note.that.th |
| 70e0 | 69 73 20 66 75 6e 63 74 69 6f 6e 20 64 6f 65 73 6e 27 74 20 61 64 64 20 61 6e 79 0a 70 61 64 64 | is.function.doesn't.add.any.padd |
| 7100 | 69 6e 67 20 63 68 61 72 61 63 74 65 72 73 20 61 74 20 74 68 65 20 65 6e 64 20 6f 66 20 65 61 63 | ing.characters.at.the.end.of.eac |
| 7120 | 68 20 72 6f 77 2e 0a 0a 4d 41 52 47 49 4e 2c 20 69 66 20 6e 6f 6e 2d 6e 69 6c 2c 20 73 70 65 63 | h.row...MARGIN,.if.non-nil,.spec |
| 7140 | 69 66 69 65 73 20 6c 65 66 74 20 6d 61 72 67 69 6e 20 77 69 64 74 68 20 77 68 69 63 68 20 69 73 | ifies.left.margin.width.which.is |
| 7160 | 20 74 68 65 20 6e 75 6d 62 65 72 20 6f 66 20 73 70 65 63 65 0a 63 68 61 72 61 63 74 65 72 73 20 | .the.number.of.spece.characters. |
| 7180 | 74 6f 20 61 64 64 20 61 74 20 74 68 65 20 62 65 67 69 6e 6e 69 6e 67 20 6f 66 20 65 61 63 68 20 | to.add.at.the.beginning.of.each. |
| 71a0 | 72 6f 77 2e 0a 0a 54 68 65 20 6f 70 74 69 6f 6e 61 6c 20 66 6f 75 72 74 68 20 61 72 67 75 6d 65 | row...The.optional.fourth.argume |
| 71c0 | 6e 74 20 4a 55 53 54 49 46 59 20 73 70 65 63 69 66 69 65 73 20 77 68 69 63 68 20 6b 69 6e 64 20 | nt.JUSTIFY.specifies.which.kind. |
| 71e0 | 6f 66 20 6a 75 73 74 69 66 69 63 61 74 69 6f 6e 0a 74 6f 20 64 6f 3a 20 60 66 75 6c 6c 27 2c 20 | of.justification.to.do:.`full',. |
| 7200 | 60 6c 65 66 74 27 2c 20 60 72 69 67 68 74 27 2c 20 60 63 65 6e 74 65 72 27 2c 20 6f 72 20 60 6e | `left',.`right',.`center',.or.`n |
| 7220 | 6f 6e 65 27 2e 20 41 20 76 61 6c 75 65 20 6f 66 20 74 20 6d 65 61 6e 73 20 68 61 6e 64 6c 65 0a | one'..A.value.of.t.means.handle. |
| 7240 | 65 61 63 68 20 70 61 72 61 67 72 61 70 68 20 61 73 20 73 70 65 63 69 66 69 65 64 20 62 79 20 69 | each.paragraph.as.specified.by.i |
| 7260 | 74 73 20 74 65 78 74 20 70 72 6f 70 65 72 74 69 65 73 2e 20 4f 6d 69 74 74 69 6e 67 20 4a 55 53 | ts.text.properties..Omitting.JUS |
| 7280 | 54 49 46 59 20 6d 65 61 6e 73 0a 64 6f 6e 27 74 20 70 65 72 66 6f 72 6d 20 6a 75 73 74 69 66 69 | TIFY.means.don't.perform.justifi |
| 72a0 | 63 61 74 69 6f 6e 2c 20 77 6f 72 64 20 77 72 61 70 20 61 6e 64 20 6b 69 6e 73 6f 6b 75 20 73 68 | cation,.word.wrap.and.kinsoku.sh |
| 72c0 | 6f 72 69 20 28 e7 a6 81 e5 89 87 e5 87 a6 e7 90 86 29 2e 0a 0a 53 51 55 45 45 5a 45 20 6e 69 6c | ori.(............)...SQUEEZE.nil |
| 72e0 | 20 6d 65 61 6e 73 20 6c 65 61 76 65 20 77 68 69 74 65 73 70 61 63 65 73 20 6f 74 68 65 72 20 74 | .means.leave.whitespaces.other.t |
| 7300 | 68 61 6e 20 6c 69 6e 65 20 62 72 65 61 6b 73 20 75 6e 74 6f 75 63 68 65 64 2e 0a 0a 4d 41 58 2d | han.line.breaks.untouched...MAX- |
| 7320 | 52 4f 57 53 2c 20 69 66 20 67 69 76 65 6e 2c 20 73 70 65 63 69 66 69 65 73 20 6d 61 78 69 6d 75 | ROWS,.if.given,.specifies.maximu |
| 7340 | 6d 20 6e 75 6d 62 65 72 20 6f 66 20 72 6f 77 73 2e 20 54 68 65 20 72 6f 77 73 20 65 78 63 65 65 | m.number.of.rows..The.rows.excee |
| 7360 | 64 69 6e 67 0a 74 68 69 73 20 6e 75 6d 62 65 72 20 61 72 65 20 64 69 73 63 61 72 64 65 64 2e 22 | ding.this.number.are.discarded." |
| 7380 | 0a 20 20 28 69 66 20 6a 75 73 74 69 66 79 0a 20 20 20 20 20 20 28 77 69 74 68 2d 74 65 6d 70 2d | ...(if.justify.......(with-temp- |
| 73a0 | 62 75 66 66 65 72 0a 09 28 6c 65 74 2a 20 28 28 74 61 62 2d 77 69 64 74 68 20 28 6f 72 20 70 6f | buffer..(let*.((tab-width.(or.po |
| 73c0 | 73 2d 74 69 70 2d 74 61 62 2d 77 69 64 74 68 20 74 61 62 2d 77 69 64 74 68 29 29 0a 09 20 20 20 | s-tip-tab-width.tab-width))..... |
| 73e0 | 20 20 20 20 28 66 69 6c 6c 2d 63 6f 6c 75 6d 6e 20 28 6f 72 20 77 69 64 74 68 20 28 66 72 61 6d | ....(fill-column.(or.width.(fram |
| 7400 | 65 2d 77 69 64 74 68 29 29 29 0a 09 20 20 20 20 20 20 20 28 6c 65 66 74 2d 6d 61 72 67 69 6e 20 | e-width))).........(left-margin. |
| 7420 | 28 6f 72 20 6d 61 72 67 69 6e 20 30 29 29 0a 09 20 20 20 20 20 20 20 28 6b 69 6e 73 6f 6b 75 2d | (or.margin.0)).........(kinsoku- |
| 7440 | 6c 69 6d 69 74 20 31 29 0a 09 20 20 20 20 20 20 20 69 6e 64 65 6e 74 2d 74 61 62 73 2d 6d 6f 64 | limit.1).........indent-tabs-mod |
| 7460 | 65 29 0a 09 20 20 28 69 6e 73 65 72 74 20 73 74 72 69 6e 67 29 0a 09 20 20 28 75 6e 74 61 62 69 | e)....(insert.string)....(untabi |
| 7480 | 66 79 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 09 20 20 28 | fy.(point-min).(point-max))....( |
| 74a0 | 66 69 6c 6c 2d 72 65 67 69 6f 6e 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d | fill-region.(point-min).(point-m |
| 74c0 | 61 78 29 20 6a 75 73 74 69 66 79 20 28 6e 6f 74 20 73 71 75 65 65 7a 65 29 29 0a 09 20 20 28 69 | ax).justify.(not.squeeze))....(i |
| 74e0 | 66 20 6d 61 78 2d 72 6f 77 73 0a 09 20 20 20 20 20 20 28 62 75 66 66 65 72 2d 73 75 62 73 74 72 | f.max-rows........(buffer-substr |
| 7500 | 69 6e 67 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 09 09 09 09 | ing.(goto-char.(point-min))..... |
| 7520 | 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 20 6d 61 78 2d 72 6f 77 73 29 29 0a 09 20 | (line-end-position.max-rows))... |
| 7540 | 20 20 20 28 62 75 66 66 65 72 2d 73 74 72 69 6e 67 29 29 29 29 0a 20 20 20 20 28 6d 61 70 63 6f | ...(buffer-string)))).....(mapco |
| 7560 | 6e 63 61 74 20 27 69 64 65 6e 74 69 74 79 0a 09 20 20 20 20 20 20 20 28 70 6f 73 2d 74 69 70 2d | ncat.'identity.........(pos-tip- |
| 7580 | 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 73 74 72 69 6e 67 20 77 69 64 74 68 20 6d 61 72 67 69 6e | split-string.string.width.margin |
| 75a0 | 20 6e 69 6c 20 6e 69 6c 20 6d 61 78 2d 72 6f 77 73 29 0a 09 20 20 20 20 20 20 20 22 5c 6e 22 29 | .nil.nil.max-rows)........."\n") |
| 75c0 | 29 29 0a 0a 28 64 65 66 75 6e 20 70 6f 73 2d 74 69 70 2d 74 72 75 6e 63 61 74 65 2d 73 74 72 69 | ))..(defun.pos-tip-truncate-stri |
| 75e0 | 6e 67 20 28 73 74 72 69 6e 67 20 77 69 64 74 68 20 68 65 69 67 68 74 29 0a 20 20 22 54 72 75 6e | ng.(string.width.height)..."Trun |
| 7600 | 63 61 74 65 20 65 61 63 68 20 6c 69 6e 65 20 6f 66 20 53 54 52 49 4e 47 20 74 6f 20 57 49 44 54 | cate.each.line.of.STRING.to.WIDT |
| 7620 | 48 20 61 6e 64 20 64 69 73 63 61 72 64 20 6c 69 6e 65 73 20 65 78 63 65 65 64 69 6e 67 20 48 45 | H.and.discard.lines.exceeding.HE |
| 7640 | 49 47 48 54 2e 22 0a 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 20 28 | IGHT."...(with-temp-buffer.....( |
| 7660 | 69 6e 73 65 72 74 20 73 74 72 69 6e 67 29 0a 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 | insert.string).....(goto-char.(p |
| 7680 | 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20 28 6c 65 74 20 28 28 6e 72 6f 77 20 30 29 0a 09 20 | oint-min)).....(let.((nrow.0)... |
| 76a0 | 20 72 6f 77 73 29 0a 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 61 6e 64 20 28 3c 20 6e 72 6f 77 | .rows).......(while.(and.(<.nrow |
| 76c0 | 20 68 65 69 67 68 74 29 0a 09 09 20 20 28 70 72 6f 67 32 0a 09 09 20 20 20 20 20 20 28 70 75 73 | .height).....(prog2.........(pus |
| 76e0 | 68 20 28 74 72 75 6e 63 61 74 65 2d 73 74 72 69 6e 67 2d 74 6f 2d 77 69 64 74 68 0a 09 09 09 20 | h.(truncate-string-to-width..... |
| 7700 | 20 20 20 20 28 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 20 28 70 6f 69 6e 74 29 20 28 70 | ....(buffer-substring.(point).(p |
| 7720 | 72 6f 67 6e 20 28 65 6e 64 2d 6f 66 2d 6c 69 6e 65 29 20 28 70 6f 69 6e 74 29 29 29 0a 09 09 09 | rogn.(end-of-line).(point))).... |
| 7740 | 20 20 20 20 20 77 69 64 74 68 29 0a 09 09 09 20 20 20 20 72 6f 77 73 29 0a 09 09 20 20 20 20 20 | .....width)........rows)........ |
| 7760 | 20 28 3c 20 28 70 6f 69 6e 74 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 09 09 20 20 20 20 28 | .(<.(point).(point-max)).......( |
| 7780 | 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 20 32 29 0a 09 09 20 20 20 20 28 73 65 74 71 | beginning-of-line.2).......(setq |
| 77a0 | 20 6e 72 6f 77 20 28 31 2b 20 6e 72 6f 77 29 29 29 29 29 0a 20 20 20 20 20 20 28 6d 61 70 63 6f | .nrow.(1+.nrow))))).......(mapco |
| 77c0 | 6e 63 61 74 20 27 69 64 65 6e 74 69 74 79 20 28 6e 72 65 76 65 72 73 65 20 72 6f 77 73 29 20 22 | ncat.'identity.(nreverse.rows)." |
| 77e0 | 5c 6e 22 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 6f 73 2d 74 69 70 2d 73 74 72 69 6e 67 2d 77 | \n"))))..(defun.pos-tip-string-w |
| 7800 | 69 64 74 68 2d 68 65 69 67 68 74 20 28 73 74 72 69 6e 67 29 0a 20 20 22 43 6f 75 6e 74 20 63 6f | idth-height.(string)..."Count.co |
| 7820 | 6c 75 6d 6e 73 20 61 6e 64 20 72 6f 77 73 20 6f 66 20 53 54 52 49 4e 47 2e 20 52 65 74 75 72 6e | lumns.and.rows.of.STRING..Return |
| 7840 | 20 61 20 63 6f 6e 73 20 63 65 6c 6c 20 6c 69 6b 65 20 28 57 49 44 54 48 20 2e 20 48 45 49 47 48 | .a.cons.cell.like.(WIDTH...HEIGH |
| 7860 | 54 29 2e 0a 54 68 65 20 6c 61 73 74 20 65 6d 70 74 79 20 6c 69 6e 65 20 6f 66 20 53 54 52 49 4e | T)..The.last.empty.line.of.STRIN |
| 7880 | 47 20 69 73 20 69 67 6e 6f 72 65 64 2e 0a 0a 45 78 61 6d 70 6c 65 3a 0a 0a 5c 28 70 6f 73 2d 74 | G.is.ignored...Example:..\(pos-t |
| 78a0 | 69 70 2d 73 74 72 69 6e 67 2d 77 69 64 74 68 2d 68 65 69 67 68 74 20 5c 22 61 62 63 5c 5c 6e e3 | ip-string-width-height.\"abc\\n. |
| 78c0 | 81 82 e3 81 84 e3 81 86 5c 5c 6e 31 32 33 5c 22 29 0a 3b 3b 20 3d 3e 20 28 36 20 2e 20 33 29 22 | ........\\n123\").;;.=>.(6...3)" |
| 78e0 | 0a 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 20 28 69 6e 73 65 72 74 | ...(with-temp-buffer.....(insert |
| 7900 | 20 73 74 72 69 6e 67 29 0a 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d | .string).....(goto-char.(point-m |
| 7920 | 69 6e 29 29 0a 20 20 20 20 28 65 6e 64 2d 6f 66 2d 6c 69 6e 65 29 0a 20 20 20 20 28 6c 65 74 20 | in)).....(end-of-line).....(let. |
| 7940 | 28 28 77 69 64 74 68 20 28 63 75 72 72 65 6e 74 2d 63 6f 6c 75 6d 6e 29 29 0a 09 20 20 28 68 65 | ((width.(current-column))....(he |
| 7960 | 69 67 68 74 20 28 69 66 20 28 65 71 20 28 63 68 61 72 2d 62 65 66 6f 72 65 20 28 70 6f 69 6e 74 | ight.(if.(eq.(char-before.(point |
| 7980 | 2d 6d 61 78 29 29 20 3f 5c 6e 29 20 30 20 31 29 29 29 0a 20 20 20 20 20 20 28 77 68 69 6c 65 20 | -max)).?\n).0.1))).......(while. |
| 79a0 | 28 3c 20 28 70 6f 69 6e 74 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 09 28 65 6e 64 2d 6f 66 | (<.(point).(point-max))..(end-of |
| 79c0 | 2d 6c 69 6e 65 20 32 29 0a 09 28 73 65 74 71 20 77 69 64 74 68 20 28 6d 61 78 20 28 63 75 72 72 | -line.2)..(setq.width.(max.(curr |
| 79e0 | 65 6e 74 2d 63 6f 6c 75 6d 6e 29 20 77 69 64 74 68 29 0a 09 20 20 20 20 20 20 68 65 69 67 68 74 | ent-column).width)........height |
| 7a00 | 20 28 31 2b 20 68 65 69 67 68 74 29 29 29 0a 20 20 20 20 20 20 28 63 6f 6e 73 20 77 69 64 74 68 | .(1+.height))).......(cons.width |
| 7a20 | 20 68 65 69 67 68 74 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 6f 73 2d 74 69 70 2d 78 2d 64 69 | .height))))..(defun.pos-tip-x-di |
| 7a40 | 73 70 6c 61 79 2d 77 69 64 74 68 20 28 26 6f 70 74 69 6f 6e 61 6c 20 66 72 61 6d 65 29 0a 20 20 | splay-width.(&optional.frame)... |
| 7a60 | 22 52 65 74 75 72 6e 20 6d 61 78 69 6d 75 6d 20 63 6f 6c 75 6d 6e 20 6e 75 6d 62 65 72 20 69 6e | "Return.maximum.column.number.in |
| 7a80 | 20 74 6f 6f 6c 74 69 70 20 77 68 69 63 68 20 6f 63 63 75 70 69 65 73 20 74 68 65 20 66 75 6c 6c | .tooltip.which.occupies.the.full |
| 7aa0 | 20 77 69 64 74 68 0a 6f 66 20 64 69 73 70 6c 61 79 2e 20 4f 6d 69 74 74 69 6e 67 20 46 52 41 4d | .width.of.display..Omitting.FRAM |
| 7ac0 | 45 20 6d 65 61 6e 73 20 75 73 65 20 64 69 73 70 6c 61 79 20 74 68 61 74 20 73 65 6c 65 63 74 65 | E.means.use.display.that.selecte |
| 7ae0 | 64 20 66 72 61 6d 65 20 69 73 20 69 6e 2e 22 0a 20 20 28 31 2b 20 28 2f 20 28 78 2d 64 69 73 70 | d.frame.is.in."...(1+.(/.(x-disp |
| 7b00 | 6c 61 79 2d 70 69 78 65 6c 2d 77 69 64 74 68 20 66 72 61 6d 65 29 20 28 66 72 61 6d 65 2d 63 68 | lay-pixel-width.frame).(frame-ch |
| 7b20 | 61 72 2d 77 69 64 74 68 20 66 72 61 6d 65 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 6f 73 2d 74 | ar-width.frame))))..(defun.pos-t |
| 7b40 | 69 70 2d 78 2d 64 69 73 70 6c 61 79 2d 68 65 69 67 68 74 20 28 26 6f 70 74 69 6f 6e 61 6c 20 66 | ip-x-display-height.(&optional.f |
| 7b60 | 72 61 6d 65 29 0a 20 20 22 52 65 74 75 72 6e 20 6d 61 78 69 6d 75 6d 20 72 6f 77 20 6e 75 6d 62 | rame)..."Return.maximum.row.numb |
| 7b80 | 65 72 20 69 6e 20 74 6f 6f 6c 74 69 70 20 77 68 69 63 68 20 6f 63 63 75 70 69 65 73 20 74 68 65 | er.in.tooltip.which.occupies.the |
| 7ba0 | 20 66 75 6c 6c 20 68 65 69 67 68 74 0a 6f 66 20 64 69 73 70 6c 61 79 2e 20 4f 6d 69 74 74 69 6e | .full.height.of.display..Omittin |
| 7bc0 | 67 20 46 52 41 4d 45 20 6d 65 61 6e 73 20 75 73 65 20 64 69 73 70 6c 61 79 20 74 68 61 74 20 73 | g.FRAME.means.use.display.that.s |
| 7be0 | 65 6c 65 63 74 65 64 20 66 72 61 6d 65 20 69 73 20 69 6e 2e 22 0a 20 20 28 31 2b 20 28 2f 20 28 | elected.frame.is.in."...(1+.(/.( |
| 7c00 | 78 2d 64 69 73 70 6c 61 79 2d 70 69 78 65 6c 2d 68 65 69 67 68 74 20 66 72 61 6d 65 29 20 28 66 | x-display-pixel-height.frame).(f |
| 7c20 | 72 61 6d 65 2d 63 68 61 72 2d 68 65 69 67 68 74 20 66 72 61 6d 65 29 29 29 29 0a 0a 28 64 65 66 | rame-char-height.frame))))..(def |
| 7c40 | 75 6e 20 70 6f 73 2d 74 69 70 2d 74 6f 6f 6c 74 69 70 2d 77 69 64 74 68 20 28 77 69 64 74 68 20 | un.pos-tip-tooltip-width.(width. |
| 7c60 | 63 68 61 72 2d 77 69 64 74 68 29 0a 20 20 22 43 61 6c 63 75 6c 61 74 65 20 74 6f 6f 6c 74 69 70 | char-width)..."Calculate.tooltip |
| 7c80 | 20 70 69 78 65 6c 20 77 69 64 74 68 2e 22 0a 20 20 28 2b 20 28 2a 20 77 69 64 74 68 20 63 68 61 | .pixel.width."...(+.(*.width.cha |
| 7ca0 | 72 2d 77 69 64 74 68 29 0a 20 20 20 20 20 28 61 73 68 20 28 2b 20 70 6f 73 2d 74 69 70 2d 62 6f | r-width)......(ash.(+.pos-tip-bo |
| 7cc0 | 72 64 65 72 2d 77 69 64 74 68 0a 09 20 20 20 20 20 70 6f 73 2d 74 69 70 2d 69 6e 74 65 72 6e 61 | rder-width.......pos-tip-interna |
| 7ce0 | 6c 2d 62 6f 72 64 65 72 2d 77 69 64 74 68 29 0a 09 20 20 31 29 29 29 0a 0a 28 64 65 66 75 6e 20 | l-border-width)....1)))..(defun. |
| 7d00 | 70 6f 73 2d 74 69 70 2d 74 6f 6f 6c 74 69 70 2d 68 65 69 67 68 74 20 28 68 65 69 67 68 74 20 63 | pos-tip-tooltip-height.(height.c |
| 7d20 | 68 61 72 2d 68 65 69 67 68 74 20 26 6f 70 74 69 6f 6e 61 6c 20 66 72 61 6d 65 29 0a 20 20 22 43 | har-height.&optional.frame)..."C |
| 7d40 | 61 6c 63 75 6c 61 74 65 20 74 6f 6f 6c 74 69 70 20 70 69 78 65 6c 20 68 65 69 67 68 74 2e 22 0a | alculate.tooltip.pixel.height.". |
| 7d60 | 20 20 28 6c 65 74 20 28 28 73 70 61 63 69 6e 67 20 28 6f 72 20 28 64 65 66 61 75 6c 74 2d 76 61 | ..(let.((spacing.(or.(default-va |
| 7d80 | 6c 75 65 20 27 6c 69 6e 65 2d 73 70 61 63 69 6e 67 29 0a 09 09 20 20 20 20 20 28 66 72 61 6d 65 | lue.'line-spacing)........(frame |
| 7da0 | 2d 70 61 72 61 6d 65 74 65 72 20 66 72 61 6d 65 20 27 6c 69 6e 65 2d 73 70 61 63 69 6e 67 29 29 | -parameter.frame.'line-spacing)) |
| 7dc0 | 29 29 0a 20 20 20 20 28 2b 20 28 2a 20 68 65 69 67 68 74 20 28 2b 20 63 68 61 72 2d 68 65 69 67 | )).....(+.(*.height.(+.char-heig |
| 7de0 | 68 74 0a 09 09 20 20 20 20 28 63 6f 6e 64 0a 09 09 20 20 20 20 20 28 28 69 6e 74 65 67 65 72 70 | ht.......(cond........((integerp |
| 7e00 | 20 73 70 61 63 69 6e 67 29 0a 09 09 20 20 20 20 20 20 73 70 61 63 69 6e 67 29 0a 09 09 20 20 20 | .spacing).........spacing)...... |
| 7e20 | 20 20 28 28 66 6c 6f 61 74 70 20 73 70 61 63 69 6e 67 29 0a 09 09 20 20 20 20 20 20 28 74 72 75 | ..((floatp.spacing).........(tru |
| 7e40 | 6e 63 61 74 65 20 28 2a 20 28 66 72 61 6d 65 2d 63 68 61 72 2d 68 65 69 67 68 74 20 66 72 61 6d | ncate.(*.(frame-char-height.fram |
| 7e60 | 65 29 0a 09 09 09 09 20 20 20 73 70 61 63 69 6e 67 29 29 29 0a 09 09 20 20 20 20 20 28 74 20 30 | e)........spacing)))........(t.0 |
| 7e80 | 29 29 29 29 0a 20 20 20 20 20 20 20 28 61 73 68 20 28 2b 20 70 6f 73 2d 74 69 70 2d 62 6f 72 64 | ))))........(ash.(+.pos-tip-bord |
| 7ea0 | 65 72 2d 77 69 64 74 68 0a 09 20 20 20 20 20 20 20 70 6f 73 2d 74 69 70 2d 69 6e 74 65 72 6e 61 | er-width.........pos-tip-interna |
| 7ec0 | 6c 2d 62 6f 72 64 65 72 2d 77 69 64 74 68 29 0a 09 20 20 20 20 31 29 29 29 29 0a 0a 28 64 65 66 | l-border-width)......1))))..(def |
| 7ee0 | 75 6e 20 70 6f 73 2d 74 69 70 2d 73 68 6f 77 0a 20 20 28 73 74 72 69 6e 67 20 26 6f 70 74 69 6f | un.pos-tip-show...(string.&optio |
| 7f00 | 6e 61 6c 20 74 69 70 2d 63 6f 6c 6f 72 20 70 6f 73 20 77 69 6e 64 6f 77 20 74 69 6d 65 6f 75 74 | nal.tip-color.pos.window.timeout |
| 7f20 | 20 77 69 64 74 68 20 66 72 61 6d 65 2d 63 6f 6f 72 64 69 6e 61 74 65 73 20 64 78 20 64 79 29 0a | .width.frame-coordinates.dx.dy). |
| 7f40 | 20 20 22 53 68 6f 77 20 53 54 52 49 4e 47 20 69 6e 20 61 20 74 6f 6f 6c 74 69 70 2c 20 77 68 69 | .."Show.STRING.in.a.tooltip,.whi |
| 7f60 | 63 68 20 69 73 20 61 20 73 6d 61 6c 6c 20 58 20 77 69 6e 64 6f 77 2c 20 61 74 20 50 4f 53 20 69 | ch.is.a.small.X.window,.at.POS.i |
| 7f80 | 6e 20 57 49 4e 44 4f 57 0a 75 73 69 6e 67 20 66 72 61 6d 65 27 73 20 64 65 66 61 75 6c 74 20 66 | n.WINDOW.using.frame's.default.f |
| 7fa0 | 6f 6e 74 20 77 69 74 68 20 54 49 50 2d 43 4f 4c 4f 52 2e 0a 0a 52 65 74 75 72 6e 20 70 69 78 65 | ont.with.TIP-COLOR...Return.pixe |
| 7fc0 | 6c 20 70 6f 73 69 74 69 6f 6e 20 6f 66 20 74 6f 6f 6c 74 69 70 20 72 65 6c 61 74 69 76 65 20 74 | l.position.of.tooltip.relative.t |
| 7fe0 | 6f 20 74 6f 70 20 6c 65 66 74 20 63 6f 72 6e 65 72 20 6f 66 20 66 72 61 6d 65 20 61 73 0a 61 20 | o.top.left.corner.of.frame.as.a. |
| 8000 | 63 6f 6e 73 20 63 65 6c 6c 20 6c 69 6b 65 20 28 58 20 2e 20 59 29 2e 0a 0a 54 49 50 2d 43 4f 4c | cons.cell.like.(X...Y)...TIP-COL |
| 8020 | 4f 52 20 69 73 20 61 20 66 61 63 65 20 6f 72 20 61 20 63 6f 6e 73 20 63 65 6c 6c 20 6c 69 6b 65 | OR.is.a.face.or.a.cons.cell.like |
| 8040 | 20 28 46 4f 52 45 47 52 4f 55 4e 44 2d 43 4f 4c 4f 52 20 2e 20 42 41 43 4b 47 52 4f 55 4e 44 2d | .(FOREGROUND-COLOR...BACKGROUND- |
| 8060 | 43 4f 4c 4f 52 29 0a 75 73 65 64 20 74 6f 20 73 70 65 63 69 66 79 20 2a 6f 6e 6c 79 2a 20 66 6f | COLOR).used.to.specify.*only*.fo |
| 8080 | 72 65 67 72 6f 75 6e 64 2d 63 6f 6c 6f 72 20 61 6e 64 20 62 61 63 6b 67 72 6f 75 6e 64 2d 63 6f | reground-color.and.background-co |
| 80a0 | 6c 6f 72 20 6f 66 20 74 6f 6f 6c 74 69 70 2e 20 49 66 0a 6f 6d 69 74 74 65 64 2c 20 75 73 65 20 | lor.of.tooltip..If.omitted,.use. |
| 80c0 | 60 70 6f 73 2d 74 69 70 2d 66 6f 72 65 67 72 6f 75 6e 64 2d 63 6f 6c 6f 72 27 20 61 6e 64 20 60 | `pos-tip-foreground-color'.and.` |
| 80e0 | 70 6f 73 2d 74 69 70 2d 62 61 63 6b 67 72 6f 75 6e 64 2d 63 6f 6c 6f 72 27 20 6f 72 20 74 68 65 | pos-tip-background-color'.or.the |
| 8100 | 0a 66 6f 72 65 67 72 6f 75 6e 64 20 61 6e 64 20 62 61 63 6b 67 72 6f 75 6e 64 20 63 6f 6c 6f 72 | .foreground.and.background.color |
| 8120 | 20 6f 66 20 74 68 65 20 60 74 6f 6f 6c 74 69 70 27 20 66 61 63 65 20 69 6e 73 74 65 61 64 2e 0a | .of.the.`tooltip'.face.instead.. |
| 8140 | 0a 4f 6d 69 74 74 69 6e 67 20 50 4f 53 20 61 6e 64 20 57 49 4e 44 4f 57 20 6d 65 61 6e 73 20 75 | .Omitting.POS.and.WINDOW.means.u |
| 8160 | 73 65 20 63 75 72 72 65 6e 74 20 70 6f 73 69 74 69 6f 6e 20 61 6e 64 20 73 65 6c 65 63 74 65 64 | se.current.position.and.selected |
| 8180 | 20 77 69 6e 64 6f 77 2c 0a 72 65 73 70 65 63 74 69 76 65 6c 79 2e 0a 0a 41 75 74 6f 6d 61 74 69 | .window,.respectively...Automati |
| 81a0 | 63 61 6c 6c 79 20 68 69 64 65 20 74 68 65 20 74 6f 6f 6c 74 69 70 20 61 66 74 65 72 20 54 49 4d | cally.hide.the.tooltip.after.TIM |
| 81c0 | 45 4f 55 54 20 73 65 63 6f 6e 64 73 2e 20 4f 6d 69 74 74 69 6e 67 20 54 49 4d 45 4f 55 54 20 6d | EOUT.seconds..Omitting.TIMEOUT.m |
| 81e0 | 65 61 6e 73 0a 75 73 65 20 74 68 65 20 64 65 66 61 75 6c 74 20 74 69 6d 65 6f 75 74 20 6f 66 20 | eans.use.the.default.timeout.of. |
| 8200 | 35 20 73 65 63 6f 6e 64 73 2e 20 4e 6f 6e 2d 70 6f 73 69 74 69 76 65 20 54 49 4d 45 4f 55 54 20 | 5.seconds..Non-positive.TIMEOUT. |
| 8220 | 6d 65 61 6e 73 20 64 6f 6e 27 74 20 68 69 64 65 0a 74 6f 6f 6c 74 69 70 20 61 75 74 6f 6d 61 74 | means.don't.hide.tooltip.automat |
| 8240 | 69 63 61 6c 6c 79 2e 0a 0a 57 49 44 54 48 2c 20 69 66 20 6e 6f 6e 2d 6e 69 6c 2c 20 73 70 65 63 | ically...WIDTH,.if.non-nil,.spec |
| 8260 | 69 66 69 65 73 20 74 68 65 20 77 69 64 74 68 20 6f 66 20 66 69 6c 6c 69 6e 67 20 65 61 63 68 20 | ifies.the.width.of.filling.each. |
| 8280 | 70 61 72 61 67 72 61 70 68 2e 0a 0a 49 66 20 46 52 41 4d 45 2d 43 4f 4f 52 44 49 4e 41 54 45 53 | paragraph...If.FRAME-COORDINATES |
| 82a0 | 20 69 73 20 6f 6d 69 74 74 65 64 20 6f 72 20 6e 69 6c 2c 20 61 75 74 6f 6d 61 74 69 63 61 6c 6c | .is.omitted.or.nil,.automaticall |
| 82c0 | 79 20 6f 62 74 61 69 6e 20 74 68 65 20 61 62 73 6f 6c 75 74 65 0a 63 6f 6f 72 64 69 6e 61 74 65 | y.obtain.the.absolute.coordinate |
| 82e0 | 73 20 6f 66 20 74 68 65 20 74 6f 70 20 6c 65 66 74 20 63 6f 72 6e 65 72 20 6f 66 20 66 72 61 6d | s.of.the.top.left.corner.of.fram |
| 8300 | 65 20 77 68 69 63 68 20 57 49 4e 44 4f 57 20 69 73 20 6f 6e 2e 20 48 65 72 65 2c 0a 60 74 6f 70 | e.which.WINDOW.is.on..Here,.`top |
| 8320 | 20 6c 65 66 74 20 63 6f 72 6e 65 72 20 6f 66 20 66 72 61 6d 65 27 20 72 65 70 72 65 73 65 6e 74 | .left.corner.of.frame'.represent |
| 8340 | 73 20 74 68 65 20 6f 72 69 67 69 6e 20 6f 66 20 60 77 69 6e 64 6f 77 2d 70 69 78 65 6c 2d 65 64 | s.the.origin.of.`window-pixel-ed |
| 8360 | 67 65 73 27 0a 61 6e 64 20 69 74 73 20 63 6f 6f 72 64 69 6e 61 74 65 73 20 61 72 65 20 65 73 73 | ges'.and.its.coordinates.are.ess |
| 8380 | 65 6e 74 69 61 6c 20 66 6f 72 20 63 61 6c 63 75 6c 61 74 69 6e 67 20 74 68 65 20 61 62 73 6f 6c | ential.for.calculating.the.absol |
| 83a0 | 75 74 65 20 63 6f 6f 72 64 69 6e 61 74 65 73 0a 6f 66 20 74 68 65 20 74 6f 6f 6c 74 69 70 2e 20 | ute.coordinates.of.the.tooltip.. |
| 83c0 | 49 66 20 61 20 63 6f 6e 73 20 63 65 6c 6c 20 6c 69 6b 65 20 28 4c 45 46 54 20 2e 20 54 4f 50 29 | If.a.cons.cell.like.(LEFT...TOP) |
| 83e0 | 2c 20 73 70 65 63 69 66 69 65 73 20 74 68 65 20 66 72 61 6d 65 0a 61 62 73 6f 6c 75 74 65 20 6c | ,.specifies.the.frame.absolute.l |
| 8400 | 6f 63 61 74 69 6f 6e 20 61 6e 64 20 6d 61 6b 65 73 20 74 68 65 20 63 61 6c 63 75 6c 61 74 69 6f | ocation.and.makes.the.calculatio |
| 8420 | 6e 20 73 6c 69 67 68 74 6c 79 20 66 61 73 74 65 72 2c 20 62 75 74 20 63 61 6e 20 62 65 0a 75 73 | n.slightly.faster,.but.can.be.us |
| 8440 | 65 64 20 6f 6e 6c 79 20 77 68 65 6e 20 69 74 27 73 20 63 6c 65 61 72 20 74 68 61 74 20 66 72 61 | ed.only.when.it's.clear.that.fra |
| 8460 | 6d 65 20 69 73 20 69 6e 20 74 68 65 20 73 70 65 63 69 66 69 65 64 20 70 6f 73 69 74 69 6f 6e 2e | me.is.in.the.specified.position. |
| 8480 | 20 55 73 65 72 73 0a 63 61 6e 20 67 65 74 20 74 68 65 20 6c 61 74 65 73 74 20 76 61 6c 75 65 73 | .Users.can.get.the.latest.values |
| 84a0 | 20 6f 66 20 66 72 61 6d 65 20 63 6f 6f 72 64 69 6e 61 74 65 73 20 66 6f 72 20 75 73 69 6e 67 20 | .of.frame.coordinates.for.using. |
| 84c0 | 69 6e 20 74 68 65 20 6e 65 78 74 20 63 61 6c 6c 0a 62 79 20 72 65 66 65 72 72 69 6e 67 20 74 68 | in.the.next.call.by.referring.th |
| 84e0 | 65 20 76 61 72 69 61 62 6c 65 20 60 70 6f 73 2d 74 69 70 2d 73 61 76 65 64 2d 66 72 61 6d 65 2d | e.variable.`pos-tip-saved-frame- |
| 8500 | 63 6f 6f 72 64 69 6e 61 74 65 73 27 20 6a 75 73 74 20 61 66 74 65 72 0a 63 61 6c 6c 69 6e 67 20 | coordinates'.just.after.calling. |
| 8520 | 74 68 69 73 20 66 75 6e 63 74 69 6f 6e 2e 20 4f 74 68 65 72 77 69 73 65 2c 20 46 52 41 4d 45 2d | this.function..Otherwise,.FRAME- |
| 8540 | 43 4f 4f 52 44 49 4e 41 54 45 53 20 60 72 65 6c 61 74 69 76 65 27 20 6d 65 61 6e 73 20 75 73 65 | COORDINATES.`relative'.means.use |
| 8560 | 0a 74 68 65 20 70 69 78 65 6c 20 63 6f 6f 72 64 69 6e 61 74 65 73 20 72 65 6c 61 74 69 76 65 20 | .the.pixel.coordinates.relative. |
| 8580 | 74 6f 20 74 68 65 20 74 6f 70 20 6c 65 66 74 20 63 6f 72 6e 65 72 20 6f 66 20 74 68 65 20 66 72 | to.the.top.left.corner.of.the.fr |
| 85a0 | 61 6d 65 20 66 6f 72 0a 64 69 73 70 6c 61 79 69 6e 67 20 74 68 65 20 74 6f 6f 6c 74 69 70 2e 20 | ame.for.displaying.the.tooltip.. |
| 85c0 | 54 68 69 73 20 69 73 20 74 68 65 20 73 61 6d 65 20 65 66 66 65 63 74 20 61 73 0a 60 70 6f 73 2d | This.is.the.same.effect.as.`pos- |
| 85e0 | 74 69 70 2d 75 73 65 2d 72 65 6c 61 74 69 76 65 2d 63 6f 6f 72 64 69 6e 61 74 65 73 27 20 69 73 | tip-use-relative-coordinates'.is |
| 8600 | 20 6e 6f 6e 2d 6e 69 6c 2e 0a 0a 44 58 20 73 70 65 63 69 66 69 65 73 20 68 6f 72 69 7a 6f 6e 74 | .non-nil...DX.specifies.horizont |
| 8620 | 61 6c 20 6f 66 66 73 65 74 20 69 6e 20 70 69 78 65 6c 2e 0a 0a 44 59 20 73 70 65 63 69 66 69 65 | al.offset.in.pixel...DY.specifie |
| 8640 | 73 20 76 65 72 74 69 63 61 6c 20 6f 66 66 73 65 74 20 69 6e 20 70 69 78 65 6c 2e 20 54 68 69 73 | s.vertical.offset.in.pixel..This |
| 8660 | 20 6d 61 6b 65 73 20 74 68 65 20 63 61 6c 63 75 6c 61 74 69 6f 6e 73 20 64 6f 6e 65 0a 77 69 74 | .makes.the.calculations.done.wit |
| 8680 | 68 6f 75 74 20 63 6f 6e 73 69 64 65 72 69 6e 67 20 74 68 65 20 68 65 69 67 68 74 20 6f 66 20 6f | hout.considering.the.height.of.o |
| 86a0 | 62 6a 65 63 74 20 61 74 20 50 4f 53 2c 20 73 6f 20 74 68 65 20 6f 62 6a 65 63 74 20 6d 69 67 68 | bject.at.POS,.so.the.object.migh |
| 86c0 | 74 20 62 65 0a 68 69 64 64 65 6e 20 62 79 20 74 68 65 20 74 6f 6f 6c 74 69 70 2e 0a 0a 53 65 65 | t.be.hidden.by.the.tooltip...See |
| 86e0 | 20 61 6c 73 6f 20 60 70 6f 73 2d 74 69 70 2d 73 68 6f 77 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 7a | .also.`pos-tip-show-no-propertiz |
| 8700 | 65 27 2e 22 0a 20 20 28 75 6e 6c 65 73 73 20 77 69 6e 64 6f 77 0a 20 20 20 20 28 73 65 74 71 20 | e'."...(unless.window.....(setq. |
| 8720 | 77 69 6e 64 6f 77 20 28 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 29 29 29 0a 20 20 28 6c 65 | window.(selected-window)))...(le |
| 8740 | 74 2a 20 28 28 66 72 61 6d 65 20 28 77 69 6e 64 6f 77 2d 66 72 61 6d 65 20 77 69 6e 64 6f 77 29 | t*.((frame.(window-frame.window) |
| 8760 | 29 0a 09 20 28 6d 61 78 2d 77 69 64 74 68 20 28 70 6f 73 2d 74 69 70 2d 78 2d 64 69 73 70 6c 61 | )...(max-width.(pos-tip-x-displa |
| 8780 | 79 2d 77 69 64 74 68 20 66 72 61 6d 65 29 29 0a 09 20 28 6d 61 78 2d 68 65 69 67 68 74 20 28 70 | y-width.frame))...(max-height.(p |
| 87a0 | 6f 73 2d 74 69 70 2d 78 2d 64 69 73 70 6c 61 79 2d 68 65 69 67 68 74 20 66 72 61 6d 65 29 29 0a | os-tip-x-display-height.frame)). |
| 87c0 | 09 20 28 77 2d 68 20 28 70 6f 73 2d 74 69 70 2d 73 74 72 69 6e 67 2d 77 69 64 74 68 2d 68 65 69 | ..(w-h.(pos-tip-string-width-hei |
| 87e0 | 67 68 74 20 73 74 72 69 6e 67 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 67 20 28 70 6f 73 2d 74 | ght.string))..........(fg.(pos-t |
| 8800 | 69 70 2d 63 6f 6d 70 75 74 65 2d 66 6f 72 65 67 72 6f 75 6e 64 2d 63 6f 6c 6f 72 20 74 69 70 2d | ip-compute-foreground-color.tip- |
| 8820 | 63 6f 6c 6f 72 29 29 0a 20 20 20 20 20 20 20 20 20 28 62 67 20 28 70 6f 73 2d 74 69 70 2d 63 6f | color))..........(bg.(pos-tip-co |
| 8840 | 6d 70 75 74 65 2d 62 61 63 6b 67 72 6f 75 6e 64 2d 63 6f 6c 6f 72 20 74 69 70 2d 63 6f 6c 6f 72 | mpute-background-color.tip-color |
| 8860 | 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 72 61 6d 65 2d 66 6f 6e 74 20 28 66 61 63 65 2d 61 74 | ))..........(frame-font.(face-at |
| 8880 | 74 72 69 62 75 74 65 20 27 64 65 66 61 75 6c 74 20 3a 66 6f 6e 74 20 66 72 61 6d 65 29 29 0a 20 | tribute.'default.:font.frame)).. |
| 88a0 | 20 20 20 20 20 20 20 20 28 74 69 70 2d 66 61 63 65 2d 61 74 74 72 73 20 28 6c 69 73 74 20 3a 66 | ........(tip-face-attrs.(list.:f |
| 88c0 | 6f 6e 74 20 66 72 61 6d 65 2d 66 6f 6e 74 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 66 67 20 3a 62 | ont.frame-font.:foreground.fg.:b |
| 88e0 | 61 63 6b 67 72 6f 75 6e 64 20 62 67 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 28 | ackground.bg))).....(cond......( |
| 8900 | 28 61 6e 64 20 77 69 64 74 68 0a 09 20 20 20 28 3e 20 28 63 61 72 20 77 2d 68 29 20 77 69 64 74 | (and.width.....(>.(car.w-h).widt |
| 8920 | 68 29 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 73 74 72 69 6e 67 20 28 70 6f 73 2d 74 69 70 2d | h)).......(setq.string.(pos-tip- |
| 8940 | 66 69 6c 6c 2d 73 74 72 69 6e 67 20 73 74 72 69 6e 67 20 77 69 64 74 68 20 6e 69 6c 20 27 6e 6f | fill-string.string.width.nil.'no |
| 8960 | 6e 65 20 6e 69 6c 20 6d 61 78 2d 68 65 69 67 68 74 29 0a 09 20 20 20 20 77 2d 68 20 28 70 6f 73 | ne.nil.max-height)......w-h.(pos |
| 8980 | 2d 74 69 70 2d 73 74 72 69 6e 67 2d 77 69 64 74 68 2d 68 65 69 67 68 74 20 73 74 72 69 6e 67 29 | -tip-string-width-height.string) |
| 89a0 | 29 29 0a 20 20 20 20 20 28 28 6f 72 20 28 3e 20 28 63 61 72 20 77 2d 68 29 20 6d 61 78 2d 77 69 | ))......((or.(>.(car.w-h).max-wi |
| 89c0 | 64 74 68 29 0a 09 20 20 28 3e 20 28 63 64 72 20 77 2d 68 29 20 6d 61 78 2d 68 65 69 67 68 74 29 | dth)....(>.(cdr.w-h).max-height) |
| 89e0 | 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 73 74 72 69 6e 67 20 28 70 6f 73 2d 74 69 70 2d 74 72 | ).......(setq.string.(pos-tip-tr |
| 8a00 | 75 6e 63 61 74 65 2d 73 74 72 69 6e 67 20 73 74 72 69 6e 67 20 6d 61 78 2d 77 69 64 74 68 20 6d | uncate-string.string.max-width.m |
| 8a20 | 61 78 2d 68 65 69 67 68 74 29 0a 09 20 20 20 20 77 2d 68 20 28 70 6f 73 2d 74 69 70 2d 73 74 72 | ax-height)......w-h.(pos-tip-str |
| 8a40 | 69 6e 67 2d 77 69 64 74 68 2d 68 65 69 67 68 74 20 73 74 72 69 6e 67 29 29 29 29 0a 20 20 20 20 | ing-width-height.string))))..... |
| 8a60 | 28 70 6f 73 2d 74 69 70 2d 73 68 6f 77 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 7a 65 0a 20 20 20 20 | (pos-tip-show-no-propertize..... |
| 8a80 | 20 28 70 72 6f 70 65 72 74 69 7a 65 20 73 74 72 69 6e 67 20 27 66 61 63 65 20 74 69 70 2d 66 61 | .(propertize.string.'face.tip-fa |
| 8aa0 | 63 65 2d 61 74 74 72 73 29 0a 20 20 20 20 20 74 69 70 2d 63 6f 6c 6f 72 20 70 6f 73 20 77 69 6e | ce-attrs)......tip-color.pos.win |
| 8ac0 | 64 6f 77 20 74 69 6d 65 6f 75 74 0a 20 20 20 20 20 28 70 6f 73 2d 74 69 70 2d 74 6f 6f 6c 74 69 | dow.timeout......(pos-tip-toolti |
| 8ae0 | 70 2d 77 69 64 74 68 20 28 63 61 72 20 77 2d 68 29 20 28 66 72 61 6d 65 2d 63 68 61 72 2d 77 69 | p-width.(car.w-h).(frame-char-wi |
| 8b00 | 64 74 68 20 66 72 61 6d 65 29 29 0a 20 20 20 20 20 28 70 6f 73 2d 74 69 70 2d 74 6f 6f 6c 74 69 | dth.frame))......(pos-tip-toolti |
| 8b20 | 70 2d 68 65 69 67 68 74 20 28 63 64 72 20 77 2d 68 29 20 28 66 72 61 6d 65 2d 63 68 61 72 2d 68 | p-height.(cdr.w-h).(frame-char-h |
| 8b40 | 65 69 67 68 74 20 66 72 61 6d 65 29 20 66 72 61 6d 65 29 0a 20 20 20 20 20 66 72 61 6d 65 2d 63 | eight.frame).frame)......frame-c |
| 8b60 | 6f 6f 72 64 69 6e 61 74 65 73 20 64 78 20 64 79 29 29 29 0a 0a 28 64 65 66 61 6c 69 61 73 20 27 | oordinates.dx.dy)))..(defalias.' |
| 8b80 | 70 6f 73 2d 74 69 70 2d 68 69 64 65 20 27 78 2d 68 69 64 65 2d 74 69 70 0a 20 20 22 48 69 64 65 | pos-tip-hide.'x-hide-tip..."Hide |
| 8ba0 | 20 70 6f 73 2d 74 69 70 27 73 20 74 6f 6f 6c 74 69 70 2e 22 29 0a 0a 28 64 65 66 75 6e 20 70 6f | .pos-tip's.tooltip.")..(defun.po |
| 8bc0 | 73 2d 74 69 70 2d 63 61 6c 69 62 72 61 74 65 2d 66 72 61 6d 65 2d 6f 66 66 73 65 74 20 28 26 6f | s-tip-calibrate-frame-offset.(&o |
| 8be0 | 70 74 69 6f 6e 61 6c 20 66 72 61 6d 65 29 0a 20 20 22 52 65 74 75 72 6e 20 63 6f 6f 72 64 69 6e | ptional.frame)..."Return.coordin |
| 8c00 | 61 74 65 73 20 6f 66 20 46 52 41 4d 45 20 6f 72 69 67 69 6e 20 72 65 6c 61 74 69 76 65 20 74 6f | ates.of.FRAME.origin.relative.to |
| 8c20 | 20 74 68 65 20 74 6f 70 20 6c 65 66 74 20 63 6f 72 6e 65 72 20 6f 66 0a 74 68 65 20 46 52 41 4d | .the.top.left.corner.of.the.FRAM |
| 8c40 | 45 20 65 78 74 65 6e 74 2c 20 6c 69 6b 65 20 28 4c 45 46 54 20 2e 20 54 4f 50 29 2e 20 54 68 65 | E.extent,.like.(LEFT...TOP)..The |
| 8c60 | 20 72 65 74 75 72 6e 20 76 61 6c 75 65 20 69 73 20 72 65 63 6f 72 64 65 64 20 74 6f 0a 60 70 6f | .return.value.is.recorded.to.`po |
| 8c80 | 73 2d 74 69 70 2d 66 72 61 6d 65 2d 6f 66 66 73 65 74 27 2e 0a 0a 4e 6f 74 65 20 74 68 61 74 20 | s-tip-frame-offset'...Note.that. |
| 8ca0 | 74 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 64 6f 65 73 6e 27 74 20 63 6f 72 72 65 63 74 6c 79 20 | this.function.doesn't.correctly. |
| 8cc0 | 77 6f 72 6b 20 66 6f 72 20 58 20 66 72 61 6d 65 20 61 6e 64 20 45 6d 61 63 73 20 32 32 2e 22 0a | work.for.X.frame.and.Emacs.22.". |
| 8ce0 | 20 20 28 73 65 74 71 20 70 6f 73 2d 74 69 70 2d 66 72 61 6d 65 2d 6f 66 66 73 65 74 20 6e 69 6c | ..(setq.pos-tip-frame-offset.nil |
| 8d00 | 29 0a 20 20 28 6c 65 74 2a 20 28 28 77 69 6e 64 6f 77 20 28 66 72 61 6d 65 2d 66 69 72 73 74 2d | )...(let*.((window.(frame-first- |
| 8d20 | 77 69 6e 64 6f 77 20 66 72 61 6d 65 29 29 0a 09 20 28 64 65 6c 65 74 65 2d 66 72 61 6d 65 2d 66 | window.frame))...(delete-frame-f |
| 8d40 | 75 6e 63 74 69 6f 6e 73 0a 09 20 20 27 28 28 6c 61 6d 62 64 61 20 28 66 72 61 6d 65 29 0a 09 20 | unctions....'((lambda.(frame)... |
| 8d60 | 20 20 20 20 20 28 69 66 20 28 65 71 75 61 6c 20 28 66 72 61 6d 65 2d 70 61 72 61 6d 65 74 65 72 | .....(if.(equal.(frame-parameter |
| 8d80 | 20 66 72 61 6d 65 20 27 6e 61 6d 65 29 20 22 74 6f 6f 6c 74 69 70 22 29 0a 09 09 20 20 28 73 65 | .frame.'name)."tooltip").....(se |
| 8da0 | 74 71 20 70 6f 73 2d 74 69 70 2d 66 72 61 6d 65 2d 6f 66 66 73 65 74 0a 09 09 09 28 63 6f 6e 73 | tq.pos-tip-frame-offset....(cons |
| 8dc0 | 20 28 65 76 61 6c 20 28 66 72 61 6d 65 2d 70 61 72 61 6d 65 74 65 72 20 66 72 61 6d 65 20 27 6c | .(eval.(frame-parameter.frame.'l |
| 8de0 | 65 66 74 29 29 0a 09 09 09 20 20 20 20 20 20 28 65 76 61 6c 20 28 66 72 61 6d 65 2d 70 61 72 61 | eft))..........(eval.(frame-para |
| 8e00 | 6d 65 74 65 72 20 66 72 61 6d 65 20 27 74 6f 70 29 29 29 29 29 29 29 29 0a 09 20 28 70 6f 73 2d | meter.frame.'top))))))))...(pos- |
| 8e20 | 74 69 70 2d 62 6f 72 64 65 72 2d 77 69 64 74 68 20 30 29 0a 09 20 28 70 6f 73 2d 74 69 70 2d 69 | tip-border-width.0)...(pos-tip-i |
| 8e40 | 6e 74 65 72 6e 61 6c 2d 62 6f 72 64 65 72 2d 77 69 64 74 68 20 31 29 0a 09 20 28 72 70 6f 73 20 | nternal-border-width.1)...(rpos. |
| 8e60 | 28 70 6f 73 2d 74 69 70 2d 73 68 6f 77 20 22 22 0a 09 09 09 20 20 20 20 20 60 28 6e 69 6c 20 2e | (pos-tip-show."".........`(nil.. |
| 8e80 | 20 2c 28 66 72 61 6d 65 2d 70 61 72 61 6d 65 74 65 72 20 66 72 61 6d 65 20 27 62 61 63 6b 67 72 | .,(frame-parameter.frame.'backgr |
| 8ea0 | 6f 75 6e 64 2d 63 6f 6c 6f 72 29 29 0a 09 09 09 20 20 20 20 20 28 77 69 6e 64 6f 77 2d 73 74 61 | ound-color)).........(window-sta |
| 8ec0 | 72 74 20 77 69 6e 64 6f 77 29 20 77 69 6e 64 6f 77 0a 09 09 09 20 20 20 20 20 6e 69 6c 20 6e 69 | rt.window).window.........nil.ni |
| 8ee0 | 6c 20 27 72 65 6c 61 74 69 76 65 20 6e 69 6c 20 30 29 29 29 0a 20 20 20 20 28 73 69 74 2d 66 6f | l.'relative.nil.0))).....(sit-fo |
| 8f00 | 72 20 30 29 0a 20 20 20 20 28 70 6f 73 2d 74 69 70 2d 68 69 64 65 29 0a 20 20 20 20 28 61 6e 64 | r.0).....(pos-tip-hide).....(and |
| 8f20 | 20 70 6f 73 2d 74 69 70 2d 66 72 61 6d 65 2d 6f 66 66 73 65 74 0a 09 20 28 73 65 74 71 20 70 6f | .pos-tip-frame-offset...(setq.po |
| 8f40 | 73 2d 74 69 70 2d 66 72 61 6d 65 2d 6f 66 66 73 65 74 0a 09 20 20 20 20 20 20 20 28 63 6f 6e 73 | s-tip-frame-offset.........(cons |
| 8f60 | 20 28 2d 20 28 63 61 72 20 70 6f 73 2d 74 69 70 2d 66 72 61 6d 65 2d 6f 66 66 73 65 74 29 0a 09 | .(-.(car.pos-tip-frame-offset).. |
| 8f80 | 09 09 28 63 61 72 20 72 70 6f 73 29 0a 09 09 09 28 65 76 61 6c 20 28 66 72 61 6d 65 2d 70 61 72 | ..(car.rpos)....(eval.(frame-par |
| 8fa0 | 61 6d 65 74 65 72 20 66 72 61 6d 65 20 27 6c 65 66 74 29 29 29 0a 09 09 20 20 20 20 20 28 2d 20 | ameter.frame.'left)))........(-. |
| 8fc0 | 28 63 64 72 20 70 6f 73 2d 74 69 70 2d 66 72 61 6d 65 2d 6f 66 66 73 65 74 29 0a 09 09 09 28 63 | (cdr.pos-tip-frame-offset)....(c |
| 8fe0 | 64 72 20 72 70 6f 73 29 0a 09 09 09 28 65 76 61 6c 20 28 66 72 61 6d 65 2d 70 61 72 61 6d 65 74 | dr.rpos)....(eval.(frame-paramet |
| 9000 | 65 72 20 66 72 61 6d 65 20 27 74 6f 70 29 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 6f | er.frame.'top))))))))..(defun.po |
| 9020 | 73 2d 74 69 70 2d 77 33 32 2d 6d 61 78 2d 77 69 64 74 68 2d 68 65 69 67 68 74 20 28 26 6f 70 74 | s-tip-w32-max-width-height.(&opt |
| 9040 | 69 6f 6e 61 6c 20 6b 65 65 70 2d 6d 61 78 69 6d 69 7a 65 29 0a 20 20 22 4d 61 78 69 6d 69 7a 65 | ional.keep-maximize)..."Maximize |
| 9060 | 20 74 68 65 20 63 75 72 72 65 6e 74 6c 79 20 73 65 6c 65 63 74 65 64 20 66 72 61 6d 65 20 74 65 | .the.currently.selected.frame.te |
| 9080 | 6d 70 6f 72 61 72 69 6c 79 20 61 6e 64 20 73 65 74 0a 60 70 6f 73 2d 74 69 70 2d 77 33 32 2d 73 | mporarily.and.set.`pos-tip-w32-s |
| 90a0 | 61 76 65 64 2d 6d 61 78 2d 77 69 64 74 68 2d 68 65 69 67 68 74 27 20 74 68 65 20 65 66 66 65 63 | aved-max-width-height'.the.effec |
| 90c0 | 74 69 76 65 20 64 69 73 70 6c 61 79 20 73 69 7a 65 20 69 6e 20 6f 72 64 65 72 0a 74 6f 20 62 65 | tive.display.size.in.order.to.be |
| 90e0 | 63 6f 6d 65 20 70 6f 73 73 69 62 6c 65 20 74 6f 20 63 61 6c 63 75 6c 61 74 65 20 74 68 65 20 61 | come.possible.to.calculate.the.a |
| 9100 | 62 73 6f 6c 75 74 65 20 6c 6f 63 61 74 69 6f 6e 20 6f 66 20 74 6f 6f 6c 74 69 70 2e 0a 0a 4b 45 | bsolute.location.of.tooltip...KE |
| 9120 | 45 50 2d 4d 41 58 49 4d 49 5a 45 20 6e 6f 6e 2d 6e 69 6c 20 6d 65 61 6e 73 20 6c 65 61 76 65 20 | EP-MAXIMIZE.non-nil.means.leave. |
| 9140 | 74 68 65 20 66 72 61 6d 65 20 6d 61 78 69 6d 69 7a 65 64 2e 0a 0a 4e 6f 74 65 20 74 68 61 74 20 | the.frame.maximized...Note.that. |
| 9160 | 74 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 75 73 61 62 6c 65 20 6f 6e 6c 79 20 69 6e 20 | this.function.is.usable.only.in. |
| 9180 | 45 6d 61 63 73 20 32 33 20 66 6f 72 20 4d 53 2d 57 69 6e 64 6f 77 73 2e 22 0a 20 20 28 69 6e 74 | Emacs.23.for.MS-Windows."...(int |
| 91a0 | 65 72 61 63 74 69 76 65 29 0a 20 20 28 75 6e 6c 65 73 73 20 28 65 71 20 77 69 6e 64 6f 77 2d 73 | eractive)...(unless.(eq.window-s |
| 91c0 | 79 73 74 65 6d 20 27 77 33 32 29 0a 20 20 20 20 28 65 72 72 6f 72 20 22 60 70 6f 73 2d 74 69 70 | ystem.'w32).....(error."`pos-tip |
| 91e0 | 2d 77 33 32 2d 6d 61 78 2d 77 69 64 74 68 2d 68 65 69 67 68 74 27 20 63 61 6e 20 62 65 20 75 73 | -w32-max-width-height'.can.be.us |
| 9200 | 65 64 20 6f 6e 6c 79 20 69 6e 20 77 33 32 20 66 72 61 6d 65 2e 22 29 29 0a 20 20 3b 3b 20 4d 61 | ed.only.in.w32.frame."))...;;.Ma |
| 9220 | 78 69 6d 69 7a 65 20 66 72 61 6d 65 0a 20 20 28 77 69 74 68 2d 6e 6f 2d 77 61 72 6e 69 6e 67 73 | ximize.frame...(with-no-warnings |
| 9240 | 20 28 77 33 32 2d 73 65 6e 64 2d 73 79 73 2d 63 6f 6d 6d 61 6e 64 20 36 31 34 38 38 29 29 0a 20 | .(w32-send-sys-command.61488)).. |
| 9260 | 20 28 73 69 74 2d 66 6f 72 20 30 29 0a 20 20 28 6c 65 74 20 28 28 6f 66 66 73 65 74 20 28 70 6f | .(sit-for.0)...(let.((offset.(po |
| 9280 | 73 2d 74 69 70 2d 63 61 6c 69 62 72 61 74 65 2d 66 72 61 6d 65 2d 6f 66 66 73 65 74 29 29 29 0a | s-tip-calibrate-frame-offset))). |
| 92a0 | 20 20 20 20 28 70 72 6f 67 31 0a 09 28 73 65 74 71 20 70 6f 73 2d 74 69 70 2d 77 33 32 2d 73 61 | ....(prog1..(setq.pos-tip-w32-sa |
| 92c0 | 76 65 64 2d 6d 61 78 2d 77 69 64 74 68 2d 68 65 69 67 68 74 0a 09 20 20 20 20 20 20 28 63 6f 6e | ved-max-width-height........(con |
| 92e0 | 73 20 28 66 72 61 6d 65 2d 70 69 78 65 6c 2d 77 69 64 74 68 29 0a 09 09 20 20 20 20 28 2b 20 28 | s.(frame-pixel-width).......(+.( |
| 9300 | 66 72 61 6d 65 2d 70 69 78 65 6c 2d 68 65 69 67 68 74 29 0a 09 09 20 20 20 20 20 20 20 28 2d 20 | frame-pixel-height)..........(-. |
| 9320 | 28 63 64 72 20 6f 66 66 73 65 74 29 20 28 63 61 72 20 6f 66 66 73 65 74 29 29 29 29 29 0a 20 20 | (cdr.offset).(car.offset)))))... |
| 9340 | 20 20 20 20 28 69 66 20 28 63 61 6c 6c 65 64 2d 69 6e 74 65 72 61 63 74 69 76 65 6c 79 2d 70 20 | ....(if.(called-interactively-p. |
| 9360 | 27 69 6e 74 65 72 61 63 74 69 76 65 29 0a 09 20 20 28 6d 65 73 73 61 67 65 20 22 25 53 22 20 70 | 'interactive)....(message."%S".p |
| 9380 | 6f 73 2d 74 69 70 2d 77 33 32 2d 73 61 76 65 64 2d 6d 61 78 2d 77 69 64 74 68 2d 68 65 69 67 68 | os-tip-w32-saved-max-width-heigh |
| 93a0 | 74 29 29 0a 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 6b 65 65 70 2d 6d 61 78 69 6d 69 7a 65 0a | t)).......(unless.keep-maximize. |
| 93c0 | 09 3b 3b 20 52 65 73 74 6f 72 65 20 66 72 61 6d 65 0a 09 28 77 69 74 68 2d 6e 6f 2d 77 61 72 6e | .;;.Restore.frame..(with-no-warn |
| 93e0 | 69 6e 67 73 20 28 77 33 32 2d 73 65 6e 64 2d 73 79 73 2d 63 6f 6d 6d 61 6e 64 20 36 31 37 32 38 | ings.(w32-send-sys-command.61728 |
| 9400 | 29 29 29 29 29 29 0a 0a 0a 28 70 72 6f 76 69 64 65 20 27 70 6f 73 2d 74 69 70 29 0a 0a 3b 3b 3b | ))))))...(provide.'pos-tip)..;;; |
| 9420 | 0a 3b 3b 3b 20 70 6f 73 2d 74 69 70 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 | .;;;.pos-tip.el.ends.here....... |
| 9440 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9460 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9480 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 94a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 94c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 94e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9500 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9520 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9540 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9560 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9580 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 95a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 95c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 95e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9600 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9620 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9640 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9660 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9680 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 96a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 96c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 96e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9700 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9720 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9740 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9760 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9780 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 97a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 97c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 97e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9800 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9820 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9840 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9860 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9880 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 98a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 98c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 98e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9900 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9920 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9940 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9960 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9980 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 99a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 99c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 99e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9a00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9a20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9a40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9a60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9a80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9aa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9ac0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9ae0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9b00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9b20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9b40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9b60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9b80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9ba0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9bc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9be0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9c00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9c20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9c40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9c60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9c80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9ca0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9cc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9ce0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9d00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9d20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9d40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9d60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9d80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9da0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9dc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9de0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9e00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9e20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9e40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9e60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9e80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9ea0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9ec0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9ee0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9f00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9f20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9f40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9f60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9f80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9fa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9fc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 9fe0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |