ofs | hex dump | ascii |
---|
0000 | 3b 45 4c 43 17 00 00 00 0a 3b 3b 3b 20 43 6f 6d 70 69 6c 65 64 0a 3b 3b 3b 20 69 6e 20 45 6d 61 | ;ELC.....;;;.Compiled.;;;.in.Ema |
0020 | 63 73 20 76 65 72 73 69 6f 6e 20 32 35 2e 33 2e 31 0a 3b 3b 3b 20 77 69 74 68 20 61 6c 6c 20 6f | cs.version.25.3.1.;;;.with.all.o |
0040 | 70 74 69 6d 69 7a 61 74 69 6f 6e 73 2e 0a 0a 3b 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 75 73 65 | ptimizations...;;;.This.file.use |
0060 | 73 20 64 79 6e 61 6d 69 63 20 64 6f 63 73 74 72 69 6e 67 73 2c 20 66 69 72 73 74 20 61 64 64 65 | s.dynamic.docstrings,.first.adde |
0080 | 64 20 69 6e 20 45 6d 61 63 73 20 31 39 2e 32 39 2e 0a 0a 3b 3b 3b 20 54 68 69 73 20 66 69 6c 65 | d.in.Emacs.19.29...;;;.This.file |
00a0 | 20 64 6f 65 73 20 6e 6f 74 20 63 6f 6e 74 61 69 6e 20 75 74 66 2d 38 20 6e 6f 6e 2d 41 53 43 49 | .does.not.contain.utf-8.non-ASCI |
00c0 | 49 20 63 68 61 72 61 63 74 65 72 73 2c 0a 3b 3b 3b 20 61 6e 64 20 73 6f 20 63 61 6e 20 62 65 20 | I.characters,.;;;.and.so.can.be. |
00e0 | 6c 6f 61 64 65 64 20 69 6e 20 45 6d 61 63 73 20 76 65 72 73 69 6f 6e 73 20 65 61 72 6c 69 65 72 | loaded.in.Emacs.versions.earlier |
0100 | 20 74 68 61 6e 20 32 33 2e 0a 0a 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b | .than.23...;;;;;;;;;;;;;;;;;;;;; |
0120 | 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 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
0140 | 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 0a 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b | ;;;;;;;;;;;;;;.;;;;;;;;;;;;;;;;; |
0160 | 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 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
0180 | 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 0a 0a 0a 28 62 79 74 65 2d 63 6f 64 65 20 | ;;;;;;;;;;;;;;;;;;...(byte-code. |
01a0 | 22 5c 33 30 30 5c 33 30 31 5c 33 30 32 5c 33 30 33 5c 33 30 34 5c 33 30 35 5c 33 30 36 5c 33 30 | "\300\301\302\303\304\305\306\30 |
01c0 | 37 26 07 5c 32 31 30 5c 33 31 30 5c 33 31 31 5c 33 31 32 5c 33 31 33 5c 33 31 34 5c 33 31 35 5c | 7&.\210\310\311\312\313\314\315\ |
01e0 | 33 30 36 5c 33 30 31 26 07 5c 32 31 30 5c 33 31 30 5c 33 31 36 5c 33 31 37 5c 33 32 30 5c 33 31 | 306\301&.\210\310\316\317\320\31 |
0200 | 34 5c 33 32 31 5c 33 30 36 5c 33 30 31 26 07 5c 32 30 37 22 20 5b 63 75 73 74 6f 6d 2d 64 65 63 | 4\321\306\301&.\207".[custom-dec |
0220 | 6c 61 72 65 2d 67 72 6f 75 70 20 6c 75 69 2d 61 75 74 6f 70 61 73 74 65 20 6e 69 6c 20 22 54 68 | lare-group.lui-autopaste.nil."Th |
0240 | 65 20 4c 75 69 20 61 75 74 6f 70 61 73 74 65 20 65 78 74 65 6e 73 69 6f 6e 2e 22 20 3a 70 72 65 | e.Lui.autopaste.extension.".:pre |
0260 | 66 69 78 20 22 6c 75 69 2d 61 75 74 6f 70 61 73 74 65 2d 22 20 3a 67 72 6f 75 70 20 6c 75 69 20 | fix."lui-autopaste-".:group.lui. |
0280 | 63 75 73 74 6f 6d 2d 64 65 63 6c 61 72 65 2d 76 61 72 69 61 62 6c 65 20 6c 75 69 2d 61 75 74 6f | custom-declare-variable.lui-auto |
02a0 | 70 61 73 74 65 2d 6c 69 6e 65 73 20 33 20 22 53 74 61 72 74 69 6e 67 20 61 74 20 74 68 69 73 20 | paste-lines.3."Starting.at.this. |
02c0 | 6e 75 6d 62 65 72 20 6f 66 20 6c 69 6e 65 73 2c 20 4c 75 69 20 77 69 6c 6c 20 61 73 6b 20 74 6f | number.of.lines,.Lui.will.ask.to |
02e0 | 20 70 61 73 74 65 20 74 68 65 20 69 6e 70 75 74 2e 22 20 3a 74 79 70 65 20 69 6e 74 65 67 65 72 | .paste.the.input.".:type.integer |
0300 | 20 6c 75 69 2d 61 75 74 6f 70 61 73 74 65 2d 66 75 6e 63 74 69 6f 6e 20 27 6c 75 69 2d 61 75 74 | .lui-autopaste-function.'lui-aut |
0320 | 6f 70 61 73 74 65 2d 73 65 72 76 69 63 65 2d 69 78 69 6f 20 22 57 68 69 63 68 20 70 61 73 74 65 | opaste-service-ixio."Which.paste |
0340 | 20 73 65 72 76 69 63 65 20 74 6f 20 75 73 65 2e 5c 6e 5c 6e 54 68 69 73 20 66 75 6e 63 74 69 6f | .service.to.use.\n\nThis.functio |
0360 | 6e 20 77 69 6c 6c 20 62 65 20 63 61 6c 6c 65 64 20 77 69 74 68 20 73 6f 6d 65 20 74 65 78 74 20 | n.will.be.called.with.some.text. |
0380 | 61 73 20 69 74 73 20 6f 6e 6c 79 20 61 72 67 75 6d 65 6e 74 2c 5c 6e 61 6e 64 20 69 73 20 65 78 | as.its.only.argument,\nand.is.ex |
03a0 | 70 65 63 74 65 64 20 74 6f 20 72 65 74 75 72 6e 20 61 6e 20 55 52 4c 20 74 6f 20 76 69 65 77 20 | pected.to.return.an.URL.to.view. |
03c0 | 74 68 65 20 63 6f 6e 74 65 6e 74 73 2e 22 20 28 63 68 6f 69 63 65 20 28 63 6f 6e 73 74 20 3a 74 | the.contents.".(choice.(const.:t |
03e0 | 61 67 20 22 69 78 2e 69 6f 22 20 6c 75 69 2d 61 75 74 6f 70 61 73 74 65 2d 73 65 72 76 69 63 65 | ag."ix.io".lui-autopaste-service |
0400 | 2d 69 78 69 6f 29 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 70 74 70 62 2e 70 77 22 20 6c 75 69 | -ixio).(const.:tag."ptpb.pw".lui |
0420 | 2d 61 75 74 6f 70 61 73 74 65 2d 73 65 72 76 69 63 65 2d 70 74 70 62 2d 70 77 29 29 5d 20 38 29 | -autopaste-service-ptpb-pw))].8) |
0440 | 0a 23 40 32 36 32 20 45 6e 61 62 6c 65 20 74 68 65 20 6c 75 69 20 61 75 74 6f 70 61 73 74 65 20 | .#@262.Enable.the.lui.autopaste. |
0460 | 66 65 61 74 75 72 65 2e 0a 0a 49 66 20 79 6f 75 20 65 6e 74 65 72 20 6d 6f 72 65 20 74 68 61 6e | feature...If.you.enter.more.than |
0480 | 20 60 6c 75 69 2d 61 75 74 6f 70 61 73 74 65 2d 6c 69 6e 65 73 27 20 61 74 20 6f 6e 63 65 2c 20 | .`lui-autopaste-lines'.at.once,. |
04a0 | 4c 75 69 20 77 69 6c 6c 0a 61 73 6b 20 69 66 20 79 6f 75 20 77 6f 75 6c 64 20 70 72 65 66 65 72 | Lui.will.ask.if.you.would.prefer |
04c0 | 20 74 6f 20 75 73 65 20 61 20 70 61 73 74 65 20 73 65 72 76 69 63 65 20 69 6e 73 74 65 61 64 2e | .to.use.a.paste.service.instead. |
04e0 | 20 49 66 20 79 6f 75 0a 61 67 72 65 65 2c 20 4c 75 69 20 77 69 6c 6c 20 70 61 73 74 65 20 79 6f | .If.you.agree,.Lui.will.paste.yo |
0500 | 75 72 20 69 6e 70 75 74 20 74 6f 20 60 6c 75 69 2d 61 75 74 6f 70 61 73 74 65 2d 66 75 6e 63 74 | ur.input.to.`lui-autopaste-funct |
0520 | 69 6f 6e 27 20 61 6e 64 0a 72 65 70 6c 61 63 65 20 69 74 20 77 69 74 68 20 74 68 65 20 72 65 73 | ion'.and.replace.it.with.the.res |
0540 | 75 6c 74 69 6e 67 20 55 52 4c 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 65 6e 61 62 6c 65 2d 6c | ulting.URL...(defalias.'enable-l |
0560 | 75 69 2d 61 75 74 6f 70 61 73 74 65 20 23 5b 6e 69 6c 20 22 5c 33 30 30 5c 33 30 31 5c 33 30 32 | ui-autopaste.#[nil."\300\301\302 |
0580 | 5c 22 5c 32 30 37 22 20 5b 61 64 64 2d 68 6f 6f 6b 20 6c 75 69 2d 70 72 65 2d 69 6e 70 75 74 2d | \"\207".[add-hook.lui-pre-input- |
05a0 | 68 6f 6f 6b 20 6c 75 69 2d 61 75 74 6f 70 61 73 74 65 5d 20 33 20 28 23 24 20 2e 20 31 30 39 35 | hook.lui-autopaste].3.(#$...1095 |
05c0 | 29 20 6e 69 6c 5d 29 0a 23 40 33 36 20 44 69 73 61 62 6c 65 20 74 68 65 20 6c 75 69 20 61 75 74 | ).nil]).#@36.Disable.the.lui.aut |
05e0 | 6f 70 61 73 74 65 20 66 65 61 74 75 72 65 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 64 69 73 61 | opaste.feature...(defalias.'disa |
0600 | 62 6c 65 2d 6c 75 69 2d 61 75 74 6f 70 61 73 74 65 20 23 5b 6e 69 6c 20 22 5c 33 30 30 5c 33 30 | ble-lui-autopaste.#[nil."\300\30 |
0620 | 31 5c 33 30 32 5c 22 5c 32 30 37 22 20 5b 72 65 6d 6f 76 65 2d 68 6f 6f 6b 20 6c 75 69 2d 70 72 | 1\302\"\207".[remove-hook.lui-pr |
0640 | 65 2d 69 6e 70 75 74 2d 68 6f 6f 6b 20 6c 75 69 2d 61 75 74 6f 70 61 73 74 65 5d 20 33 20 28 23 | e-input-hook.lui-autopaste].3.(# |
0660 | 24 20 2e 20 31 34 38 35 29 20 6e 69 6c 5d 29 0a 23 40 36 33 20 43 68 65 63 6b 20 69 66 20 74 68 | $...1485).nil]).#@63.Check.if.th |
0680 | 65 20 6c 75 69 20 69 6e 70 75 74 20 69 73 20 74 6f 6f 20 6c 61 72 67 65 2e 20 49 66 20 73 6f 2c | e.lui.input.is.too.large..If.so, |
06a0 | 20 70 61 73 74 65 20 69 74 20 69 6e 73 74 65 61 64 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 6c | .paste.it.instead...(defalias.'l |
06c0 | 75 69 2d 61 75 74 6f 70 61 73 74 65 20 23 5b 6e 69 6c 20 22 5c 33 30 33 65 64 5c 22 08 59 5c 32 | ui-autopaste.#[nil."\303ed\".Y\2 |
06e0 | 30 35 1c 00 5c 33 30 34 5c 33 30 35 21 5c 32 30 35 1c 00 09 65 64 7b 21 1a 65 64 7c 5c 32 31 30 | 05..\304\305!\205...ed{!.ed|\210 |
0700 | 5c 6e 63 29 5c 32 30 37 22 20 5b 6c 75 69 2d 61 75 74 6f 70 61 73 74 65 2d 6c 69 6e 65 73 20 6c | \nc)\207".[lui-autopaste-lines.l |
0720 | 75 69 2d 61 75 74 6f 70 61 73 74 65 2d 66 75 6e 63 74 69 6f 6e 20 75 72 6c 20 63 6f 75 6e 74 2d | ui-autopaste-function.url.count- |
0740 | 6c 69 6e 65 73 20 79 2d 6f 72 2d 6e 2d 70 20 22 54 68 61 74 27 73 20 70 72 65 74 74 79 20 6c 6f | lines.y-or-n-p."That's.pretty.lo |
0760 | 6e 67 2c 20 77 6f 75 6c 64 20 79 6f 75 20 6c 69 6b 65 20 74 6f 20 75 73 65 20 61 20 70 61 73 74 | ng,.would.you.like.to.use.a.past |
0780 | 65 20 73 65 72 76 69 63 65 20 69 6e 73 74 65 61 64 3f 20 22 5d 20 33 20 28 23 24 20 2e 20 31 36 | e.service.instead?."].3.(#$...16 |
07a0 | 35 33 29 5d 29 0a 23 40 34 39 20 50 61 73 74 65 20 54 45 58 54 20 74 6f 20 70 74 70 62 2e 70 77 | 53)]).#@49.Paste.TEXT.to.ptpb.pw |
07c0 | 20 61 6e 64 20 72 65 74 75 72 6e 20 74 68 65 20 70 61 73 74 65 20 75 72 6c 2e 1f 0a 28 64 65 66 | .and.return.the.paste.url...(def |
07e0 | 61 6c 69 61 73 20 27 6c 75 69 2d 61 75 74 6f 70 61 73 74 65 2d 73 65 72 76 69 63 65 2d 70 74 70 | alias.'lui-autopaste-service-ptp |
0800 | 62 2d 70 77 20 23 5b 28 74 65 78 74 29 20 22 5c 33 30 36 5c 33 30 37 5c 33 31 30 5c 33 31 31 5c | b-pw.#[(text)."\306\307\310\311\ |
0820 | 33 31 32 08 21 5c 22 5c 33 31 33 19 1a 1b 1c 5c 33 31 34 5c 33 31 35 21 1d 5c 33 31 36 5c 32 31 | 312.!\"\313....\314\315!.\316\21 |
0840 | 36 72 0d 71 5c 32 31 30 65 62 5c 32 31 30 5c 33 31 37 5c 33 32 30 5c 33 31 33 5c 33 32 31 23 5c | 6r.q\210eb\210\317\320\313\321#\ |
0860 | 32 30 33 28 00 5c 33 32 32 5c 33 32 33 21 5c 32 30 32 2b 00 5c 33 32 34 5c 33 32 35 21 2e 07 5c | 203(.\322\323!\202+.\324\325!..\ |
0880 | 32 30 37 22 20 5b 74 65 78 74 20 75 72 6c 2d 68 74 74 70 2d 61 74 74 65 6d 70 74 2d 6b 65 65 70 | 207".[text.url-http-attempt-keep |
08a0 | 61 6c 69 76 65 73 20 75 72 6c 2d 72 65 71 75 65 73 74 2d 64 61 74 61 20 75 72 6c 2d 72 65 71 75 | alives.url-request-data.url-requ |
08c0 | 65 73 74 2d 65 78 74 72 61 2d 68 65 61 64 65 72 73 20 75 72 6c 2d 72 65 71 75 65 73 74 2d 6d 65 | est-extra-headers.url-request-me |
08e0 | 74 68 6f 64 20 62 75 66 20 22 50 4f 53 54 22 20 28 28 22 43 6f 6e 74 65 6e 74 2d 54 79 70 65 22 | thod.buf."POST".(("Content-Type" |
0900 | 20 2e 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d 77 77 77 2d 66 6f 72 6d 2d 75 72 6c 65 6e | ..."application/x-www-form-urlen |
0920 | 63 6f 64 65 64 22 29 29 20 66 6f 72 6d 61 74 20 22 63 3d 25 73 22 20 75 72 6c 2d 68 65 78 69 66 | coded")).format."c=%s".url-hexif |
0940 | 79 2d 73 74 72 69 6e 67 20 6e 69 6c 20 75 72 6c 2d 72 65 74 72 69 65 76 65 2d 73 79 6e 63 68 72 | y-string.nil.url-retrieve-synchr |
0960 | 6f 6e 6f 75 73 6c 79 20 22 68 74 74 70 73 3a 2f 2f 70 74 70 62 2e 70 77 2f 22 20 23 5b 6e 69 6c | onously."https://ptpb.pw/".#[nil |
0980 | 20 22 5c 33 30 31 08 21 5c 32 30 37 22 20 5b 62 75 66 20 6b 69 6c 6c 2d 62 75 66 66 65 72 5d 20 | ."\301.!\207".[buf.kill-buffer]. |
09a0 | 32 5d 20 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 5e 75 72 6c 3a 20 5c 5c 28 2e | 2].re-search-forward."^url:.\\(. |
09c0 | 2a 5c 5c 29 22 20 74 20 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 31 20 65 72 72 6f 72 20 22 45 72 | *\\)".t.match-string.1.error."Er |
09e0 | 72 6f 72 20 64 75 72 69 6e 67 20 70 61 73 74 69 6e 67 20 74 6f 20 70 74 70 62 2e 70 77 22 5d 20 | ror.during.pasting.to.ptpb.pw"]. |
0a00 | 36 20 28 23 24 20 2e 20 31 39 36 33 29 5d 29 0a 23 40 34 37 20 50 61 73 74 65 20 54 45 58 54 20 | 6.(#$...1963)]).#@47.Paste.TEXT. |
0a20 | 74 6f 20 69 78 2e 69 6f 20 61 6e 64 20 72 65 74 75 72 6e 20 74 68 65 20 70 61 73 74 65 20 75 72 | to.ix.io.and.return.the.paste.ur |
0a40 | 6c 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 6c 75 69 2d 61 75 74 6f 70 61 73 74 65 2d 73 65 72 | l...(defalias.'lui-autopaste-ser |
0a60 | 76 69 63 65 2d 69 78 69 6f 20 23 5b 28 74 65 78 74 29 20 22 5c 33 30 36 5c 33 30 37 5c 33 31 30 | vice-ixio.#[(text)."\306\307\310 |
0a80 | 5c 33 31 31 5c 33 31 32 08 21 5c 22 5c 33 31 33 19 1a 1b 1c 5c 33 31 34 5c 33 31 35 21 1d 5c 33 | \311\312.!\"\313....\314\315!.\3 |
0aa0 | 31 36 5c 32 31 36 72 0d 71 5c 32 31 30 65 62 5c 32 31 30 5c 33 31 37 5c 33 32 30 5c 33 31 33 5c | 16\216r.q\210eb\210\317\320\313\ |
0ac0 | 33 32 31 23 5c 32 30 33 29 00 60 5c 33 32 32 20 7b 5c 32 30 32 2c 00 5c 33 32 33 5c 33 32 34 21 | 321#\203).`\322.{\202,.\323\324! |
0ae0 | 2e 07 5c 32 30 37 22 20 5b 74 65 78 74 20 75 72 6c 2d 68 74 74 70 2d 61 74 74 65 6d 70 74 2d 6b | ..\207".[text.url-http-attempt-k |
0b00 | 65 65 70 61 6c 69 76 65 73 20 75 72 6c 2d 72 65 71 75 65 73 74 2d 64 61 74 61 20 75 72 6c 2d 72 | eepalives.url-request-data.url-r |
0b20 | 65 71 75 65 73 74 2d 65 78 74 72 61 2d 68 65 61 64 65 72 73 20 75 72 6c 2d 72 65 71 75 65 73 74 | equest-extra-headers.url-request |
0b40 | 2d 6d 65 74 68 6f 64 20 62 75 66 20 22 50 4f 53 54 22 20 28 28 22 43 6f 6e 74 65 6e 74 2d 54 79 | -method.buf."POST".(("Content-Ty |
0b60 | 70 65 22 20 2e 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d 77 77 77 2d 66 6f 72 6d 2d 75 72 | pe"..."application/x-www-form-ur |
0b80 | 6c 65 6e 63 6f 64 65 64 22 29 29 20 66 6f 72 6d 61 74 20 22 66 3a 31 3d 25 73 22 20 75 72 6c 2d | lencoded")).format."f:1=%s".url- |
0ba0 | 68 65 78 69 66 79 2d 73 74 72 69 6e 67 20 6e 69 6c 20 75 72 6c 2d 72 65 74 72 69 65 76 65 2d 73 | hexify-string.nil.url-retrieve-s |
0bc0 | 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 20 22 68 74 74 70 3a 2f 2f 69 78 2e 69 6f 2f 22 20 23 5b 6e | ynchronously."http://ix.io/".#[n |
0be0 | 69 6c 20 22 5c 33 30 31 08 21 5c 32 30 37 22 20 5b 62 75 66 20 6b 69 6c 6c 2d 62 75 66 66 65 72 | il."\301.!\207".[buf.kill-buffer |
0c00 | 5d 20 32 5d 20 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 5c 6e 5c 6e 22 20 74 20 | ].2].re-search-forward."\n\n".t. |
0c20 | 70 6f 69 6e 74 2d 61 74 2d 65 6f 6c 20 65 72 72 6f 72 20 22 45 72 72 6f 72 20 64 75 72 69 6e 67 | point-at-eol.error."Error.during |
0c40 | 20 70 61 73 74 69 6e 67 20 74 6f 20 69 78 2e 69 6f 22 5d 20 36 20 28 23 24 20 2e 20 32 35 38 31 | .pasting.to.ix.io"].6.(#$...2581 |
0c60 | 29 5d 29 0a 28 70 72 6f 76 69 64 65 20 27 6c 75 69 2d 61 75 74 6f 70 61 73 74 65 29 0a | )]).(provide.'lui-autopaste). |