| 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 33 36 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 30 32 37 00 20 30 00 00 00 | 0000436.00000000000.015027..0... |
| 02a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 02c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 02e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0300 | 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .ustar...root................... |
| 0320 | 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .........root................... |
| 0340 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0360 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0380 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 03a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 03c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 03e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0400 | 28 64 65 66 69 6e 65 2d 70 61 63 6b 61 67 65 20 22 70 6f 73 2d 74 69 70 22 20 22 32 30 32 34 30 | (define-package."pos-tip"."20240 |
| 0420 | 32 30 39 2e 38 33 37 22 20 22 53 68 6f 77 20 74 6f 6f 6c 74 69 70 20 61 74 20 70 6f 69 6e 74 22 | 209.837"."Show.tooltip.at.point" |
| 0440 | 20 27 6e 69 6c 20 3a 63 6f 6d 6d 69 74 20 22 34 38 38 39 65 30 38 63 66 39 30 37 37 63 38 35 38 | .'nil.:commit."4889e08cf9077c858 |
| 0460 | 39 65 61 36 66 65 61 34 65 32 63 65 35 35 38 36 31 34 64 66 63 64 65 22 20 3a 61 75 74 68 6f 72 | 9ea6fea4e2ce558614dfcde".:author |
| 0480 | 73 0a 20 20 27 28 28 22 53 2e 20 49 72 69 65 22 29 29 0a 20 20 3a 6d 61 69 6e 74 61 69 6e 65 72 | s...'(("S..Irie"))...:maintainer |
| 04a0 | 73 0a 20 20 27 28 28 22 53 2e 20 49 72 69 65 22 29 29 0a 20 20 3a 6d 61 69 6e 74 61 69 6e 65 72 | s...'(("S..Irie"))...:maintainer |
| 04c0 | 0a 20 20 27 28 22 53 2e 20 49 72 69 65 22 29 0a 20 20 3a 6b 65 79 77 6f 72 64 73 0a 20 20 27 28 | ...'("S..Irie")...:keywords...'( |
| 04e0 | 22 74 6f 6f 6c 74 69 70 22 29 29 0a 3b 3b 20 4c 6f 63 61 6c 20 56 61 72 69 61 62 6c 65 73 3a 0a | "tooltip")).;;.Local.Variables:. |
| 0500 | 3b 3b 20 6e 6f 2d 62 79 74 65 2d 63 6f 6d 70 69 6c 65 3a 20 74 0a 3b 3b 20 45 6e 64 3a 0a 00 00 | ;;.no-byte-compile:.t.;;.End:... |
| 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 32 31 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 32 34 35 00 20 30 00 00 00 | 0106021.00000000000.014245..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 30 2e 34 2e 37 0a 0a 28 64 65 66 63 6f | ;.Package-Version:.0.4.7..(defco |
| 08c0 | 6e 73 74 20 70 6f 73 2d 74 69 70 2d 76 65 72 73 69 6f 6e 20 22 30 2e 34 2e 37 22 29 0a 0a 3b 3b | nst.pos-tip-version."0.4.7")..;; |
| 08e0 | 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3b 20 | .This.program.is.free.software;. |
| 0900 | 79 6f 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 0a 3b | you.can.redistribute.it.and/or.; |
| 0920 | 3b 20 6d 6f 64 69 66 79 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 | ;.modify.it.under.the.terms.of.t |
| 0940 | 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 | he.GNU.General.Public.License.as |
| 0960 | 0a 3b 3b 20 70 75 62 6c 69 73 68 65 64 20 62 79 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 | .;;.published.by.the.Free.Softwa |
| 0980 | 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 3b 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 32 2c | re.Foundation;.either.version.2, |
| 09a0 | 20 6f 72 0a 3b 3b 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f 6e 29 20 61 6e 79 20 6c 61 74 65 | .or.;;.(at.your.option).any.late |
| 09c0 | 72 20 76 65 72 73 69 6f 6e 2e 0a 0a 3b 3b 20 49 74 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 | r.version...;;.It.is.distributed |
| 09e0 | 20 69 6e 20 74 68 65 20 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 | .in.the.hope.that.it.will.be.use |
| 0a00 | 66 75 6c 2c 20 62 75 74 20 57 49 54 48 4f 55 54 0a 3b 3b 20 41 4e 59 20 57 41 52 52 41 4e 54 59 | ful,.but.WITHOUT.;;.ANY.WARRANTY |
| 0a20 | 3b 20 77 69 74 68 6f 75 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 | ;.without.even.the.implied.warra |
| 0a40 | 6e 74 79 20 6f 66 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 0a 3b 3b 20 6f 72 20 46 49 54 | nty.of.MERCHANTABILITY.;;.or.FIT |
| 0a60 | 4e 45 53 53 20 46 4f 52 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 | NESS.FOR.A.PARTICULAR.PURPOSE... |
| 0a80 | 53 65 65 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 3b 20 4c 69 | See.the.GNU.General.Public.;;.Li |
| 0aa0 | 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 0a 3b 3b 20 59 6f 75 20 | cense.for.more.details...;;.You. |
| 0ac0 | 73 68 6f 75 6c 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 | should.have.received.a.copy.of.t |
| 0ae0 | 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 0a 3b 3b 20 4c 69 63 65 6e 73 65 | he.GNU.General.Public.;;.License |
| 0b00 | 20 61 6c 6f 6e 67 20 77 69 74 68 20 74 68 69 73 20 70 72 6f 67 72 61 6d 3b 20 69 66 20 6e 6f 74 | .along.with.this.program;.if.not |
| 0b20 | 2c 20 77 72 69 74 65 20 74 6f 20 74 68 65 20 46 72 65 65 0a 3b 3b 20 53 6f 66 74 77 61 72 65 20 | ,.write.to.the.Free.;;.Software. |
| 0b40 | 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 49 6e 63 2e 2c 20 35 31 20 46 72 61 6e 6b 6c 69 6e 20 53 74 | Foundation,.Inc.,.51.Franklin.St |
| 0b60 | 2c 20 46 69 66 74 68 20 46 6c 6f 6f 72 2c 20 42 6f 73 74 6f 6e 2c 0a 3b 3b 20 4d 41 20 20 30 32 | ,.Fifth.Floor,.Boston,.;;.MA..02 |
| 0b80 | 31 31 30 2d 31 33 30 31 20 55 53 41 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b | 110-1301.USA..;;;.Commentary:..; |
| 0ba0 | 3b 20 54 68 65 20 73 74 61 6e 64 61 72 64 20 6c 69 62 72 61 72 79 20 74 6f 6f 6c 74 69 70 2e 65 | ;.The.standard.library.tooltip.e |
| 0bc0 | 6c 20 70 72 6f 76 69 64 65 73 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 20 66 6f 72 20 64 69 73 70 | l.provides.the.function.for.disp |
| 0be0 | 6c 61 79 69 6e 67 0a 3b 3b 20 61 20 74 6f 6f 6c 74 69 70 20 61 74 20 6d 6f 75 73 65 20 70 6f 73 | laying.;;.a.tooltip.at.mouse.pos |
| 0c00 | 69 74 69 6f 6e 20 77 68 69 63 68 20 61 6c 6c 6f 77 73 20 75 73 65 72 73 20 74 6f 20 65 61 73 69 | ition.which.allows.users.to.easi |
| 0c20 | 6c 79 20 73 68 6f 77 20 69 74 2e 0a 3b 3b 20 48 6f 77 65 76 65 72 2c 20 6c 6f 63 61 74 69 6e 67 | ly.show.it..;;.However,.locating |
| 0c40 | 20 74 6f 6f 6c 74 69 70 20 61 74 20 61 72 62 69 74 72 61 72 79 20 62 75 66 66 65 72 20 70 6f 73 | .tooltip.at.arbitrary.buffer.pos |
| 0c60 | 69 74 69 6f 6e 20 69 6e 20 77 69 6e 64 6f 77 0a 3b 3b 20 69 73 20 6e 6f 74 20 65 61 73 79 2e 20 | ition.in.window.;;.is.not.easy.. |
| 0c80 | 54 68 69 73 20 70 72 6f 67 72 61 6d 20 70 72 6f 76 69 64 65 73 20 73 75 63 68 20 66 75 6e 63 74 | This.program.provides.such.funct |
| 0ca0 | 69 6f 6e 20 74 6f 20 62 65 20 75 73 65 64 20 62 79 20 6f 74 68 65 72 0a 3b 3b 20 66 72 6f 6e 74 | ion.to.be.used.by.other.;;.front |
| 0cc0 | 65 6e 64 20 70 72 6f 67 72 61 6d 73 2e 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 | end.programs...;;.This.program.i |
| 0ce0 | 73 20 74 65 73 74 65 64 20 6f 6e 20 47 4e 55 20 45 6d 61 63 73 20 32 32 2c 20 32 33 20 75 6e 64 | s.tested.on.GNU.Emacs.22,.23.und |
| 0d00 | 65 72 20 58 20 77 69 6e 64 6f 77 20 73 79 73 74 65 6d 20 61 6e 64 0a 3b 3b 20 45 6d 61 63 73 20 | er.X.window.system.and.;;.Emacs. |
| 0d20 | 32 33 20 66 6f 72 20 4d 53 2d 57 69 6e 64 6f 77 73 2e 0a 0a 3b 3b 0a 3b 3b 20 49 6e 73 74 61 6c | 23.for.MS-Windows...;;.;;.Instal |
| 0d40 | 6c 61 74 69 6f 6e 3a 0a 3b 3b 0a 3b 3b 20 46 69 72 73 74 2c 20 73 61 76 65 20 74 68 69 73 20 66 | lation:.;;.;;.First,.save.this.f |
| 0d60 | 69 6c 65 20 61 73 20 70 6f 73 2d 74 69 70 2e 65 6c 20 61 6e 64 20 62 79 74 65 2d 63 6f 6d 70 69 | ile.as.pos-tip.el.and.byte-compi |
| 0d80 | 6c 65 20 69 6e 0a 3b 3b 20 61 20 64 69 72 65 63 74 6f 72 79 20 74 68 61 74 20 69 73 20 6c 69 73 | le.in.;;.a.directory.that.is.lis |
| 0da0 | 74 65 64 20 69 6e 20 6c 6f 61 64 2d 70 61 74 68 2e 0a 3b 3b 0a 3b 3b 20 50 75 74 20 74 68 65 20 | ted.in.load-path..;;.;;.Put.the. |
| 0dc0 | 66 6f 6c 6c 6f 77 69 6e 67 20 69 6e 20 79 6f 75 72 20 2e 65 6d 61 63 73 20 66 69 6c 65 3a 0a 3b | following.in.your..emacs.file:.; |
| 0de0 | 3b 0a 3b 3b 20 20 20 28 72 65 71 75 69 72 65 20 27 70 6f 73 2d 74 69 70 29 0a 3b 3b 0a 3b 3b 20 | ;.;;...(require.'pos-tip).;;.;;. |
| 0e00 | 54 6f 20 75 73 65 20 74 68 65 20 66 75 6c 6c 20 66 65 61 74 75 72 65 73 20 6f 66 20 74 68 69 73 | To.use.the.full.features.of.this |
| 0e20 | 20 70 72 6f 67 72 61 6d 20 6f 6e 20 4d 53 2d 57 69 6e 64 6f 77 73 2c 0a 3b 3b 20 70 75 74 20 74 | .program.on.MS-Windows,.;;.put.t |
| 0e40 | 68 65 20 61 64 64 69 74 69 6f 6e 61 6c 20 73 65 74 74 69 6e 67 20 69 6e 20 2e 65 6d 61 63 73 20 | he.additional.setting.in..emacs. |
| 0e60 | 66 69 6c 65 3a 0a 3b 3b 0a 3b 3b 20 20 20 28 70 6f 73 2d 74 69 70 2d 77 33 32 2d 6d 61 78 2d 77 | file:.;;.;;...(pos-tip-w32-max-w |
| 0e80 | 69 64 74 68 2d 68 65 69 67 68 74 29 20 20 20 3b 20 4d 61 78 69 6d 69 7a 65 20 66 72 61 6d 65 20 | idth-height)...;.Maximize.frame. |
| 0ea0 | 74 65 6d 70 6f 72 61 72 69 6c 79 0a 3b 3b 0a 3b 3b 20 6f 72 0a 3b 3b 0a 3b 3b 20 20 20 28 70 6f | temporarily.;;.;;.or.;;.;;...(po |
| 0ec0 | 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 74 29 20 3b 20 | s-tip-w32-max-width-height.t).;. |
| 0ee0 | 4b 65 65 70 20 66 72 61 6d 65 20 6d 61 78 69 6d 69 7a 65 64 0a 0a 3b 3b 0a 3b 3b 20 45 78 61 6d | Keep.frame.maximized..;;.;;.Exam |
| 0f00 | 70 6c 65 73 3a 0a 3b 3b 0a 3b 3b 20 57 65 20 63 61 6e 20 64 69 73 70 6c 61 79 20 61 20 74 6f 6f | ples:.;;.;;.We.can.display.a.too |
| 0f20 | 6c 74 69 70 20 61 74 20 74 68 65 20 63 75 72 72 65 6e 74 20 70 6f 73 69 74 69 6f 6e 20 62 79 20 | ltip.at.the.current.position.by. |
| 0f40 | 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 3a 0a 3b 3b 0a 3b 3b 20 20 20 28 70 6f 73 2d 74 69 70 2d | the.following:.;;.;;...(pos-tip- |
| 0f60 | 73 68 6f 77 20 22 66 6f 6f 20 62 61 72 22 29 0a 3b 3b 0a 3b 3b 20 49 66 20 79 6f 75 27 64 20 6c | show."foo.bar").;;.;;.If.you'd.l |
| 0f80 | 69 6b 65 20 74 6f 20 73 70 65 63 69 66 79 20 74 68 65 20 74 6f 6f 6c 74 69 70 20 63 6f 6c 6f 72 | ike.to.specify.the.tooltip.color |
| 0fa0 | 2c 20 75 73 65 20 61 6e 20 65 78 70 72 65 73 73 69 6f 6e 20 61 73 3a 0a 3b 3b 0a 3b 3b 20 20 20 | ,.use.an.expression.as:.;;.;;... |
| 0fc0 | 28 70 6f 73 2d 74 69 70 2d 73 68 6f 77 20 22 66 6f 6f 20 62 61 72 22 20 27 28 22 77 68 69 74 65 | (pos-tip-show."foo.bar".'("white |
| 0fe0 | 22 20 2e 20 22 72 65 64 22 29 29 0a 3b 3b 0a 3b 3b 20 48 65 72 65 2c 20 22 77 68 69 74 65 22 20 | "..."red")).;;.;;.Here,."white". |
| 1000 | 61 6e 64 20 22 72 65 64 22 20 61 72 65 20 74 68 65 20 66 6f 72 65 67 72 6f 75 6e 64 20 63 6f 6c | and."red".are.the.foreground.col |
| 1020 | 6f 72 20 61 6e 64 20 62 61 63 6b 67 72 6f 75 6e 64 0a 3b 3b 20 63 6f 6c 6f 72 2c 20 72 65 73 70 | or.and.background.;;.color,.resp |
| 1040 | 65 63 74 69 76 65 6c 79 2e 0a 0a 0a 3b 3b 3b 20 48 69 73 74 6f 72 79 3a 0a 3b 3b 20 32 30 32 33 | ectively....;;;.History:.;;.2023 |
| 1060 | 2d 30 37 2d 32 31 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 56 61 72 69 6f 75 73 20 62 75 67 20 | -07-21.;;.........*.Various.bug. |
| 1080 | 66 69 78 65 73 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 53 65 74 74 69 6e 67 73 20 77 65 72 65 | fixes.;;.........*.Settings.were |
| 10a0 | 20 63 68 61 6e 67 65 64 20 74 6f 20 75 73 65 20 64 65 66 63 75 73 74 6f 6d 2e 0a 3b 3b 20 20 20 | .changed.to.use.defcustom..;;... |
| 10c0 | 20 20 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 34 2e 37 0a 3b 3b 0a 3b 3b 20 32 30 31 33 | ......*.Version.0.4.7.;;.;;.2013 |
| 10e0 | 2d 30 37 2d 31 36 20 20 50 2e 20 4b 61 6c 69 6e 6f 77 73 6b 69 0a 3b 3b 20 20 20 20 20 20 20 20 | -07-16..P..Kalinowski.;;........ |
| 1100 | 20 2a 20 41 64 6a 75 73 74 65 64 20 60 70 6f 73 2d 74 69 70 2d 73 68 6f 77 27 20 74 6f 20 63 6f | .*.Adjusted.`pos-tip-show'.to.co |
| 1120 | 72 72 65 63 74 6c 79 20 73 65 74 20 74 6f 6f 6c 74 69 70 20 74 65 78 74 20 66 6f 72 65 67 72 6f | rrectly.set.tooltip.text.foregro |
| 1140 | 75 6e 64 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 63 6f 6c 6f 72 20 77 68 65 6e 20 75 73 69 6e | und.;;...........color.when.usin |
| 1160 | 67 20 63 75 73 74 6f 6d 20 63 6f 6c 6f 72 20 74 68 65 6d 65 73 2e 0a 3b 3b 20 20 20 20 20 20 20 | g.custom.color.themes..;;....... |
| 1180 | 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 34 2e 36 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d 30 39 2d | ..*.Version.0.4.6.;;.;;.2010-09- |
| 11a0 | 32 37 20 20 53 2e 20 49 72 69 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 53 69 6d 70 6c 69 66 | 27..S..Irie.;;.........*.Simplif |
| 11c0 | 69 65 64 20 69 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 60 70 6f 73 2d 74 69 70 2d 77 | ied.implementation.of.`pos-tip-w |
| 11e0 | 69 6e 64 6f 77 2d 73 79 73 74 65 6d 27 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 56 65 72 73 69 | indow-system'.;;.........*.Versi |
| 1200 | 6f 6e 20 30 2e 34 2e 35 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d 30 38 2d 32 30 20 20 53 2e 20 49 72 | on.0.4.5.;;.;;.2010-08-20..S..Ir |
| 1220 | 69 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 43 68 61 6e 67 65 64 20 74 6f 20 75 73 65 20 60 | ie.;;.........*.Changed.to.use.` |
| 1240 | 77 69 6e 64 6f 77 2d 6c 69 6e 65 2d 68 65 69 67 68 74 27 20 74 6f 20 63 61 6c 63 75 6c 61 74 65 | window-line-height'.to.calculate |
| 1260 | 20 74 6f 6f 6c 74 69 70 20 70 6f 73 69 74 69 6f 6e 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 43 | .tooltip.position.;;.........*.C |
| 1280 | 68 61 6e 67 65 64 20 60 70 6f 73 2d 74 69 70 2d 73 74 72 69 6e 67 2d 77 69 64 74 68 2d 68 65 69 | hanged.`pos-tip-string-width-hei |
| 12a0 | 67 68 74 27 20 74 6f 20 69 67 6e 6f 72 65 20 6c 61 73 74 20 65 6d 70 74 79 20 6c 69 6e 65 0a 3b | ght'.to.ignore.last.empty.line.; |
| 12c0 | 3b 20 20 20 20 20 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 34 2e 34 0a 3b 3b 0a 3b 3b 20 | ;.........*.Version.0.4.4.;;.;;. |
| 12e0 | 32 30 31 30 2d 30 37 2d 32 35 20 20 53 2e 20 49 72 69 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a | 2010-07-25..S..Irie.;;.........* |
| 1300 | 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 30 2e | .Bug.fix.;;.........*.Version.0. |
| 1320 | 34 2e 33 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d 30 36 2d 30 39 20 20 53 2e 20 49 72 69 65 0a 3b 3b | 4.3.;;.;;.2010-06-09..S..Irie.;; |
| 1340 | 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 2a 20 | .........*.Bug.fix.;;.........*. |
| 1360 | 56 65 72 73 69 6f 6e 20 30 2e 34 2e 32 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d 30 36 2d 30 34 20 20 | Version.0.4.2.;;.;;.2010-06-04.. |
| 1380 | 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 70 6f | S..Irie.;;.........*.Added.suppo |
| 13a0 | 72 74 20 66 6f 72 20 74 65 78 74 2d 73 63 61 6c 65 2d 6d 6f 64 65 0a 3b 3b 20 20 20 20 20 20 20 | rt.for.text-scale-mode.;;....... |
| 13c0 | 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 34 2e 31 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d 30 35 2d | ..*.Version.0.4.1.;;.;;.2010-05- |
| 13e0 | 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 64 65 64 20 66 | 04..S..Irie.;;.........*.Added.f |
| 1400 | 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 |
| 1420 | 70 2d 78 2d 64 69 73 70 6c 61 79 2d 77 69 64 74 68 27 2c 20 60 70 6f 73 2d 74 69 70 2d 78 2d 64 | p-x-display-width',.`pos-tip-x-d |
| 1440 | 69 73 70 6c 61 79 2d 68 65 69 67 68 74 27 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 60 70 | isplay-height'.;;.............`p |
| 1460 | 6f 73 2d 74 69 70 2d 6e 6f 72 6d 61 6c 69 7a 65 2d 6e 61 74 6e 75 6d 27 2c 20 60 70 6f 73 2d 74 | os-tip-normalize-natnum',.`pos-t |
| 1480 | 69 70 2d 66 72 61 6d 65 2d 72 65 6c 61 74 69 76 65 2d 70 6f 73 69 74 69 6f 6e 27 0a 3b 3b 20 20 | ip-frame-relative-position'.;;.. |
| 14a0 | 20 20 20 20 20 20 20 2a 20 46 69 78 65 64 20 74 68 65 20 73 75 70 70 6f 72 74 73 20 66 6f 72 20 | .......*.Fixed.the.supports.for. |
| 14c0 | 6d 75 6c 74 69 2d 64 69 73 70 6c 61 79 73 20 61 6e 64 20 6d 75 6c 74 69 2d 66 72 61 6d 65 73 0a | multi-displays.and.multi-frames. |
| 14e0 | 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 30 0a 3b 3b 0a 3b 3b | ;;.........*.Version.0.4.0.;;.;; |
| 1500 | 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 20 20 20 20 20 20 20 | .2010-04-29..S..Irie.;;......... |
| 1520 | 2a 20 4d 6f 64 69 66 69 65 64 20 74 6f 20 61 76 6f 69 64 20 62 79 74 65 2d 63 6f 6d 70 69 6c 65 | *.Modified.to.avoid.byte-compile |
| 1540 | 20 77 61 72 6e 69 6e 67 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 42 75 67 20 66 69 78 0a 3b 3b | .warning.;;.........*.Bug.fix.;; |
| 1560 | 20 20 20 20 20 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 33 2e 36 0a 3b 3b 0a 3b 3b 20 32 | .........*.Version.0.3.6.;;.;;.2 |
| 1580 | 30 31 30 2d 30 34 2d 32 39 20 20 53 2e 20 49 72 69 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 | 010-04-29..S..Irie.;;.........*. |
| 15a0 | 52 65 6e 61 6d 65 64 20 61 72 67 75 6d 65 6e 74 20 4d 41 58 2d 48 45 49 47 48 54 20 6f 66 20 60 | Renamed.argument.MAX-HEIGHT.of.` |
| 15c0 | 70 6f 73 2d 74 69 70 2d 66 69 6c 6c 2d 73 74 72 69 6e 67 27 20 74 6f 20 4d 41 58 2d 52 4f 57 53 | pos-tip-fill-string'.to.MAX-ROWS |
| 15e0 | 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 4d 6f 64 69 66 69 65 64 20 6f 6c 64 20 46 53 46 20 61 | .;;.........*.Modified.old.FSF.a |
| 1600 | 64 64 72 65 73 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 2e | ddress.;;.........*.Version.0.3. |
| 1620 | 35 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 | 5.;;.;;.2010-04-29..S..Irie.;;.. |
| 1640 | 20 20 20 20 20 20 20 2a 20 4d 6f 64 69 66 69 65 64 20 60 70 6f 73 2d 74 69 70 2d 73 68 6f 77 27 | .......*.Modified.`pos-tip-show' |
| 1660 | 20 74 6f 20 74 72 75 6e 63 61 74 65 20 73 74 72 69 6e 67 20 65 78 63 65 65 64 69 6e 67 20 64 69 | .to.truncate.string.exceeding.di |
| 1680 | 73 70 6c 61 79 20 73 69 7a 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 41 64 64 65 64 20 66 75 | splay.size.;;.........*.Added.fu |
| 16a0 | 6e 63 74 69 6f 6e 20 60 70 6f 73 2d 74 69 70 2d 74 72 75 6e 63 61 74 65 2d 73 74 72 69 6e 67 27 | nction.`pos-tip-truncate-string' |
| 16c0 | 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 61 6c 20 61 72 67 | .;;.........*.Added.optional.arg |
| 16e0 | 75 6d 65 6e 74 20 4d 41 58 2d 52 4f 57 53 20 74 6f 20 60 70 6f 73 2d 74 69 70 2d 73 70 6c 69 74 | ument.MAX-ROWS.to.`pos-tip-split |
| 1700 | 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 69 | -string'.;;.........*.Added.opti |
| 1720 | 6f 6e 61 6c 20 61 72 67 75 6d 65 6e 74 20 4d 41 58 2d 48 45 49 47 48 54 20 74 6f 20 60 70 6f 73 | onal.argument.MAX-HEIGHT.to.`pos |
| 1740 | 2d 74 69 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 56 | -tip-fill-string'.;;.........*.V |
| 1760 | 65 72 73 69 6f 6e 20 30 2e 33 2e 34 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d 30 34 2d 31 36 20 20 53 | ersion.0.3.4.;;.;;.2010-04-16..S |
| 1780 | 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 60 70 6f 73 | ..Irie.;;.........*.Changed.`pos |
| 17a0 | 2d 74 69 70 2d 73 68 6f 77 27 20 6e 6f 74 20 74 6f 20 66 69 6c 6c 20 70 61 72 61 67 72 61 70 68 | -tip-show'.not.to.fill.paragraph |
| 17c0 | 20 75 6e 6c 65 73 73 20 65 78 63 65 65 64 69 6e 67 20 57 49 44 54 48 0a 3b 3b 20 20 20 20 20 20 | .unless.exceeding.WIDTH.;;...... |
| 17e0 | 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 33 2e 33 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d 30 34 | ...*.Version.0.3.3.;;.;;.2010-04 |
| 1800 | 2d 30 38 20 20 53 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 | -08..S..Irie.;;.........*.Bug.fi |
| 1820 | 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 32 0a 3b 3b 0a | x.;;.........*.Version.0.3.2.;;. |
| 1840 | 3b 3b 20 32 30 31 30 2d 30 33 2d 33 31 20 20 53 2e 20 49 72 69 65 0a 3b 3b 20 20 20 20 20 20 20 | ;;.2010-03-31..S..Irie.;;....... |
| 1860 | 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 6e | ..*.Bug.fix.;;.........*.Version |
| 1880 | 20 30 2e 33 2e 31 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d 30 33 2d 33 30 20 20 53 2e 20 49 72 69 65 | .0.3.1.;;.;;.2010-03-30..S..Irie |
| 18a0 | 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 41 64 64 65 64 20 73 75 70 70 6f 72 74 20 66 6f 72 20 | .;;.........*.Added.support.for. |
| 18c0 | 4d 53 2d 57 69 6e 64 6f 77 73 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 41 64 64 65 64 20 6f 70 | MS-Windows.;;.........*.Added.op |
| 18e0 | 74 69 6f 6e 20 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 | tion.`pos-tip-use-relative-coord |
| 1900 | 69 6e 61 74 65 73 27 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 42 75 67 20 66 69 78 65 73 0a 3b | inates'.;;.........*.Bug.fixes.; |
| 1920 | 3b 20 20 20 20 20 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 33 2e 30 0a 3b 3b 0a 3b 3b 20 | ;.........*.Version.0.3.0.;;.;;. |
| 1940 | 32 30 31 30 2d 30 33 2d 32 33 20 20 53 2e 20 49 72 69 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a | 2010-03-23..S..Irie.;;.........* |
| 1960 | 20 43 68 61 6e 67 65 64 20 61 72 67 75 6d 65 6e 74 20 57 4f 52 44 2d 57 52 41 50 20 74 6f 20 4a | .Changed.argument.WORD-WRAP.to.J |
| 1980 | 55 53 54 49 46 59 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 | USTIFY.;;.........*.Added.option |
| 19a0 | 61 6c 20 61 72 67 75 6d 65 6e 74 20 53 51 55 45 45 5a 45 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a | al.argument.SQUEEZE.;;.........* |
| 19c0 | 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 66 69 6c 6c 2d 73 74 | .Added.function.`pos-tip-fill-st |
| 19e0 | 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 69 6f 6e 20 | ring'.;;.........*.Added.option. |
| 1a00 | 60 70 6f 73 2d 74 69 70 2d 74 61 62 2d 77 69 64 74 68 27 20 75 73 65 64 20 74 6f 20 65 78 70 61 | `pos-tip-tab-width'.used.to.expa |
| 1a20 | 6e 64 20 74 61 62 20 63 68 61 72 61 63 74 65 72 73 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 42 | nd.tab.characters.;;.........*.B |
| 1a40 | 75 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 | ug.fixes.;;.........*.Version.0. |
| 1a60 | 32 2e 30 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d 30 33 2d 32 32 20 20 53 2e 20 49 72 69 65 0a 3b 3b | 2.0.;;.;;.2010-03-22..S..Irie.;; |
| 1a80 | 20 20 20 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 | .........*.Added.optional.argume |
| 1aa0 | 6e 74 20 57 4f 52 44 2d 57 52 41 50 20 74 6f 20 60 70 6f 73 2d 74 69 70 2d 73 70 6c 69 74 2d 73 | nt.WORD-WRAP.to.`pos-tip-split-s |
| 1ac0 | 74 72 69 6e 67 27 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 43 68 61 6e 67 65 64 20 60 70 6f 73 | tring'.;;.........*.Changed.`pos |
| 1ae0 | 2d 74 69 70 2d 73 68 6f 77 27 20 74 6f 20 70 65 72 66 6f 72 6d 20 77 6f 72 64 20 77 72 61 70 20 | -tip-show'.to.perform.word.wrap. |
| 1b00 | 6f 72 20 6b 69 6e 73 6f 6b 75 20 73 68 6f 72 69 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 56 65 | or.kinsoku.shori.;;.........*.Ve |
| 1b20 | 72 73 69 6f 6e 20 30 2e 31 2e 38 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d 30 33 2d 32 30 20 20 53 2e | rsion.0.1.8.;;.;;.2010-03-20..S. |
| 1b40 | 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 61 | .Irie.;;.........*.Added.optiona |
| 1b60 | 6c 20 61 72 67 75 6d 65 6e 74 20 44 59 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 42 75 67 20 66 | l.argument.DY.;;.........*.Bug.f |
| 1b80 | 69 78 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 74 72 69 | ix.;;.........*.Modified.docstri |
| 1ba0 | 6e 67 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 37 0a 3b | ngs.;;.........*.Version.0.1.7.; |
| 1bc0 | 3b 0a 3b 3b 20 32 30 31 30 2d 30 33 2d 31 38 20 20 53 2e 20 49 72 69 65 0a 3b 3b 20 20 20 20 20 | ;.;;.2010-03-18..S..Irie.;;..... |
| 1be0 | 20 20 20 20 2a 20 41 64 64 65 64 2f 6d 6f 64 69 66 69 65 64 20 64 6f 63 73 74 72 69 6e 67 73 0a | ....*.Added/modified.docstrings. |
| 1c00 | 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 43 68 61 6e 67 65 64 20 77 6f 72 6b 69 6e 67 20 62 75 66 | ;;.........*.Changed.working.buf |
| 1c20 | 66 65 72 20 6e 61 6d 65 20 74 6f 20 22 20 2a 78 77 69 6e 69 6e 66 6f 2a 22 0a 3b 3b 20 20 20 20 | fer.name.to.".*xwininfo*".;;.... |
| 1c40 | 20 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 31 2e 36 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d | .....*.Version.0.1.6.;;.;;.2010- |
| 1c60 | 30 33 2d 31 37 20 20 53 2e 20 49 72 69 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 46 69 78 65 | 03-17..S..Irie.;;.........*.Fixe |
| 1c80 | 64 20 74 79 70 6f 73 20 69 6e 20 64 6f 63 73 74 72 69 6e 67 73 0a 3b 3b 20 20 20 20 20 20 20 20 | d.typos.in.docstrings.;;........ |
| 1ca0 | 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 31 2e 35 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d 30 33 2d 31 | .*.Version.0.1.5.;;.;;.2010-03-1 |
| 1cc0 | 36 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 | 6..S..Irie.;;.........*.Added.su |
| 1ce0 | 70 70 6f 72 74 20 66 6f 72 20 6d 75 6c 74 69 2d 64 69 73 70 6c 61 79 20 65 6e 76 69 72 6f 6e 6d | pport.for.multi-display.environm |
| 1d00 | 65 6e 74 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 20 20 20 | ent.;;.........*.Bug.fix.;;..... |
| 1d20 | 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 31 2e 34 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d 30 | ....*.Version.0.1.4.;;.;;.2010-0 |
| 1d40 | 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 20 42 75 67 20 66 | 3-16..S..Irie.;;.........*.Bug.f |
| 1d60 | 69 78 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 43 68 61 6e 67 65 64 20 63 61 6c 63 75 6c 61 74 | ix.;;.........*.Changed.calculat |
| 1d80 | 69 6f 6e 20 66 6f 72 20 60 78 2d 6d 61 78 2d 74 6f 6f 6c 74 69 70 2d 73 69 7a 65 27 0a 3b 3b 20 | ion.for.`x-max-tooltip-size'.;;. |
| 1da0 | 20 20 20 20 20 20 20 20 2a 20 4d 6f 64 69 66 69 65 64 20 64 6f 63 73 74 72 69 6e 67 0a 3b 3b 20 | ........*.Modified.docstring.;;. |
| 1dc0 | 20 20 20 20 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 31 2e 33 0a 3b 3b 0a 3b 3b 20 32 30 | ........*.Version.0.1.3.;;.;;.20 |
| 1de0 | 31 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 4d | 10-03-11..S..Irie.;;.........*.M |
| 1e00 | 6f 64 69 66 69 65 64 20 63 6f 6d 6d 65 6e 74 61 72 79 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 | odified.commentary.;;.........*. |
| 1e20 | 56 65 72 73 69 6f 6e 20 30 2e 31 2e 32 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d 30 33 2d 31 31 20 20 | Version.0.1.2.;;.;;.2010-03-11.. |
| 1e40 | 53 2e 20 49 72 69 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 52 65 2d 69 6d 70 6c 65 6d 65 6e | S..Irie.;;.........*.Re-implemen |
| 1e60 | 74 65 64 20 60 70 6f 73 2d 74 69 70 2d 73 74 72 69 6e 67 2d 77 69 64 74 68 2d 68 65 69 67 68 74 | ted.`pos-tip-string-width-height |
| 1e80 | 27 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 41 64 64 65 64 20 69 6e 64 69 63 61 74 6f 72 20 76 | '.;;.........*.Added.indicator.v |
| 1ea0 | 61 72 69 61 62 6c 65 20 60 70 6f 73 2d 74 69 70 2d 75 70 70 65 72 73 69 64 65 2d 70 27 0a 3b 3b | ariable.`pos-tip-upperside-p'.;; |
| 1ec0 | 20 20 20 20 20 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 31 2e 31 0a 3b 3b 0a 3b 3b 20 32 | .........*.Version.0.1.1.;;.;;.2 |
| 1ee0 | 30 31 30 2d 30 33 2d 30 39 20 20 53 2e 20 49 72 69 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 | 010-03-09..S..Irie.;;.........*. |
| 1f00 | 52 65 2d 69 6d 70 6c 65 6d 65 6e 74 65 64 20 60 70 6f 73 2d 74 69 70 2d 73 68 6f 77 27 20 28 2a | Re-implemented.`pos-tip-show'.(* |
| 1f20 | 69 6e 63 6f 6d 70 61 74 69 62 6c 79 20 63 68 61 6e 67 65 64 2a 29 0a 3b 3b 20 20 20 20 20 20 20 | incompatibly.changed*).;;....... |
| 1f40 | 20 20 20 20 20 20 2d 20 55 73 65 20 66 72 61 6d 65 20 64 65 66 61 75 6c 74 20 66 6f 6e 74 0a 3b | ......-.Use.frame.default.font.; |
| 1f60 | 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 2d 20 41 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 63 61 | ;.............-.Automatically.ca |
| 1f80 | 6c 63 75 6c 61 74 65 20 74 6f 6f 6c 74 69 70 20 70 69 78 65 6c 20 73 69 7a 65 0a 3b 3b 20 20 20 | lculate.tooltip.pixel.size.;;... |
| 1fa0 | 20 20 20 20 20 20 20 20 20 20 2d 20 41 64 64 65 64 20 6f 70 74 69 6f 6e 61 6c 20 61 72 67 75 6d | ..........-.Added.optional.argum |
| 1fc0 | 65 6e 74 73 3a 20 54 49 50 2d 43 4f 4c 4f 52 2c 20 4d 41 58 2d 57 49 44 54 48 0a 3b 3b 20 20 20 | ents:.TIP-COLOR,.MAX-WIDTH.;;... |
| 1fe0 | 20 20 20 20 20 20 2a 20 41 64 64 65 64 20 75 74 69 6c 69 74 79 20 66 75 6e 63 74 69 6f 6e 73 3a | ......*.Added.utility.functions: |
| 2000 | 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 60 70 6f 73 2d 74 69 70 2d 73 70 6c 69 74 2d 73 | .;;.............`pos-tip-split-s |
| 2020 | 74 72 69 6e 67 27 2c 20 60 70 6f 73 2d 74 69 70 2d 73 74 72 69 6e 67 2d 77 69 64 74 68 2d 68 65 | tring',.`pos-tip-string-width-he |
| 2040 | 69 67 68 74 27 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 42 75 67 20 66 69 78 65 73 0a 3b 3b 20 | ight'.;;.........*.Bug.fixes.;;. |
| 2060 | 20 20 20 20 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 31 2e 30 0a 3b 3b 0a 3b 3b 20 32 30 | ........*.Version.0.1.0.;;.;;.20 |
| 2080 | 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 20 20 20 2a 20 41 | 10-03-08..S..Irie.;;.........*.A |
| 20a0 | 64 64 65 64 20 6f 70 74 69 6f 6e 61 6c 20 61 72 67 75 6d 65 6e 74 20 44 58 0a 3b 3b 20 20 20 20 | dded.optional.argument.DX.;;.... |
| 20c0 | 20 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 30 2e 34 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d | .....*.Version.0.0.4.;;.;;.2010- |
| 20e0 | 30 33 2d 30 38 20 20 53 2e 20 49 72 69 65 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 42 75 67 20 | 03-08..S..Irie.;;.........*.Bug. |
| 2100 | 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 30 2e 33 0a 3b | fix.;;.........*.Version.0.0.3.; |
| 2120 | 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 20 20 | ;.;;.2010-03-08..S..Irie.;;..... |
| 2140 | 20 20 20 20 2a 20 4d 6f 64 69 66 69 65 64 20 74 6f 20 6d 6f 76 65 20 6f 75 74 20 6d 6f 75 73 65 | ....*.Modified.to.move.out.mouse |
| 2160 | 20 70 6f 69 6e 74 65 72 0a 3b 3b 20 20 20 20 20 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e | .pointer.;;.........*.Version.0. |
| 2180 | 30 2e 32 0a 3b 3b 0a 3b 3b 20 32 30 31 30 2d 30 33 2d 30 37 20 20 53 2e 20 49 72 69 65 0a 3b 3b | 0.2.;;.;;.2010-03-07..S..Irie.;; |
| 21a0 | 20 20 20 20 20 20 20 20 20 2a 20 46 69 72 73 74 20 72 65 6c 65 61 73 65 0a 3b 3b 20 20 20 20 20 | .........*.First.release.;;..... |
| 21c0 | 20 20 20 20 2a 20 56 65 72 73 69 6f 6e 20 30 2e 30 2e 31 0a 0a 3b 3b 20 54 6f 44 6f 3a 0a 0a 3b | ....*.Version.0.0.1..;;.ToDo:..; |
| 21e0 | 3b 3b 20 43 6f 64 65 3a 0a 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b | ;;.Code:.;;;;;;;;;;;;;;;;;;;;;;; |
| 2200 | 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 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| 2220 | 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 0a 3b 3b 20 53 65 74 74 69 6e 67 73 0a 3b 3b 3b 3b | ;;;;;;;;;;;;;;;.;;.Settings.;;;; |
| 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 3b 3b 3b 3b 3b 3b 3b 3b | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| 2260 | 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 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| 2280 | 3b 3b 0a 0a 28 64 65 66 67 72 6f 75 70 20 70 6f 73 2d 74 69 70 20 6e 69 6c 0a 20 20 22 53 68 6f | ;;..(defgroup.pos-tip.nil..."Sho |
| 22a0 | 77 20 74 6f 6f 6c 74 69 70 20 61 74 20 70 6f 69 6e 74 22 0a 20 20 3a 67 72 6f 75 70 20 27 66 61 | w.tooltip.at.point"...:group.'fa |
| 22c0 | 63 65 73 0a 20 20 3a 70 72 65 66 69 78 20 22 70 6f 73 2d 74 69 70 2d 22 29 0a 0a 28 64 65 66 63 | ces...:prefix."pos-tip-")..(defc |
| 22e0 | 75 73 74 6f 6d 20 70 6f 73 2d 74 69 70 2d 62 6f 72 64 65 72 2d 77 69 64 74 68 20 31 0a 20 20 22 | ustom.pos-tip-border-width.1..." |
| 2300 | 4f 75 74 65 72 20 62 6f 72 64 65 72 20 77 69 64 74 68 20 6f 66 20 70 6f 73 2d 74 69 70 27 73 20 | Outer.border.width.of.pos-tip's. |
| 2320 | 74 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 | tooltip."...:type.'integer...:gr |
| 2340 | 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 20 70 6f 73 2d 74 69 | oup.'pos-tip)..(defcustom.pos-ti |
| 2360 | 70 2d 69 6e 74 65 72 6e 61 6c 2d 62 6f 72 64 65 72 2d 77 69 64 74 68 20 32 0a 20 20 22 54 65 78 | p-internal-border-width.2..."Tex |
| 2380 | 74 20 6d 61 72 67 69 6e 20 6f 66 20 70 6f 73 2d 74 69 70 27 73 20 74 6f 6f 6c 74 69 70 2e 22 0a | t.margin.of.pos-tip's.tooltip.". |
| 23a0 | 20 20 3a 74 79 70 65 20 27 69 6e 74 65 67 65 72 0a 20 20 3a 67 72 6f 75 70 20 27 70 6f 73 2d 74 | ..:type.'integer...:group.'pos-t |
| 23c0 | 69 70 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 70 6f 73 2d 74 69 70 2d 66 6f 72 65 67 72 6f 75 | ip)..(defcustom.pos-tip-foregrou |
| 23e0 | 6e 64 2d 63 6f 6c 6f 72 20 6e 69 6c 0a 20 20 22 44 65 66 61 75 6c 74 20 66 6f 72 65 67 72 6f 75 | nd-color.nil..."Default.foregrou |
| 2400 | 6e 64 20 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 | nd.color.of.pos-tip's.tooltip..W |
| 2420 | 68 65 6e 20 60 6e 69 6c 27 2c 20 6c 6f 6f 6b 20 75 70 20 74 68 65 20 66 6f 72 65 67 72 6f 75 6e | hen.`nil',.look.up.the.foregroun |
| 2440 | 64 20 63 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 | d.color.of.the.`tooltip'.face.". |
| 2460 | 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 67 20 22 44 65 | ..:type.'(choice.(const.:tag."De |
| 2480 | 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 20 20 73 74 72 | fault".nil)..................str |
| 24a0 | 69 6e 67 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 | ing)...:group.'pos-tip)..(defcus |
| 24c0 | 74 6f 6d 20 70 6f 73 2d 74 69 70 2d 62 61 63 6b 67 72 6f 75 6e 64 2d 63 6f 6c 6f 72 20 6e 69 6c | tom.pos-tip-background-color.nil |
| 24e0 | 0a 20 20 22 44 65 66 61 75 6c 74 20 62 61 63 6b 67 72 6f 75 6e 64 20 63 6f 6c 6f 72 20 6f 66 20 | ..."Default.background.color.of. |
| 2500 | 70 6f 73 2d 74 69 70 27 73 20 74 6f 6f 6c 74 69 70 2e 0a 57 68 65 6e 20 60 6e 69 6c 27 2c 20 6c | pos-tip's.tooltip..When.`nil',.l |
| 2520 | 6f 6f 6b 20 75 70 20 74 68 65 20 62 61 63 6b 67 72 6f 75 6e 64 20 63 6f 6c 6f 72 20 6f 66 20 74 | ook.up.the.background.color.of.t |
| 2540 | 68 65 20 60 74 6f 6f 6c 74 69 70 27 20 66 61 63 65 2e 22 0a 20 20 3a 74 79 70 65 20 27 28 63 68 | he.`tooltip'.face."...:type.'(ch |
| 2560 | 6f 69 63 65 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 44 65 66 61 75 6c 74 22 20 6e 69 6c 29 0a | oice.(const.:tag."Default".nil). |
| 2580 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 74 72 69 6e 67 29 0a 20 20 3a 67 72 6f 75 | .................string)...:grou |
| 25a0 | 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 2d | p.'pos-tip)..(defcustom.pos-tip- |
| 25c0 | 74 61 62 2d 77 69 64 74 68 20 6e 69 6c 0a 20 20 22 54 61 62 20 77 69 64 74 68 20 75 73 65 64 20 | tab-width.nil..."Tab.width.used. |
| 25e0 | 66 6f 72 20 60 70 6f 73 2d 74 69 70 2d 73 70 6c 69 74 2d 73 74 72 69 6e 67 27 20 61 6e 64 20 60 | for.`pos-tip-split-string'.and.` |
| 2600 | 70 6f 73 2d 74 69 70 2d 66 69 6c 6c 2d 73 74 72 69 6e 67 27 0a 74 6f 20 65 78 70 61 6e 64 20 74 | pos-tip-fill-string'.to.expand.t |
| 2620 | 61 62 20 63 68 61 72 61 63 74 65 72 73 2e 20 6e 69 6c 20 6d 65 61 6e 73 20 75 73 65 20 64 65 66 | ab.characters..nil.means.use.def |
| 2640 | 61 75 6c 74 20 76 61 6c 75 65 20 6f 66 20 60 74 61 62 2d 77 69 64 74 68 27 2e 22 0a 20 20 3a 74 | ault.value.of.`tab-width'."...:t |
| 2660 | 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 6c | ype.'(choice.(const.:tag."Defaul |
| 2680 | 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 69 6e 74 65 67 65 72 | t".nil)..................integer |
| 26a0 | 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 |
| 26c0 | 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 69 6e 61 74 65 | .pos-tip-use-relative-coordinate |
| 26e0 | 73 20 6e 69 6c 0a 20 20 22 4e 6f 6e 2d 6e 69 6c 20 6d 65 61 6e 73 20 74 6f 6f 6c 74 69 70 20 6c | s.nil..."Non-nil.means.tooltip.l |
| 2700 | 6f 63 61 74 69 6f 6e 20 69 73 20 63 61 6c 63 75 6c 61 74 65 64 20 61 73 20 61 20 63 6f 6f 72 64 | ocation.is.calculated.as.a.coord |
| 2720 | 69 6e 61 74 65 73 0a 72 65 6c 61 74 69 76 65 20 74 6f 20 74 68 65 20 74 6f 70 20 6c 65 66 74 20 | inates.relative.to.the.top.left. |
| 2740 | 63 6f 72 6e 65 72 20 6f 66 20 66 72 61 6d 65 2e 20 49 6e 20 74 68 69 73 20 63 61 73 65 20 74 68 | corner.of.frame..In.this.case.th |
| 2760 | 65 20 74 6f 6f 6c 74 69 70 0a 77 69 6c 6c 20 61 6c 77 61 79 73 20 62 65 20 64 69 73 70 6c 61 79 | e.tooltip.will.always.be.display |
| 2780 | 65 64 20 77 69 74 68 69 6e 20 74 68 65 20 66 72 61 6d 65 2e 0a 0a 4e 6f 74 65 20 74 68 61 74 20 | ed.within.the.frame...Note.that. |
| 27a0 | 74 68 69 73 20 76 61 72 69 61 62 6c 65 20 69 73 20 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 73 | this.variable.is.automatically.s |
| 27c0 | 65 74 20 74 6f 20 6e 6f 6e 2d 6e 69 6c 20 69 66 20 61 62 73 6f 6c 75 74 65 0a 63 6f 6f 72 64 69 | et.to.non-nil.if.absolute.coordi |
| 27e0 | 6e 61 74 65 73 20 63 61 6e 27 74 20 62 65 20 6f 62 74 61 69 6e 65 64 20 62 79 20 60 70 6f 73 2d | nates.can't.be.obtained.by.`pos- |
| 2800 | 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 27 2e 22 0a 20 20 | tip-compute-pixel-position'."... |
| 2820 | 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 0a 20 20 3a 67 72 6f 75 70 20 27 70 6f 73 2d 74 69 70 | :type.'boolean...:group.'pos-tip |
| 2840 | 29 0a 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 3b 3b | )..;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| 2860 | 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 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| 2880 | 3b 3b 3b 3b 3b 3b 3b 3b 3b 0a 3b 3b 20 46 75 6e 63 74 69 6f 6e 73 0a 3b 3b 3b 3b 3b 3b 3b 3b 3b | ;;;;;;;;;.;;.Functions.;;;;;;;;; |
| 28a0 | 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 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| 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 0a 0a 28 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;..( |
| 28e0 | 64 65 66 75 6e 20 70 6f 73 2d 74 69 70 2d 77 69 6e 64 6f 77 2d 73 79 73 74 65 6d 20 28 26 6f 70 | defun.pos-tip-window-system.(&op |
| 2900 | 74 69 6f 6e 61 6c 20 66 72 61 6d 65 29 0a 20 20 22 54 68 65 20 6e 61 6d 65 20 6f 66 20 74 68 65 | tional.frame)..."The.name.of.the |
| 2920 | 20 77 69 6e 64 6f 77 20 73 79 73 74 65 6d 20 74 68 61 74 20 46 52 41 4d 45 20 69 73 20 64 69 73 | .window.system.that.FRAME.is.dis |
| 2940 | 70 6c 61 79 69 6e 67 20 74 68 72 6f 75 67 68 2e 0a 54 68 65 20 76 61 6c 75 65 20 69 73 20 61 20 | playing.through..The.value.is.a. |
| 2960 | 73 79 6d 62 6f 6c 2d 2d 2d 66 6f 72 20 69 6e 73 74 61 6e 63 65 2c 20 60 78 27 20 66 6f 72 20 58 | symbol---for.instance,.`x'.for.X |
| 2980 | 20 77 69 6e 64 6f 77 73 2e 0a 54 68 65 20 76 61 6c 75 65 20 69 73 20 6e 69 6c 20 69 66 20 45 6d | .windows..The.value.is.nil.if.Em |
| 29a0 | 61 63 73 20 69 73 20 75 73 69 6e 67 20 61 20 74 65 78 74 2d 6f 6e 6c 79 20 74 65 72 6d 69 6e 61 | acs.is.using.a.text-only.termina |
| 29c0 | 6c 2e 0a 0a 46 52 41 4d 45 20 64 65 66 61 75 6c 74 73 20 74 6f 20 74 68 65 20 63 75 72 72 65 6e | l...FRAME.defaults.to.the.curren |
| 29e0 | 74 6c 79 20 73 65 6c 65 63 74 65 64 20 66 72 61 6d 65 2e 22 0a 20 20 28 6c 65 74 20 28 28 74 79 | tly.selected.frame."...(let.((ty |
| 2a00 | 70 65 20 28 66 72 61 6d 65 70 20 28 6f 72 20 66 72 61 6d 65 20 28 73 65 6c 65 63 74 65 64 2d 66 | pe.(framep.(or.frame.(selected-f |
| 2a20 | 72 61 6d 65 29 29 29 29 29 0a 20 20 20 20 28 69 66 20 74 79 70 65 0a 09 28 61 6e 64 20 28 6e 6f | rame))))).....(if.type..(and.(no |
| 2a40 | 74 20 28 65 71 20 74 79 70 65 20 74 29 29 0a 09 20 20 20 20 20 74 79 70 65 29 0a 20 20 20 20 20 | t.(eq.type.t)).......type)...... |
| 2a60 | 20 28 73 69 67 6e 61 6c 20 27 77 72 6f 6e 67 2d 74 79 70 65 2d 61 72 67 75 6d 65 6e 74 20 28 6c | .(signal.'wrong-type-argument.(l |
| 2a80 | 69 73 74 20 27 66 72 61 6d 65 70 20 66 72 61 6d 65 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 | ist.'framep.frame)))))..(defun.p |
| 2aa0 | 6f 73 2d 74 69 70 2d 6e 6f 72 6d 61 6c 69 7a 65 2d 6e 61 74 6e 75 6d 20 28 6f 62 6a 65 63 74 20 | os-tip-normalize-natnum.(object. |
| 2ac0 | 26 6f 70 74 69 6f 6e 61 6c 20 6e 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 4e 74 68 20 70 6f 77 | &optional.n)..."Return.a.Nth.pow |
| 2ae0 | 65 72 20 6f 66 20 32 20 69 66 20 4f 42 4a 45 43 54 20 69 73 20 61 20 70 6f 73 69 74 69 76 65 20 | er.of.2.if.OBJECT.is.a.positive. |
| 2b00 | 69 6e 74 65 67 65 72 2e 0a 4f 74 68 65 72 77 69 73 65 20 72 65 74 75 72 6e 20 30 2e 20 4f 6d 69 | integer..Otherwise.return.0..Omi |
| 2b20 | 74 74 69 6e 67 20 4e 20 6d 65 61 6e 73 20 72 65 74 75 72 6e 20 31 20 66 6f 72 20 61 20 70 6f 73 | tting.N.means.return.1.for.a.pos |
| 2b40 | 69 74 69 76 65 20 69 6e 74 65 67 65 72 2e 22 0a 20 20 28 61 73 68 20 28 69 66 20 28 61 6e 64 20 | itive.integer."...(ash.(if.(and. |
| 2b60 | 28 6e 61 74 6e 75 6d 70 20 6f 62 6a 65 63 74 29 20 28 3e 20 6f 62 6a 65 63 74 20 30 29 29 20 31 | (natnump.object).(>.object.0)).1 |
| 2b80 | 20 30 29 0a 20 20 20 20 20 20 20 28 6f 72 20 6e 20 30 29 29 29 0a 0a 28 64 65 66 76 61 72 20 70 | .0)........(or.n.0)))..(defvar.p |
| 2ba0 | 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 20 27 | os-tip-saved-frame-coordinates.' |
| 2bc0 | 28 30 20 2e 20 30 29 0a 20 20 22 54 68 65 20 6c 61 74 65 73 74 20 72 65 73 75 6c 74 20 6f 66 20 | (0...0)..."The.latest.result.of. |
| 2be0 | 60 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 64 69 6e 61 | `pos-tip-frame-top-left-coordina |
| 2c00 | 74 65 73 27 2e 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 | tes'.")..(defvar.pos-tip-frame-o |
| 2c20 | 66 66 73 65 74 20 6e 69 6c 0a 20 20 22 54 68 65 20 6c 61 74 65 73 74 20 72 65 73 75 6c 74 20 6f | ffset.nil..."The.latest.result.o |
| 2c40 | 66 20 60 70 6f 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 | f.`pos-tip-calibrate-frame-offse |
| 2c60 | 74 27 2e 20 54 68 69 73 20 76 61 6c 75 65 0a 69 73 20 75 73 65 64 20 66 6f 72 20 6e 6f 6e 2d 58 | t'..This.value.is.used.for.non-X |
| 2c80 | 20 67 72 61 70 68 69 63 61 6c 20 65 6e 76 69 72 6f 6e 6d 65 6e 74 2e 22 29 0a 0a 28 64 65 66 76 | .graphical.environment.")..(defv |
| 2ca0 | 61 72 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 5b 6e | ar.pos-tip-frame-offset-array.[n |
| 2cc0 | 69 6c 20 6e 69 6c 20 6e 69 6c 20 6e 69 6c 5d 0a 20 20 22 41 72 72 61 79 20 6f 66 20 74 68 65 20 | il.nil.nil.nil]..."Array.of.the. |
| 2ce0 | 72 65 73 75 6c 74 73 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 | results.of.`pos-tip-calibrate-fr |
| 2d00 | 61 6d 65 2d 6f 66 66 73 65 74 27 2e 20 54 68 65 79 20 61 72 65 0a 72 65 63 6f 72 64 65 64 20 6f | ame-offset'..They.are.recorded.o |
| 2d20 | 6e 6c 79 20 77 68 65 6e 20 60 70 6f 73 2d 74 69 70 2d 66 72 61 6d 65 2d 74 6f 70 2d 6c 65 66 74 | nly.when.`pos-tip-frame-top-left |
| 2d40 | 2d 63 6f 6f 72 64 69 6e 61 74 65 73 27 20 69 73 20 63 61 6c 6c 65 64 20 66 6f 72 20 61 0a 6e 6f | -coordinates'.is.called.for.a.no |
| 2d60 | 6e 2d 58 20 62 75 74 20 67 72 61 70 68 69 63 61 6c 20 66 72 61 6d 65 2e 0a 0a 54 68 65 20 32 6e | n-X.but.graphical.frame...The.2n |
| 2d80 | 64 20 61 6e 64 20 34 74 68 20 65 6c 65 6d 65 6e 74 73 20 61 72 65 20 74 68 65 20 76 61 6c 75 65 | d.and.4th.elements.are.the.value |
| 2da0 | 73 20 66 6f 72 20 66 72 61 6d 65 73 20 68 61 76 69 6e 67 20 61 20 6d 65 6e 75 20 62 61 72 2e 0a | s.for.frames.having.a.menu.bar.. |
| 2dc0 | 54 68 65 20 33 72 64 20 61 6e 64 20 34 74 68 20 65 6c 65 6d 65 6e 74 73 20 61 72 65 20 74 68 65 | The.3rd.and.4th.elements.are.the |
| 2de0 | 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 74 6f 6f 6c | .values.for.frames.having.a.tool |
| 2e00 | 20 62 61 72 2e 22 29 0a 0a 28 64 65 66 75 6e 20 70 6f 73 2d 74 69 70 2d 66 72 61 6d 65 2d 74 6f | .bar.")..(defun.pos-tip-frame-to |
| 2e20 | 70 2d 6c 65 66 74 2d 63 6f 6f 72 64 69 6e 61 74 65 73 20 28 26 6f 70 74 69 6f 6e 61 6c 20 66 72 | p-left-coordinates.(&optional.fr |
| 2e40 | 61 6d 65 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 6e | ame)..."Return.the.pixel.coordin |
| 2e60 | 61 74 65 73 20 6f 66 20 46 52 41 4d 45 20 61 73 20 61 20 63 6f 6e 73 20 63 65 6c 6c 20 28 4c 45 | ates.of.FRAME.as.a.cons.cell.(LE |
| 2e80 | 46 54 20 2e 20 54 4f 50 29 2c 0a 77 68 69 63 68 20 61 72 65 20 72 65 6c 61 74 69 76 65 20 74 6f | FT...TOP),.which.are.relative.to |
| 2ea0 | 20 74 6f 70 20 6c 65 66 74 20 63 6f 72 6e 65 72 20 6f 66 20 73 63 72 65 65 6e 2e 0a 0a 52 65 74 | .top.left.corner.of.screen...Ret |
| 2ec0 | 75 72 6e 20 6e 69 6c 20 69 66 20 66 61 69 6c 69 6e 67 20 74 6f 20 61 63 71 75 69 72 65 20 74 68 | urn.nil.if.failing.to.acquire.th |
| 2ee0 | 65 20 63 6f 6f 72 64 69 6e 61 74 65 73 2e 0a 0a 49 66 20 46 52 41 4d 45 20 69 73 20 6f 6d 69 74 | e.coordinates...If.FRAME.is.omit |
| 2f00 | 74 65 64 2c 20 75 73 65 20 73 65 6c 65 63 74 65 64 2d 66 72 61 6d 65 2e 0a 0a 55 73 65 72 73 20 | ted,.use.selected-frame...Users. |
| 2f20 | 63 61 6e 20 61 6c 73 6f 20 67 65 74 20 74 68 65 20 66 72 61 6d 65 20 63 6f 6f 72 64 69 6e 61 74 | can.also.get.the.frame.coordinat |
| 2f40 | 65 73 20 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 0a 60 70 6f | es.by.referring.the.variable.`po |
| 2f60 | 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 6a | s-tip-saved-frame-coordinates'.j |
| 2f80 | 75 73 74 20 61 66 74 65 72 20 63 61 6c 6c 69 6e 67 20 74 68 69 73 20 66 75 6e 63 74 69 6f 6e 2e | ust.after.calling.this.function. |
| 2fa0 | 22 0a 20 20 28 6c 65 74 20 28 28 77 69 6e 73 79 73 20 28 70 6f 73 2d 74 69 70 2d 77 69 6e 64 6f | "...(let.((winsys.(pos-tip-windo |
| 2fc0 | 77 2d 73 79 73 74 65 6d 20 66 72 61 6d 65 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 | w-system.frame))).....(cond..... |
| 2fe0 | 20 28 28 6e 75 6c 6c 20 77 69 6e 73 79 73 29 0a 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 74 65 | .((null.winsys).......(error."te |
| 3000 | 78 74 2d 6f 6e 6c 79 20 66 72 61 6d 65 3a 20 25 53 22 20 66 72 61 6d 65 29 29 0a 20 20 20 20 20 | xt-only.frame:.%S".frame))...... |
| 3020 | 28 28 65 71 20 77 69 6e 73 79 73 20 27 78 29 0a 20 20 20 20 20 20 28 63 6f 6e 64 69 74 69 6f 6e | ((eq.winsys.'x).......(condition |
| 3040 | 2d 63 61 73 65 20 6e 69 6c 0a 09 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 | -case.nil....(with-current-buffe |
| 3060 | 72 20 28 67 65 74 2d 62 75 66 66 65 72 2d 63 72 65 61 74 65 20 22 20 2a 78 77 69 6e 69 6e 66 6f | r.(get-buffer-create.".*xwininfo |
| 3080 | 2a 22 29 0a 09 20 20 20 20 28 6c 65 74 20 28 28 63 61 73 65 2d 66 6f 6c 64 2d 73 65 61 72 63 68 | *")......(let.((case-fold-search |
| 30a0 | 20 6e 69 6c 29 29 0a 09 20 20 20 20 20 20 28 62 75 66 66 65 72 2d 64 69 73 61 62 6c 65 2d 75 6e | .nil))........(buffer-disable-un |
| 30c0 | 64 6f 29 0a 09 20 20 20 20 20 20 28 65 72 61 73 65 2d 62 75 66 66 65 72 29 0a 09 20 20 20 20 20 | do)........(erase-buffer)....... |
| 30e0 | 20 28 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 73 68 65 6c 6c 2d 66 69 6c 65 2d 6e 61 6d 65 20 6e | .(call-process.shell-file-name.n |
| 3100 | 69 6c 20 74 20 6e 69 6c 20 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e 64 2d 73 77 69 74 63 68 0a 09 09 | il.t.nil.shell-command-switch... |
| 3120 | 09 20 20 20 20 28 66 6f 72 6d 61 74 20 22 78 77 69 6e 69 6e 66 6f 20 2d 64 69 73 70 6c 61 79 20 | .....(format."xwininfo.-display. |
| 3140 | 25 73 20 2d 69 64 20 25 73 22 0a 09 09 09 09 20 20 20 20 28 66 72 61 6d 65 2d 70 61 72 61 6d 65 | %s.-id.%s".........(frame-parame |
| 3160 | 74 65 72 20 66 72 61 6d 65 20 27 64 69 73 70 6c 61 79 29 0a 09 09 09 09 20 20 20 20 28 66 72 61 | ter.frame.'display).........(fra |
| 3180 | 6d 65 2d 70 61 72 61 6d 65 74 65 72 20 66 72 61 6d 65 20 27 77 69 6e 64 6f 77 2d 69 64 29 29 29 | me-parameter.frame.'window-id))) |
| 31a0 | 0a 09 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a | ........(goto-char.(point-min)). |
| 31c0 | 09 20 20 20 20 20 20 28 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 5c 6e 20 20 41 62 73 6f | .......(search-forward."\n..Abso |
| 31e0 | 6c 75 74 65 22 29 0a 09 20 20 20 20 20 20 28 73 65 74 71 20 70 6f 73 2d 74 69 70 2d 73 61 76 65 | lute")........(setq.pos-tip-save |
| 3200 | 64 2d 66 72 61 6d 65 2d 63 6f 6f 72 64 69 6e 61 74 65 73 0a 09 09 20 20 20 20 28 63 6f 6e 73 20 | d-frame-coordinates.......(cons. |
| 3220 | 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 72 | (string-to-number.(buffer-substr |
| 3240 | 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 61 | ing-no-properties...........(sea |
| 3260 | 72 63 68 2d 66 6f 72 77 61 72 64 20 22 58 3a 20 22 29 0a 09 09 09 09 09 20 20 20 20 20 28 6c 69 | rch-forward."X:.")...........(li |
| 3280 | 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 29 29 29 0a 09 09 09 20 20 28 73 74 72 69 6e 67 2d | ne-end-position)))......(string- |
| 32a0 | 74 6f 2d 6e 75 6d 62 65 72 20 28 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 | to-number.(buffer-substring-no-p |
| 32c0 | 72 6f 70 65 72 74 69 65 73 0a 09 09 09 09 09 20 20 20 20 20 28 73 65 61 72 63 68 2d 66 6f 72 77 | roperties...........(search-forw |
| 32e0 | 61 72 64 20 22 59 3a 20 22 29 0a 09 09 09 09 09 20 20 20 20 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 | ard."Y:.")...........(line-end-p |
| 3300 | 6f 73 69 74 69 6f 6e 29 29 29 29 29 29 29 0a 09 28 65 72 72 6f 72 20 6e 69 6c 29 29 29 0a 20 20 | osition)))))))..(error.nil)))... |
| 3320 | 20 20 20 28 74 0a 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 69 6e 64 65 78 20 28 2b 20 28 70 6f | ...(t.......(let*.((index.(+.(po |
| 3340 | 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 09 28 66 72 61 6d 65 | s-tip-normalize-natnum....(frame |
| 3360 | 2d 70 61 72 61 6d 65 74 65 72 20 66 72 61 6d 65 20 27 6d 65 6e 75 2d 62 61 72 2d 6c 69 6e 65 73 | -parameter.frame.'menu-bar-lines |
| 3380 | 29 20 30 29 0a 09 09 20 20 20 20 20 20 20 28 70 6f 73 2d 74 69 70 2d 6e 6f 72 6d 61 6c 69 7a 65 | ).0)..........(pos-tip-normalize |
| 33a0 | 2d 6e 61 74 6e 75 6d 0a 09 09 09 28 66 72 61 6d 65 2d 70 61 72 61 6d 65 74 65 72 20 66 72 61 6d | -natnum....(frame-parameter.fram |
| 33c0 | 65 20 27 74 6f 6f 6c 2d 62 61 72 2d 6c 69 6e 65 73 29 20 31 29 29 29 0a 09 20 20 20 20 20 28 6f | e.'tool-bar-lines).1))).......(o |
| 33e0 | 66 66 73 65 74 20 28 6f 72 20 28 61 72 65 66 20 70 6f 73 2d 74 69 70 2d 66 72 61 6d 65 2d 6f 66 | ffset.(or.(aref.pos-tip-frame-of |
| 3400 | 66 73 65 74 2d 61 72 72 61 79 20 69 6e 64 65 78 29 0a 09 09 09 20 28 61 73 65 74 20 70 6f 73 2d | fset-array.index).....(aset.pos- |
| 3420 | 74 69 70 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 0a 09 09 09 | tip-frame-offset-array.index.... |
| 3440 | 20 20 20 20 20 20 20 28 70 6f 73 2d 74 69 70 2d 63 61 6c 69 62 72 61 74 65 2d 66 72 61 6d 65 2d | .......(pos-tip-calibrate-frame- |
| 3460 | 6f 66 66 73 65 74 20 66 72 61 6d 65 29 29 29 29 29 0a 09 28 69 66 20 6f 66 66 73 65 74 0a 09 20 | offset.frame)))))..(if.offset... |
| 3480 | 20 20 20 28 73 65 74 71 20 70 6f 73 2d 74 69 70 2d 73 61 76 65 64 2d 66 72 61 6d 65 2d 63 6f 6f | ...(setq.pos-tip-saved-frame-coo |
| 34a0 | 72 64 69 6e 61 74 65 73 0a 09 09 20 20 28 63 6f 6e 73 20 28 2b 20 28 65 76 61 6c 20 28 66 72 61 | rdinates.....(cons.(+.(eval.(fra |
| 34c0 | 6d 65 2d 70 61 72 61 6d 65 74 65 72 20 66 72 61 6d 65 20 27 6c 65 66 74 29 29 0a 09 09 09 20 20 | me-parameter.frame.'left))...... |
| 34e0 | 20 28 63 61 72 20 6f 66 66 73 65 74 29 29 0a 09 09 09 28 2b 20 28 65 76 61 6c 20 28 66 72 61 6d | .(car.offset))....(+.(eval.(fram |
| 3500 | 65 2d 70 61 72 61 6d 65 74 65 72 20 66 72 61 6d 65 20 27 74 6f 70 29 29 0a 09 09 09 20 20 20 28 | e-parameter.frame.'top)).......( |
| 3520 | 63 64 72 20 6f 66 66 73 65 74 29 29 29 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 6f 73 | cdr.offset))))))))))..(defun.pos |
| 3540 | 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 69 6f 6e 0a 20 20 28 | -tip-frame-relative-position...( |
| 3560 | 66 72 61 6d 65 31 20 66 72 61 6d 65 32 20 26 6f 70 74 69 6f 6e 61 6c 20 77 33 32 2d 66 72 61 6d | frame1.frame2.&optional.w32-fram |
| 3580 | 65 20 66 72 61 6d 65 2d 63 6f 6f 72 64 31 20 66 72 61 6d 65 2d 63 6f 6f 72 64 32 29 0a 20 20 22 | e.frame-coord1.frame-coord2)..." |
| 35a0 | 52 65 74 75 72 6e 20 74 68 65 20 70 69 78 65 6c 20 63 6f 6f 72 64 69 6e 61 74 65 73 20 6f 66 20 | Return.the.pixel.coordinates.of. |
| 35c0 | 46 52 41 4d 45 31 20 72 65 6c 61 74 69 76 65 20 74 6f 20 46 52 41 4d 45 32 0a 61 73 20 61 20 63 | FRAME1.relative.to.FRAME2.as.a.c |
| 35e0 | 6f 6e 73 20 63 65 6c 6c 20 28 4c 45 46 54 20 2e 20 54 4f 50 29 2e 0a 0a 57 33 32 2d 46 52 41 4d | ons.cell.(LEFT...TOP)...W32-FRAM |
| 3600 | 45 20 6e 6f 6e 2d 6e 69 6c 20 6d 65 61 6e 73 20 62 6f 74 68 20 6f 66 20 66 72 61 6d 65 73 20 61 | E.non-nil.means.both.of.frames.a |
| 3620 | 72 65 20 75 6e 64 65 72 20 60 77 33 32 27 20 77 69 6e 64 6f 77 20 73 79 73 74 65 6d 2e 0a 0a 46 | re.under.`w32'.window.system...F |
| 3640 | 52 41 4d 45 2d 43 4f 4f 52 44 31 20 61 6e 64 20 46 52 41 4d 45 2d 43 4f 4f 52 44 32 2c 20 69 66 | RAME-COORD1.and.FRAME-COORD2,.if |
| 3660 | 20 67 69 76 65 6e 2c 20 73 70 65 63 69 66 79 20 74 68 65 20 61 62 73 6f 6c 75 74 65 0a 63 6f 6f | .given,.specify.the.absolute.coo |
| 3680 | 72 64 69 6e 61 74 65 73 20 6f 66 20 46 52 41 4d 45 31 20 61 6e 64 20 46 52 41 4d 45 32 2c 20 72 | rdinates.of.FRAME1.and.FRAME2,.r |
| 36a0 | 65 73 70 65 63 74 69 76 65 6c 79 2c 20 77 68 69 63 68 20 6d 61 6b 65 20 74 68 65 0a 63 61 6c 63 | espectively,.which.make.the.calc |
| 36c0 | 75 6c 61 74 69 6f 6e 73 20 66 61 73 74 65 72 20 69 66 20 74 68 65 20 66 72 61 6d 65 73 20 68 61 | ulations.faster.if.the.frames.ha |
| 36e0 | 76 65 20 64 69 66 66 65 72 65 6e 74 20 68 65 69 67 68 74 73 20 6f 66 20 6d 65 6e 75 20 62 61 72 | ve.different.heights.of.menu.bar |
| 3700 | 73 0a 61 6e 64 20 74 6f 6f 6c 20 62 61 72 73 2e 22 0a 20 20 28 69 66 20 28 61 6e 64 20 28 65 71 | s.and.tool.bars."...(if.(and.(eq |
| 3720 | 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 09 09 28 66 72 | .(pos-tip-normalize-natnum...(fr |
| 3740 | 61 6d 65 2d 70 61 72 61 6d 65 74 65 72 20 66 72 61 6d 65 31 20 27 6d 65 6e 75 2d 62 61 72 2d 6c | ame-parameter.frame1.'menu-bar-l |
| 3760 | 69 6e 65 73 29 29 0a 09 20 20 20 20 20 20 20 28 70 6f 73 2d 74 69 70 2d 6e 6f 72 6d 61 6c 69 7a | ines)).........(pos-tip-normaliz |
| 3780 | 65 2d 6e 61 74 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 | e-natnum...(frame-parameter.fram |
| 37a0 | 65 32 20 27 6d 65 6e 75 2d 62 61 72 2d 6c 69 6e 65 73 29 29 29 0a 09 20 20 20 28 6f 72 20 77 33 | e2.'menu-bar-lines))).....(or.w3 |
| 37c0 | 32 2d 66 72 61 6d 65 0a 09 20 20 20 20 20 20 20 28 65 71 20 28 70 6f 73 2d 74 69 70 2d 6e 6f 72 | 2-frame.........(eq.(pos-tip-nor |
| 37e0 | 6d 61 6c 69 7a 65 2d 6e 61 74 6e 75 6d 0a 09 09 20 20 20 20 28 66 72 61 6d 65 2d 70 61 72 61 6d | malize-natnum.......(frame-param |
| 3800 | 65 74 65 72 20 66 72 61 6d 65 31 20 27 74 6f 6f 6c 2d 62 61 72 2d 6c 69 6e 65 73 29 29 0a 09 09 | eter.frame1.'tool-bar-lines))... |
| 3820 | 20 20 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 09 09 20 | ...(pos-tip-normalize-natnum.... |
| 3840 | 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 32 20 27 74 6f 6f 6c | ...(frame-parameter.frame2.'tool |
| 3860 | 2d 62 61 72 2d 6c 69 6e 65 73 29 29 29 29 29 0a 20 20 20 20 20 20 28 63 6f 6e 73 20 28 2d 20 28 | -bar-lines))))).......(cons.(-.( |
| 3880 | 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 31 20 27 6c 65 | eval.(frame-parameter.frame1.'le |
| 38a0 | 66 74 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 61 72 61 6d 65 | ft)).........(eval.(frame-parame |
| 38c0 | 74 65 72 20 66 72 61 6d 65 32 20 27 6c 65 66 74 29 29 29 0a 09 20 20 20 20 28 2d 20 28 65 76 61 | ter.frame2.'left)))......(-.(eva |
| 38e0 | 6c 20 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 74 6f 70 29 29 | l.(frame-parameter.frame1.'top)) |
| 3900 | 0a 09 20 20 20 20 20 20 20 28 65 76 61 6c 20 28 66 72 61 6d 65 2d 70 61 72 61 6d 65 74 65 72 20 | .........(eval.(frame-parameter. |
| 3920 | 66 72 61 6d 65 32 20 27 74 6f 70 29 29 29 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 66 72 61 6d | frame2.'top)))).....(unless.fram |
| 3940 | 65 2d 63 6f 6f 72 64 31 0a 20 20 20 20 20 20 28 73 65 74 71 20 66 72 61 6d 65 2d 63 6f 6f 72 64 | e-coord1.......(setq.frame-coord |
| 3960 | 31 20 28 6c 65 74 20 28 70 6f 73 2d 74 69 70 2d 73 61 76 65 64 2d 66 72 61 6d 65 2d 63 6f 6f 72 | 1.(let.(pos-tip-saved-frame-coor |
| 3980 | 64 69 6e 61 74 65 73 29 0a 09 09 09 20 20 20 28 70 6f 73 2d 74 69 70 2d 66 72 61 6d 65 2d 74 6f | dinates).......(pos-tip-frame-to |
| 39a0 | 70 2d 6c 65 66 74 2d 63 6f 6f 72 64 69 6e 61 74 65 73 20 66 72 61 6d 65 31 29 29 29 29 0a 20 20 | p-left-coordinates.frame1))))... |
| 39c0 | 20 20 28 75 6e 6c 65 73 73 20 66 72 61 6d 65 2d 63 6f 6f 72 64 32 0a 20 20 20 20 20 20 28 73 65 | ..(unless.frame-coord2.......(se |
| 39e0 | 74 71 20 66 72 61 6d 65 2d 63 6f 6f 72 64 32 20 28 6c 65 74 20 28 70 6f 73 2d 74 69 70 2d 73 61 | tq.frame-coord2.(let.(pos-tip-sa |
| 3a00 | 76 65 64 2d 66 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 | ved-frame-coordinates).......(po |
| 3a20 | 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 64 69 6e 61 74 65 73 | s-tip-frame-top-left-coordinates |
| 3a40 | 20 66 72 61 6d 65 32 29 29 29 29 0a 20 20 20 20 28 63 6f 6e 73 20 28 2d 20 28 63 61 72 20 66 72 | .frame2)))).....(cons.(-.(car.fr |
| 3a60 | 61 6d 65 2d 63 6f 6f 72 64 31 29 20 28 63 61 72 20 66 72 61 6d 65 2d 63 6f 6f 72 64 32 29 29 0a | ame-coord1).(car.frame-coord2)). |
| 3a80 | 09 20 20 28 2d 20 28 63 64 72 20 66 72 61 6d 65 2d 63 6f 6f 72 64 31 29 20 28 63 64 72 20 66 72 | ...(-.(cdr.frame-coord1).(cdr.fr |
| 3aa0 | 61 6d 65 2d 63 6f 6f 72 64 32 29 29 29 29 29 0a 0a 28 64 65 66 76 61 72 20 70 6f 73 2d 74 69 70 | ame-coord2)))))..(defvar.pos-tip |
| 3ac0 | 2d 75 70 70 65 72 73 69 64 65 2d 70 20 6e 69 6c 0a 20 20 22 4e 6f 6e 2d 6e 69 6c 20 69 6e 64 69 | -upperside-p.nil..."Non-nil.indi |
| 3ae0 | 63 61 74 65 73 20 74 68 65 20 6c 61 74 65 73 74 20 72 65 73 75 6c 74 20 6f 66 20 60 70 6f 73 2d | cates.the.latest.result.of.`pos- |
| 3b00 | 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 27 0a 77 61 73 20 | tip-compute-pixel-position'.was. |
| 3b20 | 75 70 70 65 72 20 74 68 61 6e 20 74 68 65 20 6c 6f 63 61 74 69 6f 6e 20 73 70 65 63 69 66 69 65 | upper.than.the.location.specifie |
| 3b40 | 64 20 62 79 20 74 68 65 20 61 72 67 75 6d 65 6e 74 73 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 70 | d.by.the.arguments.")..(defvar.p |
| 3b60 | 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 |
| 3b80 | 74 20 6e 69 6c 0a 20 20 22 44 69 73 70 6c 61 79 20 70 69 78 65 6c 20 73 69 7a 65 20 65 66 66 65 | t.nil..."Display.pixel.size.effe |
| 3ba0 | 63 74 69 76 65 20 66 6f 72 20 73 68 6f 77 69 6e 67 20 74 6f 6f 6c 74 69 70 20 69 6e 20 4d 53 2d | ctive.for.showing.tooltip.in.MS- |
| 3bc0 | 57 69 6e 64 6f 77 73 20 64 65 73 6b 74 6f 70 2e 0a 54 68 69 73 20 64 6f 65 73 6e 27 74 20 69 6e | Windows.desktop..This.doesn't.in |
| 3be0 | 63 6c 75 64 65 20 74 68 65 20 74 61 73 6b 62 61 72 20 61 72 65 61 2c 20 73 6f 20 69 73 6e 27 74 | clude.the.taskbar.area,.so.isn't |
| 3c00 | 20 73 61 6d 65 20 61 73 20 61 63 74 75 61 6c 20 64 69 73 70 6c 61 79 20 73 69 7a 65 2e 22 29 0a | .same.as.actual.display.size."). |
| 3c20 | 0a 28 64 65 66 75 6e 20 70 6f 73 2d 74 69 70 2d 63 6f 6d 70 75 74 65 2d 70 69 78 65 6c 2d 70 6f | .(defun.pos-tip-compute-pixel-po |
| 3c40 | 73 69 74 69 6f 6e 0a 20 20 28 26 6f 70 74 69 6f 6e 61 6c 20 70 6f 73 20 77 69 6e 64 6f 77 20 70 | sition...(&optional.pos.window.p |
| 3c60 | 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 65 2d 63 6f | ixel-width.pixel-height.frame-co |
| 3c80 | 6f 72 64 69 6e 61 74 65 73 20 64 78 20 64 79 29 0a 20 20 22 52 65 74 75 72 6e 20 70 69 78 65 6c | ordinates.dx.dy)..."Return.pixel |
| 3ca0 | 20 70 6f 73 69 74 69 6f 6e 20 6f 66 20 50 4f 53 20 69 6e 20 57 49 4e 44 4f 57 20 6c 69 6b 65 20 | .position.of.POS.in.WINDOW.like. |
| 3cc0 | 28 58 20 2e 20 59 29 2c 20 77 68 69 63 68 20 69 6e 64 69 63 61 74 65 73 0a 74 68 65 20 61 62 73 | (X...Y),.which.indicates.the.abs |
| 3ce0 | 6f 6c 75 74 65 20 6f 72 20 72 65 6c 61 74 69 76 65 20 63 6f 6f 72 64 69 6e 61 74 65 73 20 6f 66 | olute.or.relative.coordinates.of |
| 3d00 | 20 62 6f 74 74 6f 6d 20 6c 65 66 74 20 63 6f 72 6e 65 72 20 6f 66 20 74 68 65 20 6f 62 6a 65 63 | .bottom.left.corner.of.the.objec |
| 3d20 | 74 2e 0a 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 | t...Omitting.POS.and.WINDOW.mean |
| 3d40 | 73 20 75 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 | s.use.current.position.and.selec |
| 3d60 | 74 65 64 20 77 69 6e 64 6f 77 2c 0a 72 65 73 70 65 63 74 69 76 65 6c 79 2e 0a 0a 49 66 20 50 49 | ted.window,.respectively...If.PI |
| 3d80 | 58 45 4c 2d 57 49 44 54 48 20 61 6e 64 20 50 49 58 45 4c 2d 48 45 49 47 48 54 20 61 72 65 20 67 | XEL-WIDTH.and.PIXEL-HEIGHT.are.g |
| 3da0 | 69 76 65 6e 2c 20 74 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 61 73 73 75 6d 65 73 20 74 68 65 73 | iven,.this.function.assumes.thes |
| 3dc0 | 65 0a 76 61 6c 75 65 73 20 61 73 20 74 68 65 20 73 69 7a 65 20 6f 66 20 73 6d 61 6c 6c 20 77 69 | e.values.as.the.size.of.small.wi |
| 3de0 | 6e 64 6f 77 20 6c 69 6b 65 20 74 6f 6f 6c 74 69 70 20 77 68 69 63 68 20 69 73 20 6c 6f 63 61 74 | ndow.like.tooltip.which.is.locat |
| 3e00 | 65 64 20 61 72 6f 75 6e 64 20 74 68 65 0a 6f 62 6a 65 63 74 20 61 74 20 50 4f 53 2e 20 54 68 65 | ed.around.the.object.at.POS..The |
| 3e20 | 73 65 20 76 61 6c 75 65 73 20 61 72 65 20 75 73 65 64 20 74 6f 20 61 64 6a 75 73 74 20 74 68 65 | se.values.are.used.to.adjust.the |
| 3e40 | 20 6c 6f 63 61 74 69 6f 6e 20 69 6e 20 6f 72 64 65 72 20 74 68 61 74 0a 74 68 65 20 74 6f 6f 6c | .location.in.order.that.the.tool |
| 3e60 | 74 69 70 20 77 6f 6e 27 74 20 64 69 73 61 70 70 65 61 72 20 62 79 20 73 74 69 63 6b 69 6e 67 20 | tip.won't.disappear.by.sticking. |
| 3e80 | 6f 75 74 20 6f 66 20 74 68 65 20 64 69 73 70 6c 61 79 2e 20 42 79 20 72 65 66 65 72 72 69 6e 67 | out.of.the.display..By.referring |
| 3ea0 | 0a 74 68 65 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 69 64 65 | .the.variable.`pos-tip-upperside |
| 3ec0 | 2d 70 27 20 61 66 74 65 72 20 63 61 6c 6c 69 6e 67 20 74 68 69 73 20 66 75 6e 63 74 69 6f 6e 2c | -p'.after.calling.this.function, |
| 3ee0 | 20 75 73 65 72 20 63 61 6e 0a 65 78 61 6d 69 6e 65 20 77 68 65 74 68 65 72 20 74 68 65 20 74 6f | .user.can.examine.whether.the.to |
| 3f00 | 6f 6c 74 69 70 20 77 69 6c 6c 20 62 65 20 6c 6f 63 61 74 65 64 20 61 62 6f 76 65 20 74 68 65 20 | oltip.will.be.located.above.the. |
| 3f20 | 73 70 65 63 69 66 69 65 64 20 70 6f 73 69 74 69 6f 6e 2e 0a 0a 49 66 20 46 52 41 4d 45 2d 43 4f | specified.position...If.FRAME-CO |
| 3f40 | 4f 52 44 49 4e 41 54 45 53 20 69 73 20 6f 6d 69 74 74 65 64 20 6f 72 20 6e 69 6c 2c 20 61 75 74 | ORDINATES.is.omitted.or.nil,.aut |
| 3f60 | 6f 6d 61 74 69 63 61 6c 6c 79 20 6f 62 74 61 69 6e 20 74 68 65 20 61 62 73 6f 6c 75 74 65 0a 63 | omatically.obtain.the.absolute.c |
| 3f80 | 6f 6f 72 64 69 6e 61 74 65 73 20 6f 66 20 74 68 65 20 74 6f 70 20 6c 65 66 74 20 63 6f 72 6e 65 | oordinates.of.the.top.left.corne |
| 3fa0 | 72 20 6f 66 20 66 72 61 6d 65 20 77 68 69 63 68 20 57 49 4e 44 4f 57 20 69 73 20 6f 6e 2e 20 48 | r.of.frame.which.WINDOW.is.on..H |
| 3fc0 | 65 72 65 2c 0a 60 74 6f 70 20 6c 65 66 74 20 63 6f 72 6e 65 72 20 6f 66 20 66 72 61 6d 65 27 20 | ere,.`top.left.corner.of.frame'. |
| 3fe0 | 72 65 70 72 65 73 65 6e 74 73 20 74 68 65 20 6f 72 69 67 69 6e 20 6f 66 20 60 77 69 6e 64 6f 77 | represents.the.origin.of.`window |
| 4000 | 2d 70 69 78 65 6c 2d 65 64 67 65 73 27 0a 61 6e 64 20 69 74 73 20 63 6f 6f 72 64 69 6e 61 74 65 | -pixel-edges'.and.its.coordinate |
| 4020 | 73 20 61 72 65 20 65 73 73 65 6e 74 69 61 6c 20 66 6f 72 20 63 61 6c 63 75 6c 61 74 69 6e 67 20 | s.are.essential.for.calculating. |
| 4040 | 74 68 65 20 72 65 74 75 72 6e 20 76 61 6c 75 65 20 61 73 0a 61 62 73 6f 6c 75 74 65 20 63 6f 6f | the.return.value.as.absolute.coo |
| 4060 | 72 64 69 6e 61 74 65 73 2e 20 49 66 20 61 20 63 6f 6e 73 20 63 65 6c 6c 20 6c 69 6b 65 20 28 4c | rdinates..If.a.cons.cell.like.(L |
| 4080 | 45 46 54 20 2e 20 54 4f 50 29 2c 20 73 70 65 63 69 66 69 65 73 20 74 68 65 0a 66 72 61 6d 65 20 | EFT...TOP),.specifies.the.frame. |
| 40a0 | 61 62 73 6f 6c 75 74 65 20 6c 6f 63 61 74 69 6f 6e 20 61 6e 64 20 6d 61 6b 65 73 20 74 68 65 20 | absolute.location.and.makes.the. |
| 40c0 | 63 61 6c 63 75 6c 61 74 69 6f 6e 20 73 6c 69 67 68 74 6c 79 20 66 61 73 74 65 72 2c 20 62 75 74 | calculation.slightly.faster,.but |
| 40e0 | 20 63 61 6e 0a 62 65 20 75 73 65 64 20 6f 6e 6c 79 20 77 68 65 6e 20 69 74 27 73 20 63 6c 65 61 | .can.be.used.only.when.it's.clea |
| 4100 | 72 20 74 68 61 74 20 66 72 61 6d 65 20 69 73 20 69 6e 20 74 68 65 20 73 70 65 63 69 66 69 65 64 | r.that.frame.is.in.the.specified |
| 4120 | 20 70 6f 73 69 74 69 6f 6e 2e 20 55 73 65 72 73 0a 63 61 6e 20 67 65 74 20 74 68 65 20 6c 61 74 | .position..Users.can.get.the.lat |
| 4140 | 65 73 74 20 76 61 6c 75 65 73 20 6f 66 20 66 72 61 6d 65 20 63 6f 6f 72 64 69 6e 61 74 65 73 20 | est.values.of.frame.coordinates. |
| 4160 | 66 6f 72 20 75 73 69 6e 67 20 69 6e 20 74 68 65 20 6e 65 78 74 20 63 61 6c 6c 0a 62 79 20 72 65 | for.using.in.the.next.call.by.re |
| 4180 | 66 65 72 72 69 6e 67 20 74 68 65 20 76 61 72 69 61 62 6c 65 20 60 70 6f 73 2d 74 69 70 2d 73 61 | ferring.the.variable.`pos-tip-sa |
| 41a0 | 76 65 64 2d 66 72 61 6d 65 2d 63 6f 6f 72 64 69 6e 61 74 65 73 27 20 6a 75 73 74 20 61 66 74 65 | ved-frame-coordinates'.just.afte |
| 41c0 | 72 0a 63 61 6c 6c 69 6e 67 20 74 68 69 73 20 66 75 6e 63 74 69 6f 6e 2e 20 4f 74 68 65 72 77 69 | r.calling.this.function..Otherwi |
| 41e0 | 73 65 2c 20 46 52 41 4d 45 2d 43 4f 4f 52 44 49 4e 41 54 45 53 20 60 72 65 6c 61 74 69 76 65 27 | se,.FRAME-COORDINATES.`relative' |
| 4200 | 20 6d 65 61 6e 73 20 72 65 74 75 72 6e 0a 70 69 78 65 6c 20 63 6f 6f 72 64 69 6e 61 74 65 73 20 | .means.return.pixel.coordinates. |
| 4220 | 6f 66 20 74 68 65 20 6f 62 6a 65 63 74 20 72 65 6c 61 74 69 76 65 20 74 6f 20 74 68 65 20 74 6f | of.the.object.relative.to.the.to |
| 4240 | 70 20 6c 65 66 74 20 63 6f 72 6e 65 72 20 6f 66 20 74 68 65 20 66 72 61 6d 65 2e 0a 54 68 69 73 | p.left.corner.of.the.frame..This |
| 4260 | 20 69 73 20 74 68 65 20 73 61 6d 65 20 65 66 66 65 63 74 20 61 73 20 60 70 6f 73 2d 74 69 70 2d | .is.the.same.effect.as.`pos-tip- |
| 4280 | 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 20 6e 6f 6e | use-relative-coordinates'.is.non |
| 42a0 | 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 61 6c 20 6f | -nil...DX.specifies.horizontal.o |
| 42c0 | 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 73 20 76 65 | ffset.in.pixel...DY.specifies.ve |
| 42e0 | 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 20 6d 61 6b | rtical.offset.in.pixel..This.mak |
| 4300 | 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 68 6f 75 74 | es.the.calculations.done.without |
| 4320 | 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 62 6a 65 63 | .considering.the.height.of.objec |
| 4340 | 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 74 20 62 65 | t.at.POS,.so.the.object.might.be |
| 4360 | 0a 68 69 64 64 65 6e 20 62 79 20 74 68 65 20 74 6f 6f 6c 74 69 70 2e 22 0a 20 20 28 6c 65 74 2a | .hidden.by.the.tooltip."...(let* |
| 4380 | 20 28 28 66 72 61 6d 65 20 28 77 69 6e 64 6f 77 2d 66 72 61 6d 65 20 28 6f 72 20 77 69 6e 64 6f | .((frame.(window-frame.(or.windo |
| 43a0 | 77 20 28 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 29 29 29 29 0a 09 20 28 77 33 32 2d 66 72 | w.(selected-window))))...(w32-fr |
| 43c0 | 61 6d 65 20 28 65 71 20 28 70 6f 73 2d 74 69 70 2d 77 69 6e 64 6f 77 2d 73 79 73 74 65 6d 20 66 | ame.(eq.(pos-tip-window-system.f |
| 43e0 | 72 61 6d 65 29 20 27 77 33 32 29 29 0a 09 20 28 72 65 6c 61 74 69 76 65 20 28 6f 72 20 70 6f 73 | rame).'w32))...(relative.(or.pos |
| 4400 | 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 73 0a 09 09 | -tip-use-relative-coordinates... |
| 4420 | 20 20 20 20 20 20 20 28 65 71 20 66 72 61 6d 65 2d 63 6f 6f 72 64 69 6e 61 74 65 73 20 27 72 65 | .......(eq.frame-coordinates.'re |
| 4440 | 6c 61 74 69 76 65 29 0a 09 09 20 20 20 20 20 20 20 28 61 6e 64 20 77 33 32 2d 66 72 61 6d 65 0a | lative)..........(and.w32-frame. |
| 4460 | 09 09 09 20 20 20 20 28 6e 75 6c 6c 20 70 6f 73 2d 74 69 70 2d 77 33 32 2d 73 61 76 65 64 2d 6d | .......(null.pos-tip-w32-saved-m |
| 4480 | 61 78 2d 77 69 64 74 68 2d 68 65 69 67 68 74 29 29 29 29 0a 09 20 28 66 72 61 6d 65 2d 63 6f 6f | ax-width-height))))...(frame-coo |
| 44a0 | 72 64 20 28 6f 72 20 28 61 6e 64 20 72 65 6c 61 74 69 76 65 20 27 28 30 20 2e 20 30 29 29 0a 09 | rd.(or.(and.relative.'(0...0)).. |
| 44c0 | 09 09 20 20 66 72 61 6d 65 2d 63 6f 6f 72 64 69 6e 61 74 65 73 0a 09 09 09 20 20 28 70 6f 73 2d | ....frame-coordinates......(pos- |
| 44e0 | 74 69 70 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 | tip-frame-top-left-coordinates.f |
| 4500 | 72 61 6d 65 29 0a 09 09 09 20 20 28 70 72 6f 67 6e 0a 09 09 09 20 20 20 20 28 73 65 74 71 20 72 | rame)......(progn........(setq.r |
| 4520 | 65 6c 61 74 69 76 65 20 74 0a 09 09 09 09 20 20 70 6f 73 2d 74 69 70 2d 75 73 65 2d 72 65 6c 61 | elative.t.......pos-tip-use-rela |
| 4540 | 74 69 76 65 2d 63 6f 6f 72 64 69 6e 61 74 65 73 20 74 29 0a 09 09 09 20 20 27 28 30 20 2e 20 30 | tive-coordinates.t)......'(0...0 |
| 4560 | 29 29 29 29 0a 09 20 28 70 6f 73 6e 20 28 70 6f 73 6e 2d 61 74 2d 70 6f 69 6e 74 20 28 6f 72 20 | ))))...(posn.(posn-at-point.(or. |
| 4580 | 70 6f 73 20 28 77 69 6e 64 6f 77 2d 70 6f 69 6e 74 20 77 69 6e 64 6f 77 29 29 20 77 69 6e 64 6f | pos.(window-point.window)).windo |
| 45a0 | 77 29 29 0a 09 20 28 6c 69 6e 65 20 28 63 64 72 20 28 70 6f 73 6e 2d 61 63 74 75 61 6c 2d 63 6f | w))...(line.(cdr.(posn-actual-co |
| 45c0 | 6c 2d 72 6f 77 20 70 6f 73 6e 29 29 29 0a 09 20 28 6c 69 6e 65 2d 68 65 69 67 68 74 20 28 61 6e | l-row.posn)))...(line-height.(an |
| 45e0 | 64 20 6c 69 6e 65 0a 09 09 09 20 20 20 28 6f 72 20 28 77 69 6e 64 6f 77 2d 6c 69 6e 65 2d 68 65 | d.line.......(or.(window-line-he |
| 4600 | 69 67 68 74 20 6c 69 6e 65 20 77 69 6e 64 6f 77 29 0a 09 09 09 20 20 20 20 20 20 20 28 61 6e 64 | ight.line.window)...........(and |
| 4620 | 20 28 72 65 64 69 73 70 6c 61 79 20 74 29 0a 09 09 09 09 20 20 20 20 28 77 69 6e 64 6f 77 2d 6c | .(redisplay.t).........(window-l |
| 4640 | 69 6e 65 2d 68 65 69 67 68 74 20 6c 69 6e 65 20 77 69 6e 64 6f 77 29 29 29 29 29 0a 09 20 28 78 | ine-height.line.window)))))...(x |
| 4660 | 2d 79 20 28 6f 72 20 28 70 6f 73 6e 2d 78 2d 79 20 70 6f 73 6e 29 0a 09 09 20 20 28 6c 65 74 20 | -y.(or.(posn-x-y.posn).....(let. |
| 4680 | 28 28 67 65 6f 6d 20 28 70 6f 73 2d 76 69 73 69 62 6c 65 2d 69 6e 2d 77 69 6e 64 6f 77 2d 70 0a | ((geom.(pos-visible-in-window-p. |
| 46a0 | 09 09 09 20 20 20 20 20 20 20 28 6f 72 20 70 6f 73 20 28 77 69 6e 64 6f 77 2d 70 6f 69 6e 74 20 | ..........(or.pos.(window-point. |
| 46c0 | 77 69 6e 64 6f 77 29 29 20 77 69 6e 64 6f 77 20 74 29 29 29 0a 09 09 20 20 20 20 28 61 6e 64 20 | window)).window.t))).......(and. |
| 46e0 | 67 65 6f 6d 20 28 63 6f 6e 73 20 28 63 61 72 20 67 65 6f 6d 29 20 28 63 61 64 72 20 67 65 6f 6d | geom.(cons.(car.geom).(cadr.geom |
| 4700 | 29 29 29 29 0a 09 09 20 20 27 28 30 20 2e 20 30 29 29 29 0a 09 20 28 78 20 28 2b 20 28 63 61 72 | )))).....'(0...0)))...(x.(+.(car |
| 4720 | 20 66 72 61 6d 65 2d 63 6f 6f 72 64 29 0a 09 20 20 20 20 20 20 20 28 63 61 72 20 28 77 69 6e 64 | .frame-coord).........(car.(wind |
| 4740 | 6f 77 2d 69 6e 73 69 64 65 2d 70 69 78 65 6c 2d 65 64 67 65 73 20 77 69 6e 64 6f 77 29 29 0a 09 | ow-inside-pixel-edges.window)).. |
| 4760 | 20 20 20 20 20 20 20 28 63 61 72 20 78 2d 79 29 0a 09 20 20 20 20 20 20 20 28 6f 72 20 64 78 20 | .......(car.x-y).........(or.dx. |
| 4780 | 30 29 29 29 0a 09 20 28 79 30 20 28 2b 20 28 63 64 72 20 66 72 61 6d 65 2d 63 6f 6f 72 64 29 0a | 0)))...(y0.(+.(cdr.frame-coord). |
| 47a0 | 09 09 28 63 61 64 72 20 28 77 69 6e 64 6f 77 2d 70 69 78 65 6c 2d 65 64 67 65 73 20 77 69 6e 64 | ..(cadr.(window-pixel-edges.wind |
| 47c0 | 6f 77 29 29 0a 09 09 28 6f 72 20 28 6e 74 68 20 32 20 6c 69 6e 65 2d 68 65 69 67 68 74 29 20 28 | ow))...(or.(nth.2.line-height).( |
| 47e0 | 63 64 72 20 78 2d 79 29 29 29 29 0a 09 20 28 79 20 28 2b 20 79 30 0a 09 20 20 20 20 20 20 20 28 | cdr.x-y))))...(y.(+.y0.........( |
| 4800 | 6f 72 20 64 79 0a 09 09 20 20 20 28 63 61 72 20 6c 69 6e 65 2d 68 65 69 67 68 74 29 0a 09 09 20 | or.dy......(car.line-height).... |
| 4820 | 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 28 77 69 6e 64 6f 77 2d 62 | ..(with-current-buffer.(window-b |
| 4840 | 75 66 66 65 72 20 77 69 6e 64 6f 77 29 0a 09 09 20 20 20 20 20 28 63 6f 6e 64 0a 09 09 20 20 20 | uffer.window)........(cond...... |
| 4860 | 20 20 20 3b 3b 20 60 70 6f 73 6e 2d 6f 62 6a 65 63 74 2d 77 69 64 74 68 2d 68 65 69 67 68 74 27 | ...;;.`posn-object-width-height' |
| 4880 | 20 72 65 74 75 72 6e 73 20 61 6e 20 69 6e 63 6f 72 72 65 63 74 20 76 61 6c 75 65 0a 09 09 20 20 | .returns.an.incorrect.value..... |
| 48a0 | 20 20 20 20 3b 3b 20 77 68 65 6e 20 74 68 65 20 68 65 61 64 65 72 20 6c 69 6e 65 20 69 73 20 64 | ....;;.when.the.header.line.is.d |
| 48c0 | 69 73 70 6c 61 79 65 64 20 28 45 6d 61 63 73 20 62 75 67 20 23 34 34 32 36 29 2e 0a 09 09 20 20 | isplayed.(Emacs.bug.#4426)...... |
| 48e0 | 20 20 20 20 28 28 61 6e 64 20 70 6f 73 6e 0a 09 09 09 20 20 20 20 28 6e 75 6c 6c 20 68 65 61 64 | ....((and.posn........(null.head |
| 4900 | 65 72 2d 6c 69 6e 65 2d 66 6f 72 6d 61 74 29 29 0a 09 09 20 20 20 20 20 20 20 28 63 64 72 20 28 | er-line-format))..........(cdr.( |
| 4920 | 70 6f 73 6e 2d 6f 62 6a 65 63 74 2d 77 69 64 74 68 2d 68 65 69 67 68 74 20 70 6f 73 6e 29 29 29 | posn-object-width-height.posn))) |
| 4940 | 0a 09 09 20 20 20 20 20 20 28 28 61 6e 64 20 28 62 6f 75 6e 64 2d 61 6e 64 2d 74 72 75 65 2d 70 | .........((and.(bound-and-true-p |
| 4960 | 20 74 65 78 74 2d 73 63 61 6c 65 2d 6d 6f 64 65 29 0a 09 09 09 20 20 20 20 28 6e 6f 74 20 28 7a | .text-scale-mode)........(not.(z |
| 4980 | 65 72 6f 70 20 28 77 69 74 68 2d 6e 6f 2d 77 61 72 6e 69 6e 67 73 0a 09 09 09 09 09 20 20 74 65 | erop.(with-no-warnings........te |
| 49a0 | 78 74 2d 73 63 61 6c 65 2d 6d 6f 64 65 2d 61 6d 6f 75 6e 74 29 29 29 29 0a 09 09 20 20 20 20 20 | xt-scale-mode-amount))))........ |
| 49c0 | 20 20 28 72 6f 75 6e 64 20 28 2a 20 28 66 72 61 6d 65 2d 63 68 61 72 2d 68 65 69 67 68 74 20 66 | ..(round.(*.(frame-char-height.f |
| 49e0 | 72 61 6d 65 29 0a 09 09 09 09 20 28 77 69 74 68 2d 6e 6f 2d 77 61 72 6e 69 6e 67 73 0a 09 09 09 | rame)......(with-no-warnings.... |
| 4a00 | 09 20 20 20 28 65 78 70 74 20 74 65 78 74 2d 73 63 61 6c 65 2d 6d 6f 64 65 2d 73 74 65 70 0a 09 | ....(expt.text-scale-mode-step.. |
| 4a20 | 09 09 09 09 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 29 29 | .....text-scale-mode-amount))))) |
| 4a40 | 0a 09 09 20 20 20 20 20 20 28 74 0a 09 09 20 20 20 20 20 20 20 28 66 72 61 6d 65 2d 63 68 61 72 | .........(t..........(frame-char |
| 4a60 | 2d 68 65 69 67 68 74 20 66 72 61 6d 65 29 29 29 29 29 29 29 0a 09 20 78 6d 61 78 20 79 6d 61 78 | -height.frame)))))))...xmax.ymax |
| 4a80 | 29 0a 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 28 72 65 6c 61 74 69 76 65 0a 20 20 20 20 20 | ).....(cond......(relative...... |
| 4aa0 | 20 28 73 65 74 71 20 78 6d 61 78 20 28 66 72 61 6d 65 2d 70 69 78 65 6c 2d 77 69 64 74 68 20 66 | .(setq.xmax.(frame-pixel-width.f |
| 4ac0 | 72 61 6d 65 29 0a 09 20 20 20 20 79 6d 61 78 20 28 66 72 61 6d 65 2d 70 69 78 65 6c 2d 68 65 69 | rame)......ymax.(frame-pixel-hei |
| 4ae0 | 67 68 74 20 66 72 61 6d 65 29 29 29 0a 20 20 20 20 20 28 77 33 32 2d 66 72 61 6d 65 0a 20 20 20 | ght.frame)))......(w32-frame.... |
| 4b00 | 20 20 20 28 73 65 74 71 20 78 6d 61 78 20 28 63 61 72 20 70 6f 73 2d 74 69 70 2d 77 33 32 2d 73 | ...(setq.xmax.(car.pos-tip-w32-s |
| 4b20 | 61 76 65 64 2d 6d 61 78 2d 77 69 64 74 68 2d 68 65 69 67 68 74 29 0a 09 20 20 20 20 79 6d 61 78 | aved-max-width-height)......ymax |
| 4b40 | 20 28 63 64 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 74 | .(cdr.pos-tip-w32-saved-max-widt |
| 4b60 | 68 2d 68 65 69 67 68 74 29 29 29 0a 20 20 20 20 20 28 74 0a 20 20 20 20 20 20 28 73 65 74 71 20 | h-height)))......(t.......(setq. |
| 4b80 | 78 6d 61 78 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 | xmax.(x-display-pixel-width.fram |
| 4ba0 | 65 29 0a 09 20 20 20 20 79 6d 61 78 20 28 78 2d 64 69 73 70 6c 61 79 2d 70 69 78 65 6c 2d 68 65 | e)......ymax.(x-display-pixel-he |
| 4bc0 | 69 67 68 74 20 66 72 61 6d 65 29 29 29 29 0a 20 20 20 20 28 73 65 74 71 20 70 6f 73 2d 74 69 70 | ight.frame)))).....(setq.pos-tip |
| 4be0 | 2d 75 70 70 65 72 73 69 64 65 2d 70 20 28 3e 20 28 2b 20 79 20 28 6f 72 20 70 69 78 65 6c 2d 68 | -upperside-p.(>.(+.y.(or.pixel-h |
| 4c00 | 65 69 67 68 74 20 30 29 29 0a 09 09 09 09 20 79 6d 61 78 29 29 0a 20 20 20 20 28 63 6f 6e 73 20 | eight.0))......ymax)).....(cons. |
| 4c20 | 28 6d 61 78 20 30 20 28 6d 69 6e 20 78 20 28 2d 20 78 6d 61 78 20 28 6f 72 20 70 69 78 65 6c 2d | (max.0.(min.x.(-.xmax.(or.pixel- |
| 4c40 | 77 69 64 74 68 20 30 29 29 29 29 0a 09 20 20 28 6d 61 78 20 30 20 28 69 66 20 70 6f 73 2d 74 69 | width.0))))....(max.0.(if.pos-ti |
| 4c60 | 70 2d 75 70 70 65 72 73 69 64 65 2d 70 0a 09 09 20 20 20 20 20 28 2d 20 28 69 66 20 64 79 20 79 | p-upperside-p........(-.(if.dy.y |
| 4c80 | 6d 61 78 20 79 30 29 20 28 6f 72 20 70 69 78 65 6c 2d 68 65 69 67 68 74 20 30 29 29 0a 09 09 20 | max.y0).(or.pixel-height.0)).... |
| 4ca0 | 20 20 79 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 6f 73 2d 74 69 70 2d 63 61 6e 63 65 6c 2d | ..y)))))..(defun.pos-tip-cancel- |
| 4cc0 | 74 69 6d 65 72 20 28 29 0a 20 20 22 43 61 6e 63 65 6c 20 74 69 6d 65 6f 75 74 20 6f 66 20 74 6f | timer.()..."Cancel.timeout.of.to |
| 4ce0 | 6f 6c 74 69 70 2e 22 0a 20 20 28 6d 61 70 63 20 28 6c 61 6d 62 64 61 20 28 74 69 6d 65 72 29 0a | oltip."...(mapc.(lambda.(timer). |
| 4d00 | 09 20 20 28 69 66 20 28 65 71 20 28 61 72 65 66 20 74 69 6d 65 72 20 35 29 20 27 78 2d 68 69 64 | ...(if.(eq.(aref.timer.5).'x-hid |
| 4d20 | 65 2d 74 69 70 29 0a 09 20 20 20 20 20 20 28 63 61 6e 63 65 6c 2d 74 69 6d 65 72 20 74 69 6d 65 | e-tip)........(cancel-timer.time |
| 4d40 | 72 29 29 29 0a 09 74 69 6d 65 72 2d 6c 69 73 74 29 29 0a 0a 28 64 65 66 75 6e 20 70 6f 73 2d 74 | r)))..timer-list))..(defun.pos-t |
| 4d60 | 69 70 2d 61 76 6f 69 64 2d 6d 6f 75 73 65 20 28 6c 65 66 74 20 72 69 67 68 74 20 74 6f 70 20 62 | ip-avoid-mouse.(left.right.top.b |
| 4d80 | 6f 74 74 6f 6d 20 26 6f 70 74 69 6f 6e 61 6c 20 66 72 61 6d 65 29 0a 20 20 22 4d 6f 76 65 20 6f | ottom.&optional.frame)..."Move.o |
| 4da0 | 75 74 20 6d 6f 75 73 65 20 70 6f 69 6e 74 65 72 20 69 66 20 69 74 20 69 73 20 69 6e 73 69 64 65 | ut.mouse.pointer.if.it.is.inside |
| 4dc0 | 20 72 65 67 69 6f 6e 20 28 4c 45 46 54 20 52 49 47 48 54 20 54 4f 50 20 42 4f 54 54 4f 4d 29 0a | .region.(LEFT.RIGHT.TOP.BOTTOM). |
| 4de0 | 69 6e 20 46 52 41 4d 45 2e 20 52 65 74 75 72 6e 20 6e 65 77 20 6d 6f 75 73 65 20 70 6f 73 69 74 | in.FRAME..Return.new.mouse.posit |
| 4e00 | 69 6f 6e 20 6c 69 6b 65 20 28 46 52 41 4d 45 20 2e 20 28 58 20 2e 20 59 29 29 2e 22 0a 20 20 28 | ion.like.(FRAME...(X...Y))."...( |
| 4e20 | 75 6e 6c 65 73 73 20 66 72 61 6d 65 0a 20 20 20 20 28 73 65 74 71 20 66 72 61 6d 65 20 28 73 65 | unless.frame.....(setq.frame.(se |
| 4e40 | 6c 65 63 74 65 64 2d 66 72 61 6d 65 29 29 29 0a 20 20 28 6c 65 74 2a 20 28 28 6d 70 6f 73 20 28 | lected-frame)))...(let*.((mpos.( |
| 4e60 | 77 69 74 68 2d 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 20 28 66 72 61 6d 65 2d 73 65 6c 65 | with-selected-window.(frame-sele |
| 4e80 | 63 74 65 64 2d 77 69 6e 64 6f 77 20 66 72 61 6d 65 29 0a 09 09 20 28 6d 6f 75 73 65 2d 70 69 78 | cted-window.frame)....(mouse-pix |
| 4ea0 | 65 6c 2d 70 6f 73 69 74 69 6f 6e 29 29 29 0a 09 20 28 6d 66 72 61 6d 65 20 28 70 6f 70 20 6d 70 | el-position)))...(mframe.(pop.mp |
| 4ec0 | 6f 73 29 29 0a 09 20 28 6d 78 20 28 63 61 72 20 6d 70 6f 73 29 29 0a 09 20 28 6d 79 20 28 63 64 | os))...(mx.(car.mpos))...(my.(cd |
| 4ee0 | 72 20 6d 70 6f 73 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 65 71 20 6d 66 72 | r.mpos))).....(when.(and.(eq.mfr |
| 4f00 | 61 6d 65 20 66 72 61 6d 65 29 0a 09 20 20 20 20 20 20 20 28 6e 75 6d 62 65 72 70 20 6d 78 29 29 | ame.frame).........(numberp.mx)) |
| 4f20 | 0a 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 6c 61 72 67 65 2d 6e 75 6d 62 65 72 20 28 2b 20 28 | .......(let*.((large-number.(+.( |
| 4f40 | 66 72 61 6d 65 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 | frame-pixel-width.frame).(frame- |
| 4f60 | 70 69 78 65 6c 2d 68 65 69 67 68 74 20 66 72 61 6d 65 29 29 29 0a 09 20 20 20 20 20 28 64 6c 20 | pixel-height.frame))).......(dl. |
| 4f80 | 28 69 66 20 28 3e 20 6c 65 66 74 20 32 29 0a 09 09 20 20 20 20 20 28 31 2b 20 28 2d 20 6d 78 20 | (if.(>.left.2)........(1+.(-.mx. |
| 4fa0 | 6c 65 66 74 29 29 0a 09 09 20 20 20 6c 61 72 67 65 2d 6e 75 6d 62 65 72 29 29 0a 09 20 20 20 20 | left))......large-number))...... |
| 4fc0 | 20 28 64 72 20 28 69 66 20 28 3c 20 28 31 2b 20 72 69 67 68 74 29 20 28 66 72 61 6d 65 2d 70 69 | .(dr.(if.(<.(1+.right).(frame-pi |
| 4fe0 | 78 65 6c 2d 77 69 64 74 68 20 66 72 61 6d 65 29 29 0a 09 09 20 20 20 20 20 28 2d 20 72 69 67 68 | xel-width.frame))........(-.righ |
| 5000 | 74 20 6d 78 29 0a 09 09 20 20 20 6c 61 72 67 65 2d 6e 75 6d 62 65 72 29 29 0a 09 20 20 20 20 20 | t.mx)......large-number))....... |
| 5020 | 28 64 74 20 28 69 66 20 28 3e 20 74 6f 70 20 32 29 0a 09 09 20 20 20 20 20 28 31 2b 20 28 2d 20 | (dt.(if.(>.top.2)........(1+.(-. |
| 5040 | 6d 79 20 74 6f 70 29 29 0a 09 09 20 20 20 6c 61 72 67 65 2d 6e 75 6d 62 65 72 29 29 0a 09 20 20 | my.top))......large-number)).... |
| 5060 | 20 20 20 28 64 62 20 28 69 66 20 28 3c 20 28 31 2b 20 62 6f 74 74 6f 6d 29 20 28 66 72 61 6d 65 | ...(db.(if.(<.(1+.bottom).(frame |
| 5080 | 2d 70 69 78 65 6c 2d 68 65 69 67 68 74 20 66 72 61 6d 65 29 29 0a 09 09 20 20 20 20 20 28 2d 20 | -pixel-height.frame))........(-. |
| 50a0 | 62 6f 74 74 6f 6d 20 6d 79 29 0a 09 09 20 20 20 6c 61 72 67 65 2d 6e 75 6d 62 65 72 29 29 0a 09 | bottom.my)......large-number)).. |
| 50c0 | 20 20 20 20 20 28 64 20 28 6d 69 6e 20 64 6c 20 64 72 20 64 74 20 64 62 29 29 29 0a 09 28 77 68 | .....(d.(min.dl.dr.dt.db)))..(wh |
| 50e0 | 65 6e 20 28 3e 20 64 20 2d 32 29 0a 09 20 20 28 63 6f 6e 64 0a 09 20 20 20 28 28 3d 20 64 20 64 | en.(>.d.-2)....(cond.....((=.d.d |
| 5100 | 6c 29 0a 09 20 20 20 20 28 73 65 74 71 20 6d 78 20 28 2d 20 6c 65 66 74 20 32 29 29 29 0a 09 20 | l)......(setq.mx.(-.left.2)))... |
| 5120 | 20 20 28 28 3d 20 64 20 64 72 29 0a 09 20 20 20 20 28 73 65 74 71 20 6d 78 20 28 31 2b 20 72 69 | ..((=.d.dr)......(setq.mx.(1+.ri |
| 5140 | 67 68 74 29 29 29 0a 09 20 20 20 28 28 3d 20 64 20 64 74 29 0a 09 20 20 20 20 28 73 65 74 71 20 | ght))).....((=.d.dt)......(setq. |
| 5160 | 6d 79 20 28 2d 20 74 6f 70 20 32 29 29 29 0a 09 20 20 20 28 74 0a 09 20 20 20 20 28 73 65 74 71 | my.(-.top.2))).....(t......(setq |
| 5180 | 20 6d 79 20 28 31 2b 20 62 6f 74 74 6f 6d 29 29 29 29 0a 09 20 20 28 73 65 74 2d 6d 6f 75 73 65 | .my.(1+.bottom))))....(set-mouse |
| 51a0 | 2d 70 69 78 65 6c 2d 70 6f 73 69 74 69 6f 6e 20 66 72 61 6d 65 20 6d 78 20 6d 79 29 0a 09 20 20 | -pixel-position.frame.mx.my).... |
| 51c0 | 28 73 69 74 2d 66 6f 72 20 30 2e 30 30 30 31 29 29 29 29 0a 20 20 20 20 28 63 6f 6e 73 20 6d 66 | (sit-for.0.0001)))).....(cons.mf |
| 51e0 | 72 61 6d 65 20 28 61 6e 64 20 6d 70 6f 73 20 28 63 6f 6e 73 20 6d 78 20 6d 79 29 29 29 29 29 0a | rame.(and.mpos.(cons.mx.my))))). |
| 5200 | 0a 28 64 65 66 75 6e 20 70 6f 73 2d 74 69 70 2d 63 6f 6d 70 75 74 65 2d 66 6f 72 65 67 72 6f 75 | .(defun.pos-tip-compute-foregrou |
| 5220 | 6e 64 2d 63 6f 6c 6f 72 20 28 74 69 70 2d 63 6f 6c 6f 72 29 0a 20 20 22 43 6f 6d 70 75 74 65 20 | nd-color.(tip-color)..."Compute. |
| 5240 | 74 68 65 20 66 6f 72 65 67 72 6f 75 6e 64 20 63 6f 6c 6f 72 20 74 6f 20 75 73 65 20 66 6f 72 20 | the.foreground.color.to.use.for. |
| 5260 | 74 6f 6f 6c 74 69 70 2e 0a 0a 54 49 50 2d 43 4f 4c 4f 52 20 69 73 20 61 20 66 61 63 65 20 6f 72 | tooltip...TIP-COLOR.is.a.face.or |
| 5280 | 20 61 20 63 6f 6e 73 20 63 65 6c 6c 20 6c 69 6b 65 20 28 46 4f 52 45 47 52 4f 55 4e 44 2d 43 4f | .a.cons.cell.like.(FOREGROUND-CO |
| 52a0 | 4c 4f 52 20 2e 20 42 41 43 4b 47 52 4f 55 4e 44 2d 43 4f 4c 4f 52 29 2e 0a 49 66 20 69 74 20 69 | LOR...BACKGROUND-COLOR)..If.it.i |
| 52c0 | 73 20 6e 69 6c 2c 20 75 73 65 20 60 70 6f 73 2d 74 69 70 2d 66 6f 72 65 67 72 6f 75 6e 64 2d 63 | s.nil,.use.`pos-tip-foreground-c |
| 52e0 | 6f 6c 6f 72 27 20 6f 72 20 74 68 65 20 66 6f 72 65 67 72 6f 75 6e 64 20 63 6f 6c 6f 72 20 6f 66 | olor'.or.the.foreground.color.of |
| 5300 | 20 74 68 65 0a 60 74 6f 6f 6c 74 69 70 27 20 66 61 63 65 2e 22 0a 20 20 28 6f 72 20 28 61 6e 64 | .the.`tooltip'.face."...(or.(and |
| 5320 | 20 28 66 61 63 65 70 20 74 69 70 2d 63 6f 6c 6f 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 66 | .(facep.tip-color)............(f |
| 5340 | 61 63 65 2d 61 74 74 72 69 62 75 74 65 20 74 69 70 2d 63 6f 6c 6f 72 20 3a 66 6f 72 65 67 72 6f | ace-attribute.tip-color.:foregro |
| 5360 | 75 6e 64 29 29 0a 20 20 20 20 20 20 28 63 61 72 2d 73 61 66 65 20 74 69 70 2d 63 6f 6c 6f 72 29 | und)).......(car-safe.tip-color) |
| 5380 | 0a 20 20 20 20 20 20 70 6f 73 2d 74 69 70 2d 66 6f 72 65 67 72 6f 75 6e 64 2d 63 6f 6c 6f 72 0a | .......pos-tip-foreground-color. |
| 53a0 | 20 20 20 20 20 20 28 66 61 63 65 2d 66 6f 72 65 67 72 6f 75 6e 64 20 27 74 6f 6f 6c 74 69 70 29 | ......(face-foreground.'tooltip) |
| 53c0 | 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 2d 62 61 63 6b 67 | ))..(defun.pos-tip-compute-backg |
| 53e0 | 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 22 43 6f 6d 70 75 | round-color.(tip-color)..."Compu |
| 5400 | 74 65 20 74 68 65 20 62 61 63 6b 67 72 6f 75 6e 64 20 63 6f 6c 6f 72 20 74 6f 20 75 73 65 20 66 | te.the.background.color.to.use.f |
| 5420 | 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 61 20 66 61 63 65 | or.tooltip...TIP-COLOR.is.a.face |
| 5440 | 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 47 52 4f 55 4e 44 | .or.a.cons.cell.like.(FOREGROUND |
| 5460 | 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 2e 0a 49 66 20 69 | -COLOR...BACKGROUND-COLOR)..If.i |
| 5480 | 74 20 69 73 20 6e 69 6c 2c 20 75 73 65 20 60 70 6f 73 2d 74 69 70 2d 62 61 63 6b 67 72 6f 75 6e | t.is.nil,.use.`pos-tip-backgroun |
| 54a0 | 64 2d 63 6f 6c 6f 72 27 20 6f 72 20 74 68 65 20 62 61 63 6b 67 72 6f 75 6e 64 20 63 6f 6c 6f 72 | d-color'.or.the.background.color |
| 54c0 | 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 20 28 6f 72 20 28 | .of.the.`tooltip'.face."...(or.( |
| 54e0 | 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 20 20 20 20 20 20 | and.(facep.tip-color)........... |
| 5500 | 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 20 3a 62 61 63 6b | .(face-attribute.tip-color.:back |
| 5520 | 67 72 6f 75 6e 64 29 29 0a 20 20 20 20 20 20 28 63 64 72 2d 73 61 66 65 20 74 69 70 2d 63 6f 6c | ground)).......(cdr-safe.tip-col |
| 5540 | 6f 72 29 0a 20 20 20 20 20 20 70 6f 73 2d 74 69 70 2d 62 61 63 6b 67 72 6f 75 6e 64 2d 63 6f 6c | or).......pos-tip-background-col |
| 5560 | 6f 72 0a 20 20 20 20 20 20 28 66 61 63 65 2d 62 61 63 6b 67 72 6f 75 6e 64 20 27 74 6f 6f 6c 74 | or.......(face-background.'toolt |
| 5580 | 69 70 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 6f 73 2d 74 69 70 2d 73 68 6f 77 2d 6e 6f 2d 70 72 | ip)))..(defun.pos-tip-show-no-pr |
| 55a0 | 6f 70 65 72 74 69 7a 65 0a 20 20 28 73 74 72 69 6e 67 20 26 6f 70 74 69 6f 6e 61 6c 20 74 69 70 | opertize...(string.&optional.tip |
| 55c0 | 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 20 70 69 78 65 6c 2d | -color.pos.window.timeout.pixel- |
| 55e0 | 77 69 64 74 68 20 70 69 78 65 6c 2d 68 65 69 67 68 74 20 66 72 61 6d 65 2d 63 6f 6f 72 64 69 6e | width.pixel-height.frame-coordin |
| 5600 | 61 74 65 73 20 64 78 20 64 79 29 0a 20 20 22 53 68 6f 77 20 53 54 52 49 4e 47 20 69 6e 20 61 20 | ates.dx.dy)..."Show.STRING.in.a. |
| 5620 | 74 6f 6f 6c 74 69 70 20 61 74 20 50 4f 53 20 69 6e 20 57 49 4e 44 4f 57 2e 0a 41 6e 61 6c 6f 67 | tooltip.at.POS.in.WINDOW..Analog |
| 5640 | 6f 75 73 20 74 6f 20 60 70 6f 73 2d 74 69 70 2d 73 68 6f 77 27 20 65 78 63 65 70 74 20 64 6f 6e | ous.to.`pos-tip-show'.except.don |
| 5660 | 27 74 20 70 72 6f 70 65 72 74 69 7a 65 20 53 54 52 49 4e 47 20 62 79 20 60 70 6f 73 2d 74 69 70 | 't.propertize.STRING.by.`pos-tip |
| 5680 | 27 20 66 61 63 65 2e 0a 0a 50 49 58 45 4c 2d 57 49 44 54 48 20 61 6e 64 20 50 49 58 45 4c 2d 48 | '.face...PIXEL-WIDTH.and.PIXEL-H |
| 56a0 | 45 49 47 48 54 20 73 70 65 63 69 66 79 20 74 68 65 20 73 69 7a 65 20 6f 66 20 74 6f 6f 6c 74 69 | EIGHT.specify.the.size.of.toolti |
| 56c0 | 70 2c 20 69 66 20 67 69 76 65 6e 2e 20 54 68 65 73 65 0a 61 72 65 20 75 73 65 64 20 74 6f 20 61 | p,.if.given..These.are.used.to.a |
| 56e0 | 64 6a 75 73 74 20 74 68 65 20 74 6f 6f 6c 74 69 70 20 70 6f 73 69 74 69 6f 6e 20 69 6e 20 6f 72 | djust.the.tooltip.position.in.or |
| 5700 | 64 65 72 20 74 68 61 74 20 69 74 20 64 6f 65 73 6e 27 74 20 64 69 73 61 70 70 65 61 72 20 62 79 | der.that.it.doesn't.disappear.by |
| 5720 | 0a 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 2c 20 61 6e | .sticking.out.of.the.display,.an |
| 5740 | 64 20 61 6c 73 6f 20 75 73 65 64 20 74 6f 20 70 72 65 76 65 6e 74 20 69 74 20 66 72 6f 6d 20 76 | d.also.used.to.prevent.it.from.v |
| 5760 | 61 6e 69 73 68 69 6e 67 20 62 79 0a 6f 76 65 72 6c 61 70 70 69 6e 67 20 77 69 74 68 20 6d 6f 75 | anishing.by.overlapping.with.mou |
| 5780 | 73 65 20 70 6f 69 6e 74 65 72 2e 0a 0a 4e 6f 74 65 20 74 68 61 74 20 74 68 69 73 20 66 75 6e 63 | se.pointer...Note.that.this.func |
| 57a0 | 74 69 6f 6e 20 69 74 73 65 6c 66 20 64 6f 65 73 6e 27 74 20 63 61 6c 63 75 6c 61 74 65 20 74 6f | tion.itself.doesn't.calculate.to |
| 57c0 | 6f 6c 74 69 70 20 73 69 7a 65 20 62 65 63 61 75 73 65 20 74 68 65 0a 63 68 61 72 61 63 74 65 72 | oltip.size.because.the.character |
| 57e0 | 20 77 69 64 74 68 20 61 6e 64 20 68 65 69 67 68 74 20 73 70 65 63 69 66 69 65 64 20 62 79 20 66 | .width.and.height.specified.by.f |
| 5800 | 61 63 65 73 20 61 72 65 20 75 6e 6b 6e 6f 77 6e 2e 20 53 6f 20 75 73 65 72 73 20 73 68 6f 75 6c | aces.are.unknown..So.users.shoul |
| 5820 | 64 0a 63 61 6c 63 75 6c 61 74 65 20 50 49 58 45 4c 2d 57 49 44 54 48 20 61 6e 64 20 50 49 58 45 | d.calculate.PIXEL-WIDTH.and.PIXE |
| 5840 | 4c 2d 48 45 49 47 48 54 20 62 79 20 75 73 69 6e 67 20 60 70 6f 73 2d 74 69 70 2d 74 6f 6f 6c 74 | L-HEIGHT.by.using.`pos-tip-toolt |
| 5860 | 69 70 2d 77 69 64 74 68 27 20 61 6e 64 0a 60 70 6f 73 2d 74 69 70 2d 74 6f 6f 6c 74 69 70 2d 68 | ip-width'.and.`pos-tip-tooltip-h |
| 5880 | 65 69 67 68 74 27 2c 20 6f 72 20 75 73 65 20 60 70 6f 73 2d 74 69 70 2d 73 68 6f 77 27 20 69 6e | eight',.or.use.`pos-tip-show'.in |
| 58a0 | 73 74 65 61 64 2c 20 77 68 69 63 68 20 63 61 6e 0a 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 63 | stead,.which.can.automatically.c |
| 58c0 | 61 6c 63 75 6c 61 74 65 20 74 6f 6f 6c 74 69 70 20 73 69 7a 65 2e 0a 0a 53 65 65 20 60 70 6f 73 | alculate.tooltip.size...See.`pos |
| 58e0 | 2d 74 69 70 2d 73 68 6f 77 27 20 66 6f 72 20 64 65 74 61 69 6c 73 2e 0a 0a 45 78 61 6d 70 6c 65 | -tip-show'.for.details...Example |
| 5900 | 3a 0a 0a 5c 28 64 65 66 66 61 63 65 20 6d 79 2d 74 6f 6f 6c 74 69 70 0a 20 20 5c 5c 3d 27 28 28 | :..\(defface.my-tooltip...\\='(( |
| 5920 | 74 0a 20 20 20 20 20 3a 62 61 63 6b 67 72 6f 75 6e 64 20 5c 22 67 72 61 79 38 35 5c 22 0a 20 20 | t......:background.\"gray85\"... |
| 5940 | 20 20 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 5c 22 62 6c 61 63 6b 5c 22 0a 20 20 20 20 20 3a 69 | ...:foreground.\"black\"......:i |
| 5960 | 6e 68 65 72 69 74 20 76 61 72 69 61 62 6c 65 2d 70 69 74 63 68 29 29 0a 20 20 5c 22 46 61 63 65 | nherit.variable-pitch))...\"Face |
| 5980 | 20 66 6f 72 20 6d 79 20 74 6f 6f 6c 74 69 70 2e 5c 22 29 0a 0a 5c 28 64 65 66 66 61 63 65 20 6d | .for.my.tooltip.\")..\(defface.m |
| 59a0 | 79 2d 74 6f 6f 6c 74 69 70 2d 68 69 67 68 6c 69 67 68 74 0a 20 20 5c 5c 3d 27 28 28 74 0a 20 20 | y-tooltip-highlight...\\='((t... |
| 59c0 | 20 20 20 3a 62 61 63 6b 67 72 6f 75 6e 64 20 5c 22 62 6c 75 65 5c 22 0a 20 20 20 20 20 3a 66 6f | ...:background.\"blue\"......:fo |
| 59e0 | 72 65 67 72 6f 75 6e 64 20 5c 22 77 68 69 74 65 5c 22 0a 20 20 20 20 20 3a 69 6e 68 65 72 69 74 | reground.\"white\"......:inherit |
| 5a00 | 20 6d 79 2d 74 6f 6f 6c 74 69 70 29 29 0a 20 20 5c 22 46 61 63 65 20 66 6f 72 20 6d 79 20 74 6f | .my-tooltip))...\"Face.for.my.to |
| 5a20 | 6f 6c 74 69 70 20 68 69 67 68 6c 69 67 68 74 65 64 2e 5c 22 29 0a 0a 5c 28 6c 65 74 20 28 28 73 | oltip.highlighted.\")..\(let.((s |
| 5a40 | 74 72 20 28 70 72 6f 70 65 72 74 69 7a 65 20 5c 22 20 66 6f 6f 20 5c 5c 6e 20 62 61 72 20 5c 5c | tr.(propertize.\".foo.\\n.bar.\\ |
| 5a60 | 6e 20 62 61 7a 20 5c 22 20 5c 5c 3d 27 66 61 63 65 20 5c 5c 3d 27 6d 79 2d 74 6f 6f 6c 74 69 70 | n.baz.\".\\='face.\\='my-tooltip |
| 5a80 | 29 29 29 0a 20 20 28 70 75 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 36 20 31 31 20 5c 5c | )))...(put-text-property.6.11.\\ |
| 5aa0 | 3d 27 66 61 63 65 20 5c 5c 3d 27 6d 79 2d 74 6f 6f 6c 74 69 70 2d 68 69 67 68 6c 69 67 68 74 20 | ='face.\\='my-tooltip-highlight. |
| 5ac0 | 73 74 72 29 0a 20 20 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 | str)...(pos-tip-show-no-properti |
| 5ae0 | 7a 65 20 73 74 72 20 5c 5c 3d 27 6d 79 2d 74 6f 6f 6c 74 69 70 29 29 22 0a 20 20 28 75 6e 6c 65 | ze.str.\\='my-tooltip))"...(unle |
| 5b00 | 73 73 20 77 69 6e 64 6f 77 0a 20 20 20 20 28 73 65 74 71 20 77 69 6e 64 6f 77 20 28 73 65 6c 65 | ss.window.....(setq.window.(sele |
| 5b20 | 63 74 65 64 2d 77 69 6e 64 6f 77 29 29 29 0a 20 20 28 6c 65 74 2a 20 28 28 66 72 61 6d 65 20 28 | cted-window)))...(let*.((frame.( |
| 5b40 | 77 69 6e 64 6f 77 2d 66 72 61 6d 65 20 77 69 6e 64 6f 77 29 29 0a 09 20 28 77 69 6e 73 79 73 20 | window-frame.window))...(winsys. |
| 5b60 | 28 70 6f 73 2d 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 0a 09 | (pos-tip-window-system.frame)).. |
| 5b80 | 20 28 78 2d 66 72 61 6d 65 20 28 65 71 20 77 69 6e 73 79 73 20 27 78 29 29 0a 09 20 28 77 33 32 | .(x-frame.(eq.winsys.'x))...(w32 |
| 5ba0 | 2d 66 72 61 6d 65 20 28 65 71 20 77 69 6e 73 79 73 20 27 77 33 32 29 29 0a 09 20 28 72 65 6c 61 | -frame.(eq.winsys.'w32))...(rela |
| 5bc0 | 74 69 76 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 | tive.(or.pos-tip-use-relative-co |
| 5be0 | 6f 72 64 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 | ordinates..........(eq.frame-coo |
| 5c00 | 72 64 69 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 | rdinates.'relative)..........(an |
| 5c20 | 64 20 77 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 | d.w32-frame........(null.pos-tip |
| 5c40 | 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 29 29 29 0a | -w32-saved-max-width-height)))). |
| 5c60 | 09 20 28 78 2d 79 20 28 70 72 6f 67 31 0a 09 09 20 20 28 70 6f 73 2d 74 69 70 2d 63 6f 6d 70 75 | ..(x-y.(prog1.....(pos-tip-compu |
| 5c80 | 74 65 2d 70 69 78 65 6c 2d 70 6f 73 69 74 69 6f 6e 20 70 6f 73 20 77 69 6e 64 6f 77 0a 09 09 09 | te-pixel-position.pos.window.... |
| 5ca0 | 09 09 09 20 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 0a 09 09 | .....pixel-width.pixel-height... |
| 5cc0 | 09 09 09 09 20 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 09 | ......frame-coordinates.dx.dy).. |
| 5ce0 | 09 28 69 66 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 69 | .(if.pos-tip-use-relative-coordi |
| 5d00 | 6e 61 74 65 73 0a 09 09 20 20 20 20 28 73 65 74 71 20 72 65 6c 61 74 69 76 65 20 74 29 29 29 29 | nates.......(setq.relative.t)))) |
| 5d20 | 0a 09 20 28 61 78 20 28 63 61 72 20 78 2d 79 29 29 0a 09 20 28 61 79 20 28 63 64 72 20 78 2d 79 | ...(ax.(car.x-y))...(ay.(cdr.x-y |
| 5d40 | 29 29 0a 09 20 28 72 78 20 28 69 66 20 72 65 6c 61 74 69 76 65 20 61 78 20 28 2d 20 61 78 20 28 | ))...(rx.(if.relative.ax.(-.ax.( |
| 5d60 | 63 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 64 69 6e 61 | car.pos-tip-saved-frame-coordina |
| 5d80 | 74 65 73 29 29 29 29 0a 09 20 28 72 79 20 28 69 66 20 72 65 6c 61 74 69 76 65 20 61 79 20 28 2d | tes))))...(ry.(if.relative.ay.(- |
| 5da0 | 20 61 79 20 28 63 64 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 | .ay.(cdr.pos-tip-saved-frame-coo |
| 5dc0 | 72 64 69 6e 61 74 65 73 29 29 29 29 0a 09 20 28 72 65 74 76 61 6c 20 28 63 6f 6e 73 20 72 78 20 | rdinates))))...(retval.(cons.rx. |
| 5de0 | 72 79 29 29 0a 09 20 28 66 67 20 28 70 6f 73 2d 74 69 70 2d 63 6f 6d 70 75 74 65 2d 66 6f 72 65 | ry))...(fg.(pos-tip-compute-fore |
| 5e00 | 67 72 6f 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 62 67 20 28 | ground-color.tip-color))...(bg.( |
| 5e20 | 70 6f 73 2d 74 69 70 2d 63 6f 6d 70 75 74 65 2d 62 61 63 6b 67 72 6f 75 6e 64 2d 63 6f 6c 6f 72 | pos-tip-compute-background-color |
| 5e40 | 20 74 69 70 2d 63 6f 6c 6f 72 29 29 0a 09 20 28 75 73 65 2d 64 78 64 79 20 28 6f 72 20 72 65 6c | .tip-color))...(use-dxdy.(or.rel |
| 5e60 | 61 74 69 76 65 0a 09 09 20 20 20 20 20 20 20 28 6e 6f 74 20 78 2d 66 72 61 6d 65 29 29 29 0a 09 | ative..........(not.x-frame))).. |
| 5e80 | 20 28 73 70 61 63 69 6e 67 20 28 66 72 61 6d 65 2d 70 61 72 61 6d 65 74 65 72 20 66 72 61 6d 65 | .(spacing.(frame-parameter.frame |
| 5ea0 | 20 27 6c 69 6e 65 2d 73 70 61 63 69 6e 67 29 29 0a 09 20 28 62 6f 72 64 65 72 20 28 61 73 68 20 | .'line-spacing))...(border.(ash. |
| 5ec0 | 28 2b 20 70 6f 73 2d 74 69 70 2d 62 6f 72 64 65 72 2d 77 69 64 74 68 0a 09 09 09 20 70 6f 73 2d | (+.pos-tip-border-width.....pos- |
| 5ee0 | 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 29 0a 09 09 20 20 20 | tip-internal-border-width)...... |
| 5f00 | 20 20 20 31 29 29 0a 09 20 28 78 2d 6d 61 78 2d 74 6f 6f 6c 74 69 70 2d 73 69 7a 65 0a 09 20 20 | ...1))...(x-max-tooltip-size.... |
| 5f20 | 28 63 6f 6e 73 20 28 2b 20 28 69 66 20 78 2d 66 72 61 6d 65 20 31 20 30 29 0a 09 09 20 20 20 28 | (cons.(+.(if.x-frame.1.0)......( |
| 5f40 | 2f 20 28 2d 20 28 6f 72 20 70 69 78 65 6c 2d 77 69 64 74 68 0a 09 09 09 20 20 20 20 20 28 63 6f | /.(-.(or.pixel-width.........(co |
| 5f60 | 6e 64 0a 09 09 09 20 20 20 20 20 20 28 72 65 6c 61 74 69 76 65 0a 09 09 09 20 20 20 20 20 20 20 | nd..........(relative........... |
| 5f80 | 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 09 20 20 | (frame-pixel-width.frame))...... |
| 5fa0 | 20 20 20 20 28 77 33 32 2d 66 72 61 6d 65 0a 09 09 09 20 20 20 20 20 20 20 28 63 61 72 20 70 6f | ....(w32-frame...........(car.po |
| 5fc0 | 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 74 | s-tip-w32-saved-max-width-height |
| 5fe0 | 29 29 0a 09 09 09 20 20 20 20 20 20 28 74 0a 09 09 09 20 20 20 20 20 20 20 28 78 2d 64 69 73 70 | ))..........(t...........(x-disp |
| 6000 | 6c 61 79 2d 70 69 78 65 6c 2d 77 69 64 74 68 20 66 72 61 6d 65 29 29 29 29 0a 09 09 09 20 62 6f | lay-pixel-width.frame)))).....bo |
| 6020 | 72 64 65 72 29 0a 09 09 20 20 20 20 20 20 28 66 72 61 6d 65 2d 63 68 61 72 2d 77 69 64 74 68 20 | rder).........(frame-char-width. |
| 6040 | 66 72 61 6d 65 29 29 29 0a 09 09 3b 3b 20 49 6e 20 63 61 73 65 20 6f 66 20 6e 6f 6e 2d 7a 65 72 | frame)))...;;.In.case.of.non-zer |
| 6060 | 6f 20 6c 69 6e 65 20 73 70 61 63 69 6e 67 2c 20 70 69 78 65 6c 2d 68 65 69 67 68 74 20 77 69 6c | o.line.spacing,.pixel-height.wil |
| 6080 | 6c 20 69 6e 63 6c 75 64 65 20 73 6f 6d 65 0a 09 09 3b 3b 20 65 78 74 72 61 20 73 70 61 63 65 2c | l.include.some...;;.extra.space, |
| 60a0 | 20 61 73 20 72 65 71 75 69 72 65 64 20 74 6f 20 64 69 73 70 6c 61 79 20 74 68 65 20 74 6f 6f 6c | .as.required.to.display.the.tool |
| 60c0 | 74 69 70 2c 20 62 75 74 20 63 68 61 72 20 68 65 69 67 68 74 0a 09 09 3b 3b 20 77 69 6c 6c 20 6e | tip,.but.char.height...;;.will.n |
| 60e0 | 6f 74 2e 20 48 6f 77 65 76 65 72 2c 20 69 74 20 73 65 65 6d 73 20 74 68 61 74 20 78 2d 73 68 6f | ot..However,.it.seems.that.x-sho |
| 6100 | 77 2d 74 69 70 20 77 69 6c 6c 20 75 73 65 20 63 68 61 72 20 68 65 69 67 68 74 0a 09 09 3b 3b 20 | w-tip.will.use.char.height...;;. |
| 6120 | 74 6f 20 63 6f 6e 76 65 72 74 20 6d 61 78 69 6d 75 6d 20 72 6f 77 20 63 6f 75 6e 74 20 69 6e 74 | to.convert.maximum.row.count.int |
| 6140 | 6f 20 6d 61 78 69 6d 75 6d 20 74 6f 6f 6c 74 69 70 20 68 65 69 67 68 74 2c 20 73 6f 20 77 65 0a | o.maximum.tooltip.height,.so.we. |
| 6160 | 09 09 3b 3b 20 6e 65 65 64 20 74 6f 20 72 6f 75 6e 64 20 75 70 20 74 68 65 20 72 6f 77 20 63 6f | ..;;.need.to.round.up.the.row.co |
| 6180 | 75 6e 74 20 74 6f 20 61 6c 6c 6f 77 20 74 68 65 20 6c 61 73 74 20 6c 69 6e 65 20 74 6f 20 62 65 | unt.to.allow.the.last.line.to.be |
| 61a0 | 0a 09 09 3b 3b 20 73 68 6f 77 6e 2e 0a 09 09 28 63 65 69 6c 69 6e 67 20 28 2f 20 28 2d 20 28 6f | ...;;.shown....(ceiling.(/.(-.(o |
| 61c0 | 72 20 70 69 78 65 6c 2d 68 65 69 67 68 74 0a 09 09 09 09 20 20 20 28 78 2d 64 69 73 70 6c 61 79 | r.pixel-height........(x-display |
| 61e0 | 2d 70 69 78 65 6c 2d 68 65 69 67 68 74 20 66 72 61 6d 65 29 29 0a 09 09 09 20 20 20 20 20 20 20 | -pixel-height.frame))........... |
| 6200 | 62 6f 72 64 65 72 29 0a 09 09 09 20 20 20 20 28 66 6c 6f 61 74 20 28 66 72 61 6d 65 2d 63 68 61 | border)........(float.(frame-cha |
| 6220 | 72 2d 68 65 69 67 68 74 20 66 72 61 6d 65 29 29 29 29 29 29 0a 09 20 28 78 2d 67 74 6b 2d 75 73 | r-height.frame))))))...(x-gtk-us |
| 6240 | 65 2d 73 79 73 74 65 6d 2d 74 6f 6f 6c 74 69 70 73 20 6e 69 6c 29 20 3b 20 44 6f 6e 27 74 20 75 | e-system-tooltips.nil).;.Don't.u |
| 6260 | 73 65 20 47 74 6b 2b 20 74 6f 6f 6c 74 69 70 20 69 6e 20 45 6d 61 63 73 20 32 34 0a 09 20 28 6d | se.Gtk+.tooltip.in.Emacs.24...(m |
| 6280 | 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 77 69 6e 64 6f 77 | pos.(with-selected-window.window |
| 62a0 | 20 28 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 | .(mouse-pixel-position)))...(mfr |
| 62c0 | 61 6d 65 20 28 63 61 72 20 6d 70 6f 73 29 29 0a 09 20 64 65 66 61 75 6c 74 2d 66 72 61 6d 65 2d | ame.(car.mpos))...default-frame- |
| 62e0 | 61 6c 69 73 74 29 0a 20 20 20 20 28 69 66 20 28 6f 72 20 72 65 6c 61 74 69 76 65 0a 09 20 20 20 | alist).....(if.(or.relative..... |
| 6300 | 20 28 61 6e 64 20 75 73 65 2d 64 78 64 79 0a 09 09 20 28 6e 75 6c 6c 20 28 63 61 64 72 20 6d 70 | .(and.use-dxdy....(null.(cadr.mp |
| 6320 | 6f 73 29 29 29 29 0a 09 28 75 6e 6c 65 73 73 20 28 61 6e 64 20 28 63 61 64 72 20 6d 70 6f 73 29 | os))))..(unless.(and.(cadr.mpos) |
| 6340 | 0a 09 09 20 20 20 20 20 28 65 71 20 6d 66 72 61 6d 65 20 66 72 61 6d 65 29 29 0a 09 20 20 28 6c | ........(eq.mframe.frame))....(l |
| 6360 | 65 74 2a 20 28 28 65 64 67 65 73 20 28 77 69 6e 64 6f 77 2d 69 6e 73 69 64 65 2d 70 69 78 65 6c | et*.((edges.(window-inside-pixel |
| 6380 | 2d 65 64 67 65 73 20 28 63 61 64 72 20 28 77 69 6e 64 6f 77 2d 6c 69 73 74 20 66 72 61 6d 65 29 | -edges.(cadr.(window-list.frame) |
| 63a0 | 29 29 29 0a 09 09 20 28 6d 78 20 28 61 73 68 20 28 2b 20 28 70 6f 70 20 65 64 67 65 73 29 20 28 | )))....(mx.(ash.(+.(pop.edges).( |
| 63c0 | 63 61 64 72 20 65 64 67 65 73 29 29 20 2d 31 29 29 0a 09 09 20 28 6d 79 20 28 61 73 68 20 28 2b | cadr.edges)).-1))....(my.(ash.(+ |
| 63e0 | 20 28 70 6f 70 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 29 | .(pop.edges).(cadr.edges)).-1))) |
| 6400 | 0a 09 20 20 20 20 28 73 65 74 71 20 6d 66 72 61 6d 65 20 66 72 61 6d 65 29 0a 09 20 20 20 20 28 | ......(setq.mframe.frame)......( |
| 6420 | 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 6d 66 72 61 6d 65 20 | set-mouse-pixel-position.mframe. |
| 6440 | 6d 78 20 6d 79 29 0a 09 20 20 20 20 28 73 69 74 2d 66 6f 72 20 30 2e 30 30 30 31 29 29 29 0a 20 | mx.my)......(sit-for.0.0001))).. |
| 6460 | 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 63 61 64 72 20 6d 70 6f 73 29 0a 09 09 20 28 | .....(when.(and.(cadr.mpos)....( |
| 6480 | 6e 6f 74 20 28 65 71 20 6d 66 72 61 6d 65 20 66 72 61 6d 65 29 29 29 0a 09 28 6c 65 74 20 28 28 | not.(eq.mframe.frame)))..(let.(( |
| 64a0 | 72 65 6c 2d 63 6f 6f 72 64 20 28 70 6f 73 2d 74 69 70 2d 66 72 61 6d 65 2d 72 65 6c 61 74 69 76 | rel-coord.(pos-tip-frame-relativ |
| 64c0 | 65 2d 70 6f 73 69 74 69 6f 6e 20 66 72 61 6d 65 20 6d 66 72 61 6d 65 20 77 33 32 2d 66 72 61 6d | e-position.frame.mframe.w32-fram |
| 64e0 | 65 0a 09 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 29 29 29 0a | e..........frame-coordinates))). |
| 6500 | 09 20 20 28 73 65 74 71 20 72 78 20 28 2b 20 72 78 20 28 63 61 72 20 72 65 6c 2d 63 6f 6f 72 64 | ...(setq.rx.(+.rx.(car.rel-coord |
| 6520 | 29 29 0a 09 09 72 79 20 28 2b 20 72 79 20 28 63 64 72 20 72 65 6c 2d 63 6f 6f 72 64 29 29 29 29 | ))...ry.(+.ry.(cdr.rel-coord)))) |
| 6540 | 29 29 0a 20 20 20 20 28 61 6e 64 20 70 69 78 65 6c 2d 77 69 64 74 68 20 70 69 78 65 6c 2d 68 65 | )).....(and.pixel-width.pixel-he |
| 6560 | 69 67 68 74 0a 09 20 28 73 65 74 71 20 6d 70 6f 73 20 28 70 6f 73 2d 74 69 70 2d 61 76 6f 69 64 | ight...(setq.mpos.(pos-tip-avoid |
| 6580 | 2d 6d 6f 75 73 65 20 72 78 20 28 2b 20 72 78 20 70 69 78 65 6c 2d 77 69 64 74 68 0a 09 09 09 09 | -mouse.rx.(+.rx.pixel-width..... |
| 65a0 | 09 20 20 20 20 20 20 20 28 69 66 20 77 33 32 2d 66 72 61 6d 65 20 33 20 30 29 29 0a 09 09 09 09 | ........(if.w32-frame.3.0))..... |
| 65c0 | 09 20 72 79 20 28 2b 20 72 79 20 70 69 78 65 6c 2d 68 65 69 67 68 74 29 0a 09 09 09 09 09 20 6d | ..ry.(+.ry.pixel-height).......m |
| 65e0 | 66 72 61 6d 65 29 29 29 0a 20 20 20 20 28 78 2d 73 68 6f 77 2d 74 69 70 20 73 74 72 69 6e 67 20 | frame))).....(x-show-tip.string. |
| 6600 | 6d 66 72 61 6d 65 0a 09 09 60 28 28 62 6f 72 64 65 72 2d 77 69 64 74 68 20 2e 20 2c 70 6f 73 2d | mframe...`((border-width...,pos- |
| 6620 | 74 69 70 2d 62 6f 72 64 65 72 2d 77 69 64 74 68 29 0a 09 09 20 20 28 69 6e 74 65 72 6e 61 6c 2d | tip-border-width).....(internal- |
| 6640 | 62 6f 72 64 65 72 2d 77 69 64 74 68 20 2e 20 2c 70 6f 73 2d 74 69 70 2d 69 6e 74 65 72 6e 61 6c | border-width...,pos-tip-internal |
| 6660 | 2d 62 6f 72 64 65 72 2d 77 69 64 74 68 29 0a 09 09 20 20 2c 40 28 61 6e 64 20 28 6e 6f 74 20 75 | -border-width).....,@(and.(not.u |
| 6680 | 73 65 2d 64 78 64 79 29 20 60 28 28 6c 65 66 74 20 2e 20 2c 61 78 29 0a 09 09 09 09 09 20 20 28 | se-dxdy).`((left...,ax)........( |
| 66a0 | 74 6f 70 20 2e 20 2c 61 79 29 29 29 0a 09 09 20 20 28 66 6f 6e 74 20 2e 20 2c 28 66 72 61 6d 65 | top...,ay))).....(font...,(frame |
| 66c0 | 2d 70 61 72 61 6d 65 74 65 72 20 66 72 61 6d 65 20 27 66 6f 6e 74 29 29 0a 09 09 20 20 2c 40 28 | -parameter.frame.'font)).....,@( |
| 66e0 | 61 6e 64 20 73 70 61 63 69 6e 67 20 60 28 28 6c 69 6e 65 2d 73 70 61 63 69 6e 67 20 2e 20 2c 73 | and.spacing.`((line-spacing...,s |
| 6700 | 70 61 63 69 6e 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 66 67 | pacing))).....,@(and.(stringp.fg |
| 6720 | 29 20 60 28 28 66 6f 72 65 67 72 6f 75 6e 64 2d 63 6f 6c 6f 72 20 2e 20 2c 66 67 29 29 29 0a 09 | ).`((foreground-color...,fg))).. |
| 6740 | 09 20 20 2c 40 28 61 6e 64 20 28 73 74 72 69 6e 67 70 20 62 67 29 20 60 28 28 62 61 63 6b 67 72 | ...,@(and.(stringp.bg).`((backgr |
| 6760 | 6f 75 6e 64 2d 63 6f 6c 6f 72 20 2e 20 2c 62 67 29 29 29 29 0a 09 09 28 61 6e 64 20 74 69 6d 65 | ound-color...,bg))))...(and.time |
| 6780 | 6f 75 74 20 28 3e 20 74 69 6d 65 6f 75 74 20 30 29 20 74 69 6d 65 6f 75 74 29 0a 09 09 28 61 6e | out.(>.timeout.0).timeout)...(an |
| 67a0 | 64 20 75 73 65 2d 64 78 64 79 20 28 2d 20 72 78 20 28 63 61 64 72 20 6d 70 6f 73 29 29 29 0a 09 | d.use-dxdy.(-.rx.(cadr.mpos))).. |
| 67c0 | 09 28 61 6e 64 20 75 73 65 2d 64 78 64 79 20 28 2d 20 72 79 20 28 63 64 64 72 20 6d 70 6f 73 29 | .(and.use-dxdy.(-.ry.(cddr.mpos) |
| 67e0 | 29 29 29 0a 20 20 20 20 28 69 66 20 28 61 6e 64 20 74 69 6d 65 6f 75 74 20 28 3c 3d 20 74 69 6d | ))).....(if.(and.timeout.(<=.tim |
| 6800 | 65 6f 75 74 20 30 29 29 0a 09 28 70 6f 73 2d 74 69 70 2d 63 61 6e 63 65 6c 2d 74 69 6d 65 72 29 | eout.0))..(pos-tip-cancel-timer) |
| 6820 | 29 0a 20 20 20 20 72 65 74 76 61 6c 29 29 0a 0a 28 64 65 66 75 6e 20 70 6f 73 2d 74 69 70 2d 73 | ).....retval))..(defun.pos-tip-s |
| 6840 | 70 6c 69 74 2d 73 74 72 69 6e 67 20 28 73 74 72 69 6e 67 20 26 6f 70 74 69 6f 6e 61 6c 20 77 69 | plit-string.(string.&optional.wi |
| 6860 | 64 74 68 20 6d 61 72 67 69 6e 20 6a 75 73 74 69 66 79 20 73 71 75 65 65 7a 65 20 6d 61 78 2d 72 | dth.margin.justify.squeeze.max-r |
| 6880 | 6f 77 73 29 0a 20 20 22 53 70 6c 69 74 20 53 54 52 49 4e 47 20 69 6e 74 6f 20 66 69 78 65 64 20 | ows)..."Split.STRING.into.fixed. |
| 68a0 | 77 69 64 74 68 20 73 74 72 69 6e 67 73 2e 20 52 65 74 75 72 6e 20 61 20 6c 69 73 74 20 6f 66 20 | width.strings..Return.a.list.of. |
| 68c0 | 74 68 65 73 65 20 73 74 72 69 6e 67 73 2e 0a 0a 57 49 44 54 48 20 73 70 65 63 69 66 69 65 73 20 | these.strings...WIDTH.specifies. |
| 68e0 | 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 70 61 72 61 67 72 | the.width.of.filling.each.paragr |
| 6900 | 61 70 68 2e 20 57 49 44 54 48 20 6e 69 6c 20 6d 65 61 6e 73 20 75 73 65 0a 74 68 65 20 77 69 64 | aph..WIDTH.nil.means.use.the.wid |
| 6920 | 74 68 20 6f 66 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 20 | th.of.currently.selected.frame.. |
| 6940 | 4e 6f 74 65 20 74 68 61 74 20 74 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 64 6f 65 73 6e 27 74 20 | Note.that.this.function.doesn't. |
| 6960 | 61 64 64 20 61 6e 79 0a 70 61 64 64 69 6e 67 20 63 68 61 72 61 63 74 65 72 73 20 61 74 20 74 68 | add.any.padding.characters.at.th |
| 6980 | 65 20 65 6e 64 20 6f 66 20 65 61 63 68 20 72 6f 77 2e 0a 0a 4d 41 52 47 49 4e 2c 20 69 66 20 6e | e.end.of.each.row...MARGIN,.if.n |
| 69a0 | 6f 6e 2d 6e 69 6c 2c 20 73 70 65 63 69 66 69 65 73 20 6c 65 66 74 20 6d 61 72 67 69 6e 20 77 69 | on-nil,.specifies.left.margin.wi |
| 69c0 | 64 74 68 20 77 68 69 63 68 20 69 73 20 74 68 65 20 6e 75 6d 62 65 72 20 6f 66 20 73 70 65 63 65 | dth.which.is.the.number.of.spece |
| 69e0 | 0a 63 68 61 72 61 63 74 65 72 73 20 74 6f 20 61 64 64 20 61 74 20 74 68 65 20 62 65 67 69 6e 6e | .characters.to.add.at.the.beginn |
| 6a00 | 69 6e 67 20 6f 66 20 65 61 63 68 20 72 6f 77 2e 0a 0a 54 68 65 20 6f 70 74 69 6f 6e 61 6c 20 66 | ing.of.each.row...The.optional.f |
| 6a20 | 6f 75 72 74 68 20 61 72 67 75 6d 65 6e 74 20 4a 55 53 54 49 46 59 20 73 70 65 63 69 66 69 65 73 | ourth.argument.JUSTIFY.specifies |
| 6a40 | 20 77 68 69 63 68 20 6b 69 6e 64 20 6f 66 20 6a 75 73 74 69 66 69 63 61 74 69 6f 6e 0a 74 6f 20 | .which.kind.of.justification.to. |
| 6a60 | 64 6f 3a 20 60 66 75 6c 6c 27 2c 20 60 6c 65 66 74 27 2c 20 60 72 69 67 68 74 27 2c 20 60 63 65 | do:.`full',.`left',.`right',.`ce |
| 6a80 | 6e 74 65 72 27 2c 20 6f 72 20 60 6e 6f 6e 65 27 2e 20 41 20 76 61 6c 75 65 20 6f 66 20 74 20 6d | nter',.or.`none'..A.value.of.t.m |
| 6aa0 | 65 61 6e 73 20 68 61 6e 64 6c 65 0a 65 61 63 68 20 70 61 72 61 67 72 61 70 68 20 61 73 20 73 70 | eans.handle.each.paragraph.as.sp |
| 6ac0 | 65 63 69 66 69 65 64 20 62 79 20 69 74 73 20 74 65 78 74 20 70 72 6f 70 65 72 74 69 65 73 2e 20 | ecified.by.its.text.properties.. |
| 6ae0 | 4f 6d 69 74 74 69 6e 67 20 4a 55 53 54 49 46 59 20 6d 65 61 6e 73 0a 64 6f 6e 27 74 20 70 65 72 | Omitting.JUSTIFY.means.don't.per |
| 6b00 | 66 6f 72 6d 20 6a 75 73 74 69 66 69 63 61 74 69 6f 6e 2c 20 77 6f 72 64 20 77 72 61 70 20 61 6e | form.justification,.word.wrap.an |
| 6b20 | 64 20 6b 69 6e 73 6f 6b 75 20 73 68 6f 72 69 20 28 e7 a6 81 e5 89 87 e5 87 a6 e7 90 86 29 2e 0a | d.kinsoku.shori.(............).. |
| 6b40 | 0a 53 51 55 45 45 5a 45 20 6e 69 6c 20 6d 65 61 6e 73 20 6c 65 61 76 65 20 77 68 69 74 65 73 70 | .SQUEEZE.nil.means.leave.whitesp |
| 6b60 | 61 63 65 73 20 6f 74 68 65 72 20 74 68 61 6e 20 6c 69 6e 65 20 62 72 65 61 6b 73 20 75 6e 74 6f | aces.other.than.line.breaks.unto |
| 6b80 | 75 63 68 65 64 2e 0a 0a 4d 41 58 2d 52 4f 57 53 2c 20 69 66 20 67 69 76 65 6e 2c 20 73 70 65 63 | uched...MAX-ROWS,.if.given,.spec |
| 6ba0 | 69 66 69 65 73 20 6d 61 78 69 6d 75 6d 20 6e 75 6d 62 65 72 20 6f 66 20 65 6c 65 6d 65 6e 74 73 | ifies.maximum.number.of.elements |
| 6bc0 | 20 6f 66 20 72 65 74 75 72 6e 20 76 61 6c 75 65 2e 0a 54 68 65 20 65 6c 65 6d 65 6e 74 73 20 65 | .of.return.value..The.elements.e |
| 6be0 | 78 63 65 65 64 69 6e 67 20 74 68 69 73 20 6e 75 6d 62 65 72 20 61 72 65 20 64 69 73 63 61 72 64 | xceeding.this.number.are.discard |
| 6c00 | 65 64 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 6c 65 | ed."...(with-temp-buffer.....(le |
| 6c20 | 74 2a 20 28 28 74 61 62 2d 77 69 64 74 68 20 28 6f 72 20 70 6f 73 2d 74 69 70 2d 74 61 62 2d 77 | t*.((tab-width.(or.pos-tip-tab-w |
| 6c40 | 69 64 74 68 20 74 61 62 2d 77 69 64 74 68 29 29 0a 09 20 20 20 28 66 69 6c 6c 2d 63 6f 6c 75 6d | idth.tab-width)).....(fill-colum |
| 6c60 | 6e 20 28 6f 72 20 77 69 64 74 68 20 28 66 72 61 6d 65 2d 77 69 64 74 68 29 29 29 0a 09 20 20 20 | n.(or.width.(frame-width)))..... |
| 6c80 | 28 6c 65 66 74 2d 6d 61 72 67 69 6e 20 28 6f 72 20 6d 61 72 67 69 6e 20 30 29 29 0a 09 20 20 20 | (left-margin.(or.margin.0))..... |
| 6ca0 | 28 6b 69 6e 73 6f 6b 75 2d 6c 69 6d 69 74 20 31 29 0a 09 20 20 20 69 6e 64 65 6e 74 2d 74 61 62 | (kinsoku-limit.1).....indent-tab |
| 6cc0 | 73 2d 6d 6f 64 65 0a 09 20 20 20 72 6f 77 20 72 6f 77 73 29 0a 20 20 20 20 20 20 28 69 6e 73 65 | s-mode.....row.rows).......(inse |
| 6ce0 | 72 74 20 73 74 72 69 6e 67 29 0a 20 20 20 20 20 20 28 75 6e 74 61 62 69 66 79 20 28 70 6f 69 6e | rt.string).......(untabify.(poin |
| 6d00 | 74 2d 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 20 20 20 20 20 20 28 69 66 20 6a 75 | t-min).(point-max)).......(if.ju |
| 6d20 | 73 74 69 66 79 0a 09 20 20 28 66 69 6c 6c 2d 72 65 67 69 6f 6e 20 28 70 6f 69 6e 74 2d 6d 69 6e | stify....(fill-region.(point-min |
| 6d40 | 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 20 6a 75 73 74 69 66 79 20 28 6e 6f 74 20 73 71 75 65 65 | ).(point-max).justify.(not.squee |
| 6d60 | 7a 65 29 29 0a 09 28 73 65 74 71 20 6d 61 72 67 69 6e 20 28 6d 61 6b 65 2d 73 74 72 69 6e 67 20 | ze))..(setq.margin.(make-string. |
| 6d80 | 6c 65 66 74 2d 6d 61 72 67 69 6e 20 3f 5c 73 29 29 29 0a 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 | left-margin.?\s))).......(goto-c |
| 6da0 | 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 70 | har.(point-min)).......(while.(p |
| 6dc0 | 72 6f 67 32 0a 09 09 20 28 6c 65 74 20 28 28 6c 69 6e 65 20 28 62 75 66 66 65 72 2d 73 75 62 73 | rog2....(let.((line.(buffer-subs |
| 6de0 | 74 72 69 6e 67 0a 09 09 09 20 20 20 20 20 20 28 70 6f 69 6e 74 29 20 28 70 72 6f 67 6e 20 28 65 | tring..........(point).(progn.(e |
| 6e00 | 6e 64 2d 6f 66 2d 6c 69 6e 65 29 20 28 70 6f 69 6e 74 29 29 29 29 29 0a 09 09 20 20 20 28 69 66 | nd-of-line).(point)))))......(if |
| 6e20 | 20 6a 75 73 74 69 66 79 0a 09 09 20 20 20 20 20 20 20 28 70 75 73 68 20 6c 69 6e 65 20 72 6f 77 | .justify..........(push.line.row |
| 6e40 | 73 29 0a 09 09 20 20 20 20 20 28 77 68 69 6c 65 20 28 70 72 6f 67 6e 0a 09 09 09 20 20 20 20 20 | s)........(while.(progn......... |
| 6e60 | 20 28 73 65 74 71 20 6c 69 6e 65 20 28 63 6f 6e 63 61 74 20 6d 61 72 67 69 6e 20 6c 69 6e 65 29 | .(setq.line.(concat.margin.line) |
| 6e80 | 0a 09 09 09 09 20 20 20 20 72 6f 77 20 28 74 72 75 6e 63 61 74 65 2d 73 74 72 69 6e 67 2d 74 6f | .........row.(truncate-string-to |
| 6ea0 | 2d 77 69 64 74 68 20 6c 69 6e 65 20 66 69 6c 6c 2d 63 6f 6c 75 6d 6e 29 29 0a 09 09 09 20 20 20 | -width.line.fill-column))....... |
| 6ec0 | 20 20 20 28 70 75 73 68 20 72 6f 77 20 72 6f 77 73 29 0a 09 09 09 20 20 20 20 20 20 28 69 66 20 | ...(push.row.rows)..........(if. |
| 6ee0 | 28 6e 6f 74 20 28 3d 20 28 6c 65 6e 67 74 68 20 72 6f 77 29 20 28 6c 65 6e 67 74 68 20 6c 69 6e | (not.(=.(length.row).(length.lin |
| 6f00 | 65 29 29 29 0a 09 09 09 09 20 20 28 73 65 74 71 20 6c 69 6e 65 20 28 73 75 62 73 74 72 69 6e 67 | e))).......(setq.line.(substring |
| 6f20 | 20 6c 69 6e 65 20 28 6c 65 6e 67 74 68 20 72 6f 77 29 29 29 29 29 29 29 29 0a 09 09 20 28 3c 20 | .line.(length.row))))))))....(<. |
| 6f40 | 28 70 6f 69 6e 74 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 09 20 20 20 20 20 20 20 28 62 65 | (point).(point-max)).........(be |
| 6f60 | 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 20 32 29 29 29 0a 20 20 20 20 20 20 28 6e 72 65 76 | ginning-of-line.2))).......(nrev |
| 6f80 | 65 72 73 65 20 28 69 66 20 6d 61 78 2d 72 6f 77 73 0a 09 09 20 20 20 20 28 6c 61 73 74 20 72 6f | erse.(if.max-rows.......(last.ro |
| 6fa0 | 77 73 20 6d 61 78 2d 72 6f 77 73 29 0a 09 09 20 20 72 6f 77 73 29 29 29 29 29 0a 0a 28 64 65 66 | ws.max-rows).....rows)))))..(def |
| 6fc0 | 75 6e 20 70 6f 73 2d 74 69 70 2d 66 69 6c 6c 2d 73 74 72 69 6e 67 20 28 73 74 72 69 6e 67 20 26 | un.pos-tip-fill-string.(string.& |
| 6fe0 | 6f 70 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 | optional.width.margin.justify.sq |
| 7000 | 75 65 65 7a 65 20 6d 61 78 2d 72 6f 77 73 29 0a 20 20 22 46 69 6c 6c 20 65 61 63 68 20 6f 66 20 | ueeze.max-rows)..."Fill.each.of. |
| 7020 | 74 68 65 20 70 61 72 61 67 72 61 70 68 73 20 69 6e 20 53 54 52 49 4e 47 2e 0a 0a 57 49 44 54 48 | the.paragraphs.in.STRING...WIDTH |
| 7040 | 20 73 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 | .specifies.the.width.of.filling. |
| 7060 | 65 61 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 | each.paragraph..WIDTH.nil.means. |
| 7080 | 75 73 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 | use.the.width.of.currently.selec |
| 70a0 | 74 65 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 | ted.frame..Note.that.this.functi |
| 70c0 | 6f 6e 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 | on.doesn't.add.any.padding.chara |
| 70e0 | 63 74 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 | cters.at.the.end.of.each.row...M |
| 7100 | 41 52 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 | ARGIN,.if.non-nil,.specifies.lef |
| 7120 | 74 20 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 | t.margin.width.which.is.the.numb |
| 7140 | 65 72 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 | er.of.spece.characters.to.add.at |
| 7160 | 20 74 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 | .the.beginning.of.each.row...The |
| 7180 | 20 6f 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 | .optional.fourth.argument.JUSTIF |
| 71a0 | 59 20 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 | Y.specifies.which.kind.of.justif |
| 71c0 | 69 63 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 | ication.to.do:.`full',.`left',.` |
| 71e0 | 72 69 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 | right',.`center',.or.`none'..A.v |
| 7200 | 61 6c 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 | alue.of.t.means.handle.each.para |
| 7220 | 67 72 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 | graph.as.specified.by.its.text.p |
| 7240 | 72 6f 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 | roperties..Omitting.JUSTIFY.mean |
| 7260 | 73 0a 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 | s.don't.perform.justification,.w |
| 7280 | 6f 72 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 | ord.wrap.and.kinsoku.shori.(.... |
| 72a0 | 89 87 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 | ........)...SQUEEZE.nil.means.le |
| 72c0 | 61 76 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 | ave.whitespaces.other.than.line. |
| 72e0 | 62 72 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 | breaks.untouched...MAX-ROWS,.if. |
| 7300 | 67 69 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 | given,.specifies.maximum.number. |
| 7320 | 6f 66 20 72 6f 77 73 2e 20 54 68 65 20 72 6f 77 73 20 65 78 63 65 65 64 69 6e 67 0a 74 68 69 73 | of.rows..The.rows.exceeding.this |
| 7340 | 20 6e 75 6d 62 65 72 20 61 72 65 20 64 69 73 63 61 72 64 65 64 2e 22 0a 20 20 28 69 66 20 6a 75 | .number.are.discarded."...(if.ju |
| 7360 | 73 74 69 66 79 0a 20 20 20 20 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 09 28 | stify.......(with-temp-buffer..( |
| 7380 | 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 74 69 70 2d 74 61 62 | let*.((tab-width.(or.pos-tip-tab |
| 73a0 | 2d 77 69 64 74 68 20 74 61 62 2d 77 69 64 74 68 29 29 0a 09 20 20 20 20 20 20 20 28 66 69 6c 6c | -width.tab-width)).........(fill |
| 73c0 | 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 68 29 29 | -column.(or.width.(frame-width)) |
| 73e0 | 29 0a 09 20 20 20 20 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 | ).........(left-margin.(or.margi |
| 7400 | 6e 20 30 29 29 0a 09 20 20 20 20 20 20 20 28 6b 69 6e 73 6f 6b 75 2d 6c 69 6d 69 74 20 31 29 0a | n.0)).........(kinsoku-limit.1). |
| 7420 | 09 20 20 20 20 20 20 20 69 6e 64 65 6e 74 2d 74 61 62 73 2d 6d 6f 64 65 29 0a 09 20 20 28 69 6e | ........indent-tabs-mode)....(in |
| 7440 | 73 65 72 74 20 73 74 72 69 6e 67 29 0a 09 20 20 28 75 6e 74 61 62 69 66 79 20 28 70 6f 69 6e 74 | sert.string)....(untabify.(point |
| 7460 | 2d 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 09 20 20 28 66 69 6c 6c 2d 72 65 67 69 | -min).(point-max))....(fill-regi |
| 7480 | 6f 6e 20 28 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 | on.(point-min).(point-max).justi |
| 74a0 | 66 79 20 28 6e 6f 74 20 73 71 75 65 65 7a 65 29 29 0a 09 20 20 28 69 66 20 6d 61 78 2d 72 6f 77 | fy.(not.squeeze))....(if.max-row |
| 74c0 | 73 0a 09 20 20 20 20 20 20 28 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 20 28 67 6f 74 6f | s........(buffer-substring.(goto |
| 74e0 | 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 09 09 09 09 28 6c 69 6e 65 2d 65 6e 64 | -char.(point-min)).....(line-end |
| 7500 | 2d 70 6f 73 69 74 69 6f 6e 20 6d 61 78 2d 72 6f 77 73 29 29 0a 09 20 20 20 20 28 62 75 66 66 65 | -position.max-rows))......(buffe |
| 7520 | 72 2d 73 74 72 69 6e 67 29 29 29 29 0a 20 20 20 20 28 6d 61 70 63 6f 6e 63 61 74 20 27 69 64 65 | r-string)))).....(mapconcat.'ide |
| 7540 | 6e 74 69 74 79 0a 09 20 20 20 20 20 20 20 28 70 6f 73 2d 74 69 70 2d 73 70 6c 69 74 2d 73 74 72 | ntity.........(pos-tip-split-str |
| 7560 | 69 6e 67 20 73 74 72 69 6e 67 20 77 69 64 74 68 20 6d 61 72 67 69 6e 20 6e 69 6c 20 6e 69 6c 20 | ing.string.width.margin.nil.nil. |
| 7580 | 6d 61 78 2d 72 6f 77 73 29 0a 09 20 20 20 20 20 20 20 22 5c 6e 22 29 29 29 0a 0a 28 64 65 66 75 | max-rows)........."\n")))..(defu |
| 75a0 | 6e 20 70 6f 73 2d 74 69 70 2d 74 72 75 6e 63 61 74 65 2d 73 74 72 69 6e 67 20 28 73 74 72 69 6e | n.pos-tip-truncate-string.(strin |
| 75c0 | 67 20 77 69 64 74 68 20 68 65 69 67 68 74 29 0a 20 20 22 54 72 75 6e 63 61 74 65 20 65 61 63 68 | g.width.height)..."Truncate.each |
| 75e0 | 20 6c 69 6e 65 20 6f 66 20 53 54 52 49 4e 47 20 74 6f 20 57 49 44 54 48 20 61 6e 64 20 64 69 73 | .line.of.STRING.to.WIDTH.and.dis |
| 7600 | 63 61 72 64 20 6c 69 6e 65 73 20 65 78 63 65 65 64 69 6e 67 20 48 45 49 47 48 54 2e 22 0a 20 20 | card.lines.exceeding.HEIGHT."... |
| 7620 | 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 20 73 74 | (with-temp-buffer.....(insert.st |
| 7640 | 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 69 6e 29 | ring).....(goto-char.(point-min) |
| 7660 | 29 0a 20 20 20 20 28 6c 65 74 20 28 28 6e 72 6f 77 20 30 29 0a 09 20 20 72 6f 77 73 29 0a 20 20 | ).....(let.((nrow.0)....rows)... |
| 7680 | 20 20 20 20 28 77 68 69 6c 65 20 28 61 6e 64 20 28 3c 20 6e 72 6f 77 20 68 65 69 67 68 74 29 0a | ....(while.(and.(<.nrow.height). |
| 76a0 | 09 09 20 20 28 70 72 6f 67 32 0a 09 09 20 20 20 20 20 20 28 70 75 73 68 20 28 74 72 75 6e 63 61 | ....(prog2.........(push.(trunca |
| 76c0 | 74 65 2d 73 74 72 69 6e 67 2d 74 6f 2d 77 69 64 74 68 0a 09 09 09 20 20 20 20 20 28 62 75 66 66 | te-string-to-width.........(buff |
| 76e0 | 65 72 2d 73 75 62 73 74 72 69 6e 67 20 28 70 6f 69 6e 74 29 20 28 70 72 6f 67 6e 20 28 65 6e 64 | er-substring.(point).(progn.(end |
| 7700 | 2d 6f 66 2d 6c 69 6e 65 29 20 28 70 6f 69 6e 74 29 29 29 0a 09 09 09 20 20 20 20 20 77 69 64 74 | -of-line).(point))).........widt |
| 7720 | 68 29 0a 09 09 09 20 20 20 20 72 6f 77 73 29 0a 09 09 20 20 20 20 20 20 28 3c 20 28 70 6f 69 6e | h)........rows).........(<.(poin |
| 7740 | 74 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 09 09 20 20 20 20 28 62 65 67 69 6e 6e 69 6e 67 | t).(point-max)).......(beginning |
| 7760 | 2d 6f 66 2d 6c 69 6e 65 20 32 29 0a 09 09 20 20 20 20 28 73 65 74 71 20 6e 72 6f 77 20 28 31 2b | -of-line.2).......(setq.nrow.(1+ |
| 7780 | 20 6e 72 6f 77 29 29 29 29 29 0a 20 20 20 20 20 20 28 6d 61 70 63 6f 6e 63 61 74 20 27 69 64 65 | .nrow))))).......(mapconcat.'ide |
| 77a0 | 6e 74 69 74 79 20 28 6e 72 65 76 65 72 73 65 20 72 6f 77 73 29 20 22 5c 6e 22 29 29 29 29 0a 0a | ntity.(nreverse.rows)."\n")))).. |
| 77c0 | 28 64 65 66 75 6e 20 70 6f 73 2d 74 69 70 2d 73 74 72 69 6e 67 2d 77 69 64 74 68 2d 68 65 69 67 | (defun.pos-tip-string-width-heig |
| 77e0 | 68 74 20 28 73 74 72 69 6e 67 29 0a 20 20 22 43 6f 75 6e 74 20 63 6f 6c 75 6d 6e 73 20 61 6e 64 | ht.(string)..."Count.columns.and |
| 7800 | 20 72 6f 77 73 20 6f 66 20 53 54 52 49 4e 47 2e 20 52 65 74 75 72 6e 20 61 20 63 6f 6e 73 20 63 | .rows.of.STRING..Return.a.cons.c |
| 7820 | 65 6c 6c 20 6c 69 6b 65 20 28 57 49 44 54 48 20 2e 20 48 45 49 47 48 54 29 2e 0a 54 68 65 20 6c | ell.like.(WIDTH...HEIGHT)..The.l |
| 7840 | 61 73 74 20 65 6d 70 74 79 20 6c 69 6e 65 20 6f 66 20 53 54 52 49 4e 47 20 69 73 20 69 67 6e 6f | ast.empty.line.of.STRING.is.igno |
| 7860 | 72 65 64 2e 0a 0a 45 78 61 6d 70 6c 65 3a 0a 0a 5c 28 70 6f 73 2d 74 69 70 2d 73 74 72 69 6e 67 | red...Example:..\(pos-tip-string |
| 7880 | 2d 77 69 64 74 68 2d 68 65 69 67 68 74 20 5c 22 61 62 63 5c 5c 6e e3 81 82 e3 81 84 e3 81 86 5c | -width-height.\"abc\\n.........\ |
| 78a0 | 5c 6e 31 32 33 5c 22 29 0a 3b 3b 20 3d 3e 20 28 36 20 2e 20 33 29 22 0a 20 20 28 77 69 74 68 2d | \n123\").;;.=>.(6...3)"...(with- |
| 78c0 | 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 20 28 69 6e 73 65 72 74 20 73 74 72 69 6e 67 29 0a | temp-buffer.....(insert.string). |
| 78e0 | 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20 | ....(goto-char.(point-min))..... |
| 7900 | 28 65 6e 64 2d 6f 66 2d 6c 69 6e 65 29 0a 20 20 20 20 28 6c 65 74 20 28 28 77 69 64 74 68 20 28 | (end-of-line).....(let.((width.( |
| 7920 | 63 75 72 72 65 6e 74 2d 63 6f 6c 75 6d 6e 29 29 0a 09 20 20 28 68 65 69 67 68 74 20 28 69 66 20 | current-column))....(height.(if. |
| 7940 | 28 65 71 20 28 63 68 61 72 2d 62 65 66 6f 72 65 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 20 3f 5c | (eq.(char-before.(point-max)).?\ |
| 7960 | 6e 29 20 30 20 31 29 29 29 0a 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 3c 20 28 70 6f 69 6e 74 | n).0.1))).......(while.(<.(point |
| 7980 | 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 09 28 65 6e 64 2d 6f 66 2d 6c 69 6e 65 20 32 29 0a | ).(point-max))..(end-of-line.2). |
| 79a0 | 09 28 73 65 74 71 20 77 69 64 74 68 20 28 6d 61 78 20 28 63 75 72 72 65 6e 74 2d 63 6f 6c 75 6d | .(setq.width.(max.(current-colum |
| 79c0 | 6e 29 20 77 69 64 74 68 29 0a 09 20 20 20 20 20 20 68 65 69 67 68 74 20 28 31 2b 20 68 65 69 67 | n).width)........height.(1+.heig |
| 79e0 | 68 74 29 29 29 0a 20 20 20 20 20 20 28 63 6f 6e 73 20 77 69 64 74 68 20 68 65 69 67 68 74 29 29 | ht))).......(cons.width.height)) |
| 7a00 | 29 29 0a 0a 28 64 65 66 75 6e 20 70 6f 73 2d 74 69 70 2d 78 2d 64 69 73 70 6c 61 79 2d 77 69 64 | ))..(defun.pos-tip-x-display-wid |
| 7a20 | 74 68 20 28 26 6f 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 6d | th.(&optional.frame)..."Return.m |
| 7a40 | 61 78 69 6d 75 6d 20 63 6f 6c 75 6d 6e 20 6e 75 6d 62 65 72 20 69 6e 20 74 6f 6f 6c 74 69 70 20 | aximum.column.number.in.tooltip. |
| 7a60 | 77 68 69 63 68 20 6f 63 63 75 70 69 65 73 20 74 68 65 20 66 75 6c 6c 20 77 69 64 74 68 0a 6f 66 | which.occupies.the.full.width.of |
| 7a80 | 20 64 69 73 70 6c 61 79 2e 20 4f 6d 69 74 74 69 6e 67 20 46 52 41 4d 45 20 6d 65 61 6e 73 20 75 | .display..Omitting.FRAME.means.u |
| 7aa0 | 73 65 20 64 69 73 70 6c 61 79 20 74 68 61 74 20 73 65 6c 65 63 74 65 64 20 66 72 61 6d 65 20 69 | se.display.that.selected.frame.i |
| 7ac0 | 73 20 69 6e 2e 22 0a 20 20 28 31 2b 20 28 2f 20 28 78 2d 64 69 73 70 6c 61 79 2d 70 69 78 65 6c | s.in."...(1+.(/.(x-display-pixel |
| 7ae0 | 2d 77 69 64 74 68 20 66 72 61 6d 65 29 20 28 66 72 61 6d 65 2d 63 68 61 72 2d 77 69 64 74 68 20 | -width.frame).(frame-char-width. |
| 7b00 | 66 72 61 6d 65 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 73 70 | frame))))..(defun.pos-tip-x-disp |
| 7b20 | 6c 61 79 2d 68 65 69 67 68 74 20 28 26 6f 70 74 69 6f 6e 61 6c 20 66 72 61 6d 65 29 0a 20 20 22 | lay-height.(&optional.frame)..." |
| 7b40 | 52 65 74 75 72 6e 20 6d 61 78 69 6d 75 6d 20 72 6f 77 20 6e 75 6d 62 65 72 20 69 6e 20 74 6f 6f | Return.maximum.row.number.in.too |
| 7b60 | 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 20 68 65 69 | ltip.which.occupies.the.full.hei |
| 7b80 | 67 68 74 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 45 20 6d | ght.of.display..Omitting.FRAME.m |
| 7ba0 | 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 64 20 66 | eans.use.display.that.selected.f |
| 7bc0 | 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 6c 61 79 | rame.is.in."...(1+.(/.(x-display |
| 7be0 | 2d 70 69 78 65 6c 2d 68 65 69 67 68 74 20 66 72 61 6d 65 29 20 28 66 72 61 6d 65 2d 63 68 61 72 | -pixel-height.frame).(frame-char |
| 7c00 | 2d 68 65 69 67 68 74 20 66 72 61 6d 65 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 6f 73 2d 74 69 | -height.frame))))..(defun.pos-ti |
| 7c20 | 70 2d 74 6f 6f 6c 74 69 70 2d 77 69 64 74 68 20 28 77 69 64 74 68 20 63 68 61 72 2d 77 69 64 74 | p-tooltip-width.(width.char-widt |
| 7c40 | 68 29 0a 20 20 22 43 61 6c 63 75 6c 61 74 65 20 74 6f 6f 6c 74 69 70 20 70 69 78 65 6c 20 77 69 | h)..."Calculate.tooltip.pixel.wi |
| 7c60 | 64 74 68 2e 22 0a 20 20 28 2b 20 28 2a 20 77 69 64 74 68 20 63 68 61 72 2d 77 69 64 74 68 29 0a | dth."...(+.(*.width.char-width). |
| 7c80 | 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 65 72 2d 77 69 64 74 | .....(ash.(+.pos-tip-border-widt |
| 7ca0 | 68 0a 09 20 20 20 20 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 | h.......pos-tip-internal-border- |
| 7cc0 | 77 69 64 74 68 29 0a 09 20 20 31 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 6f 73 2d 74 69 70 2d 74 | width)....1)))..(defun.pos-tip-t |
| 7ce0 | 6f 6f 6c 74 69 70 2d 68 65 69 67 68 74 20 28 68 65 69 67 68 74 20 63 68 61 72 2d 68 65 69 67 68 | ooltip-height.(height.char-heigh |
| 7d00 | 74 20 26 6f 70 74 69 6f 6e 61 6c 20 66 72 61 6d 65 29 0a 20 20 22 43 61 6c 63 75 6c 61 74 65 20 | t.&optional.frame)..."Calculate. |
| 7d20 | 74 6f 6f 6c 74 69 70 20 70 69 78 65 6c 20 68 65 69 67 68 74 2e 22 0a 20 20 28 6c 65 74 20 28 28 | tooltip.pixel.height."...(let.(( |
| 7d40 | 73 70 61 63 69 6e 67 20 28 6f 72 20 28 64 65 66 61 75 6c 74 2d 76 61 6c 75 65 20 27 6c 69 6e 65 | spacing.(or.(default-value.'line |
| 7d60 | 2d 73 70 61 63 69 6e 67 29 0a 09 09 20 20 20 20 20 28 66 72 61 6d 65 2d 70 61 72 61 6d 65 74 65 | -spacing)........(frame-paramete |
| 7d80 | 72 20 66 72 61 6d 65 20 27 6c 69 6e 65 2d 73 70 61 63 69 6e 67 29 29 29 29 0a 20 20 20 20 28 2b | r.frame.'line-spacing)))).....(+ |
| 7da0 | 20 28 2a 20 68 65 69 67 68 74 20 28 2b 20 63 68 61 72 2d 68 65 69 67 68 74 0a 09 09 20 20 20 20 | .(*.height.(+.char-height....... |
| 7dc0 | 28 63 6f 6e 64 0a 09 09 20 20 20 20 20 28 28 69 6e 74 65 67 65 72 70 20 73 70 61 63 69 6e 67 29 | (cond........((integerp.spacing) |
| 7de0 | 0a 09 09 20 20 20 20 20 20 73 70 61 63 69 6e 67 29 0a 09 09 20 20 20 20 20 28 28 66 6c 6f 61 74 | .........spacing)........((float |
| 7e00 | 70 20 73 70 61 63 69 6e 67 29 0a 09 09 20 20 20 20 20 20 28 74 72 75 6e 63 61 74 65 20 28 2a 20 | p.spacing).........(truncate.(*. |
| 7e20 | 28 66 72 61 6d 65 2d 63 68 61 72 2d 68 65 69 67 68 74 20 66 72 61 6d 65 29 0a 09 09 09 09 20 20 | (frame-char-height.frame)....... |
| 7e40 | 20 73 70 61 63 69 6e 67 29 29 29 0a 09 09 20 20 20 20 20 28 74 20 30 29 29 29 29 0a 20 20 20 20 | .spacing)))........(t.0))))..... |
| 7e60 | 20 20 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 0a | ...(ash.(+.pos-tip-border-width. |
| 7e80 | 09 20 20 20 20 20 20 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 | ........pos-tip-internal-border- |
| 7ea0 | 77 69 64 74 68 29 0a 09 20 20 20 20 31 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 6f 73 2d 74 69 | width)......1))))..(defun.pos-ti |
| 7ec0 | 70 2d 73 68 6f 77 0a 20 20 28 73 74 72 69 6e 67 20 26 6f 70 74 69 6f 6e 61 6c 20 74 69 70 2d 63 | p-show...(string.&optional.tip-c |
| 7ee0 | 6f 6c 6f 72 20 70 6f 73 20 77 69 6e 64 6f 77 20 74 69 6d 65 6f 75 74 20 77 69 64 74 68 20 66 72 | olor.pos.window.timeout.width.fr |
| 7f00 | 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 53 68 6f 77 20 53 | ame-coordinates.dx.dy)..."Show.S |
| 7f20 | 54 52 49 4e 47 20 69 6e 20 61 20 74 6f 6f 6c 74 69 70 2c 20 77 68 69 63 68 20 69 73 20 61 20 73 | TRING.in.a.tooltip,.which.is.a.s |
| 7f40 | 6d 61 6c 6c 20 58 20 77 69 6e 64 6f 77 2c 20 61 74 20 50 4f 53 20 69 6e 20 57 49 4e 44 4f 57 0a | mall.X.window,.at.POS.in.WINDOW. |
| 7f60 | 75 73 69 6e 67 20 66 72 61 6d 65 27 73 20 64 65 66 61 75 6c 74 20 66 6f 6e 74 20 77 69 74 68 20 | using.frame's.default.font.with. |
| 7f80 | 54 49 50 2d 43 4f 4c 4f 52 2e 0a 0a 52 65 74 75 72 6e 20 70 69 78 65 6c 20 70 6f 73 69 74 69 6f | TIP-COLOR...Return.pixel.positio |
| 7fa0 | 6e 20 6f 66 20 74 6f 6f 6c 74 69 70 20 72 65 6c 61 74 69 76 65 20 74 6f 20 74 6f 70 20 6c 65 66 | n.of.tooltip.relative.to.top.lef |
| 7fc0 | 74 20 63 6f 72 6e 65 72 20 6f 66 20 66 72 61 6d 65 20 61 73 0a 61 20 63 6f 6e 73 20 63 65 6c 6c | t.corner.of.frame.as.a.cons.cell |
| 7fe0 | 20 6c 69 6b 65 20 28 58 20 2e 20 59 29 2e 0a 0a 54 49 50 2d 43 4f 4c 4f 52 20 69 73 20 61 20 66 | .like.(X...Y)...TIP-COLOR.is.a.f |
| 8000 | 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 47 52 4f | ace.or.a.cons.cell.like.(FOREGRO |
| 8020 | 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 0a 75 73 | UND-COLOR...BACKGROUND-COLOR).us |
| 8040 | 65 64 20 74 6f 20 73 70 65 63 69 66 79 20 2a 6f 6e 6c 79 2a 20 66 6f 72 65 67 72 6f 75 6e 64 2d | ed.to.specify.*only*.foreground- |
| 8060 | 63 6f 6c 6f 72 20 61 6e 64 20 62 61 63 6b 67 72 6f 75 6e 64 2d 63 6f 6c 6f 72 20 6f 66 20 74 6f | color.and.background-color.of.to |
| 8080 | 6f 6c 74 69 70 2e 20 49 66 0a 6f 6d 69 74 74 65 64 2c 20 75 73 65 20 60 70 6f 73 2d 74 69 70 2d | oltip..If.omitted,.use.`pos-tip- |
| 80a0 | 66 6f 72 65 67 72 6f 75 6e 64 2d 63 6f 6c 6f 72 27 20 61 6e 64 20 60 70 6f 73 2d 74 69 70 2d 62 | foreground-color'.and.`pos-tip-b |
| 80c0 | 61 63 6b 67 72 6f 75 6e 64 2d 63 6f 6c 6f 72 27 20 6f 72 20 74 68 65 0a 66 6f 72 65 67 72 6f 75 | ackground-color'.or.the.foregrou |
| 80e0 | 6e 64 20 61 6e 64 20 62 61 63 6b 67 72 6f 75 6e 64 20 63 6f 6c 6f 72 20 6f 66 20 74 68 65 20 60 | nd.and.background.color.of.the.` |
| 8100 | 74 6f 6f 6c 74 69 70 27 20 66 61 63 65 20 69 6e 73 74 65 61 64 2e 0a 0a 4f 6d 69 74 74 69 6e 67 | tooltip'.face.instead...Omitting |
| 8120 | 20 50 4f 53 20 61 6e 64 20 57 49 4e 44 4f 57 20 6d 65 61 6e 73 20 75 73 65 20 63 75 72 72 65 6e | .POS.and.WINDOW.means.use.curren |
| 8140 | 74 20 70 6f 73 69 74 69 6f 6e 20 61 6e 64 20 73 65 6c 65 63 74 65 64 20 77 69 6e 64 6f 77 2c 0a | t.position.and.selected.window,. |
| 8160 | 72 65 73 70 65 63 74 69 76 65 6c 79 2e 0a 0a 41 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 68 69 64 | respectively...Automatically.hid |
| 8180 | 65 20 74 68 65 20 74 6f 6f 6c 74 69 70 20 61 66 74 65 72 20 54 49 4d 45 4f 55 54 20 73 65 63 6f | e.the.tooltip.after.TIMEOUT.seco |
| 81a0 | 6e 64 73 2e 20 4f 6d 69 74 74 69 6e 67 20 54 49 4d 45 4f 55 54 20 6d 65 61 6e 73 0a 75 73 65 20 | nds..Omitting.TIMEOUT.means.use. |
| 81c0 | 74 68 65 20 64 65 66 61 75 6c 74 20 74 69 6d 65 6f 75 74 20 6f 66 20 35 20 73 65 63 6f 6e 64 73 | the.default.timeout.of.5.seconds |
| 81e0 | 2e 20 4e 6f 6e 2d 70 6f 73 69 74 69 76 65 20 54 49 4d 45 4f 55 54 20 6d 65 61 6e 73 20 64 6f 6e | ..Non-positive.TIMEOUT.means.don |
| 8200 | 27 74 20 68 69 64 65 0a 74 6f 6f 6c 74 69 70 20 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 2e 0a 0a | 't.hide.tooltip.automatically... |
| 8220 | 57 49 44 54 48 2c 20 69 66 20 6e 6f 6e 2d 6e 69 6c 2c 20 73 70 65 63 69 66 69 65 73 20 74 68 65 | WIDTH,.if.non-nil,.specifies.the |
| 8240 | 20 77 69 64 74 68 20 6f 66 20 66 69 6c 6c 69 6e 67 20 65 61 63 68 20 70 61 72 61 67 72 61 70 68 | .width.of.filling.each.paragraph |
| 8260 | 2e 0a 0a 49 66 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 | ...If.FRAME-COORDINATES.is.omitt |
| 8280 | 65 64 20 6f 72 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 | ed.or.nil,.automatically.obtain. |
| 82a0 | 74 68 65 20 61 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 | the.absolute.coordinates.of.the. |
| 82c0 | 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 77 68 69 63 68 20 57 | top.left.corner.of.frame.which.W |
| 82e0 | 49 4e 44 4f 57 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 | INDOW.is.on..Here,.`top.left.cor |
| 8300 | 6e 65 72 20 6f 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 | ner.of.frame'.represents.the.ori |
| 8320 | 67 69 6e 20 6f 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 | gin.of.`window-pixel-edges'.and. |
| 8340 | 69 74 73 20 63 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 | its.coordinates.are.essential.fo |
| 8360 | 72 20 63 61 6c 63 75 6c 61 74 69 6e 67 20 74 68 65 20 61 62 73 6f 6c 75 74 65 20 63 6f 6f 72 64 | r.calculating.the.absolute.coord |
| 8380 | 69 6e 61 74 65 73 0a 6f 66 20 74 68 65 20 74 6f 6f 6c 74 69 70 2e 20 49 66 20 61 20 63 6f 6e 73 | inates.of.the.tooltip..If.a.cons |
| 83a0 | 20 63 65 6c 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 | .cell.like.(LEFT...TOP),.specifi |
| 83c0 | 65 73 20 74 68 65 20 66 72 61 6d 65 0a 61 62 73 6f 6c 75 74 65 20 6c 6f 63 61 74 69 6f 6e 20 61 | es.the.frame.absolute.location.a |
| 83e0 | 6e 64 20 6d 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 | nd.makes.the.calculation.slightl |
| 8400 | 79 20 66 61 73 74 65 72 2c 20 62 75 74 20 63 61 6e 20 62 65 0a 75 73 65 64 20 6f 6e 6c 79 20 77 | y.faster,.but.can.be.used.only.w |
| 8420 | 68 65 6e 20 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 | hen.it's.clear.that.frame.is.in. |
| 8440 | 74 68 65 20 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 | the.specified.position..Users.ca |
| 8460 | 6e 20 67 65 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 | n.get.the.latest.values.of.frame |
| 8480 | 20 63 6f 6f 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 | .coordinates.for.using.in.the.ne |
| 84a0 | 78 74 20 63 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 | xt.call.by.referring.the.variabl |
| 84c0 | 65 20 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 69 6e 61 74 | e.`pos-tip-saved-frame-coordinat |
| 84e0 | 65 73 27 20 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 | es'.just.after.calling.this.func |
| 8500 | 74 69 6f 6e 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 | tion..Otherwise,.FRAME-COORDINAT |
| 8520 | 45 53 20 60 72 65 6c 61 74 69 76 65 27 20 6d 65 61 6e 73 20 75 73 65 0a 74 68 65 20 70 69 78 65 | ES.`relative'.means.use.the.pixe |
| 8540 | 6c 20 63 6f 6f 72 64 69 6e 61 74 65 73 20 72 65 6c 61 74 69 76 65 20 74 6f 20 74 68 65 20 74 6f | l.coordinates.relative.to.the.to |
| 8560 | 70 20 6c 65 66 74 20 63 6f 72 6e 65 72 20 6f 66 20 74 68 65 20 66 72 61 6d 65 20 66 6f 72 0a 64 | p.left.corner.of.the.frame.for.d |
| 8580 | 69 73 70 6c 61 79 69 6e 67 20 74 68 65 20 74 6f 6f 6c 74 69 70 2e 20 54 68 69 73 20 69 73 20 74 | isplaying.the.tooltip..This.is.t |
| 85a0 | 68 65 20 73 61 6d 65 20 65 66 66 65 63 74 20 61 73 0a 60 70 6f 73 2d 74 69 70 2d 75 73 65 2d 72 | he.same.effect.as.`pos-tip-use-r |
| 85c0 | 65 6c 61 74 69 76 65 2d 63 6f 6f 72 64 69 6e 61 74 65 73 27 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2e | elative-coordinates'.is.non-nil. |
| 85e0 | 0a 0a 44 58 20 73 70 65 63 69 66 69 65 73 20 68 6f 72 69 7a 6f 6e 74 61 6c 20 6f 66 66 73 65 74 | ..DX.specifies.horizontal.offset |
| 8600 | 20 69 6e 20 70 69 78 65 6c 2e 0a 0a 44 59 20 73 70 65 63 69 66 69 65 73 20 76 65 72 74 69 63 61 | .in.pixel...DY.specifies.vertica |
| 8620 | 6c 20 6f 66 66 73 65 74 20 69 6e 20 70 69 78 65 6c 2e 20 54 68 69 73 20 6d 61 6b 65 73 20 74 68 | l.offset.in.pixel..This.makes.th |
| 8640 | 65 20 63 61 6c 63 75 6c 61 74 69 6f 6e 73 20 64 6f 6e 65 0a 77 69 74 68 6f 75 74 20 63 6f 6e 73 | e.calculations.done.without.cons |
| 8660 | 69 64 65 72 69 6e 67 20 74 68 65 20 68 65 69 67 68 74 20 6f 66 20 6f 62 6a 65 63 74 20 61 74 20 | idering.the.height.of.object.at. |
| 8680 | 50 4f 53 2c 20 73 6f 20 74 68 65 20 6f 62 6a 65 63 74 20 6d 69 67 68 74 20 62 65 0a 68 69 64 64 | POS,.so.the.object.might.be.hidd |
| 86a0 | 65 6e 20 62 79 20 74 68 65 20 74 6f 6f 6c 74 69 70 2e 0a 0a 53 65 65 20 61 6c 73 6f 20 60 70 6f | en.by.the.tooltip...See.also.`po |
| 86c0 | 73 2d 74 69 70 2d 73 68 6f 77 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 7a 65 27 2e 22 0a 20 20 28 75 | s-tip-show-no-propertize'."...(u |
| 86e0 | 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 64 6f 77 20 28 73 | nless.window.....(setq.window.(s |
| 8700 | 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 28 28 66 72 61 6d | elected-window)))...(let*.((fram |
| 8720 | 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 20 28 6d 61 78 2d | e.(window-frame.window))...(max- |
| 8740 | 77 69 64 74 68 20 28 70 6f 73 2d 74 69 70 2d 78 2d 64 69 73 70 6c 61 79 2d 77 69 64 74 68 20 66 | width.(pos-tip-x-display-width.f |
| 8760 | 72 61 6d 65 29 29 0a 09 20 28 6d 61 78 2d 68 65 69 67 68 74 20 28 70 6f 73 2d 74 69 70 2d 78 2d | rame))...(max-height.(pos-tip-x- |
| 8780 | 64 69 73 70 6c 61 79 2d 68 65 69 67 68 74 20 66 72 61 6d 65 29 29 0a 09 20 28 77 2d 68 20 28 70 | display-height.frame))...(w-h.(p |
| 87a0 | 6f 73 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 | os-tip-string-width-height.strin |
| 87c0 | 67 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 67 20 28 70 6f 73 2d 74 69 70 2d 63 6f 6d 70 75 74 | g))..........(fg.(pos-tip-comput |
| 87e0 | 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 29 0a 20 | e-foreground-color.tip-color)).. |
| 8800 | 20 20 20 20 20 20 20 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 | ........(bg.(pos-tip-compute-bac |
| 8820 | 6b 67 72 6f 75 6e 64 2d 63 6f 6c 6f 72 20 74 69 70 2d 63 6f 6c 6f 72 29 29 0a 20 20 20 20 20 20 | kground-color.tip-color))....... |
| 8840 | 20 20 20 28 66 72 61 6d 65 2d 66 6f 6e 74 20 28 66 61 63 65 2d 61 74 74 72 69 62 75 74 65 20 27 | ...(frame-font.(face-attribute.' |
| 8860 | 64 65 66 61 75 6c 74 20 3a 66 6f 6e 74 20 66 72 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 | default.:font.frame))..........( |
| 8880 | 74 69 70 2d 66 61 63 65 2d 61 74 74 72 73 20 28 6c 69 73 74 20 3a 66 6f 6e 74 20 66 72 61 6d 65 | tip-face-attrs.(list.:font.frame |
| 88a0 | 2d 66 6f 6e 74 20 3a 66 6f 72 65 67 72 6f 75 6e 64 20 66 67 20 3a 62 61 63 6b 67 72 6f 75 6e 64 | -font.:foreground.fg.:background |
| 88c0 | 20 62 67 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 28 28 61 6e 64 20 77 69 64 74 | .bg))).....(cond......((and.widt |
| 88e0 | 68 0a 09 20 20 20 28 3e 20 28 63 61 72 20 77 2d 68 29 20 77 69 64 74 68 29 29 0a 20 20 20 20 20 | h.....(>.(car.w-h).width))...... |
| 8900 | 20 28 73 65 74 71 20 73 74 72 69 6e 67 20 28 70 6f 73 2d 74 69 70 2d 66 69 6c 6c 2d 73 74 72 69 | .(setq.string.(pos-tip-fill-stri |
| 8920 | 6e 67 20 73 74 72 69 6e 67 20 77 69 64 74 68 20 6e 69 6c 20 27 6e 6f 6e 65 20 6e 69 6c 20 6d 61 | ng.string.width.nil.'none.nil.ma |
| 8940 | 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 69 | x-height)......w-h.(pos-tip-stri |
| 8960 | 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 0a 20 20 20 20 20 28 | ng-width-height.string)))......( |
| 8980 | 28 6f 72 20 28 3e 20 28 63 61 72 20 77 2d 68 29 20 6d 61 78 2d 77 69 64 74 68 29 0a 09 20 20 28 | (or.(>.(car.w-h).max-width)....( |
| 89a0 | 3e 20 28 63 64 72 20 77 2d 68 29 20 6d 61 78 2d 68 65 69 67 68 74 29 29 0a 20 20 20 20 20 20 28 | >.(cdr.w-h).max-height)).......( |
| 89c0 | 73 65 74 71 20 73 74 72 69 6e 67 20 28 70 6f 73 2d 74 69 70 2d 74 72 75 6e 63 61 74 65 2d 73 74 | setq.string.(pos-tip-truncate-st |
| 89e0 | 72 69 6e 67 20 73 74 72 69 6e 67 20 6d 61 78 2d 77 69 64 74 68 20 6d 61 78 2d 68 65 69 67 68 74 | ring.string.max-width.max-height |
| 8a00 | 29 0a 09 20 20 20 20 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 | )......w-h.(pos-tip-string-width |
| 8a20 | 2d 68 65 69 67 68 74 20 73 74 72 69 6e 67 29 29 29 29 0a 20 20 20 20 28 70 6f 73 2d 74 69 70 2d | -height.string)))).....(pos-tip- |
| 8a40 | 73 68 6f 77 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 7a 65 0a 20 20 20 20 20 28 70 72 6f 70 65 72 74 | show-no-propertize......(propert |
| 8a60 | 69 7a 65 20 73 74 72 69 6e 67 20 27 66 61 63 65 20 74 69 70 2d 66 61 63 65 2d 61 74 74 72 73 29 | ize.string.'face.tip-face-attrs) |
| 8a80 | 0a 20 20 20 20 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 | ......tip-color.pos.window.timeo |
| 8aa0 | 75 74 0a 20 20 20 20 20 28 70 6f 73 2d 74 69 70 2d 74 6f 6f 6c 74 69 70 2d 77 69 64 74 68 20 28 | ut......(pos-tip-tooltip-width.( |
| 8ac0 | 63 61 72 20 77 2d 68 29 20 28 66 72 61 6d 65 2d 63 68 61 72 2d 77 69 64 74 68 20 66 72 61 6d 65 | car.w-h).(frame-char-width.frame |
| 8ae0 | 29 29 0a 20 20 20 20 20 28 70 6f 73 2d 74 69 70 2d 74 6f 6f 6c 74 69 70 2d 68 65 69 67 68 74 20 | ))......(pos-tip-tooltip-height. |
| 8b00 | 28 63 64 72 20 77 2d 68 29 20 28 66 72 61 6d 65 2d 63 68 61 72 2d 68 65 69 67 68 74 20 66 72 61 | (cdr.w-h).(frame-char-height.fra |
| 8b20 | 6d 65 29 20 66 72 61 6d 65 29 0a 20 20 20 20 20 66 72 61 6d 65 2d 63 6f 6f 72 64 69 6e 61 74 65 | me).frame)......frame-coordinate |
| 8b40 | 73 20 64 78 20 64 79 29 29 29 0a 0a 28 64 65 66 61 6c 69 61 73 20 27 70 6f 73 2d 74 69 70 2d 68 | s.dx.dy)))..(defalias.'pos-tip-h |
| 8b60 | 69 64 65 20 27 78 2d 68 69 64 65 2d 74 69 70 0a 20 20 22 48 69 64 65 20 70 6f 73 2d 74 69 70 27 | ide.'x-hide-tip..."Hide.pos-tip' |
| 8b80 | 73 20 74 6f 6f 6c 74 69 70 2e 22 29 0a 0a 28 64 65 66 75 6e 20 70 6f 73 2d 74 69 70 2d 63 61 6c | s.tooltip.")..(defun.pos-tip-cal |
| 8ba0 | 69 62 72 61 74 65 2d 66 72 61 6d 65 2d 6f 66 66 73 65 74 20 28 26 6f 70 74 69 6f 6e 61 6c 20 66 | ibrate-frame-offset.(&optional.f |
| 8bc0 | 72 61 6d 65 29 0a 20 20 22 52 65 74 75 72 6e 20 63 6f 6f 72 64 69 6e 61 74 65 73 20 6f 66 20 46 | rame)..."Return.coordinates.of.F |
| 8be0 | 52 41 4d 45 20 6f 72 69 67 69 6e 20 72 65 6c 61 74 69 76 65 20 74 6f 20 74 68 65 20 74 6f 70 20 | RAME.origin.relative.to.the.top. |
| 8c00 | 6c 65 66 74 20 63 6f 72 6e 65 72 20 6f 66 0a 74 68 65 20 46 52 41 4d 45 20 65 78 74 65 6e 74 2c | left.corner.of.the.FRAME.extent, |
| 8c20 | 20 6c 69 6b 65 20 28 4c 45 46 54 20 2e 20 54 4f 50 29 2e 20 54 68 65 20 72 65 74 75 72 6e 20 76 | .like.(LEFT...TOP)..The.return.v |
| 8c40 | 61 6c 75 65 20 69 73 20 72 65 63 6f 72 64 65 64 20 74 6f 0a 60 70 6f 73 2d 74 69 70 2d 66 72 61 | alue.is.recorded.to.`pos-tip-fra |
| 8c60 | 6d 65 2d 6f 66 66 73 65 74 27 2e 0a 0a 4e 6f 74 65 20 74 68 61 74 20 74 68 69 73 20 66 75 6e 63 | me-offset'...Note.that.this.func |
| 8c80 | 74 69 6f 6e 20 64 6f 65 73 6e 27 74 20 63 6f 72 72 65 63 74 6c 79 20 77 6f 72 6b 20 66 6f 72 20 | tion.doesn't.correctly.work.for. |
| 8ca0 | 58 20 66 72 61 6d 65 20 61 6e 64 20 45 6d 61 63 73 20 32 32 2e 22 0a 20 20 28 73 65 74 71 20 70 | X.frame.and.Emacs.22."...(setq.p |
| 8cc0 | 6f 73 2d 74 69 70 2d 66 72 61 6d 65 2d 6f 66 66 73 65 74 20 6e 69 6c 29 0a 20 20 28 6c 65 74 2a | os-tip-frame-offset.nil)...(let* |
| 8ce0 | 20 28 28 77 69 6e 64 6f 77 20 28 66 72 61 6d 65 2d 66 69 72 73 74 2d 77 69 6e 64 6f 77 20 66 72 | .((window.(frame-first-window.fr |
| 8d00 | 61 6d 65 29 29 0a 09 20 28 64 65 6c 65 74 65 2d 66 72 61 6d 65 2d 66 75 6e 63 74 69 6f 6e 73 0a | ame))...(delete-frame-functions. |
| 8d20 | 09 20 20 27 28 28 6c 61 6d 62 64 61 20 28 66 72 61 6d 65 29 0a 09 20 20 20 20 20 20 28 69 66 20 | ...'((lambda.(frame)........(if. |
| 8d40 | 28 65 71 75 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 6e | (equal.(frame-parameter.frame.'n |
| 8d60 | 61 6d 65 29 20 22 74 6f 6f 6c 74 69 70 22 29 0a 09 09 20 20 28 73 65 74 71 20 70 6f 73 2d 74 69 | ame)."tooltip").....(setq.pos-ti |
| 8d80 | 70 2d 66 72 61 6d 65 2d 6f 66 66 73 65 74 0a 09 09 09 28 63 6f 6e 73 20 28 65 76 61 6c 20 28 66 | p-frame-offset....(cons.(eval.(f |
| 8da0 | 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 74 29 29 0a 09 09 09 | rame-parameter.frame.'left)).... |
| 8dc0 | 20 20 20 20 20 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 | ......(eval.(frame-parameter.fra |
| 8de0 | 6d 65 20 27 74 6f 70 29 29 29 29 29 29 29 29 0a 09 20 28 70 6f 73 2d 74 69 70 2d 62 6f 72 64 65 | me.'top))))))))...(pos-tip-borde |
| 8e00 | 72 2d 77 69 64 74 68 20 30 29 0a 09 20 28 70 6f 73 2d 74 69 70 2d 69 6e 74 65 72 6e 61 6c 2d 62 | r-width.0)...(pos-tip-internal-b |
| 8e20 | 6f 72 64 65 72 2d 77 69 64 74 68 20 31 29 0a 09 20 28 72 70 6f 73 20 28 70 6f 73 2d 74 69 70 2d | order-width.1)...(rpos.(pos-tip- |
| 8e40 | 73 68 6f 77 20 22 22 0a 09 09 09 20 20 20 20 20 60 28 6e 69 6c 20 2e 20 2c 28 66 72 61 6d 65 2d | show."".........`(nil...,(frame- |
| 8e60 | 70 61 72 61 6d 65 74 65 72 20 66 72 61 6d 65 20 27 62 61 63 6b 67 72 6f 75 6e 64 2d 63 6f 6c 6f | parameter.frame.'background-colo |
| 8e80 | 72 29 29 0a 09 09 09 20 20 20 20 20 28 77 69 6e 64 6f 77 2d 73 74 61 72 74 20 77 69 6e 64 6f 77 | r)).........(window-start.window |
| 8ea0 | 29 20 77 69 6e 64 6f 77 0a 09 09 09 20 20 20 20 20 6e 69 6c 20 6e 69 6c 20 27 72 65 6c 61 74 69 | ).window.........nil.nil.'relati |
| 8ec0 | 76 65 20 6e 69 6c 20 30 29 29 29 0a 20 20 20 20 28 73 69 74 2d 66 6f 72 20 30 29 0a 20 20 20 20 | ve.nil.0))).....(sit-for.0)..... |
| 8ee0 | 28 70 6f 73 2d 74 69 70 2d 68 69 64 65 29 0a 20 20 20 20 28 61 6e 64 20 70 6f 73 2d 74 69 70 2d | (pos-tip-hide).....(and.pos-tip- |
| 8f00 | 66 72 61 6d 65 2d 6f 66 66 73 65 74 0a 09 20 28 73 65 74 71 20 70 6f 73 2d 74 69 70 2d 66 72 61 | frame-offset...(setq.pos-tip-fra |
| 8f20 | 6d 65 2d 6f 66 66 73 65 74 0a 09 20 20 20 20 20 20 20 28 63 6f 6e 73 20 28 2d 20 28 63 61 72 20 | me-offset.........(cons.(-.(car. |
| 8f40 | 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 61 72 20 72 70 | pos-tip-frame-offset)....(car.rp |
| 8f60 | 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 65 72 20 66 72 | os)....(eval.(frame-parameter.fr |
| 8f80 | 61 6d 65 20 27 6c 65 66 74 29 29 29 0a 09 09 20 20 20 20 20 28 2d 20 28 63 64 72 20 70 6f 73 2d | ame.'left)))........(-.(cdr.pos- |
| 8fa0 | 74 69 70 2d 66 72 61 6d 65 2d 6f 66 66 73 65 74 29 0a 09 09 09 28 63 64 72 20 72 70 6f 73 29 0a | tip-frame-offset)....(cdr.rpos). |
| 8fc0 | 09 09 09 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 | ...(eval.(frame-parameter.frame. |
| 8fe0 | 27 74 6f 70 29 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 6f 73 2d 74 69 70 2d 77 33 32 | 'top))))))))..(defun.pos-tip-w32 |
| 9000 | 2d 6d 61 78 2d 77 69 64 74 68 2d 68 65 69 67 68 74 20 28 26 6f 70 74 69 6f 6e 61 6c 20 6b 65 65 | -max-width-height.(&optional.kee |
| 9020 | 70 2d 6d 61 78 69 6d 69 7a 65 29 0a 20 20 22 4d 61 78 69 6d 69 7a 65 20 74 68 65 20 63 75 72 72 | p-maximize)..."Maximize.the.curr |
| 9040 | 65 6e 74 6c 79 20 73 65 6c 65 63 74 65 64 20 66 72 61 6d 65 20 74 65 6d 70 6f 72 61 72 69 6c 79 | ently.selected.frame.temporarily |
| 9060 | 20 61 6e 64 20 73 65 74 0a 60 70 6f 73 2d 74 69 70 2d 77 33 32 2d 73 61 76 65 64 2d 6d 61 78 2d | .and.set.`pos-tip-w32-saved-max- |
| 9080 | 77 69 64 74 68 2d 68 65 69 67 68 74 27 20 74 68 65 20 65 66 66 65 63 74 69 76 65 20 64 69 73 70 | width-height'.the.effective.disp |
| 90a0 | 6c 61 79 20 73 69 7a 65 20 69 6e 20 6f 72 64 65 72 0a 74 6f 20 62 65 63 6f 6d 65 20 70 6f 73 73 | lay.size.in.order.to.become.poss |
| 90c0 | 69 62 6c 65 20 74 6f 20 63 61 6c 63 75 6c 61 74 65 20 74 68 65 20 61 62 73 6f 6c 75 74 65 20 6c | ible.to.calculate.the.absolute.l |
| 90e0 | 6f 63 61 74 69 6f 6e 20 6f 66 20 74 6f 6f 6c 74 69 70 2e 0a 0a 4b 45 45 50 2d 4d 41 58 49 4d 49 | ocation.of.tooltip...KEEP-MAXIMI |
| 9100 | 5a 45 20 6e 6f 6e 2d 6e 69 6c 20 6d 65 61 6e 73 20 6c 65 61 76 65 20 74 68 65 20 66 72 61 6d 65 | ZE.non-nil.means.leave.the.frame |
| 9120 | 20 6d 61 78 69 6d 69 7a 65 64 2e 0a 0a 4e 6f 74 65 20 74 68 61 74 20 74 68 69 73 20 66 75 6e 63 | .maximized...Note.that.this.func |
| 9140 | 74 69 6f 6e 20 69 73 20 75 73 61 62 6c 65 20 6f 6e 6c 79 20 69 6e 20 45 6d 61 63 73 20 32 33 20 | tion.is.usable.only.in.Emacs.23. |
| 9160 | 66 6f 72 20 4d 53 2d 57 69 6e 64 6f 77 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 | for.MS-Windows."...(interactive) |
| 9180 | 0a 20 20 28 75 6e 6c 65 73 73 20 28 65 71 20 77 69 6e 64 6f 77 2d 73 79 73 74 65 6d 20 27 77 33 | ...(unless.(eq.window-system.'w3 |
| 91a0 | 32 29 0a 20 20 20 20 28 65 72 72 6f 72 20 22 60 70 6f 73 2d 74 69 70 2d 77 33 32 2d 6d 61 78 2d | 2).....(error."`pos-tip-w32-max- |
| 91c0 | 77 69 64 74 68 2d 68 65 69 67 68 74 27 20 63 61 6e 20 62 65 20 75 73 65 64 20 6f 6e 6c 79 20 69 | width-height'.can.be.used.only.i |
| 91e0 | 6e 20 77 33 32 20 66 72 61 6d 65 2e 22 29 29 0a 20 20 3b 3b 20 4d 61 78 69 6d 69 7a 65 20 66 72 | n.w32.frame."))...;;.Maximize.fr |
| 9200 | 61 6d 65 0a 20 20 28 77 69 74 68 2d 6e 6f 2d 77 61 72 6e 69 6e 67 73 20 28 77 33 32 2d 73 65 6e | ame...(with-no-warnings.(w32-sen |
| 9220 | 64 2d 73 79 73 2d 63 6f 6d 6d 61 6e 64 20 36 31 34 38 38 29 29 0a 20 20 28 73 69 74 2d 66 6f 72 | d-sys-command.61488))...(sit-for |
| 9240 | 20 30 29 0a 20 20 28 6c 65 74 20 28 28 6f 66 66 73 65 74 20 28 70 6f 73 2d 74 69 70 2d 63 61 6c | .0)...(let.((offset.(pos-tip-cal |
| 9260 | 69 62 72 61 74 65 2d 66 72 61 6d 65 2d 6f 66 66 73 65 74 29 29 29 0a 20 20 20 20 28 70 72 6f 67 | ibrate-frame-offset))).....(prog |
| 9280 | 31 0a 09 28 73 65 74 71 20 70 6f 73 2d 74 69 70 2d 77 33 32 2d 73 61 76 65 64 2d 6d 61 78 2d 77 | 1..(setq.pos-tip-w32-saved-max-w |
| 92a0 | 69 64 74 68 2d 68 65 69 67 68 74 0a 09 20 20 20 20 20 20 28 63 6f 6e 73 20 28 66 72 61 6d 65 2d | idth-height........(cons.(frame- |
| 92c0 | 70 69 78 65 6c 2d 77 69 64 74 68 29 0a 09 09 20 20 20 20 28 2b 20 28 66 72 61 6d 65 2d 70 69 78 | pixel-width).......(+.(frame-pix |
| 92e0 | 65 6c 2d 68 65 69 67 68 74 29 0a 09 09 20 20 20 20 20 20 20 28 2d 20 28 63 64 72 20 6f 66 66 73 | el-height)..........(-.(cdr.offs |
| 9300 | 65 74 29 20 28 63 61 72 20 6f 66 66 73 65 74 29 29 29 29 29 0a 20 20 20 20 20 20 28 69 66 20 28 | et).(car.offset))))).......(if.( |
| 9320 | 63 61 6c 6c 65 64 2d 69 6e 74 65 72 61 63 74 69 76 65 6c 79 2d 70 20 27 69 6e 74 65 72 61 63 74 | called-interactively-p.'interact |
| 9340 | 69 76 65 29 0a 09 20 20 28 6d 65 73 73 61 67 65 20 22 25 53 22 20 70 6f 73 2d 74 69 70 2d 77 33 | ive)....(message."%S".pos-tip-w3 |
| 9360 | 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 0a 20 20 20 20 20 | 2-saved-max-width-height))...... |
| 9380 | 20 28 75 6e 6c 65 73 73 20 6b 65 65 70 2d 6d 61 78 69 6d 69 7a 65 0a 09 3b 3b 20 52 65 73 74 6f | .(unless.keep-maximize..;;.Resto |
| 93a0 | 72 65 20 66 72 61 6d 65 0a 09 28 77 69 74 68 2d 6e 6f 2d 77 61 72 6e 69 6e 67 73 20 28 77 33 32 | re.frame..(with-no-warnings.(w32 |
| 93c0 | 2d 73 65 6e 64 2d 73 79 73 2d 63 6f 6d 6d 61 6e 64 20 36 31 37 32 38 29 29 29 29 29 29 0a 0a 0a | -send-sys-command.61728))))))... |
| 93e0 | 28 70 72 6f 76 69 64 65 20 27 70 6f 73 2d 74 69 70 29 0a 0a 3b 3b 3b 0a 3b 3b 3b 20 70 6f 73 2d | (provide.'pos-tip)..;;;.;;;.pos- |
| 9400 | 74 69 70 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | tip.el.ends.here................ |
| 9420 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 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 | ................................ |